Rev 1441 | Rev 1453 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 1441 | Rev 1452 | ||
---|---|---|---|
1 | /* |
1 | /* |
2 | * Copyright (C) 2006 Ondrej Palkovsky |
2 | * Copyright (C) 2006 Ondrej Palkovsky |
3 | * All rights reserved. |
3 | * All rights reserved. |
4 | * |
4 | * |
5 | * Redistribution and use in source and binary forms, with or without |
5 | * Redistribution and use in source and binary forms, with or without |
6 | * modification, are permitted provided that the following conditions |
6 | * modification, are permitted provided that the following conditions |
7 | * are met: |
7 | * are met: |
8 | * |
8 | * |
9 | * - Redistributions of source code must retain the above copyright |
9 | * - Redistributions of source code must retain the above copyright |
10 | * notice, this list of conditions and the following disclaimer. |
10 | * notice, this list of conditions and the following disclaimer. |
11 | * - Redistributions in binary form must reproduce the above copyright |
11 | * - Redistributions in binary form must reproduce the above copyright |
12 | * notice, this list of conditions and the following disclaimer in the |
12 | * notice, this list of conditions and the following disclaimer in the |
13 | * documentation and/or other materials provided with the distribution. |
13 | * documentation and/or other materials provided with the distribution. |
14 | * - The name of the author may not be used to endorse or promote products |
14 | * - The name of the author may not be used to endorse or promote products |
15 | * derived from this software without specific prior written permission. |
15 | * derived from this software without specific prior written permission. |
16 | * |
16 | * |
17 | * 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 |
18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
22 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
22 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
23 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
23 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
24 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
24 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
25 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
25 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
27 | */ |
27 | */ |
28 | 28 | ||
29 | /** |
29 | /** |
30 | * Asynchronous library |
30 | * Asynchronous library |
31 | * |
31 | * |
32 | * The aim of this library is facilitating writing programs utilizing |
32 | * The aim of this library is facilitating writing programs utilizing |
33 | * the asynchronous nature of Helenos IPC, yet using a normal way |
33 | * the asynchronous nature of Helenos IPC, yet using a normal way |
34 | * of programming. |
34 | * of programming. |
35 | * |
35 | * |
36 | * You should be able to write very simple multithreaded programs, |
36 | * You should be able to write very simple multithreaded programs, |
37 | * the async framework will automatically take care of most synchronization |
37 | * the async framework will automatically take care of most synchronization |
38 | * problems. |
38 | * problems. |
39 | * |
39 | * |
40 | * Default semantics: |
40 | * Default semantics: |
41 | * - send() - send asynchronously. If the kernel refuses to send more |
41 | * - send() - send asynchronously. If the kernel refuses to send more |
42 | * messages, [ try to get responses from kernel, if nothing |
42 | * messages, [ try to get responses from kernel, if nothing |
43 | * found, might try synchronous ] |
43 | * found, might try synchronous ] |
44 | * |
44 | * |
45 | * Example of use: |
45 | * Example of use: |
46 | * |
46 | * |
47 | * 1) Multithreaded client application |
47 | * 1) Multithreaded client application |
48 | * create_thread(thread1); |
48 | * create_thread(thread1); |
49 | * create_thread(thread2); |
49 | * create_thread(thread2); |
50 | * ... |
50 | * ... |
51 | * |
51 | * |
52 | * thread1() { |
52 | * thread1() { |
53 | * conn = ipc_connect_me_to(); |
53 | * conn = ipc_connect_me_to(); |
54 | * c1 = send(conn); |
54 | * c1 = send(conn); |
55 | * c2 = send(conn); |
55 | * c2 = send(conn); |
56 | * wait_for(c1); |
56 | * wait_for(c1); |
57 | * wait_for(c2); |
57 | * wait_for(c2); |
58 | * } |
58 | * } |
59 | * |
59 | * |
60 | * |
60 | * |
61 | * 2) Multithreaded server application |
61 | * 2) Multithreaded server application |
62 | * main() { |
62 | * main() { |
63 | * async_manager(); |
63 | * async_manager(); |
64 | * } |
64 | * } |
65 | * |
65 | * |
66 | * |
66 | * |
67 | * client_connection(icallid, *icall) { |
67 | * client_connection(icallid, *icall) { |
68 | * if (want_refuse) { |
68 | * if (want_refuse) { |
69 | * ipc_answer_fast(icallid, ELIMIT, 0, 0); |
69 | * ipc_answer_fast(icallid, ELIMIT, 0, 0); |
70 | * return; |
70 | * return; |
71 | * } |
71 | * } |
72 | * ipc_answer_fast(icallid, 0, 0, 0); |
72 | * ipc_answer_fast(icallid, 0, 0, 0); |
73 | * |
73 | * |
74 | * callid = async_get_call(&call); |
74 | * callid = async_get_call(&call); |
75 | * handle(callid, call); |
75 | * handle(callid, call); |
76 | * ipc_answer_fast(callid, 1,2,3); |
76 | * ipc_answer_fast(callid, 1,2,3); |
77 | * |
77 | * |
78 | * callid = async_get_call(&call); |
78 | * callid = async_get_call(&call); |
79 | * .... |
79 | * .... |
80 | * } |
80 | * } |
81 | * |
81 | * |
82 | * TODO: Detaching/joining dead psthreads? |
82 | * TODO: Detaching/joining dead psthreads? |
83 | */ |
83 | */ |
84 | #include <futex.h> |
84 | #include <futex.h> |
85 | #include <async.h> |
85 | #include <async.h> |
86 | #include <psthread.h> |
86 | #include <psthread.h> |
87 | #include <stdio.h> |
87 | #include <stdio.h> |
88 | #include <libadt/hash_table.h> |
88 | #include <libadt/hash_table.h> |
89 | #include <libadt/list.h> |
89 | #include <libadt/list.h> |
90 | #include <ipc/ipc.h> |
90 | #include <ipc/ipc.h> |
91 | #include <assert.h> |
91 | #include <assert.h> |
92 | #include <errno.h> |
92 | #include <errno.h> |
93 | #include <time.h> |
93 | #include <time.h> |
94 | #include <arch/barrier.h> |
94 | #include <arch/barrier.h> |
95 | 95 | ||
96 | static atomic_t async_futex = FUTEX_INITIALIZER; |
96 | static atomic_t async_futex = FUTEX_INITIALIZER; |
97 | static hash_table_t conn_hash_table; |
97 | static hash_table_t conn_hash_table; |
98 | static LIST_INITIALIZE(timeout_list); |
98 | static LIST_INITIALIZE(timeout_list); |
99 | 99 | ||
100 | typedef struct { |
100 | typedef struct { |
101 | pstid_t ptid; /**< Thread waiting for this message */ |
101 | pstid_t ptid; /**< Thread waiting for this message */ |
102 | int active; /**< If this thread is currently active */ |
102 | int active; /**< If this thread is currently active */ |
103 | int done; /**< If reply was received */ |
103 | int done; /**< If reply was received */ |
104 | ipc_call_t *dataptr; /**< Pointer where the answer data |
104 | ipc_call_t *dataptr; /**< Pointer where the answer data |
105 | * should be stored */ |
105 | * should be stored */ |
106 | struct timeval expires; /**< Expiration time for waiting thread */ |
106 | struct timeval expires; /**< Expiration time for waiting thread */ |
107 | int has_timeout; /**< If true, this struct is in timeout list */ |
107 | int has_timeout; /**< If true, this struct is in timeout list */ |
108 | link_t link; |
108 | link_t link; |
109 | 109 | ||
110 | ipcarg_t retval; |
110 | ipcarg_t retval; |
111 | } amsg_t; |
111 | } amsg_t; |
112 | 112 | ||
113 | typedef struct { |
113 | typedef struct { |
114 | link_t link; |
114 | link_t link; |
115 | ipc_callid_t callid; |
115 | ipc_callid_t callid; |
116 | ipc_call_t call; |
116 | ipc_call_t call; |
117 | } msg_t; |
117 | } msg_t; |
118 | 118 | ||
119 | typedef struct { |
119 | typedef struct { |
120 | link_t link; |
120 | link_t link; |
121 | ipcarg_t in_phone_hash; /**< Incoming phone hash. */ |
121 | ipcarg_t in_phone_hash; /**< Incoming phone hash. */ |
122 | link_t msg_queue; /**< Messages that should be delivered to this thread */ |
122 | link_t msg_queue; /**< Messages that should be delivered to this thread */ |
123 | pstid_t ptid; /**< Thread associated with this connection */ |
123 | pstid_t ptid; /**< Thread associated with this connection */ |
124 | int active; /**< If this thread is currently active */ |
124 | int active; /**< If this thread is currently active */ |
125 | /* Structures for connection opening packet */ |
125 | /* Structures for connection opening packet */ |
126 | ipc_callid_t callid; |
126 | ipc_callid_t callid; |
127 | ipc_call_t call; |
127 | ipc_call_t call; |
128 | void (*cthread)(ipc_callid_t,ipc_call_t *); |
128 | void (*cthread)(ipc_callid_t,ipc_call_t *); |
129 | } connection_t; |
129 | } connection_t; |
130 | 130 | ||
131 | __thread connection_t *PS_connection; |
131 | __thread connection_t *PS_connection; |
132 | 132 | ||
133 | /** Add microseconds to give timeval */ |
133 | /** Add microseconds to give timeval */ |
134 | static void tv_add(struct timeval *tv, suseconds_t usecs) |
134 | static void tv_add(struct timeval *tv, suseconds_t usecs) |
135 | { |
135 | { |
136 | tv->tv_sec += usecs / 1000000; |
136 | tv->tv_sec += usecs / 1000000; |
137 | tv->tv_usec += usecs % 1000000; |
137 | tv->tv_usec += usecs % 1000000; |
138 | if (tv->tv_usec > 1000000) { |
138 | if (tv->tv_usec > 1000000) { |
139 | tv->tv_sec++; |
139 | tv->tv_sec++; |
140 | tv->tv_usec -= 1000000; |
140 | tv->tv_usec -= 1000000; |
141 | } |
141 | } |
142 | } |
142 | } |
143 | 143 | ||
144 | /** Subtract 2 timevals, return microseconds difference */ |
144 | /** Subtract 2 timevals, return microseconds difference */ |
145 | static suseconds_t tv_sub(struct timeval *tv1, struct timeval *tv2) |
145 | static suseconds_t tv_sub(struct timeval *tv1, struct timeval *tv2) |
146 | { |
146 | { |
147 | suseconds_t result; |
147 | suseconds_t result; |
148 | 148 | ||
149 | result = tv1->tv_usec - tv2->tv_usec; |
149 | result = tv1->tv_usec - tv2->tv_usec; |
150 | result += (tv1->tv_sec - tv2->tv_sec) * 1000000; |
150 | result += (tv1->tv_sec - tv2->tv_sec) * 1000000; |
151 | 151 | ||
152 | return result; |
152 | return result; |
153 | } |
153 | } |
154 | 154 | ||
155 | /** Compare timeval |
155 | /** Compare timeval |
156 | * |
156 | * |
157 | * @return 1 if tv1 > tv2, otherwise 0 |
157 | * @return 1 if tv1 > tv2, otherwise 0 |
158 | */ |
158 | */ |
159 | static int tv_gt(struct timeval *tv1, struct timeval *tv2) |
159 | static int tv_gt(struct timeval *tv1, struct timeval *tv2) |
160 | { |
160 | { |
161 | if (tv1->tv_sec > tv2->tv_sec) |
161 | if (tv1->tv_sec > tv2->tv_sec) |
162 | return 1; |
162 | return 1; |
163 | if (tv1->tv_sec == tv2->tv_sec && tv1->tv_usec > tv2->tv_usec) |
163 | if (tv1->tv_sec == tv2->tv_sec && tv1->tv_usec > tv2->tv_usec) |
164 | return 1; |
164 | return 1; |
165 | return 0; |
165 | return 0; |
166 | } |
166 | } |
167 | 167 | ||
168 | /* Hash table functions */ |
168 | /* Hash table functions */ |
169 | #define CONN_HASH_TABLE_CHAINS 32 |
169 | #define CONN_HASH_TABLE_CHAINS 32 |
170 | 170 | ||
171 | static hash_index_t conn_hash(unsigned long *key) |
171 | static hash_index_t conn_hash(unsigned long *key) |
172 | { |
172 | { |
173 | assert(key); |
173 | assert(key); |
174 | return ((*key) >> 4) % CONN_HASH_TABLE_CHAINS; |
174 | return ((*key) >> 4) % CONN_HASH_TABLE_CHAINS; |
175 | } |
175 | } |
176 | 176 | ||
177 | static int conn_compare(unsigned long key[], hash_count_t keys, link_t *item) |
177 | static int conn_compare(unsigned long key[], hash_count_t keys, link_t *item) |
178 | { |
178 | { |
179 | connection_t *hs; |
179 | connection_t *hs; |
180 | 180 | ||
181 | hs = hash_table_get_instance(item, connection_t, link); |
181 | hs = hash_table_get_instance(item, connection_t, link); |
182 | 182 | ||
183 | return key[0] == hs->in_phone_hash; |
183 | return key[0] == hs->in_phone_hash; |
184 | } |
184 | } |
185 | 185 | ||
186 | static void conn_remove(link_t *item) |
186 | static void conn_remove(link_t *item) |
187 | { |
187 | { |
188 | free(hash_table_get_instance(item, connection_t, link)); |
188 | free(hash_table_get_instance(item, connection_t, link)); |
189 | } |
189 | } |
190 | 190 | ||
191 | 191 | ||
192 | /** Operations for NS hash table. */ |
192 | /** Operations for NS hash table. */ |
193 | static hash_table_operations_t conn_hash_table_ops = { |
193 | static hash_table_operations_t conn_hash_table_ops = { |
194 | .hash = conn_hash, |
194 | .hash = conn_hash, |
195 | .compare = conn_compare, |
195 | .compare = conn_compare, |
196 | .remove_callback = conn_remove |
196 | .remove_callback = conn_remove |
197 | }; |
197 | }; |
198 | 198 | ||
199 | /*************************************************/ |
199 | /*************************************************/ |
200 | 200 | ||
201 | /** Try to route a call to an appropriate connection thread |
201 | /** Try to route a call to an appropriate connection thread |
202 | * |
202 | * |
203 | */ |
203 | */ |
204 | static int route_call(ipc_callid_t callid, ipc_call_t *call) |
204 | static int route_call(ipc_callid_t callid, ipc_call_t *call) |
205 | { |
205 | { |
206 | connection_t *conn; |
206 | connection_t *conn; |
207 | msg_t *msg; |
207 | msg_t *msg; |
208 | link_t *hlp; |
208 | link_t *hlp; |
209 | unsigned long key; |
209 | unsigned long key; |
210 | 210 | ||
211 | futex_down(&async_futex); |
211 | futex_down(&async_futex); |
212 | 212 | ||
213 | key = call->in_phone_hash; |
213 | key = call->in_phone_hash; |
214 | hlp = hash_table_find(&conn_hash_table, &key); |
214 | hlp = hash_table_find(&conn_hash_table, &key); |
215 | if (!hlp) { |
215 | if (!hlp) { |
216 | futex_up(&async_futex); |
216 | futex_up(&async_futex); |
217 | return 0; |
217 | return 0; |
218 | } |
218 | } |
219 | conn = hash_table_get_instance(hlp, connection_t, link); |
219 | conn = hash_table_get_instance(hlp, connection_t, link); |
220 | 220 | ||
221 | msg = malloc(sizeof(*msg)); |
221 | msg = malloc(sizeof(*msg)); |
222 | msg->callid = callid; |
222 | msg->callid = callid; |
223 | msg->call = *call; |
223 | msg->call = *call; |
224 | list_append(&msg->link, &conn->msg_queue); |
224 | list_append(&msg->link, &conn->msg_queue); |
225 | 225 | ||
226 | if (!conn->active) { |
226 | if (!conn->active) { |
227 | conn->active = 1; |
227 | conn->active = 1; |
228 | psthread_add_ready(conn->ptid); |
228 | psthread_add_ready(conn->ptid); |
229 | } |
229 | } |
230 | 230 | ||
231 | futex_up(&async_futex); |
231 | futex_up(&async_futex); |
232 | 232 | ||
233 | return 1; |
233 | return 1; |
234 | } |
234 | } |
235 | 235 | ||
236 | /** Return new incoming message for current(thread-local) connection */ |
236 | /** Return new incoming message for current(thread-local) connection */ |
237 | ipc_callid_t async_get_call(ipc_call_t *call) |
237 | ipc_callid_t async_get_call(ipc_call_t *call) |
238 | { |
238 | { |
239 | msg_t *msg; |
239 | msg_t *msg; |
240 | ipc_callid_t callid; |
240 | ipc_callid_t callid; |
241 | connection_t *conn; |
241 | connection_t *conn; |
242 | 242 | ||
243 | futex_down(&async_futex); |
243 | futex_down(&async_futex); |
244 | 244 | ||
245 | conn = PS_connection; |
245 | conn = PS_connection; |
246 | /* If nothing in queue, wait until something appears */ |
246 | /* If nothing in queue, wait until something appears */ |
247 | if (list_empty(&conn->msg_queue)) { |
247 | if (list_empty(&conn->msg_queue)) { |
248 | conn->active = 0; |
248 | conn->active = 0; |
249 | psthread_schedule_next_adv(PS_TO_MANAGER); |
249 | psthread_schedule_next_adv(PS_TO_MANAGER); |
250 | } |
250 | } |
251 | 251 | ||
252 | msg = list_get_instance(conn->msg_queue.next, msg_t, link); |
252 | msg = list_get_instance(conn->msg_queue.next, msg_t, link); |
253 | list_remove(&msg->link); |
253 | list_remove(&msg->link); |
254 | callid = msg->callid; |
254 | callid = msg->callid; |
255 | *call = msg->call; |
255 | *call = msg->call; |
256 | free(msg); |
256 | free(msg); |
257 | 257 | ||
258 | futex_up(&async_futex); |
258 | futex_up(&async_futex); |
259 | return callid; |
259 | return callid; |
260 | } |
260 | } |
261 | 261 | ||
262 | /** Thread function that gets created on new connection |
262 | /** Thread function that gets created on new connection |
263 | * |
263 | * |
264 | * This function is defined as a weak symbol - to be redefined in |
264 | * This function is defined as a weak symbol - to be redefined in |
265 | * user code. |
265 | * user code. |
266 | */ |
266 | */ |
267 | void client_connection(ipc_callid_t callid, ipc_call_t *call) |
267 | void client_connection(ipc_callid_t callid, ipc_call_t *call) |
268 | { |
268 | { |
269 | ipc_answer_fast(callid, ENOENT, 0, 0); |
269 | ipc_answer_fast(callid, ENOENT, 0, 0); |
270 | } |
270 | } |
271 | 271 | ||
- | 272 | /** Function that gets created on interrupt receival |
|
- | 273 | * |
|
- | 274 | * This function is defined as a weak symbol - to be redefined in |
|
- | 275 | * user code. |
|
- | 276 | */ |
|
- | 277 | void interrupt_received(ipc_call_t *call) |
|
- | 278 | { |
|
- | 279 | } |
|
- | 280 | ||
- | 281 | ||
272 | /** Wrapper for client connection thread |
282 | /** Wrapper for client connection thread |
273 | * |
283 | * |
274 | * When new connection arrives, thread with this function is created. |
284 | * When new connection arrives, thread with this function is created. |
275 | * It calls client_connection and does final cleanup. |
285 | * It calls client_connection and does final cleanup. |
276 | * |
286 | * |
277 | * @parameter arg Connection structure pointer |
287 | * @parameter arg Connection structure pointer |
278 | */ |
288 | */ |
279 | static int connection_thread(void *arg) |
289 | static int connection_thread(void *arg) |
280 | { |
290 | { |
281 | unsigned long key; |
291 | unsigned long key; |
282 | msg_t *msg; |
292 | msg_t *msg; |
283 | connection_t *conn; |
293 | connection_t *conn; |
284 | 294 | ||
285 | /* Setup thread local connection pointer */ |
295 | /* Setup thread local connection pointer */ |
286 | PS_connection = (connection_t *)arg; |
296 | PS_connection = (connection_t *)arg; |
287 | conn = PS_connection; |
297 | conn = PS_connection; |
288 | conn->cthread(conn->callid, &conn->call); |
298 | conn->cthread(conn->callid, &conn->call); |
289 | 299 | ||
290 | /* Remove myself from connection hash table */ |
300 | /* Remove myself from connection hash table */ |
291 | futex_down(&async_futex); |
301 | futex_down(&async_futex); |
292 | key = conn->in_phone_hash; |
302 | key = conn->in_phone_hash; |
293 | hash_table_remove(&conn_hash_table, &key, 1); |
303 | hash_table_remove(&conn_hash_table, &key, 1); |
294 | futex_up(&async_futex); |
304 | futex_up(&async_futex); |
295 | /* Answer all remaining messages with ehangup */ |
305 | /* Answer all remaining messages with ehangup */ |
296 | while (!list_empty(&conn->msg_queue)) { |
306 | while (!list_empty(&conn->msg_queue)) { |
297 | msg = list_get_instance(conn->msg_queue.next, msg_t, link); |
307 | msg = list_get_instance(conn->msg_queue.next, msg_t, link); |
298 | list_remove(&msg->link); |
308 | list_remove(&msg->link); |
299 | ipc_answer_fast(msg->callid, EHANGUP, 0, 0); |
309 | ipc_answer_fast(msg->callid, EHANGUP, 0, 0); |
300 | free(msg); |
310 | free(msg); |
301 | } |
311 | } |
302 | } |
312 | } |
303 | 313 | ||
304 | /** Create new thread for a new connection |
314 | /** Create new thread for a new connection |
305 | * |
315 | * |
306 | * Creates new thread for connection, fills in connection |
316 | * Creates new thread for connection, fills in connection |
307 | * structures and inserts it into the hash table, so that |
317 | * structures and inserts it into the hash table, so that |
308 | * later we can easily do routing of messages to particular |
318 | * later we can easily do routing of messages to particular |
309 | * threads. |
319 | * threads. |
310 | * |
320 | * |
- | 321 | * @param in_phone_hash Identification of the incoming connection |
|
311 | * @param callid Callid of the IPC_M_CONNECT_ME_TO packet |
322 | * @param callid Callid of the IPC_M_CONNECT_ME_TO packet |
312 | * @param call Call data of the opening packet |
323 | * @param call Call data of the opening packet |
313 | * @param cthread Thread function that should be called upon |
324 | * @param cthread Thread function that should be called upon |
314 | * opening the connection |
325 | * opening the connection |
315 | * @return New thread id |
326 | * @return New thread id |
316 | */ |
327 | */ |
317 | pstid_t async_new_connection(ipc_callid_t callid, ipc_call_t *call, |
328 | pstid_t async_new_connection(ipcarg_t in_phone_hash,ipc_callid_t callid, |
- | 329 | ipc_call_t *call, |
|
318 | void (*cthread)(ipc_callid_t,ipc_call_t *)) |
330 | void (*cthread)(ipc_callid_t,ipc_call_t *)) |
319 | { |
331 | { |
320 | pstid_t ptid; |
332 | pstid_t ptid; |
321 | connection_t *conn; |
333 | connection_t *conn; |
322 | unsigned long key; |
334 | unsigned long key; |
323 | 335 | ||
324 | conn = malloc(sizeof(*conn)); |
336 | conn = malloc(sizeof(*conn)); |
325 | if (!conn) { |
337 | if (!conn) { |
326 | ipc_answer_fast(callid, ENOMEM, 0, 0); |
338 | ipc_answer_fast(callid, ENOMEM, 0, 0); |
327 | return NULL; |
339 | return NULL; |
328 | } |
340 | } |
329 | conn->in_phone_hash = IPC_GET_ARG3(*call); |
341 | conn->in_phone_hash = in_phone_hash; |
330 | list_initialize(&conn->msg_queue); |
342 | list_initialize(&conn->msg_queue); |
331 | conn->ptid = psthread_create(connection_thread, conn); |
343 | conn->ptid = psthread_create(connection_thread, conn); |
332 | conn->callid = callid; |
344 | conn->callid = callid; |
333 | conn->call = *call; |
345 | conn->call = *call; |
334 | conn->active = 1; /* We will activate it asap */ |
346 | conn->active = 1; /* We will activate it asap */ |
335 | conn->cthread = cthread; |
347 | conn->cthread = cthread; |
336 | list_initialize(&conn->link); |
348 | list_initialize(&conn->link); |
337 | if (!conn->ptid) { |
349 | if (!conn->ptid) { |
338 | free(conn); |
350 | free(conn); |
339 | ipc_answer_fast(callid, ENOMEM, 0, 0); |
351 | ipc_answer_fast(callid, ENOMEM, 0, 0); |
340 | return NULL; |
352 | return NULL; |
341 | } |
353 | } |
342 | key = conn->in_phone_hash; |
354 | key = conn->in_phone_hash; |
343 | futex_down(&async_futex); |
355 | futex_down(&async_futex); |
344 | /* Add connection to hash table */ |
356 | /* Add connection to hash table */ |
345 | hash_table_insert(&conn_hash_table, &key, &conn->link); |
357 | hash_table_insert(&conn_hash_table, &key, &conn->link); |
346 | futex_up(&async_futex); |
358 | futex_up(&async_futex); |
347 | 359 | ||
348 | psthread_add_ready(conn->ptid); |
360 | psthread_add_ready(conn->ptid); |
349 | 361 | ||
350 | return conn->ptid; |
362 | return conn->ptid; |
351 | } |
363 | } |
352 | 364 | ||
353 | /** Handle call that was received */ |
365 | /** Handle call that was received */ |
354 | static void handle_call(ipc_callid_t callid, ipc_call_t *call) |
366 | static void handle_call(ipc_callid_t callid, ipc_call_t *call) |
355 | { |
367 | { |
356 | if (route_call(callid, call)) |
368 | /* Unrouted call - do some default behaviour */ |
357 | return; |
- | |
358 | - | ||
359 | switch (IPC_GET_METHOD(*call)) { |
369 | switch (IPC_GET_METHOD(*call)) { |
360 | case IPC_M_INTERRUPT: |
370 | case IPC_M_INTERRUPT: |
- | 371 | interrupt_received(call); |
|
361 | break; |
372 | return; |
362 | case IPC_M_CONNECT_ME_TO: |
373 | case IPC_M_CONNECT_ME_TO: |
363 | /* Open new connection with thread etc. */ |
374 | /* Open new connection with thread etc. */ |
364 | async_new_connection(callid, call, client_connection); |
375 | async_new_connection(IPC_GET_ARG3(*call), callid, call, client_connection); |
365 | break; |
376 | return; |
366 | default: |
- | |
367 | ipc_answer_fast(callid, EHANGUP, 0, 0); |
- | |
368 | } |
377 | } |
- | 378 | ||
- | 379 | /* Try to route call through connection tables */ |
|
- | 380 | if (route_call(callid, call)) |
|
- | 381 | return; |
|
- | 382 | ||
- | 383 | /* Unknown call from unknown phone - hang it up */ |
|
- | 384 | ipc_answer_fast(callid, EHANGUP, 0, 0); |
|
369 | } |
385 | } |
370 | 386 | ||
371 | /** Fire all timeouts that expired */ |
387 | /** Fire all timeouts that expired */ |
372 | static void handle_expired_timeouts(void) |
388 | static void handle_expired_timeouts(void) |
373 | { |
389 | { |
374 | struct timeval tv; |
390 | struct timeval tv; |
375 | amsg_t *amsg; |
391 | amsg_t *amsg; |
376 | link_t *cur; |
392 | link_t *cur; |
377 | 393 | ||
378 | gettimeofday(&tv,NULL); |
394 | gettimeofday(&tv,NULL); |
379 | futex_down(&async_futex); |
395 | futex_down(&async_futex); |
380 | 396 | ||
381 | cur = timeout_list.next; |
397 | cur = timeout_list.next; |
382 | while (cur != &timeout_list) { |
398 | while (cur != &timeout_list) { |
383 | amsg = list_get_instance(cur,amsg_t,link); |
399 | amsg = list_get_instance(cur,amsg_t,link); |
384 | if (tv_gt(&amsg->expires, &tv)) |
400 | if (tv_gt(&amsg->expires, &tv)) |
385 | break; |
401 | break; |
386 | cur = cur->next; |
402 | cur = cur->next; |
387 | list_remove(&amsg->link); |
403 | list_remove(&amsg->link); |
388 | amsg->has_timeout = 0; |
404 | amsg->has_timeout = 0; |
389 | /* Redundant condition? The thread should not |
405 | /* Redundant condition? The thread should not |
390 | * be active when it gets here. |
406 | * be active when it gets here. |
391 | */ |
407 | */ |
392 | if (!amsg->active) { |
408 | if (!amsg->active) { |
393 | amsg->active = 1; |
409 | amsg->active = 1; |
394 | psthread_add_ready(amsg->ptid); |
410 | psthread_add_ready(amsg->ptid); |
395 | } |
411 | } |
396 | } |
412 | } |
397 | 413 | ||
398 | futex_up(&async_futex); |
414 | futex_up(&async_futex); |
399 | } |
415 | } |
400 | 416 | ||
401 | /** Endless loop dispatching incoming calls and answers */ |
417 | /** Endless loop dispatching incoming calls and answers */ |
402 | int async_manager(void) |
418 | int async_manager(void) |
403 | { |
419 | { |
404 | ipc_call_t call; |
420 | ipc_call_t call; |
405 | ipc_callid_t callid; |
421 | ipc_callid_t callid; |
406 | int timeout; |
422 | int timeout; |
407 | amsg_t *amsg; |
423 | amsg_t *amsg; |
408 | struct timeval tv; |
424 | struct timeval tv; |
409 | 425 | ||
410 | while (1) { |
426 | while (1) { |
411 | if (psthread_schedule_next_adv(PS_FROM_MANAGER)) { |
427 | if (psthread_schedule_next_adv(PS_FROM_MANAGER)) { |
412 | futex_up(&async_futex); /* async_futex is always held |
428 | futex_up(&async_futex); /* async_futex is always held |
413 | * when entering manager thread |
429 | * when entering manager thread |
414 | */ |
430 | */ |
415 | continue; |
431 | continue; |
416 | } |
432 | } |
417 | futex_down(&async_futex); |
433 | futex_down(&async_futex); |
418 | if (!list_empty(&timeout_list)) { |
434 | if (!list_empty(&timeout_list)) { |
419 | amsg = list_get_instance(timeout_list.next,amsg_t,link); |
435 | amsg = list_get_instance(timeout_list.next,amsg_t,link); |
420 | gettimeofday(&tv,NULL); |
436 | gettimeofday(&tv,NULL); |
421 | if (tv_gt(&tv, &amsg->expires)) { |
437 | if (tv_gt(&tv, &amsg->expires)) { |
422 | handle_expired_timeouts(); |
438 | handle_expired_timeouts(); |
423 | continue; |
439 | continue; |
424 | } else |
440 | } else |
425 | timeout = tv_sub(&amsg->expires, &tv); |
441 | timeout = tv_sub(&amsg->expires, &tv); |
426 | } else |
442 | } else |
427 | timeout = SYNCH_NO_TIMEOUT; |
443 | timeout = SYNCH_NO_TIMEOUT; |
428 | futex_up(&async_futex); |
444 | futex_up(&async_futex); |
429 | 445 | ||
430 | callid = ipc_wait_cycle(&call, timeout, SYNCH_BLOCKING); |
446 | callid = ipc_wait_cycle(&call, timeout, SYNCH_BLOCKING); |
431 | 447 | ||
432 | if (!callid) { |
448 | if (!callid) { |
433 | handle_expired_timeouts(); |
449 | handle_expired_timeouts(); |
434 | continue; |
450 | continue; |
435 | } |
451 | } |
436 | 452 | ||
437 | if (callid & IPC_CALLID_ANSWERED) |
453 | if (callid & IPC_CALLID_ANSWERED) |
438 | continue; |
454 | continue; |
439 | 455 | ||
440 | handle_call(callid, &call); |
456 | handle_call(callid, &call); |
441 | } |
457 | } |
442 | } |
458 | } |
443 | 459 | ||
444 | /** Function to start async_manager as a standalone thread |
460 | /** Function to start async_manager as a standalone thread |
445 | * |
461 | * |
446 | * When more kernel threads are used, one async manager should |
462 | * When more kernel threads are used, one async manager should |
447 | * exist per thread. The particular implementation may change, |
463 | * exist per thread. The particular implementation may change, |
448 | * currently one async_manager is started automatically per kernel |
464 | * currently one async_manager is started automatically per kernel |
449 | * thread except main thread. |
465 | * thread except main thread. |
450 | */ |
466 | */ |
451 | static int async_manager_thread(void *arg) |
467 | static int async_manager_thread(void *arg) |
452 | { |
468 | { |
453 | futex_up(&async_futex); /* async_futex is always locked when entering |
469 | futex_up(&async_futex); /* async_futex is always locked when entering |
454 | * manager */ |
470 | * manager */ |
455 | async_manager(); |
471 | async_manager(); |
456 | } |
472 | } |
457 | 473 | ||
458 | /** Add one manager to manager list */ |
474 | /** Add one manager to manager list */ |
459 | void async_create_manager(void) |
475 | void async_create_manager(void) |
460 | { |
476 | { |
461 | pstid_t ptid; |
477 | pstid_t ptid; |
462 | 478 | ||
463 | ptid = psthread_create(async_manager_thread, NULL); |
479 | ptid = psthread_create(async_manager_thread, NULL); |
464 | psthread_add_manager(ptid); |
480 | psthread_add_manager(ptid); |
465 | } |
481 | } |
466 | 482 | ||
467 | /** Remove one manager from manager list */ |
483 | /** Remove one manager from manager list */ |
468 | void async_destroy_manager(void) |
484 | void async_destroy_manager(void) |
469 | { |
485 | { |
470 | psthread_remove_manager(); |
486 | psthread_remove_manager(); |
471 | } |
487 | } |
472 | 488 | ||
473 | /** Initialize internal structures needed for async manager */ |
489 | /** Initialize internal structures needed for async manager */ |
474 | int _async_init(void) |
490 | int _async_init(void) |
475 | { |
491 | { |
476 | if (!hash_table_create(&conn_hash_table, CONN_HASH_TABLE_CHAINS, 1, &conn_hash_table_ops)) { |
492 | if (!hash_table_create(&conn_hash_table, CONN_HASH_TABLE_CHAINS, 1, &conn_hash_table_ops)) { |
477 | printf("%s: cannot create hash table\n", "async"); |
493 | printf("%s: cannot create hash table\n", "async"); |
478 | return ENOMEM; |
494 | return ENOMEM; |
479 | } |
495 | } |
480 | 496 | ||
481 | } |
497 | } |
482 | 498 | ||
483 | /** IPC handler for messages in async framework |
499 | /** IPC handler for messages in async framework |
484 | * |
500 | * |
485 | * Notify thread that is waiting for this message, that it arrived |
501 | * Notify thread that is waiting for this message, that it arrived |
486 | */ |
502 | */ |
487 | static void reply_received(void *private, int retval, |
503 | static void reply_received(void *private, int retval, |
488 | ipc_call_t *data) |
504 | ipc_call_t *data) |
489 | { |
505 | { |
490 | amsg_t *msg = (amsg_t *) private; |
506 | amsg_t *msg = (amsg_t *) private; |
491 | 507 | ||
492 | msg->retval = retval; |
508 | msg->retval = retval; |
493 | 509 | ||
494 | futex_down(&async_futex); |
510 | futex_down(&async_futex); |
495 | /* Copy data after futex_down, just in case the |
511 | /* Copy data after futex_down, just in case the |
496 | * call was detached |
512 | * call was detached |
497 | */ |
513 | */ |
498 | if (msg->dataptr) |
514 | if (msg->dataptr) |
499 | *msg->dataptr = *data; |
515 | *msg->dataptr = *data; |
500 | 516 | ||
501 | write_barrier(); |
517 | write_barrier(); |
502 | /* Remove message from timeout list */ |
518 | /* Remove message from timeout list */ |
503 | if (msg->has_timeout) |
519 | if (msg->has_timeout) |
504 | list_remove(&msg->link); |
520 | list_remove(&msg->link); |
505 | msg->done = 1; |
521 | msg->done = 1; |
506 | if (! msg->active) { |
522 | if (! msg->active) { |
507 | msg->active = 1; |
523 | msg->active = 1; |
508 | psthread_add_ready(msg->ptid); |
524 | psthread_add_ready(msg->ptid); |
509 | } |
525 | } |
510 | futex_up(&async_futex); |
526 | futex_up(&async_futex); |
511 | } |
527 | } |
512 | 528 | ||
513 | /** Send message and return id of the sent message |
529 | /** Send message and return id of the sent message |
514 | * |
530 | * |
515 | * The return value can be used as input for async_wait() to wait |
531 | * The return value can be used as input for async_wait() to wait |
516 | * for completion. |
532 | * for completion. |
517 | */ |
533 | */ |
518 | aid_t async_send_2(int phoneid, ipcarg_t method, ipcarg_t arg1, ipcarg_t arg2, |
534 | aid_t async_send_2(int phoneid, ipcarg_t method, ipcarg_t arg1, ipcarg_t arg2, |
519 | ipc_call_t *dataptr) |
535 | ipc_call_t *dataptr) |
520 | { |
536 | { |
521 | amsg_t *msg; |
537 | amsg_t *msg; |
522 | 538 | ||
523 | msg = malloc(sizeof(*msg)); |
539 | msg = malloc(sizeof(*msg)); |
524 | msg->active = 1; |
540 | msg->active = 1; |
525 | msg->done = 0; |
541 | msg->done = 0; |
526 | msg->dataptr = dataptr; |
542 | msg->dataptr = dataptr; |
527 | ipc_call_async_2(phoneid,method,arg1,arg2,msg,reply_received); |
543 | ipc_call_async_2(phoneid,method,arg1,arg2,msg,reply_received); |
528 | 544 | ||
529 | return (aid_t) msg; |
545 | return (aid_t) msg; |
530 | } |
546 | } |
531 | 547 | ||
532 | /** Wait for a message sent by async framework |
548 | /** Wait for a message sent by async framework |
533 | * |
549 | * |
534 | * @param amsgid Message ID to wait for |
550 | * @param amsgid Message ID to wait for |
535 | * @param retval Pointer to variable where will be stored retval |
551 | * @param retval Pointer to variable where will be stored retval |
536 | * of the answered message. If NULL, it is ignored. |
552 | * of the answered message. If NULL, it is ignored. |
537 | * |
553 | * |
538 | */ |
554 | */ |
539 | void async_wait_for(aid_t amsgid, ipcarg_t *retval) |
555 | void async_wait_for(aid_t amsgid, ipcarg_t *retval) |
540 | { |
556 | { |
541 | amsg_t *msg = (amsg_t *) amsgid; |
557 | amsg_t *msg = (amsg_t *) amsgid; |
542 | connection_t *conn; |
558 | connection_t *conn; |
543 | 559 | ||
544 | futex_down(&async_futex); |
560 | futex_down(&async_futex); |
545 | if (msg->done) { |
561 | if (msg->done) { |
546 | futex_up(&async_futex); |
562 | futex_up(&async_futex); |
547 | goto done; |
563 | goto done; |
548 | } |
564 | } |
549 | 565 | ||
550 | msg->ptid = psthread_get_id(); |
566 | msg->ptid = psthread_get_id(); |
551 | msg->active = 0; |
567 | msg->active = 0; |
552 | msg->has_timeout = 0; |
568 | msg->has_timeout = 0; |
553 | /* Leave locked async_futex when entering this function */ |
569 | /* Leave locked async_futex when entering this function */ |
554 | psthread_schedule_next_adv(PS_TO_MANAGER); |
570 | psthread_schedule_next_adv(PS_TO_MANAGER); |
555 | /* futex is up automatically after psthread_schedule_next...*/ |
571 | /* futex is up automatically after psthread_schedule_next...*/ |
556 | done: |
572 | done: |
557 | if (retval) |
573 | if (retval) |
558 | *retval = msg->retval; |
574 | *retval = msg->retval; |
559 | free(msg); |
575 | free(msg); |
560 | } |
576 | } |
561 | 577 | ||
562 | /** Insert sort timeout msg into timeouts list |
578 | /** Insert sort timeout msg into timeouts list |
563 | * |
579 | * |
564 | * Assume async_futex is held |
580 | * Assume async_futex is held |
565 | */ |
581 | */ |
566 | static void insert_timeout(amsg_t *msg) |
582 | static void insert_timeout(amsg_t *msg) |
567 | { |
583 | { |
568 | link_t *tmp; |
584 | link_t *tmp; |
569 | amsg_t *cur; |
585 | amsg_t *cur; |
570 | 586 | ||
571 | tmp = timeout_list.next; |
587 | tmp = timeout_list.next; |
572 | while (tmp != &timeout_list) { |
588 | while (tmp != &timeout_list) { |
573 | cur = list_get_instance(tmp, amsg_t, link); |
589 | cur = list_get_instance(tmp, amsg_t, link); |
574 | if (tv_gt(&cur->expires, &msg->expires)) |
590 | if (tv_gt(&cur->expires, &msg->expires)) |
575 | break; |
591 | break; |
576 | tmp = tmp->next; |
592 | tmp = tmp->next; |
577 | } |
593 | } |
578 | list_append(&msg->link, tmp); |
594 | list_append(&msg->link, tmp); |
579 | } |
595 | } |
580 | 596 | ||
581 | /** Wait for a message sent by async framework with timeout |
597 | /** Wait for a message sent by async framework with timeout |
582 | * |
598 | * |
583 | * @param amsgid Message ID to wait for |
599 | * @param amsgid Message ID to wait for |
584 | * @param retval Pointer to variable where will be stored retval |
600 | * @param retval Pointer to variable where will be stored retval |
585 | * of the answered message. If NULL, it is ignored. |
601 | * of the answered message. If NULL, it is ignored. |
586 | * @param timeout Timeout in usecs |
602 | * @param timeout Timeout in usecs |
587 | * @return 0 on success, ETIMEOUT if timeout expired |
603 | * @return 0 on success, ETIMEOUT if timeout expired |
588 | * |
604 | * |
589 | */ |
605 | */ |
590 | int async_wait_timeout(aid_t amsgid, ipcarg_t *retval, suseconds_t timeout) |
606 | int async_wait_timeout(aid_t amsgid, ipcarg_t *retval, suseconds_t timeout) |
591 | { |
607 | { |
592 | amsg_t *msg = (amsg_t *) amsgid; |
608 | amsg_t *msg = (amsg_t *) amsgid; |
593 | connection_t *conn; |
609 | connection_t *conn; |
594 | 610 | ||
595 | futex_down(&async_futex); |
611 | futex_down(&async_futex); |
596 | if (msg->done) { |
612 | if (msg->done) { |
597 | futex_up(&async_futex); |
613 | futex_up(&async_futex); |
598 | goto done; |
614 | goto done; |
599 | } |
615 | } |
600 | 616 | ||
601 | msg->ptid = psthread_get_id(); |
617 | msg->ptid = psthread_get_id(); |
602 | msg->active = 0; |
618 | msg->active = 0; |
603 | msg->has_timeout = 1; |
619 | msg->has_timeout = 1; |
604 | 620 | ||
605 | gettimeofday(&msg->expires, NULL); |
621 | gettimeofday(&msg->expires, NULL); |
606 | tv_add(&msg->expires, timeout); |
622 | tv_add(&msg->expires, timeout); |
607 | insert_timeout(msg); |
623 | insert_timeout(msg); |
608 | 624 | ||
609 | /* Leave locked async_futex when entering this function */ |
625 | /* Leave locked async_futex when entering this function */ |
610 | psthread_schedule_next_adv(PS_TO_MANAGER); |
626 | psthread_schedule_next_adv(PS_TO_MANAGER); |
611 | /* futex is up automatically after psthread_schedule_next...*/ |
627 | /* futex is up automatically after psthread_schedule_next...*/ |
612 | 628 | ||
613 | if (!msg->done) |
629 | if (!msg->done) |
614 | return ETIMEOUT; |
630 | return ETIMEOUT; |
615 | 631 | ||
616 | done: |
632 | done: |
617 | if (retval) |
633 | if (retval) |
618 | *retval = msg->retval; |
634 | *retval = msg->retval; |
619 | free(msg); |
635 | free(msg); |
620 | 636 | ||
621 | return 0; |
637 | return 0; |
622 | } |
638 | } |
623 | 639 | ||
- | 640 | /** Wait specified time, but in the meantime handle incoming events |
|
- | 641 | * |
|
- | 642 | * @param timeout Time in microseconds to wait |
|
- | 643 | */ |
|
- | 644 | void async_usleep(suseconds_t timeout) |
|
- | 645 | { |
|
- | 646 | amsg_t *msg; |
|
- | 647 | ||
- | 648 | msg = malloc(sizeof(*msg)); |
|
- | 649 | if (!msg) |
|
- | 650 | return; |
|
- | 651 | ||
- | 652 | msg->ptid = psthread_get_id(); |
|
- | 653 | msg->active = 0; |
|
- | 654 | msg->has_timeout = 1; |
|
- | 655 | ||
- | 656 | gettimeofday(&msg->expires, NULL); |
|
- | 657 | tv_add(&msg->expires, timeout); |
|
- | 658 | ||
- | 659 | futex_down(&async_futex); |
|
- | 660 | insert_timeout(msg); |
|
- | 661 | /* Leave locked async_futex when entering this function */ |
|
- | 662 | psthread_schedule_next_adv(PS_TO_MANAGER); |
|
- | 663 | /* futex is up automatically after psthread_schedule_next...*/ |
|
- | 664 | free(msg); |
|
- | 665 | } |
|
624 | 666 |