Integer type name change.
[silc.git] / lib / silcutil / win32 / silcwin32sockconn.c
1 /*
2
3   silcwin32sockconn.c
4
5   Author: Pekka Riikonen <priikone@silcnet.org>
6
7   Copyright (C) 1997 - 2001 Pekka Riikonen
8
9   This program is free software; you can redistribute it and/or modify
10   it under the terms of the GNU General Public License as published by
11   the Free Software Foundation; either version 2 of the License, or
12   (at your option) any later version.
13   
14   This program is distributed in the hope that it will be useful,
15   but WITHOUT ANY WARRANTY; without even the implied warranty of
16   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17   GNU General Public License for more details.
18
19 */
20 /* $Id$ */
21
22 #include "silcincludes.h"
23
24 /* Writes data from encrypted buffer to the socket connection. If the
25    data cannot be written at once, it will be written later with a timeout. 
26    The data is written from the data section of the buffer, not from head
27    or tail section. This automatically pulls the data section towards end
28    after writing the data. */
29
30 int silc_socket_write(SilcSocketConnection sock)
31 {
32   int ret = 0, err;
33   SOCKET fd = sock->sock;
34   SilcBuffer src = sock->outbuf;
35
36   if (SILC_IS_DISABLED(sock))
37     return -1;
38
39   SILC_LOG_DEBUG(("Writing data to socket %d", fd));
40
41   if (src->len > 0) {
42     ret = send(fd, src->data, src->len,  0);
43     if (ret == SOCKET_ERROR) {
44       err = WSAGetLastError();
45       if (err == WSAEWOULDBLOCK) {
46         SILC_LOG_DEBUG(("Could not write immediately, will do it later"));
47         return -2;
48       }
49       SILC_LOG_ERROR(("Cannot write to socket: %d", (int)fd));
50       sock->sock_error = err;
51       return -1;
52     }
53
54     silc_buffer_pull(src, ret);
55   }
56
57   SILC_LOG_DEBUG(("Wrote data %d bytes", ret));
58
59   return ret;
60 }
61
62 /* Reads data from the socket connection into the incoming data buffer.
63    It reads as much as possible from the socket connection. This returns
64    amount of bytes read or -1 on error or -2 on case where all of the
65    data could not be read at once. */
66
67 int silc_socket_read(SilcSocketConnection sock)
68 {
69   int len = 0, err;
70   unsigned char buf[SILC_SOCKET_READ_SIZE];
71   SOCKET fd = sock->sock;
72   int argp;
73
74   if (SILC_IS_DISABLED(sock))
75     return -1;
76
77   SILC_LOG_DEBUG(("Reading data from socket %d", fd));
78
79   /* Check whether there is data available, without calling recv(). */
80   ioctlsocket(fd, FIONREAD, (unsigned long *)&argp);
81   if (argp == 0) {
82     /* Is this kludge or what? Without this thing this contraption
83        does not work at all!?. */
84     SleepEx(1, TRUE);
85     SILC_LOG_DEBUG(("Could not read immediately, will do it later"));
86     return -2;
87   }
88
89   /* Read the data from the socket. */
90   len = recv(fd, buf, sizeof(buf), 0);
91   if (len == SOCKET_ERROR) {
92     err = WSAGetLastError();
93     if (err == WSAEWOULDBLOCK || err == WSAEINTR) {
94       SILC_LOG_DEBUG(("Could not read immediately, will do it later"));
95       return -2;
96     }
97     SILC_LOG_ERROR(("Cannot read from socket: %d", (int)fd));
98     sock->sock_error = err;
99     return -1;
100   }
101
102   if (!len)
103     return 0;
104
105   /* Insert the data to the buffer. */
106
107   if (!sock->inbuf)
108     sock->inbuf = silc_buffer_alloc(SILC_SOCKET_BUF_SIZE);
109   
110   /* If the data does not fit to the buffer reallocate it */
111   if ((sock->inbuf->end - sock->inbuf->tail) < len)
112     sock->inbuf = silc_buffer_realloc(sock->inbuf, sock->inbuf->truelen + 
113                                       (len * 2));
114   silc_buffer_put_tail(sock->inbuf, buf, len);
115   silc_buffer_pull_tail(sock->inbuf, len);
116
117   SILC_LOG_DEBUG(("Read %d bytes", len));
118
119   return len;
120 }
121
122 /* Returns human readable socket error message */
123
124 bool silc_socket_get_error(SilcSocketConnection sock, char *error,
125                            SilcUInt32 error_len)
126 {
127   /* XXX TODO */
128   return FALSE;
129 }