2 * Server-side socket management
4 * Copyright (C) 1999 Marcus Meissner, Ove Kåven
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 * FIXME: we use read|write access in all cases. Shouldn't we depend that
21 * on the access of the current handle?
33 #ifdef HAVE_SYS_ERRNO_H
34 # include <sys/errno.h>
37 #include <sys/types.h>
38 #ifdef HAVE_SYS_SOCKET_H
39 # include <sys/socket.h>
41 #ifdef HAVE_SYS_IOCTL_H
42 #include <sys/ioctl.h>
44 #ifdef HAVE_SYS_FILIO_H
45 # include <sys/filio.h>
51 #define WIN32_NO_STATUS
62 /* To avoid conflicts with the Unix socket headers. Plus we only need a few
70 struct object obj
; /* object header */
71 struct fd
*fd
; /* socket file descriptor */
72 unsigned int state
; /* status bits */
73 unsigned int mask
; /* event mask */
74 unsigned int hmask
; /* held (blocked) events */
75 unsigned int pmask
; /* pending events */
76 unsigned int flags
; /* socket flags */
77 int polling
; /* is socket being polled? */
78 unsigned short type
; /* socket type */
79 unsigned short family
; /* socket family */
80 struct event
*event
; /* event object */
81 user_handle_t window
; /* window to send the message to */
82 unsigned int message
; /* message to send */
83 obj_handle_t wparam
; /* message wparam (socket handle) */
84 int errors
[FD_MAX_EVENTS
]; /* event errors */
85 struct sock
*deferred
; /* socket that waits for a deferred accept */
86 struct list read_q
; /* queue for asynchronous reads */
87 struct list write_q
; /* queue for asynchronous writes */
90 static void sock_dump( struct object
*obj
, int verbose
);
91 static int sock_signaled( struct object
*obj
, struct thread
*thread
);
92 static struct fd
*sock_get_fd( struct object
*obj
);
93 static unsigned int sock_map_access( struct object
*obj
, unsigned int access
);
94 static void sock_destroy( struct object
*obj
);
96 static int sock_get_poll_events( struct fd
*fd
);
97 static void sock_poll_event( struct fd
*fd
, int event
);
98 static int sock_get_info( struct fd
*fd
);
99 static void sock_queue_async( struct fd
*fd
, void *apc
, void *user
, void *iosb
, int type
, int count
);
100 static void sock_cancel_async( struct fd
*fd
);
102 static int sock_get_error( int err
);
103 static void sock_set_error(void);
105 static const struct object_ops sock_ops
=
107 sizeof(struct sock
), /* size */
108 sock_dump
, /* dump */
109 add_queue
, /* add_queue */
110 remove_queue
, /* remove_queue */
111 sock_signaled
, /* signaled */
112 no_satisfied
, /* satisfied */
113 no_signal
, /* signal */
114 sock_get_fd
, /* get_fd */
115 sock_map_access
, /* map_access */
116 no_lookup_name
, /* lookup_name */
117 no_close_handle
, /* close_handle */
118 sock_destroy
/* destroy */
121 static const struct fd_ops sock_fd_ops
=
123 sock_get_poll_events
, /* get_poll_events */
124 sock_poll_event
, /* poll_event */
125 no_flush
, /* flush */
126 sock_get_info
, /* get_file_info */
127 sock_queue_async
, /* queue_async */
128 sock_cancel_async
/* cancel_async */
132 /* Permutation of 0..FD_MAX_EVENTS - 1 representing the order in which
133 * we post messages if there are multiple events. Used to send
134 * messages. The problem is if there is both a FD_CONNECT event and,
135 * say, an FD_READ event available on the same socket, we want to
136 * notify the app of the connect event first. Otherwise it may
137 * discard the read event because it thinks it hasn't connected yet.
139 static const int event_bitorder
[FD_MAX_EVENTS
] =
147 6, 7, 8, 9 /* leftovers */
150 /* Flags that make sense only for SOCK_STREAM sockets */
151 #define STREAM_FLAG_MASK ((unsigned int) (FD_CONNECT | FD_ACCEPT | FD_WINE_LISTENING | FD_WINE_CONNECTED))
154 SOCK_SHUTDOWN_ERROR
= -1,
155 SOCK_SHUTDOWN_EOF
= 0,
156 SOCK_SHUTDOWN_POLLHUP
= 1
159 static sock_shutdown_t sock_shutdown_type
= SOCK_SHUTDOWN_ERROR
;
161 static sock_shutdown_t
sock_check_pollhup(void)
163 sock_shutdown_t ret
= SOCK_SHUTDOWN_ERROR
;
168 if ( socketpair( AF_UNIX
, SOCK_STREAM
, 0, fd
) ) goto out
;
169 if ( shutdown( fd
[0], 1 ) ) goto out
;
175 n
= poll( &pfd
, 1, 0 );
176 if ( n
!= 1 ) goto out
; /* error or timeout */
177 if ( pfd
.revents
& POLLHUP
)
178 ret
= SOCK_SHUTDOWN_POLLHUP
;
179 else if ( pfd
.revents
& POLLIN
&&
180 read( fd
[1], &dummy
, 1 ) == 0 )
181 ret
= SOCK_SHUTDOWN_EOF
;
191 sock_shutdown_type
= sock_check_pollhup();
193 switch ( sock_shutdown_type
)
195 case SOCK_SHUTDOWN_EOF
:
196 if (debug_level
) fprintf( stderr
, "sock_init: shutdown() causes EOF\n" );
198 case SOCK_SHUTDOWN_POLLHUP
:
199 if (debug_level
) fprintf( stderr
, "sock_init: shutdown() causes POLLHUP\n" );
202 fprintf( stderr
, "sock_init: ERROR in sock_check_pollhup()\n" );
203 sock_shutdown_type
= SOCK_SHUTDOWN_EOF
;
207 static int sock_reselect( struct sock
*sock
)
209 int ev
= sock_get_poll_events( sock
->fd
);
212 fprintf(stderr
,"sock_reselect(%p): new mask %x\n", sock
, ev
);
214 if (!sock
->polling
) /* FIXME: should find a better way to do this */
216 /* previously unconnected socket, is this reselect supposed to connect it? */
217 if (!(sock
->state
& ~FD_WINE_NONBLOCKING
)) return 0;
218 /* ok, it is, attach it to the wineserver's main poll loop */
221 /* update condition mask */
222 set_fd_events( sock
->fd
, ev
);
226 /* After POLLHUP is received, the socket will no longer be in the main select loop.
227 This function is used to signal pending events nevertheless */
228 static void sock_try_event( struct sock
*sock
, int event
)
230 event
= check_fd_events( sock
->fd
, event
);
233 if ( debug_level
) fprintf( stderr
, "sock_try_event: %x\n", event
);
234 sock_poll_event( sock
->fd
, event
);
238 /* wake anybody waiting on the socket event or send the associated message */
239 static void sock_wake_up( struct sock
*sock
, int pollev
)
241 unsigned int events
= sock
->pmask
& sock
->mask
;
243 int async_active
= 0;
245 if ( sock
->flags
& WSA_FLAG_OVERLAPPED
)
247 if ( pollev
& (POLLIN
|POLLPRI
) && !list_empty( &sock
->read_q
))
249 if (debug_level
) fprintf( stderr
, "activating read queue for socket %p\n", sock
);
250 async_terminate_head( &sock
->read_q
, STATUS_ALERTED
);
253 if ( pollev
& POLLOUT
&& !list_empty( &sock
->write_q
))
255 if (debug_level
) fprintf( stderr
, "activating write queue for socket %p\n", sock
);
256 async_terminate_head( &sock
->write_q
, STATUS_ALERTED
);
261 /* Do not signal events if there are still pending asynchronous IO requests */
262 /* We need this to delay FD_CLOSE events until all pending overlapped requests are processed */
263 if ( !events
|| async_active
) return;
267 if (debug_level
) fprintf(stderr
, "signalling events %x ptr %p\n", events
, sock
->event
);
268 set_event( sock
->event
);
272 if (debug_level
) fprintf(stderr
, "signalling events %x win %p\n", events
, sock
->window
);
273 for (i
= 0; i
< FD_MAX_EVENTS
; i
++)
275 int event
= event_bitorder
[i
];
276 if (sock
->pmask
& (1 << event
))
278 unsigned int lparam
= (1 << event
) | (sock
->errors
[event
] << 16);
279 post_message( sock
->window
, sock
->message
, (unsigned long)sock
->wparam
, lparam
);
283 sock_reselect( sock
);
287 inline static int sock_error( struct fd
*fd
)
289 unsigned int optval
= 0, optlen
;
291 optlen
= sizeof(optval
);
292 getsockopt( get_unix_fd(fd
), SOL_SOCKET
, SO_ERROR
, (void *) &optval
, &optlen
);
293 return optval
? sock_get_error(optval
) : 0;
296 static void sock_poll_event( struct fd
*fd
, int event
)
298 struct sock
*sock
= get_fd_user( fd
);
301 assert( sock
->obj
.ops
== &sock_ops
);
303 fprintf(stderr
, "socket %p select event: %x\n", sock
, event
);
304 if (sock
->state
& FD_CONNECT
)
309 /* we got connected */
310 sock
->state
|= FD_WINE_CONNECTED
|FD_READ
|FD_WRITE
;
311 sock
->state
&= ~FD_CONNECT
;
312 sock
->pmask
|= FD_CONNECT
;
313 sock
->errors
[FD_CONNECT_BIT
] = 0;
315 fprintf(stderr
, "socket %p connection success\n", sock
);
317 else if (event
& (POLLERR
|POLLHUP
))
319 /* we didn't get connected? */
320 sock
->state
&= ~FD_CONNECT
;
321 sock
->pmask
|= FD_CONNECT
;
322 sock
->errors
[FD_CONNECT_BIT
] = sock_error( fd
);
324 fprintf(stderr
, "socket %p connection failure\n", sock
);
327 else if (sock
->state
& FD_WINE_LISTENING
)
332 /* incoming connection */
333 sock
->pmask
|= FD_ACCEPT
;
334 sock
->errors
[FD_ACCEPT_BIT
] = 0;
335 sock
->hmask
|= FD_ACCEPT
;
337 else if (event
& (POLLERR
|POLLHUP
))
339 /* failed incoming connection? */
340 sock
->pmask
|= FD_ACCEPT
;
341 sock
->errors
[FD_ACCEPT_BIT
] = sock_error( fd
);
342 sock
->hmask
|= FD_ACCEPT
;
347 /* normal data flow */
348 if ( sock
->type
== SOCK_STREAM
&& ( event
& POLLIN
) )
353 /* Linux 2.4 doesn't report POLLHUP if only one side of the socket
354 * has been closed, so we need to check for it explicitly here */
355 nr
= recv( get_unix_fd( fd
), &dummy
, 1, MSG_PEEK
);
359 sock
->pmask
|= FD_READ
;
360 sock
->hmask
|= (FD_READ
|FD_CLOSE
);
361 sock
->errors
[FD_READ_BIT
] = 0;
363 fprintf(stderr
, "socket %p is readable\n", sock
);
369 /* EAGAIN can happen if an async recv() falls between the server's poll()
370 call and the invocation of this routine */
371 if ( errno
== EAGAIN
)
376 fprintf( stderr
, "recv error on socket %p: %d\n", sock
, errno
);
382 else if ( sock_shutdown_type
== SOCK_SHUTDOWN_POLLHUP
&& (event
& POLLHUP
) )
386 else if ( event
& POLLIN
) /* POLLIN for non-stream socket */
388 sock
->pmask
|= FD_READ
;
389 sock
->hmask
|= (FD_READ
|FD_CLOSE
);
390 sock
->errors
[FD_READ_BIT
] = 0;
392 fprintf(stderr
, "socket %p is readable\n", sock
);
398 sock
->pmask
|= FD_WRITE
;
399 sock
->hmask
|= FD_WRITE
;
400 sock
->errors
[FD_WRITE_BIT
] = 0;
402 fprintf(stderr
, "socket %p is writable\n", sock
);
406 sock
->pmask
|= FD_OOB
;
407 sock
->hmask
|= FD_OOB
;
408 sock
->errors
[FD_OOB_BIT
] = 0;
410 fprintf(stderr
, "socket %p got OOB data\n", sock
);
412 /* According to WS2 specs, FD_CLOSE is only delivered when there is
413 no more data to be read (i.e. hangup_seen = 1) */
414 else if ( hangup_seen
&& (sock
->state
& (FD_READ
|FD_WRITE
) ))
416 sock
->errors
[FD_CLOSE_BIT
] = sock_error( fd
);
417 if ( (event
& POLLERR
) || ( sock_shutdown_type
== SOCK_SHUTDOWN_EOF
&& (event
& POLLHUP
) ))
418 sock
->state
&= ~FD_WRITE
;
419 sock
->pmask
|= FD_CLOSE
;
420 sock
->hmask
|= FD_CLOSE
;
422 fprintf(stderr
, "socket %p aborted by error %d, event: %x - removing from select loop\n",
423 sock
, sock
->errors
[FD_CLOSE_BIT
], event
);
427 if ( sock
->pmask
& FD_CLOSE
|| event
& (POLLERR
|POLLHUP
) )
430 fprintf( stderr
, "removing socket %p from select loop\n", sock
);
431 set_fd_events( sock
->fd
, -1 );
434 sock_reselect( sock
);
436 /* wake up anyone waiting for whatever just happened */
437 if ( sock
->pmask
& sock
->mask
|| sock
->flags
& WSA_FLAG_OVERLAPPED
) sock_wake_up( sock
, event
);
439 /* if anyone is stupid enough to wait on the socket object itself,
440 * maybe we should wake them up too, just in case? */
441 wake_up( &sock
->obj
, 0 );
444 static void sock_dump( struct object
*obj
, int verbose
)
446 struct sock
*sock
= (struct sock
*)obj
;
447 assert( obj
->ops
== &sock_ops
);
448 printf( "Socket fd=%p, state=%x, mask=%x, pending=%x, held=%x\n",
449 sock
->fd
, sock
->state
,
450 sock
->mask
, sock
->pmask
, sock
->hmask
);
453 static int sock_signaled( struct object
*obj
, struct thread
*thread
)
455 struct sock
*sock
= (struct sock
*)obj
;
456 assert( obj
->ops
== &sock_ops
);
458 return check_fd_events( sock
->fd
, sock_get_poll_events( sock
->fd
) ) != 0;
461 static unsigned int sock_map_access( struct object
*obj
, unsigned int access
)
463 if (access
& GENERIC_READ
) access
|= FILE_GENERIC_READ
;
464 if (access
& GENERIC_WRITE
) access
|= FILE_GENERIC_WRITE
;
465 if (access
& GENERIC_EXECUTE
) access
|= FILE_GENERIC_EXECUTE
;
466 if (access
& GENERIC_ALL
) access
|= FILE_ALL_ACCESS
;
467 return access
& ~(GENERIC_READ
| GENERIC_WRITE
| GENERIC_EXECUTE
| GENERIC_ALL
);
470 static int sock_get_poll_events( struct fd
*fd
)
472 struct sock
*sock
= get_fd_user( fd
);
473 unsigned int mask
= sock
->mask
& sock
->state
& ~sock
->hmask
;
476 assert( sock
->obj
.ops
== &sock_ops
);
478 if (sock
->state
& FD_CONNECT
)
479 /* connecting, wait for writable */
481 if (sock
->state
& FD_WINE_LISTENING
)
482 /* listening, wait for readable */
483 return (sock
->hmask
& FD_ACCEPT
) ? 0 : POLLIN
;
485 if (mask
& (FD_READ
) || (sock
->flags
& WSA_FLAG_OVERLAPPED
&& !list_empty( &sock
->read_q
)))
486 ev
|= POLLIN
| POLLPRI
;
487 if (mask
& FD_WRITE
|| (sock
->flags
& WSA_FLAG_OVERLAPPED
&& !list_empty( &sock
->write_q
)))
489 /* We use POLLIN with 0 bytes recv() as FD_CLOSE indication for stream sockets. */
490 if ( sock
->type
== SOCK_STREAM
&& ( sock
->mask
& ~sock
->hmask
& FD_CLOSE
) )
496 static int sock_get_info( struct fd
*fd
)
498 int flags
= FD_FLAG_AVAILABLE
;
499 struct sock
*sock
= get_fd_user( fd
);
500 assert( sock
->obj
.ops
== &sock_ops
);
502 if (sock
->flags
& WSA_FLAG_OVERLAPPED
) flags
|= FD_FLAG_OVERLAPPED
;
503 if ( sock
->type
!= SOCK_STREAM
|| sock
->state
& FD_WINE_CONNECTED
)
505 if ( !(sock
->state
& FD_READ
) ) flags
|= FD_FLAG_RECV_SHUTDOWN
;
506 if ( !(sock
->state
& FD_WRITE
) ) flags
|= FD_FLAG_SEND_SHUTDOWN
;
511 static void sock_queue_async( struct fd
*fd
, void *apc
, void *user
, void *iosb
,
512 int type
, int count
)
514 struct sock
*sock
= get_fd_user( fd
);
518 assert( sock
->obj
.ops
== &sock_ops
);
520 if ( !(sock
->flags
& WSA_FLAG_OVERLAPPED
) )
522 set_error( STATUS_INVALID_HANDLE
);
528 case ASYNC_TYPE_READ
:
529 queue
= &sock
->read_q
;
530 sock
->hmask
&= ~FD_CLOSE
;
532 case ASYNC_TYPE_WRITE
:
533 queue
= &sock
->write_q
;
536 set_error( STATUS_INVALID_PARAMETER
);
540 if ( ( !( sock
->state
& FD_READ
) && type
== ASYNC_TYPE_READ
) ||
541 ( !( sock
->state
& FD_WRITE
) && type
== ASYNC_TYPE_WRITE
) )
543 set_error( STATUS_PIPE_DISCONNECTED
);
547 if (!create_async( current
, NULL
, queue
, apc
, user
, iosb
))
551 pollev
= sock_reselect( sock
);
552 if ( pollev
) sock_try_event( sock
, pollev
);
555 static void sock_cancel_async( struct fd
*fd
)
557 struct sock
*sock
= get_fd_user( fd
);
558 assert( sock
->obj
.ops
== &sock_ops
);
560 async_terminate_queue( &sock
->read_q
, STATUS_CANCELLED
);
561 async_terminate_queue( &sock
->write_q
, STATUS_CANCELLED
);
564 static struct fd
*sock_get_fd( struct object
*obj
)
566 struct sock
*sock
= (struct sock
*)obj
;
567 return (struct fd
*)grab_object( sock
->fd
);
570 static void sock_destroy( struct object
*obj
)
572 struct sock
*sock
= (struct sock
*)obj
;
573 assert( obj
->ops
== &sock_ops
);
575 /* FIXME: special socket shutdown stuff? */
577 if ( sock
->deferred
)
578 release_object( sock
->deferred
);
580 if ( sock
->flags
& WSA_FLAG_OVERLAPPED
)
582 async_terminate_queue( &sock
->read_q
, STATUS_CANCELLED
);
583 async_terminate_queue( &sock
->write_q
, STATUS_CANCELLED
);
585 if (sock
->event
) release_object( sock
->event
);
586 if (sock
->fd
) release_object( sock
->fd
);
589 /* create a new and unconnected socket */
590 static struct object
*create_socket( int family
, int type
, int protocol
, unsigned int flags
)
595 sockfd
= socket( family
, type
, protocol
);
597 fprintf(stderr
,"socket(%d,%d,%d)=%d\n",family
,type
,protocol
,sockfd
);
603 fcntl(sockfd
, F_SETFL
, O_NONBLOCK
); /* make socket nonblocking */
604 if (!(sock
= alloc_object( &sock_ops
)))
609 sock
->state
= (type
!= SOCK_STREAM
) ? (FD_READ
|FD_WRITE
) : 0;
616 sock
->family
= family
;
621 sock
->deferred
= NULL
;
622 if (!(sock
->fd
= create_anonymous_fd( &sock_fd_ops
, sockfd
, &sock
->obj
)))
624 release_object( sock
);
627 list_init( &sock
->read_q
);
628 list_init( &sock
->write_q
);
629 sock_reselect( sock
);
634 /* accept a socket (creates a new fd) */
635 static struct sock
*accept_socket( obj_handle_t handle
)
637 struct sock
*acceptsock
;
640 struct sockaddr saddr
;
642 sock
= (struct sock
*)get_handle_obj( current
->process
, handle
, FILE_READ_DATA
, &sock_ops
);
646 if ( sock
->deferred
)
648 acceptsock
= sock
->deferred
;
649 sock
->deferred
= NULL
;
654 /* Try to accept(2). We can't be safe that this an already connected socket
655 * or that accept() is allowed on it. In those cases we will get -1/errno
658 unsigned int slen
= sizeof(saddr
);
659 acceptfd
= accept( get_unix_fd(sock
->fd
), &saddr
, &slen
);
663 release_object( sock
);
666 if (!(acceptsock
= alloc_object( &sock_ops
)))
669 release_object( sock
);
673 /* newly created socket gets the same properties of the listening socket */
674 fcntl(acceptfd
, F_SETFL
, O_NONBLOCK
); /* make socket nonblocking */
675 acceptsock
->state
= FD_WINE_CONNECTED
|FD_READ
|FD_WRITE
;
676 if (sock
->state
& FD_WINE_NONBLOCKING
)
677 acceptsock
->state
|= FD_WINE_NONBLOCKING
;
678 acceptsock
->mask
= sock
->mask
;
679 acceptsock
->hmask
= 0;
680 acceptsock
->pmask
= 0;
681 acceptsock
->polling
= 0;
682 acceptsock
->type
= sock
->type
;
683 acceptsock
->family
= sock
->family
;
684 acceptsock
->event
= NULL
;
685 acceptsock
->window
= sock
->window
;
686 acceptsock
->message
= sock
->message
;
687 acceptsock
->wparam
= 0;
688 if (sock
->event
) acceptsock
->event
= (struct event
*)grab_object( sock
->event
);
689 acceptsock
->flags
= sock
->flags
;
690 acceptsock
->deferred
= NULL
;
691 if (!(acceptsock
->fd
= create_anonymous_fd( &sock_fd_ops
, acceptfd
, &acceptsock
->obj
)))
693 release_object( acceptsock
);
694 release_object( sock
);
697 list_init( &acceptsock
->read_q
);
698 list_init( &acceptsock
->write_q
);
701 sock
->pmask
&= ~FD_ACCEPT
;
702 sock
->hmask
&= ~FD_ACCEPT
;
703 sock_reselect( sock
);
704 release_object( sock
);
708 /* set the last error depending on errno */
709 static int sock_get_error( int err
)
713 case EINTR
: return WSAEINTR
;
714 case EBADF
: return WSAEBADF
;
716 case EACCES
: return WSAEACCES
;
717 case EFAULT
: return WSAEFAULT
;
718 case EINVAL
: return WSAEINVAL
;
719 case EMFILE
: return WSAEMFILE
;
720 case EWOULDBLOCK
: return WSAEWOULDBLOCK
;
721 case EINPROGRESS
: return WSAEINPROGRESS
;
722 case EALREADY
: return WSAEALREADY
;
723 case ENOTSOCK
: return WSAENOTSOCK
;
724 case EDESTADDRREQ
: return WSAEDESTADDRREQ
;
725 case EMSGSIZE
: return WSAEMSGSIZE
;
726 case EPROTOTYPE
: return WSAEPROTOTYPE
;
727 case ENOPROTOOPT
: return WSAENOPROTOOPT
;
728 case EPROTONOSUPPORT
: return WSAEPROTONOSUPPORT
;
729 case ESOCKTNOSUPPORT
: return WSAESOCKTNOSUPPORT
;
730 case EOPNOTSUPP
: return WSAEOPNOTSUPP
;
731 case EPFNOSUPPORT
: return WSAEPFNOSUPPORT
;
732 case EAFNOSUPPORT
: return WSAEAFNOSUPPORT
;
733 case EADDRINUSE
: return WSAEADDRINUSE
;
734 case EADDRNOTAVAIL
: return WSAEADDRNOTAVAIL
;
735 case ENETDOWN
: return WSAENETDOWN
;
736 case ENETUNREACH
: return WSAENETUNREACH
;
737 case ENETRESET
: return WSAENETRESET
;
738 case ECONNABORTED
: return WSAECONNABORTED
;
740 case ECONNRESET
: return WSAECONNRESET
;
741 case ENOBUFS
: return WSAENOBUFS
;
742 case EISCONN
: return WSAEISCONN
;
743 case ENOTCONN
: return WSAENOTCONN
;
744 case ESHUTDOWN
: return WSAESHUTDOWN
;
745 case ETOOMANYREFS
: return WSAETOOMANYREFS
;
746 case ETIMEDOUT
: return WSAETIMEDOUT
;
747 case ECONNREFUSED
: return WSAECONNREFUSED
;
748 case ELOOP
: return WSAELOOP
;
749 case ENAMETOOLONG
: return WSAENAMETOOLONG
;
750 case EHOSTDOWN
: return WSAEHOSTDOWN
;
751 case EHOSTUNREACH
: return WSAEHOSTUNREACH
;
752 case ENOTEMPTY
: return WSAENOTEMPTY
;
754 case EPROCLIM
: return WSAEPROCLIM
;
757 case EUSERS
: return WSAEUSERS
;
760 case EDQUOT
: return WSAEDQUOT
;
763 case ESTALE
: return WSAESTALE
;
766 case EREMOTE
: return WSAEREMOTE
;
768 default: errno
=err
; perror("sock_set_error"); return WSAEFAULT
;
772 /* set the last error depending on errno */
773 static void sock_set_error(void)
775 set_error( sock_get_error( errno
) );
778 /* create a socket */
779 DECL_HANDLER(create_socket
)
784 if ((obj
= create_socket( req
->family
, req
->type
, req
->protocol
, req
->flags
)) != NULL
)
786 reply
->handle
= alloc_handle( current
->process
, obj
, req
->access
, req
->attributes
);
787 release_object( obj
);
791 /* accept a socket */
792 DECL_HANDLER(accept_socket
)
797 if ((sock
= accept_socket( req
->lhandle
)) != NULL
)
799 reply
->handle
= alloc_handle( current
->process
, &sock
->obj
, req
->access
, req
->attributes
);
800 sock
->wparam
= reply
->handle
; /* wparam for message is the socket handle */
801 sock_reselect( sock
);
802 release_object( &sock
->obj
);
806 /* set socket event parameters */
807 DECL_HANDLER(set_socket_event
)
810 struct event
*old_event
;
813 if (!(sock
= (struct sock
*)get_handle_obj( current
->process
, req
->handle
,
814 FILE_WRITE_ATTRIBUTES
, &sock_ops
))) return;
815 old_event
= sock
->event
;
816 sock
->mask
= req
->mask
;
818 sock
->window
= req
->window
;
819 sock
->message
= req
->msg
;
820 sock
->wparam
= req
->handle
; /* wparam is the socket handle */
821 if (req
->event
) sock
->event
= get_event_obj( current
->process
, req
->event
, EVENT_MODIFY_STATE
);
823 if (debug_level
&& sock
->event
) fprintf(stderr
, "event ptr: %p\n", sock
->event
);
825 pollev
= sock_reselect( sock
);
826 if ( pollev
) sock_try_event( sock
, pollev
);
829 sock
->state
|= FD_WINE_NONBLOCKING
;
831 /* if a network event is pending, signal the event object
832 it is possible that FD_CONNECT or FD_ACCEPT network events has happened
833 before a WSAEventSelect() was done on it.
834 (when dealing with Asynchronous socket) */
835 if (sock
->pmask
& sock
->mask
) sock_wake_up( sock
, pollev
);
837 if (old_event
) release_object( old_event
); /* we're through with it */
838 release_object( &sock
->obj
);
841 /* get socket event parameters */
842 DECL_HANDLER(get_socket_event
)
846 sock
= (struct sock
*)get_handle_obj( current
->process
, req
->handle
, FILE_READ_ATTRIBUTES
, &sock_ops
);
852 set_error( WSAENOTSOCK
);
855 reply
->mask
= sock
->mask
;
856 reply
->pmask
= sock
->pmask
;
857 reply
->state
= sock
->state
;
858 set_reply_data( sock
->errors
, min( get_reply_max_size(), sizeof(sock
->errors
) ));
864 struct event
*cevent
= get_event_obj( current
->process
, req
->c_event
,
865 EVENT_MODIFY_STATE
);
868 reset_event( cevent
);
869 release_object( cevent
);
873 sock_reselect( sock
);
875 release_object( &sock
->obj
);
878 /* re-enable pending socket events */
879 DECL_HANDLER(enable_socket_event
)
884 if (!(sock
= (struct sock
*)get_handle_obj( current
->process
, req
->handle
,
885 FILE_WRITE_ATTRIBUTES
, &sock_ops
)))
888 sock
->pmask
&= ~req
->mask
; /* is this safe? */
889 sock
->hmask
&= ~req
->mask
;
890 if ( req
->mask
& FD_READ
)
891 sock
->hmask
&= ~FD_CLOSE
;
892 sock
->state
|= req
->sstate
;
893 sock
->state
&= ~req
->cstate
;
894 if ( sock
->type
!= SOCK_STREAM
) sock
->state
&= ~STREAM_FLAG_MASK
;
896 pollev
= sock_reselect( sock
);
897 if ( pollev
) sock_try_event( sock
, pollev
);
899 release_object( &sock
->obj
);
902 DECL_HANDLER(set_socket_deferred
)
904 struct sock
*sock
, *acceptsock
;
906 sock
=(struct sock
*)get_handle_obj( current
->process
, req
->handle
, FILE_WRITE_ATTRIBUTES
, &sock_ops
);
909 set_error( WSAENOTSOCK
);
912 acceptsock
= (struct sock
*)get_handle_obj( current
->process
, req
->deferred
, 0, &sock_ops
);
915 release_object( sock
);
916 set_error( WSAENOTSOCK
);
919 sock
->deferred
= acceptsock
;
920 release_object( sock
);