1 | /* |
1 | /* |
2 | * libev solaris event port backend |
2 | * libev solaris event port backend |
3 | * |
3 | * |
4 | * Copyright (c) 2007,2008,2009,2010,2011 Marc Alexander Lehmann <libev@schmorp.de> |
4 | * Copyright (c) 2007,2008,2009,2010,2011,2019 Marc Alexander Lehmann <libev@schmorp.de> |
5 | * All rights reserved. |
5 | * All rights reserved. |
6 | * |
6 | * |
7 | * Redistribution and use in source and binary forms, with or without modifica- |
7 | * Redistribution and use in source and binary forms, with or without modifica- |
8 | * tion, are permitted provided that the following conditions are met: |
8 | * tion, are permitted provided that the following conditions are met: |
9 | * |
9 | * |
… | |
… | |
37 | * either the BSD or the GPL. |
37 | * either the BSD or the GPL. |
38 | */ |
38 | */ |
39 | |
39 | |
40 | /* useful reading: |
40 | /* useful reading: |
41 | * |
41 | * |
42 | * http://bugs.opensolaris.org/view_bug.do?bug_id=6268715 (random results) |
42 | * https://archive.is/jN6Ck (random results) |
43 | * http://bugs.opensolaris.org/view_bug.do?bug_id=6455223 (just totally broken) |
43 | * https://archive.is/bBikp (just totally broken) |
44 | * http://bugs.opensolaris.org/view_bug.do?bug_id=6873782 (manpage ETIME) |
44 | * https://archive.is/eJhmu (manpage ETIME) |
45 | * http://bugs.opensolaris.org/view_bug.do?bug_id=6874410 (implementation ETIME) |
45 | * https://archive.is/RbgYw (implementation ETIME) |
46 | * http://www.mail-archive.com/networking-discuss@opensolaris.org/msg11898.html ETIME vs. nget |
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) |
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) |
48 | * http://cvs.opensolaris.org/source/xref/onnv/onnv-gate/usr/src/uts/common/fs/portfs/port.c#1325 (kernel) |
49 | */ |
49 | */ |
50 | |
50 | |
… | |
… | |
53 | #include <poll.h> |
53 | #include <poll.h> |
54 | #include <port.h> |
54 | #include <port.h> |
55 | #include <string.h> |
55 | #include <string.h> |
56 | #include <errno.h> |
56 | #include <errno.h> |
57 | |
57 | |
58 | void inline_speed |
58 | inline_speed |
|
|
59 | void |
59 | port_associate_and_check (EV_P_ int fd, int ev) |
60 | port_associate_and_check (EV_P_ int fd, int ev) |
60 | { |
61 | { |
61 | if (0 > |
62 | if (0 > |
62 | port_associate ( |
63 | port_associate ( |
63 | backend_fd, PORT_SOURCE_FD, fd, |
64 | backend_fd, PORT_SOURCE_FD, fd, |
… | |
… | |
66 | 0 |
67 | 0 |
67 | ) |
68 | ) |
68 | ) |
69 | ) |
69 | { |
70 | { |
70 | if (errno == EBADFD) |
71 | if (errno == EBADFD) |
|
|
72 | { |
|
|
73 | assert (("libev: port_associate found invalid fd", errno != EBADFD)); |
71 | fd_kill (EV_A_ fd); |
74 | fd_kill (EV_A_ fd); |
|
|
75 | } |
72 | else |
76 | else |
73 | ev_syserr ("(libev) port_associate"); |
77 | ev_syserr ("(libev) port_associate"); |
74 | } |
78 | } |
75 | } |
79 | } |
76 | |
80 | |
… | |
… | |
107 | EV_ACQUIRE_CB; |
111 | EV_ACQUIRE_CB; |
108 | |
112 | |
109 | /* port_getn may or may not set nget on error */ |
113 | /* port_getn may or may not set nget on error */ |
110 | /* so we rely on port_events [0].portev_source not being updated */ |
114 | /* so we rely on port_events [0].portev_source not being updated */ |
111 | if (res == -1 && errno != ETIME && errno != EINTR) |
115 | if (res == -1 && errno != ETIME && errno != EINTR) |
112 | ev_syserr ("(libev) port_getn (see http://bugs.opensolaris.org/view_bug.do?bug_id=6268715, try LIBEV_FLAGS=3 env variable)"); |
116 | ev_syserr ("(libev) port_getn (see https://archive.is/jN6Ck, try LIBEV_FLAGS=3 env variable)"); |
113 | |
117 | |
114 | for (i = 0; i < nget; ++i) |
118 | for (i = 0; i < nget; ++i) |
115 | { |
119 | { |
116 | if (port_events [i].portev_source == PORT_SOURCE_FD) |
120 | if (port_events [i].portev_source == PORT_SOURCE_FD) |
117 | { |
121 | { |
… | |
… | |
126 | |
130 | |
127 | fd_change (EV_A_ fd, EV__IOFDSET); |
131 | fd_change (EV_A_ fd, EV__IOFDSET); |
128 | } |
132 | } |
129 | } |
133 | } |
130 | |
134 | |
131 | if (expect_false (nget == port_eventmax)) |
135 | if (ecb_expect_false (nget == port_eventmax)) |
132 | { |
136 | { |
133 | ev_free (port_events); |
137 | ev_free (port_events); |
134 | port_eventmax = array_nextsize (sizeof (port_event_t), port_eventmax, port_eventmax + 1); |
138 | port_eventmax = array_nextsize (sizeof (port_event_t), port_eventmax, port_eventmax + 1); |
135 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
139 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
136 | } |
140 | } |
137 | } |
141 | } |
138 | |
142 | |
139 | int inline_size |
143 | inline_size |
|
|
144 | int |
140 | port_init (EV_P_ int flags) |
145 | port_init (EV_P_ int flags) |
141 | { |
146 | { |
142 | /* Initialize the kernel queue */ |
147 | /* Initialize the kernel queue */ |
143 | if ((backend_fd = port_create ()) < 0) |
148 | if ((backend_fd = port_create ()) < 0) |
144 | return 0; |
149 | return 0; |
… | |
… | |
147 | |
152 | |
148 | fcntl (backend_fd, F_SETFD, FD_CLOEXEC); /* not sure if necessary, hopefully doesn't hurt */ |
153 | fcntl (backend_fd, F_SETFD, FD_CLOEXEC); /* not sure if necessary, hopefully doesn't hurt */ |
149 | |
154 | |
150 | /* if my reading of the opensolaris kernel sources are correct, then |
155 | /* if my reading of the opensolaris kernel sources are correct, then |
151 | * opensolaris does something very stupid: it checks if the time has already |
156 | * opensolaris does something very stupid: it checks if the time has already |
152 | * elapsed and doesn't round up if that is the case,m otherwise it DOES round |
157 | * elapsed and doesn't round up if that is the case, otherwise it DOES round |
153 | * up. Since we can't know what the case is, we need to guess by using a |
158 | * up. Since we can't know what the case is, we need to guess by using a |
154 | * "large enough" timeout. Normally, 1e-9 would be correct. |
159 | * "large enough" timeout. Normally, 1e-9 would be correct. |
155 | */ |
160 | */ |
156 | backend_mintime = 1e-3; /* needed to compensate for port_getn returning early */ |
161 | backend_mintime = EV_TS_CONST (1e-3); /* needed to compensate for port_getn returning early */ |
157 | backend_modify = port_modify; |
162 | backend_modify = port_modify; |
158 | backend_poll = port_poll; |
163 | backend_poll = port_poll; |
159 | |
164 | |
160 | port_eventmax = 64; /* initial number of events receivable per poll */ |
165 | port_eventmax = 64; /* initial number of events receivable per poll */ |
161 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
166 | port_events = (port_event_t *)ev_malloc (sizeof (port_event_t) * port_eventmax); |
162 | |
167 | |
163 | return EVBACKEND_PORT; |
168 | return EVBACKEND_PORT; |
164 | } |
169 | } |
165 | |
170 | |
166 | void inline_size |
171 | inline_size |
|
|
172 | void |
167 | port_destroy (EV_P) |
173 | port_destroy (EV_P) |
168 | { |
174 | { |
169 | ev_free (port_events); |
175 | ev_free (port_events); |
170 | } |
176 | } |
171 | |
177 | |
172 | void inline_size |
178 | inline_size |
|
|
179 | void |
173 | port_fork (EV_P) |
180 | port_fork (EV_P) |
174 | { |
181 | { |
175 | close (backend_fd); |
182 | close (backend_fd); |
176 | |
183 | |
177 | while ((backend_fd = port_create ()) < 0) |
184 | while ((backend_fd = port_create ()) < 0) |