Annotation of libwww/Library/src/HTReader.c, revision 2.8.2.6
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.8.2.6 ! eric 6: ** @(#) $Id: HTReader.c,v 2.8.2.5 1996/11/06 00:38:46 frystyk Exp $
2.1 frystyk 7: **
8: ** HISTORY:
9: ** 6 June 95 HFN Written
10: */
11:
12: /* Library Include files */
13: #include "sysdep.h"
14: #include "WWWUtil.h"
2.5 frystyk 15: #include "WWWCore.h"
2.8.2.1 eric 16: #include "HTHost.h"
2.1 frystyk 17: #include "HTNetMan.h"
18: #include "HTReader.h" /* Implemented here */
19:
20: struct _HTStream {
21: const HTStreamClass * isa;
22: /* ... */
23: };
24:
25: struct _HTInputStream {
26: const HTInputStreamClass * isa;
27: HTChannel * ch;
2.8.2.1 eric 28: HTHost * host;
2.1 frystyk 29: char * write; /* Last byte written */
30: char * read; /* Last byte read */
31: char data [INPUT_BUFFER_SIZE]; /* buffer */
2.8.2.1 eric 32: int b_read;
2.1 frystyk 33: };
34:
35: /* ------------------------------------------------------------------------- */
36:
37: PRIVATE int HTReader_flush (HTInputStream * me)
38: {
2.8.2.1 eric 39: HTNet * net = HTHost_getReadNet(me->host);
2.8.2.2 eric 40: return net && net->readStream ? (*net->readStream->isa->flush)(net->readStream) : HT_OK;
2.1 frystyk 41: }
42:
43: PRIVATE int HTReader_free (HTInputStream * me)
44: {
2.8.2.1 eric 45: HTNet * net = HTHost_getReadNet(me->host);
46: if (net && net->readStream) {
2.8.2.2 eric 47: int status = (*net->readStream->isa->_free)(net->readStream);
2.8.2.6 ! eric 48: if (status != HT_WOULD_BLOCK) net->readStream = NULL;
2.1 frystyk 49: return status;
50: }
51: return HT_OK;
52: }
53:
54: PRIVATE int HTReader_abort (HTInputStream * me, HTList * e)
55: {
2.8.2.1 eric 56: HTNet * net = HTHost_getReadNet(me->host);
57: if (net && net->readStream) {
2.8.2.2 eric 58: (*net->readStream->isa->abort)(net->readStream, NULL);
2.8.2.6 ! eric 59: net->readStream = NULL;
2.1 frystyk 60: }
61: return HT_ERROR;
62: }
63:
64: /* Push data from a socket down a stream
65: ** -------------------------------------
66: **
67: ** This routine is responsible for creating and PRESENTING any
68: ** graphic (or other) objects described by the file. As this function
69: ** max reads a chunk of data on size INPUT_BUFFER_SIZE, it can be used
70: ** with both blocking or non-blocking sockets. It will always return to
71: ** the event loop, however if we are using blocking I/O then we get a full
72: ** buffer read, otherwise we get what's available.
73: **
74: ** Returns HT_LOADED if finished reading
75: ** HT_OK if OK, but more to read
76: ** HT_ERROR if error,
77: ** HT_WOULD_BLOCK if read or write would block
78: ** HT_PAUSE if stream is paused
79: */
80: PRIVATE int HTReader_read (HTInputStream * me)
81: {
2.8.2.1 eric 82: HTHost * host = me->host;
2.8.2.3 frystyk 83: SOCKET soc = HTChannel_socket(me->ch);
2.8.2.1 eric 84: HTNet * net = HTHost_getReadNet(host);
2.8.2.3 frystyk 85: HTRequest * request = HTNet_request(net);
86: int status;
2.1 frystyk 87:
2.8.2.2 eric 88: /* me->b_read = me->read - me->data; */
2.1 frystyk 89: /* Read from socket if we got rid of all the data previously read */
90: do {
2.8.2.1 eric 91: /* don't read if we have to push unwritten data from last call */
2.1 frystyk 92: if (me->write >= me->read) {
2.8.2.1 eric 93: if ((me->b_read = NETREAD(soc, me->data, INPUT_BUFFER_SIZE)) < 0) {
2.1 frystyk 94: #ifdef EAGAIN
95: if (socerrno==EAGAIN || socerrno==EWOULDBLOCK) /* POSIX */
96: #else
97: if (socerrno==EWOULDBLOCK) /* BSD */
98: #endif
99: {
100: if (PROT_TRACE)
101: HTTrace("Read Socket. WOULD BLOCK fd %d\n",soc);
2.8.2.1 eric 102: HTHost_register(host, net, HTEvent_READ);
2.1 frystyk 103: return HT_WOULD_BLOCK;
104: #ifdef __svr4__
105: /*
106: ** In Solaris envirnoment, SIGPOLL is used to signal end of buffer for
107: ** /dev/audio. If your process is also doing a socket read, it will cause
108: ** an EINTR error. This error will cause the www library request to
109: ** terminate prematurly.
110: */
111: } else if (socerrno == EINTR) {
112: continue;
113: #endif /* __svr4__ */
114: } else { /* We have a real error */
115:
116: /* HERE WE SHOULD RETURN target abort */
2.8.2.3 frystyk 117: if (request)
118: HTRequest_addSystemError(request, ERR_FATAL, socerrno,
119: NO, "NETREAD");
2.1 frystyk 120: return HT_ERROR;
121: }
2.8 frystyk 122: #ifdef ECONNRESET
2.8.2.1 eric 123: } else if (!me->b_read || socerrno==ECONNRESET) {
2.8 frystyk 124: #else
2.8.2.1 eric 125: } else if (!me->b_read) {
2.8 frystyk 126: #endif
2.8.2.3 frystyk 127: HTTrace("Read Socket. FIN received on socket %d\n", soc);
128: if (request) {
129: HTAlertCallback *cbf = HTAlert_find(HT_PROG_DONE);
130: if (PROT_TRACE)
131: if (cbf) (*cbf)(request, HT_PROG_DONE,
132: HT_MSG_NULL, NULL, NULL, NULL);
133: }
134: HTHost_unregister(host, net, HTEvent_READ);
2.1 frystyk 135: return HT_CLOSED;
136: }
137:
138: /* Remember how much we have read from the input socket */
139: me->write = me->data;
2.8.2.1 eric 140: me->read = me->data + me->b_read;
2.1 frystyk 141:
142: #ifdef NOT_ASCII
143: {
144: char *p = me->data;
145: while (p < me->read) {
146: *p = FROMASCII(*p);
147: p++;
148: }
149: }
150: #endif /* NOT_ASCII */
151:
152: if (PROT_TRACE)
153: HTTrace("Read Socket. %d bytes read from socket %d\n",
2.8.2.1 eric 154: me->b_read, soc);
2.8.2.3 frystyk 155: if (request) {
2.1 frystyk 156: HTAlertCallback * cbf = HTAlert_find(HT_PROG_READ);
2.8.2.4 frystyk 157: #if 0
158: /* byte account is done later */
2.8.2.1 eric 159: net->bytesRead += me->b_read;
2.8.2.4 frystyk 160: #endif
2.8.2.3 frystyk 161: if (cbf) (*cbf)(request, HT_PROG_READ,
2.1 frystyk 162: HT_MSG_NULL, NULL, NULL, NULL);
163: }
164: }
165:
166: /* Now push the data down the stream */
2.8.2.1 eric 167: if ((status = (*net->readStream->isa->put_block)
2.8.2.2 eric 168: (net->readStream, me->write, me->b_read)) != HT_OK) {
2.1 frystyk 169: if (status == HT_WOULD_BLOCK) {
170: if (PROT_TRACE) HTTrace("Read Socket. Target WOULD BLOCK\n");
2.8.2.1 eric 171: HTHost_unregister(host, net, HTEvent_READ);
2.1 frystyk 172: return HT_WOULD_BLOCK;
173: } else if (status == HT_PAUSE) {
174: if (PROT_TRACE) HTTrace("Read Socket. Target PAUSED\n");
2.8.2.1 eric 175: HTHost_unregister(host, net, HTEvent_READ);
2.1 frystyk 176: return HT_PAUSE;
2.8.2.1 eric 177: /* CONTINUE code or stream code means data was consumed */
178: } else if (status == HT_CONTINUE || status > 0) {
179: if (status == HT_CONTINUE) {
180: if (PROT_TRACE) HTTrace("Read Socket. CONTINUE\n");
181: } else
182: if (PROT_TRACE)
183: HTTrace("Read Socket. Target returns %d\n", status);
184: /* me->write = me->read; */
2.1 frystyk 185: return status;
186: } else { /* We have a real error */
187: if (PROT_TRACE) HTTrace("Read Socket. Target ERROR\n");
188: return status;
189: }
190: }
2.8.2.1 eric 191: me->write = me->read;
192: HTHost_setRemainingRead(host, 0);
2.1 frystyk 193: } while (net->preemptive);
2.8.2.1 eric 194: HTHost_register(host, net, HTEvent_READ);
2.1 frystyk 195: return HT_WOULD_BLOCK;
196: }
197:
198: /*
199: ** The difference between the close and the free method is that we don't
200: ** close the connection in the free method - we only call the free method
201: ** of the target stream. That way, we can keep the input stream as long
202: ** as the channel itself.
203: */
204: PRIVATE int HTReader_close (HTInputStream * me)
205: {
206: int status = HT_OK;
2.8.2.1 eric 207: HTNet * net = HTHost_getReadNet(me->host);
208: if (net && net->readStream) {
2.8.2.2 eric 209: if ((status = (*net->readStream->isa->_free)(net->readStream))==HT_WOULD_BLOCK)
2.1 frystyk 210: return HT_WOULD_BLOCK;
2.8.2.6 ! eric 211: net->readStream = NULL;
2.1 frystyk 212: }
213: if (PROT_TRACE) HTTrace("Socket read. FREEING....\n");
214: HT_FREE(me);
215: return status;
216: }
217:
2.8.2.1 eric 218: PUBLIC int HTReader_consumed (HTInputStream * me, size_t bytes)
219: {
2.8.2.5 frystyk 220: if (PROT_TRACE) HTTrace("Socket read. consumed %d bytes\n", bytes);
2.8.2.1 eric 221: me->write += bytes;
222: me->b_read -= bytes;
223: HTHost_setRemainingRead(me->host, me->b_read);
224: return HT_OK;
225: }
226:
2.1 frystyk 227: PRIVATE const HTInputStreamClass HTReader =
228: {
229: "SocketReader",
230: HTReader_flush,
231: HTReader_free,
232: HTReader_abort,
233: HTReader_read,
2.8.2.1 eric 234: HTReader_close,
235: HTReader_consumed
2.1 frystyk 236: };
237:
238: /*
239: ** Create a new input read stream. Before we actually create it we check
240: ** to see whether we already have an input stream for this channel and if
241: ** so we just return that. This means that we can reuse input streams
242: ** in persistent connections, for example.
243: */
2.8.2.1 eric 244: PUBLIC HTInputStream * HTReader_new (HTHost * host, HTChannel * ch,
245: void * param, int mode)
2.1 frystyk 246: {
2.8.2.1 eric 247: if (host && ch) {
2.1 frystyk 248: HTInputStream * me = HTChannel_input(ch);
249: if (me == NULL) {
250: if ((me=(HTInputStream *) HT_CALLOC(1, sizeof(HTInputStream))) == NULL)
251: HT_OUTOFMEM("HTReader_new");
252: me->isa = &HTReader;
253: me->ch = ch;
2.8.2.3 frystyk 254: me->host = host;
2.1 frystyk 255: }
256: return me;
257: }
258: return NULL;
259: }
Webmaster