Annotation of libwww/Library/src/HTTPReq.c, revision 2.53
2.1 frystyk 1: /* HTTPReq.c
2.23 frystyk 2: ** HTTP REQUEST GENERATION
2.1 frystyk 3: **
2.32 frystyk 4: ** (c) COPYRIGHT MIT 1995.
5: ** Please first read the full copyright statement in the file COPYRIGH.
2.53 ! frystyk 6: ** @(#) $Id: HTTPReq.c,v 2.52 1998/05/04 19:37:30 frystyk Exp $
2.32 frystyk 7: **
2.1 frystyk 8: ** This module implements the output stream for HTTP used for sending
9: ** requests with or without a entity body.
10: **
11: ** History:
12: ** Jan 95 HFN Written from scratch
13: */
14:
15: /* Library Includes */
2.52 frystyk 16: #include "wwwsys.h"
2.28 frystyk 17: #include "WWWUtil.h"
2.32 frystyk 18: #include "WWWCore.h"
19:
2.23 frystyk 20: #include "HTTPGen.h"
2.21 frystyk 21: #include "HTTPUtil.h"
2.1 frystyk 22: #include "HTTPReq.h" /* Implements */
23:
2.24 frystyk 24: #define PUTC(c) (*me->target->isa->put_character)(me->target, c)
25: #define PUTS(s) (*me->target->isa->put_string)(me->target, s)
2.1 frystyk 26: #define PUTBLOCK(b, l) (*me->target->isa->put_block)(me->target, b, l)
27:
28: struct _HTStream {
2.29 frystyk 29: const HTStreamClass * isa;
2.1 frystyk 30: HTStream * target;
31: HTRequest * request;
2.18 frystyk 32: SOCKET sockfd;
2.11 frystyk 33: int version;
2.38 frystyk 34: int state;
35: char * url;
2.1 frystyk 36: BOOL transparent;
37: };
38:
39: /* ------------------------------------------------------------------------- */
40: /* HTTP Output Request Stream */
41: /* ------------------------------------------------------------------------- */
42:
2.11 frystyk 43: /* HTTP09Request
44: ** -------------
45: ** Makes a HTTP/0.9 request
2.1 frystyk 46: */
2.38 frystyk 47: PRIVATE int HTTP09Request (HTStream * me, HTRequest * request)
2.11 frystyk 48: {
2.34 frystyk 49: HTParentAnchor * anchor = HTRequest_anchor(request);
50: char * addr = HTAnchor_physical(anchor);
2.38 frystyk 51: if (!me->url) me->url = HTParse(addr, "", PARSE_PATH|PARSE_PUNCTUATION);
52: if (me->state == 0) {
2.47 frystyk 53: int status = PUTS("GET ");
54: if (status != HT_OK) return status;
2.38 frystyk 55: me->state++;
56: }
57: if (me->state == 1) {
58: int status = PUTS(me->url);
59: if (status != HT_OK) return status;
60: me->state++;
61: }
2.24 frystyk 62: PUTC(CR);
63: PUTC(LF);
2.53 ! frystyk 64: if (PROT_TRACE)HTTrace("HTTP........ Generating HTTP/0.9 Request\n");
! 65: HTDebugBreak(__FILE__, __LINE__, "Why is this?\n");
2.38 frystyk 66: return HT_OK;
2.11 frystyk 67: }
68:
69: /* HTTPMakeRequest
70: ** ---------------
71: ** Makes a HTTP/1.0-1.1 request header.
72: */
2.38 frystyk 73: PRIVATE int HTTPMakeRequest (HTStream * me, HTRequest * request)
2.1 frystyk 74: {
2.39 frystyk 75: HTMethod method = HTRequest_method(request);
76: HTRqHd request_mask = HTRequest_rqHd(request);
77: HTParentAnchor * anchor = HTRequest_anchor(request);
2.43 frystyk 78: char * etag = HTAnchor_etag(anchor);
2.24 frystyk 79: char crlf[3];
80: char qstr[10];
81: *crlf = CR; *(crlf+1) = LF; *(crlf+2) = '\0';
2.1 frystyk 82:
2.41 frystyk 83: /* Generate the HTTP/1.x RequestLine */
2.38 frystyk 84: if (me->state == 0) {
2.34 frystyk 85: if (method != METHOD_INVALID) {
86: PUTS(HTMethod_name(method));
87: PUTC(' ');
88: } else
89: PUTS("GET ");
2.38 frystyk 90: me->state++;
2.34 frystyk 91: }
2.1 frystyk 92:
2.39 frystyk 93: /*
2.45 frystyk 94: ** Generate the Request URI. If we are using full request URI then it's
95: ** easy. Otherwise we must filter out the path part of the URI.
96: ** In case it's a OPTIONS request then if there is no pathinfo then use
97: ** a * instead. If we use a method different from GET or HEAD then use
98: ** the content-location if available.
2.39 frystyk 99: */
2.45 frystyk 100: if (me->state == 1) {
101: char * abs_location = NULL;
2.38 frystyk 102: char * addr = HTAnchor_physical(anchor);
2.45 frystyk 103:
104: /*
105: ** If we are using a method different from HEAD and GET then use
106: ** the Content-Location if available, else the Request-URI.
107: */
108: if (!HTMethod_isSafe(method)) {
109: char * location = HTAnchor_location(anchor);
110: if (location) {
111: if (HTURL_isAbsolute(location))
112: addr = location;
113: else {
114: /*
115: ** We have a content-location but it is relative and
116: ** must expand it either to the content-base or to
117: ** the Request-URI itself.
118: */
119: char * base = HTAnchor_base(anchor);
120: abs_location = HTParse(location, base, PARSE_ALL);
121: addr = abs_location;
122: }
123: }
124: }
125:
126: /*
127: ** If we are using a proxy or newer versions of HTTP then we can
128: ** send the full URL. Otherwise we only send the path.
129: */
130: if (HTRequest_fullURI(request))
131: StrAllocCopy(me->url, addr);
132: else {
133: me->url = HTParse(addr, "", PARSE_PATH | PARSE_PUNCTUATION);
2.39 frystyk 134: if (method == METHOD_OPTIONS) {
135: /*
136: ** We don't preserve the final slash or lack of same through
137: ** out the code. This is mainly for optimization reasons
2.44 frystyk 138: ** but it gives a problem OPTIONS. We can either send a "*"
139: ** or a "/" but not both. For now we send a "*".
2.39 frystyk 140: */
2.45 frystyk 141: if (!strcmp(me->url, "/")) *me->url = '*';
2.39 frystyk 142: }
2.1 frystyk 143: }
2.45 frystyk 144: HT_FREE(abs_location);
145: me->state++;
146: }
147:
148: /*
149: ** Now send the URL that we have put together
150: */
151: if (me->state == 2) {
152: int status = HT_OK;
153: if ((status = PUTS(me->url)) != HT_OK) return status;
2.38 frystyk 154: me->state++;
2.48 frystyk 155:
156: #if 0
157: fprintf(stderr, "Requesting '%s'\n", me->url);
158: #endif
159:
2.1 frystyk 160: }
2.25 frystyk 161: PUTC(' ');
2.41 frystyk 162:
163: /*
164: ** Send out the version number. If we know it is a HTTP/1.0 server we
165: ** are talking to then use HTTP/1.0, else use HTTP/1.1 as default version
166: ** number
167: */
168: if (me->version == HTTP_10)
169: PUTS(HTTP_VERSION_10);
170: else
171: PUTS(HTTP_VERSION);
2.24 frystyk 172: PUTBLOCK(crlf, 2);
2.1 frystyk 173:
2.4 frystyk 174: /* Request Headers */
2.34 frystyk 175: if (request_mask & HT_C_ACCEPT_TYPE) {
2.37 frystyk 176: /*
177: ** If caller has specified a specific output format then use this.
178: ** Otherwise use all the registered converters to generate the
179: ** accept header
180: */
181: if (HTRequest_outputFormat(request) == WWW_PRESENT) {
182: int list;
183: HTList *cur;
184: BOOL first=YES;
185: for (list=0; list<2; list++) {
186: if ((!list && ((cur = HTFormat_conversion()) != NULL)) ||
187: (list && ((cur = HTRequest_conversion(request))!=NULL))) {
188: HTPresentation * pres;
189: while ((pres=(HTPresentation *) HTList_nextObject(cur))) {
190: if (pres->rep_out==WWW_PRESENT && pres->quality<=1.0) {
191: if (first) {
192: PUTS("Accept: ");
193: first=NO;
194: } else
195: PUTC(',');
196: PUTS(HTAtom_name(pres->rep));
2.46 frystyk 197: if (pres->quality < 1.0 && pres->quality >= 0.0) {
2.37 frystyk 198: sprintf(qstr, ";q=%1.1f", pres->quality);
199: PUTS(qstr);
200: }
2.1 frystyk 201: }
202: }
203: }
204: }
2.37 frystyk 205: if (!first) PUTBLOCK(crlf, 2);
206: } else {
207: PUTS("Accept: ");
208: PUTS(HTAtom_name(HTRequest_outputFormat(request)));
209: PUTBLOCK(crlf, 2);
210: }
2.1 frystyk 211: }
2.34 frystyk 212: if (request_mask & HT_C_ACCEPT_CHAR) {
2.4 frystyk 213: int list;
214: HTList *cur;
2.24 frystyk 215: BOOL first=YES;
2.4 frystyk 216: for (list=0; list<2; list++) {
2.14 frystyk 217: if ((!list && ((cur = HTFormat_charset()) != NULL)) ||
218: (list && ((cur = HTRequest_charset(request)) != NULL))) {
2.4 frystyk 219: HTAcceptNode *pres;
220: while ((pres = (HTAcceptNode *) HTList_nextObject(cur))) {
2.5 frystyk 221: if (first) {
2.24 frystyk 222: PUTS("Accept-Charset: ");
2.5 frystyk 223: first=NO;
2.24 frystyk 224: } else
225: PUTC(',');
226: PUTS(HTAtom_name(pres->atom));
2.46 frystyk 227: if (pres->quality < 1.0 && pres->quality >= 0.0) {
228: sprintf(qstr, ";q=%1.1f", pres->quality);
229: PUTS(qstr);
230: }
2.4 frystyk 231: }
232: }
233: }
2.31 frystyk 234: if (!first) PUTBLOCK(crlf, 2);
2.4 frystyk 235: }
2.34 frystyk 236: if (request_mask & HT_C_ACCEPT_ENC) {
2.4 frystyk 237: int list;
238: HTList *cur;
2.24 frystyk 239: BOOL first=YES;
2.4 frystyk 240: for (list=0; list<2; list++) {
2.33 frystyk 241: if ((!list && ((cur = HTFormat_contentCoding()) != NULL)) ||
2.14 frystyk 242: (list && ((cur = HTRequest_encoding(request)) != NULL))) {
2.33 frystyk 243: HTCoding * pres;
244: while ((pres = (HTCoding *) HTList_nextObject(cur))) {
2.46 frystyk 245: double quality = HTCoding_quality(pres);
2.5 frystyk 246: if (first) {
2.24 frystyk 247: PUTS("Accept-Encoding: ");
2.32 frystyk 248: first = NO;
2.24 frystyk 249: } else
250: PUTC(',');
2.33 frystyk 251: PUTS(HTCoding_name(pres));
2.46 frystyk 252: if (quality < 1.0 && quality >= 0.0) {
253: sprintf(qstr, ";q=%1.1f", quality);
254: PUTS(qstr);
255: }
256: }
257: }
258: }
259: if (!first) PUTBLOCK(crlf, 2);
260: }
261: if (request_mask & HT_C_ACCEPT_TE) {
262: int list;
263: HTList *cur;
264: BOOL first=YES;
265: for (list=0; list<2; list++) {
266: if ((!list && ((cur = HTFormat_transferCoding()) != NULL)) ||
267: (list && ((cur = HTRequest_transfer(request)) != NULL))) {
268: HTCoding * pres;
269: while ((pres = (HTCoding *) HTList_nextObject(cur))) {
270: double quality = HTCoding_quality(pres);
271: if (first) {
272: PUTS("TE: ");
273: first = NO;
274: } else
275: PUTC(',');
276: PUTS(HTCoding_name(pres));
277: if (quality < 1.0 && quality >= 0.0) {
278: sprintf(qstr, ";q=%1.1f", quality);
279: PUTS(qstr);
280: }
2.4 frystyk 281: }
282: }
283: }
2.31 frystyk 284: if (!first) PUTBLOCK(crlf, 2);
2.4 frystyk 285: }
2.34 frystyk 286: if (request_mask & HT_C_ACCEPT_LAN) {
2.4 frystyk 287: int list;
288: HTList *cur;
2.24 frystyk 289: BOOL first=YES;
2.4 frystyk 290: for (list=0; list<2; list++) {
2.14 frystyk 291: if ((!list && ((cur = HTFormat_language()) != NULL)) ||
292: (list && ((cur = HTRequest_language(request)) != NULL))) {
2.4 frystyk 293: HTAcceptNode *pres;
294: while ((pres = (HTAcceptNode *) HTList_nextObject(cur))) {
2.5 frystyk 295: if (first) {
2.24 frystyk 296: PUTS("Accept-Language: ");
2.5 frystyk 297: first=NO;
2.24 frystyk 298: } else
299: PUTC(',');
300: PUTS(HTAtom_name(pres->atom));
2.46 frystyk 301: if (pres->quality < 1.0 && pres->quality >= 0.0) {
2.24 frystyk 302: sprintf(qstr, ";q=%1.1f", pres->quality);
303: PUTS(qstr);
2.5 frystyk 304: }
2.4 frystyk 305: }
306: }
307: }
2.31 frystyk 308: if (!first) PUTBLOCK(crlf, 2);
2.4 frystyk 309: }
2.36 frystyk 310: if (request_mask & HT_C_AUTH) {
2.34 frystyk 311: HTAssocList * cur = HTRequest_credentials(request);
312: if (cur) { /* Access authentication */
313: HTAssoc * pres;
314: while ((pres = (HTAssoc *) HTAssocList_nextObject(cur))) {
315: PUTS(HTAssoc_name(pres));
316: PUTS(": ");
317: PUTS(HTAssoc_value(pres));
318: PUTBLOCK(crlf, 2);
319: }
2.28 frystyk 320: }
2.1 frystyk 321: }
2.46 frystyk 322: if (request_mask & HT_C_EXPECT) {
323: HTAssocList * cur = HTRequest_expect(request);
324: if (cur) {
325: BOOL first=YES;
326: HTAssoc * pres;
327: while ((pres = (HTAssoc *) HTAssocList_nextObject(cur))) {
328: char * value = HTAssoc_value(pres);
329: if (first) {
330: PUTS("Expect: ");
331: first = NO;
332: } else
333: PUTC(',');
334:
335: /* Output the name */
336: PUTS(HTAssoc_name(pres));
337:
338: /* Only output the value if not empty string */
339: if (*value) {
340: PUTS("=");
341: PUTS(value);
342: }
343: }
344: PUTBLOCK(crlf, 2);
345: }
346: }
2.34 frystyk 347: if (request_mask & HT_C_FROM) {
348: HTUserProfile * up = HTRequest_userProfile(request);
349: const char * mailaddress = HTUserProfile_email(up);
2.1 frystyk 350: if (mailaddress) {
2.24 frystyk 351: PUTS("From: ");
352: PUTS(mailaddress);
353: PUTBLOCK(crlf, 2);
2.1 frystyk 354: }
355: }
2.34 frystyk 356: if (request_mask & HT_C_HOST) {
2.13 frystyk 357: char *orig = HTAnchor_address((HTAnchor *) anchor);
2.12 frystyk 358: char *host = HTParse(orig, "", PARSE_HOST);
2.34 frystyk 359: #if 0
360: /* Keep the port number for HTTP/1.1 compliance */
2.12 frystyk 361: char *ptr = strchr(host, ':'); /* Chop off port number */
362: if (ptr) *ptr = '\0';
2.34 frystyk 363: #endif
2.24 frystyk 364: PUTS("Host: ");
365: PUTS(host);
366: PUTBLOCK(crlf, 2);
2.26 frystyk 367: HT_FREE(orig);
368: HT_FREE(host);
2.39 frystyk 369: }
2.42 frystyk 370:
371: /*
372: ** In the "If-*" series of headers, the ones related to etags have higher
373: ** priority than the date relates ones. That is, if we have a etag then
2.45 frystyk 374: ** use that, otherwise use the date. First we check for range, match, and
375: ** unmodified-since.
2.42 frystyk 376: */
2.45 frystyk 377: if (request_mask & HT_C_IF_RANGE && etag) {
378: PUTS("If-Range: \"");
379: PUTS(etag);
380: PUTC('"');
381: PUTBLOCK(crlf, 2);
382: if (PROT_TRACE) HTTrace("HTTP........ If-Range using etag `%s\'\n", etag);
383: } else if (request_mask & HT_C_IF_MATCH && etag) {
2.43 frystyk 384: PUTS("If-Match: \"");
385: PUTS(etag);
386: PUTC('"');
387: PUTBLOCK(crlf, 2);
388: if (PROT_TRACE) HTTrace("HTTP........ If-Match using etag `%s\'\n", etag);
389: } else if (request_mask & HT_C_IF_UNMOD_SINCE) {
2.42 frystyk 390: time_t lm = HTAnchor_lastModified(anchor);
391: if (lm > 0) {
2.43 frystyk 392: PUTS("If-Unmodified-Since: ");
2.42 frystyk 393: PUTS(HTDateTimeStr(&lm, NO));
394: PUTBLOCK(crlf, 2);
2.43 frystyk 395: if (PROT_TRACE) HTTrace("HTTP........ If-Unmodified-Since\n");
2.42 frystyk 396: }
397: }
2.45 frystyk 398:
399: /*
400: ** If-None-Match and If-Modified-Since are equivalent except that the
401: ** first uses etags and the second uses dates. Etags have precedence over
402: ** dates.
403: */
2.43 frystyk 404: if (request_mask & HT_C_IF_NONE_MATCH && etag) {
405: PUTS("If-None-Match: \"");
406: PUTS(etag);
407: PUTC('"');
408: PUTBLOCK(crlf, 2);
2.46 frystyk 409: if (PROT_TRACE) HTTrace("HTTP........ If-None-Match `%s\'\n", etag);
410: }
411: if (request_mask & HT_C_IMS) {
2.42 frystyk 412: time_t lm = HTAnchor_lastModified(anchor);
413: if (lm > 0) {
2.43 frystyk 414: PUTS("If-Modified-Since: ");
2.42 frystyk 415: PUTS(HTDateTimeStr(&lm, NO));
416: PUTBLOCK(crlf, 2);
2.43 frystyk 417: if (PROT_TRACE) HTTrace("HTTP........ If-Modified-Since\n");
2.42 frystyk 418: }
419: }
420:
2.45 frystyk 421: /*
422: ** Max forwards is mainly for TRACE where we want to be able to stop the
423: ** TRACE at a specific location un the message path.
424: */
2.39 frystyk 425: if (request_mask & HT_C_MAX_FORWARDS) {
426: int hops = HTRequest_maxForwards(request);
427: if (hops >= 0) {
428: sprintf(qstr, "%d", hops);
429: PUTS("Max-Forwards: ");
430: PUTS(qstr);
431: PUTBLOCK(crlf, 2);
432: }
2.42 frystyk 433: }
2.45 frystyk 434:
435: /*
436: ** Range requests. For now, we only take the first entry registered for
437: ** this request. This means that you can only send a single "unit" and
438: ** then a set of range within this unit. This is in accordance with
439: ** HTTP/1.1. Multiple units will go on multiple lines.
440: */
2.42 frystyk 441: if (request_mask & HT_C_RANGE) {
2.45 frystyk 442: HTAssocList * cur = HTRequest_range(request);
443: if (cur) { /* Range requests */
444: HTAssoc * pres;
445: while ((pres = (HTAssoc *) HTAssocList_nextObject(cur))) {
446: PUTS("Range: ");
447: PUTS(HTAssoc_name(pres)); /* Unit */
448: PUTS("=");
449: PUTS(HTAssoc_value(pres)); /* Ranges within this unit */
450: PUTBLOCK(crlf, 2);
451: }
452: }
2.1 frystyk 453: }
2.34 frystyk 454: if (request_mask & HT_C_REFERER) {
455: HTParentAnchor * parent_anchor = HTRequest_parent(request);
456: if (parent_anchor) {
457: char * act = HTAnchor_address((HTAnchor *) anchor);
458: char * parent = HTAnchor_address((HTAnchor *) parent_anchor);
2.50 frystyk 459: #if 1
460: char * relative = HTRelative(parent, act);
461: #else
2.34 frystyk 462: char * relative = HTParse(parent, act,
463: PARSE_ACCESS|PARSE_HOST|PARSE_PATH|PARSE_PUNCTUATION);
2.50 frystyk 464: #endif
2.34 frystyk 465: if (relative && *relative) {
466: PUTS("Referer: ");
2.50 frystyk 467: PUTS(relative);
2.34 frystyk 468: PUTBLOCK(crlf, 2);
469: }
470: HT_FREE(act);
471: HT_FREE(parent);
472: HT_FREE(relative);
2.1 frystyk 473: }
474: }
2.34 frystyk 475: if (request_mask & HT_C_USER_AGENT) {
2.24 frystyk 476: PUTS("User-Agent: ");
477: PUTS(HTLib_appName());
478: PUTC('/');
479: PUTS(HTLib_appVersion());
480: PUTC(' ');
481: PUTS(HTLib_name());
482: PUTC('/');
483: PUTS(HTLib_version());
484: PUTBLOCK(crlf, 2);
2.1 frystyk 485: }
2.53 ! frystyk 486: if (PROT_TRACE) HTTrace("HTTP........ Generating HTTP/1.x Request Headers\n");
2.38 frystyk 487: return HT_OK;
2.1 frystyk 488: }
489:
2.29 frystyk 490: PRIVATE int HTTPRequest_put_block (HTStream * me, const char * b, int l)
2.1 frystyk 491: {
2.7 frystyk 492: if (!me->target) {
2.1 frystyk 493: return HT_WOULD_BLOCK;
2.7 frystyk 494: } else if (me->transparent)
2.11 frystyk 495: return b ? PUTBLOCK(b, l) : HT_OK;
2.1 frystyk 496: else {
2.38 frystyk 497: int status = HT_OK;
498: if (me->version == HTTP_09) {
499: status = HTTP09Request(me, me->request);
500: if (status != HT_OK) return status;
501: } else {
502: status = HTTPMakeRequest(me, me->request);
503: if (status != HT_OK) return status;
2.1 frystyk 504: me->transparent = YES;
2.11 frystyk 505: return b ? PUTBLOCK(b, l) : HT_OK;
2.1 frystyk 506: }
507: return status;
508: }
509: }
510:
2.16 frystyk 511: PRIVATE int HTTPRequest_put_character (HTStream * me, char c)
2.1 frystyk 512: {
2.11 frystyk 513: return HTTPRequest_put_block(me, &c, 1);
2.1 frystyk 514: }
515:
2.29 frystyk 516: PRIVATE int HTTPRequest_put_string (HTStream * me, const char * s)
2.1 frystyk 517: {
2.11 frystyk 518: return HTTPRequest_put_block(me, s, strlen(s));
2.1 frystyk 519: }
520:
521: /*
522: ** Flushes data but doesn't free stream object
523: */
2.16 frystyk 524: PRIVATE int HTTPRequest_flush (HTStream * me)
2.1 frystyk 525: {
2.13 frystyk 526: int status = HTTPRequest_put_block(me, NULL, 0);
527: return status==HT_OK ? (*me->target->isa->flush)(me->target) : status;
2.1 frystyk 528: }
529:
530: /*
531: ** Flushes data and frees stream object
532: */
2.16 frystyk 533: PRIVATE int HTTPRequest_free (HTStream * me)
2.1 frystyk 534: {
2.11 frystyk 535: int status = HTTPRequest_flush(me);
536: if (status != HT_WOULD_BLOCK) {
537: if ((status = (*me->target->isa->_free)(me->target)) == HT_WOULD_BLOCK)
538: return HT_WOULD_BLOCK;
2.38 frystyk 539: HT_FREE(me->url);
2.26 frystyk 540: HT_FREE(me);
2.1 frystyk 541: }
2.7 frystyk 542: return status;
2.1 frystyk 543: }
544:
2.16 frystyk 545: PRIVATE int HTTPRequest_abort (HTStream * me, HTList * e)
2.1 frystyk 546: {
2.27 eric 547: if (PROT_TRACE) HTTrace("HTTPRequest. ABORTING...\n");
2.51 kahan 548: /* JK: Added protection against NULL pointers */
2.49 frystyk 549: if (me) {
2.51 kahan 550: if (me->target && me->target->isa)
551: (*me->target->isa->abort)(me->target, e);
552: if (me->url)
553: HT_FREE(me->url);
2.49 frystyk 554: HT_FREE(me);
555: }
2.1 frystyk 556: return HT_ERROR;
557: }
558:
559: /* HTTPRequest Stream
560: ** -----------------
561: */
2.29 frystyk 562: PRIVATE const HTStreamClass HTTPRequestClass =
2.1 frystyk 563: {
564: "HTTPRequest",
565: HTTPRequest_flush,
566: HTTPRequest_free,
567: HTTPRequest_abort,
568: HTTPRequest_put_character,
569: HTTPRequest_put_string,
570: HTTPRequest_put_block
571: };
572:
2.23 frystyk 573: PUBLIC HTStream * HTTPRequest_new (HTRequest * request, HTStream * target,
2.45 frystyk 574: BOOL endHeader, int version)
2.1 frystyk 575: {
2.26 frystyk 576: HTStream * me;
577: if ((me = (HTStream *) HT_CALLOC(1, sizeof(HTStream))) == NULL)
578: HT_OUTOFMEM("HTTPRequest_new");
2.1 frystyk 579: me->isa = &HTTPRequestClass;
580: me->target = target;
581: me->request = request;
2.45 frystyk 582: me->version = version;
2.1 frystyk 583: me->transparent = NO;
2.46 frystyk 584:
585: /*
586: ** If sending a body in the request then we want a 100 code!
587: */
588: if (HTMethod_hasEntity(HTRequest_method(request)))
589: HTRequest_addExpect(request, "100-continue", "");
590:
2.23 frystyk 591:
592: /* Return general HTTP header stream */
2.45 frystyk 593: return HTTPGen_new(request, me, endHeader, version);
2.1 frystyk 594: }
Webmaster