Annotation of libwww/Library/src/HTReader.c, revision 2.24

2.1       frystyk     1: /*                                                                  HTReader.c
                      2: **     READ STREAM FROM THE NETWORK USING TCP
                      3: **
                      4: **     (c) COPYRIGHT MIT 1995.
                      5: **     Please first read the full copyright statement in the file COPYRIGH.
2.24    ! frystyk     6: **     @(#) $Id: HTReader.c,v 2.23 1998/05/04 19:37:15 frystyk Exp $
2.1       frystyk     7: **
                      8: ** HISTORY:
                      9: **     6 June 95  HFN  Written
                     10: */
                     11: 
                     12: /* Library Include files */
2.23      frystyk    13: #include "wwwsys.h"
2.1       frystyk    14: #include "WWWUtil.h"
2.5       frystyk    15: #include "WWWCore.h"
2.1       frystyk    16: #include "HTNetMan.h"
                     17: #include "HTReader.h"                                   /* Implemented here */
                     18: 
                     19: struct _HTStream {
                     20:     const HTStreamClass *      isa;
                     21:     /* ... */
                     22: };
                     23: 
                     24: struct _HTInputStream {
                     25:     const HTInputStreamClass * isa;
                     26:     HTChannel *                        ch;
2.9       frystyk    27:     HTHost *                   host;
2.1       frystyk    28:     char *                     write;                  /* Last byte written */
                     29:     char *                     read;                      /* Last byte read */
2.15      frystyk    30:     int                                b_read;
2.1       frystyk    31:     char                       data [INPUT_BUFFER_SIZE];          /* buffer */
                     32: };
                     33: 
                     34: /* ------------------------------------------------------------------------- */
                     35: 
                     36: PRIVATE int HTReader_flush (HTInputStream * me)
                     37: {
2.9       frystyk    38:     HTNet * net = HTHost_getReadNet(me->host);
                     39:     return net && net->readStream ? (*net->readStream->isa->flush)(net->readStream) : HT_OK;
2.1       frystyk    40: }
                     41: 
                     42: PRIVATE int HTReader_free (HTInputStream * me)
                     43: {
2.9       frystyk    44:     HTNet * net = HTHost_getReadNet(me->host);
                     45:     if (net && net->readStream) {
                     46:        int status = (*net->readStream->isa->_free)(net->readStream);
2.19      frystyk    47:         if (status == HT_OK) net->readStream = NULL;
2.1       frystyk    48:        return status;
                     49:     }
                     50:     return HT_OK;
                     51: }
                     52: 
                     53: PRIVATE int HTReader_abort (HTInputStream * me, HTList * e)
                     54: {
2.9       frystyk    55:     HTNet * net = HTHost_getReadNet(me->host);
                     56:     if (net && net->readStream) {
                     57:        int status = (*net->readStream->isa->abort)(net->readStream, NULL);
                     58:        if (status != HT_IGNORE) net->readStream = NULL;
2.1       frystyk    59:     }
                     60:     return HT_ERROR;
                     61: }
                     62: 
                     63: /*     Push data from a socket down a stream
                     64: **     -------------------------------------
                     65: **
                     66: **   This routine is responsible for creating and PRESENTING any
                     67: **   graphic (or other) objects described by the file. As this function
                     68: **   max reads a chunk of data on size INPUT_BUFFER_SIZE, it can be used
                     69: **   with both blocking or non-blocking sockets. It will always return to
                     70: **   the event loop, however if we are using blocking I/O then we get a full
                     71: **   buffer read, otherwise we get what's available.
                     72: **
                     73: ** Returns      HT_LOADED      if finished reading
                     74: **             HT_OK           if OK, but more to read
                     75: **             HT_ERROR        if error,
                     76: **                     HT_WOULD_BLOCK  if read or write would block
                     77: **             HT_PAUSE        if stream is paused
                     78: */
2.13      eric       79: char * strnstr(char * haystack, int *pLen, char * needle)
                     80: {
                     81:     int found = 0;
                     82:     int need = strlen(needle);
                     83:     int i, start;
                     84:     for (start = i = 0; i < *pLen; i++)
                     85:        if (haystack[i] == needle[found]) {
                     86:            if (++found == need) {
                     87:                i -= need - 1; /* beginning of string */
                     88:                *pLen -= i;
                     89:                return haystack+i;
                     90:            }
                     91:        } else {
                     92:            found = 0;
                     93:        }
                     94:     *pLen = 0;
                     95:     return NULL;
                     96: }
                     97: 
2.20      frystyk    98: /* int DebugBufferSize = INPUT_BUFFER_SIZE; */
2.9       frystyk    99: 
2.1       frystyk   100: PRIVATE int HTReader_read (HTInputStream * me)
                    101: {
2.9       frystyk   102:     HTHost * host = me->host;
                    103:     SOCKET soc = HTChannel_socket(me->ch);
                    104:     HTNet * net = HTHost_getReadNet(host);
                    105:     HTRequest * request = HTNet_request(net);
2.1       frystyk   106:     int status;
2.19      frystyk   107:     if (!net->readStream) {
2.24    ! frystyk   108:        if (STREAM_TRACE)
        !           109:            HTTrace("Read Socket. No read stream for net object %p\n", net);
2.19      frystyk   110:         return HT_ERROR;
                    111:     }
                    112:         
2.9       frystyk   113:     /*    me->b_read = me->read - me->data; */
2.1       frystyk   114:     /* Read from socket if we got rid of all the data previously read */
                    115:     do {
2.9       frystyk   116:        /* don't read if we have to push unwritten data from last call */
2.1       frystyk   117:        if (me->write >= me->read) {
2.20      frystyk   118:            if ((me->b_read = NETREAD(soc, me->data, INPUT_BUFFER_SIZE)) < 0) {
2.1       frystyk   119: #ifdef EAGAIN
                    120:                if (socerrno==EAGAIN || socerrno==EWOULDBLOCK)      /* POSIX */
                    121: #else
                    122:                if (socerrno==EWOULDBLOCK)                            /* BSD */
                    123: #endif 
                    124:                {
2.24    ! frystyk   125:                    if (STREAM_TRACE)
2.1       frystyk   126:                        HTTrace("Read Socket. WOULD BLOCK fd %d\n",soc);
2.9       frystyk   127:                    HTHost_register(host, net, HTEvent_READ);
2.1       frystyk   128:                    return HT_WOULD_BLOCK;
                    129: #ifdef __svr4__
                    130:     /* 
                    131:     ** In Solaris envirnoment, SIGPOLL is used to signal end of buffer for
                    132:     ** /dev/audio.  If your process is also doing a socket read, it will cause
                    133:     ** an EINTR error.  This error will cause the www library request to 
                    134:     ** terminate prematurly.
                    135:     */
                    136:                 } else if (socerrno == EINTR) {
                    137:                     continue;
                    138: #endif /* __svr4__ */
2.9       frystyk   139: #ifdef EPIPE
                    140:                } else if (socerrno == EPIPE) {
2.24    ! frystyk   141:                    if (STREAM_TRACE) HTTrace("Read Socket. got EPIPE\n", soc);
2.9       frystyk   142:                    goto socketClosed;
                    143: #endif /* EPIPE */
2.1       frystyk   144:                } else {                             /* We have a real error */
                    145: 
                    146:                    /* HERE WE SHOULD RETURN target abort */
2.9       frystyk   147:                    if (request)
                    148:                        HTRequest_addSystemError(request, ERR_FATAL, socerrno,
                    149:                                                 NO, "NETREAD");
2.1       frystyk   150:                    return HT_ERROR;
                    151:                }
2.8       frystyk   152: #ifdef ECONNRESET
2.9       frystyk   153:            } else if (!me->b_read || socerrno==ECONNRESET) {
2.8       frystyk   154: #else
2.9       frystyk   155:            } else if (!me->b_read) {
2.8       frystyk   156: #endif
2.9       frystyk   157:            socketClosed:
2.24    ! frystyk   158:                if (STREAM_TRACE)
2.11      frystyk   159:                    HTTrace("Read Socket. FIN received on socket %d\n", soc);
2.9       frystyk   160:                if (request) {
                    161:                    HTAlertCallback *cbf = HTAlert_find(HT_PROG_DONE);
2.24    ! frystyk   162:                    if (STREAM_TRACE)
2.9       frystyk   163:                        if (cbf) (*cbf)(request, HT_PROG_DONE,
                    164:                                        HT_MSG_NULL, NULL, NULL, NULL);
                    165:                }
                    166:                HTHost_unregister(host, net, HTEvent_READ);
2.18      frystyk   167:                HTHost_register(host, net, HTEvent_CLOSE);
2.1       frystyk   168:                return HT_CLOSED;
                    169:            }
                    170: 
                    171:            /* Remember how much we have read from the input socket */
2.24    ! frystyk   172:            HTTraceData(me->data, me->b_read, "Reading from socket %d", soc);
2.1       frystyk   173:            me->write = me->data;
2.9       frystyk   174:            me->read = me->data + me->b_read;
2.13      eric      175: #ifdef FIND_SIGNATURES
                    176:            {
                    177:                char * ptr = me->data;
                    178:                int len = me->b_read;
                    179:                while ((ptr = strnstr(ptr, &len, "HTTP/1.1 200 OK")) != NULL) {
2.24    ! frystyk   180:                    if (STREAM_TRACE)
2.13      eric      181:                        HTTrace("Read Socket. Signature found at 0x%x of 0x%x.\n", ptr - me->data, me->b_read);
                    182:                    ptr++;
                    183:                    len--;
                    184:                }
                    185:            }
                    186: #endif /* FIND_SIGNATURES */
2.1       frystyk   187: #ifdef NOT_ASCII
                    188:            {
                    189:                char *p = me->data;
                    190:                while (p < me->read) {
                    191:                    *p = FROMASCII(*p);
                    192:                    p++;
                    193:                }
                    194:            }
                    195: #endif /* NOT_ASCII */
                    196: 
2.24    ! frystyk   197:            if (STREAM_TRACE)
2.1       frystyk   198:                HTTrace("Read Socket. %d bytes read from socket %d\n",
2.9       frystyk   199:                        me->b_read, soc);
                    200:            if (request) {
2.1       frystyk   201:                HTAlertCallback * cbf = HTAlert_find(HT_PROG_READ);
2.9       frystyk   202: #if 0
                    203:                /* byte account is done later */
                    204:                net->bytesRead += me->b_read;
                    205: #endif
                    206:                if (cbf) (*cbf)(request, HT_PROG_READ,
2.1       frystyk   207:                                HT_MSG_NULL, NULL, NULL, NULL);
                    208:            }
                    209:        }
                    210: 
                    211:        /* Now push the data down the stream */
2.9       frystyk   212:        if ((status = (*net->readStream->isa->put_block)
                    213:             (net->readStream, me->write, me->b_read)) != HT_OK) {
2.1       frystyk   214:            if (status == HT_WOULD_BLOCK) {
2.24    ! frystyk   215:                if (STREAM_TRACE) HTTrace("Read Socket. Target WOULD BLOCK\n");
2.9       frystyk   216:                HTHost_unregister(host, net, HTEvent_READ);
2.1       frystyk   217:                return HT_WOULD_BLOCK;
                    218:            } else if (status == HT_PAUSE) {
2.24    ! frystyk   219:                if (STREAM_TRACE) HTTrace("Read Socket. Target PAUSED\n");
2.9       frystyk   220:                HTHost_unregister(host, net, HTEvent_READ);
2.1       frystyk   221:                return HT_PAUSE;
2.9       frystyk   222:            /* CONTINUE code or stream code means data was consumed */
                    223:            } else if (status == HT_CONTINUE || status > 0) {
                    224:                if (status == HT_CONTINUE) {
2.24    ! frystyk   225:                    if (STREAM_TRACE) HTTrace("Read Socket. CONTINUE\n");
2.9       frystyk   226:                } else
2.24    ! frystyk   227:                    if (STREAM_TRACE)
2.9       frystyk   228:                        HTTrace("Read Socket. Target returns %d\n", status);
                    229: /*             me->write = me->read; */
2.1       frystyk   230:                return status;
                    231:            } else {                                 /* We have a real error */
2.24    ! frystyk   232:                if (STREAM_TRACE) HTTrace("Read Socket. Target ERROR %d\n", status);
2.1       frystyk   233:                return status;
                    234:            }
                    235:        }
2.9       frystyk   236:        me->write = me->read;
2.19      frystyk   237:        {
                    238:            int remaining = HTHost_remainingRead(host);
                    239:            if (remaining > 0) {
2.24    ! frystyk   240:                if (STREAM_TRACE)
2.21      frystyk   241:                    HTTrace("Read Socket. DIDN'T CONSUME %d BYTES: `%s\'\n",
                    242:                            remaining, me->read);
2.19      frystyk   243:                HTHost_setConsumed(host, remaining);
                    244:            }
                    245:        }
2.1       frystyk   246:     } while (net->preemptive);
2.9       frystyk   247:     HTHost_register(host, net, HTEvent_READ);
2.1       frystyk   248:     return HT_WOULD_BLOCK;
                    249: }
                    250: 
                    251: /*
                    252: **     The difference between the close and the free method is that we don't
                    253: **     close the connection in the free method - we only call the free method
                    254: **     of the target stream. That way, we can keep the input stream as long 
                    255: **     as the channel itself.
                    256: */
                    257: PRIVATE int HTReader_close (HTInputStream * me)
                    258: {
                    259:     int status = HT_OK;
2.9       frystyk   260:     HTNet * net = HTHost_getReadNet(me->host);
                    261:     if (net && net->readStream) {
                    262:        if ((status = (*net->readStream->isa->_free)(net->readStream))==HT_WOULD_BLOCK)
2.1       frystyk   263:            return HT_WOULD_BLOCK;
2.9       frystyk   264:        net->readStream = NULL;
2.1       frystyk   265:     }
2.24    ! frystyk   266:     if (STREAM_TRACE) HTTrace("Socket read. FREEING....\n");
2.1       frystyk   267:     HT_FREE(me);
                    268:     return status;
                    269: }
                    270: 
2.9       frystyk   271: PUBLIC int HTReader_consumed (HTInputStream * me, size_t bytes)
                    272: {
                    273:     me->write += bytes;
                    274:     me->b_read -= bytes;
                    275:     HTHost_setRemainingRead(me->host, me->b_read);
                    276:     return HT_OK;
                    277: }
                    278: 
2.1       frystyk   279: PRIVATE const HTInputStreamClass HTReader =
                    280: {
                    281:     "SocketReader",
                    282:     HTReader_flush,
                    283:     HTReader_free,
                    284:     HTReader_abort,
                    285:     HTReader_read,
2.9       frystyk   286:     HTReader_close,
                    287:     HTReader_consumed
2.1       frystyk   288: }; 
                    289: 
                    290: /*
                    291: **     Create a new input read stream. Before we actually create it we check
                    292: **     to see whether we already have an input stream for this channel and if
                    293: **     so we just return that. This means that we can reuse input streams 
                    294: **     in persistent connections, for example.
                    295: */
2.9       frystyk   296: PUBLIC HTInputStream * HTReader_new (HTHost * host, HTChannel * ch,
                    297:                                     void * param, int mode)
2.1       frystyk   298: {
2.9       frystyk   299:     if (host && ch) {
2.1       frystyk   300:        HTInputStream * me = HTChannel_input(ch);
                    301:        if (me == NULL) {
                    302:            if ((me=(HTInputStream *) HT_CALLOC(1, sizeof(HTInputStream))) == NULL)
                    303:            HT_OUTOFMEM("HTReader_new");
                    304:            me->isa = &HTReader;
                    305:            me->ch = ch;
2.9       frystyk   306:            me->host = host;
2.24    ! frystyk   307:            if (STREAM_TRACE) HTTrace("Reader...... Created reader stream %p\n", me);
2.1       frystyk   308:        }
                    309:        return me;
                    310:     }
                    311:     return NULL;
                    312: }
2.9       frystyk   313: 

Webmaster