1 | /* |
1 | /* |
2 | * Copyright 2007 Marc Alexander Lehmann <libev@schmorp.de> |
2 | * libev solaris event port backend |
3 | * |
3 | * |
4 | * Redistribution and use in source and binary forms, with or without |
4 | * Copyright (c) 2007,2008,2009,2010,2011 Marc Alexander Lehmann <libev@schmorp.de> |
5 | * modification, are permitted provided that the following conditions |
5 | * All rights reserved. |
6 | * are met: |
|
|
7 | * |
6 | * |
8 | * 1. Redistributions of source code must retain the above copyright |
7 | * Redistribution and use in source and binary forms, with or without modifica- |
9 | * notice, this list of conditions and the following disclaimer. |
8 | * tion, are permitted provided that the following conditions are met: |
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 | * |
9 | * |
|
|
10 | * 1. Redistributions of source code must retain the above copyright notice, |
|
|
11 | * this list of conditions and the following disclaimer. |
|
|
12 | * |
|
|
13 | * 2. Redistributions in binary form must reproduce the above copyright |
|
|
14 | * notice, this list of conditions and the following disclaimer in the |
|
|
15 | * documentation and/or other materials provided with the distribution. |
|
|
16 | * |
14 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED |
15 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
18 | * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MER- |
16 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
19 | * CHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO |
17 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
20 | * EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPE- |
18 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
21 | * CIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, |
19 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
22 | * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; |
20 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
23 | * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, |
21 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
24 | * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH- |
22 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
25 | * ERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED |
23 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
26 | * OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
27 | * |
|
|
28 | * Alternatively, the contents of this file may be used under the terms of |
|
|
29 | * the GNU General Public License ("GPL") version 2 or any later version, |
|
|
30 | * in which case the provisions of the GPL are applicable instead of |
|
|
31 | * the above. If you wish to allow the use of your version of this file |
|
|
32 | * only under the terms of the GPL and not to allow others to use your |
|
|
33 | * version of this file under the BSD license, indicate your decision |
|
|
34 | * by deleting the provisions above and replace them with the notice |
|
|
35 | * and other provisions required by the GPL. If you do not delete the |
|
|
36 | * provisions above, a recipient may use your version of this file under |
|
|
37 | * either the BSD or the GPL. |
|
|
38 | */ |
|
|
39 | |
|
|
40 | /* useful reading: |
|
|
41 | * |
|
|
42 | * http://bugs.opensolaris.org/view_bug.do?bug_id=6268715 (random results) |
|
|
43 | * http://bugs.opensolaris.org/view_bug.do?bug_id=6455223 (just totally broken) |
|
|
44 | * http://bugs.opensolaris.org/view_bug.do?bug_id=6873782 (manpage ETIME) |
|
|
45 | * http://bugs.opensolaris.org/view_bug.do?bug_id=6874410 (implementation ETIME) |
|
|
46 | * http://www.mail-archive.com/networking-discuss@opensolaris.org/msg11898.html ETIME vs. nget |
|
|
47 | * http://src.opensolaris.org/source/xref/onnv/onnv-gate/usr/src/lib/libc/port/gen/event_port.c (libc) |
|
|
48 | * http://cvs.opensolaris.org/source/xref/onnv/onnv-gate/usr/src/uts/common/fs/portfs/port.c#1325 (kernel) |
24 | */ |
49 | */ |
25 | |
50 | |
26 | #include <sys/types.h> |
51 | #include <sys/types.h> |
27 | #include <sys/time.h> |
52 | #include <sys/time.h> |
28 | #include <poll.h> |
53 | #include <poll.h> |
29 | #include <port.h> |
54 | #include <port.h> |
30 | #include <string.h> |
55 | #include <string.h> |
31 | #include <errno.h> |
56 | #include <errno.h> |
|
|
57 | |
|
|
58 | inline_speed |
|
|
59 | void |
|
|
60 | port_associate_and_check (EV_P_ int fd, int ev) |
|
|
61 | { |
|
|
62 | if (0 > |
|
|
63 | port_associate ( |
|
|
64 | backend_fd, PORT_SOURCE_FD, fd, |
|
|
65 | (ev & EV_READ ? POLLIN : 0) |
|
|
66 | | (ev & EV_WRITE ? POLLOUT : 0), |
|
|
67 | 0 |
|
|
68 | ) |
|
|
69 | ) |
|
|
70 | { |
|
|
71 | if (errno == EBADFD) |
|
|
72 | fd_kill (EV_A_ fd); |
|
|
73 | else |
|
|
74 | ev_syserr ("(libev) port_associate"); |
|
|
75 | } |
|
|
76 | } |
32 | |
77 | |
33 | static void |
78 | static void |
34 | port_modify (EV_P_ int fd, int oev, int nev) |
79 | port_modify (EV_P_ int fd, int oev, int nev) |
35 | { |
80 | { |
36 | /* we need to reassociate no matter what, as closes are |
81 | /* we need to reassociate no matter what, as closes are |
… | |
… | |
39 | if (!nev) |
84 | if (!nev) |
40 | { |
85 | { |
41 | if (oev) |
86 | if (oev) |
42 | port_dissociate (backend_fd, PORT_SOURCE_FD, fd); |
87 | port_dissociate (backend_fd, PORT_SOURCE_FD, fd); |
43 | } |
88 | } |
44 | else if (0 > |
|
|
45 | port_associate ( |
|
|
46 | backend_fd, PORT_SOURCE_FD, fd, |
|
|
47 | (nev & EV_READ ? POLLIN : 0) |
|
|
48 | | (nev & EV_WRITE ? POLLOUT : 0), |
|
|
49 | 0 |
|
|
50 | ) |
|
|
51 | ) |
|
|
52 | { |
|
|
53 | if (errno == EBADFD) |
|
|
54 | fd_kill (EV_A_ fd); |
|
|
55 | else |
89 | else |
56 | syserr ("(libev) port_associate"); |
90 | port_associate_and_check (EV_A_ fd, nev); |
57 | } |
|
|
58 | } |
91 | } |
59 | |
92 | |
60 | static void |
93 | static void |
61 | port_poll (EV_P_ ev_tstamp timeout) |
94 | port_poll (EV_P_ ev_tstamp timeout) |
62 | { |
95 | { |
63 | int res, i; |
96 | int res, i; |
64 | struct timespec ts; |
97 | struct timespec ts; |
65 | uint_t nget = 1; |
98 | uint_t nget = 1; |
66 | |
99 | |
67 | ts.tv_sec = (time_t)timeout; |
100 | /* we initialise this to something we will skip in the loop, as */ |
68 | ts.tv_nsec = (long)(timeout - (ev_tstamp)ts.tv_sec) * 1e9; |
101 | /* port_getn can return with nget unchanged, but no indication */ |
|
|
102 | /* whether it was the original value or has been updated :/ */ |
|
|
103 | port_events [0].portev_source = 0; |
|
|
104 | |
|
|
105 | EV_RELEASE_CB; |
|
|
106 | EV_TS_SET (ts, timeout); |
69 | res = port_getn (backend_fd, port_events, port_eventmax, &nget, &ts); |
107 | res = port_getn (backend_fd, port_events, port_eventmax, &nget, &ts); |
|
|
108 | EV_ACQUIRE_CB; |
70 | |
109 | |
71 | if (res < 0) |
110 | /* port_getn may or may not set nget on error */ |
72 | { |
111 | /* so we rely on port_events [0].portev_source not being updated */ |
73 | if (errno != EINTR && errno != ETIME) |
112 | if (res == -1 && errno != ETIME && errno != EINTR) |
74 | syserr ("(libev) port_getn"); |
113 | ev_syserr ("(libev) port_getn (see http://bugs.opensolaris.org/view_bug.do?bug_id=6268715, try LIBEV_FLAGS=3 env variable)"); |
75 | |
|
|
76 | return; |
|
|
77 | } |
|
|
78 | |
114 | |
79 | for (i = 0; i < nget; ++i) |
115 | for (i = 0; i < nget; ++i) |
80 | { |
116 | { |
81 | if (port_events [i].portev_source == PORT_SOURCE_FD) |
117 | if (port_events [i].portev_source == PORT_SOURCE_FD) |
82 | { |
118 | { |
… | |
… | |
87 | fd, |
123 | fd, |
88 | (port_events [i].portev_events & (POLLOUT | POLLERR | POLLHUP) ? EV_WRITE : 0) |
124 | (port_events [i].portev_events & (POLLOUT | POLLERR | POLLHUP) ? EV_WRITE : 0) |
89 | | (port_events [i].portev_events & (POLLIN | POLLERR | POLLHUP) ? EV_READ : 0) |
125 | | (port_events [i].portev_events & (POLLIN | POLLERR | POLLHUP) ? EV_READ : 0) |
90 | ); |
126 | ); |
91 | |
127 | |
92 | anfds [fd].events = 0; /* event received == disassociated */ |
128 | fd_change (EV_A_ fd, EV__IOFDSET); |
93 | fd_change (EV_A_ fd); /* need to reify later */ |
|
|
94 | } |
129 | } |
95 | } |
130 | } |
96 | |
131 | |
97 | if (expect_false (nget == port_eventmax)) |
132 | if (expect_false (nget == port_eventmax)) |
98 | { |
133 | { |
99 | ev_free (port_events); |
134 | ev_free (port_events); |
100 | port_eventmax = array_roundsize (port_event_t, port_eventmax << 1); |
135 | port_eventmax = array_nextsize (sizeof (port_event_t), port_eventmax, port_eventmax + 1); |
101 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
136 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
102 | } |
137 | } |
103 | } |
138 | } |
104 | |
139 | |
105 | static int |
140 | inline_size |
|
|
141 | int |
106 | port_init (EV_P_ int flags) |
142 | port_init (EV_P_ int flags) |
107 | { |
143 | { |
108 | /* Initalize the kernel queue */ |
144 | /* Initialize the kernel queue */ |
109 | if ((backend_fd = port_create ()) < 0) |
145 | if ((backend_fd = port_create ()) < 0) |
110 | return 0; |
146 | return 0; |
111 | |
147 | |
|
|
148 | assert (("libev: PORT_SOURCE_FD must not be zero", PORT_SOURCE_FD)); |
|
|
149 | |
112 | fcntl (backend_fd, F_SETFD, FD_CLOEXEC); /* not sure if necessary, hopefully doesn't hurt */ |
150 | fcntl (backend_fd, F_SETFD, FD_CLOEXEC); /* not sure if necessary, hopefully doesn't hurt */ |
113 | |
151 | |
|
|
152 | /* if my reading of the opensolaris kernel sources are correct, then |
|
|
153 | * opensolaris does something very stupid: it checks if the time has already |
|
|
154 | * elapsed and doesn't round up if that is the case,m otherwise it DOES round |
|
|
155 | * up. Since we can't know what the case is, we need to guess by using a |
|
|
156 | * "large enough" timeout. Normally, 1e-9 would be correct. |
|
|
157 | */ |
114 | backend_fudge = 1e-3; /* needed to compensate for port_getn returning early */ |
158 | backend_mintime = 1e-3; /* needed to compensate for port_getn returning early */ |
115 | backend_modify = port_modify; |
159 | backend_modify = port_modify; |
116 | backend_poll = port_poll; |
160 | backend_poll = port_poll; |
117 | |
161 | |
118 | port_eventmax = 64; /* intiial number of events receivable per poll */ |
162 | port_eventmax = 64; /* initial number of events receivable per poll */ |
119 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
163 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
120 | |
164 | |
121 | return EVBACKEND_PORT; |
165 | return EVBACKEND_PORT; |
122 | } |
166 | } |
123 | |
167 | |
124 | static void |
168 | inline_size |
|
|
169 | void |
125 | port_destroy (EV_P) |
170 | port_destroy (EV_P) |
126 | { |
171 | { |
127 | close (backend_fd); |
|
|
128 | |
|
|
129 | ev_free (port_events); |
172 | ev_free (port_events); |
130 | } |
173 | } |
131 | |
174 | |
132 | static void |
175 | inline_size |
|
|
176 | void |
133 | port_fork (EV_P) |
177 | port_fork (EV_P) |
134 | { |
178 | { |
135 | close (backend_fd); |
179 | close (backend_fd); |
136 | |
180 | |
137 | while ((backend_fd = port_create ()) < 0) |
181 | while ((backend_fd = port_create ()) < 0) |
138 | syserr ("(libev) port"); |
182 | ev_syserr ("(libev) port"); |
139 | |
183 | |
140 | fcntl (backend_fd, F_SETFD, FD_CLOEXEC); |
184 | fcntl (backend_fd, F_SETFD, FD_CLOEXEC); |
141 | |
185 | |
142 | /* re-register interest in fds */ |
186 | /* re-register interest in fds */ |
143 | fd_rearm_all (EV_A); |
187 | fd_rearm_all (EV_A); |