[BACK] Return to HTTP.c CVS log [TXT] [DIR] Up to [Public] / libwww / Library / src

Annotation of libwww/Library/src/HTTP.c, revision 1.140.2.14

1.74 frystyk 1: /*                                   HTTP.c
 2: **   MULTITHREADED IMPLEMENTATION OF HTTP CLIENT
1.2 timbl 3: **
1.84 frystyk 4: **   (c) COPYRIGHT MIT 1995.
1.74 frystyk 5: **   Please first read the full copyright statement in the file COPYRIGH.
1.140.2.14! eric 6: **   @(#) $Id: HTTP.c,v 1.140.2.13 1996年11月26日 14:40:30 eric Exp $
1.74 frystyk 7: **
 8: **   This module implments the HTTP protocol as a state machine
1.55 frystyk 9: **
 10: ** History:
1.59 frystyk 11: **  < May 24 94 ??  Unknown - but obviously written
1.56 frystyk 12: **   May 24 94 HF  Made reentrent and cleaned up a bit. Implemented
 13: **           Forward, redirection, error handling and referer field
1.67 duns 14: **   8 Jul 94 FM  Insulate free() from _free structure element.
1.71 frystyk 15: **   Jul 94 HFN   Written on top of HTTP.c, Henrik Frystyk
1.55 frystyk 16: **
1.1 timbl 17: */
 18: 
1.78 frystyk 19: /* Library include files */
1.119 frystyk 20: #include "sysdep.h"
1.123 frystyk 21: #include "WWWUtil.h"
 22: #include "WWWCore.h"
 23: #include "WWWMIME.h"
 24: #include "WWWStream.h"
1.125 frystyk 25: #include "WWWTrans.h"
1.94 frystyk 26: #include "HTReqMan.h"
1.95 frystyk 27: #include "HTNetMan.h"
1.109 frystyk 28: #include "HTTPUtil.h"
1.80 frystyk 29: #include "HTTPReq.h"
1.55 frystyk 30: #include "HTTP.h"                       /* Implements */
1.140.2.1 eric 31: #include "HTWatch.h"
1.55 frystyk 32: 
 33: /* Macros and other defines */
1.94 frystyk 34: #ifndef HTTP_PORT
 35: #define HTTP_PORT 80  /* Allocated to http by Jon Postel/ISI 24-Jan-92 */
 36: #endif
 37: 
1.71 frystyk 38: #define PUTC(c)        (*me->target->isa->put_character)(me->target, c)
 39: #define PUTS(s)        (*me->target->isa->put_string)(me->target, s)
 40: #define PUTBLOCK(b, l) (*me->target->isa->put_block)(me->target, b, l)
 41: #define FREE_TARGET  (*me->target->isa->_free)(me->target)
1.74 frystyk 42: #define ABORT_TARGET  (*me->target->isa->abort)(me->target, e)
1.2 timbl 43: 
1.140 frystyk 44: #define HTTP_DUMP
 45: 
 46: #ifdef HTTP_DUMP
1.139 frystyk 47: #define HTTP_OUTPUT  "w3chttp.out"
1.140 frystyk 48: PRIVATE FILE * htfp = NULL;
 49: #endif
1.139 frystyk 50: 
1.59 frystyk 51: /* Type definitions and global variables etc. local to this module */
1.94 frystyk 52: 
 53: /* Final states have negative value */
1.59 frystyk 54: typedef enum _HTTPState {
1.140.2.13 eric 55:   HTTP_RECOVER_PIPE = -3,
1.134 frystyk 56:   HTTP_ERROR     = -2,
 57:   HTTP_OK      = -1,
1.71 frystyk 58:   HTTP_BEGIN     = 0,
 59:   HTTP_NEED_CONNECTION,
1.140.2.1 eric 60:   HTTP_CONNECTED
1.59 frystyk 61: } HTTPState;
1.55 frystyk 62: 
1.94 frystyk 63: /* This is the context structure for the this module */
1.55 frystyk 64: typedef struct _http_info {
1.81 frystyk 65:   HTTPState     state;      /* Current State of the connection */
 66:   HTTPState     next;                 /* Next state */
1.134 frystyk 67:   int            result;   /* Result to report to the after filter */
1.139 frystyk 68:   BOOL        lock;              /* Block for writing */
1.140.2.1 eric 69:   HTNet *      net;
1.55 frystyk 70: } http_info;
 71: 
1.88 frystyk 72: #define MAX_STATUS_LEN     100  /* Max nb of chars to check StatusLine */
1.55 frystyk 73: 
1.71 frystyk 74: struct _HTStream {
1.119 frystyk 75:   const HTStreamClass *   isa;
1.71 frystyk 76:   HTStream *         target;
 77:   HTRequest *            request;
 78:   http_info *            http;
1.121 frystyk 79:   HTEOLState         state;
1.71 frystyk 80:   BOOL            transparent;
1.81 frystyk 81:   char *           version;       /* Should we save this? */
1.71 frystyk 82:   int                status;
1.81 frystyk 83:   char *           reason;
1.71 frystyk 84:   char            buffer[MAX_STATUS_LEN+1];
1.80 frystyk 85:   int                buflen;
1.71 frystyk 86: };
1.21 luotonen 87: 
1.123 frystyk 88: struct _HTInputStream {
 89:   const HTInputStreamClass * isa;
 90: };
 91: 
1.71 frystyk 92: /* ------------------------------------------------------------------------- */
 93: /*                Help Functions               */
 94: /* ------------------------------------------------------------------------- */
1.21 luotonen 95: 
1.94 frystyk 96: /*   HTTPCleanup
 97: **   -----------
1.55 frystyk 98: **   This function closes the connection and frees memory.
1.94 frystyk 99: **   Returns YES on OK, else NO
1.1 timbl 100: */
1.94 frystyk 101: PRIVATE int HTTPCleanup (HTRequest *req, int status)
1.1 timbl 102: {
1.126 frystyk 103:   HTNet * net = HTRequest_net(req);
 104:   http_info * http = (http_info *) HTNet_context(net);
 105:   HTStream * input = HTRequest_inputStream(req);
1.80 frystyk 106: 
1.94 frystyk 107:   /* Free stream with data TO network */
1.112 frystyk 108:   if (HTRequest_isDestination(req))
 109:    HTRequest_removeDestination(req);
1.126 frystyk 110:   else if (input) {
1.94 frystyk 111:    if (status == HT_INTERRUPTED)
1.126 frystyk 112:      (*input->isa->abort)(input, NULL);
1.94 frystyk 113:    else
1.126 frystyk 114:      (*input->isa->_free)(input);
 115:    HTRequest_setInputStream(req, NULL);
1.94 frystyk 116:   }
1.88 frystyk 117: 
1.140 frystyk 118: #ifdef HTTP_DUMP
 119:   if (htfp) {
 120:    fclose(htfp);
 121:    htfp = NULL;
 122:   }
 123: #endif
 124: 
1.94 frystyk 125:   /* Remove the request object and our own context structure for http */
1.140.2.11 eric 126:   if (HTNet_delete(net, status) == YES && status != HT_RECOVER_PIPE) {
 127:    HT_FREE(http);
 128:    HTNet_setContext(net, NULL);
 129:   }
1.94 frystyk 130:   return YES;
1.55 frystyk 131: }
 132: 
1.71 frystyk 133: /*
1.130 frystyk 134: **   Informational 1xx codes are handled separately
1.136 frystyk 135: **   Returns YES if we should continue, NO if we should stop
1.55 frystyk 136: */
1.130 frystyk 137: PRIVATE BOOL HTTPInformation (HTStream * me)
1.55 frystyk 138: {
1.136 frystyk 139:   http_info * http = me->http;
1.71 frystyk 140:   switch (me->status) {
 141: 
1.136 frystyk 142:   case 100:
 143:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_CONTINUE,
 144:              me->reason, (int) strlen(me->reason),
 145:              "HTTPInformation");
 146:    return YES;
 147:    break;
 148: 
1.130 frystyk 149:   case 101:
1.136 frystyk 150:    /*
 151:    ** We consider 101 Switching as a final state and exit this request
 152:    */
1.130 frystyk 153:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_SWITCHING,
1.127 frystyk 154:              me->reason, (int) strlen(me->reason),
1.130 frystyk 155:              "HTTPInformation");
1.136 frystyk 156:    http->next = HTTP_OK;
 157:    http->result = HT_UPGRADE;
1.127 frystyk 158:    break;
 159: 
1.130 frystyk 160:   default:
1.136 frystyk 161:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_BAD_REPLY,
 162:          (void *) me->buffer, me->buflen, "HTTPNextState");
 163:    http->next = HTTP_ERROR;
 164:    http->result = HT_ERROR;
1.127 frystyk 165:    break;
1.130 frystyk 166:   }
1.136 frystyk 167:   return NO;
1.130 frystyk 168: }
 169: 
 170: /*
 171: **   This is a big switch handling all HTTP return codes. It puts in any
 172: **   appropiate error message and decides whether we should expect data
 173: **   or not.
 174: */
 175: PRIVATE void HTTPNextState (HTStream * me)
 176: {
1.134 frystyk 177:   http_info * http = me->http;
1.130 frystyk 178:   switch (me->status) {
1.127 frystyk 179: 
1.78 frystyk 180:    case 0:                        /* 0.9 response */
1.127 frystyk 181:    case 200:                                /* OK */
 182:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_OK,
 183:              me->reason, (int) strlen(me->reason),
 184:              "HTTPNextState");
1.134 frystyk 185:    http->next = HTTP_OK;
 186:    http->result = HT_LOADED;
1.112 frystyk 187:    break;
 188: 
1.127 frystyk 189:    case 201:                             /* Created */
1.112 frystyk 190:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_CREATED,
 191:              me->reason, (int) strlen(me->reason),
 192:              "HTTPNextState");
1.134 frystyk 193:    http->next = HTTP_OK;
 194:    http->result = HT_CREATED;
1.112 frystyk 195:    break;
 196: 
1.127 frystyk 197:    case 202:                             /* Accepted */
1.112 frystyk 198:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_ACCEPTED,
 199:              me->reason, (int) strlen(me->reason),
 200:              "HTTPNextState");
1.134 frystyk 201:    http->next = HTTP_OK;
 202:    http->result = HT_ACCEPTED;
1.112 frystyk 203:    break;
 204: 
1.127 frystyk 205:    case 203:                  /* Non-authoritative information */
 206:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_NON_AUTHORITATIVE,
1.112 frystyk 207:              me->reason, (int) strlen(me->reason),
 208:              "HTTPNextState");
1.134 frystyk 209:    http->next = HTTP_OK;
 210:    http->result = HT_LOADED;
1.71 frystyk 211:    break;
1.78 frystyk 212: 
 213:    case 204:                           /* No Response */
1.112 frystyk 214:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_NO_CONTENT,
 215:              me->reason, (int) strlen(me->reason),
 216:              "HTTPNextState");
1.134 frystyk 217:    http->next = HTTP_OK;
 218:    http->result = HT_NO_DATA;
 219:    break;
 220: 
 221:    case 205:                          /* Reset Content */
 222:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_RESET,
 223:              me->reason, (int) strlen(me->reason),
 224:              "HTTPNextState");
 225:    http->next = HTTP_OK;
 226:    http->result = HT_RESET_CONTENT;
 227:    break;
 228: 
 229:    case 206:                         /* Partial Content */
 230:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_PARTIAL,
 231:              me->reason, (int) strlen(me->reason),
 232:              "HTTPNextState");
 233:    http->next = HTTP_OK;
 234:    http->result = HT_PARTIAL_CONTENT;
 235:    break;
 236: 
 237:    case 300:                         /* Multiple Choices */
 238:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_MULTIPLE,
 239:              me->reason, (int) strlen(me->reason),
 240:              "HTTPNextState");
 241:    http->next = HTTP_OK;
 242:    http->result = HT_LOADED;
1.71 frystyk 243:    break;
1.78 frystyk 244: 
1.71 frystyk 245:    case 301:                              /* Moved */
1.112 frystyk 246:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_MOVED,
 247:              me->reason, (int) strlen(me->reason),
 248:              "HTTPNextState");
1.134 frystyk 249:    http->next = HTTP_ERROR;
 250:    http->result = HT_PERM_REDIRECT;
1.112 frystyk 251:    break;
 252: 
1.71 frystyk 253:    case 302:                              /* Found */
1.112 frystyk 254:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_FOUND,
 255:              me->reason, (int) strlen(me->reason),
 256:              "HTTPNextState");
1.134 frystyk 257:    http->next = HTTP_ERROR;
 258:    http->result = HT_TEMP_REDIRECT;
1.71 frystyk 259:    break;
1.55 frystyk 260:    
1.71 frystyk 261:    case 303:                              /* Method */
1.107 frystyk 262:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_NOT_IMPLEMENTED,
 263:              me->reason, (int) strlen(me->reason),
 264:              "HTTPNextState");
1.134 frystyk 265:    http->next = HTTP_ERROR;
 266:    http->result = HT_SEE_OTHER;
1.71 frystyk 267:    break;
1.91 frystyk 268: 
 269:    case 304:                           /* Not Modified */
1.131 frystyk 270:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_NOT_MODIFIED,
1.112 frystyk 271:              me->reason, (int) strlen(me->reason),
 272:              "HTTPNextState");
1.135 frystyk 273:    http->next = HTTP_OK;
1.134 frystyk 274:    http->result = HT_NOT_MODIFIED;
 275:    break;
 276:    
 277:    case 305:                            /* Use proxy */
 278:    HTRequest_addError(me->request, ERR_INFO, NO, HTERR_USE_PROXY,
 279:              me->reason, (int) strlen(me->reason),
 280:              "HTTPNextState");
 281:    http->next = HTTP_ERROR;
 282:    http->result = HT_USE_PROXY;
1.91 frystyk 283:    break;
1.55 frystyk 284:    
1.78 frystyk 285:    case 400:                           /* Bad Request */
1.104 frystyk 286:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_BAD_REQUEST,
1.100 frystyk 287:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 288:    http->next = HTTP_ERROR;
 289:    http->result = HT_ERROR;
1.71 frystyk 290:    break;
1.70 howcome 291: 
1.71 frystyk 292:    case 401:
1.104 frystyk 293:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_UNAUTHORIZED,
1.100 frystyk 294:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 295:    http->next = HTTP_ERROR;
 296:    http->result = HT_NO_ACCESS;
1.71 frystyk 297:    break;
 298:    
 299:    case 402:                         /* Payment required */
1.104 frystyk 300:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_PAYMENT_REQUIRED,
1.100 frystyk 301:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 302:    http->next = HTTP_ERROR;
 303:    http->result = HT_ERROR;
1.71 frystyk 304:    break;
1.55 frystyk 305:    
1.71 frystyk 306:    case 403:                            /* Forbidden */
1.104 frystyk 307:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_FORBIDDEN,
1.100 frystyk 308:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 309:    http->next = HTTP_ERROR;
 310:    http->result = HT_FORBIDDEN;
1.71 frystyk 311:    break;
1.55 frystyk 312:    
1.71 frystyk 313:    case 404:                            /* Not Found */
1.104 frystyk 314:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_NOT_FOUND,
1.100 frystyk 315:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 316:    http->next = HTTP_ERROR;
 317:    http->result = HT_ERROR;
1.71 frystyk 318:    break;
 319:    
1.78 frystyk 320:    case 405:                           /* Not Allowed */
1.104 frystyk 321:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_NOT_ALLOWED,
1.100 frystyk 322:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 323:    http->next = HTTP_ERROR;
 324:    http->result = HT_ERROR;
1.78 frystyk 325:    break;
 326: 
 327:    case 406:                         /* None Acceptable */
1.104 frystyk 328:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_NONE_ACCEPTABLE,
1.100 frystyk 329:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 330:    http->next = HTTP_ERROR;
 331:    http->result = HT_NOT_ACCEPTABLE;
1.78 frystyk 332:    break;
 333: 
 334:    case 407:                  /* Proxy Authentication Required */
1.127 frystyk 335:    HTRequest_addError(me->request, ERR_FATAL, NO,HTERR_PROXY_UNAUTHORIZED,
1.100 frystyk 336:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 337:    http->next = HTTP_ERROR;
 338:    http->result = HT_NO_PROXY_ACCESS;
1.78 frystyk 339:    break;
 340: 
 341:    case 408:                         /* Request Timeout */
1.104 frystyk 342:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_TIMEOUT,
1.100 frystyk 343:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 344:    http->next = HTTP_ERROR;
 345:    http->result = HT_ERROR;
 346:    break;
 347: 
 348:    case 409:                             /* Conflict */
 349:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_CONFLICT,
 350:          me->reason, (int) strlen(me->reason), "HTTPNextState");
 351:    http->next = HTTP_ERROR;
 352:    http->result = HT_CONFLICT;
 353:    break;
 354: 
 355:    case 410:                               /* Gone */
 356:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_GONE,
 357:          me->reason, (int) strlen(me->reason), "HTTPNextState");
 358:    http->next = HTTP_ERROR;
 359:    http->result = HT_ERROR;
 360:    break;
 361: 
 362:    case 411:                         /* Length Required */
 363:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_LENGTH_REQUIRED,
 364:          me->reason, (int) strlen(me->reason), "HTTPNextState");
 365:    http->next = HTTP_ERROR;
 366:    http->result = HT_LENGTH_REQUIRED;
 367:    break;
 368: 
 369:    case 412:                       /* Precondition failed */
 370:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_PRECON_FAILED,
 371:          me->reason, (int) strlen(me->reason), "HTTPNextState");
 372:    http->next = HTTP_ERROR;
 373:    http->result = HT_ERROR;
 374:    break;
 375: 
 376:    case 413:                     /* Request entity too large */
 377:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_TOO_BIG,
 378:          me->reason, (int) strlen(me->reason), "HTTPNextState");
 379:    http->next = HTTP_ERROR;
 380:    http->result = HT_ERROR;
 381:    break;
 382: 
 383:    case 414:                       /* Request-URI too long */
 384:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_URI_TOO_BIG,
 385:          me->reason, (int) strlen(me->reason), "HTTPNextState");
 386:    http->next = HTTP_ERROR;
 387:    http->result = HT_ERROR;
 388:    break;
 389: 
 390:    case 415:                           /* Unsupported */
 391:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_UNSUPPORTED,
 392:          me->reason, (int) strlen(me->reason), "HTTPNextState");
 393:    http->next = HTTP_ERROR;
 394:    http->result = HT_ERROR;
1.78 frystyk 395:    break;
 396: 
1.71 frystyk 397:    case 500:
1.104 frystyk 398:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_INTERNAL,
1.100 frystyk 399:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 400:    http->next = HTTP_ERROR;
 401:    http->result = HT_ERROR;
1.78 frystyk 402:    break;
 403:    
1.71 frystyk 404:    case 501:
1.104 frystyk 405:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_NOT_IMPLEMENTED,
1.100 frystyk 406:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 407:    http->next = HTTP_ERROR;
 408:    http->result = HT_ERROR;
1.78 frystyk 409:    break;
 410: 
 411:    case 502:
1.104 frystyk 412:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_BAD_GATE,
1.100 frystyk 413:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 414:    http->next = HTTP_ERROR;
 415:    http->result = HT_ERROR;
1.78 frystyk 416:    break;
 417: 
 418:    case 503:
1.104 frystyk 419:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_DOWN,
1.100 frystyk 420:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 421:    http->next = HTTP_ERROR;
1.81 frystyk 422: 
1.140 frystyk 423:    /*
 424:    ** If Retry-After header is found then return HT_RETRY else HT_ERROR.
 425:    ** The caller may want to reissue the request at a later point in time.
 426:    */
 427:    {
 428:      HTResponse * response = HTRequest_response(me->request);
 429:      if (HTResponse_retryTime(response))
 430:        http->result = HT_RETRY;
 431:      else
 432:        http->result = HT_ERROR;
 433:    }
1.78 frystyk 434:    break;
 435: 
 436:    case 504:
1.104 frystyk 437:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_GATE_TIMEOUT,
1.100 frystyk 438:          me->reason, (int) strlen(me->reason), "HTTPNextState");
1.134 frystyk 439:     http->next = HTTP_ERROR;
 440:    http->result = HT_ERROR;
 441:    break;
 442: 
 443:    case 505:                   /* Unsupported protocol version */
 444:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_BAD_VERSION,
 445:          me->reason, (int) strlen(me->reason), "HTTPNextState");
 446:     http->next = HTTP_ERROR;
 447:    http->result = HT_BAD_VERSION;
1.71 frystyk 448:    break;
1.78 frystyk 449: 
1.71 frystyk 450:    default:                        /* bad number */
1.104 frystyk 451:    HTRequest_addError(me->request, ERR_FATAL, NO, HTERR_BAD_REPLY,
1.100 frystyk 452:          (void *) me->buffer, me->buflen, "HTTPNextState");
1.134 frystyk 453:    http->next = HTTP_ERROR;
 454:    http->result = HT_ERROR;
1.71 frystyk 455:    break;
1.55 frystyk 456:   }
 457: }
 458: 
1.71 frystyk 459: /* ------------------------------------------------------------------------- */
 460: /*             HTTP Status Line Stream             */
 461: /* ------------------------------------------------------------------------- */
1.55 frystyk 462: 
1.71 frystyk 463: /*
1.140.2.1 eric 464: **   Analyze the stream we have read. If it is a HTTP 1.0 or higher
1.71 frystyk 465: **   then create a MIME-stream, else create a Guess stream to find out
 466: **   what the 0.9 server is sending. We need to copy the buffer as we don't
 467: **   know if we can modify the contents or not.
1.78 frystyk 468: **
 469: **   Stream handling is a function of the status code returned from the 
 470: **   server:
 471: **       200:   Use `output_stream' in HTRequest structure
1.94 frystyk 472: **       else:  Use `debug_stream' in HTRequest structure
1.80 frystyk 473: **
 474: **   Return: YES if buffer should be written out. NO otherwise
1.56 frystyk 475: */
1.100 frystyk 476: PRIVATE int stream_pipe (HTStream * me)
1.56 frystyk 477: {
1.136 frystyk 478:   HTRequest * request = me->request;
 479:   HTNet * net = HTRequest_net(request);
1.123 frystyk 480:   HTHost * host = HTNet_host(net);
1.140.2.1 eric 481: 
1.80 frystyk 482:   if (me->target) {
 483:    int status = PUTBLOCK(me->buffer, me->buflen);
 484:    if (status == HT_OK)
 485:      me->transparent = YES;
 486:    return status;
1.136 frystyk 487:   } else if (HTRequest_isSource(request)&&!HTRequest_outputStream(request)) {
1.88 frystyk 488:    /*
 489:    ** We need to wait for the destinations to get ready
 490:    */
 491:    return HT_WOULD_BLOCK;
1.80 frystyk 492:   }
1.88 frystyk 493:    
1.132 frystyk 494:   /*
 495:   ** Just check for HTTP and not HTTP/ as NCSA server chokes on 1.1 replies
 496:   ** Thanks to Markku Savela <msa@msa.tte.vtt.fi>
1.140.2.3 eric 497: 
1.132 frystyk 498:   */
 499: #if 0
1.81 frystyk 500:   if (strncasecomp(me->buffer, "http/", 5)) {
1.132 frystyk 501: #else
 502:   if (strncasecomp(me->buffer, "http", 4)) {
 503: #endif
1.80 frystyk 504:    int status;
1.136 frystyk 505:    HTRequest_addError(request, ERR_INFO, NO, HTERR_HTTP09,
1.80 frystyk 506:          (void *) me->buffer, me->buflen, "HTTPStatusStream");
1.136 frystyk 507:    me->target = HTStreamStack(WWW_UNKNOWN,
 508:                  HTRequest_outputFormat(request),
 509:                  HTRequest_outputStream(request),
 510:                  request, NO);
1.134 frystyk 511:    me->http->next = HTTP_OK;
1.80 frystyk 512:    if ((status = PUTBLOCK(me->buffer, me->buflen)) == HT_OK)
 513:      me->transparent = YES;
1.123 frystyk 514:    HTHost_setVersion(host, HTTP_09);
1.80 frystyk 515:    return status;
 516:   } else {
1.140 frystyk 517:    HTResponse * response = HTRequest_response(request);
1.133 frystyk 518:    char *ptr = me->buffer+4;           /* Skip the HTTP part */
1.81 frystyk 519:    me->version = HTNextField(&ptr);
1.140.2.4 frystyk 520:    HTHost_setConsumed(net->host, me->buflen);
1.95 frystyk 521: 
1.130 frystyk 522:    /* Here we want to find out when to use persistent connection */
1.133 frystyk 523:    if (!strncasecomp(me->version, "/1.0", 4)) {
1.128 frystyk 524:      if (PROT_TRACE)HTTrace("HTTP Status. This is a HTTP/1.0 server\n");
 525:      HTHost_setVersion(host, HTTP_10);
1.133 frystyk 526:    } else if (!strncasecomp(me->version, "/1.", 3)) {   /* 1.x family */
1.128 frystyk 527:      HTHost_setVersion(host, HTTP_11);
1.140.2.6 frystyk 528: #ifdef HT_MUX
 529:      HTNet_setPersistent(net, YES, HT_TP_INTERLEAVE);
 530: #else
 531:      HTNet_setPersistent(net, YES, HT_TP_PIPELINE);
 532: #endif
1.133 frystyk 533:    } else { 
 534:      if (PROT_TRACE)HTTrace("HTTP Status. No 1.x version number - treat it as a HTTP/1.0 server\n");
 535:      HTHost_setVersion(host, HTTP_10);
1.128 frystyk 536:    }
1.95 frystyk 537: 
1.81 frystyk 538:    me->status = atoi(HTNextField(&ptr));
1.133 frystyk 539:    /* Kludge to fix the NCSA server version bug */
 540:    if (me->status == 0) me->status = atoi(me->version);
 541: 
1.81 frystyk 542:    me->reason = ptr;
 543:    if ((ptr = strchr(me->reason, '\r')) != NULL)   /* Strip \r and \n */
 544:      *ptr = '0円';
 545:    else if ((ptr = strchr(me->reason, '\n')) != NULL)
 546:      *ptr = '0円';
 547: 
1.130 frystyk 548:    /* 
 549:    ** If it is a 1xx code then find out what to do and return until we
 550:    ** get the next code. In the case of Upgrade we may not get back here
 551:    ** at all. If we are uploading an entity then continue doing that
 552:    */
 553:    if (me->status/100 == 1) {
1.136 frystyk 554:      if (HTTPInformation(me) == YES) {
 555:        me->buflen = 0;
 556:        me->state = EOL_BEGIN;
 557:        return HTMethod_hasEntity(HTRequest_method(request)) ?
 558:          HT_CONTINUE : HT_OK;
1.103 frystyk 559:      }
1.56 frystyk 560:    }
1.133 frystyk 561: 
 562:    /*
 563:    ** As we are getting fresh metainformation in the HTTP response,
 564:    ** we clear the old metainfomation in order not to mix it with the new
 565:    ** one. This is particularly important for the content-length and the
1.139 frystyk 566:    ** like. The TRACE and OPTIONS method just adds to the current 
 567:    ** metainformation so in that case we don't clear the anchor.
1.133 frystyk 568:    */
1.136 frystyk 569:    if (me->status==200 || me->status==203 || me->status==300) {
1.140 frystyk 570:      /*
 571:      ** 200, 203 and 300 are all fully cacheable responses. No byte 
 572:      ** ranges or anything else make life hard in this case.
 573:      */
 574:      HTResponse_setCachable(response, YES);
1.136 frystyk 575:      me->target = HTStreamStack(WWW_MIME,
 576:                    HTRequest_outputFormat(request),
 577:                    HTRequest_outputStream(request),
 578:                    request, NO);
1.140 frystyk 579:    } else if (me->status==206) {
 580:      /*
 581:      ** We got a partial response and now we must check whether
 582:      ** we issued a cache If-Range request or it was a new 
 583:      ** partial response which we don't have in cache. In the latter
 584:      ** case, we don't cache the object and in the former we append
 585:      ** the result to the already existing cache entry.
 586:      */
 587:      HTReload reload = HTRequest_reloadMode(request);
 588:      if (reload == HT_CACHE_RANGE_VALIDATE) {
 589:        HTResponse_setCachable(response, YES);
 590:        me->target = HTStreamStack(WWW_MIME_PART,
 591:                      HTRequest_outputFormat(request),
 592:                      HTRequest_outputStream(request),
 593:                      request, NO);
 594:      } else {
 595:        me->target = HTStreamStack(WWW_MIME,
 596:                      HTRequest_outputFormat(request),
 597:                      HTRequest_outputStream(request),
 598:                      request, NO);
 599:      }
1.139 frystyk 600:    } else if (me->status==204 || me->status==304) {
1.140 frystyk 601:      HTResponse_setCachable(response, YES);
1.136 frystyk 602:      me->target = HTStreamStack(WWW_MIME_HEAD,
 603:                    HTRequest_debugFormat(request),
 604:                    HTRequest_debugStream(request),
 605:                    request, NO);
 606:    } else if (HTRequest_debugStream(request)) {
 607:      me->target = HTStreamStack(WWW_MIME,
 608:                    HTRequest_debugFormat(request),
 609:                    HTRequest_debugStream(request),
 610:                    request, NO);
 611:    } else {
1.140 frystyk 612:      /*
 613:      ** We still need to parse the MIME part in order to find any
 614:      ** valuable meta information which is needed from the response.
 615:      */
1.136 frystyk 616:      me->target = HTStreamStack(WWW_MIME,
 617:                    HTRequest_debugFormat(request),
 618:                    HTRequest_debugStream(request),
 619:                    request, NO);
1.133 frystyk 620:    }
1.56 frystyk 621:   }
1.113 frystyk 622:   if (!me->target) me->target = HTErrorStream();
1.81 frystyk 623:   HTTPNextState(me);                  /* Get next state */
1.80 frystyk 624:   me->transparent = YES;
 625:   return HT_OK;
1.71 frystyk 626: }
1.56 frystyk 627: 
1.80 frystyk 628: /*
 629: **   Searches for HTTP header line until buffer fills up or a CRLF or LF
 630: **   is found
 631: */
1.119 frystyk 632: PRIVATE int HTTPStatus_put_block (HTStream * me, const char * b, int l)
1.71 frystyk 633: {
1.80 frystyk 634:   while (!me->transparent && l-- > 0) {
 635:    int status;
 636:    if (me->target) {
 637:      if ((status = stream_pipe(me)) != HT_OK)
 638:        return status;
 639:    } else {
 640:      *(me->buffer+me->buflen++) = *b;
 641:      if (me->state == EOL_FCR) {
 642:        if (*b == LF) { /* Line found */
 643:          if ((status = stream_pipe(me)) != HT_OK)
 644:            return status;
 645:        } else {
 646:          me->state = EOL_BEGIN;
 647:        }
 648:      } else if (*b == CR) {
 649:        me->state = EOL_FCR;
 650:      } else if (*b == LF) {
 651:        if ((status = stream_pipe(me)) != HT_OK)
 652:          return status;
1.71 frystyk 653:      } else {
1.80 frystyk 654:        if (me->buflen >= MAX_STATUS_LEN) {
 655:          if ((status = stream_pipe(me)) != HT_OK)
 656:            return status;
 657:        }
1.71 frystyk 658:      }
1.80 frystyk 659:      b++;
1.71 frystyk 660:    }
1.56 frystyk 661:   }
1.99 frystyk 662:   if (l > 0) return PUTBLOCK(b, l);
 663:   return HT_OK;
1.56 frystyk 664: }
 665: 
1.119 frystyk 666: PRIVATE int HTTPStatus_put_string (HTStream * me, const char * s)
1.71 frystyk 667: {
1.80 frystyk 668:   return HTTPStatus_put_block(me, s, (int) strlen(s));
1.71 frystyk 669: }
1.56 frystyk 670: 
1.100 frystyk 671: PRIVATE int HTTPStatus_put_character (HTStream * me, char c)
1.71 frystyk 672: {
1.80 frystyk 673:   return HTTPStatus_put_block(me, &c, 1);
 674: }
 675: 
1.100 frystyk 676: PRIVATE int HTTPStatus_flush (HTStream * me)
1.80 frystyk 677: {
 678:   return (*me->target->isa->flush)(me->target);
1.71 frystyk 679: }
 680: 
1.100 frystyk 681: PRIVATE int HTTPStatus_free (HTStream * me)
1.71 frystyk 682: {
1.87 frystyk 683:   int status = HT_OK;
 684:   if (me->target) {
 685:    if ((status = (*me->target->isa->_free)(me->target))==HT_WOULD_BLOCK)
 686:      return HT_WOULD_BLOCK;
 687:   }
1.115 frystyk 688:   HT_FREE(me);
1.100 frystyk 689:   return status;
1.71 frystyk 690: }
 691: 
1.104 frystyk 692: PRIVATE int HTTPStatus_abort (HTStream * me, HTList * e)
1.71 frystyk 693: {
 694:   if (me->target)
1.74 frystyk 695:    ABORT_TARGET;
1.115 frystyk 696:   HT_FREE(me);
1.74 frystyk 697:   if (PROT_TRACE)
1.116 eric 698:    HTTrace("HTTPStatus.. ABORTING...\n");
1.80 frystyk 699:   return HT_ERROR;
1.71 frystyk 700: }
 701: 
 702: /*   HTTPStatus Stream
 703: **   -----------------
 704: */
1.119 frystyk 705: PRIVATE const HTStreamClass HTTPStatusClass =
1.71 frystyk 706: {       
 707:   "HTTPStatus",
1.80 frystyk 708:   HTTPStatus_flush,
1.71 frystyk 709:   HTTPStatus_free,
 710:   HTTPStatus_abort,
 711:   HTTPStatus_put_character,
 712:   HTTPStatus_put_string,
 713:   HTTPStatus_put_block
 714: };
 715: 
1.113 frystyk 716: PUBLIC HTStream * HTTPStatus_new (HTRequest * request,
 717:                 void *    param,
 718:                 HTFormat   input_format,
 719:                 HTFormat   output_format,
 720:                 HTStream *  output_stream)
1.71 frystyk 721: {
1.115 frystyk 722:   HTStream * me;
 723:   if ((me = (HTStream *) HT_CALLOC(1, sizeof(HTStream))) == NULL)
 724:     HT_OUTOFMEM("HTTPStatus_new");
1.71 frystyk 725:   me->isa = &HTTPStatusClass;
1.113 frystyk 726:   if (request) {
1.126 frystyk 727:    HTNet * net = HTRequest_net(request);
1.125 frystyk 728:     /* Get existing copy */
 729:    http_info * http = (http_info *) HTNet_context(net);
1.113 frystyk 730:    me->request = request;
 731:    me->http = http;
 732:    http->next = HTTP_ERROR;
 733:    me->state = EOL_BEGIN;
 734:    return me;
 735:   } else
 736:    return HTErrorStream();
1.71 frystyk 737: }
 738: 
 739: /* ------------------------------------------------------------------------- */
 740: 
 741: /*       Load Document from HTTP Server            HTLoadHTTP
1.55 frystyk 742: **       ==============================
 743: **
 744: **   Given a hypertext address, this routine loads a document.
 745: **
 746: ** On entry,
 747: **   request        This is the request structure
1.94 frystyk 748: **   returns     HT_ERROR    Error has occured in call back
 749: **           HT_OK      Call back was OK
1.55 frystyk 750: */
1.140.2.3 eric 751: PRIVATE int HTTPEvent (SOCKET soc, void * pVoid, HTEventType type);
1.140.2.1 eric 752: 
 753: PUBLIC int HTLoadHTTP (SOCKET soc, HTRequest * request)
1.55 frystyk 754: {
 755:   http_info *http;            /* Specific protocol information */
1.112 frystyk 756:   HTParentAnchor *anchor = HTRequest_anchor(request);
1.140.2.1 eric 757:   HTNet * net = HTRequest_net(request);
1.112 frystyk 758: 
1.94 frystyk 759:   /*
 760:   ** Initiate a new http structure and bind to request structure
 761:   ** This is actually state HTTP_BEGIN, but it can't be in the state
 762:   ** machine as we need the structure first.
 763:   */
1.140.2.1 eric 764:   if (PROT_TRACE) HTTrace("HTTP........ Looking for `%s\'\n",
 765:              HTAnchor_physical(anchor));
 766:   if ((http = (http_info *) HT_CALLOC(1, sizeof(http_info))) == NULL)
 767:    HT_OUTOFMEM("HTLoadHTTP");
 768:   http->net = net;
 769:   HTNet_setContext(net, http);
 770:   HTNet_setEventCallback(net, HTTPEvent);
 771:   HTNet_setEventParam(net, http); /* callbacks get http* */
 772: 
1.140.2.5 frystyk 773:   return HTTPEvent(soc, http, HTEvent_BEGIN);        /* get it started - ops is ignored */
1.140.2.1 eric 774: }
 775: 
1.140.2.3 eric 776: PRIVATE int HTTPEvent (SOCKET soc, void * pVoid, HTEventType type)
1.140.2.1 eric 777: {
 778:   http_info * http = (http_info *)pVoid;
 779:   int status = HT_ERROR;
 780:   HTNet * net = http->net;
 781:   HTRequest * request = HTNet_request(net);
 782:   HTParentAnchor *anchor = HTRequest_anchor(request);
 783: 
1.140.2.3 eric 784:   /*
 785:   ** Check whether we have been interrupted
1.140.2.11 eric 786:   */
 787:   if (type == HTEvent_BEGIN) {
 788:    http->next = HTTP_OK;
 789:    http->result = HT_ERROR;
 790:   } else if (type == HTEvent_CLOSE) {
1.140.2.3 eric 791:    HTRequest_addError(request, ERR_FATAL, NO, HTERR_INTERRUPTED,
 792:              NULL, 0, "HTLoadHTTP");
 793:    HTTPCleanup(request, HT_INTERRUPTED);
1.140.2.5 frystyk 794:    return HT_OK;
 795:   } else if (type == HTEvent_END) {
 796:    HTTPCleanup(request, http->result);
1.140.2.3 eric 797:    return HT_OK;
1.140.2.11 eric 798:   } else if (type == HTEvent_RESET) {
 799:    if (HTRequest_isPostWeb(request)) {
 800:      if (HTRequest_isDestination(request)) {
 801:        HTRequest * source = HTRequest_source(request);
 802:        HTLink *link =
 803:          HTLink_find((HTAnchor *)HTRequest_anchor(source),
 804:                (HTAnchor *) anchor);
 805:        HTLink_setResult(link, HT_LINK_ERROR);
 806:      }
 807:      HTRequest_killPostWeb(request);
 808:    }
 809:    HTTPCleanup(request, HT_RECOVER_PIPE);
 810:    http->state = HTTP_BEGIN;
 811:    return HT_OK;
1.140.2.3 eric 812:   }
 813: 
1.71 frystyk 814:   /* Now jump into the machine. We know the state from the previous run */
 815:   while (1) {
 816:    switch (http->state) {
1.134 frystyk 817:    case HTTP_BEGIN:
1.129 frystyk 818:      http->state = HTTP_NEED_CONNECTION;
1.71 frystyk 819:      break;
 820:      
1.123 frystyk 821:    case HTTP_NEED_CONNECTION:     /* Now let's set up a connection */
1.140.2.1 eric 822:      status = HTHost_connect(net->host, net, HTAnchor_physical(anchor), HTTP_PORT);
1.80 frystyk 823:      if (status == HT_OK) {
1.140 frystyk 824:        HTHost * host = HTNet_host(net);
 825: 
1.123 frystyk 826:        /*
1.140 frystyk 827:        ** Check the protocol class to see if we have connected to a
 828:        ** the right class of server, in this case HTTP. If we don't 
 829:        ** know the server then assume a HTTP/1.0
1.123 frystyk 830:        */
 831:        {
 832:          char * s_class = HTHost_class(host);
1.140 frystyk 833:          if (!s_class) {
 834:            if (HTRequest_proxy(request) == NULL)
 835:              HTRequest_addConnection(request, "Keep-Alive", "");
 836:            HTHost_setClass(host, "http");
 837:          } else if (strcasecomp(s_class, "http")) {
1.123 frystyk 838:            HTRequest_addError(request, ERR_FATAL, NO, HTERR_CLASS,
 839:                      NULL, 0, "HTLoadHTTP");
 840:            http->state = HTTP_ERROR;
 841:            break;
 842:          }
1.95 frystyk 843:        }
1.138 frystyk 844: 
1.123 frystyk 845:        /* 
 846:        ** Create the stream pipe FROM the channel to the application.
 847:        ** The target for the input stream pipe is set up using the
 848:        ** stream stack.
1.113 frystyk 849:        */
1.140.2.2 frystyk 850:        {
 851:          HTStream *me=HTStreamStack(WWW_HTTP,
 852:                        HTRequest_outputFormat(request),
 853:                        HTRequest_outputStream(request),
 854:                        request, YES);
 855:          HTNet_setReadStream(net, me);
 856:          HTRequest_setOutputConnected(request, YES);
 857:        }
1.127 frystyk 858: 
1.123 frystyk 859:        /*
 860:        ** Create the stream pipe TO the channel from the application
 861:        ** and hook it up to the request object
 862:        */
 863:        {
1.140.2.2 frystyk 864:          HTChannel * channel = HTHost_channel(net->host);
1.140.2.11 eric 865:          HTOutputStream * output = HTChannel_getChannelOStream(channel);
1.140 frystyk 866:          int version = HTHost_version(host);
1.139 frystyk 867:          HTStream * app = NULL;
1.140.2.2 frystyk 868: 
 869:          /*
 870:          ** Instead of calling this directly we could have a 
 871:          ** stream stack builder on the output stream as well
 872:          */
 873: #ifdef HT_MUX
1.140.2.3 eric 874:          output = (HTOutputStream *)
 875:            HTBuffer_new(HTMuxWriter_new(host, net, output),
 876:                   request, 512);
1.140.2.2 frystyk 877: #endif
 878:          
1.139 frystyk 879: #ifdef HTTP_DUMP
 880:          if (PROT_TRACE) {
1.140.2.12 eric 881:            if ((htfp = fopen(HTTP_OUTPUT, "ab"))) {
1.140 frystyk 882:              output = (HTOutputStream *)
 883:                HTTee((HTStream *) output,
 884:                   HTFWriter_new(request, htfp, YES), NULL);
1.139 frystyk 885:              HTTrace("HTTP........ Dumping request to `%s\'\n",
 886:                  HTTP_OUTPUT);
 887:            }
 888:          }  
 889: #endif /* HTTP_DUMP */
 890:          app = HTMethod_hasEntity(HTRequest_method(request)) ?
 891:            HTMIMERequest_new(request,
1.140 frystyk 892:              HTTPRequest_new(request, (HTStream *) output, NO,
 893:                      version),
 894:                     YES) :
 895:            HTTPRequest_new(request, (HTStream *) output, YES,
 896:                    version);
1.123 frystyk 897:          HTRequest_setInputStream(request, app);
 898:        }
1.88 frystyk 899: 
 900:        /*
 901:        ** Set up concurrent read/write if this request isn't the
 902:        ** source for a PUT or POST. As source we don't start reading
 903:        ** before all destinations are ready. If destination then
 904:        ** register the input stream and get ready for read
 905:        */
1.112 frystyk 906:        if (HTRequest_isDestination(request)) {
1.140.2.1 eric 907:          HTHost_register(net->host, net, HTEvent_READ);
1.88 frystyk 908:          HTRequest_linkDestination(request);
 909:        }
1.140.2.1 eric 910:        http->state = HTTP_CONNECTED;
 911:        type = HTEvent_WRITE;            /* fresh, so try a write */
1.133 frystyk 912:      } else if (status == HT_WOULD_BLOCK || status == HT_PENDING)
1.94 frystyk 913:        return HT_OK;
1.71 frystyk 914:      else
 915:        http->state = HTTP_ERROR;       /* Error or interrupt */
 916:      break;
 917: 
1.87 frystyk 918:      /* As we can do simultanous read and write this is now one state */
1.140.2.1 eric 919:     case HTTP_CONNECTED:
1.140.2.9 frystyk 920:       if (type == HTEvent_WRITE) {
 921:         if (HTRequest_isDestination(request)) {
 922:           HTRequest * source = HTRequest_source(request);
 923:           HTNet * srcnet = HTRequest_net(source);
 924:           if (srcnet) {
 925:             HTHost_register(srcnet->host, srcnet, HTEvent_READ);
 926:             HTHost_unregister(srcnet->host, srcnet, HTEvent_WRITE);
 927:           }
 928:           return HT_OK;
 929:         }
1.126 frystyk 930: 
 931:        /*
 932:        ** Should we use the input stream directly or call the post
 933:        ** callback function to send data down to the network?
 934:        */
 935:        {
 936:          HTStream * input = HTRequest_inputStream(request);
 937:          HTPostCallback * pcbf = HTRequest_postCallback(request);
1.131 frystyk 938:          if (pcbf) {
1.139 frystyk 939:            if (http->lock)
 940:              return HT_OK;
 941:            else {
1.140.2.1 eric 942:              status = (*pcbf)(request, input);
1.140 frystyk 943:              if (status == HT_PAUSE || status == HT_LOADED) {
1.140.2.1 eric 944:                type = HTEvent_READ;
1.139 frystyk 945:                http->lock = YES;
1.140.2.13 eric 946:              } else if (status==HT_CLOSED)
 947:                http->state = HTTP_RECOVER_PIPE;
 948:              else if (status == HT_ERROR) {
1.139 frystyk 949:                http->result = HT_INTERRUPTED;
 950:                http->state = HTTP_ERROR;
 951:                break;
 952:              }
 953:            }
1.131 frystyk 954:          } else {
1.140.2.7 eric 955:            HTTransportMode mode = HTHost_mode(net->host, NO);
 956:            if (mode == HT_TP_SINGLE ||
 957:              (mode == HT_TP_PIPELINE && !HTHost_launchPending(net->host)))
1.140.2.1 eric 958:              status = (*input->isa->flush)(input);
 959:            type = HTEvent_READ;
1.131 frystyk 960:          }
 961:          if (status == HT_WOULD_BLOCK) return HT_OK;
1.126 frystyk 962:        }
1.140.2.10 eric 963:      } else if (type == HTEvent_FLUSH) {
 964:        HTStream * input = HTRequest_inputStream(request);
 965:        if (input == NULL)
 966:          return HT_ERROR;
 967:        return (*input->isa->flush)(input);
1.140.2.1 eric 968:      } else if (type == HTEvent_READ) {
1.140.2.7 eric 969:        status = HTHost_read(net->host, net);
1.131 frystyk 970:        if (status == HT_WOULD_BLOCK)
1.94 frystyk 971:          return HT_OK;
1.131 frystyk 972:        else if (status == HT_CONTINUE) {
1.130 frystyk 973:          if (PROT_TRACE) HTTrace("HTTP........ Continuing\n");
1.139 frystyk 974:          http->lock = NO;
1.140.2.1 eric 975:          type = HTEvent_WRITE;
1.130 frystyk 976:          continue;
1.133 frystyk 977:        } else if (status==HT_LOADED)
1.140.2.1 eric 978:          http->state = http->next;  /* Jump to next state (OK or ERROR) */
1.140.2.13 eric 979:        else if (status==HT_CLOSED)
 980:          http->state = HTTP_RECOVER_PIPE;
 981:        else
1.94 frystyk 982:          http->state = HTTP_ERROR;
1.90 frystyk 983:      } else {
1.140.2.1 eric 984:        http->state = HTTP_ERROR;    /* don't know how to handle OOB */
1.90 frystyk 985:      }
1.71 frystyk 986:      break;
1.140.2.13 eric 987: 
1.134 frystyk 988:     case HTTP_OK:
1.88 frystyk 989:      if (HTRequest_isPostWeb(request)) {
1.91 frystyk 990:        if (HTRequest_isDestination(request)) {
1.126 frystyk 991:          HTRequest * source = HTRequest_source(request);
1.91 frystyk 992:          HTLink *link =
1.127 frystyk 993:            HTLink_find((HTAnchor *)HTRequest_anchor(source),
1.112 frystyk 994:                     (HTAnchor *) anchor);
1.109 frystyk 995:          HTLink_setResult(link, HT_LINK_OK);
1.91 frystyk 996:        }
1.112 frystyk 997:      }
1.134 frystyk 998:      HTTPCleanup(request, http->result);
1.94 frystyk 999:      return HT_OK;
1.71 frystyk 1000:      break;
1.140.2.13 eric 1001: 
1.140.2.14! eric 1002:      case HTTP_RECOVER_PIPE:
1.140.2.13 eric 1003:     {
1.140.2.14! eric 1004:       HTHost * host = HTNet_host(net);
1.140.2.13 eric 1005: 
1.140.2.14! eric 1006:       /*
 ! 1007:       ** If this is a persistent connection and we get a close
 ! 1008:       ** then it is an error and we should recover from it by
 ! 1009:       ** restarting the pipe line of requests if any
 ! 1010:       */
 ! 1011:       if (HTHost_isPersistent(host)) {
 ! 1012:         http->result = HT_RECOVER_PIPE;
 ! 1013:         http->state = HTTP_ERROR;
 ! 1014:         break;
 ! 1015:       } else
 ! 1016:         http->state = HTTP_OK;
1.140.2.13 eric 1017:     }
 1018: 
1.71 frystyk 1019:     case HTTP_ERROR:
1.140.2.11 eric 1020:      if (http->result == HT_RECOVER_PIPE) {
 1021:        HTHost * host = HTNet_host(net);
 1022:        if (host == NULL) return HT_ERROR;
 1023:        HTChannel_setSemaphore(host->channel, 0);
 1024:        HTHost_clearChannel(host, HT_INTERRUPTED);
 1025:        HTHost_setMode(host, HT_TP_SINGLE);
 1026:      } else {
 1027: /*       HTTPEvent(soc, pVoid, HTEvent_RESET); */
 1028:        if (HTRequest_isPostWeb(request)) {
 1029:          if (HTRequest_isDestination(request)) {
 1030:            HTRequest * source = HTRequest_source(request);
 1031:            HTLink *link =
 1032:              HTLink_find((HTAnchor *)HTRequest_anchor(source),
 1033:                    (HTAnchor *) anchor);
 1034:            HTLink_setResult(link, HT_LINK_ERROR);
 1035:          }
 1036:          HTRequest_killPostWeb(request);
1.91 frystyk 1037:        }
1.140.2.11 eric 1038:        HTTPCleanup(request, http->result);
1.112 frystyk 1039:      }
1.94 frystyk 1040:      return HT_OK;
1.71 frystyk 1041:      break;
1.140.2.7 eric 1042:    default:
1.140.2.11 eric 1043:      HTTrace("bad http state %d.\n", http->state);
1.140.2.7 eric 1044:      HTDebugBreak();
1.71 frystyk 1045:    }
 1046:   } /* End of while(1) */
 1047: }  
1.88 frystyk 1048: 
1.21 luotonen 1049: 

Webmaster

AltStyle によって変換されたページ (->オリジナル) /