2 * $Id: dsi_stream.c,v 1.15 2009-10-22 04:59:50 didg Exp $
4 * Copyright (c) 1998 Adrian Sun (asun@zoology.washington.edu)
5 * All rights reserved. See COPYRIGHT.
7 * this file provides the following functions:
8 * dsi_stream_write: just write a bunch of bytes.
9 * dsi_stream_read: just read a bunch of bytes.
10 * dsi_stream_send: send a DSI header + data.
11 * dsi_stream_receive: read a DSI header + data.
16 #endif /* HAVE_CONFIG_H */
29 #include <sys/types.h>
30 #include <sys/socket.h>
36 #include <atalk/logger.h>
38 #include <atalk/dsi.h>
39 #include <netatalk/endian.h>
41 #define min(a,b) ((a) < (b) ? (a) : (b))
44 #define MSG_MORE 0x8000
48 #define MSG_DONTWAIT 0x40
51 /* -------------------------
52 * we don't use a circular buffer.
54 static void dsi_init_buffer(DSI *dsi)
57 /* XXX config options */
58 dsi->maxsize = 6 * dsi->server_quantum;
60 dsi->maxsize = 6 * DSI_SERVQUANT_DEF;
61 dsi->buffer = malloc(dsi->maxsize);
65 dsi->start = dsi->buffer;
66 dsi->eof = dsi->buffer;
67 dsi->end = dsi->buffer + dsi->maxsize;
71 /* ---------------------- */
72 static void dsi_buffer(DSI *dsi)
74 fd_set readfds, writefds;
80 FD_SET( dsi->socket, &readfds);
81 FD_SET( dsi->socket, &writefds);
82 maxfd = dsi->socket +1;
84 FD_SET( dsi->socket, &readfds);
85 FD_SET( dsi->socket, &writefds);
86 if (select( maxfd, &readfds, &writefds, NULL, NULL) <= 0)
89 if ( !FD_ISSET(dsi->socket, &readfds)) {
90 /* nothing waiting in the read queue */
94 len = dsi->end - dsi->eof;
97 /* ouch, our buffer is full !
98 * fall back to blocking IO
99 * could block and disconnect but it's better than a cpu hog
105 len = read(dsi->socket, dsi->eof, len);
109 if ( FD_ISSET(dsi->socket, &writefds)) {
115 /* ------------------------------
116 * write raw data. return actual bytes read. checks against EINTR
117 * aren't necessary if all of the signals have SA_RESTART
119 size_t dsi_stream_write(DSI *dsi, void *data, const size_t length, int mode _U_)
124 /* FIXME sometime it's slower */
125 unsigned int flags = (mode)?MSG_MORE:0;
127 unsigned int flags = 0;
130 /* XXX there's no MSG_DONTWAIT in recv ?? so we have to play with ioctl
132 if (dsi->noblocking) {
133 flags |= MSG_DONTWAIT;
139 while (written < length) {
140 if ((-1 == (len = send(dsi->socket, (u_int8_t *) data + written,
141 length - written, flags)) && errno == EINTR) ||
146 if (dsi->noblocking && errno == EAGAIN) {
147 /* non blocking mode but will block
148 * read data in input queue.
154 LOG(log_error, logtype_default, "dsi_stream_write: %s", strerror(errno));
163 dsi->write_count += written;
168 /* ---------------------------------
170 static size_t from_buf(DSI *dsi, u_int8_t *buf, size_t count)
175 nbe = dsi->eof - dsi->start;
178 nbe = min((size_t)nbe, count);
179 memcpy(buf, dsi->start, nbe);
182 if (dsi->eof == dsi->start)
183 dsi->start = dsi->eof = dsi->buffer;
190 static ssize_t buf_read(DSI *dsi, u_int8_t *buf, size_t count)
197 nbe = from_buf(dsi, buf, count);
201 return read(dsi->socket, buf, count);
205 /* ---------------------------------------
206 * read raw data. return actual bytes read. this will wait until
207 * it gets length bytes
209 size_t dsi_stream_read(DSI *dsi, void *data, const size_t length)
215 while (stored < length) {
216 len = buf_read(dsi, (u_int8_t *) data + stored, length - stored);
217 if (len == -1 && errno == EINTR)
221 else { /* eof or error */
222 /* don't log EOF error if it's just after connect (OSX 10.3 probe) */
223 if (len || stored || dsi->read_count) {
224 LOG(log_error, logtype_default, "dsi_stream_read(%d): %s", len, (len < 0)?strerror(errno):"unexpected EOF");
230 dsi->read_count += stored;
234 /* ---------------------------------------
235 * read raw data. return actual bytes read. this will wait until
236 * it gets length bytes
238 static size_t dsi_buffered_stream_read(DSI *dsi, u_int8_t *data, const size_t length)
243 dsi_init_buffer(dsi);
244 len = from_buf(dsi, data, length);
245 dsi->read_count += len;
250 buflen = min(8192, dsi->end - dsi->eof);
253 ret = read(dsi->socket, dsi->eof, buflen);
257 return dsi_stream_read(dsi, data, length -len);
260 /* ---------------------------------------
262 void dsi_sleep(DSI *dsi, const int state)
267 /* ---------------------------------------
269 static void block_sig(DSI *dsi)
272 if (!dsi->sigblocked) sigprocmask(SIG_BLOCK, &dsi->sigblockset, &dsi->oldset);
275 /* ---------------------------------------
277 static void unblock_sig(DSI *dsi)
280 if (!dsi->sigblocked) sigprocmask(SIG_SETMASK, &dsi->oldset, NULL);
283 /* ---------------------------------------
284 * write data. 0 on failure. this assumes that dsi_len will never
285 * cause an overflow in the data buffer.
287 int dsi_stream_send(DSI *dsi, void *buf, size_t length)
289 char block[DSI_BLOCKSIZ];
294 #endif /* USE_WRITEV */
296 block[0] = dsi->header.dsi_flags;
297 block[1] = dsi->header.dsi_command;
298 memcpy(block + 2, &dsi->header.dsi_requestID,
299 sizeof(dsi->header.dsi_requestID));
300 memcpy(block + 4, &dsi->header.dsi_code, sizeof(dsi->header.dsi_code));
301 memcpy(block + 8, &dsi->header.dsi_len, sizeof(dsi->header.dsi_len));
302 memcpy(block + 12, &dsi->header.dsi_reserved,
303 sizeof(dsi->header.dsi_reserved));
305 if (!length) { /* just write the header */
306 length = (dsi_stream_write(dsi, block, sizeof(block), 0) == sizeof(block));
307 return length; /* really 0 on failure, 1 on success */
313 iov[0].iov_base = block;
314 iov[0].iov_len = sizeof(block);
315 iov[1].iov_base = buf;
316 iov[1].iov_len = length;
318 towrite = sizeof(block) + length;
319 dsi->write_count += towrite;
320 while (towrite > 0) {
321 if (((len = writev(dsi->socket, iov, 2)) == -1 && errno == EINTR) ||
325 if ((size_t)len == towrite) /* wrote everything out */
327 else if (len < 0) { /* error */
328 LOG(log_error, logtype_default, "dsi_stream_send: %s", strerror(errno));
334 if (towrite > length) { /* skip part of header */
335 iov[0].iov_base = (char *) iov[0].iov_base + len;
336 iov[0].iov_len -= len;
337 } else { /* skip to data */
338 if (iov[0].iov_len) {
339 len -= iov[0].iov_len;
342 iov[1].iov_base = (char *) iov[1].iov_base + len;
343 iov[1].iov_len -= len;
347 #else /* USE_WRITEV */
348 /* write the header then data */
349 if ((dsi_stream_write(dsi, block, sizeof(block), 1) != sizeof(block)) ||
350 (dsi_stream_write(dsi, buf, length, 0) != length)) {
354 #endif /* USE_WRITEV */
361 /* ---------------------------------------
362 * read data. function on success. 0 on failure. data length gets
363 * stored in length variable. this should really use size_t's, but
364 * that would require changes elsewhere. */
365 int dsi_stream_receive(DSI *dsi, void *buf, const size_t ilength,
368 char block[DSI_BLOCKSIZ];
370 /* read in the header */
371 if (dsi_buffered_stream_read(dsi, block, sizeof(block)) != sizeof(block))
374 dsi->header.dsi_flags = block[0];
375 dsi->header.dsi_command = block[1];
376 /* FIXME, not the right place,
377 but we get a server disconnect without reason in the log
380 LOG(log_error, logtype_default, "dsi_stream_receive: invalid packet, fatal");
384 memcpy(&dsi->header.dsi_requestID, block + 2,
385 sizeof(dsi->header.dsi_requestID));
386 memcpy(&dsi->header.dsi_code, block + 4, sizeof(dsi->header.dsi_code));
387 memcpy(&dsi->header.dsi_len, block + 8, sizeof(dsi->header.dsi_len));
388 memcpy(&dsi->header.dsi_reserved, block + 12,
389 sizeof(dsi->header.dsi_reserved));
390 dsi->clientID = ntohs(dsi->header.dsi_requestID);
392 /* make sure we don't over-write our buffers. */
393 *rlength = min(ntohl(dsi->header.dsi_len), ilength);
394 if (dsi_stream_read(dsi, buf, *rlength) != *rlength)