]> git.saurik.com Git - wxWidgets.git/blob - src/unix/gsocket.cpp
projects / wxWidgets.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
enable wxFontMapper in wxDFB port
[wxWidgets.git] / src / unix / gsocket.cpp
1 /* -------------------------------------------------------------------------
2 * Project: GSocket (Generic Socket) for WX
3 * Name: gsocket.c
4 * Copyright: (c) Guilhem Lavaux
5 * Licence: wxWindows Licence
6 * Authors: David Elliott (C++ conversion, maintainer)
7 * Guilhem Lavaux,
8 * Guillermo Rodriguez Garcia <guille@iies.es>
9 * Purpose: GSocket main Unix and OS/2 file
10 * Licence: The wxWindows licence
11 * CVSID: $Id$
12 * -------------------------------------------------------------------------
13 */
14
15 #if defined(__WATCOMC__)
16 #include "wx/wxprec.h"
17 #include <errno.h>
18 #include <nerrno.h>
19 #endif
20
21 #ifndef __GSOCKET_STANDALONE__
22 #include "wx/defs.h"
23 #endif
24
25 #if defined(__VISAGECPP__)
26 #define BSD_SELECT /* use Berkeley Sockets select */
27 #endif
28
29 #if wxUSE_SOCKETS || defined(__GSOCKET_STANDALONE__)
30
31 #include <assert.h>
32 #include <sys/types.h>
33 #ifdef __VISAGECPP__
34 #include <string.h>
35 #include <sys/time.h>
36 #include <types.h>
37 #include <netinet/in.h>
38 #endif
39 #include <netdb.h>
40 #include <sys/ioctl.h>
41
42 #ifdef HAVE_SYS_SELECT_H
43 # include <sys/select.h>
44 #endif
45
46 #ifdef __VMS__
47 #include <socket.h>
48 struct sockaddr_un
49 {
50 u_char sun_len; /* sockaddr len including null */
51 u_char sun_family; /* AF_UNIX */
52 char sun_path[108]; /* path name (gag) */
53 };
54 #else
55 #include <sys/socket.h>
56 #include <sys/un.h>
57 #endif
58
59 #ifndef __VISAGECPP__
60 #include <sys/time.h>
61 #include <netinet/in.h>
62 #include <arpa/inet.h>
63 #include <errno.h>
64 #include <string.h>
65 #include <unistd.h>
66 #else
67 #include <nerrno.h>
68 # if __IBMCPP__ < 400
69 #include <machine/endian.h>
70 #include <socket.h>
71 #include <ioctl.h>
72 #include <select.h>
73 #include <unistd.h>
74
75 #define EBADF SOCEBADF
76
77 # ifdef min
78 # undef min
79 # endif
80 # else
81 #include <sys/socket.h>
82 #include <sys/ioctl.h>
83 #include <sys/select.h>
84
85 #define close(a) soclose(a)
86 #define select(a,b,c,d,e) bsdselect(a,b,c,d,e)
87 int _System bsdselect(int,
88 struct fd_set *,
89 struct fd_set *,
90 struct fd_set *,
91 struct timeval *);
92 int _System soclose(int);
93 # endif
94 #endif
95 #ifdef __EMX__
96 #include <sys/select.h>
97 #endif
98
99 #include <stdio.h>
100 #include <stdlib.h>
101 #include <stddef.h>
102 #include <ctype.h>
103 #ifdef sun
104 # include <sys/filio.h>
105 #endif
106 #ifdef sgi
107 # include <bstring.h>
108 #endif
109 #ifdef _AIX
110 # include <strings.h>
111 #endif
112 #include <signal.h>
113
114 #ifndef WX_SOCKLEN_T
115
116 #ifdef VMS
117 # define WX_SOCKLEN_T unsigned int
118 #else
119 # ifdef __GLIBC__
120 # if __GLIBC__ == 2
121 # define WX_SOCKLEN_T socklen_t
122 # endif
123 # elif defined(__WXMAC__)
124 # define WX_SOCKLEN_T socklen_t
125 # else
126 # define WX_SOCKLEN_T int
127 # endif
128 #endif
129
130 #endif /* SOCKLEN_T */
131
132 #ifndef SOCKOPTLEN_T
133 #define SOCKOPTLEN_T WX_SOCKLEN_T
134 #endif
135
136 /*
137 * MSW defines this, Unices don't.
138 */
139 #ifndef INVALID_SOCKET
140 #define INVALID_SOCKET -1
141 #endif
142
143 /* UnixWare reportedly needs this for FIONBIO definition */
144 #ifdef __UNIXWARE__
145 #include <sys/filio.h>
146 #endif
147
148 /*
149 * INADDR_BROADCAST is identical to INADDR_NONE which is not defined
150 * on all systems. INADDR_BROADCAST should be fine to indicate an error.
151 */
152 #ifndef INADDR_NONE
153 #define INADDR_NONE INADDR_BROADCAST
154 #endif
155
156 #if defined(__VISAGECPP__) || defined(__WATCOMC__)
157
158 #define MASK_SIGNAL() {
159 #define UNMASK_SIGNAL() }
160
161 #else
162 extern "C" { typedef void (*wxSigHandler)(int); }
163
164 #define MASK_SIGNAL() \
165 { \
166 wxSigHandler old_handler = signal(SIGPIPE, SIG_IGN);
167
168 #define UNMASK_SIGNAL() \
169 signal(SIGPIPE, old_handler); \
170 }
171
172 #endif
173
174 /* If a SIGPIPE is issued by a socket call on a remotely closed socket,
175 the program will "crash" unless it explicitly handles the SIGPIPE.
176 By using MSG_NOSIGNAL, the SIGPIPE is suppressed. Later, we will
177 use SO_NOSIGPIPE (if available), the BSD equivalent. */
178 #ifdef MSG_NOSIGNAL
179 # define GSOCKET_MSG_NOSIGNAL MSG_NOSIGNAL
180 #else /* MSG_NOSIGNAL not available (FreeBSD including OS X) */
181 # define GSOCKET_MSG_NOSIGNAL 0
182 #endif /* MSG_NOSIGNAL */
183
184 #ifndef __GSOCKET_STANDALONE__
185 # include "wx/unix/gsockunx.h"
186 # include "wx/unix/private.h"
187 # include "wx/gsocket.h"
188 #if wxUSE_THREADS && (defined(HAVE_GETHOSTBYNAME) || defined(HAVE_GETSERVBYNAME))
189 # include "wx/thread.h"
190 #endif
191 #else
192 # include "gsockunx.h"
193 # include "gsocket.h"
194 # ifndef WXUNUSED
195 # define WXUNUSED(x)
196 # endif
197 #endif /* __GSOCKET_STANDALONE__ */
198
199 #if defined(HAVE_GETHOSTBYNAME)
200 static struct hostent * deepCopyHostent(struct hostent *h,
201 const struct hostent *he,
202 char *buffer, int size, int *err)
203 {
204 /* copy old structure */
205 memcpy(h, he, sizeof(struct hostent));
206
207 /* copy name */
208 int len = strlen(h->h_name);
209 if (len > size)
210 {
211 *err = ENOMEM;
212 return NULL;
213 }
214 memcpy(buffer, h->h_name, len);
215 buffer[len] = '\0';
216 h->h_name = buffer;
217
218 /* track position in the buffer */
219 int pos = len + 1;
220
221 /* reuse len to store address length */
222 len = h->h_length;
223
224 /* ensure pointer alignment */
225 unsigned int misalign = sizeof(char *) - pos%sizeof(char *);
226 if(misalign < sizeof(char *))
227 pos += misalign;
228
229 /* leave space for pointer list */
230 char **p = h->h_addr_list, **q;
231 char **h_addr_list = (char **)(buffer + pos);
232 while(*(p++) != 0)
233 pos += sizeof(char *);
234
235 /* copy addresses and fill new pointer list */
236 for (p = h->h_addr_list, q = h_addr_list; *p != 0; p++, q++)
237 {
238 if (size < pos + len)
239 {
240 *err = ENOMEM;
241 return NULL;
242 }
243 memcpy(buffer + pos, *p, len); /* copy content */
244 *q = buffer + pos; /* set copied pointer to copied content */
245 pos += len;
246 }
247 *++q = 0; /* null terminate the pointer list */
248 h->h_addr_list = h_addr_list; /* copy pointer to pointers */
249
250 /* ensure word alignment of pointers */
251 misalign = sizeof(char *) - pos%sizeof(char *);
252 if(misalign < sizeof(char *))
253 pos += misalign;
254
255 /* leave space for pointer list */
256 p = h->h_aliases;
257 char **h_aliases = (char **)(buffer + pos);
258 while(*(p++) != 0)
259 pos += sizeof(char *);
260
261 /* copy aliases and fill new pointer list */
262 for (p = h->h_aliases, q = h_aliases; *p != 0; p++, q++)
263 {
264 len = strlen(*p);
265 if (size <= pos + len)
266 {
267 *err = ENOMEM;
268 return NULL;
269 }
270 memcpy(buffer + pos, *p, len); /* copy content */
271 buffer[pos + len] = '\0';
272 *q = buffer + pos; /* set copied pointer to copied content */
273 pos += len + 1;
274 }
275 *++q = 0; /* null terminate the pointer list */
276 h->h_aliases = h_aliases; /* copy pointer to pointers */
277
278 return h;
279 }
280 #endif
281
282 #if defined(HAVE_GETHOSTBYNAME) && wxUSE_THREADS
283 static wxMutex nameLock;
284 #endif
285 struct hostent * wxGethostbyname_r(const char *hostname, struct hostent *h,
286 void *buffer, int size, int *err)
287
288 {
289 struct hostent *he = NULL;
290 *err = 0;
291 #if defined(HAVE_FUNC_GETHOSTBYNAME_R_6)
292 if (gethostbyname_r(hostname, h, (char*)buffer, size, &he, err))
293 he = NULL;
294 #elif defined(HAVE_FUNC_GETHOSTBYNAME_R_5)
295 he = gethostbyname_r(hostname, h, (char*)buffer, size, err);
296 #elif defined(HAVE_FUNC_GETHOSTBYNAME_R_3)
297 if (gethostbyname_r(hostname, h, (struct hostent_data*) buffer))
298 {
299 he = NULL;
300 *err = h_errno;
301 }
302 else
303 he = h;
304 #elif defined(HAVE_GETHOSTBYNAME)
305 #if wxUSE_THREADS
306 wxMutexLocker locker(nameLock);
307 #endif
308 he = gethostbyname(hostname);
309 if (!he)
310 *err = h_errno;
311 else
312 he = deepCopyHostent(h, he, (char*)buffer, size, err);
313 #endif
314 return he;
315 }
316
317 #if defined(HAVE_GETHOSTBYNAME) && wxUSE_THREADS
318 static wxMutex addrLock;
319 #endif
320 struct hostent * wxGethostbyaddr_r(const char *addr_buf, int buf_size,
321 int proto, struct hostent *h,
322 void *buffer, int size, int *err)
323 {
324 struct hostent *he = NULL;
325 *err = 0;
326 #if defined(HAVE_FUNC_GETHOSTBYNAME_R_6)
327 if (gethostbyaddr_r(addr_buf, buf_size, proto, h,
328 (char*)buffer, size, &he, err))
329 he = NULL;
330 #elif defined(HAVE_FUNC_GETHOSTBYNAME_R_5)
331 he = gethostbyaddr_r(addr_buf, buf_size, proto, h, (char*)buffer, size, err);
332 #elif defined(HAVE_FUNC_GETHOSTBYNAME_R_3)
333 if (gethostbyaddr_r(addr_buf, buf_size, proto, h,
334 (struct hostent_data*) buffer))
335 {
336 he = NULL;
337 *err = h_errno;
338 }
339 else
340 he = h;
341 #elif defined(HAVE_GETHOSTBYNAME)
342 #if wxUSE_THREADS
343 wxMutexLocker locker(addrLock);
344 #endif
345 he = gethostbyaddr(addr_buf, buf_size, proto);
346 if (!he)
347 *err = h_errno;
348 else
349 he = deepCopyHostent(h, he, (char*)buffer, size, err);
350 #endif
351 return he;
352 }
353
354 #if defined(HAVE_GETSERVBYNAME)
355 static struct servent * deepCopyServent(struct servent *s,
356 const struct servent *se,
357 char *buffer, int size)
358 {
359 /* copy plain old structure */
360 memcpy(s, se, sizeof(struct servent));
361
362 /* copy name */
363 int len = strlen(s->s_name);
364 if (len >= size)
365 {
366 return NULL;
367 }
368 memcpy(buffer, s->s_name, len);
369 buffer[len] = '\0';
370 s->s_name = buffer;
371
372 /* track position in the buffer */
373 int pos = len + 1;
374
375 /* copy protocol */
376 len = strlen(s->s_proto);
377 if (pos + len >= size)
378 {
379 return NULL;
380 }
381 memcpy(buffer + pos, s->s_proto, len);
382 buffer[pos + len] = '\0';
383 s->s_proto = buffer + pos;
384
385 /* track position in the buffer */
386 pos += len + 1;
387
388 /* ensure pointer alignment */
389 unsigned int misalign = sizeof(char *) - pos%sizeof(char *);
390 if(misalign < sizeof(char *))
391 pos += misalign;
392
393 /* leave space for pointer list */
394 char **p = s->s_aliases, **q;
395 char **s_aliases = (char **)(buffer + pos);
396 while(*(p++) != 0)
397 pos += sizeof(char *);
398
399 /* copy addresses and fill new pointer list */
400 for (p = s->s_aliases, q = s_aliases; *p != 0; p++, q++){
401 len = strlen(*p);
402 if (size <= pos + len)
403 {
404 return NULL;
405 }
406 memcpy(buffer + pos, *p, len); /* copy content */
407 buffer[pos + len] = '\0';
408 *q = buffer + pos; /* set copied pointer to copied content */
409 pos += len + 1;
410 }
411 *++q = 0; /* null terminate the pointer list */
412 s->s_aliases = s_aliases; /* copy pointer to pointers */
413 return s;
414 }
415 #endif
416
417 #if defined(HAVE_GETSERVBYNAME) && wxUSE_THREADS
418 static wxMutex servLock;
419 #endif
420 struct servent *wxGetservbyname_r(const char *port, const char *protocol,
421 struct servent *serv, void *buffer, int size)
422 {
423 struct servent *se = NULL;
424 #if defined(HAVE_FUNC_GETSERVBYNAME_R_6)
425 if (getservbyname_r(port, protocol, serv, (char*)buffer, size, &se))
426 se = NULL;
427 #elif defined(HAVE_FUNC_GETSERVBYNAME_R_5)
428 se = getservbyname_r(port, protocol, serv, (char*)buffer, size);
429 #elif defined(HAVE_FUNC_GETSERVBYNAME_R_4)
430 if (getservbyname_r(port, protocol, serv, (struct servent_data*) buffer))
431 se = NULL;
432 else
433 se = serv;
434 #elif defined(HAVE_GETSERVBYNAME)
435 #if wxUSE_THREADS
436 wxMutexLocker locker(servLock);
437 #endif
438 se = getservbyname(port, protocol);
439 if (se)
440 se = deepCopyServent(serv, se, (char*)buffer, size);
441 #endif
442 return se;
443 }
444
445 /* debugging helpers */
446 #ifdef __GSOCKET_DEBUG__
447 # define GSocket_Debug(args) printf args
448 #else
449 # define GSocket_Debug(args)
450 #endif /* __GSOCKET_DEBUG__ */
451
452 /* Table of GUI-related functions. We must call them indirectly because
453 * of wxBase and GUI separation: */
454
455 static GSocketGUIFunctionsTable *gs_gui_functions;
456
457 class GSocketGUIFunctionsTableNull: public GSocketGUIFunctionsTable
458 {
459 public:
460 virtual bool OnInit();
461 virtual void OnExit();
462 virtual bool CanUseEventLoop();
463 virtual bool Init_Socket(GSocket *socket);
464 virtual void Destroy_Socket(GSocket *socket);
465 virtual void Install_Callback(GSocket *socket, GSocketEvent event);
466 virtual void Uninstall_Callback(GSocket *socket, GSocketEvent event);
467 virtual void Enable_Events(GSocket *socket);
468 virtual void Disable_Events(GSocket *socket);
469 };
470
471 bool GSocketGUIFunctionsTableNull::OnInit()
472 { return true; }
473 void GSocketGUIFunctionsTableNull::OnExit()
474 {}
475 bool GSocketGUIFunctionsTableNull::CanUseEventLoop()
476 { return false; }
477 bool GSocketGUIFunctionsTableNull::Init_Socket(GSocket *WXUNUSED(socket))
478 { return true; }
479 void GSocketGUIFunctionsTableNull::Destroy_Socket(GSocket *WXUNUSED(socket))
480 {}
481 void GSocketGUIFunctionsTableNull::Install_Callback(GSocket *WXUNUSED(socket), GSocketEvent WXUNUSED(event))
482 {}
483 void GSocketGUIFunctionsTableNull::Uninstall_Callback(GSocket *WXUNUSED(socket), GSocketEvent WXUNUSED(event))
484 {}
485 void GSocketGUIFunctionsTableNull::Enable_Events(GSocket *WXUNUSED(socket))
486 {}
487 void GSocketGUIFunctionsTableNull::Disable_Events(GSocket *WXUNUSED(socket))
488 {}
489 /* Global initialisers */
490
491 void GSocket_SetGUIFunctions(GSocketGUIFunctionsTable *guifunc)
492 {
493 gs_gui_functions = guifunc;
494 }
495
496 int GSocket_Init(void)
497 {
498 if (!gs_gui_functions)
499 {
500 static GSocketGUIFunctionsTableNull table;
501 gs_gui_functions = &table;
502 }
503 if ( !gs_gui_functions->OnInit() )
504 return 0;
505 return 1;
506 }
507
508 void GSocket_Cleanup(void)
509 {
510 if (gs_gui_functions)
511 {
512 gs_gui_functions->OnExit();
513 }
514 }
515
516 /* Constructors / Destructors for GSocket */
517
518 GSocket::GSocket()
519 {
520 int i;
521
522 m_fd = INVALID_SOCKET;
523 for (i=0;i<GSOCK_MAX_EVENT;i++)
524 {
525 m_cbacks[i] = NULL;
526 }
527 m_detected = 0;
528 m_local = NULL;
529 m_peer = NULL;
530 m_error = GSOCK_NOERROR;
531 m_server = false;
532 m_stream = true;
533 m_gui_dependent = NULL;
534 m_non_blocking = false;
535 m_reusable = false;
536 m_timeout = 10*60*1000;
537 /* 10 minutes * 60 sec * 1000 millisec */
538 m_establishing = false;
539
540 assert(gs_gui_functions);
541 /* Per-socket GUI-specific initialization */
542 m_ok = gs_gui_functions->Init_Socket(this);
543 }
544
545 void GSocket::Close()
546 {
547 gs_gui_functions->Disable_Events(this);
548 /* gsockosx.c calls CFSocketInvalidate which closes the socket for us */
549 #if !(defined(__DARWIN__) && (defined(__WXMAC__) || defined(__WXCOCOA__)))
550 close(m_fd);
551 #endif
552 m_fd = INVALID_SOCKET;
553 }
554
555 GSocket::~GSocket()
556 {
557 assert(this);
558
559 /* Check that the socket is really shutdowned */
560 if (m_fd != INVALID_SOCKET)
561 Shutdown();
562
563 /* Per-socket GUI-specific cleanup */
564 gs_gui_functions->Destroy_Socket(this);
565
566 /* Destroy private addresses */
567 if (m_local)
568 GAddress_destroy(m_local);
569
570 if (m_peer)
571 GAddress_destroy(m_peer);
572 }
573
574 /* GSocket_Shutdown:
575 * Disallow further read/write operations on this socket, close
576 * the fd and disable all callbacks.
577 */
578 void GSocket::Shutdown()
579 {
580 int evt;
581
582 assert(this);
583
584 /* Don't allow events to fire after socket has been closed */
585 gs_gui_functions->Disable_Events(this);
586
587 /* If socket has been created, shutdown it */
588 if (m_fd != INVALID_SOCKET)
589 {
590 shutdown(m_fd, 2);
591 Close();
592 }
593
594 /* Disable GUI callbacks */
595 for (evt = 0; evt < GSOCK_MAX_EVENT; evt++)
596 m_cbacks[evt] = NULL;
597
598 m_detected = GSOCK_LOST_FLAG;
599 }
600
601 /* Address handling */
602
603 /* GSocket_SetLocal:
604 * GSocket_GetLocal:
605 * GSocket_SetPeer:
606 * GSocket_GetPeer:
607 * Set or get the local or peer address for this socket. The 'set'
608 * functions return GSOCK_NOERROR on success, an error code otherwise.
609 * The 'get' functions return a pointer to a GAddress object on success,
610 * or NULL otherwise, in which case they set the error code of the
611 * corresponding GSocket.
612 *
613 * Error codes:
614 * GSOCK_INVSOCK - the socket is not valid.
615 * GSOCK_INVADDR - the address is not valid.
616 */
617 GSocketError GSocket::SetLocal(GAddress *address)
618 {
619 assert(this);
620
621 /* the socket must be initialized, or it must be a server */
622 if ((m_fd != INVALID_SOCKET && !m_server))
623 {
624 m_error = GSOCK_INVSOCK;
625 return GSOCK_INVSOCK;
626 }
627
628 /* check address */
629 if (address == NULL || address->m_family == GSOCK_NOFAMILY)
630 {
631 m_error = GSOCK_INVADDR;
632 return GSOCK_INVADDR;
633 }
634
635 if (m_local)
636 GAddress_destroy(m_local);
637
638 m_local = GAddress_copy(address);
639
640 return GSOCK_NOERROR;
641 }
642
643 GSocketError GSocket::SetPeer(GAddress *address)
644 {
645 assert(this);
646
647 /* check address */
648 if (address == NULL || address->m_family == GSOCK_NOFAMILY)
649 {
650 m_error = GSOCK_INVADDR;
651 return GSOCK_INVADDR;
652 }
653
654 if (m_peer)
655 GAddress_destroy(m_peer);
656
657 m_peer = GAddress_copy(address);
658
659 return GSOCK_NOERROR;
660 }
661
662 GAddress *GSocket::GetLocal()
663 {
664 GAddress *address;
665 struct sockaddr addr;
666 WX_SOCKLEN_T size = sizeof(addr);
667 GSocketError err;
668
669 assert(this);
670
671 /* try to get it from the m_local var first */
672 if (m_local)
673 return GAddress_copy(m_local);
674
675 /* else, if the socket is initialized, try getsockname */
676 if (m_fd == INVALID_SOCKET)
677 {
678 m_error = GSOCK_INVSOCK;
679 return NULL;
680 }
681
682 if (getsockname(m_fd, &addr, (WX_SOCKLEN_T *) &size) < 0)
683 {
684 m_error = GSOCK_IOERR;
685 return NULL;
686 }
687
688 /* got a valid address from getsockname, create a GAddress object */
689 address = GAddress_new();
690 if (address == NULL)
691 {
692 m_error = GSOCK_MEMERR;
693 return NULL;
694 }
695
696 err = _GAddress_translate_from(address, &addr, size);
697 if (err != GSOCK_NOERROR)
698 {
699 GAddress_destroy(address);
700 m_error = err;
701 return NULL;
702 }
703
704 return address;
705 }
706
707 GAddress *GSocket::GetPeer()
708 {
709 assert(this);
710
711 /* try to get it from the m_peer var */
712 if (m_peer)
713 return GAddress_copy(m_peer);
714
715 return NULL;
716 }
717
718 /* Server specific parts */
719
720 /* GSocket_SetServer:
721 * Sets up this socket as a server. The local address must have been
722 * set with GSocket_SetLocal() before GSocket_SetServer() is called.
723 * Returns GSOCK_NOERROR on success, one of the following otherwise:
724 *
725 * Error codes:
726 * GSOCK_INVSOCK - the socket is in use.
727 * GSOCK_INVADDR - the local address has not been set.
728 * GSOCK_IOERR - low-level error.
729 */
730 GSocketError GSocket::SetServer()
731 {
732 int arg = 1;
733
734 assert(this);
735
736 /* must not be in use */
737 if (m_fd != INVALID_SOCKET)
738 {
739 m_error = GSOCK_INVSOCK;
740 return GSOCK_INVSOCK;
741 }
742
743 /* the local addr must have been set */
744 if (!m_local)
745 {
746 m_error = GSOCK_INVADDR;
747 return GSOCK_INVADDR;
748 }
749
750 /* Initialize all fields */
751 m_stream = true;
752 m_server = true;
753
754 /* Create the socket */
755 m_fd = socket(m_local->m_realfamily, SOCK_STREAM, 0);
756
757 if (m_fd == INVALID_SOCKET)
758 {
759 m_error = GSOCK_IOERR;
760 return GSOCK_IOERR;
761 }
762
763 /* FreeBSD variants can't use MSG_NOSIGNAL, and instead use a socket option */
764 #ifdef SO_NOSIGPIPE
765 setsockopt(m_fd, SOL_SOCKET, SO_NOSIGPIPE, (const char*)&arg, sizeof(u_long));
766 #endif
767
768 ioctl(m_fd, FIONBIO, &arg);
769 gs_gui_functions->Enable_Events(this);
770
771 /* allow a socket to re-bind if the socket is in the TIME_WAIT
772 state after being previously closed.
773 */
774 if (m_reusable)
775 {
776 setsockopt(m_fd, SOL_SOCKET, SO_REUSEADDR, (const char*)&arg, sizeof(u_long));
777 #ifdef SO_REUSEPORT
778 setsockopt(m_fd, SOL_SOCKET, SO_REUSEPORT, (const char*)&arg, sizeof(u_long));
779 #endif
780 }
781
782 /* Bind to the local address,
783 * retrieve the actual address bound,
784 * and listen up to 5 connections.
785 */
786 if ((bind(m_fd, m_local->m_addr, m_local->m_len) != 0) ||
787 (getsockname(m_fd,
788 m_local->m_addr,
789 (WX_SOCKLEN_T *) &m_local->m_len) != 0) ||
790 (listen(m_fd, 5) != 0))
791 {
792 Close();
793 m_error = GSOCK_IOERR;
794 return GSOCK_IOERR;
795 }
796
797 return GSOCK_NOERROR;
798 }
799
800 /* GSocket_WaitConnection:
801 * Waits for an incoming client connection. Returns a pointer to
802 * a GSocket object, or NULL if there was an error, in which case
803 * the last error field will be updated for the calling GSocket.
804 *
805 * Error codes (set in the calling GSocket)
806 * GSOCK_INVSOCK - the socket is not valid or not a server.
807 * GSOCK_TIMEDOUT - timeout, no incoming connections.
808 * GSOCK_WOULDBLOCK - the call would block and the socket is nonblocking.
809 * GSOCK_MEMERR - couldn't allocate memory.
810 * GSOCK_IOERR - low-level error.
811 */
812 GSocket *GSocket::WaitConnection()
813 {
814 struct sockaddr from;
815 WX_SOCKLEN_T fromlen = sizeof(from);
816 GSocket *connection;
817 GSocketError err;
818 int arg = 1;
819
820 assert(this);
821
822 /* If the socket has already been created, we exit immediately */
823 if (m_fd == INVALID_SOCKET || !m_server)
824 {
825 m_error = GSOCK_INVSOCK;
826 return NULL;
827 }
828
829 /* Create a GSocket object for the new connection */
830 connection = GSocket_new();
831
832 if (!connection)
833 {
834 m_error = GSOCK_MEMERR;
835 return NULL;
836 }
837
838 /* Wait for a connection (with timeout) */
839 if (Input_Timeout() == GSOCK_TIMEDOUT)
840 {
841 delete connection;
842 /* m_error set by _GSocket_Input_Timeout */
843 return NULL;
844 }
845
846 connection->m_fd = accept(m_fd, &from, (WX_SOCKLEN_T *) &fromlen);
847
848 /* Reenable CONNECTION events */
849 Enable(GSOCK_CONNECTION);
850
851 if (connection->m_fd == INVALID_SOCKET)
852 {
853 if (errno == EWOULDBLOCK)
854 m_error = GSOCK_WOULDBLOCK;
855 else
856 m_error = GSOCK_IOERR;
857
858 delete connection;
859 return NULL;
860 }
861
862 /* Initialize all fields */
863 connection->m_server = false;
864 connection->m_stream = true;
865
866 /* Setup the peer address field */
867 connection->m_peer = GAddress_new();
868 if (!connection->m_peer)
869 {
870 delete connection;
871 m_error = GSOCK_MEMERR;
872 return NULL;
873 }
874
875 err = _GAddress_translate_from(connection->m_peer, &from, fromlen);
876 if (err != GSOCK_NOERROR)
877 {
878 delete connection;
879 m_error = err;
880 return NULL;
881 }
882
883 #if defined(__EMX__) || defined(__VISAGECPP__)
884 ioctl(connection->m_fd, FIONBIO, (char*)&arg, sizeof(arg));
885 #else
886 ioctl(connection->m_fd, FIONBIO, &arg);
887 #endif
888 gs_gui_functions->Enable_Events(connection);
889
890 return connection;
891 }
892
893 bool GSocket::SetReusable()
894 {
895 /* socket must not be null, and must not be in use/already bound */
896 if (this && m_fd == INVALID_SOCKET)
897 {
898 m_reusable = true;
899
900 return true;
901 }
902
903 return false;
904 }
905
906 /* Client specific parts */
907
908 /* GSocket_Connect:
909 * For stream (connection oriented) sockets, GSocket_Connect() tries
910 * to establish a client connection to a server using the peer address
911 * as established with GSocket_SetPeer(). Returns GSOCK_NOERROR if the
912 * connection has been successfully established, or one of the error
913 * codes listed below. Note that for nonblocking sockets, a return
914 * value of GSOCK_WOULDBLOCK doesn't mean a failure. The connection
915 * request can be completed later; you should use GSocket_Select()
916 * to poll for GSOCK_CONNECTION | GSOCK_LOST, or wait for the
917 * corresponding asynchronous events.
918 *
919 * For datagram (non connection oriented) sockets, GSocket_Connect()
920 * just sets the peer address established with GSocket_SetPeer() as
921 * default destination.
922 *
923 * Error codes:
924 * GSOCK_INVSOCK - the socket is in use or not valid.
925 * GSOCK_INVADDR - the peer address has not been established.
926 * GSOCK_TIMEDOUT - timeout, the connection failed.
927 * GSOCK_WOULDBLOCK - connection in progress (nonblocking sockets only)
928 * GSOCK_MEMERR - couldn't allocate memory.
929 * GSOCK_IOERR - low-level error.
930 */
931 GSocketError GSocket::Connect(GSocketStream stream)
932 {
933 int err, ret;
934 int arg = 1;
935
936 assert(this);
937
938 /* Enable CONNECTION events (needed for nonblocking connections) */
939 Enable(GSOCK_CONNECTION);
940
941 if (m_fd != INVALID_SOCKET)
942 {
943 m_error = GSOCK_INVSOCK;
944 return GSOCK_INVSOCK;
945 }
946
947 if (!m_peer)
948 {
949 m_error = GSOCK_INVADDR;
950 return GSOCK_INVADDR;
951 }
952
953 /* Streamed or dgram socket? */
954 m_stream = (stream == GSOCK_STREAMED);
955 m_server = false;
956 m_establishing = false;
957
958 /* Create the socket */
959 m_fd = socket(m_peer->m_realfamily,
960 m_stream? SOCK_STREAM : SOCK_DGRAM, 0);
961
962 if (m_fd == INVALID_SOCKET)
963 {
964 m_error = GSOCK_IOERR;
965 return GSOCK_IOERR;
966 }
967
968 /* FreeBSD variants can't use MSG_NOSIGNAL, and instead use a socket option */
969 #ifdef SO_NOSIGPIPE
970 setsockopt(m_fd, SOL_SOCKET, SO_NOSIGPIPE, (const char*)&arg, sizeof(u_long));
971 #endif
972
973 #if defined(__EMX__) || defined(__VISAGECPP__)
974 ioctl(m_fd, FIONBIO, (char*)&arg, sizeof(arg));
975 #else
976 ioctl(m_fd, FIONBIO, &arg);
977 #endif
978
979 // If the reuse flag is set, use the applicable socket reuse flags(s)
980 if (m_reusable)
981 {
982 setsockopt(m_fd, SOL_SOCKET, SO_REUSEADDR, (const char*)&arg, sizeof(u_long));
983 #ifdef SO_REUSEPORT
984 setsockopt(m_fd, SOL_SOCKET, SO_REUSEPORT, (const char*)&arg, sizeof(u_long));
985 #endif
986 }
987
988 // If a local address has been set, then we need to bind to it before calling connect
989 if (m_local && m_local->m_addr)
990 {
991 bind(m_fd, m_local->m_addr, m_local->m_len);
992 }
993
994 /* Connect it to the peer address, with a timeout (see below) */
995 ret = connect(m_fd, m_peer->m_addr, m_peer->m_len);
996
997 /* We only call Enable_Events if we know we aren't shutting down the socket.
998 * NB: Enable_Events needs to be called whether the socket is blocking or
999 * non-blocking, it just shouldn't be called prior to knowing there is a
1000 * connection _if_ blocking sockets are being used.
1001 * If connect above returns 0, we are already connected and need to make the
1002 * call to Enable_Events now.
1003 */
1004
1005 if (m_non_blocking || ret == 0)
1006 gs_gui_functions->Enable_Events(this);
1007
1008 if (ret == -1)
1009 {
1010 err = errno;
1011
1012 /* If connect failed with EINPROGRESS and the GSocket object
1013 * is in blocking mode, we select() for the specified timeout
1014 * checking for writability to see if the connection request
1015 * completes.
1016 */
1017 if ((err == EINPROGRESS) && (!m_non_blocking))
1018 {
1019 if (Output_Timeout() == GSOCK_TIMEDOUT)
1020 {
1021 Close();
1022 /* m_error is set in _GSocket_Output_Timeout */
1023 return GSOCK_TIMEDOUT;
1024 }
1025 else
1026 {
1027 int error;
1028 SOCKOPTLEN_T len = sizeof(error);
1029
1030 getsockopt(m_fd, SOL_SOCKET, SO_ERROR, (char*) &error, &len);
1031
1032 gs_gui_functions->Enable_Events(this);
1033
1034 if (!error)
1035 return GSOCK_NOERROR;
1036 }
1037 }
1038
1039 /* If connect failed with EINPROGRESS and the GSocket object
1040 * is set to nonblocking, we set m_error to GSOCK_WOULDBLOCK
1041 * (and return GSOCK_WOULDBLOCK) but we don't close the socket;
1042 * this way if the connection completes, a GSOCK_CONNECTION
1043 * event will be generated, if enabled.
1044 */
1045 if ((err == EINPROGRESS) && (m_non_blocking))
1046 {
1047 m_establishing = true;
1048 m_error = GSOCK_WOULDBLOCK;
1049 return GSOCK_WOULDBLOCK;
1050 }
1051
1052 /* If connect failed with an error other than EINPROGRESS,
1053 * then the call to GSocket_Connect has failed.
1054 */
1055 Close();
1056 m_error = GSOCK_IOERR;
1057
1058 return GSOCK_IOERR;
1059 }
1060
1061 return GSOCK_NOERROR;
1062 }
1063
1064 /* Datagram sockets */
1065
1066 /* GSocket_SetNonOriented:
1067 * Sets up this socket as a non-connection oriented (datagram) socket.
1068 * Before using this function, the local address must have been set
1069 * with GSocket_SetLocal(), or the call will fail. Returns GSOCK_NOERROR
1070 * on success, or one of the following otherwise.
1071 *
1072 * Error codes:
1073 * GSOCK_INVSOCK - the socket is in use.
1074 * GSOCK_INVADDR - the local address has not been set.
1075 * GSOCK_IOERR - low-level error.
1076 */
1077 GSocketError GSocket::SetNonOriented()
1078 {
1079 int arg = 1;
1080
1081 assert(this);
1082
1083 if (m_fd != INVALID_SOCKET)
1084 {
1085 m_error = GSOCK_INVSOCK;
1086 return GSOCK_INVSOCK;
1087 }
1088
1089 if (!m_local)
1090 {
1091 m_error = GSOCK_INVADDR;
1092 return GSOCK_INVADDR;
1093 }
1094
1095 /* Initialize all fields */
1096 m_stream = false;
1097 m_server = false;
1098
1099 /* Create the socket */
1100 m_fd = socket(m_local->m_realfamily, SOCK_DGRAM, 0);
1101
1102 if (m_fd == INVALID_SOCKET)
1103 {
1104 m_error = GSOCK_IOERR;
1105 return GSOCK_IOERR;
1106 }
1107 #if defined(__EMX__) || defined(__VISAGECPP__)
1108 ioctl(m_fd, FIONBIO, (char*)&arg, sizeof(arg));
1109 #else
1110 ioctl(m_fd, FIONBIO, &arg);
1111 #endif
1112 gs_gui_functions->Enable_Events(this);
1113
1114 /* Bind to the local address,
1115 * and retrieve the actual address bound.
1116 */
1117 if ((bind(m_fd, m_local->m_addr, m_local->m_len) != 0) ||
1118 (getsockname(m_fd,
1119 m_local->m_addr,
1120 (WX_SOCKLEN_T *) &m_local->m_len) != 0))
1121 {
1122 Close();
1123 m_error = GSOCK_IOERR;
1124 return GSOCK_IOERR;
1125 }
1126
1127 return GSOCK_NOERROR;
1128 }
1129
1130 /* Generic IO */
1131
1132 /* Like recv(), send(), ... */
1133 int GSocket::Read(char *buffer, int size)
1134 {
1135 int ret;
1136
1137 assert(this);
1138
1139 if (m_fd == INVALID_SOCKET || m_server)
1140 {
1141 m_error = GSOCK_INVSOCK;
1142 return -1;
1143 }
1144
1145 /* Disable events during query of socket status */
1146 Disable(GSOCK_INPUT);
1147
1148 /* If the socket is blocking, wait for data (with a timeout) */
1149 if (Input_Timeout() == GSOCK_TIMEDOUT) {
1150 m_error = GSOCK_TIMEDOUT;
1151 /* Don't return here immediately, otherwise socket events would not be
1152 * re-enabled! */
1153 ret = -1;
1154 }
1155 else
1156 {
1157 /* Read the data */
1158 if (m_stream)
1159 ret = Recv_Stream(buffer, size);
1160 else
1161 ret = Recv_Dgram(buffer, size);
1162
1163 /* If recv returned zero, then the connection is lost, and errno is not set.
1164 * Otherwise, recv has returned an error (-1), in which case we have lost the
1165 * socket only if errno does _not_ indicate that there may be more data to read.
1166 */
1167 if (ret == 0)
1168 {
1169 m_error = GSOCK_IOERR;
1170 m_detected = GSOCK_LOST_FLAG;
1171 Close();
1172 // Signal an error for return
1173 return -1;
1174 }
1175 else if (ret == -1)
1176 {
1177 if ((errno == EWOULDBLOCK) || (errno == EAGAIN))
1178 m_error = GSOCK_WOULDBLOCK;
1179 else
1180 m_error = GSOCK_IOERR;
1181 }
1182 }
1183
1184 /* Enable events again now that we are done processing */
1185 Enable(GSOCK_INPUT);
1186
1187 return ret;
1188 }
1189
1190 int GSocket::Write(const char *buffer, int size)
1191 {
1192 int ret;
1193
1194 assert(this);
1195
1196 GSocket_Debug(( "GSocket_Write #1, size %d\n", size ));
1197
1198 if (m_fd == INVALID_SOCKET || m_server)
1199 {
1200 m_error = GSOCK_INVSOCK;
1201 return -1;
1202 }
1203
1204 GSocket_Debug(( "GSocket_Write #2, size %d\n", size ));
1205
1206 /* If the socket is blocking, wait for writability (with a timeout) */
1207 if (Output_Timeout() == GSOCK_TIMEDOUT)
1208 return -1;
1209
1210 GSocket_Debug(( "GSocket_Write #3, size %d\n", size ));
1211
1212 /* Write the data */
1213 if (m_stream)
1214 ret = Send_Stream(buffer, size);
1215 else
1216 ret = Send_Dgram(buffer, size);
1217
1218 GSocket_Debug(( "GSocket_Write #4, size %d\n", size ));
1219
1220 if (ret == -1)
1221 {
1222 if ((errno == EWOULDBLOCK) || (errno == EAGAIN))
1223 {
1224 m_error = GSOCK_WOULDBLOCK;
1225 GSocket_Debug(( "GSocket_Write error WOULDBLOCK\n" ));
1226 }
1227 else
1228 {
1229 m_error = GSOCK_IOERR;
1230 GSocket_Debug(( "GSocket_Write error IOERR\n" ));
1231 }
1232
1233 /* Only reenable OUTPUT events after an error (just like WSAAsyncSelect
1234 * in MSW). Once the first OUTPUT event is received, users can assume
1235 * that the socket is writable until a read operation fails. Only then
1236 * will further OUTPUT events be posted.
1237 */
1238 Enable(GSOCK_OUTPUT);
1239
1240 return -1;
1241 }
1242
1243 GSocket_Debug(( "GSocket_Write #5, size %d ret %d\n", size, ret ));
1244
1245 return ret;
1246 }
1247
1248 /* GSocket_Select:
1249 * Polls the socket to determine its status. This function will
1250 * check for the events specified in the 'flags' parameter, and
1251 * it will return a mask indicating which operations can be
1252 * performed. This function won't block, regardless of the
1253 * mode (blocking | nonblocking) of the socket.
1254 */
1255 GSocketEventFlags GSocket::Select(GSocketEventFlags flags)
1256 {
1257 if (!gs_gui_functions->CanUseEventLoop())
1258 {
1259
1260 GSocketEventFlags result = 0;
1261 fd_set readfds;
1262 fd_set writefds;
1263 fd_set exceptfds;
1264 struct timeval tv;
1265
1266 assert(this);
1267
1268 if (m_fd == -1)
1269 return (GSOCK_LOST_FLAG & flags);
1270
1271 /* Do not use a static struct, Linux can garble it */
1272 tv.tv_sec = m_timeout / 1000;
1273 tv.tv_usec = (m_timeout % 1000) * 1000;
1274
1275 wxFD_ZERO(&readfds);
1276 wxFD_ZERO(&writefds);
1277 wxFD_ZERO(&exceptfds);
1278 wxFD_SET(m_fd, &readfds);
1279 if (flags & GSOCK_OUTPUT_FLAG || flags & GSOCK_CONNECTION_FLAG)
1280 wxFD_SET(m_fd, &writefds);
1281 wxFD_SET(m_fd, &exceptfds);
1282
1283 /* Check 'sticky' CONNECTION flag first */
1284 result |= (GSOCK_CONNECTION_FLAG & m_detected);
1285
1286 /* If we have already detected a LOST event, then don't try
1287 * to do any further processing.
1288 */
1289 if ((m_detected & GSOCK_LOST_FLAG) != 0)
1290 {
1291 m_establishing = false;
1292
1293 return (GSOCK_LOST_FLAG & flags);
1294 }
1295
1296 /* Try select now */
1297 if (select(m_fd + 1, &readfds, &writefds, &exceptfds, &tv) <= 0)
1298 {
1299 /* What to do here? */
1300 return (result & flags);
1301 }
1302
1303 /* Check for exceptions and errors */
1304 if (wxFD_ISSET(m_fd, &exceptfds))
1305 {
1306 m_establishing = false;
1307 m_detected = GSOCK_LOST_FLAG;
1308
1309 /* LOST event: Abort any further processing */
1310 return (GSOCK_LOST_FLAG & flags);
1311 }
1312
1313 /* Check for readability */
1314 if (wxFD_ISSET(m_fd, &readfds))
1315 {
1316 result |= GSOCK_INPUT_FLAG;
1317
1318 if (m_server && m_stream)
1319 {
1320 /* This is a TCP server socket that detected a connection.
1321 While the INPUT_FLAG is also set, it doesn't matter on
1322 this kind of sockets, as we can only Accept() from them. */
1323 result |= GSOCK_CONNECTION_FLAG;
1324 m_detected |= GSOCK_CONNECTION_FLAG;
1325 }
1326 }
1327
1328 /* Check for writability */
1329 if (wxFD_ISSET(m_fd, &writefds))
1330 {
1331 if (m_establishing && !m_server)
1332 {
1333 int error;
1334 SOCKOPTLEN_T len = sizeof(error);
1335
1336 m_establishing = false;
1337
1338 getsockopt(m_fd, SOL_SOCKET, SO_ERROR, (char*)&error, &len);
1339
1340 if (error)
1341 {
1342 m_detected = GSOCK_LOST_FLAG;
1343
1344 /* LOST event: Abort any further processing */
1345 return (GSOCK_LOST_FLAG & flags);
1346 }
1347 else
1348 {
1349 result |= GSOCK_CONNECTION_FLAG;
1350 m_detected |= GSOCK_CONNECTION_FLAG;
1351 }
1352 }
1353 else
1354 {
1355 result |= GSOCK_OUTPUT_FLAG;
1356 }
1357 }
1358
1359 return (result & flags);
1360
1361 }
1362 else
1363 {
1364 assert(this);
1365 return flags & m_detected;
1366 }
1367 }
1368
1369 /* Flags */
1370
1371 /* GSocket_SetNonBlocking:
1372 * Sets the socket to non-blocking mode. All IO calls will return
1373 * immediately.
1374 */
1375 void GSocket::SetNonBlocking(bool non_block)
1376 {
1377 assert(this);
1378
1379 GSocket_Debug( ("GSocket_SetNonBlocking: %d\n", (int)non_block) );
1380
1381 m_non_blocking = non_block;
1382 }
1383
1384 /* GSocket_SetTimeout:
1385 * Sets the timeout for blocking calls. Time is expressed in
1386 * milliseconds.
1387 */
1388 void GSocket::SetTimeout(unsigned long millisec)
1389 {
1390 assert(this);
1391
1392 m_timeout = millisec;
1393 }
1394
1395 /* GSocket_GetError:
1396 * Returns the last error occurred for this socket. Note that successful
1397 * operations do not clear this back to GSOCK_NOERROR, so use it only
1398 * after an error.
1399 */
1400 GSocketError WXDLLIMPEXP_NET GSocket::GetError()
1401 {
1402 assert(this);
1403
1404 return m_error;
1405 }
1406
1407 /* Callbacks */
1408
1409 /* GSOCK_INPUT:
1410 * There is data to be read in the input buffer. If, after a read
1411 * operation, there is still data available, the callback function will
1412 * be called again.
1413 * GSOCK_OUTPUT:
1414 * The socket is available for writing. That is, the next write call
1415 * won't block. This event is generated only once, when the connection is
1416 * first established, and then only if a call failed with GSOCK_WOULDBLOCK,
1417 * when the output buffer empties again. This means that the app should
1418 * assume that it can write since the first OUTPUT event, and no more
1419 * OUTPUT events will be generated unless an error occurs.
1420 * GSOCK_CONNECTION:
1421 * Connection successfully established, for client sockets, or incoming
1422 * client connection, for server sockets. Wait for this event (also watch
1423 * out for GSOCK_LOST) after you issue a nonblocking GSocket_Connect() call.
1424 * GSOCK_LOST:
1425 * The connection is lost (or a connection request failed); this could
1426 * be due to a failure, or due to the peer closing it gracefully.
1427 */
1428
1429 /* GSocket_SetCallback:
1430 * Enables the callbacks specified by 'flags'. Note that 'flags'
1431 * may be a combination of flags OR'ed toghether, so the same
1432 * callback function can be made to accept different events.
1433 * The callback function must have the following prototype:
1434 *
1435 * void function(GSocket *socket, GSocketEvent event, char *cdata)
1436 */
1437 void GSocket::SetCallback(GSocketEventFlags flags,
1438 GSocketCallback callback, char *cdata)
1439 {
1440 int count;
1441
1442 assert(this);
1443
1444 for (count = 0; count < GSOCK_MAX_EVENT; count++)
1445 {
1446 if ((flags & (1 << count)) != 0)
1447 {
1448 m_cbacks[count] = callback;
1449 m_data[count] = cdata;
1450 }
1451 }
1452 }
1453
1454 /* GSocket_UnsetCallback:
1455 * Disables all callbacks specified by 'flags', which may be a
1456 * combination of flags OR'ed toghether.
1457 */
1458 void GSocket::UnsetCallback(GSocketEventFlags flags)
1459 {
1460 int count;
1461
1462 assert(this);
1463
1464 for (count = 0; count < GSOCK_MAX_EVENT; count++)
1465 {
1466 if ((flags & (1 << count)) != 0)
1467 {
1468 m_cbacks[count] = NULL;
1469 m_data[count] = NULL;
1470 }
1471 }
1472 }
1473
1474 GSocketError GSocket::GetSockOpt(int level, int optname,
1475 void *optval, int *optlen)
1476 {
1477 if (getsockopt(m_fd, level, optname, (char*)optval, (SOCKOPTLEN_T*)optlen) == 0)
1478 return GSOCK_NOERROR;
1479
1480 return GSOCK_OPTERR;
1481 }
1482
1483 GSocketError GSocket::SetSockOpt(int level, int optname,
1484 const void *optval, int optlen)
1485 {
1486 if (setsockopt(m_fd, level, optname, (const char*)optval, optlen) == 0)
1487 return GSOCK_NOERROR;
1488
1489 return GSOCK_OPTERR;
1490 }
1491
1492 #define CALL_CALLBACK(socket, event) { \
1493 socket->Disable(event); \
1494 if (socket->m_cbacks[event]) \
1495 socket->m_cbacks[event](socket, event, socket->m_data[event]); \
1496 }
1497
1498
1499 void GSocket::Enable(GSocketEvent event)
1500 {
1501 m_detected &= ~(1 << event);
1502 gs_gui_functions->Install_Callback(this, event);
1503 }
1504
1505 void GSocket::Disable(GSocketEvent event)
1506 {
1507 m_detected |= (1 << event);
1508 gs_gui_functions->Uninstall_Callback(this, event);
1509 }
1510
1511 /* _GSocket_Input_Timeout:
1512 * For blocking sockets, wait until data is available or
1513 * until timeout ellapses.
1514 */
1515 GSocketError GSocket::Input_Timeout()
1516 {
1517 struct timeval tv;
1518 fd_set readfds;
1519 int ret;
1520
1521 /* Linux select() will overwrite the struct on return */
1522 tv.tv_sec = (m_timeout / 1000);
1523 tv.tv_usec = (m_timeout % 1000) * 1000;
1524
1525 if (!m_non_blocking)
1526 {
1527 wxFD_ZERO(&readfds);
1528 wxFD_SET(m_fd, &readfds);
1529 ret = select(m_fd + 1, &readfds, NULL, NULL, &tv);
1530 if (ret == 0)
1531 {
1532 GSocket_Debug(( "GSocket_Input_Timeout, select returned 0\n" ));
1533 m_error = GSOCK_TIMEDOUT;
1534 return GSOCK_TIMEDOUT;
1535 }
1536
1537 if (ret == -1)
1538 {
1539 GSocket_Debug(( "GSocket_Input_Timeout, select returned -1\n" ));
1540 if (errno == EBADF) { GSocket_Debug(( "Invalid file descriptor\n" )); }
1541 if (errno == EINTR) { GSocket_Debug(( "A non blocked signal was caught\n" )); }
1542 if (errno == EINVAL) { GSocket_Debug(( "The highest number descriptor is negative\n" )); }
1543 if (errno == ENOMEM) { GSocket_Debug(( "Not enough memory\n" )); }
1544 m_error = GSOCK_TIMEDOUT;
1545 return GSOCK_TIMEDOUT;
1546 }
1547 }
1548
1549 return GSOCK_NOERROR;
1550 }
1551
1552 /* _GSocket_Output_Timeout:
1553 * For blocking sockets, wait until data can be sent without
1554 * blocking or until timeout ellapses.
1555 */
1556 GSocketError GSocket::Output_Timeout()
1557 {
1558 struct timeval tv;
1559 fd_set writefds;
1560 int ret;
1561
1562 /* Linux select() will overwrite the struct on return */
1563 tv.tv_sec = (m_timeout / 1000);
1564 tv.tv_usec = (m_timeout % 1000) * 1000;
1565
1566 GSocket_Debug( ("m_non_blocking has: %d\n", (int)m_non_blocking) );
1567
1568 if (!m_non_blocking)
1569 {
1570 wxFD_ZERO(&writefds);
1571 wxFD_SET(m_fd, &writefds);
1572 ret = select(m_fd + 1, NULL, &writefds, NULL, &tv);
1573 if (ret == 0)
1574 {
1575 GSocket_Debug(( "GSocket_Output_Timeout, select returned 0\n" ));
1576 m_error = GSOCK_TIMEDOUT;
1577 return GSOCK_TIMEDOUT;
1578 }
1579
1580 if (ret == -1)
1581 {
1582 GSocket_Debug(( "GSocket_Output_Timeout, select returned -1\n" ));
1583 if (errno == EBADF) { GSocket_Debug(( "Invalid file descriptor\n" )); }
1584 if (errno == EINTR) { GSocket_Debug(( "A non blocked signal was caught\n" )); }
1585 if (errno == EINVAL) { GSocket_Debug(( "The highest number descriptor is negative\n" )); }
1586 if (errno == ENOMEM) { GSocket_Debug(( "Not enough memory\n" )); }
1587 m_error = GSOCK_TIMEDOUT;
1588 return GSOCK_TIMEDOUT;
1589 }
1590
1591 if ( ! wxFD_ISSET(m_fd, &writefds) )
1592 {
1593 GSocket_Debug(( "GSocket_Output_Timeout is buggy!\n" ));
1594 }
1595 else
1596 {
1597 GSocket_Debug(( "GSocket_Output_Timeout seems correct\n" ));
1598 }
1599 }
1600 else
1601 {
1602 GSocket_Debug(( "GSocket_Output_Timeout, didn't try select!\n" ));
1603 }
1604
1605 return GSOCK_NOERROR;
1606 }
1607
1608 int GSocket::Recv_Stream(char *buffer, int size)
1609 {
1610 int ret;
1611 do
1612 {
1613 ret = recv(m_fd, buffer, size, GSOCKET_MSG_NOSIGNAL);
1614 }
1615 while (ret == -1 && errno == EINTR); /* Loop until not interrupted */
1616
1617 return ret;
1618 }
1619
1620 int GSocket::Recv_Dgram(char *buffer, int size)
1621 {
1622 struct sockaddr from;
1623 WX_SOCKLEN_T fromlen = sizeof(from);
1624 int ret;
1625 GSocketError err;
1626
1627 fromlen = sizeof(from);
1628
1629 do
1630 {
1631 ret = recvfrom(m_fd, buffer, size, 0, &from, (WX_SOCKLEN_T *) &fromlen);
1632 }
1633 while (ret == -1 && errno == EINTR); /* Loop until not interrupted */
1634
1635 if (ret == -1)
1636 return -1;
1637
1638 /* Translate a system address into a GSocket address */
1639 if (!m_peer)
1640 {
1641 m_peer = GAddress_new();
1642 if (!m_peer)
1643 {
1644 m_error = GSOCK_MEMERR;
1645 return -1;
1646 }
1647 }
1648
1649 err = _GAddress_translate_from(m_peer, &from, fromlen);
1650 if (err != GSOCK_NOERROR)
1651 {
1652 GAddress_destroy(m_peer);
1653 m_peer = NULL;
1654 m_error = err;
1655 return -1;
1656 }
1657
1658 return ret;
1659 }
1660
1661 int GSocket::Send_Stream(const char *buffer, int size)
1662 {
1663 int ret;
1664
1665 MASK_SIGNAL();
1666
1667 do
1668 {
1669 ret = send(m_fd, (char *)buffer, size, GSOCKET_MSG_NOSIGNAL);
1670 }
1671 while (ret == -1 && errno == EINTR); /* Loop until not interrupted */
1672
1673 UNMASK_SIGNAL();
1674
1675 return ret;
1676 }
1677
1678 int GSocket::Send_Dgram(const char *buffer, int size)
1679 {
1680 struct sockaddr *addr;
1681 int len, ret;
1682 GSocketError err;
1683
1684 if (!m_peer)
1685 {
1686 m_error = GSOCK_INVADDR;
1687 return -1;
1688 }
1689
1690 err = _GAddress_translate_to(m_peer, &addr, &len);
1691 if (err != GSOCK_NOERROR)
1692 {
1693 m_error = err;
1694 return -1;
1695 }
1696
1697 MASK_SIGNAL();
1698
1699 do
1700 {
1701 ret = sendto(m_fd, (char *)buffer, size, 0, addr, len);
1702 }
1703 while (ret == -1 && errno == EINTR); /* Loop until not interrupted */
1704
1705 UNMASK_SIGNAL();
1706
1707 /* Frees memory allocated from _GAddress_translate_to */
1708 free(addr);
1709
1710 return ret;
1711 }
1712
1713 void GSocket::Detected_Read()
1714 {
1715 char c;
1716
1717 /* Safeguard against straggling call to Detected_Read */
1718 if (m_fd == INVALID_SOCKET)
1719 {
1720 return;
1721 }
1722
1723 /* If we have already detected a LOST event, then don't try
1724 * to do any further processing.
1725 */
1726 if ((m_detected & GSOCK_LOST_FLAG) != 0)
1727 {
1728 m_establishing = false;
1729
1730 CALL_CALLBACK(this, GSOCK_LOST);
1731 Shutdown();
1732 return;
1733 }
1734
1735 int num = recv(m_fd, &c, 1, MSG_PEEK | GSOCKET_MSG_NOSIGNAL);
1736
1737 if (num > 0)
1738 {
1739 CALL_CALLBACK(this, GSOCK_INPUT);
1740 }
1741 else
1742 {
1743 if (m_server && m_stream)
1744 {
1745 CALL_CALLBACK(this, GSOCK_CONNECTION);
1746 }
1747 else
1748 {
1749 /* Do not throw a lost event in cases where the socket isn't really lost */
1750 if ((errno == EWOULDBLOCK) || (errno == EAGAIN) || (errno == EINTR))
1751 {
1752 CALL_CALLBACK(this, GSOCK_INPUT);
1753 }
1754 else
1755 {
1756 CALL_CALLBACK(this, GSOCK_LOST);
1757 Shutdown();
1758 }
1759 }
1760 }
1761 }
1762
1763 void GSocket::Detected_Write()
1764 {
1765 /* If we have already detected a LOST event, then don't try
1766 * to do any further processing.
1767 */
1768 if ((m_detected & GSOCK_LOST_FLAG) != 0)
1769 {
1770 m_establishing = false;
1771
1772 CALL_CALLBACK(this, GSOCK_LOST);
1773 Shutdown();
1774 return;
1775 }
1776
1777 if (m_establishing && !m_server)
1778 {
1779 int error;
1780 SOCKOPTLEN_T len = sizeof(error);
1781
1782 m_establishing = false;
1783
1784 getsockopt(m_fd, SOL_SOCKET, SO_ERROR, (char*)&error, &len);
1785
1786 if (error)
1787 {
1788 CALL_CALLBACK(this, GSOCK_LOST);
1789 Shutdown();
1790 }
1791 else
1792 {
1793 CALL_CALLBACK(this, GSOCK_CONNECTION);
1794 /* We have to fire this event by hand because CONNECTION (for clients)
1795 * and OUTPUT are internally the same and we just disabled CONNECTION
1796 * events with the above macro.
1797 */
1798 CALL_CALLBACK(this, GSOCK_OUTPUT);
1799 }
1800 }
1801 else
1802 {
1803 CALL_CALLBACK(this, GSOCK_OUTPUT);
1804 }
1805 }
1806
1807 /* Compatibility functions for GSocket */
1808 GSocket *GSocket_new(void)
1809 {
1810 GSocket *newsocket = new GSocket();
1811 if (newsocket->IsOk())
1812 return newsocket;
1813
1814 delete newsocket;
1815
1816 return NULL;
1817 }
1818
1819 /*
1820 * -------------------------------------------------------------------------
1821 * GAddress
1822 * -------------------------------------------------------------------------
1823 */
1824
1825 /* CHECK_ADDRESS verifies that the current address family is either
1826 * GSOCK_NOFAMILY or GSOCK_*family*, and if it is GSOCK_NOFAMILY, it
1827 * initalizes it to be a GSOCK_*family*. In other cases, it returns
1828 * an appropiate error code.
1829 *
1830 * CHECK_ADDRESS_RETVAL does the same but returning 'retval' on error.
1831 */
1832 #define CHECK_ADDRESS(address, family) \
1833 { \
1834 if (address->m_family == GSOCK_NOFAMILY) \
1835 if (_GAddress_Init_##family(address) != GSOCK_NOERROR) \
1836 return address->m_error; \
1837 if (address->m_family != GSOCK_##family) \
1838 { \
1839 address->m_error = GSOCK_INVADDR; \
1840 return GSOCK_INVADDR; \
1841 } \
1842 }
1843
1844 #define CHECK_ADDRESS_RETVAL(address, family, retval) \
1845 { \
1846 if (address->m_family == GSOCK_NOFAMILY) \
1847 if (_GAddress_Init_##family(address) != GSOCK_NOERROR) \
1848 return retval; \
1849 if (address->m_family != GSOCK_##family) \
1850 { \
1851 address->m_error = GSOCK_INVADDR; \
1852 return retval; \
1853 } \
1854 }
1855
1856
1857 GAddress *GAddress_new(void)
1858 {
1859 GAddress *address;
1860
1861 if ((address = (GAddress *) malloc(sizeof(GAddress))) == NULL)
1862 return NULL;
1863
1864 address->m_family = GSOCK_NOFAMILY;
1865 address->m_addr = NULL;
1866 address->m_len = 0;
1867
1868 return address;
1869 }
1870
1871 GAddress *GAddress_copy(GAddress *address)
1872 {
1873 GAddress *addr2;
1874
1875 assert(address != NULL);
1876
1877 if ((addr2 = (GAddress *) malloc(sizeof(GAddress))) == NULL)
1878 return NULL;
1879
1880 memcpy(addr2, address, sizeof(GAddress));
1881
1882 if (address->m_addr && address->m_len > 0)
1883 {
1884 addr2->m_addr = (struct sockaddr *)malloc(addr2->m_len);
1885 if (addr2->m_addr == NULL)
1886 {
1887 free(addr2);
1888 return NULL;
1889 }
1890 memcpy(addr2->m_addr, address->m_addr, addr2->m_len);
1891 }
1892
1893 return addr2;
1894 }
1895
1896 void GAddress_destroy(GAddress *address)
1897 {
1898 assert(address != NULL);
1899
1900 if (address->m_addr)
1901 free(address->m_addr);
1902
1903 free(address);
1904 }
1905
1906 void GAddress_SetFamily(GAddress *address, GAddressType type)
1907 {
1908 assert(address != NULL);
1909
1910 address->m_family = type;
1911 }
1912
1913 GAddressType GAddress_GetFamily(GAddress *address)
1914 {
1915 assert(address != NULL);
1916
1917 return address->m_family;
1918 }
1919
1920 GSocketError _GAddress_translate_from(GAddress *address,
1921 struct sockaddr *addr, int len)
1922 {
1923 address->m_realfamily = addr->sa_family;
1924 switch (addr->sa_family)
1925 {
1926 case AF_INET:
1927 address->m_family = GSOCK_INET;
1928 break;
1929 case AF_UNIX:
1930 address->m_family = GSOCK_UNIX;
1931 break;
1932 #ifdef AF_INET6
1933 case AF_INET6:
1934 address->m_family = GSOCK_INET6;
1935 break;
1936 #endif
1937 default:
1938 {
1939 address->m_error = GSOCK_INVOP;
1940 return GSOCK_INVOP;
1941 }
1942 }
1943
1944 if (address->m_addr)
1945 free(address->m_addr);
1946
1947 address->m_len = len;
1948 address->m_addr = (struct sockaddr *)malloc(len);
1949
1950 if (address->m_addr == NULL)
1951 {
1952 address->m_error = GSOCK_MEMERR;
1953 return GSOCK_MEMERR;
1954 }
1955
1956 memcpy(address->m_addr, addr, len);
1957
1958 return GSOCK_NOERROR;
1959 }
1960
1961 GSocketError _GAddress_translate_to(GAddress *address,
1962 struct sockaddr **addr, int *len)
1963 {
1964 if (!address->m_addr)
1965 {
1966 address->m_error = GSOCK_INVADDR;
1967 return GSOCK_INVADDR;
1968 }
1969
1970 *len = address->m_len;
1971 *addr = (struct sockaddr *)malloc(address->m_len);
1972 if (*addr == NULL)
1973 {
1974 address->m_error = GSOCK_MEMERR;
1975 return GSOCK_MEMERR;
1976 }
1977
1978 memcpy(*addr, address->m_addr, address->m_len);
1979 return GSOCK_NOERROR;
1980 }
1981
1982 /*
1983 * -------------------------------------------------------------------------
1984 * Internet address family
1985 * -------------------------------------------------------------------------
1986 */
1987
1988 GSocketError _GAddress_Init_INET(GAddress *address)
1989 {
1990 address->m_len = sizeof(struct sockaddr_in);
1991 address->m_addr = (struct sockaddr *) malloc(address->m_len);
1992 if (address->m_addr == NULL)
1993 {
1994 address->m_error = GSOCK_MEMERR;
1995 return GSOCK_MEMERR;
1996 }
1997
1998 address->m_family = GSOCK_INET;
1999 address->m_realfamily = PF_INET;
2000 ((struct sockaddr_in *)address->m_addr)->sin_family = AF_INET;
2001 ((struct sockaddr_in *)address->m_addr)->sin_addr.s_addr = INADDR_ANY;
2002
2003 return GSOCK_NOERROR;
2004 }
2005
2006 GSocketError GAddress_INET_SetHostName(GAddress *address, const char *hostname)
2007 {
2008 struct hostent *he;
2009 struct in_addr *addr;
2010
2011 assert(address != NULL);
2012
2013 CHECK_ADDRESS(address, INET);
2014
2015 addr = &(((struct sockaddr_in *)address->m_addr)->sin_addr);
2016
2017 /* If it is a numeric host name, convert it now */
2018 #if defined(HAVE_INET_ATON)
2019 if (inet_aton(hostname, addr) == 0)
2020 {
2021 #elif defined(HAVE_INET_ADDR)
2022 if ( (addr->s_addr = inet_addr(hostname)) == (unsigned)-1 )
2023 {
2024 #else
2025 /* Use gethostbyname by default */
2026 #ifndef __WXMAC__
2027 int val = 1; /* VA doesn't like constants in conditional expressions */
2028 if (val)
2029 #endif
2030 {
2031 #endif
2032 struct in_addr *array_addr;
2033
2034 /* It is a real name, we solve it */
2035 struct hostent h;
2036 #if defined(HAVE_FUNC_GETHOSTBYNAME_R_3)
2037 struct hostent_data buffer;
2038 #else
2039 char buffer[1024];
2040 #endif
2041 int err;
2042 he = wxGethostbyname_r(hostname, &h, (void*)&buffer, sizeof(buffer), &err);
2043 if (he == NULL)
2044 {
2045 /* Reset to invalid address */
2046 addr->s_addr = INADDR_NONE;
2047 address->m_error = GSOCK_NOHOST;
2048 return GSOCK_NOHOST;
2049 }
2050
2051 array_addr = (struct in_addr *) *(he->h_addr_list);
2052 addr->s_addr = array_addr[0].s_addr;
2053 }
2054
2055 return GSOCK_NOERROR;
2056 }
2057
2058 GSocketError GAddress_INET_SetAnyAddress(GAddress *address)
2059 {
2060 return GAddress_INET_SetHostAddress(address, INADDR_ANY);
2061 }
2062
2063 GSocketError GAddress_INET_SetHostAddress(GAddress *address,
2064 unsigned long hostaddr)
2065 {
2066 struct in_addr *addr;
2067
2068 assert(address != NULL);
2069
2070 CHECK_ADDRESS(address, INET);
2071
2072 addr = &(((struct sockaddr_in *)address->m_addr)->sin_addr);
2073 addr->s_addr = htonl(hostaddr);
2074
2075 return GSOCK_NOERROR;
2076 }
2077
2078 GSocketError GAddress_INET_SetPortName(GAddress *address, const char *port,
2079 const char *protocol)
2080 {
2081 struct servent *se;
2082 struct sockaddr_in *addr;
2083
2084 assert(address != NULL);
2085 CHECK_ADDRESS(address, INET);
2086
2087 if (!port)
2088 {
2089 address->m_error = GSOCK_INVPORT;
2090 return GSOCK_INVPORT;
2091 }
2092
2093 #if defined(HAVE_FUNC_GETSERVBYNAME_R_4)
2094 struct servent_data buffer;
2095 #else
2096 char buffer[1024];
2097 #endif
2098 struct servent serv;
2099 se = wxGetservbyname_r(port, protocol, &serv,
2100 (void*)&buffer, sizeof(buffer));
2101 if (!se)
2102 {
2103 /* the cast to int suppresses compiler warnings about subscript having the
2104 type char */
2105 if (isdigit((int)port[0]))
2106 {
2107 int port_int;
2108
2109 port_int = atoi(port);
2110 addr = (struct sockaddr_in *)address->m_addr;
2111 addr->sin_port = htons(port_int);
2112 return GSOCK_NOERROR;
2113 }
2114
2115 address->m_error = GSOCK_INVPORT;
2116 return GSOCK_INVPORT;
2117 }
2118
2119 addr = (struct sockaddr_in *)address->m_addr;
2120 addr->sin_port = se->s_port;
2121
2122 return GSOCK_NOERROR;
2123 }
2124
2125 GSocketError GAddress_INET_SetPort(GAddress *address, unsigned short port)
2126 {
2127 struct sockaddr_in *addr;
2128
2129 assert(address != NULL);
2130 CHECK_ADDRESS(address, INET);
2131
2132 addr = (struct sockaddr_in *)address->m_addr;
2133 addr->sin_port = htons(port);
2134
2135 return GSOCK_NOERROR;
2136 }
2137
2138 GSocketError GAddress_INET_GetHostName(GAddress *address, char *hostname, size_t sbuf)
2139 {
2140 struct hostent *he;
2141 char *addr_buf;
2142 struct sockaddr_in *addr;
2143
2144 assert(address != NULL);
2145 CHECK_ADDRESS(address, INET);
2146
2147 addr = (struct sockaddr_in *)address->m_addr;
2148 addr_buf = (char *)&(addr->sin_addr);
2149
2150 struct hostent temphost;
2151 #if defined(HAVE_FUNC_GETHOSTBYNAME_R_3)
2152 struct hostent_data buffer;
2153 #else
2154 char buffer[1024];
2155 #endif
2156 int err;
2157 he = wxGethostbyaddr_r(addr_buf, sizeof(addr->sin_addr), AF_INET, &temphost,
2158 (void*)&buffer, sizeof(buffer), &err);
2159 if (he == NULL)
2160 {
2161 address->m_error = GSOCK_NOHOST;
2162 return GSOCK_NOHOST;
2163 }
2164
2165 strncpy(hostname, he->h_name, sbuf);
2166
2167 return GSOCK_NOERROR;
2168 }
2169
2170 unsigned long GAddress_INET_GetHostAddress(GAddress *address)
2171 {
2172 struct sockaddr_in *addr;
2173
2174 assert(address != NULL);
2175 CHECK_ADDRESS_RETVAL(address, INET, 0);
2176
2177 addr = (struct sockaddr_in *)address->m_addr;
2178
2179 return ntohl(addr->sin_addr.s_addr);
2180 }
2181
2182 unsigned short GAddress_INET_GetPort(GAddress *address)
2183 {
2184 struct sockaddr_in *addr;
2185
2186 assert(address != NULL);
2187 CHECK_ADDRESS_RETVAL(address, INET, 0);
2188
2189 addr = (struct sockaddr_in *)address->m_addr;
2190 return ntohs(addr->sin_port);
2191 }
2192
2193 /*
2194 * -------------------------------------------------------------------------
2195 * Unix address family
2196 * -------------------------------------------------------------------------
2197 */
2198
2199 #ifndef __VISAGECPP__
2200 GSocketError _GAddress_Init_UNIX(GAddress *address)
2201 {
2202 address->m_len = sizeof(struct sockaddr_un);
2203 address->m_addr = (struct sockaddr *)malloc(address->m_len);
2204 if (address->m_addr == NULL)
2205 {
2206 address->m_error = GSOCK_MEMERR;
2207 return GSOCK_MEMERR;
2208 }
2209
2210 address->m_family = GSOCK_UNIX;
2211 address->m_realfamily = PF_UNIX;
2212 ((struct sockaddr_un *)address->m_addr)->sun_family = AF_UNIX;
2213 ((struct sockaddr_un *)address->m_addr)->sun_path[0] = 0;
2214
2215 return GSOCK_NOERROR;
2216 }
2217
2218 #define UNIX_SOCK_PATHLEN (sizeof(addr->sun_path)/sizeof(addr->sun_path[0]))
2219
2220 GSocketError GAddress_UNIX_SetPath(GAddress *address, const char *path)
2221 {
2222 struct sockaddr_un *addr;
2223
2224 assert(address != NULL);
2225
2226 CHECK_ADDRESS(address, UNIX);
2227
2228 addr = ((struct sockaddr_un *)address->m_addr);
2229 strncpy(addr->sun_path, path, UNIX_SOCK_PATHLEN);
2230 addr->sun_path[UNIX_SOCK_PATHLEN - 1] = '\0';
2231
2232 return GSOCK_NOERROR;
2233 }
2234
2235 GSocketError GAddress_UNIX_GetPath(GAddress *address, char *path, size_t sbuf)
2236 {
2237 struct sockaddr_un *addr;
2238
2239 assert(address != NULL);
2240 CHECK_ADDRESS(address, UNIX);
2241
2242 addr = (struct sockaddr_un *)address->m_addr;
2243
2244 strncpy(path, addr->sun_path, sbuf);
2245
2246 return GSOCK_NOERROR;
2247 }
2248 #endif /* !defined(__VISAGECPP__) */
2249 #endif /* wxUSE_SOCKETS || defined(__GSOCKET_STANDALONE__) */
wxWidgets (Impactor)