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