mirror of
https://github.com/php/php-src.git
synced 2024-10-12 12:02:37 +00:00
bf7662a241
messages as 7bit but then include 8bit chars in the body. Thanks to Dan Fitzpatrick for bringing this to my attention.
128 lines
2.7 KiB
C
Executable File
128 lines
2.7 KiB
C
Executable File
/* $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);
|
|
}
|