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
|
/* $Id$ */
/*
** Copyright 1998 - 1999 Double Precision, Inc. See COPYING for
** distribution information.
*/
#include "php.h"
#include "php_mailparse.h"
#define DEBUG_RFC2045_DECODE 0
static int op_func(int c, void *dat)
{
struct rfc2045 * p = (struct rfc2045*)dat;
rfc2045_add_workbufch(p, c);
/* drain buffer */
if (p->workbuflen >= 4096) {
#if DEBUG_RFC2045_DECODE
zend_printf("op_func buffer is %d; lets drain it\n", p->workbuflen);
#endif
(*p->udecode_func)(p->workbuf, p->workbuflen, p->misc_decode_ptr);
p->workbuflen = 0;
}
return c;
}
void rfc2045_cdecode_start(struct rfc2045 *p,
rfc2045_decode_user_func_t u,
void *miscptr)
{
enum mbfl_no_encoding from = mbfl_no_encoding_8bit;
TSRMLS_FETCH();
if (p->content_transfer_encoding)
{
from = mbfl_name2no_encoding(p->content_transfer_encoding);
if (from == mbfl_no_encoding_invalid) {
zend_error(E_WARNING, "%s(): I don't know how to decode %s transfer encoding!",
get_active_function_name(TSRMLS_C),
p->content_transfer_encoding);
from = mbfl_no_encoding_8bit;
}
}
p->misc_decode_ptr=miscptr;
p->udecode_func=u;
p->workbuflen=0;
if (from == mbfl_no_encoding_8bit || from == mbfl_no_encoding_7bit)
p->decode_filter = NULL;
else
p->decode_filter = mbfl_convert_filter_new(
from, mbfl_no_encoding_8bit,
op_func,
NULL,
p
);
}
int rfc2045_cdecode_end(struct rfc2045 *p)
{
if (p->decode_filter)
{
mbfl_convert_filter_flush(p->decode_filter);
mbfl_convert_filter_delete(p->decode_filter);
p->decode_filter = NULL;
if (p->workbuflen > 0) {
#if DEBUG_RFC2045_DECODE
zend_printf("cdecode end: there are %d bytes remaining; drain it\n",
p->workbuflen);
#endif
(*p->udecode_func)(p->workbuf, p->workbuflen, p->misc_decode_ptr);
}
}
return 0;
}
int rfc2045_cdecode(struct rfc2045 *p, const char *s, size_t l)
{
if (s && l)
{
int i;
if (p->decode_filter)
{
#if DEBUG_RFC2045_DECODE
zend_printf("cdecode: with filter %d bytes\n", l);
#endif
for (i=0; i<l; i++)
{
if (mbfl_convert_filter_feed(s[i], p->decode_filter) < 0) {
#if DEBUG_RFC2045_DECODE
int j;
zend_printf("returning -1 on %d byte == %d (%c)! context is\n",
i, (unsigned char)s[i], s[i]);
for (j = i - 10; j < i + 10; j++) {
zend_printf(" byte %d was %d '%c'\n",
j, (unsigned char)s[j], s[j]
);
}
#else
TSRMLS_FETCH();
zend_error(E_WARNING, "%s() - filter conversion failed. Input message is probably incorrectly encoded\n",
get_active_function_name(TSRMLS_C)
);
#endif
return -1;
}
}
}
else {
#if DEBUG_RFC2045_DECODE
zend_printf("cdecode: no filter %d bytes\n", l);
#endif
return ((*p->udecode_func)(s,l,p->misc_decode_ptr));
}
}
return (0);
}
|
