most of Q2's keyboard handling ported over - what this means: keypad is now separatel...
[divverent/darkplaces.git] / net_udp.c
1 /*
2 Copyright (C) 1996-1997 Id Software, Inc.
3
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
8
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
12
13 See the GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18
19 */
20 // net_udp.c
21
22 #include "quakedef.h"
23
24 #include <sys/types.h>
25 #include <sys/socket.h>
26 #include <netinet/in.h>
27 #include <netdb.h>
28 #include <sys/param.h>
29 #include <sys/ioctl.h>
30 #include <errno.h>
31
32 #ifdef __sun__
33 #include <sys/filio.h>
34 #endif
35
36 #ifdef NeXT
37 #include <libc.h>
38 #endif
39
40 extern int gethostname (char *, int);
41 extern int close (int);
42
43 static int net_acceptsocket = -1;               // socket for fielding new connections
44 static int net_controlsocket;
45 static int net_broadcastsocket = 0;
46 static struct qsockaddr broadcastaddr;
47
48 static unsigned long myAddr;
49
50 #include "net_udp.h"
51
52 //=============================================================================
53
54 int UDP_Init (void)
55 {
56         struct hostent *local;
57         char    buff[MAXHOSTNAMELEN];
58         struct qsockaddr addr;
59         char *colon;
60         
61         if (COM_CheckParm ("-noudp"))
62                 return -1;
63
64         // determine my name & address
65         gethostname(buff, MAXHOSTNAMELEN);
66         local = gethostbyname(buff);
67         myAddr = *(int *)local->h_addr_list[0];
68
69         // if the quake hostname isn't set, set it to the machine name
70         if (strcmp(hostname.string, "UNNAMED") == 0)
71         {
72                 buff[15] = 0;
73                 Cvar_Set ("hostname", buff);
74         }
75
76         if ((net_controlsocket = UDP_OpenSocket (0)) == -1)
77                 Sys_Error("UDP_Init: Unable to open control socket\n");
78
79         ((struct sockaddr_in *)&broadcastaddr)->sin_family = AF_INET;
80         ((struct sockaddr_in *)&broadcastaddr)->sin_addr.s_addr = INADDR_BROADCAST;
81         ((struct sockaddr_in *)&broadcastaddr)->sin_port = htons(net_hostport);
82
83         UDP_GetSocketAddr (net_controlsocket, &addr);
84         strcpy(my_tcpip_address,  UDP_AddrToString (&addr));
85         colon = strrchr (my_tcpip_address, ':');
86         if (colon)
87                 *colon = 0;
88
89         Con_Printf("UDP Initialized\n");
90         tcpipAvailable = true;
91
92         return net_controlsocket;
93 }
94
95 //=============================================================================
96
97 void UDP_Shutdown (void)
98 {
99         UDP_Listen (false);
100         UDP_CloseSocket (net_controlsocket);
101 }
102
103 //=============================================================================
104
105 void UDP_Listen (qboolean state)
106 {
107         // enable listening
108         if (state)
109         {
110                 if (net_acceptsocket != -1)
111                         return;
112                 if ((net_acceptsocket = UDP_OpenSocket (net_hostport)) == -1)
113                         Sys_Error ("UDP_Listen: Unable to open accept socket\n");
114                 return;
115         }
116
117         // disable listening
118         if (net_acceptsocket == -1)
119                 return;
120         UDP_CloseSocket (net_acceptsocket);
121         net_acceptsocket = -1;
122 }
123
124 //=============================================================================
125
126 int UDP_OpenSocket (int port)
127 {
128         int newsocket;
129         struct sockaddr_in address;
130         qboolean _true = true;
131
132         if ((newsocket = socket (PF_INET, SOCK_DGRAM, IPPROTO_UDP)) == -1)
133                 return -1;
134
135         if (ioctl (newsocket, FIONBIO, (char *)&_true) == -1)
136                 goto ErrorReturn;
137
138         address.sin_family = AF_INET;
139         address.sin_addr.s_addr = INADDR_ANY;
140         address.sin_port = htons(port);
141         if( bind (newsocket, (void *)&address, sizeof(address)) == -1)
142                 goto ErrorReturn;
143
144         return newsocket;
145
146 ErrorReturn:
147         close (newsocket);
148         return -1;
149 }
150
151 //=============================================================================
152
153 int UDP_CloseSocket (int socket)
154 {
155         if (socket == net_broadcastsocket)
156                 net_broadcastsocket = 0;
157         return close (socket);
158 }
159
160
161 //=============================================================================
162 /*
163 ============
164 PartialIPAddress
165
166 this lets you type only as much of the net address as required, using
167 the local network components to fill in the rest
168 ============
169 */
170 static int PartialIPAddress (const char *in, struct qsockaddr *hostaddr)
171 {
172         char buff[256];
173         char *b;
174         int addr;
175         int num;
176         int mask;
177         int run;
178         int port;
179         
180         buff[0] = '.';
181         b = buff;
182         strcpy(buff+1, in);
183         if (buff[1] == '.')
184                 b++;
185
186         addr = 0;
187         mask=-1;
188         while (*b == '.')
189         {
190                 b++;
191                 num = 0;
192                 run = 0;
193                 while (!( *b < '0' || *b > '9'))
194                 {
195                   num = num*10 + *b++ - '0';
196                   if (++run > 3)
197                         return -1;
198                 }
199                 if ((*b < '0' || *b > '9') && *b != '.' && *b != ':' && *b != 0)
200                         return -1;
201                 if (num < 0 || num > 255)
202                         return -1;
203                 mask<<=8;
204                 addr = (addr<<8) + num;
205         }
206         
207         if (*b++ == ':')
208                 port = atoi(b);
209         else
210                 port = net_hostport;
211
212         hostaddr->sa_family = AF_INET;
213         ((struct sockaddr_in *)hostaddr)->sin_port = htons((short)port);        
214         ((struct sockaddr_in *)hostaddr)->sin_addr.s_addr = (myAddr & htonl(mask)) | htonl(addr);
215         
216         return 0;
217 }
218 //=============================================================================
219
220 int UDP_Connect (int socket, struct qsockaddr *addr)
221 {
222         return 0;
223 }
224
225 //=============================================================================
226
227 int UDP_CheckNewConnections (void)
228 {
229         unsigned long   available;
230         struct sockaddr_in      from;
231         socklen_t                       fromlen;
232         char buff[1];
233
234         if (net_acceptsocket == -1)
235                 return -1;
236
237         if (ioctl (net_acceptsocket, FIONREAD, &available) == -1)
238                 Sys_Error ("UDP: ioctlsocket (FIONREAD) failed\n");
239         if (available)
240                 return net_acceptsocket;
241         recvfrom (net_acceptsocket, buff, 0, 0, (struct sockaddr *) &from, &fromlen);
242         return -1;
243 }
244
245 //=============================================================================
246
247 int UDP_Recv (qbyte *buf, int len, struct qsockaddr *addr)
248 {
249         return UDP_Read (net_acceptsocket, buf, len, addr);
250 }
251
252 //=============================================================================
253
254 int UDP_Send (qbyte *buf, int len, struct qsockaddr *addr)
255 {
256         return UDP_Write (net_acceptsocket, buf, len, addr);
257 }
258
259 //=============================================================================
260
261 int UDP_Read (int socket, qbyte *buf, int len, struct qsockaddr *addr)
262 {
263         int addrlen = sizeof (struct qsockaddr);
264         int ret;
265
266         ret = recvfrom (socket, buf, len, 0, (struct sockaddr *)addr, &addrlen);
267         if (ret == -1 && (errno == EWOULDBLOCK || errno == ECONNREFUSED))
268                 return 0;
269         return ret;
270 }
271
272 //=============================================================================
273
274 int UDP_MakeSocketBroadcastCapable (int socket)
275 {
276         int                             i = 1;
277
278         // make this socket broadcast capable
279         if (setsockopt(socket, SOL_SOCKET, SO_BROADCAST, (char *)&i, sizeof(i)) < 0)
280                 return -1;
281         net_broadcastsocket = socket;
282
283         return 0;
284 }
285
286 //=============================================================================
287
288 int UDP_Broadcast (int socket, qbyte *buf, int len)
289 {
290         int ret;
291
292         if (socket != net_broadcastsocket)
293         {
294                 if (net_broadcastsocket != 0)
295                         Sys_Error("Attempted to use multiple broadcasts sockets\n");
296                 ret = UDP_MakeSocketBroadcastCapable (socket);
297                 if (ret == -1)
298                 {
299                         Con_Printf("Unable to make socket broadcast capable\n");
300                         return ret;
301                 }
302         }
303
304         return UDP_Write (socket, buf, len, &broadcastaddr);
305 }
306
307 //=============================================================================
308
309 int UDP_Write (int socket, qbyte *buf, int len, struct qsockaddr *addr)
310 {
311         int ret;
312
313         ret = sendto (socket, buf, len, 0, (struct sockaddr *)addr, sizeof(struct qsockaddr));
314         if (ret == -1 && errno == EWOULDBLOCK)
315                 return 0;
316         return ret;
317 }
318
319 //=============================================================================
320
321 char *UDP_AddrToString (const struct qsockaddr *addr)
322 {
323         static char buffer[22];
324         int haddr;
325
326         haddr = ntohl(((struct sockaddr_in *)addr)->sin_addr.s_addr);
327         sprintf(buffer, "%d.%d.%d.%d:%d", (haddr >> 24) & 0xff, (haddr >> 16) & 0xff, (haddr >> 8) & 0xff, haddr & 0xff, ntohs(((struct sockaddr_in *)addr)->sin_port));
328         return buffer;
329 }
330
331 //=============================================================================
332
333 int UDP_StringToAddr (const char *string, struct qsockaddr *addr)
334 {
335         int ha1, ha2, ha3, ha4, hp;
336         int ipaddr;
337
338         sscanf(string, "%d.%d.%d.%d:%d", &ha1, &ha2, &ha3, &ha4, &hp);
339         ipaddr = (ha1 << 24) | (ha2 << 16) | (ha3 << 8) | ha4;
340
341         addr->sa_family = AF_INET;
342         ((struct sockaddr_in *)addr)->sin_addr.s_addr = htonl(ipaddr);
343         ((struct sockaddr_in *)addr)->sin_port = htons(hp);
344         return 0;
345 }
346
347 //=============================================================================
348
349 unsigned long inet_addr(const char *cp);
350 int UDP_GetSocketAddr (int socket, struct qsockaddr *addr)
351 {
352         int addrlen = sizeof(struct qsockaddr);
353         unsigned int a;
354
355         memset(addr, 0, sizeof(struct qsockaddr));
356         getsockname(socket, (struct sockaddr *)addr, &addrlen);
357         a = ((struct sockaddr_in *)addr)->sin_addr.s_addr;
358         if (a == 0 || a == inet_addr("127.0.0.1"))
359                 ((struct sockaddr_in *)addr)->sin_addr.s_addr = myAddr;
360
361         return 0;
362 }
363
364 //=============================================================================
365
366 int UDP_GetNameFromAddr (const struct qsockaddr *addr, char *name)
367 {
368         struct hostent *hostentry;
369
370         hostentry = gethostbyaddr ((char *)&((struct sockaddr_in *)addr)->sin_addr, sizeof(struct in_addr), AF_INET);
371         if (hostentry)
372         {
373                 strncpy (name, (char *)hostentry->h_name, NET_NAMELEN - 1);
374                 return 0;
375         }
376
377         strcpy (name, UDP_AddrToString (addr));
378         return 0;
379 }
380
381 //=============================================================================
382
383 int UDP_GetAddrFromName(const char *name, struct qsockaddr *addr)
384 {
385         struct hostent *hostentry;
386
387         if (name[0] >= '0' && name[0] <= '9')
388                 return PartialIPAddress (name, addr);
389         
390         hostentry = gethostbyname (name);
391         if (!hostentry)
392                 return -1;
393
394         addr->sa_family = AF_INET;
395         ((struct sockaddr_in *)addr)->sin_port = htons(net_hostport);   
396         ((struct sockaddr_in *)addr)->sin_addr.s_addr = *(int *)hostentry->h_addr_list[0];
397
398         return 0;
399 }
400
401 //=============================================================================
402
403 int UDP_AddrCompare (const struct qsockaddr *addr1, const struct qsockaddr *addr2)
404 {
405         if (addr1->sa_family != addr2->sa_family)
406                 return -1;
407
408         if (((struct sockaddr_in *)addr1)->sin_addr.s_addr != ((struct sockaddr_in *)addr2)->sin_addr.s_addr)
409                 return -1;
410
411         if (((struct sockaddr_in *)addr1)->sin_port != ((struct sockaddr_in *)addr2)->sin_port)
412                 return 1;
413
414         return 0;
415 }
416
417 //=============================================================================
418
419 int UDP_GetSocketPort (struct qsockaddr *addr)
420 {
421         return ntohs(((struct sockaddr_in *)addr)->sin_port);
422 }
423
424
425 int UDP_SetSocketPort (struct qsockaddr *addr, int port)
426 {
427         ((struct sockaddr_in *)addr)->sin_port = htons(port);
428         return 0;
429 }
430