mirror of
https://github.com/leahneukirchen/mblaze
synced 2024-11-15 18:14:02 +00:00
129 lines
2.7 KiB
C
129 lines
2.7 KiB
C
#include <iconv.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#include "blaze822.h"
|
|
|
|
int
|
|
blaze822_mime2231_parameter(char *s, char *name,
|
|
char *dst, size_t dlen, char *tgtenc)
|
|
{
|
|
static signed char hex[] = {
|
|
-1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1,
|
|
-1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1,
|
|
-1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1,
|
|
0, 1, 2, 3, 4, 5, 6, 7, 8, 9,-1,-1, -1,-1,-1,-1,
|
|
-1,10,11,12, 13,14,15,-1, -1,-1,-1,-1, -1,-1,-1,-1,
|
|
-1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1,
|
|
-1,10,11,12, 13,14,15,-1, -1,-1,-1,-1, -1,-1,-1,-1,
|
|
-1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1, -1,-1,-1,-1
|
|
};
|
|
|
|
int i = 0;
|
|
char namenum[64];
|
|
|
|
char *srcenc = 0;
|
|
|
|
char *dststart = dst;
|
|
char *dstend = dst + dlen;
|
|
|
|
char *sbuf, *ebuf;
|
|
|
|
snprintf(namenum, sizeof namenum, "%s*", name);
|
|
if (blaze822_mime_parameter(s, namenum, &sbuf, &ebuf)) {
|
|
i = 100;
|
|
goto found_extended;
|
|
}
|
|
if (blaze822_mime_parameter(s, name, &sbuf, &ebuf)) {
|
|
i = 100;
|
|
goto found_plain;
|
|
}
|
|
|
|
while (i < 100) {
|
|
snprintf(namenum, sizeof namenum, "%s*%d*", name, i);
|
|
if (blaze822_mime_parameter(s, namenum, &sbuf, &ebuf)) {
|
|
found_extended:
|
|
// decode extended
|
|
if (i == 0 || i == 100) { // extended-initial-value
|
|
char *encstart = sbuf;
|
|
sbuf = strchr(sbuf, '\'');
|
|
if (!sbuf)
|
|
return 0;
|
|
srcenc = strndup(encstart, sbuf - encstart);
|
|
if (!srcenc)
|
|
return 0;
|
|
sbuf = strchr(sbuf+1, '\'');
|
|
if (!sbuf)
|
|
return 0;
|
|
sbuf++;
|
|
}
|
|
while (sbuf < ebuf && dst < dstend) {
|
|
if (sbuf[0] == '%') {
|
|
unsigned char c1 = sbuf[1];
|
|
unsigned char c2 = sbuf[2];
|
|
if (c1 < 127 && c2 < 127 &&
|
|
hex[c1] > -1 && hex[c2] > -1) {
|
|
*dst++ = (hex[c1] << 4) | hex[c2];
|
|
sbuf += 3;
|
|
} else {
|
|
*dst++ = *sbuf++;
|
|
}
|
|
} else {
|
|
*dst++ = *sbuf++;
|
|
}
|
|
}
|
|
*dst = 0;
|
|
} else {
|
|
namenum[strlen(namenum) - 1] = 0; // strip last *
|
|
if (blaze822_mime_parameter(s, namenum, &sbuf, &ebuf)) {
|
|
found_plain:
|
|
// copy plain
|
|
if (ebuf - sbuf < dstend - dst) {
|
|
memcpy(dst, sbuf, ebuf - sbuf);
|
|
dst += ebuf - sbuf;
|
|
}
|
|
*dst = 0;
|
|
} else {
|
|
break;
|
|
}
|
|
}
|
|
i++;
|
|
}
|
|
|
|
if (i <= 0)
|
|
return 0;
|
|
|
|
if (!srcenc)
|
|
return 1;
|
|
|
|
iconv_t ic = iconv_open(tgtenc, srcenc);
|
|
free(srcenc);
|
|
if (ic == (iconv_t)-1)
|
|
return 1;
|
|
|
|
size_t tmplen = dlen;
|
|
char *tmp = malloc(tmplen);
|
|
if (!tmp)
|
|
return 1;
|
|
char *tmpend = tmp;
|
|
|
|
size_t dstlen = dst - dststart;
|
|
dst = dststart;
|
|
|
|
size_t r = iconv(ic, &dst, &dstlen, &tmpend, &tmplen);
|
|
if (r == (size_t)-1) {
|
|
free(tmp);
|
|
return 1;
|
|
}
|
|
|
|
iconv_close(ic);
|
|
|
|
// copy back
|
|
memcpy(dststart, tmp, tmpend - tmp);
|
|
dststart[tmpend - tmp] = 0;
|
|
free(tmp);
|
|
|
|
return 1;
|
|
}
|