Annotation of libwww/Library/src/HTMIME.c, revision 2.47
2.15 frystyk 1: /* HTMIME.c
2: ** MIME MESSAGE PARSE
3: **
2.22 frystyk 4: ** (c) COPYRIGHT MIT 1995.
2.15 frystyk 5: ** Please first read the full copyright statement in the file COPYRIGH.
2.1 timbl 6: **
7: ** This is RFC 1341-specific code.
8: ** The input stream pushed into this parser is assumed to be
9: ** stripped on CRs, ie lines end with LF, not CR LF.
10: ** (It is easy to change this except for the body part where
11: ** conversion can be slow.)
12: **
13: ** History:
14: ** Feb 92 Written Tim Berners-Lee, CERN
2.13 duns 15: ** 8 Jul 94 FM Insulate free() from _free structure element.
2.18 frystyk 16: ** 14 Mar 95 HFN Now using anchor for storing data. No more `\n',
17: ** static buffers etc.
2.1 timbl 18: */
2.17 frystyk 19:
20: /* Library include files */
21: #include "tcp.h"
22: #include "HTUtils.h"
23: #include "HTString.h"
2.9 luotonen 24: #include "HTFormat.h"
2.27 frystyk 25: #include "HTCache.h"
26: #include "HTAlert.h"
2.42 frystyk 27: #include "HTAncMan.h"
2.18 frystyk 28: #include "HTChunk.h"
2.26 frystyk 29: #include "HTMethod.h"
2.36 frystyk 30: #include "HTHeader.h"
2.24 frystyk 31: #include "HTSocket.h"
2.39 frystyk 32: #include "HTWWWStr.h"
2.17 frystyk 33: #include "HTFWrite.h"
2.32 frystyk 34: #include "HTNetMan.h"
2.31 frystyk 35: #include "HTReqMan.h"
2.14 frystyk 36: #include "HTMIME.h" /* Implemented here */
2.1 timbl 37:
38: /* MIME Object
39: ** -----------
40: */
41: typedef enum _MIME_state {
2.23 frystyk 42: BEGINNING_OF_LINE=0,
2.18 frystyk 43: CHECK, /* check against check_pointer */
44: UNKNOWN, /* Unknown header */
45: JUNK_LINE, /* Ignore rest of header */
46:
2.32 frystyk 47: CON, /* Intermediate states */
48: CONTENT,
2.45 frystyk 49: FIRSTLETTER_A,
2.18 frystyk 50: FIRSTLETTER_D,
51: FIRSTLETTER_L,
52: CONTENTLETTER_L,
53: CONTENTLETTER_T,
54:
2.45 frystyk 55: ACCEPT_TYPE, /* Headers supported */
56: ACCEPT_CHARSET,
57: ACCEPT_ENCODING,
58: ACCEPT_LANGUAGE,
59: ALLOW,
2.18 frystyk 60: AUTHENTICATE,
2.32 frystyk 61: CONNECTION,
2.18 frystyk 62: CONTENT_ENCODING,
63: CONTENT_LANGUAGE,
64: CONTENT_LENGTH,
2.14 frystyk 65: CONTENT_TRANSFER_ENCODING,
66: CONTENT_TYPE,
2.23 frystyk 67: MIME_DATE,
2.18 frystyk 68: DERIVED_FROM,
69: EXPIRES,
70: LAST_MODIFIED,
71: LINK,
2.14 frystyk 72: LOCATION,
2.18 frystyk 73: PUBLIC_METHODS,
74: RETRY_AFTER,
75: TITLE,
76: URI_HEADER,
77: VERSION
2.1 timbl 78: } MIME_state;
79:
80: struct _HTStream {
2.18 frystyk 81: CONST HTStreamClass * isa;
82: HTRequest * request;
2.32 frystyk 83: HTNet * net;
84: HTParentAnchor * anchor;
2.18 frystyk 85: HTStream * target;
86: HTFormat target_format;
87: HTChunk * buffer;
88: HTSocketEOL EOLstate;
89: BOOL transparent;
2.35 frystyk 90: BOOL nntp;
2.1 timbl 91: };
92:
2.18 frystyk 93: /* ------------------------------------------------------------------------- */
2.1 timbl 94:
2.18 frystyk 95: /*
2.1 timbl 96: ** This is a FSM parser which is tolerant as it can be of all
97: ** syntax errors. It ignores field names it does not understand,
98: ** and resynchronises on line beginnings.
99: */
2.36 frystyk 100: PRIVATE int parseheader (HTStream * me, HTRequest * request,
101: HTParentAnchor * anchor)
2.18 frystyk 102: {
103: MIME_state state = BEGINNING_OF_LINE;
104: MIME_state ok_state; /* got this state if match */
105: char *ptr = me->buffer->data-1; /* We dont change the data in length */
106: char *stop = ptr+me->buffer->size; /* When to stop */
107: char *header = ptr; /* For diagnostics */
108: CONST char * check_pointer; /* checking input */
109: char *value;
2.27 frystyk 110:
111: /* In case we get an empty header consisting of a CRLF, we fall thru */
2.18 frystyk 112: while (ptr < stop) {
113: switch (state) {
114: case BEGINNING_OF_LINE:
115: header = ++ptr;
116: switch (TOLOWER(*ptr)) {
117: case 'a':
2.45 frystyk 118: state = FIRSTLETTER_A;
2.18 frystyk 119: break;
120:
121: case 'c':
2.32 frystyk 122: check_pointer = "on";
123: ok_state = CON;
2.18 frystyk 124: state = CHECK;
125: break;
126:
127: case 'd':
128: state = FIRSTLETTER_D;
129: break;
130:
131: case 'e':
132: check_pointer = "xpires";
133: ok_state = EXPIRES;
134: state = CHECK;
135: break;
136:
2.32 frystyk 137: case 'k':
2.33 frystyk 138: check_pointer = "eep-alive";
139: ok_state = JUNK_LINE; /* We don't use this but recognize it */
140: state = CHECK;
2.32 frystyk 141: break;
142:
2.18 frystyk 143: case 'l':
144: state = FIRSTLETTER_L;
145: break;
146:
147: case 'm':
148: check_pointer = "ime-version";
149: ok_state = JUNK_LINE; /* We don't use this but recognize it */
150: state = CHECK;
151: break;
152:
2.35 frystyk 153: case 'n':
154: check_pointer = "ewsgroups";
155: me->nntp = YES; /* Due to news brain damage */
156: ok_state = JUNK_LINE; /* We don't use this but recognize it */
157: state = CHECK;
158: break;
159:
2.18 frystyk 160: case 'r':
161: check_pointer = "etry-after";
162: ok_state = RETRY_AFTER;
163: state = CHECK;
164: break;
165:
166: case 's':
167: check_pointer = "erver";
168: ok_state = JUNK_LINE; /* We don't use this but recognize it */
169: state = CHECK;
170: break;
2.1 timbl 171:
2.18 frystyk 172: case 't':
173: check_pointer = "itle";
174: ok_state = TITLE;
175: state = CHECK;
176: break;
177:
178: case 'u':
179: check_pointer = "ri";
180: ok_state = URI_HEADER;
181: state = CHECK;
182: break;
183:
184: case 'v':
185: check_pointer = "ersion";
186: ok_state = VERSION;
187: state = CHECK;
188: break;
189:
190: case 'w':
191: check_pointer = "ww-authenticate";
192: ok_state = AUTHENTICATE;
193: state = CHECK;
194: break;
2.1 timbl 195:
2.18 frystyk 196: default:
197: state = UNKNOWN;
198: break;
199: }
200: ptr++;
2.1 timbl 201: break;
202:
2.45 frystyk 203: case FIRSTLETTER_A:
204: if (!strncasecomp(ptr, "llow", 4)) {
205: state = ALLOW;
206: ptr += 4;
207: } else if (!strncasecomp(ptr, "ccept-language", 14)) {
208: state = ACCEPT_LANGUAGE;
209: ptr += 14;
210: } else if (!strncasecomp(ptr, "ccept-charset", 13)) {
211: state = ACCEPT_CHARSET;
212: ptr += 13;
213: } else if (!strncasecomp(ptr, "ccept", 5)) {
214: state = ACCEPT_TYPE;
215: ptr += 5;
216: } else
217: state = UNKNOWN;
218: ptr++;
219: break;
220:
2.18 frystyk 221: case FIRSTLETTER_D:
222: switch (TOLOWER(*ptr)) {
223: case 'a':
224: check_pointer = "te";
2.23 frystyk 225: ok_state = MIME_DATE;
2.18 frystyk 226: state = CHECK;
227: break;
228:
229: case 'e':
230: check_pointer = "rived-from";
231: ok_state = DERIVED_FROM;
232: state = CHECK;
233: break;
234:
235: default:
236: state = UNKNOWN;
237: break;
238: }
239: ptr++;
240: break;
241:
242: case FIRSTLETTER_L:
243: switch (TOLOWER(*ptr)) {
244: case 'a':
245: check_pointer = "st-modified";
246: ok_state = LAST_MODIFIED;
247: state = CHECK;
248: break;
249:
250: case 'i':
251: check_pointer = "nk";
252: ok_state = LINK;
253: state = CHECK;
254: break;
255:
256: case 'o':
257: check_pointer = "cation";
258: ok_state = LOCATION;
259: state = CHECK;
260: break;
261:
262: default:
263: state = UNKNOWN;
264: break;
265: }
266: ptr++;
267: break;
268:
2.32 frystyk 269: case CON:
270: switch (TOLOWER(*ptr)) {
271: case 'n':
272: check_pointer = "ection";
273: ok_state = CONNECTION;
274: state = CHECK;
275: break;
276:
277: case 't':
278: check_pointer = "ent-";
279: ok_state = CONTENT;
280: state = CHECK;
281: break;
282:
283: default:
284: state = UNKNOWN;
285: break;
286: }
287: ptr++;
288: break;
289:
2.18 frystyk 290: case CONTENT:
291: switch (TOLOWER(*ptr)) {
292: case 'e':
293: check_pointer = "ncoding";
294: ok_state = CONTENT_ENCODING;
295: state = CHECK;
296: break;
297:
298: case 'l':
299: state = CONTENTLETTER_L;
300: break;
301:
302: case 't':
303: state = CONTENTLETTER_T;
304: break;
305:
306: default:
307: state = UNKNOWN;
308: break;
309: }
310: ptr++;
2.1 timbl 311: break;
2.14 frystyk 312:
2.18 frystyk 313: case CONTENTLETTER_L:
314: switch (TOLOWER(*ptr)) {
315: case 'a':
316: check_pointer = "nguage";
317: ok_state = CONTENT_LANGUAGE;
318: state = CHECK;
319: break;
320:
321: case 'e':
322: check_pointer = "ngth";
323: ok_state = CONTENT_LENGTH;
324: state = CHECK;
325: break;
326:
327: default:
328: state = UNKNOWN;
329: break;
330: }
331: ptr++;
2.14 frystyk 332: break;
333:
2.18 frystyk 334: case CONTENTLETTER_T:
335: switch (TOLOWER(*ptr)) {
336: case 'r':
337: check_pointer = "ansfer-encoding";
338: ok_state = CONTENT_TRANSFER_ENCODING;
339: state = CHECK;
340: break;
341:
342: case 'y':
343: check_pointer = "pe";
344: ok_state = CONTENT_TYPE;
345: state = CHECK;
346: break;
347:
348: default:
349: state = UNKNOWN;
350: break;
351: }
352: ptr++;
2.14 frystyk 353: break;
354:
2.18 frystyk 355: case CHECK: /* Check against string */
2.45 frystyk 356: while (TOLOWER(*ptr) == *check_pointer) ptr++, check_pointer++;
357: if (!*check_pointer) {
2.18 frystyk 358: state = ok_state;
359: while (*ptr && (WHITE(*ptr) || *ptr==':')) /* Spool to value */
360: ptr++;
361: } else
362: state = UNKNOWN;
2.14 frystyk 363: break;
364:
2.45 frystyk 365: case ACCEPT_TYPE: /* @@@ */
366: state = JUNK_LINE;
367: break;
368:
369: case ACCEPT_CHARSET: /* @@@ */
370: state = JUNK_LINE;
371: break;
372:
373: case ACCEPT_ENCODING: /* @@@ */
374: state = JUNK_LINE;
375: break;
376:
377: case ACCEPT_LANGUAGE: /* @@@ */
378: state = JUNK_LINE;
379: break;
380:
381: case ALLOW:
2.20 frystyk 382: while ((value = HTNextField(&ptr)) != NULL) {
383: HTMethod new_method;
2.26 frystyk 384: /* We treat them as case-insensitive! */
2.20 frystyk 385: if ((new_method = HTMethod_enum(value)) != METHOD_INVALID)
386: anchor->methods += new_method;
2.1 timbl 387: }
2.18 frystyk 388: if (STREAM_TRACE)
2.37 frystyk 389: TTYPrint(TDEST, "MIMEParser.. Methods allowed: %d\n",
2.18 frystyk 390: anchor->methods);
391: state = JUNK_LINE;
2.1 timbl 392: break;
2.18 frystyk 393:
394: case AUTHENTICATE:
395: if ((value = HTNextField(&ptr)) != NULL) {
396: StrAllocCopy(request->WWWAAScheme, value);
2.20 frystyk 397:
398: /* The parsing is done in HTSSUtils.c for the moment */
399: if (*ptr) StrAllocCopy(request->WWWAARealm, ptr);
2.1 timbl 400: }
2.18 frystyk 401: state = JUNK_LINE;
402: break;
403:
2.32 frystyk 404: case CONNECTION:
405: if ((value = HTNextField(&ptr)) != NULL) {
406: if (!strcasecomp(value, "keep-alive")) {
407: if (STREAM_TRACE)
2.43 frystyk 408: TTYPrint(TDEST,"MIMEParser.. Persistent Connection\n");
2.32 frystyk 409: HTDNS_setSocket(me->net->dns, me->net->sockfd);
410: }
411: }
412: state = JUNK_LINE;
413: break;
414:
2.18 frystyk 415: case CONTENT_ENCODING:
416: if ((value = HTNextField(&ptr)) != NULL) {
417: char *lc = value;
2.20 frystyk 418: while ((*lc = TOLOWER(*lc))) lc++;
2.18 frystyk 419: anchor->content_encoding = HTAtom_for(value);
420: }
421: state = JUNK_LINE;
422: break;
423:
2.21 frystyk 424: case CONTENT_LANGUAGE: /* @@@ SHOULD BE A LIST @@@ */
425: if ((value = HTNextField(&ptr)) != NULL) {
426: char *lc = value;
427: while ((*lc = TOLOWER(*lc))) lc++;
428: anchor->content_language = HTAtom_for(value);
429: }
430: state = JUNK_LINE;
2.18 frystyk 431: break;
432:
433: case CONTENT_LENGTH:
434: if ((value = HTNextField(&ptr)) != NULL)
435: anchor->content_length = atol(value);
436: state = JUNK_LINE;
437: break;
438:
439: case CONTENT_TRANSFER_ENCODING:
440: if ((value = HTNextField(&ptr)) != NULL) {
441: char *lc = value;
2.20 frystyk 442: while ((*lc = TOLOWER(*lc))) lc++;
2.18 frystyk 443: anchor->cte = HTAtom_for(value);
444: }
445: state = JUNK_LINE;
446: break;
447:
448: case CONTENT_TYPE:
449: if ((value = HTNextField(&ptr)) != NULL) {
450: char *lc = value;
451: while ((*lc = TOLOWER(*lc))) lc++;
452: anchor->content_type = HTAtom_for(value);
2.38 frystyk 453: while ((value = HTNextField(&ptr)) != NULL) {
2.20 frystyk 454: if (!strcasecomp(value, "charset")) {
455: if ((value = HTNextField(&ptr)) != NULL) {
456: lc = value;
457: while ((*lc = TOLOWER(*lc))) lc++;
458: anchor->charset = HTAtom_for(value);
459: }
2.38 frystyk 460: } else if (!strcasecomp(value, "level")) {
2.20 frystyk 461: if ((value = HTNextField(&ptr)) != NULL) {
462: lc = value;
463: while ((*lc = TOLOWER(*lc))) lc++;
464: anchor->level = HTAtom_for(value);
465: }
2.38 frystyk 466: } else if (!strcasecomp(value, "boundary")) {
467: if ((value = HTNextField(&ptr)) != NULL) {
468: StrAllocCopy(request->boundary, value);
469: }
2.20 frystyk 470: }
471: }
2.1 timbl 472: }
2.20 frystyk 473: state = JUNK_LINE;
2.18 frystyk 474: break;
475:
2.23 frystyk 476: case MIME_DATE:
2.18 frystyk 477: anchor->date = HTParseTime(ptr);
478: state = JUNK_LINE;
479: break;
480:
481: case DERIVED_FROM:
482: if ((value = HTNextField(&ptr)) != NULL)
483: StrAllocCopy(anchor->derived_from, value);
484: state = JUNK_LINE;
485: break;
486:
487: case EXPIRES:
488: anchor->expires = HTParseTime(ptr);
489: state = JUNK_LINE;
490: break;
491:
492: case LAST_MODIFIED:
493: anchor->last_modified = HTParseTime(ptr);
494: state = JUNK_LINE;
495: break;
496:
497: case LINK:
2.20 frystyk 498: state = UNKNOWN; /* @@@@@@@@@@@ */
2.18 frystyk 499: break;
500:
501: case LOCATION:
2.46 frystyk 502: request->redirectionAnchor = HTAnchor_findAddress(HTStrip(ptr));
2.18 frystyk 503: state = JUNK_LINE;
504: break;
505:
506: case PUBLIC_METHODS:
2.20 frystyk 507: state = UNKNOWN; /* @@@@@@@@@@@ */
2.18 frystyk 508: break;
509:
510: case RETRY_AFTER:
2.19 frystyk 511: request->retry_after = HTParseTime(ptr);
512: state = JUNK_LINE;
2.18 frystyk 513: break;
514:
515: case TITLE: /* Can't reuse buffer as HTML version might differ */
516: if ((value = HTNextField(&ptr)) != NULL)
517: StrAllocCopy(anchor->title, value);
518: state = JUNK_LINE;
519: break;
520:
521: case URI_HEADER:
522: state = LOCATION; /* @@@ Need extended parsing */
523: break;
524:
525: case VERSION:
526: if ((value = HTNextField(&ptr)) != NULL)
527: StrAllocCopy(anchor->version, value);
528: state = JUNK_LINE;
529: break;
530:
531: case UNKNOWN:
2.40 frystyk 532: {
2.36 frystyk 533: HTList * list;
534: HTParserCallback *cbf;
535: int status;
536: BOOL override;
537: if (STREAM_TRACE)
2.38 frystyk 538: TTYPrint(TDEST,"MIMEParser.. Unknown `%s\'\n", header);
2.36 frystyk 539: if ((list = HTRequest_parser(request, &override)) &&
2.40 frystyk 540: (cbf = HTParser_find(list, header)) &&
541: (status = (*cbf)(request, header) != HT_OK)) {
2.36 frystyk 542: return status;
543: } else if (!override &&
544: (list = HTHeader_parser()) &&
2.40 frystyk 545: (cbf = HTParser_find(list, header)) &&
546: (status = (*cbf)(request, header) != HT_OK)) {
2.36 frystyk 547: return status;
548: }
549: }
2.18 frystyk 550:
551: case JUNK_LINE:
552: while (*ptr) ptr++;
553: state = BEGINNING_OF_LINE;
554: break;
2.1 timbl 555: }
2.18 frystyk 556: }
2.27 frystyk 557:
2.43 frystyk 558: anchor->header_parsed = YES;
2.47 ! frystyk 559: me->transparent = YES; /* Pump rest of data right through */
! 560:
! 561: #if 0
! 562: /* If we're a server then stop here */
! 563: if (request->server_net) {
! 564: return HTMethod_hasEntity(request->method) ? HT_PAUSE : HT_LOADED;
! 565: }
! 566: #endif
! 567: if (request->method == METHOD_HEAD) return HT_LOADED;
2.43 frystyk 568:
2.35 frystyk 569: /* News server almost never send content type or content length */
570: if (anchor->content_type != WWW_UNKNOWN || me->nntp) {
2.18 frystyk 571: if (STREAM_TRACE)
2.37 frystyk 572: TTYPrint(TDEST, "MIMEParser.. Convert %s to %s\n",
2.30 frystyk 573: HTAtom_name(anchor->content_type),
574: HTAtom_name(me->target_format));
575: if ((me->target=HTStreamStack(anchor->content_type, me->target_format,
576: me->target, request, YES)) == NULL) {
577: if (STREAM_TRACE)
2.37 frystyk 578: TTYPrint(TDEST, "MIMEParser.. Can't convert media type\n");
2.47 ! frystyk 579: me->target = HTErrorStream();
2.30 frystyk 580: }
2.18 frystyk 581: }
2.27 frystyk 582: return HT_OK;
2.1 timbl 583: }
584:
585:
2.18 frystyk 586: /*
587: ** Header is terminated by CRCR, LFLF, CRLFLF, CRLFCRLF
588: ** Folding is either of CF LWS, LF LWS, CRLF LWS
589: */
2.36 frystyk 590: PRIVATE int HTMIME_put_block (HTStream * me, CONST char * b, int l)
2.18 frystyk 591: {
592: while (!me->transparent && l-- > 0) {
593: if (me->EOLstate == EOL_FCR) {
2.27 frystyk 594: if (*b == CR) { /* End of header */
2.32 frystyk 595: int status = parseheader(me, me->request, me->anchor);
2.46 frystyk 596: HTNet_setBytesRead(me->net, l);
2.27 frystyk 597: if (status != HT_OK)
598: return status;
599: } else if (*b == LF) /* CRLF */
2.18 frystyk 600: me->EOLstate = EOL_FLF;
601: else if (WHITE(*b)) { /* Folding: CR SP */
602: me->EOLstate = EOL_BEGIN;
2.44 frystyk 603: HTChunk_putc(me->buffer, ' ');
2.18 frystyk 604: } else { /* New line */
605: me->EOLstate = EOL_BEGIN;
2.44 frystyk 606: HTChunk_putc(me->buffer, '\0');
607: HTChunk_putc(me->buffer, *b);
2.18 frystyk 608: }
609: } else if (me->EOLstate == EOL_FLF) {
610: if (*b == CR) /* LF CR or CR LF CR */
611: me->EOLstate = EOL_SCR;
2.27 frystyk 612: else if (*b == LF) { /* End of header */
2.32 frystyk 613: int status = parseheader(me, me->request, me->anchor);
2.46 frystyk 614: HTNet_setBytesRead(me->net, l);
2.27 frystyk 615: if (status != HT_OK)
616: return status;
617: } else if (WHITE(*b)) { /* Folding: LF SP or CR LF SP */
2.18 frystyk 618: me->EOLstate = EOL_BEGIN;
2.44 frystyk 619: HTChunk_putc(me->buffer, ' ');
2.18 frystyk 620: } else { /* New line */
621: me->EOLstate = EOL_BEGIN;
2.44 frystyk 622: HTChunk_putc(me->buffer, '\0');
623: HTChunk_putc(me->buffer, *b);
2.18 frystyk 624: }
625: } else if (me->EOLstate == EOL_SCR) {
2.27 frystyk 626: if (*b==CR || *b==LF) { /* End of header */
2.32 frystyk 627: int status = parseheader(me, me->request, me->anchor);
2.46 frystyk 628: HTNet_setBytesRead(me->net, l);
2.27 frystyk 629: if (status != HT_OK)
630: return status;
631: } else if (WHITE(*b)) { /* Folding: LF CR SP or CR LF CR SP */
2.18 frystyk 632: me->EOLstate = EOL_BEGIN;
2.44 frystyk 633: HTChunk_putc(me->buffer, ' ');
2.18 frystyk 634: } else { /* New line */
635: me->EOLstate = EOL_BEGIN;
2.44 frystyk 636: HTChunk_putc(me->buffer, '\0');
637: HTChunk_putc(me->buffer, *b);
2.18 frystyk 638: }
639: } else if (*b == CR) {
640: me->EOLstate = EOL_FCR;
641: } else if (*b == LF) {
642: me->EOLstate = EOL_FLF; /* Line found */
643: } else
2.44 frystyk 644: HTChunk_putc(me->buffer, *b);
2.18 frystyk 645: b++;
646: }
2.32 frystyk 647:
648: /*
649: ** Put the rest down the stream without touching the data but make sure
650: ** that we get the correct content length of data
651: */
2.47 ! frystyk 652: if (l < 0) return HT_OK;
! 653: if (me->target) {
! 654: long cl = me->anchor->content_length;
! 655: int status = (*me->target->isa->put_block)(me->target, b, l);
! 656: if (status == HT_OK)
! 657: /* Check if CL at all - thanks to jwei@hal.com (John Wei) */
! 658: return (me->request->method == METHOD_HEAD ||
! 659: (cl >= 0 && HTNet_bytesRead(me->net) >= cl)) ?
! 660: HT_LOADED : HT_OK;
2.46 frystyk 661: else
2.47 ! frystyk 662: return status;
! 663: } else if (me->anchor->header_parsed)
! 664: return HT_LOADED;
! 665: return HT_WOULD_BLOCK;
2.18 frystyk 666: }
667:
668:
669: /* Character handling
670: ** ------------------
671: */
2.36 frystyk 672: PRIVATE int HTMIME_put_character (HTStream * me, char c)
2.18 frystyk 673: {
674: return HTMIME_put_block(me, &c, 1);
675: }
676:
2.1 timbl 677:
678: /* String handling
679: ** ---------------
680: */
2.36 frystyk 681: PRIVATE int HTMIME_put_string (HTStream * me, CONST char * s)
2.1 timbl 682: {
2.18 frystyk 683: return HTMIME_put_block(me, s, (int) strlen(s));
2.1 timbl 684: }
685:
686:
2.18 frystyk 687: /* Flush an stream object
688: ** ---------------------
2.1 timbl 689: */
2.36 frystyk 690: PRIVATE int HTMIME_flush (HTStream * me)
2.1 timbl 691: {
2.47 ! frystyk 692: return me->target ? (*me->target->isa->flush)(me->target) : HT_OK;
2.1 timbl 693: }
694:
2.18 frystyk 695: /* Free a stream object
696: ** --------------------
2.1 timbl 697: */
2.36 frystyk 698: PRIVATE int HTMIME_free (HTStream * me)
2.1 timbl 699: {
2.18 frystyk 700: int status = HT_OK;
2.25 frystyk 701: if (me->target) {
702: if ((status = (*me->target->isa->_free)(me->target))==HT_WOULD_BLOCK)
703: return HT_WOULD_BLOCK;
704: }
2.26 frystyk 705: if (PROT_TRACE)
2.37 frystyk 706: TTYPrint(TDEST, "MIME........ FREEING....\n");
2.44 frystyk 707: HTChunk_delete(me->buffer);
2.1 timbl 708: free(me);
2.18 frystyk 709: return status;
2.1 timbl 710: }
711:
712: /* End writing
713: */
2.38 frystyk 714: PRIVATE int HTMIME_abort (HTStream * me, HTList * e)
2.1 timbl 715: {
2.18 frystyk 716: int status = HT_ERROR;
2.41 frystyk 717: if (me->target) status = (*me->target->isa->abort)(me->target, e);
2.26 frystyk 718: if (PROT_TRACE)
2.37 frystyk 719: TTYPrint(TDEST, "MIME........ ABORTING...\n");
2.44 frystyk 720: HTChunk_delete(me->buffer);
2.6 timbl 721: free(me);
2.18 frystyk 722: return status;
2.1 timbl 723: }
724:
725:
726:
727: /* Structured Object Class
728: ** -----------------------
729: */
2.6 timbl 730: PRIVATE CONST HTStreamClass HTMIME =
2.1 timbl 731: {
732: "MIMEParser",
2.18 frystyk 733: HTMIME_flush,
2.1 timbl 734: HTMIME_free,
2.6 timbl 735: HTMIME_abort,
736: HTMIME_put_character,
737: HTMIME_put_string,
2.18 frystyk 738: HTMIME_put_block
2.1 timbl 739: };
740:
741:
742: /* Subclass-specific Methods
743: ** -------------------------
744: */
2.36 frystyk 745: PUBLIC HTStream* HTMIMEConvert (HTRequest * request,
746: void * param,
747: HTFormat input_format,
748: HTFormat output_format,
749: HTStream * output_stream)
2.1 timbl 750: {
751: HTStream* me;
2.18 frystyk 752: if ((me=(HTStream *) calloc(1, sizeof(* me))) == NULL)
753: outofmem(__FILE__, "HTMIMEConvert");
2.1 timbl 754: me->isa = &HTMIME;
2.18 frystyk 755: me->request = request;
2.32 frystyk 756: me->anchor = request->anchor;
757: me->net = request->net;
2.18 frystyk 758: me->target = output_stream;
759: me->target_format = output_format;
2.44 frystyk 760: me->buffer = HTChunk_new(512);
2.18 frystyk 761: me->EOLstate = EOL_BEGIN;
2.1 timbl 762: return me;
763: }
2.32 frystyk 764:
Webmaster