Initial import from FreeBSD RELENG_4:
[dragonfly.git] / lib / libc_r / uthread / uthread_connect.c
1 /*
2  * Copyright (c) 1995-1998 John Birrell <jb@cimlogic.com.au>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by John Birrell.
16  * 4. Neither the name of the author nor the names of any co-contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY JOHN BIRRELL AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  *
32  * $FreeBSD: src/lib/libc_r/uthread/uthread_connect.c,v 1.10.2.5 2003/01/17 07:56:43 ru Exp $
33  */
34 #include <errno.h>
35 #include <sys/types.h>
36 #include <sys/socket.h>
37 #include <fcntl.h>
38 #include <pthread.h>
39 #include "pthread_private.h"
40
41 int
42 _connect(int fd, const struct sockaddr * name, socklen_t namelen)
43 {
44         struct pthread  *curthread = _get_curthread();
45         struct sockaddr tmpname;
46         int             errnolen, ret, tmpnamelen;
47
48         if ((ret = _FD_LOCK(fd, FD_RDWR, NULL)) == 0) {
49                 if ((ret = __sys_connect(fd, name, namelen)) < 0) {
50                         if ((_thread_fd_getflags(fd) & O_NONBLOCK) == 0
51                             && ((errno == EWOULDBLOCK) || (errno == EINPROGRESS)
52                             || (errno == EALREADY) || (errno == EAGAIN))) {
53                                 curthread->data.fd.fd = fd;
54
55                                 /* Set the timeout: */
56                                 _thread_kern_set_timeout(NULL);
57                                 _thread_kern_sched_state(PS_FDW_WAIT, __FILE__, __LINE__);
58
59                                 tmpnamelen = sizeof(tmpname);
60                                 /* 0 now lets see if it really worked */
61                                 if (((ret = __sys_getpeername(fd, &tmpname, &tmpnamelen)) < 0) && (errno == ENOTCONN)) {
62
63                                         /*
64                                          * Get the error, this function
65                                          * should not fail 
66                                          */
67                                         errnolen = sizeof(errno);
68                                         __sys_getsockopt(fd, SOL_SOCKET, SO_ERROR, &errno, &errnolen);
69                                 }
70                         } else {
71                                 ret = -1;
72                         }
73                 }
74                 _FD_UNLOCK(fd, FD_RDWR);
75         }
76         return (ret);
77 }
78
79 int
80 connect(int fd, const struct sockaddr * name, socklen_t namelen)
81 {
82         int ret;
83
84         _thread_enter_cancellation_point();
85         ret = _connect(fd, name, namelen);
86         _thread_leave_cancellation_point();
87
88         return (ret);
89 }