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 Marc Alexander Lehmann <libev@schmorp.de> |
5 | * modification, are permitted provided that the following conditions |
5 | * All rights reserved. |
6 | * are met: |
|
|
7 | * |
6 | * |
|
|
7 | * Redistribution and use in source and binary forms, with or without modifica- |
|
|
8 | * tion, are permitted provided that the following conditions are met: |
|
|
9 | * |
8 | * 1. Redistributions of source code must retain the above copyright |
10 | * 1. Redistributions of source code must retain the above copyright notice, |
9 | * notice, this list of conditions and the following disclaimer. |
11 | * this list of conditions and the following disclaimer. |
|
|
12 | * |
10 | * 2. Redistributions in binary form must reproduce the above copyright |
13 | * 2. Redistributions in binary form must reproduce the above copyright |
11 | * notice, this list of conditions and the following disclaimer in the |
14 | * notice, this list of conditions and the following disclaimer in the |
12 | * documentation and/or other materials provided with the distribution. |
15 | * documentation and/or other materials provided with the distribution. |
13 | * 3. The name of the author may not be used to endorse or promote products |
16 | * |
14 | * derived from this software without specific prior written permission. |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED |
|
|
18 | * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MER- |
|
|
19 | * CHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO |
|
|
20 | * EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPE- |
|
|
21 | * CIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, |
|
|
22 | * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; |
|
|
23 | * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, |
|
|
24 | * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTH- |
|
|
25 | * ERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED |
|
|
26 | * OF THE POSSIBILITY OF SUCH DAMAGE. |
15 | * |
27 | * |
16 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
28 | * Alternatively, the contents of this file may be used under the terms of |
17 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
29 | * the GNU General Public License ("GPL") version 2 or any later version, |
18 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
30 | * in which case the provisions of the GPL are applicable instead of |
19 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
31 | * the above. If you wish to allow the use of your version of this file |
20 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
32 | * only under the terms of the GPL and not to allow others to use your |
21 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
33 | * version of this file under the BSD license, indicate your decision |
22 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
34 | * by deleting the provisions above and replace them with the notice |
23 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
35 | * and other provisions required by the GPL. If you do not delete the |
24 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
36 | * provisions above, a recipient may use your version of this file under |
25 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
37 | * either the BSD or the GPL. |
26 | */ |
38 | */ |
27 | |
39 | |
28 | #include <sys/types.h> |
40 | #include <sys/types.h> |
29 | #include <sys/time.h> |
41 | #include <sys/time.h> |
30 | #include <poll.h> |
42 | #include <poll.h> |
31 | #include <port.h> |
43 | #include <port.h> |
32 | #include <string.h> |
44 | #include <string.h> |
33 | #include <errno.h> |
45 | #include <errno.h> |
|
|
46 | |
|
|
47 | void inline_speed |
|
|
48 | port_associate_and_check (EV_P_ int fd, int ev) |
|
|
49 | { |
|
|
50 | if (0 > |
|
|
51 | port_associate ( |
|
|
52 | backend_fd, PORT_SOURCE_FD, fd, |
|
|
53 | (ev & EV_READ ? POLLIN : 0) |
|
|
54 | | (ev & EV_WRITE ? POLLOUT : 0), |
|
|
55 | 0 |
|
|
56 | ) |
|
|
57 | ) |
|
|
58 | { |
|
|
59 | if (errno == EBADFD) |
|
|
60 | fd_kill (EV_A_ fd); |
|
|
61 | else |
|
|
62 | ev_syserr ("(libev) port_associate"); |
|
|
63 | } |
|
|
64 | } |
34 | |
65 | |
35 | static void |
66 | static void |
36 | port_modify (EV_P_ int fd, int oev, int nev) |
67 | port_modify (EV_P_ int fd, int oev, int nev) |
37 | { |
68 | { |
38 | /* we need to reassociate no matter what, as closes are |
69 | /* we need to reassociate no matter what, as closes are |
39 | * once more silently being discarded. |
70 | * once more silently being discarded. |
40 | */ |
71 | */ |
41 | if (!nev) |
72 | if (!nev) |
42 | { |
73 | { |
43 | if (oev) |
74 | if (oev) |
44 | port_dissociate (port_fd, PORT_SOURCE_FD, fd); |
75 | port_dissociate (backend_fd, PORT_SOURCE_FD, fd); |
45 | } |
76 | } |
46 | else if (0 > |
|
|
47 | port_associate ( |
|
|
48 | port_fd, PORT_SOURCE_FD, fd, |
|
|
49 | (nev & EV_READ ? POLLIN : 0) |
|
|
50 | | (nev & EV_WRITE ? POLLOUT : 0), |
|
|
51 | 0 |
|
|
52 | ) |
|
|
53 | ) |
|
|
54 | { |
|
|
55 | if (errno == EBADFD) |
|
|
56 | fd_kill (EV_A_ fd); |
|
|
57 | else |
77 | else |
58 | syserr ("(libev) port_associate"); |
78 | port_associate_and_check (EV_A_ fd, nev); |
59 | } |
|
|
60 | } |
79 | } |
61 | |
80 | |
62 | static void |
81 | static void |
63 | port_poll (EV_P_ ev_tstamp timeout) |
82 | port_poll (EV_P_ ev_tstamp timeout) |
64 | { |
83 | { |
65 | int res, i; |
84 | int res, i; |
66 | struct timespec ts; |
85 | struct timespec ts; |
67 | uint_t nget = 1; |
86 | uint_t nget = 1; |
68 | |
87 | |
|
|
88 | EV_RELEASE_CB; |
69 | ts.tv_sec = (time_t)timeout; |
89 | ts.tv_sec = (time_t)timeout; |
70 | ts.tv_nsec = (long)(timeout - (ev_tstamp)ts.tv_sec) * 1e9; |
90 | ts.tv_nsec = (long)(timeout - (ev_tstamp)ts.tv_sec) * 1e9; |
71 | res = port_getn (port_fd, port_events, port_eventmax, &nget, &ts); |
91 | res = port_getn (backend_fd, port_events, port_eventmax, &nget, &ts); |
|
|
92 | EV_ACQUIRE_CB; |
72 | |
93 | |
73 | if (res < 0) |
94 | if (res == -1) |
74 | { |
95 | { |
75 | if (errno != EINTR && errno != ETIME) |
96 | if (errno != EINTR && errno != ETIME) |
76 | syserr ("(libev) port_getn"); |
97 | ev_syserr ("(libev) port_getn"); |
77 | |
98 | |
78 | return; |
99 | return; |
79 | } |
100 | } |
80 | |
101 | |
81 | for (i = 0; i < nget; ++i) |
102 | for (i = 0; i < nget; ++i) |
… | |
… | |
89 | fd, |
110 | fd, |
90 | (port_events [i].portev_events & (POLLOUT | POLLERR | POLLHUP) ? EV_WRITE : 0) |
111 | (port_events [i].portev_events & (POLLOUT | POLLERR | POLLHUP) ? EV_WRITE : 0) |
91 | | (port_events [i].portev_events & (POLLIN | POLLERR | POLLHUP) ? EV_READ : 0) |
112 | | (port_events [i].portev_events & (POLLIN | POLLERR | POLLHUP) ? EV_READ : 0) |
92 | ); |
113 | ); |
93 | |
114 | |
94 | anfds [fd].events = 0; /* event received == disassociated */ |
115 | port_associate_and_check (EV_A_ fd, anfds [fd].events); |
95 | fd_change (EV_A_ fd); /* need to reify later */ |
|
|
96 | } |
116 | } |
97 | } |
117 | } |
98 | |
118 | |
99 | if (expect_false (nget == port_eventmax)) |
119 | if (expect_false (nget == port_eventmax)) |
100 | { |
120 | { |
101 | ev_free (port_events); |
121 | ev_free (port_events); |
102 | port_eventmax = array_roundsize (port_event_t, port_eventmax << 1); |
122 | port_eventmax = array_nextsize (sizeof (port_event_t), port_eventmax, port_eventmax + 1); |
103 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
123 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
104 | } |
124 | } |
105 | } |
125 | } |
106 | |
126 | |
107 | static int |
127 | int inline_size |
108 | port_init (EV_P_ int flags) |
128 | port_init (EV_P_ int flags) |
109 | { |
129 | { |
110 | /* Initalize the kernel queue */ |
130 | /* Initalize the kernel queue */ |
111 | if ((port_fd = port_create ()) < 0) |
131 | if ((backend_fd = port_create ()) < 0) |
112 | return 0; |
132 | return 0; |
113 | |
133 | |
114 | fcntl (port_fd, F_SETFD, FD_CLOEXEC); /* not sure if necessary, hopefully doesn't hurt */ |
134 | fcntl (backend_fd, F_SETFD, FD_CLOEXEC); /* not sure if necessary, hopefully doesn't hurt */ |
115 | |
135 | |
116 | method_fudge = 1e-3; /* needed to compensate for port_getn returning early */ |
136 | backend_fudge = 1e-3; /* needed to compensate for port_getn returning early */ |
117 | method_modify = port_modify; |
137 | backend_modify = port_modify; |
118 | method_poll = port_poll; |
138 | backend_poll = port_poll; |
119 | |
139 | |
120 | port_eventmax = 64; /* intiial number of events receivable per poll */ |
140 | port_eventmax = 64; /* intiial number of events receivable per poll */ |
121 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
141 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
122 | |
142 | |
123 | return EVMETHOD_PORT; |
143 | return EVBACKEND_PORT; |
124 | } |
144 | } |
125 | |
145 | |
126 | static void |
146 | void inline_size |
127 | port_destroy (EV_P) |
147 | port_destroy (EV_P) |
128 | { |
148 | { |
129 | close (port_fd); |
|
|
130 | |
|
|
131 | ev_free (port_events); |
149 | ev_free (port_events); |
132 | } |
150 | } |
133 | |
151 | |
134 | static void |
152 | void inline_size |
135 | port_fork (EV_P) |
153 | port_fork (EV_P) |
136 | { |
154 | { |
137 | close (port_fd); |
155 | close (backend_fd); |
138 | |
156 | |
139 | while ((port_fd = port_create ()) < 0) |
157 | while ((backend_fd = port_create ()) < 0) |
140 | syserr ("(libev) port"); |
158 | ev_syserr ("(libev) port"); |
141 | |
159 | |
142 | fcntl (port_fd, F_SETFD, FD_CLOEXEC); |
160 | fcntl (backend_fd, F_SETFD, FD_CLOEXEC); |
143 | |
161 | |
144 | /* re-register interest in fds */ |
162 | /* re-register interest in fds */ |
145 | fd_rearm_all (EV_A); |
163 | fd_rearm_all (EV_A); |
146 | } |
164 | } |
147 | |
165 | |