Constify some return data
[platform/upstream/libusb.git] / libusb / io.c
1 /*
2  * I/O functions for libusb
3  * Copyright (C) 2007-2008 Daniel Drake <dsd@gentoo.org>
4  * Copyright (c) 2001 Johannes Erdfelt <johannes@erdfelt.com>
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19  */
20
21 #include <config.h>
22 #include <errno.h>
23 #include <poll.h>
24 #include <signal.h>
25 #include <stdint.h>
26 #include <stdlib.h>
27 #include <string.h>
28 #include <sys/select.h>
29 #include <sys/time.h>
30 #include <time.h>
31 #include <unistd.h>
32
33 #include "libusbi.h"
34
35 /* this is a list of in-flight rb_handles, sorted by timeout expiration.
36  * URBs to timeout the soonest are placed at the beginning of the list, URBs
37  * that will time out later are placed after, and urbs with infinite timeout
38  * are always placed at the very end. */
39 static struct list_head flying_transfers;
40
41 /* list of poll fd's */
42 static struct list_head pollfds;
43
44 /* user callbacks for pollfd changes */
45 static libusb_pollfd_added_cb fd_added_cb = NULL;
46 static libusb_pollfd_removed_cb fd_removed_cb = NULL;
47
48 /**
49  * \page io Synchronous and asynchronous device I/O
50  *
51  * \section intro Introduction
52  *
53  * If you're using libusb in your application, you're probably wanting to
54  * perform I/O with devices - you want to perform USB data transfers.
55  *
56  * libusb offers two separate interfaces for device I/O. This page aims to
57  * introduce the two in order to help you decide which one is more suitable
58  * for your application. You can also choose to use both interfaces in your
59  * application by considering each transfer on a case-by-case basis.
60  *
61  * Once you have read through the following discussion, you should consult the
62  * detailed API documentation pages for the details:
63  * - \ref syncio
64  * - \ref asyncio
65  *
66  * \section theory Transfers at a logical level
67  *
68  * At a logical level, USB transfers typically happen in two parts. For
69  * example, when reading data from a endpoint:
70  * -# A request for data is sent to the device
71  * -# Some time later, the incoming data is received by the host
72  *
73  * or when writing data to an endpoint:
74  *
75  * -# The data is sent to the device
76  * -# Some time later, the host receives acknowledgement from the device that
77  *    the data has been transferred.
78  *
79  * There may be an indefinite delay between the two steps. Consider a
80  * fictional USB input device with a button that the user can press. In order
81  * to determine when the button is pressed, you would likely submit a request
82  * to read data on a bulk or interrupt endpoint and wait for data to arrive.
83  * Data will arrive when the button is pressed by the user, which is
84  * potentially hours later.
85  *
86  * libusb offers both a synchronous and an asynchronous interface to performing
87  * USB transfers. The main difference is that the synchronous interface
88  * combines both steps indicated above into a single function call, whereas
89  * the asynchronous interface separates them.
90  *
91  * \section sync The synchronous interface
92  *
93  * The synchronous I/O interface allows you to perform a USB transfer with
94  * a single function call. When the function call returns, the transfer has
95  * completed and you can parse the results.
96  *
97  * If you have used the libusb-0.1 before, this I/O style will seem familar to
98  * you. libusb-0.1 only offered a synchronous interface.
99  *
100  * In our input device example, to read button presses you might write code
101  * in the following style:
102 \code
103 unsigned char data[4];
104 int actual_length,
105 int r = libusb_bulk_transfer(handle, EP_IN, data, sizeof(data), &actual_length, 0);
106 if (r == 0 && actual_length == sizeof(data)) {
107         // results of the transaction can now be found in the data buffer
108         // parse them here and report button press
109 } else {
110         error();
111 }
112 \endcode
113  *
114  * The main advantage of this model is simplicity: you did everything with
115  * a single simple function call.
116  *
117  * However, this interface has its limitations. Your application will sleep
118  * inside libusb_bulk_transfer() until the transaction has completed. If it
119  * takes the user 3 hours to press the button, your application will be
120  * sleeping for that long. Execution will be tied up inside the library -
121  * the entire thread will be useless for that duration.
122  *
123  * Another issue is that by tieing up the thread with that single transaction
124  * there is no possibility of performing I/O with multiple endpoints and/or
125  * multiple devices simultaneously, unless you resort to creating one thread
126  * per transaction.
127  *
128  * Additionally, there is no opportunity to cancel the transfer after the
129  * request has been submitted.
130  *
131  * For details on how to use the synchronous API, see the
132  * \ref syncio "synchronous I/O API documentation" pages.
133  * 
134  * \section async The asynchronous interface
135  *
136  * Asynchronous I/O is the most significant new feature in libusb-1.0.
137  * Although it is a more complex interface, it solves all the issues detailed
138  * above.
139  *
140  * Instead of providing which functions that block until the I/O has complete,
141  * libusb's asynchronous interface presents non-blocking functions which
142  * begin a transfer and then return immediately. Your application passes a
143  * callback function pointer to this non-blocking function, which libusb will
144  * call with the results of the transaction when it has completed.
145  *
146  * Transfers which have been submitted through the non-blocking functions
147  * can be cancelled with a separate function call.
148  *
149  * The non-blocking nature of this interface allows you to be simultaneously
150  * performing I/O to multiple endpoints on multiple devices, without having
151  * to use threads.
152  *
153  * This added flexibility does come with some complications though:
154  * - In the interest of being a lightweight library, libusb does not create
155  * threads and can only operate when your application is calling into it. Your
156  * application must call into libusb from it's main loop when events are ready
157  * to be handled, or you must use some other scheme to allow libusb to
158  * undertake whatever work needs to be done.
159  * - libusb also needs to be called into at certain fixed points in time in
160  * order to accurately handle transfer timeouts.
161  * - Memory handling becomes more complex. You cannot use stack memory unless
162  * the function with that stack is guaranteed not to return until the transfer
163  * callback has finished executing.
164  * - You generally lose some linearity from your code flow because submitting
165  * the transfer request is done in a separate function from where the transfer
166  * results are handled. This becomes particularly obvious when you want to
167  * submit a second transfer based on the results of an earlier transfer.
168  *
169  * Internally, libusb's synchronous interface is expressed in terms of function
170  * calls to the asynchronous interface.
171  *
172  * For details on how to use the asynchronous API, see the
173  * \ref asyncio "asynchronous I/O API" documentation pages.
174  */
175
176 /**
177  * @defgroup asyncio Asynchronous device I/O
178  *
179  * This page details libusb's asynchronous (non-blocking) API for USB device
180  * I/O. This interface is very powerful but is also quite complex - you will
181  * need to read this page carefully to understand the necessary considerations
182  * and issues surrounding use of this interface. Simplistic applications
183  * may wish to consider the \ref syncio "synchronous I/O API" instead.
184  *
185  * The asynchronous interface is built around the idea of separating transfer
186  * submission and handling of transfer completion (the synchronous model
187  * combines both of these into one). There may be a long delay between
188  * submission and completion, however the asynchronous submission function
189  * is non-blocking so will return control to your application during that
190  * potentially long delay.
191  *
192  * \section asyncabstraction Transfer abstraction
193  *
194  * For the asynchronous I/O, libusb implements the concept of a generic
195  * transfer entity for all types of I/O (control, bulk, interrupt,
196  * isochronous). The generic transfer object must be treated slightly
197  * differently depending on which type of I/O you are performing with it.
198  *
199  * This is represented by the public libusb_transfer structure type.
200  *
201  * \section asynctrf Asynchronous transfers
202  *
203  * We can view asynchronous I/O as a 5 step process:
204  * -# Allocation
205  * -# Filling
206  * -# Submission
207  * -# Completion handling
208  * -# Deallocation
209  *
210  * \subsection asyncalloc Allocation
211  *
212  * This step involves allocating memory for a USB transfer. This is the
213  * generic transfer object mentioned above. At this stage, the transfer
214  * is "blank" with no details about what type of I/O it will be used for.
215  *
216  * Allocation is done with the libusb_alloc_transfer() function. You must use
217  * this function rather than allocating your own transfers.
218  *
219  * \subsection asyncfill Filling
220  *
221  * This step is where you take a previously allocated transfer and fill it
222  * with information to determine the message type and direction, data buffer,
223  * callback function, etc.
224  *
225  * You can either fill the required fields yourself or you can use the
226  * helper functions: libusb_fill_control_transfer(), libusb_fill_bulk_transfer()
227  * and libusb_fill_interrupt_transfer().
228  *
229  * \subsection asyncsubmit Submission
230  *
231  * When you have allocated a transfer and filled it, you can submit it using
232  * libusb_submit_transfer(). This function returns immediately but can be
233  * regarded as firing off the I/O request in the background.
234  *
235  * \subsection asynccomplete Completion handling
236  *
237  * After a transfer has been submitted, one of four things can happen to it:
238  *
239  * - The transfer completes (i.e. some data was transferred)
240  * - The transfer has a timeout and the timeout expires before all data is
241  * transferred
242  * - The transfer fails due to an error
243  * - The transfer is cancelled
244  *
245  * Each of these will cause the user-specified transfer callback function to
246  * be invoked. It is up to the callback function to determine which of the
247  * above actually happened and to act accordingly.
248  *
249  * \subsection Deallocation
250  *
251  * When a transfer has completed (i.e. the callback function has been invoked),
252  * you are advised to free the transfer (unless you wish to resubmit it, see
253  * below). Transfers are deallocated with libusb_free_transfer().
254  *
255  * It is undefined behaviour to free a transfer which has not completed.
256  *
257  * \section asyncresubmit Resubmission
258  *
259  * You may be wondering why allocation, filling, and submission are all
260  * separated above where they could reasonably be combined into a single
261  * operation.
262  *
263  * The reason for separation is to allow you to resubmit transfers without
264  * having to allocate new ones every time. This is especially useful for
265  * common situations dealing with interrupt endpoints - you allocate one
266  * transfer, fill and submit it, and when it returns with results you just
267  * resubmit it for the next interrupt.
268  *
269  * \section asynccancel Cancellation
270  *
271  * Another advantage of using the asynchronous interface is that you have
272  * the ability to cancel transfers which have not yet completed. This is
273  * done by calling the libusb_cancel_transfer() function.
274  *
275  * libusb_cancel_transfer() is asynchronous/non-blocking in itself. When the
276  * cancellation actually completes, the transfer's callback function will
277  * be invoked, and the callback function should check the transfer status to
278  * determine that it was cancelled.
279  *
280  * Freeing the transfer after it has been cancelled but before cancellation
281  * has completed will result in undefined behaviour.
282  *
283  * \section asyncctrl Considerations for control transfers
284  *
285  * The <tt>libusb_transfer</tt> structure is generic and hence does not
286  * include specific fields for the control-specific setup packet structure.
287  *
288  * In order to perform a control transfer, you must place the 8-byte setup
289  * packet at the start of the data buffer. To simplify this, you could
290  * cast the buffer pointer to type struct libusb_control_setup, or you can
291  * use the helper function libusb_fill_control_setup().
292  *
293  * The wLength field placed in the setup packet must be the length you would
294  * expect to be sent in the setup packet: the length of the payload that
295  * follows (or the expected maximum number of bytes to receive). However,
296  * the length field of the libusb_transfer object must be the length of
297  * the data buffer - i.e. it should be wLength <em>plus</em> the size of
298  * the setup packet (LIBUSB_CONTROL_SETUP_SIZE).
299  *
300  * If you use the helper functions, this is simplified for you:
301  * -# Allocate a buffer of size LIBUSB_CONTROL_SETUP_SIZE plus the size of the
302  * data you are sending/requesting.
303  * -# Call libusb_fill_control_setup() on the data buffer, using the transfer
304  * request size as the wLength value (i.e. do not include the extra space you
305  * allocated for the control setup).
306  * -# If this is a host-to-device transfer, place the data to be transferred
307  * in the data buffer, starting at offset LIBUSB_CONTROL_SETUP_SIZE.
308  * -# Call libusb_fill_control_transfer() to associate the data buffer with
309  * the transfer (and to set the remaining details such as callback and timeout).
310  *   - Note that there is no parameter to set the length field of the transfer.
311  *     The length is automatically inferred from the wLength field of the setup
312  *     packet.
313  * -# Submit the transfer.
314  *
315  * Further considerations are needed when handling transfer completion in
316  * your callback function:
317  * - As you might expect, the setup packet will still be sitting at the start
318  * of the data buffer.
319  * - If this was a device-to-host transfer, the received data will be sitting
320  * at offset LIBUSB_CONTROL_SETUP_SIZE into the buffer.
321  * - The actual_length field of the transfer structure is relative to the
322  * wLength of the setup packet, rather than the size of the data buffer. So,
323  * if your wLength was 4, your transfer's <tt>length</tt> was 12, then you
324  * should expect an <tt>actual_length</tt> of 4 to indicate that the data was
325  * transferred in entirity.
326  *
327  * To simplify parsing of setup packets and obtaining the data from the
328  * correct offset, you may wish to use the libusb_control_transfer_get_data()
329  * and libusb_control_transfer_get_setup() functions within your transfer
330  * callback.
331  *
332  * \section asynciso Considerations for isochronous transfers
333  *
334  * As isochronous transfers are more complicated than transfers to
335  * non-isochronous endpoints.
336  *
337  * To perform I/O to an isochronous endpoint, allocate the transfer by calling
338  * libusb_alloc_transfer() with an appropriate number of isochronous packets.
339  *
340  * During filling, set \ref libusb_transfer::endpoint_type "endpoint_type" to
341  * \ref libusb_endpoint_type::LIBUSB_ENDPOINT_TYPE_ISOCHRONOUS
342  * "LIBUSB_ENDPOINT_TYPE_ISOCHRONOUS", and set
343  * \ref libusb_transfer::num_iso_packets "num_iso_packets" to a value less than
344  * or equal to the number of packets you requested during allocation.
345  * libusb_alloc_transfer() does not set either of these fields for you, given
346  * that you might not even use the transfer on an isochronous endpoint.
347  *
348  * Next, populate the length field for the first num_iso_packets entries in
349  * the \ref libusb_transfer::iso_packet_desc "iso_packet_desc" array. Section
350  * 5.6.3 of the USB2 specifications describe how the maximum isochronous
351  * packet length is determined by the endpoint descriptor. FIXME need a helper
352  * function to find this.
353  * FIXME, write a helper function to set the length for all iso packets in an
354  * array
355  *
356  * For outgoing transfers, you'll obviously fill the buffer and populate the
357  * packet descriptors in hope that all the data gets transferred. For incoming
358  * transfers, you must ensure the buffer has sufficient capacity for
359  * the situation where all packets transfer the full amount of requested data.
360  *
361  * Completion handling requires some extra consideration. The
362  * \ref libusb_transfer::actual_length "actual_length" field of the transfer
363  * is meaningless and should not be examined; instead you must refer to the
364  * \ref libusb_iso_packet_descriptor::actual_length "actual_length" field of
365  * each individual packet.
366  *
367  * The \ref libusb_transfer::status "status" field of the transfer is also a
368  * little misleading:
369  *  - If the packets were submitted and the isochronous data microframes
370  *    completed normally, status will have value
371  *    \ref libusb_transfer_status::LIBUSB_TRANSFER_COMPLETED
372  *    "LIBUSB_TRANSFER_COMPLETED". Note that bus errors and software-incurred
373  *    delays are not counted as transfer errors; the transfer.status field may
374  *    indicate COMPLETED even if some or all of the packets failed. Refer to
375  *    the \ref libusb_iso_packet_descriptor::status "status" field of each
376  *    individual packet to determine packet failures.
377  *  - The status field will have value
378  *    \ref libusb_transfer_status::LIBUSB_TRANSFER_ERROR
379  *    "LIBUSB_TRANSFER_ERROR" only when serious errors were encountered.
380  *  - Other transfer status codes occur with normal behaviour.
381  *
382  * The data for each packet will be found at an offset into the buffer that
383  * can be calculated as if each prior packet completed in full. FIXME write
384  * a helper function to determine this, and flesh this description out a bit
385  * more.
386  *
387  * \section asyncmem Memory caveats
388  *
389  * In most circumstances, it is not safe to use stack memory for transfer
390  * buffers. This is because the function that fired off the asynchronous
391  * transfer may return before libusb has finished using the buffer, and when
392  * the function returns it's stack gets destroyed. This is true for both
393  * host-to-device and device-to-host transfers.
394  *
395  * The only case in which it is safe to use stack memory is where you can
396  * guarantee that the function owning the stack space for the buffer does not
397  * return until after the transfer's callback function has completed. In every
398  * other case, you need to use heap memory instead.
399  *
400  * \section asyncflags Fine control
401  *
402  * Through using this asynchronous interface, you may find yourself repeating
403  * a few simple operations many times. You can apply a bitwise OR of certain
404  * flags to a transfer to simplify certain things:
405  * - \ref libusb_transfer_flags::LIBUSB_TRANSFER_SHORT_NOT_OK
406  *   "LIBUSB_TRANSFER_SHORT_NOT_OK" results in transfers which transferred
407  *   less than the requested amount of data being marked with status
408  *   \ref libusb_transfer_status::LIBUSB_TRANSFER_ERROR "LIBUSB_TRANSFER_ERROR"
409  *   (they would normally be regarded as COMPLETED)
410  * - \ref libusb_transfer_flags::LIBUSB_TRANSFER_FREE_BUFFER
411  *   "LIBUSB_TRANSFER_FREE_BUFFER" allows you to ask libusb to free the transfer
412  *   buffer when freeing the transfer.
413  * - \ref libusb_transfer_flags::LIBUSB_TRANSFER_FREE_TRANSFER
414  *   "LIBUSB_TRANSFER_FREE_TRANSFER" causes libusb to automatically free the
415  *   transfer after the transfer callback returns.
416  *
417  * \section asyncevent Event handling
418  *
419  * In accordance of the aim of being a lightweight library, libusb does not
420  * create threads internally. This means that libusb code does not execute
421  * at any time other than when your application is calling a libusb function.
422  * However, an asynchronous model requires that libusb perform work at various
423  * points in time - namely processing the results of previously-submitted
424  * transfers and invoking the user-supplied callback function.
425  *
426  * This gives rise to the libusb_handle_events() function which your
427  * application must call into when libusb has work do to. This gives libusb
428  * the opportunity to reap pending transfers, invoke callbacks, etc.
429  *
430  * The first issue to discuss here is how your application can figure out
431  * when libusb has work to do. In fact, there are two naive options which
432  * do not actually require your application to know this:
433  * -# Periodically call libusb_handle_events() in non-blocking mode at fixed
434  *    short intervals from your main loop
435  * -# Repeatedly call libusb_handle_events() in blocking mode from a dedicated
436  *    thread.
437  *
438  * The first option is plainly not very nice, and will cause unnecessary 
439  * CPU wakeups leading to increased power usage and decreased battery life.
440  * The second option is not very nice either, but may be the nicest option
441  * available to you if the "proper" approach can not be applied to your
442  * application (read on...).
443  * 
444  * The recommended option is to integrate libusb with your application main
445  * event loop. libusb exposes a set of file descriptors which allow you to do
446  * this. Your main loop is probably already calling poll() or select() or a
447  * variant on a set of file descriptors for other event sources (e.g. keyboard
448  * button presses, mouse movements, network sockets, etc). You then add
449  * libusb's file descriptors to your poll()/select() calls, and when activity
450  * is detected on such descriptors you know it is time to call
451  * libusb_handle_events().
452  *
453  * There is one final event handling complication. libusb supports
454  * asynchronous transfers which time out after a specified time period, and
455  * this requires that libusb is called into at or after the timeout so that
456  * the timeout can be handled. So, in addition to considering libusb's file
457  * descriptors in your main event loop, you must also consider that libusb
458  * sometimes needs to be called into at fixed points in time even when there
459  * is no file descriptor activity.
460  *
461  * For the details on retrieving the set of file descriptors and determining
462  * the next timeout, see the \ref poll "polling and timing" API documentation.
463  */
464
465 /**
466  * @defgroup poll Polling and timing
467  *
468  * This page documents libusb's functions for polling events and timing.
469  * These functions are only necessary for users of the
470  * \ref asyncio "asynchronous API". If you are only using the simpler
471  * \ref syncio "synchronous API" then you do not need to ever call these
472  * functions.
473  *
474  * The justification for the functionality described here has already been
475  * discussed in the \ref asyncevent "event handling" section of the
476  * asynchronous API documentation. In summary, libusb does not create internal
477  * threads for event processing and hence relies on your application calling
478  * into libusb at certain points in time so that pending events can be handled.
479  * In order to know precisely when libusb needs to be called into, libusb
480  * offers you a set of pollable file descriptors and information about when
481  * the next timeout expires.
482  *
483  * If you are using the asynchronous I/O API, you must take one of the two
484  * following options, otherwise your I/O will not complete.
485  *
486  * \section pollsimple The simple option
487  *
488  * If your application revolves solely around libusb and does not need to
489  * handle other event sources, you can have a program structure as follows:
490 \code
491 // initialize libusb
492 // find and open device
493 // maybe fire off some initial async I/O
494
495 while (user_has_not_requested_exit)
496         libusb_handle_events();
497
498 // clean up and exit
499 \endcode
500  *
501  * With such a simple main loop, you do not have to worry about managing
502  * sets of file descriptors or handling timeouts. libusb_handle_events() will
503  * handle those details internally.
504  *
505  * \section pollmain The more advanced option
506  *
507  * In more advanced applications, you will already have a main loop which
508  * is monitoring other event sources: network sockets, X11 events, mouse
509  * movements, etc. Through exposing a set of file descriptors, libusb is
510  * designed to cleanly integrate into such main loops.
511  *
512  * In addition to polling file descriptors for the other event sources, you
513  * take a set of file descriptors from libusb and monitor those too. When you
514  * detect activity on libusb's file descriptors, you call
515  * libusb_handle_events_timeout() in non-blocking mode.
516  *
517  * You must also consider the fact that libusb sometimes has to handle events
518  * at certain known times which do not generate activity on file descriptors.
519  * Your main loop must also consider these times, modify it's poll()/select()
520  * timeout accordingly, and track time so that libusb_handle_events_timeout()
521  * is called in non-blocking mode when timeouts expire.
522  *
523  * In pseudo-code, you want something that looks like:
524 \code
525 // initialise libusb
526
527 libusb_get_pollfds()
528 while (user has not requested application exit) {
529         libusb_get_next_timeout();
530         select(on libusb file descriptors plus any other event sources of interest,
531                 using a timeout no larger than the value libusb just suggested)
532         if (select() indicated activity on libusb file descriptors)
533                 libusb_handle_events_timeout(0);
534         if (time has elapsed to or beyond the libusb timeout)
535                 libusb_handle_events_timeout(0);
536 }
537
538 // clean up and exit
539 \endcode
540  *
541  * The set of file descriptors that libusb uses as event sources may change
542  * during the life of your application. Rather than having to repeatedly
543  * call libusb_get_pollfds(), you can set up notification functions for when
544  * the file descriptor set changes using libusb_set_pollfd_notifiers().
545  *
546  */
547
548 void usbi_io_init()
549 {
550         list_init(&flying_transfers);
551         list_init(&pollfds);
552         fd_added_cb = NULL;
553         fd_removed_cb = NULL;
554 }
555
556 static int calculate_timeout(struct usbi_transfer *transfer)
557 {
558         int r;
559         struct timespec current_time;
560         unsigned int timeout =
561                 __USBI_TRANSFER_TO_LIBUSB_TRANSFER(transfer)->timeout;
562
563         if (!timeout)
564                 return 0;
565
566         r = clock_gettime(CLOCK_MONOTONIC, &current_time);
567         if (r < 0) {
568                 usbi_err("failed to read monotonic clock, errno=%d", errno);
569                 return r;
570         }
571
572         current_time.tv_sec += timeout / 1000;
573         current_time.tv_nsec += (timeout % 1000) * 1000000;
574
575         if (current_time.tv_nsec > 1000000000) {
576                 current_time.tv_nsec -= 1000000000;
577                 current_time.tv_sec++;
578         }
579
580         TIMESPEC_TO_TIMEVAL(&transfer->timeout, &current_time);
581         return 0;
582 }
583
584 static void add_to_flying_list(struct usbi_transfer *transfer)
585 {
586         struct usbi_transfer *cur;
587         struct timeval *timeout = &transfer->timeout;
588
589         /* if we have no other flying transfers, start the list with this one */
590         if (list_empty(&flying_transfers)) {
591                 list_add(&transfer->list, &flying_transfers);
592                 return;
593         }
594
595         /* if we have infinite timeout, append to end of list */
596         if (!timerisset(timeout)) {
597                 list_add_tail(&transfer->list, &flying_transfers);
598                 return;
599         }
600
601         /* otherwise, find appropriate place in list */
602         list_for_each_entry(cur, &flying_transfers, list) {
603                 /* find first timeout that occurs after the transfer in question */
604                 struct timeval *cur_tv = &cur->timeout;
605
606                 if (!timerisset(cur_tv) || (cur_tv->tv_sec > timeout->tv_sec) ||
607                                 (cur_tv->tv_sec == timeout->tv_sec &&
608                                         cur_tv->tv_usec > timeout->tv_usec)) {
609                         list_add_tail(&transfer->list, &cur->list);
610                         return;
611                 }
612         }
613
614         /* otherwise we need to be inserted at the end */
615         list_add_tail(&transfer->list, &flying_transfers);
616 }
617
618 static int submit_transfer(struct usbi_transfer *itransfer)
619 {
620         int r = usbi_backend->submit_transfer(itransfer);
621         if (r < 0)
622                 return r;
623
624         add_to_flying_list(itransfer);
625         return 0;
626 }
627
628 /** \ingroup asyncio
629  * Allocate a libusb transfer with a specified number of isochronous packet
630  * descriptors. The returned transfer is pre-initialized for you. When the new
631  * transfer is no longer needed, it should be freed with
632  * libusb_free_transfer().
633  *
634  * Transfers intended for non-isochronous endpoints (e.g. control, bulk,
635  * interrupt) should specify an iso_packets count of zero.
636  *
637  * For transfers intended for isochronous endpoints, specify an appropriate
638  * number of packet descriptors to be allocated as part of the transfer.
639  * The returned transfer is not specially initialized for isochronous I/O;
640  * you are still required to set the
641  * \ref libusb_transfer::num_iso_packets "num_iso_packets" and
642  * \ref libusb_transfer::endpoint_type "endpoint_type" fields accordingly.
643  *
644  * It is safe to allocate a transfer with some isochronous packets and then
645  * use it on a non-isochronous endpoint. If you do this, ensure that at time
646  * of submission, num_iso_packets is 0 and that endpoint_type is set
647  * appropriately.
648  *
649  * \param iso_packets number of isochronous packet descriptors to allocate
650  * \returns a newly allocated transfer, or NULL on error
651  */
652 API_EXPORTED struct libusb_transfer *libusb_alloc_transfer(int iso_packets)
653 {
654         size_t os_alloc_size = usbi_backend->transfer_priv_size
655                 + (usbi_backend->add_iso_packet_size * iso_packets);
656         int alloc_size = sizeof(struct usbi_transfer)
657                 + sizeof(struct libusb_transfer)
658                 + (sizeof(struct libusb_iso_packet_descriptor) * iso_packets)
659                 + os_alloc_size;
660         struct usbi_transfer *itransfer = malloc(alloc_size);
661         if (!itransfer)
662                 return NULL;
663
664         memset(itransfer, 0, alloc_size);
665         itransfer->num_iso_packets = iso_packets;
666         return __USBI_TRANSFER_TO_LIBUSB_TRANSFER(itransfer);
667 }
668
669 /** \ingroup asyncio
670  * Free a transfer structure. This should be called for all transfers
671  * allocated with libusb_alloc_transfer().
672  *
673  * If the \ref libusb_transfer_flags::LIBUSB_TRANSFER_FREE_BUFFER
674  * "LIBUSB_TRANSFER_FREE_BUFFER" flag is set and the transfer buffer is
675  * non-NULL, this function will also free the transfer buffer using the
676  * standard system memory allocator (e.g. free()).
677  *
678  * It is legal to call this function with a NULL transfer. In this case,
679  * the function will simply return safely.
680  *
681  * \param transfer the transfer to free
682  */
683 API_EXPORTED void libusb_free_transfer(struct libusb_transfer *transfer)
684 {
685         struct usbi_transfer *itransfer;
686         if (!transfer)
687                 return;
688
689         if (transfer->flags & LIBUSB_TRANSFER_FREE_BUFFER && transfer->buffer)
690                 free(transfer->buffer);
691
692         itransfer = __LIBUSB_TRANSFER_TO_USBI_TRANSFER(transfer);
693         free(itransfer);
694 }
695
696 /** \ingroup asyncio
697  * Submit a transfer. This function will fire off the USB transfer and then
698  * return immediately.
699  *
700  * It is undefined behaviour to submit a transfer that has already been
701  * submitted but has not yet completed.
702  *
703  * \param transfer the transfer to submit
704  * \returns 0 on success
705  * \returns negative on error
706  */
707 API_EXPORTED int libusb_submit_transfer(struct libusb_transfer *transfer)
708 {
709         struct usbi_transfer *itransfer =
710                 __LIBUSB_TRANSFER_TO_USBI_TRANSFER(transfer);
711         int r;
712
713         itransfer->transferred = 0;
714         r = calculate_timeout(itransfer);
715         if (r < 0)
716                 return r;
717
718         if (transfer->endpoint_type == LIBUSB_ENDPOINT_TYPE_CONTROL) {
719                 struct libusb_control_setup *setup =
720                         (struct libusb_control_setup *) transfer->buffer;
721         
722                 usbi_dbg("RQT=%02x RQ=%02x VAL=%04x IDX=%04x length=%d",
723                         setup->bmRequestType, setup->bRequest, setup->wValue, setup->wIndex,
724                         setup->wLength);
725
726                 setup->wValue = cpu_to_le16(setup->wValue);
727                 setup->wIndex = cpu_to_le16(setup->wIndex);
728                 setup->wLength = cpu_to_le16(setup->wLength);
729         }
730
731         return submit_transfer(itransfer);
732 }
733
734 /** \ingroup asyncio
735  * Asynchronously cancel a previously submitted transfer.
736  * It is undefined behaviour to call this function on a transfer that is
737  * already being cancelled or has already completed.
738  * This function returns immediately, but this does not indicate cancellation
739  * is complete. Your callback function will be invoked at some later time
740  * with a transfer status of
741  * \ref libusb_transfer_status::LIBUSB_TRANSFER_CANCELLED
742  * "LIBUSB_TRANSFER_CANCELLED."
743  *
744  * \param transfer the transfer to cancel
745  * \returns 0 on success
746  * \returns non-zero on error
747  */
748 API_EXPORTED int libusb_cancel_transfer(struct libusb_transfer *transfer)
749 {
750         struct usbi_transfer *itransfer =
751                 __LIBUSB_TRANSFER_TO_USBI_TRANSFER(transfer);
752         int r;
753
754         usbi_dbg("");
755         r = usbi_backend->cancel_transfer(itransfer);
756         if (r < 0)
757                 usbi_err("cancel transfer failed error %d", r);
758         return r;
759 }
760
761 /** \ingroup asyncio
762  * Cancel a transfer and wait for cancellation completion without invoking
763  * the transfer callback. This function will block. 
764  *
765  * It is undefined behaviour to call this function on a transfer that is
766  * already being cancelled or has already completed.
767  *
768  * \param transfer the transfer to cancel
769  * \returns 0 on success
770  * \returns non-zero on error
771  */
772 API_EXPORTED int libusb_cancel_transfer_sync(struct libusb_transfer *transfer)
773 {
774         struct usbi_transfer *itransfer =
775                 __LIBUSB_TRANSFER_TO_USBI_TRANSFER(transfer);
776         int r;
777
778         usbi_dbg("");
779         r = usbi_backend->cancel_transfer(itransfer);
780         if (r < 0) {
781                 usbi_err("cancel transfer failed error %d", r);
782                 return r;
783         }
784
785         itransfer->flags |= USBI_TRANSFER_SYNC_CANCELLED;
786         while (itransfer->flags & USBI_TRANSFER_SYNC_CANCELLED) {
787                 r = libusb_handle_events();
788                 if (r < 0)
789                         return r;
790         }
791
792         return 0;
793 }
794
795 void usbi_handle_transfer_completion(struct usbi_transfer *itransfer,
796         enum libusb_transfer_status status)
797 {
798         struct libusb_transfer *transfer =
799                 __USBI_TRANSFER_TO_LIBUSB_TRANSFER(itransfer);
800         uint8_t flags;
801
802         if (status == LIBUSB_TRANSFER_SILENT_COMPLETION)
803                 return;
804
805         if (status == LIBUSB_TRANSFER_COMPLETED
806                         && transfer->flags & LIBUSB_TRANSFER_SHORT_NOT_OK) {
807                 int rqlen = transfer->length;
808                 if (transfer->endpoint_type == LIBUSB_ENDPOINT_TYPE_CONTROL)
809                         rqlen -= LIBUSB_CONTROL_SETUP_SIZE;
810                 if (rqlen != itransfer->transferred) {
811                         usbi_dbg("interpreting short transfer as error");
812                         status = LIBUSB_TRANSFER_ERROR;
813                 }
814         }
815
816         flags = transfer->flags;
817         transfer->status = status;
818         transfer->actual_length = itransfer->transferred;
819         if (transfer->callback)
820                 transfer->callback(transfer);
821         /* transfer might have been freed by the above call, do not use from
822          * this point. */
823         if (flags & LIBUSB_TRANSFER_FREE_TRANSFER)
824                 libusb_free_transfer(transfer);
825 }
826
827 void usbi_handle_transfer_cancellation(struct usbi_transfer *transfer)
828 {
829         /* if the URB is being cancelled synchronously, raise cancellation
830          * completion event by unsetting flag, and ensure that user callback does
831          * not get called.
832          */
833         if (transfer->flags & USBI_TRANSFER_SYNC_CANCELLED) {
834                 transfer->flags &= ~USBI_TRANSFER_SYNC_CANCELLED;
835                 usbi_dbg("detected sync. cancel");
836                 usbi_handle_transfer_completion(transfer,
837                         LIBUSB_TRANSFER_SILENT_COMPLETION);
838                 return;
839         }
840
841         /* if the URB was cancelled due to timeout, report timeout to the user */
842         if (transfer->flags & USBI_TRANSFER_TIMED_OUT) {
843                 usbi_dbg("detected timeout cancellation");
844                 usbi_handle_transfer_completion(transfer, LIBUSB_TRANSFER_TIMED_OUT);
845                 return;
846         }
847
848         /* otherwise its a normal async cancel */
849         usbi_handle_transfer_completion(transfer, LIBUSB_TRANSFER_CANCELLED);
850 }
851
852 static void handle_timeout(struct usbi_transfer *itransfer)
853 {
854         /* handling timeouts is tricky, as we may race with the kernel: we may
855          * detect a timeout racing with the condition that the urb has actually
856          * completed. we asynchronously cancel the URB and report timeout
857          * to the user when the URB cancellation completes (or not at all if the
858          * URB actually gets delivered as per this race) */
859         struct libusb_transfer *transfer =
860                 __USBI_TRANSFER_TO_LIBUSB_TRANSFER(itransfer);
861         int r;
862
863         itransfer->flags |= USBI_TRANSFER_TIMED_OUT;
864         r = libusb_cancel_transfer(transfer);
865         if (r < 0)
866                 usbi_warn("async cancel failed %d errno=%d", r, errno);
867 }
868
869 static int handle_timeouts(void)
870 {
871         struct timespec systime_ts;
872         struct timeval systime;
873         struct usbi_transfer *transfer;
874         int r;
875
876         if (list_empty(&flying_transfers))
877                 return 0;
878
879         /* get current time */
880         r = clock_gettime(CLOCK_MONOTONIC, &systime_ts);
881         if (r < 0)
882                 return r;
883
884         TIMESPEC_TO_TIMEVAL(&systime, &systime_ts);
885
886         /* iterate through flying transfers list, finding all transfers that
887          * have expired timeouts */
888         list_for_each_entry(transfer, &flying_transfers, list) {
889                 struct timeval *cur_tv = &transfer->timeout;
890
891                 /* if we've reached transfers of infinite timeout, we're all done */
892                 if (!timerisset(cur_tv))
893                         return 0;
894
895                 /* ignore timeouts we've already handled */
896                 if (transfer->flags & USBI_TRANSFER_TIMED_OUT)
897                         continue;
898
899                 /* if transfer has non-expired timeout, nothing more to do */
900                 if ((cur_tv->tv_sec > systime.tv_sec) ||
901                                 (cur_tv->tv_sec == systime.tv_sec &&
902                                         cur_tv->tv_usec > systime.tv_usec))
903                         return 0;
904         
905                 /* otherwise, we've got an expired timeout to handle */
906                 handle_timeout(transfer);
907         }
908
909         return 0;
910 }
911
912 static int handle_events(struct timeval *tv)
913 {
914         int r;
915         int maxfd = 0;
916         fd_set readfds, writefds;
917         fd_set *_readfds = NULL;
918         fd_set *_writefds = NULL;
919         struct usbi_pollfd *ipollfd;
920         int have_readfds = 0;
921         int have_writefds = 0;
922         struct timeval select_timeout;
923         struct timeval timeout;
924
925         r = libusb_get_next_timeout(&timeout);
926         if (r) {
927                 /* timeout already expired? */
928                 if (!timerisset(&timeout))
929                         return handle_timeouts();
930
931                 /* choose the smallest of next URB timeout or user specified timeout */
932                 if (timercmp(&timeout, tv, <))
933                         select_timeout = timeout;
934                 else
935                         select_timeout = *tv;
936         } else {
937                 select_timeout = *tv;
938         }
939
940         FD_ZERO(&readfds);
941         FD_ZERO(&writefds);
942         list_for_each_entry(ipollfd, &pollfds, list) {
943                 struct libusb_pollfd *pollfd = &ipollfd->pollfd;
944                 int fd = pollfd->fd;
945                 if (pollfd->events & POLLIN) {
946                         have_readfds = 1;
947                         FD_SET(fd, &readfds);
948                 }
949                 if (pollfd->events & POLLOUT) {
950                         have_writefds = 1;
951                         FD_SET(fd, &writefds);
952                 }
953                 if (fd > maxfd)
954                         maxfd = fd;
955         }
956
957         if (have_readfds)
958                 _readfds = &readfds;
959         if (have_writefds)
960                 _writefds = &writefds;
961
962         usbi_dbg("select() with timeout in %d.%06ds", select_timeout.tv_sec,
963                 select_timeout.tv_usec);
964         r = select(maxfd + 1, _readfds, _writefds, NULL, &select_timeout);
965         usbi_dbg("select() returned %d with %d.%06ds remaining",
966                 r, select_timeout.tv_sec, select_timeout.tv_usec);
967         if (r == 0) {
968                 *tv = select_timeout;
969                 return handle_timeouts();
970         } else if (r == -1 && errno == EINTR) {
971                 return 0;
972         } else if (r < 0) {
973                 usbi_err("select failed %d err=%d\n", r, errno);
974                 return r;
975         }
976
977         r = usbi_backend->handle_events(_readfds, _writefds);
978         if (r < 0)
979                 return r;
980
981         /* FIXME check return value? */
982         return handle_timeouts();
983 }
984
985 /** \ingroup poll
986  * Handle any pending events.
987  *
988  * libusb determines "pending events" by checking if any timeouts have expired
989  * and by checking the set of file descriptors for activity.
990  *
991  * If a zero timeval is passed, this function will handle any already-pending
992  * events and then immediately return in non-blocking style.
993  *
994  * If a non-zero timeval is passed and no events are currently pending, this
995  * function will block waiting for events to handle up until the specified
996  * timeout. If an event arrives or a signal is raised, this function will
997  * return early.
998  *
999  * \param tv the maximum time to block waiting for events, or zero for
1000  * non-blocking mode
1001  * \returns 0 on success
1002  * \returns non-zero on error
1003  */
1004 API_EXPORTED int libusb_handle_events_timeout(struct timeval *tv)
1005 {
1006         return handle_events(tv);
1007 }
1008
1009 /** \ingroup poll
1010  * Handle any pending events in blocking mode with a sensible timeout. This
1011  * timeout is currently hardcoded at 2 seconds but we may change this if we
1012  * decide other values are more sensible. For finer control over whether this
1013  * function is blocking or non-blocking, or the maximum timeout, use
1014  * libusb_handle_events_timeout() instead.
1015  *
1016  * \returns 0 on success
1017  * \returns non-zero on error
1018  */
1019 API_EXPORTED int libusb_handle_events(void)
1020 {
1021         struct timeval tv;
1022         tv.tv_sec = 2;
1023         tv.tv_usec = 0;
1024         return handle_events(&tv);
1025 }
1026
1027 /** \ingroup poll
1028  * Determine the next internal timeout that libusb needs to handle. You only
1029  * need to use this function if you are calling poll() or select() or similar
1030  * on libusb's file descriptors yourself - you do not need to use it if you
1031  * are calling libusb_handle_events() or a variant directly.
1032  * 
1033  * You should call this function in your main loop in order to determine how
1034  * long to wait for select() or poll() to return results. libusb needs to be
1035  * called into at this timeout, so you should use it as an upper bound on
1036  * your select() or poll() call.
1037  *
1038  * When the timeout has expired, call into libusb_handle_events_timeout()
1039  * (perhaps in non-blocking mode) so that libusb can handle the timeout.
1040  *
1041  * This function may return 0 (success) and an all-zero timeval. If this is
1042  * the case, it indicates that libusb has a timeout that has already expired
1043  * so you should call libusb_handle_events_timeout() or similar immediately.
1044  *
1045  * \param tv output location for a relative time against the current
1046  * clock in which libusb must be called into in order to process timeout events
1047  * \returns 0 on success
1048  * \returns non-zero on error
1049  */
1050 API_EXPORTED int libusb_get_next_timeout(struct timeval *tv)
1051 {
1052         struct usbi_transfer *transfer;
1053         struct timespec cur_ts;
1054         struct timeval cur_tv;
1055         struct timeval *next_timeout;
1056         int r;
1057         int found = 0;
1058
1059         if (list_empty(&flying_transfers)) {
1060                 usbi_dbg("no URBs, no timeout!");
1061                 return 0;
1062         }
1063
1064         /* find next transfer which hasn't already been processed as timed out */
1065         list_for_each_entry(transfer, &flying_transfers, list) {
1066                 if (!(transfer->flags & USBI_TRANSFER_TIMED_OUT)) {
1067                         found = 1;
1068                         break;
1069                 }
1070         }
1071
1072         if (!found) {
1073                 usbi_dbg("all URBs have already been processed for timeouts");
1074                 return 0;
1075         }
1076
1077         next_timeout = &transfer->timeout;
1078
1079         /* no timeout for next transfer */
1080         if (!timerisset(next_timeout)) {
1081                 usbi_dbg("no URBs with timeouts, no timeout!");
1082                 return 0;
1083         }
1084
1085         r = clock_gettime(CLOCK_MONOTONIC, &cur_ts);
1086         if (r < 0) {
1087                 usbi_err("failed to read monotonic clock, errno=%d", errno);
1088                 return r;
1089         }
1090         TIMESPEC_TO_TIMEVAL(&cur_tv, &cur_ts);
1091
1092         if (timercmp(&cur_tv, next_timeout, >=)) {
1093                 usbi_dbg("first timeout already expired");
1094                 timerclear(tv);
1095         } else {
1096                 timersub(next_timeout, &cur_tv, tv);
1097                 usbi_dbg("next timeout in %d.%06ds", tv->tv_sec, tv->tv_usec);
1098         }
1099
1100         return 1;
1101 }
1102
1103 /** \ingroup poll
1104  * Register notification functions for file descriptor additions/removals.
1105  * These functions will be invoked for every new or removed file descriptor
1106  * that libusb uses as an event source.
1107  *
1108  * To remove notifiers, pass NULL values for the function pointers.
1109  *
1110  * \param added_cb pointer to function for addition notifications
1111  * \param removed_cb pointer to function for removal notifications
1112  */
1113 API_EXPORTED void libusb_set_pollfd_notifiers(libusb_pollfd_added_cb added_cb,
1114         libusb_pollfd_removed_cb removed_cb)
1115 {
1116         fd_added_cb = added_cb;
1117         fd_removed_cb = removed_cb;
1118 }
1119
1120 int usbi_add_pollfd(int fd, short events)
1121 {
1122         struct usbi_pollfd *ipollfd = malloc(sizeof(*ipollfd));
1123         if (!ipollfd)
1124                 return -ENOMEM;
1125
1126         usbi_dbg("add fd %d events %d", fd, events);
1127         ipollfd->pollfd.fd = fd;
1128         ipollfd->pollfd.events = events;
1129         list_add(&ipollfd->list, &pollfds);
1130
1131         if (fd_added_cb)
1132                 fd_added_cb(fd, events);
1133         return 0;
1134 }
1135
1136 void usbi_remove_pollfd(int fd)
1137 {
1138         struct usbi_pollfd *ipollfd;
1139         int found = 0;
1140
1141         usbi_dbg("remove fd %d", fd);
1142         list_for_each_entry(ipollfd, &pollfds, list)
1143                 if (ipollfd->pollfd.fd == fd) {
1144                         found = 1;
1145                         break;
1146                 }
1147
1148         if (!found) {
1149                 usbi_err("couldn't find fd %d to remove", fd);
1150                 return;
1151         }
1152
1153         list_del(&ipollfd->list);
1154         free(ipollfd);
1155         if (fd_removed_cb)
1156                 fd_removed_cb(fd);
1157 }
1158
1159 /** \ingroup poll
1160  * Retrieve a list of file descriptors that should be polled by your main loop
1161  * as libusb event sources.
1162  *
1163  * The returned list is NULL-terminated and should be freed with free() when
1164  * done. The actual list contents must not be touched.
1165  *
1166  * \returns a NULL-terminated list of libusb_pollfd structures, or NULL on
1167  * error
1168  */
1169 API_EXPORTED const struct libusb_pollfd **libusb_get_pollfds(void)
1170 {
1171         struct libusb_pollfd **ret;
1172         struct usbi_pollfd *ipollfd;
1173         size_t i = 0;
1174         size_t cnt = 0;
1175
1176         list_for_each_entry(ipollfd, &pollfds, list)
1177                 cnt++;
1178
1179         ret = calloc(cnt + 1, sizeof(struct libusb_pollfd *));
1180         if (!ret)
1181                 return NULL;
1182
1183         list_for_each_entry(ipollfd, &pollfds, list)
1184                 ret[i++] = (struct libusb_pollfd *) ipollfd;
1185         ret[cnt] = NULL;
1186
1187         return (const struct libusb_pollfd **) ret;
1188 }
1189