xLib/mime_tool.c File Reference

MIMEツール. More...

#include "protocol.h"
#include "mime_tool.h"

Include dependency graph for mime_tool.c:

Functions
char *	get_mime_boundary (tList *list)
tList *	get_mime_filename (FILE fp, char bndry)
tList *	get_mime_filenameffn (char fname, char bndry)
char *	decode_mime_rfc2047 (char *mime)
char *	decode_mime_rfc2231 (char *mime)
char *	decode_mime_string (char *mime)
char *	encode_mime_string (char *str, int kind)
int	get_mime_enckind (char *mime)

Detailed Description

Author:: Fumi.Iseki (C)

Date:: 2005 12/25

Definition in file mime_tool.c.

Function Documentation

char* decode_mime_rfc2047 ( char * mime )

char* decode_mime_rfc2047(char* mime)

RFC2047で定義された文字列をデコードする．文字列全体が，" " で括られていても可．

文字列中には余分な空白は無く，行間はCR+LF（またはLF）で区切られているものとする．エンコードされていない文字列が混在してもデコード可．

Parameters:

mime

デコードされる文字列．

Returns:: デコードされた文字列．

Definition at line 186 of file mime_tool.c.

References awk(), CHAR_CR, CHAR_LF, decode_base64(), decode_quoted_printable(), and MIME_ISO2022JP_LINE.

Referenced by decode_mime_string().

00187 {
00188     char* buf;
00189     char* ppb;
00190     char* dec;
00191     char* ppd;
00192     char* str;
00193     char* ret;
00194     int   i, j, len, decf=0, sz;
00195     
00196     if (mime==NULL) return NULL;
00197 
00198     buf = ppb = (char*)malloc(strlen((const char*)mime)+1);
00199     if (buf==NULL) return NULL;
00200     memcpy(buf, mime, strlen(mime));
00201     buf[strlen(mime)] = '\0';
00202 
00203     dec = ppd = (char*)malloc(strlen((const char*)mime)+1);
00204     if (dec==NULL) {
00205         free(buf);
00206         return NULL;
00207     }
00208     memset(dec, 0, strlen((const char*)mime)+1);
00209 
00210     if (ppb[0]=='"') ppb++;
00211     i = 0;
00212     while(ppb[i]!='\0' && ppb[i]!='"') i++;
00213     ppb[i] = '\0';
00214 
00215     while (ppb[0]!='\0') {
00216         str = awk(ppb, '?', 1);
00217         len = strlen((const char*)str);
00218         if (str[len-1]=='=') {  // エンコードの開始地点  =?
00219             len--;
00220             str[len] = '\0';
00221             for (i=0, j=0; i<len; i++) {
00222                 if (str[i]!=CHAR_CR && str[i]!=CHAR_LF) ppd[j++] = str[i];
00223             }
00224             ppd += j;
00225             ppb += len + 2;
00226             
00227             free(str);
00228             str = awk(ppb, '?', 1);
00229             if (str==NULL) {
00230                 free(dec);
00231                 free(buf);
00232                 return NULL;
00233             }
00234             if (strcasecmp(MIME_ISO2022JP_LINE, str)) {
00235                 free(str);
00236                 free(dec);
00237                 free(buf);
00238                 return NULL;
00239             }
00240             ppb += strlen(MIME_ISO2022JP_LINE) + 1;
00241 
00242             i++;
00243             free(str);
00244             str = awk(ppb, '?', 1);
00245             if (str==NULL) {
00246                 free(dec);
00247                 free(buf);
00248                 return NULL;
00249             }
00250             if (!strcasecmp("B", str))      decf = 1;   // Base64
00251             else if (!strcasecmp("Q", str)) decf = 2;   // Quoted Printable
00252             else {
00253                 free(str);
00254                 free(dec);
00255                 free(buf);
00256                 return NULL;
00257             }
00258             ppb += 2;
00259 
00260             i++;
00261             free(str);
00262             str = awk(ppb, '?', 1);
00263             if (str==NULL) {
00264                 free(dec);
00265                 free(buf);
00266                 return NULL;
00267             }
00268             len = strlen((const char*)str);
00269             if (ppb[len+1]!='=') {      // エンコード終了地点でない  ?=
00270                 free(str);
00271                 free(dec);
00272                 free(buf);
00273                 return NULL;
00274             }
00275             ppb += len + 2;
00276 
00277             ret = NULL;
00278             if (decf==1)      ret = (char*)decode_base64((unsigned char*)str, &sz);
00279             else if (decf==2) ret = (char*)decode_quoted_printable((unsigned char*)str, &sz);
00280             if (ret==NULL) {
00281                 free(str);
00282                 free(dec);
00283                 free(buf);
00284                 return NULL;
00285             }
00286             memcpy(ppd, ret, sz);
00287             ppd += sz;
00288 
00289             free(str);
00290             free(ret);
00291             decf = 0;
00292         }
00293         else {
00294             if (len==0) break;
00295             for (i=0, j=0; i<len; i++) {
00296                 if (str[i]!=CHAR_CR && str[i]!=CHAR_LF) ppd[j++] = str[i];
00297             }
00298             ppd += j;
00299             ppb += len;
00300         }
00301     }
00302 
00303     return dec;
00304 }

Here is the call graph for this function:

Here is the caller graph for this function:

char* decode_mime_rfc2231 ( char * mime )

char* decode_mime_rfc2231(char* mime)

mime の内容を MIME + RFC2231 としてデコードする．

mimeには余分な空白，ダブルクォーテーションは無く，行間は ;+CR+LF（またはCR+LF，またはLF）で区切られているものとする．つまり，mime は filename*#*= 以下の部分に相当．

Parameters:

mime

デコードされる文字列．

Returns:: デコードされた文字列．

Definition at line 319 of file mime_tool.c.

References awk(), CHAR_CR, CHAR_LF, decode_urlenc(), and MIME_ISO2022JP_LINE.

Referenced by decode_mime_string().

00321 00322 00323 00324 00325 00326 00327 00328 00329 00330 00331 00332     } 00333 00334 00335 00336 00337 00338 00339 00340     } 00341 00342 00343 00344 00345 00346 00347 00348 00349 00350 00351         i++; 00352     } 00353 00354 00355 00356 00357 00358 00359 }

class="fragment">00320 { char* buf; char* dec; int i, j, sz; if (mime==NULL) return NULL; buf = awk(mime, '\'', 1); if (buf==NULL) return NULL; if (strcasecmp(MIME_ISO2022JP_LINE, buf)) { free(buf); return NULL; mime += strlen(MIME_ISO2022JP_LINE) + 1; free(buf); buf = awk(mime, '\'', 1); if (buf==NULL) return NULL; if (strcasecmp("JA", buf)) { return NULL; mime += strlen("JA") + 1; free(buf); buf = (char*)malloc(strlen((const char*)mime)+1); if (buf==NULL) return NULL; memset(buf, 0, strlen((const char*)mime)+1); i = j = 0; while(mime[i]!='\0') { if (mime[i]!=' ' && mime[i]!=';' && mime[i]!=CHAR_CR && mime[i]!=CHAR_LF) buf[j++] = mime[i]; dec = (char*)decode_urlenc((unsigned char*)buf, &sz); if (dec!=NULL) dec[sz] = '\0'; free(buf); return dec;

Here is the call graph for this function:

Here is the caller graph for this function:

char* decode_mime_string ( char * mime )

char* decode_mime_string(char* mime)

MIME文字列をデコードする．文字列が " で括られている場合は " を削除する．また，文字列中の CR, LF は無視する．

Definition at line 369 of file mime_tool.c.

References CHAR_CR, CHAR_LF, decode_mime_rfc2047(), decode_mime_rfc2231(), get_mime_enckind(), MIME_BASE64_ENCODE, MIME_ERR_ENCODE, MIME_QUTDPRNTBL_ENCODE, MIME_UNKNOWN_ENCODE, and MIME_URL_ENCODE.

Referenced by get_mime_filename().

00370 {
00371     int   kind; 
00372     char* buf=NULL;
00373 
00374     kind = get_mime_enckind(mime);
00375     if (kind==MIME_ERR_ENCODE) return NULL;
00376 
00377     if (kind==MIME_UNKNOWN_ENCODE) {
00378         int   i, j, len;
00379         char* str;
00380 
00381         len = strlen((const char*)mime);
00382         str = (char*)malloc(len+1);
00383         if (str==NULL) return NULL;
00384 
00385         i = j = 0;
00386         while(mime[i]!='\0') {
00387             if (mime[i]!=CHAR_CR && mime[i]!=CHAR_LF) str[j++] = mime[i];
00388             i++;
00389         }
00390         str[j] = '\0';
00391 
00392         len = strlen(str);
00393         buf = (char*)malloc(len+1);
00394         if (buf==NULL) {
00395             free(str);
00396             return NULL;
00397         }
00398         if (str[0]=='\"' && str[len-1]=='\"' && str[len-2]!='\\') {
00399             memcpy(buf, str+1, len-2);
00400             buf[len-2] = '\0';
00401         }
00402         else {
00403             memcpy(buf, str, len);
00404             buf[len] = '\0';
00405         }
00406         free(str);
00407     }
00408     //
00409     else if (kind==MIME_BASE64_ENCODE || kind==MIME_QUTDPRNTBL_ENCODE) {
00410         buf = decode_mime_rfc2047(mime);
00411     }
00412     //
00413     else if (kind==MIME_URL_ENCODE) {
00414         int   i, j;
00415         char* str;
00416 
00417         str = (char*)malloc(strlen(mime)+1);
00418         if (str!=NULL) {
00419             memset(str, 0, strlen(mime)+1); 
00420             i = j = 0;  
00421             while(mime[i]!='\0') {
00422                 str[j++] = mime[i];
00423                 if (mime[i]==CHAR_LF) {
00424                     while(mime[i]!='\0' && mime[i]!='=') i++;       
00425                     if (mime[i]=='=') i++;
00426                 }
00427                 else i++;
00428             }
00429             buf = decode_mime_rfc2231(str);
00430             free(str);
00431         }
00432     }
00433 
00434     return buf;
00435 }

Here is the call graph for this function:

Here is the caller graph for this function:

char* encode_mime_string	(	char *	str,
		int	kind
	)

char* encode_mime_string(char* str, int kind)

MIME でエンコードする（一行分のみ）．

Parameters:

	str	エンコードする文字データ．
	kind	MIME_BASE64_ENCODE MIME + BASE64
	kind	MIME_QUTDPRNTBL_ENCODE MIME + quoted printable
	kind	MIME_URL_ENCODE RFC2231 (URL encode)

Returns:: エンコードされた文字列．要 free

Definition at line 451 of file mime_tool.c.

References Buffer::buf, cat_s2Buffer, copy_s2Buffer, encode_base64(), encode_quoted_printable(), encode_urlenc(), free_Buffer(), LBUF, make_Buffer(), MIME_BASE64, MIME_BASE64_ENCODE, MIME_QUTDPRNTBL, MIME_QUTDPRNTBL_ENCODE, MIME_RFC2231, and MIME_URL_ENCODE.

00452 {
00453     char*   buf;
00454     Buffer  mime;
00455 
00456     mime = make_Buffer(LBUF);
00457     if (mime.buf==NULL) return NULL;
00458 
00459     if (kind==MIME_BASE64_ENCODE) {
00460         buf = (char*)encode_base64((unsigned char*)str, -1);
00461         if (buf==NULL) {
00462             free_Buffer(&mime);
00463             return NULL;
00464         }
00465         copy_s2Buffer(MIME_BASE64, &mime);
00466         cat_s2Buffer(buf, &mime);
00467         cat_s2Buffer("?=", &mime);
00468         free(buf);
00469     }
00470     //
00471     else if (kind==MIME_QUTDPRNTBL_ENCODE) {
00472         buf = (char*)encode_quoted_printable((unsigned char*)str, -1);
00473         if (buf==NULL) {
00474             free_Buffer(&mime);
00475             return NULL;
00476         }
00477         copy_s2Buffer(MIME_QUTDPRNTBL, &mime);
00478         cat_s2Buffer(buf, &mime);
00479         cat_s2Buffer("?=", &mime);
00480         free(buf);
00481     }
00482     //
00483     else if (kind==MIME_URL_ENCODE) {
00484         buf = (char*)encode_urlenc((unsigned char*)str, -1);
00485         if (buf==NULL) {
00486             free_Buffer(&mime);
00487             return NULL;
00488         }
00489         copy_s2Buffer(MIME_RFC2231, &mime);
00490         cat_s2Buffer(buf, &mime);
00491         free(buf);
00492     }
00493     //
00494     else {
00495         copy_s2Buffer(str, &mime);
00496     }
00497 
00498     return (char*)mime.buf;
00499 }

Here is the call graph for this function:

char* get_mime_boundary ( tList * list )

char* get_mime_boundary(tList* list)

ヘッダリスト list から mime boundary を探し出す．

mime boundary 自身は先頭に '--' が付加されて返される．

Parameters:

list

ヘッダリスト

Returns:: '––' + MIME Boundary

Definition at line 29 of file mime_tool.c.

References Buffer::buf, free_Buffer(), MIME_BOUNDARY_LINE, MIME_CONTENTTYPE_LINE, and search_protocol_header_value().

00030 {
00031     int    i;
00032     char*  str;
00033     char*  pp;
00034     Buffer buf;
00035 
00036     buf = search_protocol_header_value(list, (char*)MIME_CONTENTTYPE_LINE, (char*)MIME_BOUNDARY_LINE, 1);
00037     if (buf.buf==NULL) return NULL;
00038     pp = (char*)buf.buf;
00039 
00040     pp += strlen(MIME_BOUNDARY_LINE);
00041     if (*pp=='\"') pp++;
00042 
00043     str = (char*)malloc(strlen((const char*)pp)+3);
00044     memset(str, 0, strlen((const char*)pp)+3);
00045     str[0] = '-';
00046     str[1] = '-';
00047     strncpy(str+2, pp, strlen((const char*)pp));
00048 
00049     i = 2;
00050     while (str[i]!='\0' && str[i]!='\"') i++;
00051     str[i] = '\0';
00052 
00053     free_Buffer(&buf);
00054     return str;
00055 }

Here is the call graph for this function:

int get_mime_enckind ( char * mime )

int get_mime_enckind(char* mime)

MIME文字列からエンコードの種類を獲得する．文字列は " " で括られていても可．

文字列の間には余分な空白は無く，行間は（存在すれば）CR+LF（またはLF）で区切られているものとする．

Parameters:

mime

検査される文字列．

Returns:: エンコードの種類．

Return values:

	MIME_ERR_ENCDE	(-1) エラー
	MIME_UNKNOWN_ENCODE	( 0) 不明もしくはエンコードなし．
	MIME_BASE64_ENCODE	( 1) MIME + BASE64
	MIME_QUTDPRNTBL_ENCODE	( 2) MIME + quoted printable
	MIME_URL_ENCODE	( 3) RFC2231 (URL encode)

Definition at line 520 of file mime_tool.c.

References MIME_BASE64, MIME_BASE64_ENCODE, MIME_ERR_ENCODE, MIME_QUTDPRNTBL, MIME_QUTDPRNTBL_ENCODE, MIME_RFC2231, MIME_UNKNOWN_ENCODE, MIME_URL_ENCODE, and strstrcase().

Referenced by decode_mime_string().

00521 {
00522     unsigned char* ps;
00523     unsigned char* pe;
00524 
00525     if (mime==NULL) return MIME_ERR_ENCODE;
00526 
00527     if ((ps=(unsigned char*)strstrcase((const char*)mime, MIME_BASE64))!=NULL) {
00528         if ((pe=(unsigned char*)strstr((const char*)mime, "?="))!=NULL) {
00529             if (pe>ps+strlen(MIME_BASE64)) {
00530                 return MIME_BASE64_ENCODE;
00531             }
00532         }
00533     }
00534 
00535     if (strstrcase(mime, MIME_QUTDPRNTBL)!=NULL) {
00536         return MIME_QUTDPRNTBL_ENCODE;
00537     }
00538 
00539     if (strstrcase(mime, MIME_RFC2231)!=NULL) {
00540         return MIME_URL_ENCODE;
00541     }
00542 
00543     return MIME_UNKNOWN_ENCODE;
00544 }

Here is the call graph for this function:

Here is the caller graph for this function:

tList* get_mime_filename	(	FILE *	fp,
		char *	bndry
	)

tList* get_mime_filename(FILE* fp, char* bndry)

ファイルから mime boundaryを探し出し，Content-Type行の内容をリストに格納して返す．複数行に渡る場合も結合して返す．

Parameters:

	fp	ファイルポインタ
	bndry	'––' + MIMEの境界文字列

Returns:: キー部にファイル名の入ったリスト

Definition at line 70 of file mime_tool.c.

References add_tList_node_str, Buffer::buf, decode_mime_string(), del_all_tList(), FALSE, fgets_Buffer(), find_tList_top(), free_Buffer(), get_protocol_header_list_seq(), init_Buffer(), LBUF, Loop, make_Buffer(), MIME_CONTENT_LINE, MIME_FILENAMESTAR_LINE, MIME_NAMEEQ_LINE, search_protocol_header(), and strstrcase().

Referenced by get_mime_filenameffn().

00071 {
00072     tList* lp = NULL;
00073     tList* ln = NULL;
00074     char*  pt;
00075     Buffer mime, buf;
00076 
00077 
00078     fseek(fp, 0, SEEK_SET);
00079 
00080     buf = make_Buffer(LBUF);
00081     fgets_Buffer(&buf, fp);
00082     
00083     // ファイルから MIMEヘッダを抽出    
00084     while (!feof(fp)) {
00085         if (!strcmp((char*)buf.buf, bndry)) {   // mime boundary を見つけた
00086             fgets_Buffer(&buf, fp);
00087             while(!feof(fp)) {
00088                 ln = lp;
00089                 lp = get_protocol_header_list_seq(lp, buf, ';', FALSE, FALSE);
00090                 fgets_Buffer(&buf, fp);
00091                 if (ln==lp) break;
00092             } 
00093         }
00094         else {
00095             fgets_Buffer(&buf, fp);
00096         }
00097     }
00098     free_Buffer(&buf);
00099     lp = find_tList_top(lp);
00100 
00101     mime = init_Buffer();
00102 
00103     // MIME_CONTEMT_LINE を取り出す．
00104     if (lp!=NULL) {
00105         int  i, nn = 1;
00106         tList* lt = NULL;
00107         ln = NULL;
00108 
00109         Loop {
00110             mime = search_protocol_header(lp, (char*)MIME_CONTENT_LINE, nn);
00111             if (mime.buf==NULL) break;
00112             
00113             pt = strstrcase((char*)mime.buf, MIME_NAMEEQ_LINE);             // name=
00114             if (pt!=NULL) {
00115                 pt += strlen(MIME_NAMEEQ_LINE);
00116             }
00117             else {
00118                 pt = strstrcase((char*)mime.buf, MIME_FILENAMESTAR_LINE);   // filename*
00119                 if (pt!=NULL) {
00120                     i = 0;
00121                     while(pt[i]!='\0' && pt[i]!='=') i++;
00122                     if (pt[i]=='=') pt += i + 1;
00123                 }
00124             }
00125 
00126             if (pt!=NULL) {
00127                 pt = decode_mime_string(pt);                // デコード
00128                 if (pt!=NULL) {                             // リストに格納
00129                     lt = add_tList_node_str(lt, pt, NULL);
00130                     if (ln==NULL) ln = lt;
00131                     free(pt);
00132                 }
00133             }
00134 
00135             nn++;
00136             free_Buffer(&mime);
00137         }
00138     }
00139 
00140     del_all_tList(&lp);
00141     return ln;
00142 }

Here is the call graph for this function:

Here is the caller graph for this function:

tList* get_mime_filenameffn	(	char *	fname,
		char *	bndry
	)

tList* get_mime_filenameffn(char* fname, char* bndry)

ファイルから mime boundaryを探し出し，CONTENT-TYPE行の内容をリストに格納して返す．複数行に渡る場合も結合して返す．

Parameters:

	fname	ファイル名
	bndry	'––' + MIMEの境界文字列

Returns:: キー部にファイル名の入ったリスト

Definition at line 157 of file mime_tool.c.

References get_mime_filename().

00158 {
00159     tList* lp;
00160     FILE*  fp;
00161 
00162     if (bndry==NULL) return NULL;
00163 
00164     fp = fopen(fname, "rb");
00165     if (fp==NULL) return NULL;
00166 
00167     lp = get_mime_filename(fp, bndry);
00168     fclose(fp);
00169 
00170     return lp;
00171 }

Here is the call graph for this function:

xLib/mime_tool.c File Reference

Functions

Detailed Description

Function Documentation