blob: 26309f6e1a64cb42b515958c9ca85bdf19a92b27 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
/*
+----------------------------------------------------------------------+
| PHP version 4.0 |
+----------------------------------------------------------------------+
| Copyright (c) 1997-2001 The PHP Group |
+----------------------------------------------------------------------+
| This source file is subject to version 2.02 of the PHP license, |
| that is bundled with this package in the file LICENSE, and is |
| available at through the world-wide-web at |
| http://www.php.net/license/2_02.txt. |
| If you did not receive a copy of the PHP license and are unable to |
| obtain it through the world-wide-web, please send a note to |
| license@php.net so we can mail you a copy immediately. |
+----------------------------------------------------------------------+
| Authors: Kirill Maximov <kir@actimind.com> |
+----------------------------------------------------------------------+
*/
/* $Id$ */
#include <stdlib.h>
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#endif
#include <string.h>
#include <errno.h>
#include "php.h"
#include "quot_print.h"
#include <stdio.h>
/*
* Converting HEX char to INT value
*/
static char php_hex2int(int c)
{
if ( isdigit(c) )
{
return c - '0';
}
else if ( c >= 'A' && c <= 'F' )
{
return c - 'A' + 10;
}
else
{
return -1;
}
}
/*
*
* Decoding Quoted-printable string.
*
*/
/* {{{ proto string quoted_printable_decode(string str)
Convert a quoted-printable string to an 8 bit string */
PHP_FUNCTION(quoted_printable_decode)
{
pval **arg1;
char *str_in, *str_out;
int i = 0, j = 0, k;
if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1,&arg1)==FAILURE)
{
WRONG_PARAM_COUNT;
}
convert_to_string_ex(arg1);
if((*arg1)->value.str.len == 0) {
/* shortcut */
RETURN_EMPTY_STRING();
}
str_in = (*arg1)->value.str.val;
str_out = emalloc((*arg1)->value.str.len+1);
while ( str_in[i] )
{
switch (str_in[i])
{
case '=':
if (str_in[i+1] && str_in[i+2] &&
isxdigit((int)str_in[i+1]) &&
isxdigit((int)str_in[i+1]) )
{
str_out[j++] = (php_hex2int((int)str_in[i+1]) << 4 )
+ php_hex2int((int)str_in[i+2]);
i += 3;
}
else /* check for soft line break according to RFC 2045*/
{
k = 1;
while ( str_in[i+k] && ((str_in[i+k] == 32) || (str_in[i+k] == 9)) )
{
/* Possibly, skip spaces/tabs at the end of line */
k++;
}
if (!str_in[i+k])
{
/* End of line reached */
i += k;
}
else if ( (str_in[i+k] == 10) && (str_in[i+k+1] == 13))
{
/* CRLF */
i += k+2;
}
else if ( (str_in[i+k] == 13) || (str_in[i+k] == 10) )
{
/* CR or LF */
i += k+1;
}
else
{
str_out[j++] = str_in[i++];
}
}
break;
default:
str_out[j++] = str_in[i++];
}
}
str_out[j] = '\0';
RETVAL_STRINGL(str_out, j, 0);
}
/* }}} */
|