Update documentation about early completion caveats
[platform/upstream/libusb.git] / libusb / io.c
1 /*
2  * I/O functions for libusb
3  * Copyright (C) 2007-2009 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 <pthread.h>
25 #include <signal.h>
26 #include <stdint.h>
27 #include <stdlib.h>
28 #include <string.h>
29 #include <sys/time.h>
30 #include <time.h>
31 #include <unistd.h>
32
33 #ifdef USBI_TIMERFD_AVAILABLE
34 #include <sys/timerfd.h>
35 #endif
36
37 #include "libusbi.h"
38
39 /**
40  * \page io Synchronous and asynchronous device I/O
41  *
42  * \section intro Introduction
43  *
44  * If you're using libusb in your application, you're probably wanting to
45  * perform I/O with devices - you want to perform USB data transfers.
46  *
47  * libusb offers two separate interfaces for device I/O. This page aims to
48  * introduce the two in order to help you decide which one is more suitable
49  * for your application. You can also choose to use both interfaces in your
50  * application by considering each transfer on a case-by-case basis.
51  *
52  * Once you have read through the following discussion, you should consult the
53  * detailed API documentation pages for the details:
54  * - \ref syncio
55  * - \ref asyncio
56  *
57  * \section theory Transfers at a logical level
58  *
59  * At a logical level, USB transfers typically happen in two parts. For
60  * example, when reading data from a endpoint:
61  * -# A request for data is sent to the device
62  * -# Some time later, the incoming data is received by the host
63  *
64  * or when writing data to an endpoint:
65  *
66  * -# The data is sent to the device
67  * -# Some time later, the host receives acknowledgement from the device that
68  *    the data has been transferred.
69  *
70  * There may be an indefinite delay between the two steps. Consider a
71  * fictional USB input device with a button that the user can press. In order
72  * to determine when the button is pressed, you would likely submit a request
73  * to read data on a bulk or interrupt endpoint and wait for data to arrive.
74  * Data will arrive when the button is pressed by the user, which is
75  * potentially hours later.
76  *
77  * libusb offers both a synchronous and an asynchronous interface to performing
78  * USB transfers. The main difference is that the synchronous interface
79  * combines both steps indicated above into a single function call, whereas
80  * the asynchronous interface separates them.
81  *
82  * \section sync The synchronous interface
83  *
84  * The synchronous I/O interface allows you to perform a USB transfer with
85  * a single function call. When the function call returns, the transfer has
86  * completed and you can parse the results.
87  *
88  * If you have used the libusb-0.1 before, this I/O style will seem familar to
89  * you. libusb-0.1 only offered a synchronous interface.
90  *
91  * In our input device example, to read button presses you might write code
92  * in the following style:
93 \code
94 unsigned char data[4];
95 int actual_length,
96 int r = libusb_bulk_transfer(handle, EP_IN, data, sizeof(data), &actual_length, 0);
97 if (r == 0 && actual_length == sizeof(data)) {
98         // results of the transaction can now be found in the data buffer
99         // parse them here and report button press
100 } else {
101         error();
102 }
103 \endcode
104  *
105  * The main advantage of this model is simplicity: you did everything with
106  * a single simple function call.
107  *
108  * However, this interface has its limitations. Your application will sleep
109  * inside libusb_bulk_transfer() until the transaction has completed. If it
110  * takes the user 3 hours to press the button, your application will be
111  * sleeping for that long. Execution will be tied up inside the library -
112  * the entire thread will be useless for that duration.
113  *
114  * Another issue is that by tieing up the thread with that single transaction
115  * there is no possibility of performing I/O with multiple endpoints and/or
116  * multiple devices simultaneously, unless you resort to creating one thread
117  * per transaction.
118  *
119  * Additionally, there is no opportunity to cancel the transfer after the
120  * request has been submitted.
121  *
122  * For details on how to use the synchronous API, see the
123  * \ref syncio "synchronous I/O API documentation" pages.
124  * 
125  * \section async The asynchronous interface
126  *
127  * Asynchronous I/O is the most significant new feature in libusb-1.0.
128  * Although it is a more complex interface, it solves all the issues detailed
129  * above.
130  *
131  * Instead of providing which functions that block until the I/O has complete,
132  * libusb's asynchronous interface presents non-blocking functions which
133  * begin a transfer and then return immediately. Your application passes a
134  * callback function pointer to this non-blocking function, which libusb will
135  * call with the results of the transaction when it has completed.
136  *
137  * Transfers which have been submitted through the non-blocking functions
138  * can be cancelled with a separate function call.
139  *
140  * The non-blocking nature of this interface allows you to be simultaneously
141  * performing I/O to multiple endpoints on multiple devices, without having
142  * to use threads.
143  *
144  * This added flexibility does come with some complications though:
145  * - In the interest of being a lightweight library, libusb does not create
146  * threads and can only operate when your application is calling into it. Your
147  * application must call into libusb from it's main loop when events are ready
148  * to be handled, or you must use some other scheme to allow libusb to
149  * undertake whatever work needs to be done.
150  * - libusb also needs to be called into at certain fixed points in time in
151  * order to accurately handle transfer timeouts.
152  * - Memory handling becomes more complex. You cannot use stack memory unless
153  * the function with that stack is guaranteed not to return until the transfer
154  * callback has finished executing.
155  * - You generally lose some linearity from your code flow because submitting
156  * the transfer request is done in a separate function from where the transfer
157  * results are handled. This becomes particularly obvious when you want to
158  * submit a second transfer based on the results of an earlier transfer.
159  *
160  * Internally, libusb's synchronous interface is expressed in terms of function
161  * calls to the asynchronous interface.
162  *
163  * For details on how to use the asynchronous API, see the
164  * \ref asyncio "asynchronous I/O API" documentation pages.
165  */
166
167
168 /**
169  * \page packetoverflow Packets and overflows
170  *
171  * \section packets Packet abstraction
172  *
173  * The USB specifications describe how data is transmitted in packets, with
174  * constraints on packet size defined by endpoint descriptors. The host must
175  * not send data payloads larger than the endpoint's maximum packet size.
176  *
177  * libusb and the underlying OS abstract out the packet concept, allowing you
178  * to request transfers of any size. Internally, the request will be divided
179  * up into correctly-sized packets. You do not have to be concerned with
180  * packet sizes, but there is one exception when considering overflows.
181  *
182  * \section overflow Bulk/interrupt transfer overflows
183  *
184  * When requesting data on a bulk endpoint, libusb requires you to supply a
185  * buffer and the maximum number of bytes of data that libusb can put in that
186  * buffer. However, the size of the buffer is not communicated to the device -
187  * the device is just asked to send any amount of data.
188  *
189  * There is no problem if the device sends an amount of data that is less than
190  * or equal to the buffer size. libusb reports this condition to you through
191  * the \ref libusb_transfer::actual_length "libusb_transfer.actual_length"
192  * field.
193  *
194  * Problems may occur if the device attempts to send more data than can fit in
195  * the buffer. libusb reports LIBUSB_TRANSFER_OVERFLOW for this condition but
196  * other behaviour is largely undefined: actual_length may or may not be
197  * accurate, the chunk of data that can fit in the buffer (before overflow)
198  * may or may not have been transferred.
199  *
200  * Overflows are nasty, but can be avoided. Even though you were told to
201  * ignore packets above, think about the lower level details: each transfer is
202  * split into packets (typically small, with a maximum size of 512 bytes).
203  * Overflows can only happen if the final packet in an incoming data transfer
204  * is smaller than the actual packet that the device wants to transfer.
205  * Therefore, you will never see an overflow if your transfer buffer size is a
206  * multiple of the endpoint's packet size: the final packet will either
207  * fill up completely or will be only partially filled.
208  */
209
210 /**
211  * @defgroup asyncio Asynchronous device I/O
212  *
213  * This page details libusb's asynchronous (non-blocking) API for USB device
214  * I/O. This interface is very powerful but is also quite complex - you will
215  * need to read this page carefully to understand the necessary considerations
216  * and issues surrounding use of this interface. Simplistic applications
217  * may wish to consider the \ref syncio "synchronous I/O API" instead.
218  *
219  * The asynchronous interface is built around the idea of separating transfer
220  * submission and handling of transfer completion (the synchronous model
221  * combines both of these into one). There may be a long delay between
222  * submission and completion, however the asynchronous submission function
223  * is non-blocking so will return control to your application during that
224  * potentially long delay.
225  *
226  * \section asyncabstraction Transfer abstraction
227  *
228  * For the asynchronous I/O, libusb implements the concept of a generic
229  * transfer entity for all types of I/O (control, bulk, interrupt,
230  * isochronous). The generic transfer object must be treated slightly
231  * differently depending on which type of I/O you are performing with it.
232  *
233  * This is represented by the public libusb_transfer structure type.
234  *
235  * \section asynctrf Asynchronous transfers
236  *
237  * We can view asynchronous I/O as a 5 step process:
238  * -# <b>Allocation</b>: allocate a libusb_transfer
239  * -# <b>Filling</b>: populate the libusb_transfer instance with information
240  *    about the transfer you wish to perform
241  * -# <b>Submission</b>: ask libusb to submit the transfer
242  * -# <b>Completion handling</b>: examine transfer results in the
243  *    libusb_transfer structure
244  * -# <b>Deallocation</b>: clean up resources
245  * 
246  *
247  * \subsection asyncalloc Allocation
248  *
249  * This step involves allocating memory for a USB transfer. This is the
250  * generic transfer object mentioned above. At this stage, the transfer
251  * is "blank" with no details about what type of I/O it will be used for.
252  *
253  * Allocation is done with the libusb_alloc_transfer() function. You must use
254  * this function rather than allocating your own transfers.
255  *
256  * \subsection asyncfill Filling
257  *
258  * This step is where you take a previously allocated transfer and fill it
259  * with information to determine the message type and direction, data buffer,
260  * callback function, etc.
261  *
262  * You can either fill the required fields yourself or you can use the
263  * helper functions: libusb_fill_control_transfer(), libusb_fill_bulk_transfer()
264  * and libusb_fill_interrupt_transfer().
265  *
266  * \subsection asyncsubmit Submission
267  *
268  * When you have allocated a transfer and filled it, you can submit it using
269  * libusb_submit_transfer(). This function returns immediately but can be
270  * regarded as firing off the I/O request in the background.
271  *
272  * \subsection asynccomplete Completion handling
273  *
274  * After a transfer has been submitted, one of four things can happen to it:
275  *
276  * - The transfer completes (i.e. some data was transferred)
277  * - The transfer has a timeout and the timeout expires before all data is
278  * transferred
279  * - The transfer fails due to an error
280  * - The transfer is cancelled
281  *
282  * Each of these will cause the user-specified transfer callback function to
283  * be invoked. It is up to the callback function to determine which of the
284  * above actually happened and to act accordingly.
285  *
286  * The user-specified callback is passed a pointer to the libusb_transfer
287  * structure which was used to setup and submit the transfer. At completion
288  * time, libusb has populated this structure with results of the transfer:
289  * success or failure reason, number of bytes of data transferred, etc. See
290  * the libusb_transfer structure documentation for more information.
291  *
292  * \subsection Deallocation
293  *
294  * When a transfer has completed (i.e. the callback function has been invoked),
295  * you are advised to free the transfer (unless you wish to resubmit it, see
296  * below). Transfers are deallocated with libusb_free_transfer().
297  *
298  * It is undefined behaviour to free a transfer which has not completed.
299  *
300  * \section asyncresubmit Resubmission
301  *
302  * You may be wondering why allocation, filling, and submission are all
303  * separated above where they could reasonably be combined into a single
304  * operation.
305  *
306  * The reason for separation is to allow you to resubmit transfers without
307  * having to allocate new ones every time. This is especially useful for
308  * common situations dealing with interrupt endpoints - you allocate one
309  * transfer, fill and submit it, and when it returns with results you just
310  * resubmit it for the next interrupt.
311  *
312  * \section asynccancel Cancellation
313  *
314  * Another advantage of using the asynchronous interface is that you have
315  * the ability to cancel transfers which have not yet completed. This is
316  * done by calling the libusb_cancel_transfer() function.
317  *
318  * libusb_cancel_transfer() is asynchronous/non-blocking in itself. When the
319  * cancellation actually completes, the transfer's callback function will
320  * be invoked, and the callback function should check the transfer status to
321  * determine that it was cancelled.
322  *
323  * Freeing the transfer after it has been cancelled but before cancellation
324  * has completed will result in undefined behaviour.
325  *
326  * When a transfer is cancelled, some of the data may have been transferred.
327  * libusb will communicate this to you in the transfer callback. Do not assume
328  * that no data was transferred.
329  *
330  * \section bulk_overflows Overflows on device-to-host bulk/interrupt endpoints
331  *
332  * If your device does not have predictable transfer sizes (or it misbehaves),
333  * your application may submit a request for data on an IN endpoint which is
334  * smaller than the data that the device wishes to send. In some circumstances
335  * this will cause an overflow, which is a nasty condition to deal with. See
336  * the \ref packetoverflow page for discussion.
337  *
338  * \section asyncctrl Considerations for control transfers
339  *
340  * The <tt>libusb_transfer</tt> structure is generic and hence does not
341  * include specific fields for the control-specific setup packet structure.
342  *
343  * In order to perform a control transfer, you must place the 8-byte setup
344  * packet at the start of the data buffer. To simplify this, you could
345  * cast the buffer pointer to type struct libusb_control_setup, or you can
346  * use the helper function libusb_fill_control_setup().
347  *
348  * The wLength field placed in the setup packet must be the length you would
349  * expect to be sent in the setup packet: the length of the payload that
350  * follows (or the expected maximum number of bytes to receive). However,
351  * the length field of the libusb_transfer object must be the length of
352  * the data buffer - i.e. it should be wLength <em>plus</em> the size of
353  * the setup packet (LIBUSB_CONTROL_SETUP_SIZE).
354  *
355  * If you use the helper functions, this is simplified for you:
356  * -# Allocate a buffer of size LIBUSB_CONTROL_SETUP_SIZE plus the size of the
357  * data you are sending/requesting.
358  * -# Call libusb_fill_control_setup() on the data buffer, using the transfer
359  * request size as the wLength value (i.e. do not include the extra space you
360  * allocated for the control setup).
361  * -# If this is a host-to-device transfer, place the data to be transferred
362  * in the data buffer, starting at offset LIBUSB_CONTROL_SETUP_SIZE.
363  * -# Call libusb_fill_control_transfer() to associate the data buffer with
364  * the transfer (and to set the remaining details such as callback and timeout).
365  *   - Note that there is no parameter to set the length field of the transfer.
366  *     The length is automatically inferred from the wLength field of the setup
367  *     packet.
368  * -# Submit the transfer.
369  *
370  * The multi-byte control setup fields (wValue, wIndex and wLength) must
371  * be given in little-endian byte order (the endianness of the USB bus).
372  * Endianness conversion is transparently handled by
373  * libusb_fill_control_setup() which is documented to accept host-endian
374  * values.
375  *
376  * Further considerations are needed when handling transfer completion in
377  * your callback function:
378  * - As you might expect, the setup packet will still be sitting at the start
379  * of the data buffer.
380  * - If this was a device-to-host transfer, the received data will be sitting
381  * at offset LIBUSB_CONTROL_SETUP_SIZE into the buffer.
382  * - The actual_length field of the transfer structure is relative to the
383  * wLength of the setup packet, rather than the size of the data buffer. So,
384  * if your wLength was 4, your transfer's <tt>length</tt> was 12, then you
385  * should expect an <tt>actual_length</tt> of 4 to indicate that the data was
386  * transferred in entirity.
387  *
388  * To simplify parsing of setup packets and obtaining the data from the
389  * correct offset, you may wish to use the libusb_control_transfer_get_data()
390  * and libusb_control_transfer_get_setup() functions within your transfer
391  * callback.
392  *
393  * Even though control endpoints do not halt, a completed control transfer
394  * may have a LIBUSB_TRANSFER_STALL status code. This indicates the control
395  * request was not supported.
396  *
397  * \section asyncintr Considerations for interrupt transfers
398  * 
399  * All interrupt transfers are performed using the polling interval presented
400  * by the bInterval value of the endpoint descriptor.
401  *
402  * \section asynciso Considerations for isochronous transfers
403  *
404  * Isochronous transfers are more complicated than transfers to
405  * non-isochronous endpoints.
406  *
407  * To perform I/O to an isochronous endpoint, allocate the transfer by calling
408  * libusb_alloc_transfer() with an appropriate number of isochronous packets.
409  *
410  * During filling, set \ref libusb_transfer::type "type" to
411  * \ref libusb_transfer_type::LIBUSB_TRANSFER_TYPE_ISOCHRONOUS
412  * "LIBUSB_TRANSFER_TYPE_ISOCHRONOUS", and set
413  * \ref libusb_transfer::num_iso_packets "num_iso_packets" to a value less than
414  * or equal to the number of packets you requested during allocation.
415  * libusb_alloc_transfer() does not set either of these fields for you, given
416  * that you might not even use the transfer on an isochronous endpoint.
417  *
418  * Next, populate the length field for the first num_iso_packets entries in
419  * the \ref libusb_transfer::iso_packet_desc "iso_packet_desc" array. Section
420  * 5.6.3 of the USB2 specifications describe how the maximum isochronous
421  * packet length is determined by the wMaxPacketSize field in the endpoint
422  * descriptor.
423  * Two functions can help you here:
424  *
425  * - libusb_get_max_iso_packet_size() is an easy way to determine the max
426  *   packet size for an isochronous endpoint. Note that the maximum packet
427  *   size is actually the maximum number of bytes that can be transmitted in
428  *   a single microframe, therefore this function multiplies the maximum number
429  *   of bytes per transaction by the number of transaction opportunities per
430  *   microframe.
431  * - libusb_set_iso_packet_lengths() assigns the same length to all packets
432  *   within a transfer, which is usually what you want.
433  *
434  * For outgoing transfers, you'll obviously fill the buffer and populate the
435  * packet descriptors in hope that all the data gets transferred. For incoming
436  * transfers, you must ensure the buffer has sufficient capacity for
437  * the situation where all packets transfer the full amount of requested data.
438  *
439  * Completion handling requires some extra consideration. The
440  * \ref libusb_transfer::actual_length "actual_length" field of the transfer
441  * is meaningless and should not be examined; instead you must refer to the
442  * \ref libusb_iso_packet_descriptor::actual_length "actual_length" field of
443  * each individual packet.
444  *
445  * The \ref libusb_transfer::status "status" field of the transfer is also a
446  * little misleading:
447  *  - If the packets were submitted and the isochronous data microframes
448  *    completed normally, status will have value
449  *    \ref libusb_transfer_status::LIBUSB_TRANSFER_COMPLETED
450  *    "LIBUSB_TRANSFER_COMPLETED". Note that bus errors and software-incurred
451  *    delays are not counted as transfer errors; the transfer.status field may
452  *    indicate COMPLETED even if some or all of the packets failed. Refer to
453  *    the \ref libusb_iso_packet_descriptor::status "status" field of each
454  *    individual packet to determine packet failures.
455  *  - The status field will have value
456  *    \ref libusb_transfer_status::LIBUSB_TRANSFER_ERROR
457  *    "LIBUSB_TRANSFER_ERROR" only when serious errors were encountered.
458  *  - Other transfer status codes occur with normal behaviour.
459  *
460  * The data for each packet will be found at an offset into the buffer that
461  * can be calculated as if each prior packet completed in full. The
462  * libusb_get_iso_packet_buffer() and libusb_get_iso_packet_buffer_simple()
463  * functions may help you here.
464  *
465  * \section asyncmem Memory caveats
466  *
467  * In most circumstances, it is not safe to use stack memory for transfer
468  * buffers. This is because the function that fired off the asynchronous
469  * transfer may return before libusb has finished using the buffer, and when
470  * the function returns it's stack gets destroyed. This is true for both
471  * host-to-device and device-to-host transfers.
472  *
473  * The only case in which it is safe to use stack memory is where you can
474  * guarantee that the function owning the stack space for the buffer does not
475  * return until after the transfer's callback function has completed. In every
476  * other case, you need to use heap memory instead.
477  *
478  * \section asyncflags Fine control
479  *
480  * Through using this asynchronous interface, you may find yourself repeating
481  * a few simple operations many times. You can apply a bitwise OR of certain
482  * flags to a transfer to simplify certain things:
483  * - \ref libusb_transfer_flags::LIBUSB_TRANSFER_SHORT_NOT_OK
484  *   "LIBUSB_TRANSFER_SHORT_NOT_OK" results in transfers which transferred
485  *   less than the requested amount of data being marked with status
486  *   \ref libusb_transfer_status::LIBUSB_TRANSFER_ERROR "LIBUSB_TRANSFER_ERROR"
487  *   (they would normally be regarded as COMPLETED)
488  * - \ref libusb_transfer_flags::LIBUSB_TRANSFER_FREE_BUFFER
489  *   "LIBUSB_TRANSFER_FREE_BUFFER" allows you to ask libusb to free the transfer
490  *   buffer when freeing the transfer.
491  * - \ref libusb_transfer_flags::LIBUSB_TRANSFER_FREE_TRANSFER
492  *   "LIBUSB_TRANSFER_FREE_TRANSFER" causes libusb to automatically free the
493  *   transfer after the transfer callback returns.
494  *
495  * \section asyncevent Event handling
496  *
497  * In accordance of the aim of being a lightweight library, libusb does not
498  * create threads internally. This means that libusb code does not execute
499  * at any time other than when your application is calling a libusb function.
500  * However, an asynchronous model requires that libusb perform work at various
501  * points in time - namely processing the results of previously-submitted
502  * transfers and invoking the user-supplied callback function.
503  *
504  * This gives rise to the libusb_handle_events() function which your
505  * application must call into when libusb has work do to. This gives libusb
506  * the opportunity to reap pending transfers, invoke callbacks, etc.
507  *
508  * The first issue to discuss here is how your application can figure out
509  * when libusb has work to do. In fact, there are two naive options which
510  * do not actually require your application to know this:
511  * -# Periodically call libusb_handle_events() in non-blocking mode at fixed
512  *    short intervals from your main loop
513  * -# Repeatedly call libusb_handle_events() in blocking mode from a dedicated
514  *    thread.
515  *
516  * The first option is plainly not very nice, and will cause unnecessary 
517  * CPU wakeups leading to increased power usage and decreased battery life.
518  * The second option is not very nice either, but may be the nicest option
519  * available to you if the "proper" approach can not be applied to your
520  * application (read on...).
521  * 
522  * The recommended option is to integrate libusb with your application main
523  * event loop. libusb exposes a set of file descriptors which allow you to do
524  * this. Your main loop is probably already calling poll() or select() or a
525  * variant on a set of file descriptors for other event sources (e.g. keyboard
526  * button presses, mouse movements, network sockets, etc). You then add
527  * libusb's file descriptors to your poll()/select() calls, and when activity
528  * is detected on such descriptors you know it is time to call
529  * libusb_handle_events().
530  *
531  * There is one final event handling complication. libusb supports
532  * asynchronous transfers which time out after a specified time period, and
533  * this requires that libusb is called into at or after the timeout so that
534  * the timeout can be handled. So, in addition to considering libusb's file
535  * descriptors in your main event loop, you must also consider that libusb
536  * sometimes needs to be called into at fixed points in time even when there
537  * is no file descriptor activity.
538  *
539  * For the details on retrieving the set of file descriptors and determining
540  * the next timeout, see the \ref poll "polling and timing" API documentation.
541  */
542
543 /**
544  * @defgroup poll Polling and timing
545  *
546  * This page documents libusb's functions for polling events and timing.
547  * These functions are only necessary for users of the
548  * \ref asyncio "asynchronous API". If you are only using the simpler
549  * \ref syncio "synchronous API" then you do not need to ever call these
550  * functions.
551  *
552  * The justification for the functionality described here has already been
553  * discussed in the \ref asyncevent "event handling" section of the
554  * asynchronous API documentation. In summary, libusb does not create internal
555  * threads for event processing and hence relies on your application calling
556  * into libusb at certain points in time so that pending events can be handled.
557  * In order to know precisely when libusb needs to be called into, libusb
558  * offers you a set of pollable file descriptors and information about when
559  * the next timeout expires.
560  *
561  * If you are using the asynchronous I/O API, you must take one of the two
562  * following options, otherwise your I/O will not complete.
563  *
564  * \section pollsimple The simple option
565  *
566  * If your application revolves solely around libusb and does not need to
567  * handle other event sources, you can have a program structure as follows:
568 \code
569 // initialize libusb
570 // find and open device
571 // maybe fire off some initial async I/O
572
573 while (user_has_not_requested_exit)
574         libusb_handle_events(ctx);
575
576 // clean up and exit
577 \endcode
578  *
579  * With such a simple main loop, you do not have to worry about managing
580  * sets of file descriptors or handling timeouts. libusb_handle_events() will
581  * handle those details internally.
582  *
583  * \section pollmain The more advanced option
584  *
585  * In more advanced applications, you will already have a main loop which
586  * is monitoring other event sources: network sockets, X11 events, mouse
587  * movements, etc. Through exposing a set of file descriptors, libusb is
588  * designed to cleanly integrate into such main loops.
589  *
590  * In addition to polling file descriptors for the other event sources, you
591  * take a set of file descriptors from libusb and monitor those too. When you
592  * detect activity on libusb's file descriptors, you call
593  * libusb_handle_events_timeout() in non-blocking mode.
594  *
595  * What's more, libusb may also need to handle events at specific moments in
596  * time. No file descriptor activity is generated at these times, so your
597  * own application needs to be continually aware of when the next one of these
598  * moments occurs (through calling libusb_get_next_timeout()), and then it
599  * needs to call libusb_handle_events_timeout() in non-blocking mode when
600  * these moments occur. This means that you need to adjust your
601  * poll()/select() timeout accordingly.
602  *
603  * In pseudo-code, you want something that looks like:
604 \code
605 // initialise libusb
606
607 libusb_get_pollfds(ctx)
608 while (user has not requested application exit) {
609         libusb_get_next_timeout(ctx);
610         poll(on libusb file descriptors plus any other event sources of interest,
611                 using a timeout no larger than the value libusb just suggested)
612         if (poll() indicated activity on libusb file descriptors)
613                 libusb_handle_events_timeout(ctx, 0);
614         if (time has elapsed to or beyond the libusb timeout)
615                 libusb_handle_events_timeout(ctx, 0);
616         // handle events from other sources here
617 }
618
619 // clean up and exit
620 \endcode
621  *
622  * \subsection polltime Notes on time-based events
623  *
624  * The above complication with having to track time and call into libusb at
625  * specific moments is a bit of a headache. For maximum compatibility, you do
626  * need to write your main loop as above, but you may decide that you can
627  * restrict the supported platforms of your application and get away with
628  * a more simplistic scheme.
629  *
630  * These time-based event complications are \b not required on the following
631  * platforms:
632  *  - Darwin
633  *  - Linux, provided that the following version requirements are satisfied:
634  *   - Linux v2.6.27 or newer, compiled with timerfd support
635  *   - glibc v2.8 or newer
636  *   - libusb v1.0.5 or newer
637  *
638  * Under these configurations, libusb_get_next_timeout() will \em always return
639  * 0, so your main loop can be simplified to:
640 \code
641 // initialise libusb
642
643 libusb_get_pollfds(ctx)
644 while (user has not requested application exit) {
645         poll(on libusb file descriptors plus any other event sources of interest,
646                 using any timeout that you like)
647         if (poll() indicated activity on libusb file descriptors)
648                 libusb_handle_events_timeout(ctx, 0);
649         // handle events from other sources here
650 }
651
652 // clean up and exit
653 \endcode
654  *
655  * Do remember that if you simplify your main loop to the above, you will
656  * lose compatibility with some platforms (including legacy Linux platforms,
657  * and <em>any future platforms supported by libusb which may have time-based
658  * event requirements</em>). The resultant problems will likely appear as
659  * strange bugs in your application.
660  *
661  * You can use the libusb_pollfds_handle_timeouts() function to do a runtime
662  * check to see if it is safe to ignore the time-based event complications.
663  * If your application has taken the shortcut of ignoring libusb's next timeout
664  * in your main loop, then you are advised to check the return value of
665  * libusb_pollfds_handle_timeouts() during application startup, and to abort
666  * if the platform does suffer from these timing complications.
667  *
668  * \subsection fdsetchange Changes in the file descriptor set
669  *
670  * The set of file descriptors that libusb uses as event sources may change
671  * during the life of your application. Rather than having to repeatedly
672  * call libusb_get_pollfds(), you can set up notification functions for when
673  * the file descriptor set changes using libusb_set_pollfd_notifiers().
674  *
675  * \subsection mtissues Multi-threaded considerations
676  *
677  * Unfortunately, the situation is complicated further when multiple threads
678  * come into play. If two threads are monitoring the same file descriptors,
679  * the fact that only one thread will be woken up when an event occurs causes
680  * some headaches.
681  *
682  * The events lock, event waiters lock, and libusb_handle_events_locked()
683  * entities are added to solve these problems. You do not need to be concerned
684  * with these entities otherwise.
685  *
686  * See the extra documentation: \ref mtasync
687  */
688
689 /** \page mtasync Multi-threaded applications and asynchronous I/O
690  *
691  * libusb is a thread-safe library, but extra considerations must be applied
692  * to applications which interact with libusb from multiple threads.
693  *
694  * The underlying issue that must be addressed is that all libusb I/O
695  * revolves around monitoring file descriptors through the poll()/select()
696  * system calls. This is directly exposed at the
697  * \ref asyncio "asynchronous interface" but it is important to note that the
698  * \ref syncio "synchronous interface" is implemented on top of the
699  * asynchonrous interface, therefore the same considerations apply.
700  *
701  * The issue is that if two or more threads are concurrently calling poll()
702  * or select() on libusb's file descriptors then only one of those threads
703  * will be woken up when an event arrives. The others will be completely
704  * oblivious that anything has happened.
705  *
706  * Consider the following pseudo-code, which submits an asynchronous transfer
707  * then waits for its completion. This style is one way you could implement a
708  * synchronous interface on top of the asynchronous interface (and libusb
709  * does something similar, albeit more advanced due to the complications
710  * explained on this page).
711  *
712 \code
713 void cb(struct libusb_transfer *transfer)
714 {
715         int *completed = transfer->user_data;
716         *completed = 1;
717 }
718
719 void myfunc() {
720         struct libusb_transfer *transfer;
721         unsigned char buffer[LIBUSB_CONTROL_SETUP_SIZE];
722         int completed = 0;
723
724         transfer = libusb_alloc_transfer(0);
725         libusb_fill_control_setup(buffer,
726                 LIBUSB_REQUEST_TYPE_VENDOR | LIBUSB_ENDPOINT_OUT, 0x04, 0x01, 0, 0);
727         libusb_fill_control_transfer(transfer, dev, buffer, cb, &completed, 1000);
728         libusb_submit_transfer(transfer);
729
730         while (!completed) {
731                 poll(libusb file descriptors, 120*1000);
732                 if (poll indicates activity)
733                         libusb_handle_events_timeout(ctx, 0);
734         }
735         printf("completed!");
736         // other code here
737 }
738 \endcode
739  *
740  * Here we are <em>serializing</em> completion of an asynchronous event
741  * against a condition - the condition being completion of a specific transfer.
742  * The poll() loop has a long timeout to minimize CPU usage during situations
743  * when nothing is happening (it could reasonably be unlimited).
744  *
745  * If this is the only thread that is polling libusb's file descriptors, there
746  * is no problem: there is no danger that another thread will swallow up the
747  * event that we are interested in. On the other hand, if there is another
748  * thread polling the same descriptors, there is a chance that it will receive
749  * the event that we were interested in. In this situation, <tt>myfunc()</tt>
750  * will only realise that the transfer has completed on the next iteration of
751  * the loop, <em>up to 120 seconds later.</em> Clearly a two-minute delay is
752  * undesirable, and don't even think about using short timeouts to circumvent
753  * this issue!
754  * 
755  * The solution here is to ensure that no two threads are ever polling the
756  * file descriptors at the same time. A naive implementation of this would
757  * impact the capabilities of the library, so libusb offers the scheme
758  * documented below to ensure no loss of functionality.
759  *
760  * Before we go any further, it is worth mentioning that all libusb-wrapped
761  * event handling procedures fully adhere to the scheme documented below.
762  * This includes libusb_handle_events() and all the synchronous I/O functions - 
763  * libusb hides this headache from you. You do not need to worry about any
764  * of these issues if you stick to that level.
765  *
766  * The problem is when we consider the fact that libusb exposes file
767  * descriptors to allow for you to integrate asynchronous USB I/O into
768  * existing main loops, effectively allowing you to do some work behind
769  * libusb's back. If you do take libusb's file descriptors and pass them to
770  * poll()/select() yourself, you need to be aware of the associated issues.
771  *
772  * \section eventlock The events lock
773  *
774  * The first concept to be introduced is the events lock. The events lock
775  * is used to serialize threads that want to handle events, such that only
776  * one thread is handling events at any one time.
777  *
778  * You must take the events lock before polling libusb file descriptors,
779  * using libusb_lock_events(). You must release the lock as soon as you have
780  * aborted your poll()/select() loop, using libusb_unlock_events().
781  *
782  * \section threadwait Letting other threads do the work for you
783  *
784  * Although the events lock is a critical part of the solution, it is not
785  * enough on it's own. You might wonder if the following is sufficient...
786 \code
787         libusb_lock_events(ctx);
788         while (!completed) {
789                 poll(libusb file descriptors, 120*1000);
790                 if (poll indicates activity)
791                         libusb_handle_events_timeout(ctx, 0);
792         }
793         libusb_unlock_events(ctx);
794 \endcode
795  * ...and the answer is that it is not. This is because the transfer in the
796  * code shown above may take a long time (say 30 seconds) to complete, and
797  * the lock is not released until the transfer is completed.
798  *
799  * Another thread with similar code that wants to do event handling may be
800  * working with a transfer that completes after a few milliseconds. Despite
801  * having such a quick completion time, the other thread cannot check that
802  * status of its transfer until the code above has finished (30 seconds later)
803  * due to contention on the lock.
804  *
805  * To solve this, libusb offers you a mechanism to determine when another
806  * thread is handling events. It also offers a mechanism to block your thread
807  * until the event handling thread has completed an event (and this mechanism
808  * does not involve polling of file descriptors).
809  *
810  * After determining that another thread is currently handling events, you
811  * obtain the <em>event waiters</em> lock using libusb_lock_event_waiters().
812  * You then re-check that some other thread is still handling events, and if
813  * so, you call libusb_wait_for_event().
814  *
815  * libusb_wait_for_event() puts your application to sleep until an event
816  * occurs, or until a thread releases the events lock. When either of these
817  * things happen, your thread is woken up, and should re-check the condition
818  * it was waiting on. It should also re-check that another thread is handling
819  * events, and if not, it should start handling events itself.
820  *
821  * This looks like the following, as pseudo-code:
822 \code
823 retry:
824 if (libusb_try_lock_events(ctx) == 0) {
825         // we obtained the event lock: do our own event handling
826         while (!completed) {
827                 if (!libusb_event_handling_ok(ctx)) {
828                         libusb_unlock_events(ctx);
829                         goto retry;
830                 }
831                 poll(libusb file descriptors, 120*1000);
832                 if (poll indicates activity)
833                         libusb_handle_events_locked(ctx, 0);
834         }
835         libusb_unlock_events(ctx);
836 } else {
837         // another thread is doing event handling. wait for it to signal us that
838         // an event has completed
839         libusb_lock_event_waiters(ctx);
840
841         while (!completed) {
842                 // now that we have the event waiters lock, double check that another
843                 // thread is still handling events for us. (it may have ceased handling
844                 // events in the time it took us to reach this point)
845                 if (!libusb_event_handler_active(ctx)) {
846                         // whoever was handling events is no longer doing so, try again
847                         libusb_unlock_event_waiters(ctx);
848                         goto retry;
849                 }
850         
851                 libusb_wait_for_event(ctx);
852         }
853         libusb_unlock_event_waiters(ctx);
854 }
855 printf("completed!\n");
856 \endcode
857  *
858  * A naive look at the above code may suggest that this can only support
859  * one event waiter (hence a total of 2 competing threads, the other doing
860  * event handling), because the event waiter seems to have taken the event
861  * waiters lock while waiting for an event. However, the system does support
862  * multiple event waiters, because libusb_wait_for_event() actually drops
863  * the lock while waiting, and reaquires it before continuing.
864  *
865  * We have now implemented code which can dynamically handle situations where
866  * nobody is handling events (so we should do it ourselves), and it can also
867  * handle situations where another thread is doing event handling (so we can
868  * piggyback onto them). It is also equipped to handle a combination of
869  * the two, for example, another thread is doing event handling, but for
870  * whatever reason it stops doing so before our condition is met, so we take
871  * over the event handling.
872  *
873  * Four functions were introduced in the above pseudo-code. Their importance
874  * should be apparent from the code shown above.
875  * -# libusb_try_lock_events() is a non-blocking function which attempts
876  *    to acquire the events lock but returns a failure code if it is contended.
877  * -# libusb_event_handling_ok() checks that libusb is still happy for your
878  *    thread to be performing event handling. Sometimes, libusb needs to
879  *    interrupt the event handler, and this is how you can check if you have
880  *    been interrupted. If this function returns 0, the correct behaviour is
881  *    for you to give up the event handling lock, and then to repeat the cycle.
882  *    The following libusb_try_lock_events() will fail, so you will become an
883  *    events waiter. For more information on this, read \ref fullstory below.
884  * -# libusb_handle_events_locked() is a variant of
885  *    libusb_handle_events_timeout() that you can call while holding the
886  *    events lock. libusb_handle_events_timeout() itself implements similar
887  *    logic to the above, so be sure not to call it when you are
888  *    "working behind libusb's back", as is the case here.
889  * -# libusb_event_handler_active() determines if someone is currently
890  *    holding the events lock
891  *
892  * You might be wondering why there is no function to wake up all threads
893  * blocked on libusb_wait_for_event(). This is because libusb can do this
894  * internally: it will wake up all such threads when someone calls
895  * libusb_unlock_events() or when a transfer completes (at the point after its
896  * callback has returned).
897  *
898  * \subsection fullstory The full story
899  *
900  * The above explanation should be enough to get you going, but if you're
901  * really thinking through the issues then you may be left with some more
902  * questions regarding libusb's internals. If you're curious, read on, and if
903  * not, skip to the next section to avoid confusing yourself!
904  *
905  * The immediate question that may spring to mind is: what if one thread
906  * modifies the set of file descriptors that need to be polled while another
907  * thread is doing event handling?
908  *
909  * There are 2 situations in which this may happen.
910  * -# libusb_open() will add another file descriptor to the poll set,
911  *    therefore it is desirable to interrupt the event handler so that it
912  *    restarts, picking up the new descriptor.
913  * -# libusb_close() will remove a file descriptor from the poll set. There
914  *    are all kinds of race conditions that could arise here, so it is
915  *    important that nobody is doing event handling at this time.
916  *
917  * libusb handles these issues internally, so application developers do not
918  * have to stop their event handlers while opening/closing devices. Here's how
919  * it works, focusing on the libusb_close() situation first:
920  *
921  * -# During initialization, libusb opens an internal pipe, and it adds the read
922  *    end of this pipe to the set of file descriptors to be polled.
923  * -# During libusb_close(), libusb writes some dummy data on this control pipe.
924  *    This immediately interrupts the event handler. libusb also records
925  *    internally that it is trying to interrupt event handlers for this
926  *    high-priority event.
927  * -# At this point, some of the functions described above start behaving
928  *    differently:
929  *   - libusb_event_handling_ok() starts returning 1, indicating that it is NOT
930  *     OK for event handling to continue.
931  *   - libusb_try_lock_events() starts returning 1, indicating that another
932  *     thread holds the event handling lock, even if the lock is uncontended.
933  *   - libusb_event_handler_active() starts returning 1, indicating that
934  *     another thread is doing event handling, even if that is not true.
935  * -# The above changes in behaviour result in the event handler stopping and
936  *    giving up the events lock very quickly, giving the high-priority
937  *    libusb_close() operation a "free ride" to acquire the events lock. All
938  *    threads that are competing to do event handling become event waiters.
939  * -# With the events lock held inside libusb_close(), libusb can safely remove
940  *    a file descriptor from the poll set, in the safety of knowledge that
941  *    nobody is polling those descriptors or trying to access the poll set.
942  * -# After obtaining the events lock, the close operation completes very
943  *    quickly (usually a matter of milliseconds) and then immediately releases
944  *    the events lock.
945  * -# At the same time, the behaviour of libusb_event_handling_ok() and friends
946  *    reverts to the original, documented behaviour.
947  * -# The release of the events lock causes the threads that are waiting for
948  *    events to be woken up and to start competing to become event handlers
949  *    again. One of them will succeed; it will then re-obtain the list of poll
950  *    descriptors, and USB I/O will then continue as normal.
951  *
952  * libusb_open() is similar, and is actually a more simplistic case. Upon a
953  * call to libusb_open():
954  *
955  * -# The device is opened and a file descriptor is added to the poll set.
956  * -# libusb sends some dummy data on the control pipe, and records that it
957  *    is trying to modify the poll descriptor set.
958  * -# The event handler is interrupted, and the same behaviour change as for
959  *    libusb_close() takes effect, causing all event handling threads to become
960  *    event waiters.
961  * -# The libusb_open() implementation takes its free ride to the events lock.
962  * -# Happy that it has successfully paused the events handler, libusb_open()
963  *    releases the events lock.
964  * -# The event waiter threads are all woken up and compete to become event
965  *    handlers again. The one that succeeds will obtain the list of poll
966  *    descriptors again, which will include the addition of the new device.
967  *
968  * \subsection concl Closing remarks
969  *
970  * The above may seem a little complicated, but hopefully I have made it clear
971  * why such complications are necessary. Also, do not forget that this only
972  * applies to applications that take libusb's file descriptors and integrate
973  * them into their own polling loops.
974  *
975  * You may decide that it is OK for your multi-threaded application to ignore
976  * some of the rules and locks detailed above, because you don't think that
977  * two threads can ever be polling the descriptors at the same time. If that
978  * is the case, then that's good news for you because you don't have to worry.
979  * But be careful here; remember that the synchronous I/O functions do event
980  * handling internally. If you have one thread doing event handling in a loop
981  * (without implementing the rules and locking semantics documented above)
982  * and another trying to send a synchronous USB transfer, you will end up with
983  * two threads monitoring the same descriptors, and the above-described
984  * undesirable behaviour occuring. The solution is for your polling thread to
985  * play by the rules; the synchronous I/O functions do so, and this will result
986  * in them getting along in perfect harmony.
987  *
988  * If you do have a dedicated thread doing event handling, it is perfectly
989  * legal for it to take the event handling lock for long periods of time. Any
990  * synchronous I/O functions you call from other threads will transparently
991  * fall back to the "event waiters" mechanism detailed above. The only
992  * consideration that your event handling thread must apply is the one related
993  * to libusb_event_handling_ok(): you must call this before every poll(), and
994  * give up the events lock if instructed.
995  */
996
997 int usbi_io_init(struct libusb_context *ctx)
998 {
999         int r;
1000
1001         pthread_mutex_init(&ctx->flying_transfers_lock, NULL);
1002         pthread_mutex_init(&ctx->pollfds_lock, NULL);
1003         pthread_mutex_init(&ctx->pollfd_modify_lock, NULL);
1004         pthread_mutex_init(&ctx->events_lock, NULL);
1005         pthread_mutex_init(&ctx->event_waiters_lock, NULL);
1006         pthread_cond_init(&ctx->event_waiters_cond, NULL);
1007         list_init(&ctx->flying_transfers);
1008         list_init(&ctx->pollfds);
1009
1010         /* FIXME should use an eventfd on kernels that support it */
1011         r = pipe(ctx->ctrl_pipe);
1012         if (r < 0)
1013                 return LIBUSB_ERROR_OTHER;
1014
1015         r = usbi_add_pollfd(ctx, ctx->ctrl_pipe[0], POLLIN);
1016         if (r < 0)
1017                 return r;
1018
1019 #ifdef USBI_TIMERFD_AVAILABLE
1020         ctx->timerfd = timerfd_create(usbi_backend->get_timerfd_clockid(),
1021                 TFD_NONBLOCK);
1022         if (ctx->timerfd >= 0) {
1023                 usbi_dbg("using timerfd for timeouts");
1024                 r = usbi_add_pollfd(ctx, ctx->timerfd, POLLIN);
1025                 if (r < 0) {
1026                         close(ctx->timerfd);
1027                         return r;
1028                 }
1029         } else {
1030                 usbi_dbg("timerfd not available (code %d error %d)", ctx->timerfd, errno);
1031                 ctx->timerfd = -1;
1032         }
1033 #endif
1034
1035         return 0;
1036 }
1037
1038 void usbi_io_exit(struct libusb_context *ctx)
1039 {
1040         usbi_remove_pollfd(ctx, ctx->ctrl_pipe[0]);
1041         close(ctx->ctrl_pipe[0]);
1042         close(ctx->ctrl_pipe[1]);
1043 #ifdef USBI_TIMERFD_AVAILABLE
1044         if (usbi_using_timerfd(ctx)) {
1045                 usbi_remove_pollfd(ctx, ctx->timerfd);
1046                 close(ctx->timerfd);
1047         }
1048 #endif
1049 }
1050
1051 static int calculate_timeout(struct usbi_transfer *transfer)
1052 {
1053         int r;
1054         struct timespec current_time;
1055         unsigned int timeout =
1056                 __USBI_TRANSFER_TO_LIBUSB_TRANSFER(transfer)->timeout;
1057
1058         if (!timeout)
1059                 return 0;
1060
1061         r = usbi_backend->clock_gettime(USBI_CLOCK_MONOTONIC, &current_time);
1062         if (r < 0) {
1063                 usbi_err(ITRANSFER_CTX(transfer),
1064                         "failed to read monotonic clock, errno=%d", errno);
1065                 return r;
1066         }
1067
1068         current_time.tv_sec += timeout / 1000;
1069         current_time.tv_nsec += (timeout % 1000) * 1000000;
1070
1071         if (current_time.tv_nsec > 1000000000) {
1072                 current_time.tv_nsec -= 1000000000;
1073                 current_time.tv_sec++;
1074         }
1075
1076         TIMESPEC_TO_TIMEVAL(&transfer->timeout, &current_time);
1077         return 0;
1078 }
1079
1080 /* add a transfer to the (timeout-sorted) active transfers list.
1081  * returns 1 if the transfer has a timeout and it is the timeout next to
1082  * expire */
1083 static int add_to_flying_list(struct usbi_transfer *transfer)
1084 {
1085         struct usbi_transfer *cur;
1086         struct timeval *timeout = &transfer->timeout;
1087         struct libusb_context *ctx = ITRANSFER_CTX(transfer);
1088         int r = 0;
1089         int first = 1;
1090
1091         pthread_mutex_lock(&ctx->flying_transfers_lock);
1092
1093         /* if we have no other flying transfers, start the list with this one */
1094         if (list_empty(&ctx->flying_transfers)) {
1095                 list_add(&transfer->list, &ctx->flying_transfers);
1096                 if (timerisset(timeout))
1097                         r = 1;
1098                 goto out;
1099         }
1100
1101         /* if we have infinite timeout, append to end of list */
1102         if (!timerisset(timeout)) {
1103                 list_add_tail(&transfer->list, &ctx->flying_transfers);
1104                 goto out;
1105         }
1106
1107         /* otherwise, find appropriate place in list */
1108         list_for_each_entry(cur, &ctx->flying_transfers, list) {
1109                 /* find first timeout that occurs after the transfer in question */
1110                 struct timeval *cur_tv = &cur->timeout;
1111
1112                 if (!timerisset(cur_tv) || (cur_tv->tv_sec > timeout->tv_sec) ||
1113                                 (cur_tv->tv_sec == timeout->tv_sec &&
1114                                         cur_tv->tv_usec > timeout->tv_usec)) {
1115                         list_add_tail(&transfer->list, &cur->list);
1116                         r = first;
1117                         goto out;
1118                 }
1119                 first = 0;
1120         }
1121
1122         /* otherwise we need to be inserted at the end */
1123         list_add_tail(&transfer->list, &ctx->flying_transfers);
1124 out:
1125         pthread_mutex_unlock(&ctx->flying_transfers_lock);
1126         return r;
1127 }
1128
1129 /** \ingroup asyncio
1130  * Allocate a libusb transfer with a specified number of isochronous packet
1131  * descriptors. The returned transfer is pre-initialized for you. When the new
1132  * transfer is no longer needed, it should be freed with
1133  * libusb_free_transfer().
1134  *
1135  * Transfers intended for non-isochronous endpoints (e.g. control, bulk,
1136  * interrupt) should specify an iso_packets count of zero.
1137  *
1138  * For transfers intended for isochronous endpoints, specify an appropriate
1139  * number of packet descriptors to be allocated as part of the transfer.
1140  * The returned transfer is not specially initialized for isochronous I/O;
1141  * you are still required to set the
1142  * \ref libusb_transfer::num_iso_packets "num_iso_packets" and
1143  * \ref libusb_transfer::type "type" fields accordingly.
1144  *
1145  * It is safe to allocate a transfer with some isochronous packets and then
1146  * use it on a non-isochronous endpoint. If you do this, ensure that at time
1147  * of submission, num_iso_packets is 0 and that type is set appropriately.
1148  *
1149  * \param iso_packets number of isochronous packet descriptors to allocate
1150  * \returns a newly allocated transfer, or NULL on error
1151  */
1152 API_EXPORTED struct libusb_transfer *libusb_alloc_transfer(int iso_packets)
1153 {
1154         size_t os_alloc_size = usbi_backend->transfer_priv_size
1155                 + (usbi_backend->add_iso_packet_size * iso_packets);
1156         int alloc_size = sizeof(struct usbi_transfer)
1157                 + sizeof(struct libusb_transfer)
1158                 + (sizeof(struct libusb_iso_packet_descriptor) * iso_packets)
1159                 + os_alloc_size;
1160         struct usbi_transfer *itransfer = malloc(alloc_size);
1161         if (!itransfer)
1162                 return NULL;
1163
1164         memset(itransfer, 0, alloc_size);
1165         itransfer->num_iso_packets = iso_packets;
1166         pthread_mutex_init(&itransfer->lock, NULL);
1167         return __USBI_TRANSFER_TO_LIBUSB_TRANSFER(itransfer);
1168 }
1169
1170 /** \ingroup asyncio
1171  * Free a transfer structure. This should be called for all transfers
1172  * allocated with libusb_alloc_transfer().
1173  *
1174  * If the \ref libusb_transfer_flags::LIBUSB_TRANSFER_FREE_BUFFER
1175  * "LIBUSB_TRANSFER_FREE_BUFFER" flag is set and the transfer buffer is
1176  * non-NULL, this function will also free the transfer buffer using the
1177  * standard system memory allocator (e.g. free()).
1178  *
1179  * It is legal to call this function with a NULL transfer. In this case,
1180  * the function will simply return safely.
1181  *
1182  * It is not legal to free an active transfer (one which has been submitted
1183  * and has not yet completed).
1184  *
1185  * \param transfer the transfer to free
1186  */
1187 API_EXPORTED void libusb_free_transfer(struct libusb_transfer *transfer)
1188 {
1189         struct usbi_transfer *itransfer;
1190         if (!transfer)
1191                 return;
1192
1193         if (transfer->flags & LIBUSB_TRANSFER_FREE_BUFFER && transfer->buffer)
1194                 free(transfer->buffer);
1195
1196         itransfer = __LIBUSB_TRANSFER_TO_USBI_TRANSFER(transfer);
1197         pthread_mutex_destroy(&itransfer->lock);
1198         free(itransfer);
1199 }
1200
1201 /** \ingroup asyncio
1202  * Submit a transfer. This function will fire off the USB transfer and then
1203  * return immediately.
1204  *
1205  * \param transfer the transfer to submit
1206  * \returns 0 on success
1207  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1208  * \returns LIBUSB_ERROR_BUSY if the transfer has already been submitted.
1209  * \returns another LIBUSB_ERROR code on other failure
1210  */
1211 API_EXPORTED int libusb_submit_transfer(struct libusb_transfer *transfer)
1212 {
1213         struct libusb_context *ctx = TRANSFER_CTX(transfer);
1214         struct usbi_transfer *itransfer =
1215                 __LIBUSB_TRANSFER_TO_USBI_TRANSFER(transfer);
1216         int r;
1217         int first;
1218
1219         pthread_mutex_lock(&itransfer->lock);
1220         itransfer->transferred = 0;
1221         itransfer->flags = 0;
1222         r = calculate_timeout(itransfer);
1223         if (r < 0) {
1224                 r = LIBUSB_ERROR_OTHER;
1225                 goto out;
1226         }
1227
1228         first = add_to_flying_list(itransfer);
1229         r = usbi_backend->submit_transfer(itransfer);
1230         if (r) {
1231                 pthread_mutex_lock(&ctx->flying_transfers_lock);
1232                 list_del(&itransfer->list);
1233                 pthread_mutex_unlock(&ctx->flying_transfers_lock);
1234         }
1235 #ifdef USBI_TIMERFD_AVAILABLE
1236         else if (first && usbi_using_timerfd(ctx)) {
1237                 /* if this transfer has the lowest timeout of all active transfers,
1238                  * rearm the timerfd with this transfer's timeout */
1239                 const struct itimerspec it = { {0, 0},
1240                         { itransfer->timeout.tv_sec, itransfer->timeout.tv_usec * 1000 } };
1241                 usbi_dbg("arm timerfd for timeout in %dms (first in line)", transfer->timeout);
1242                 r = timerfd_settime(ctx->timerfd, TFD_TIMER_ABSTIME, &it, NULL);
1243                 if (r < 0)
1244                         r = LIBUSB_ERROR_OTHER;
1245         }
1246 #endif
1247
1248 out:
1249         pthread_mutex_unlock(&itransfer->lock);
1250         return r;
1251 }
1252
1253 /** \ingroup asyncio
1254  * Asynchronously cancel a previously submitted transfer.
1255  * This function returns immediately, but this does not indicate cancellation
1256  * is complete. Your callback function will be invoked at some later time
1257  * with a transfer status of
1258  * \ref libusb_transfer_status::LIBUSB_TRANSFER_CANCELLED
1259  * "LIBUSB_TRANSFER_CANCELLED."
1260  *
1261  * \param transfer the transfer to cancel
1262  * \returns 0 on success
1263  * \returns LIBUSB_ERROR_NOT_FOUND if the transfer is already complete or
1264  * cancelled.
1265  * \returns a LIBUSB_ERROR code on failure
1266  */
1267 API_EXPORTED int libusb_cancel_transfer(struct libusb_transfer *transfer)
1268 {
1269         struct usbi_transfer *itransfer =
1270                 __LIBUSB_TRANSFER_TO_USBI_TRANSFER(transfer);
1271         int r;
1272
1273         usbi_dbg("");
1274         pthread_mutex_lock(&itransfer->lock);
1275         r = usbi_backend->cancel_transfer(itransfer);
1276         if (r < 0)
1277                 usbi_err(TRANSFER_CTX(transfer),
1278                         "cancel transfer failed error %d", r);
1279         pthread_mutex_unlock(&itransfer->lock);
1280         return r;
1281 }
1282
1283 #ifdef USBI_TIMERFD_AVAILABLE
1284 static int disarm_timerfd(struct libusb_context *ctx)
1285 {
1286         const struct itimerspec disarm_timer = { { 0, 0 }, { 0, 0 } };
1287         int r;
1288
1289         usbi_dbg("");
1290         r = timerfd_settime(ctx->timerfd, 0, &disarm_timer, NULL);
1291         if (r < 0)
1292                 return LIBUSB_ERROR_OTHER;
1293         else
1294                 return 0;
1295 }
1296
1297 /* iterates through the flying transfers, and rearms the timerfd based on the
1298  * next upcoming timeout.
1299  * must be called with flying_list locked.
1300  * returns 0 if there was no timeout to arm, 1 if the next timeout was armed,
1301  * or a LIBUSB_ERROR code on failure.
1302  */
1303 static int arm_timerfd_for_next_timeout(struct libusb_context *ctx)
1304 {
1305         struct usbi_transfer *transfer;
1306
1307         list_for_each_entry(transfer, &ctx->flying_transfers, list) {
1308                 struct timeval *cur_tv = &transfer->timeout;
1309
1310                 /* if we've reached transfers of infinite timeout, then we have no
1311                  * arming to do */
1312                 if (!timerisset(cur_tv))
1313                         return 0;
1314
1315                 /* act on first transfer that is not already cancelled */
1316                 if (!(transfer->flags & USBI_TRANSFER_TIMED_OUT)) {
1317                         int r;
1318                         const struct itimerspec it = { {0, 0},
1319                                 { cur_tv->tv_sec, cur_tv->tv_usec * 1000 } };
1320                         usbi_dbg("next timeout originally %dms", __USBI_TRANSFER_TO_LIBUSB_TRANSFER(transfer)->timeout);
1321                         r = timerfd_settime(ctx->timerfd, TFD_TIMER_ABSTIME, &it, NULL);
1322                         if (r < 0)
1323                                 return LIBUSB_ERROR_OTHER;
1324                         return 1;
1325                 }
1326         }
1327
1328         return 0;
1329 }
1330 #else
1331 static int disarm_timerfd(struct libusb_context *ctx)
1332 {
1333         return 0;
1334 }
1335 static int arm_timerfd_for_next_timeout(struct libusb_context *ctx)
1336 {
1337         return 0;
1338 }
1339 #endif
1340
1341 /* Handle completion of a transfer (completion might be an error condition).
1342  * This will invoke the user-supplied callback function, which may end up
1343  * freeing the transfer. Therefore you cannot use the transfer structure
1344  * after calling this function, and you should free all backend-specific
1345  * data before calling it.
1346  * Do not call this function with the usbi_transfer lock held. User-specified
1347  * callback functions may attempt to directly resubmit the transfer, which
1348  * will attempt to take the lock. */
1349 int usbi_handle_transfer_completion(struct usbi_transfer *itransfer,
1350         enum libusb_transfer_status status)
1351 {
1352         struct libusb_transfer *transfer =
1353                 __USBI_TRANSFER_TO_LIBUSB_TRANSFER(itransfer);
1354         struct libusb_context *ctx = TRANSFER_CTX(transfer);
1355         uint8_t flags;
1356         int r;
1357
1358         /* FIXME: could be more intelligent with the timerfd here. we don't need
1359          * to disarm the timerfd if there was no timer running, and we only need
1360          * to rearm the timerfd if the transfer that expired was the one with
1361          * the shortest timeout. */
1362
1363         pthread_mutex_lock(&ctx->flying_transfers_lock);
1364         list_del(&itransfer->list);
1365         r = arm_timerfd_for_next_timeout(ctx);
1366         pthread_mutex_unlock(&ctx->flying_transfers_lock);
1367
1368         if (r < 0) {
1369                 return r;
1370         } else if (r == 0) {
1371                 r = disarm_timerfd(ctx);
1372                 if (r < 0)
1373                         return r;
1374         }
1375
1376         if (status == LIBUSB_TRANSFER_COMPLETED
1377                         && transfer->flags & LIBUSB_TRANSFER_SHORT_NOT_OK) {
1378                 int rqlen = transfer->length;
1379                 if (transfer->type == LIBUSB_TRANSFER_TYPE_CONTROL)
1380                         rqlen -= LIBUSB_CONTROL_SETUP_SIZE;
1381                 if (rqlen != itransfer->transferred) {
1382                         usbi_dbg("interpreting short transfer as error");
1383                         status = LIBUSB_TRANSFER_ERROR;
1384                 }
1385         }
1386
1387         flags = transfer->flags;
1388         transfer->status = status;
1389         transfer->actual_length = itransfer->transferred;
1390         if (transfer->callback)
1391                 transfer->callback(transfer);
1392         /* transfer might have been freed by the above call, do not use from
1393          * this point. */
1394         if (flags & LIBUSB_TRANSFER_FREE_TRANSFER)
1395                 libusb_free_transfer(transfer);
1396         pthread_mutex_lock(&ctx->event_waiters_lock);
1397         pthread_cond_broadcast(&ctx->event_waiters_cond);
1398         pthread_mutex_unlock(&ctx->event_waiters_lock);
1399         return 0;
1400 }
1401
1402 /* Similar to usbi_handle_transfer_completion() but exclusively for transfers
1403  * that were asynchronously cancelled. The same concerns w.r.t. freeing of
1404  * transfers exist here.
1405  * Do not call this function with the usbi_transfer lock held. User-specified
1406  * callback functions may attempt to directly resubmit the transfer, which
1407  * will attempt to take the lock. */
1408 int usbi_handle_transfer_cancellation(struct usbi_transfer *transfer)
1409 {
1410         /* if the URB was cancelled due to timeout, report timeout to the user */
1411         if (transfer->flags & USBI_TRANSFER_TIMED_OUT) {
1412                 usbi_dbg("detected timeout cancellation");
1413                 return usbi_handle_transfer_completion(transfer, LIBUSB_TRANSFER_TIMED_OUT);
1414         }
1415
1416         /* otherwise its a normal async cancel */
1417         return usbi_handle_transfer_completion(transfer, LIBUSB_TRANSFER_CANCELLED);
1418 }
1419
1420 /** \ingroup poll
1421  * Attempt to acquire the event handling lock. This lock is used to ensure that
1422  * only one thread is monitoring libusb event sources at any one time.
1423  *
1424  * You only need to use this lock if you are developing an application
1425  * which calls poll() or select() on libusb's file descriptors directly.
1426  * If you stick to libusb's event handling loop functions (e.g.
1427  * libusb_handle_events()) then you do not need to be concerned with this
1428  * locking.
1429  *
1430  * While holding this lock, you are trusted to actually be handling events.
1431  * If you are no longer handling events, you must call libusb_unlock_events()
1432  * as soon as possible.
1433  *
1434  * \param ctx the context to operate on, or NULL for the default context
1435  * \returns 0 if the lock was obtained successfully
1436  * \returns 1 if the lock was not obtained (i.e. another thread holds the lock)
1437  * \see \ref mtasync
1438  */
1439 API_EXPORTED int libusb_try_lock_events(libusb_context *ctx)
1440 {
1441         int r;
1442         USBI_GET_CONTEXT(ctx);
1443
1444         /* is someone else waiting to modify poll fds? if so, don't let this thread
1445          * start event handling */
1446         pthread_mutex_lock(&ctx->pollfd_modify_lock);
1447         r = ctx->pollfd_modify;
1448         pthread_mutex_unlock(&ctx->pollfd_modify_lock);
1449         if (r) {
1450                 usbi_dbg("someone else is modifying poll fds");
1451                 return 1;
1452         }
1453
1454         r = pthread_mutex_trylock(&ctx->events_lock);
1455         if (r)
1456                 return 1;
1457
1458         ctx->event_handler_active = 1;  
1459         return 0;
1460 }
1461
1462 /** \ingroup poll
1463  * Acquire the event handling lock, blocking until successful acquisition if
1464  * it is contended. This lock is used to ensure that only one thread is
1465  * monitoring libusb event sources at any one time.
1466  *
1467  * You only need to use this lock if you are developing an application
1468  * which calls poll() or select() on libusb's file descriptors directly.
1469  * If you stick to libusb's event handling loop functions (e.g.
1470  * libusb_handle_events()) then you do not need to be concerned with this
1471  * locking.
1472  *
1473  * While holding this lock, you are trusted to actually be handling events.
1474  * If you are no longer handling events, you must call libusb_unlock_events()
1475  * as soon as possible.
1476  *
1477  * \param ctx the context to operate on, or NULL for the default context
1478  * \see \ref mtasync
1479  */
1480 API_EXPORTED void libusb_lock_events(libusb_context *ctx)
1481 {
1482         USBI_GET_CONTEXT(ctx);
1483         pthread_mutex_lock(&ctx->events_lock);
1484         ctx->event_handler_active = 1;
1485 }
1486
1487 /** \ingroup poll
1488  * Release the lock previously acquired with libusb_try_lock_events() or
1489  * libusb_lock_events(). Releasing this lock will wake up any threads blocked
1490  * on libusb_wait_for_event().
1491  *
1492  * \param ctx the context to operate on, or NULL for the default context
1493  * \see \ref mtasync
1494  */
1495 API_EXPORTED void libusb_unlock_events(libusb_context *ctx)
1496 {
1497         USBI_GET_CONTEXT(ctx);
1498         ctx->event_handler_active = 0;
1499         pthread_mutex_unlock(&ctx->events_lock);
1500
1501         /* FIXME: perhaps we should be a bit more efficient by not broadcasting
1502          * the availability of the events lock when we are modifying pollfds
1503          * (check ctx->pollfd_modify)? */
1504         pthread_mutex_lock(&ctx->event_waiters_lock);
1505         pthread_cond_broadcast(&ctx->event_waiters_cond);
1506         pthread_mutex_unlock(&ctx->event_waiters_lock);
1507 }
1508
1509 /** \ingroup poll
1510  * Determine if it is still OK for this thread to be doing event handling.
1511  *
1512  * Sometimes, libusb needs to temporarily pause all event handlers, and this
1513  * is the function you should use before polling file descriptors to see if
1514  * this is the case.
1515  *
1516  * If this function instructs your thread to give up the events lock, you
1517  * should just continue the usual logic that is documented in \ref mtasync.
1518  * On the next iteration, your thread will fail to obtain the events lock,
1519  * and will hence become an event waiter.
1520  *
1521  * This function should be called while the events lock is held: you don't
1522  * need to worry about the results of this function if your thread is not
1523  * the current event handler.
1524  *
1525  * \param ctx the context to operate on, or NULL for the default context
1526  * \returns 1 if event handling can start or continue
1527  * \returns 0 if this thread must give up the events lock
1528  * \see \ref fullstory "Multi-threaded I/O: the full story"
1529  */
1530 API_EXPORTED int libusb_event_handling_ok(libusb_context *ctx)
1531 {
1532         int r;
1533         USBI_GET_CONTEXT(ctx);
1534
1535         /* is someone else waiting to modify poll fds? if so, don't let this thread
1536          * continue event handling */
1537         pthread_mutex_lock(&ctx->pollfd_modify_lock);
1538         r = ctx->pollfd_modify;
1539         pthread_mutex_unlock(&ctx->pollfd_modify_lock);
1540         if (r) {
1541                 usbi_dbg("someone else is modifying poll fds");
1542                 return 0;
1543         }
1544
1545         return 1;
1546 }
1547
1548
1549 /** \ingroup poll
1550  * Determine if an active thread is handling events (i.e. if anyone is holding
1551  * the event handling lock).
1552  *
1553  * \param ctx the context to operate on, or NULL for the default context
1554  * \returns 1 if a thread is handling events
1555  * \returns 0 if there are no threads currently handling events
1556  * \see \ref mtasync
1557  */
1558 API_EXPORTED int libusb_event_handler_active(libusb_context *ctx)
1559 {
1560         int r;
1561         USBI_GET_CONTEXT(ctx);
1562
1563         /* is someone else waiting to modify poll fds? if so, don't let this thread
1564          * start event handling -- indicate that event handling is happening */
1565         pthread_mutex_lock(&ctx->pollfd_modify_lock);
1566         r = ctx->pollfd_modify;
1567         pthread_mutex_unlock(&ctx->pollfd_modify_lock);
1568         if (r) {
1569                 usbi_dbg("someone else is modifying poll fds");
1570                 return 1;
1571         }
1572
1573         return ctx->event_handler_active;
1574 }
1575
1576 /** \ingroup poll
1577  * Acquire the event waiters lock. This lock is designed to be obtained under
1578  * the situation where you want to be aware when events are completed, but
1579  * some other thread is event handling so calling libusb_handle_events() is not
1580  * allowed.
1581  *
1582  * You then obtain this lock, re-check that another thread is still handling
1583  * events, then call libusb_wait_for_event().
1584  *
1585  * You only need to use this lock if you are developing an application
1586  * which calls poll() or select() on libusb's file descriptors directly,
1587  * <b>and</b> may potentially be handling events from 2 threads simultaenously.
1588  * If you stick to libusb's event handling loop functions (e.g.
1589  * libusb_handle_events()) then you do not need to be concerned with this
1590  * locking.
1591  *
1592  * \param ctx the context to operate on, or NULL for the default context
1593  * \see \ref mtasync
1594  */
1595 API_EXPORTED void libusb_lock_event_waiters(libusb_context *ctx)
1596 {
1597         USBI_GET_CONTEXT(ctx);
1598         pthread_mutex_lock(&ctx->event_waiters_lock);
1599 }
1600
1601 /** \ingroup poll
1602  * Release the event waiters lock.
1603  * \param ctx the context to operate on, or NULL for the default context
1604  * \see \ref mtasync
1605  */
1606 API_EXPORTED void libusb_unlock_event_waiters(libusb_context *ctx)
1607 {
1608         USBI_GET_CONTEXT(ctx);
1609         pthread_mutex_unlock(&ctx->event_waiters_lock);
1610 }
1611
1612 /** \ingroup poll
1613  * Wait for another thread to signal completion of an event. Must be called
1614  * with the event waiters lock held, see libusb_lock_event_waiters().
1615  *
1616  * This function will block until any of the following conditions are met:
1617  * -# The timeout expires
1618  * -# A transfer completes
1619  * -# A thread releases the event handling lock through libusb_unlock_events()
1620  *
1621  * Condition 1 is obvious. Condition 2 unblocks your thread <em>after</em>
1622  * the callback for the transfer has completed. Condition 3 is important
1623  * because it means that the thread that was previously handling events is no
1624  * longer doing so, so if any events are to complete, another thread needs to
1625  * step up and start event handling.
1626  *
1627  * This function releases the event waiters lock before putting your thread
1628  * to sleep, and reacquires the lock as it is being woken up.
1629  *
1630  * \param ctx the context to operate on, or NULL for the default context
1631  * \param tv maximum timeout for this blocking function. A NULL value
1632  * indicates unlimited timeout.
1633  * \returns 0 after a transfer completes or another thread stops event handling
1634  * \returns 1 if the timeout expired
1635  * \see \ref mtasync
1636  */
1637 API_EXPORTED int libusb_wait_for_event(libusb_context *ctx, struct timeval *tv)
1638 {
1639         struct timespec timeout;
1640         int r;
1641
1642         USBI_GET_CONTEXT(ctx);
1643         if (tv == NULL) {
1644                 pthread_cond_wait(&ctx->event_waiters_cond, &ctx->event_waiters_lock);
1645                 return 0;
1646         }
1647
1648         r = usbi_backend->clock_gettime(USBI_CLOCK_REALTIME, &timeout);
1649         if (r < 0) {
1650                 usbi_err(ctx, "failed to read realtime clock, error %d", errno);
1651                 return LIBUSB_ERROR_OTHER;
1652         }
1653
1654         timeout.tv_sec += tv->tv_sec;
1655         timeout.tv_nsec += tv->tv_usec * 1000;
1656         if (timeout.tv_nsec > 1000000000) {
1657                 timeout.tv_nsec -= 1000000000;
1658                 timeout.tv_sec++;
1659         }
1660
1661         r = pthread_cond_timedwait(&ctx->event_waiters_cond,
1662                 &ctx->event_waiters_lock, &timeout);
1663         return (r == ETIMEDOUT);
1664 }
1665
1666 static void handle_timeout(struct usbi_transfer *itransfer)
1667 {
1668         struct libusb_transfer *transfer =
1669                 __USBI_TRANSFER_TO_LIBUSB_TRANSFER(itransfer);
1670         int r;
1671
1672         itransfer->flags |= USBI_TRANSFER_TIMED_OUT;
1673         r = libusb_cancel_transfer(transfer);
1674         if (r < 0)
1675                 usbi_warn(TRANSFER_CTX(transfer),
1676                         "async cancel failed %d errno=%d", r, errno);
1677 }
1678
1679 #ifdef USBI_OS_HANDLES_TIMEOUT
1680 static int handle_timeouts_locked(struct libusb_context *ctx)
1681 {
1682         return 0;
1683 }
1684 static int handle_timeouts(struct libusb_context *ctx)
1685 {
1686         return 0;
1687 }
1688 #else
1689 static int handle_timeouts_locked(struct libusb_context *ctx)
1690 {
1691         int r;
1692         struct timespec systime_ts;
1693         struct timeval systime;
1694         struct usbi_transfer *transfer;
1695
1696         if (list_empty(&ctx->flying_transfers))
1697                 return 0;
1698
1699         /* get current time */
1700         r = usbi_backend->clock_gettime(USBI_CLOCK_MONOTONIC, &systime_ts);
1701         if (r < 0)
1702                 return r;
1703
1704         TIMESPEC_TO_TIMEVAL(&systime, &systime_ts);
1705
1706         /* iterate through flying transfers list, finding all transfers that
1707          * have expired timeouts */
1708         list_for_each_entry(transfer, &ctx->flying_transfers, list) {
1709                 struct timeval *cur_tv = &transfer->timeout;
1710
1711                 /* if we've reached transfers of infinite timeout, we're all done */
1712                 if (!timerisset(cur_tv))
1713                         return 0;
1714
1715                 /* ignore timeouts we've already handled */
1716                 if (transfer->flags & USBI_TRANSFER_TIMED_OUT)
1717                         continue;
1718
1719                 /* if transfer has non-expired timeout, nothing more to do */
1720                 if ((cur_tv->tv_sec > systime.tv_sec) ||
1721                                 (cur_tv->tv_sec == systime.tv_sec &&
1722                                         cur_tv->tv_usec > systime.tv_usec))
1723                         return 0;
1724         
1725                 /* otherwise, we've got an expired timeout to handle */
1726                 handle_timeout(transfer);
1727         }
1728         return 0;
1729 }
1730
1731 static int handle_timeouts(struct libusb_context *ctx)
1732 {
1733         int r;
1734         USBI_GET_CONTEXT(ctx);
1735         pthread_mutex_lock(&ctx->flying_transfers_lock);
1736         r = handle_timeouts_locked(ctx);
1737         pthread_mutex_unlock(&ctx->flying_transfers_lock);
1738         return r;
1739 }
1740 #endif
1741
1742 #ifdef USBI_TIMERFD_AVAILABLE
1743 static int handle_timerfd_trigger(struct libusb_context *ctx)
1744 {
1745         int r;
1746
1747         r = disarm_timerfd(ctx);
1748         if (r < 0)
1749                 return r;
1750
1751         pthread_mutex_lock(&ctx->flying_transfers_lock);
1752
1753         /* process the timeout that just happened */
1754         r = handle_timeouts_locked(ctx);
1755         if (r < 0)
1756                 goto out;
1757
1758         /* arm for next timeout*/
1759         r = arm_timerfd_for_next_timeout(ctx);
1760
1761 out:
1762         pthread_mutex_unlock(&ctx->flying_transfers_lock);
1763         return r;
1764 }
1765 #endif
1766
1767 /* do the actual event handling. assumes that no other thread is concurrently
1768  * doing the same thing. */
1769 static int handle_events(struct libusb_context *ctx, struct timeval *tv)
1770 {
1771         int r;
1772         struct usbi_pollfd *ipollfd;
1773         nfds_t nfds = 0;
1774         struct pollfd *fds;
1775         int i = -1;
1776         int timeout_ms;
1777
1778         pthread_mutex_lock(&ctx->pollfds_lock);
1779         list_for_each_entry(ipollfd, &ctx->pollfds, list)
1780                 nfds++;
1781
1782         /* TODO: malloc when number of fd's changes, not on every poll */
1783         fds = malloc(sizeof(*fds) * nfds);
1784         if (!fds)
1785                 return LIBUSB_ERROR_NO_MEM;
1786
1787         list_for_each_entry(ipollfd, &ctx->pollfds, list) {
1788                 struct libusb_pollfd *pollfd = &ipollfd->pollfd;
1789                 int fd = pollfd->fd;
1790                 i++;
1791                 fds[i].fd = fd;
1792                 fds[i].events = pollfd->events;
1793                 fds[i].revents = 0;
1794         }
1795         pthread_mutex_unlock(&ctx->pollfds_lock);
1796
1797         timeout_ms = (tv->tv_sec * 1000) + (tv->tv_usec / 1000);
1798
1799         /* round up to next millisecond */
1800         if (tv->tv_usec % 1000)
1801                 timeout_ms++;
1802
1803         usbi_dbg("poll() %d fds with timeout in %dms", nfds, timeout_ms);
1804         r = poll(fds, nfds, timeout_ms);
1805         usbi_dbg("poll() returned %d", r);
1806         if (r == 0) {
1807                 free(fds);
1808                 return handle_timeouts(ctx);
1809         } else if (r == -1 && errno == EINTR) {
1810                 free(fds);
1811                 return LIBUSB_ERROR_INTERRUPTED;
1812         } else if (r < 0) {
1813                 free(fds);
1814                 usbi_err(ctx, "poll failed %d err=%d\n", r, errno);
1815                 return LIBUSB_ERROR_IO;
1816         }
1817
1818         /* fd[0] is always the ctrl pipe */
1819         if (fds[0].revents) {
1820                 /* another thread wanted to interrupt event handling, and it succeeded!
1821                  * handle any other events that cropped up at the same time, and
1822                  * simply return */
1823                 usbi_dbg("caught a fish on the control pipe");
1824
1825                 if (r == 1) {
1826                         r = 0;
1827                         goto handled;
1828                 } else {
1829                         /* prevent OS backend from trying to handle events on ctrl pipe */
1830                         fds[0].revents = 0;
1831                         r--;
1832                 }
1833         }
1834
1835 #ifdef USBI_TIMERFD_AVAILABLE
1836         /* on timerfd configurations, fds[1] is the timerfd */
1837         if (usbi_using_timerfd(ctx) && fds[1].revents) {
1838                 /* timerfd indicates that a timeout has expired */
1839                 int ret;
1840                 usbi_dbg("timerfd triggered");
1841
1842                 ret = handle_timerfd_trigger(ctx);
1843                 if (ret < 0) {
1844                         /* return error code */
1845                         r = ret;
1846                         goto handled;
1847                 } else if (r == 1) {
1848                         /* no more active file descriptors, nothing more to do */
1849                         r = 0;
1850                         goto handled;
1851                 } else {
1852                         /* more events pending...
1853                          * prevent OS backend from trying to handle events on timerfd */
1854                         fds[1].revents = 0;
1855                         r--;
1856                 }
1857         }
1858 #endif
1859
1860         r = usbi_backend->handle_events(ctx, fds, nfds, r);
1861         if (r)
1862                 usbi_err(ctx, "backend handle_events failed with error %d", r);
1863
1864 handled:
1865         free(fds);
1866         return r;
1867 }
1868
1869 /* returns the smallest of:
1870  *  1. timeout of next URB
1871  *  2. user-supplied timeout
1872  * returns 1 if there is an already-expired timeout, otherwise returns 0
1873  * and populates out
1874  */
1875 static int get_next_timeout(libusb_context *ctx, struct timeval *tv,
1876         struct timeval *out)
1877 {
1878         struct timeval timeout;
1879         int r = libusb_get_next_timeout(ctx, &timeout);
1880         if (r) {
1881                 /* timeout already expired? */
1882                 if (!timerisset(&timeout))
1883                         return 1;
1884
1885                 /* choose the smallest of next URB timeout or user specified timeout */
1886                 if (timercmp(&timeout, tv, <))
1887                         *out = timeout;
1888                 else
1889                         *out = *tv;
1890         } else {
1891                 *out = *tv;
1892         }
1893         return 0;
1894 }
1895
1896 /** \ingroup poll
1897  * Handle any pending events.
1898  *
1899  * libusb determines "pending events" by checking if any timeouts have expired
1900  * and by checking the set of file descriptors for activity.
1901  *
1902  * If a zero timeval is passed, this function will handle any already-pending
1903  * events and then immediately return in non-blocking style.
1904  *
1905  * If a non-zero timeval is passed and no events are currently pending, this
1906  * function will block waiting for events to handle up until the specified
1907  * timeout. If an event arrives or a signal is raised, this function will
1908  * return early.
1909  *
1910  * \param ctx the context to operate on, or NULL for the default context
1911  * \param tv the maximum time to block waiting for events, or zero for
1912  * non-blocking mode
1913  * \returns 0 on success, or a LIBUSB_ERROR code on failure
1914  */
1915 API_EXPORTED int libusb_handle_events_timeout(libusb_context *ctx,
1916         struct timeval *tv)
1917 {
1918         int r;
1919         struct timeval poll_timeout;
1920
1921         USBI_GET_CONTEXT(ctx);
1922         r = get_next_timeout(ctx, tv, &poll_timeout);
1923         if (r) {
1924                 /* timeout already expired */
1925                 return handle_timeouts(ctx);
1926         }
1927
1928 retry:
1929         if (libusb_try_lock_events(ctx) == 0) {
1930                 /* we obtained the event lock: do our own event handling */
1931                 r = handle_events(ctx, &poll_timeout);
1932                 libusb_unlock_events(ctx);
1933                 return r;
1934         }
1935
1936         /* another thread is doing event handling. wait for pthread events that
1937          * notify event completion. */
1938         libusb_lock_event_waiters(ctx);
1939
1940         if (!libusb_event_handler_active(ctx)) {
1941                 /* we hit a race: whoever was event handling earlier finished in the
1942                  * time it took us to reach this point. try the cycle again. */
1943                 libusb_unlock_event_waiters(ctx);
1944                 usbi_dbg("event handler was active but went away, retrying");
1945                 goto retry;
1946         }
1947
1948         usbi_dbg("another thread is doing event handling");
1949         r = libusb_wait_for_event(ctx, &poll_timeout);
1950         libusb_unlock_event_waiters(ctx);
1951
1952         if (r < 0)
1953                 return r;
1954         else if (r == 1)
1955                 return handle_timeouts(ctx);
1956         else
1957                 return 0;
1958 }
1959
1960 /** \ingroup poll
1961  * Handle any pending events in blocking mode with a sensible timeout. This
1962  * timeout is currently hardcoded at 2 seconds but we may change this if we
1963  * decide other values are more sensible. For finer control over whether this
1964  * function is blocking or non-blocking, or the maximum timeout, use
1965  * libusb_handle_events_timeout() instead.
1966  *
1967  * \param ctx the context to operate on, or NULL for the default context
1968  * \returns 0 on success, or a LIBUSB_ERROR code on failure
1969  */
1970 API_EXPORTED int libusb_handle_events(libusb_context *ctx)
1971 {
1972         struct timeval tv;
1973         tv.tv_sec = 2;
1974         tv.tv_usec = 0;
1975         return libusb_handle_events_timeout(ctx, &tv);
1976 }
1977
1978 /** \ingroup poll
1979  * Handle any pending events by polling file descriptors, without checking if
1980  * any other threads are already doing so. Must be called with the event lock
1981  * held, see libusb_lock_events().
1982  *
1983  * This function is designed to be called under the situation where you have
1984  * taken the event lock and are calling poll()/select() directly on libusb's
1985  * file descriptors (as opposed to using libusb_handle_events() or similar).
1986  * You detect events on libusb's descriptors, so you then call this function
1987  * with a zero timeout value (while still holding the event lock).
1988  *
1989  * \param ctx the context to operate on, or NULL for the default context
1990  * \param tv the maximum time to block waiting for events, or zero for
1991  * non-blocking mode
1992  * \returns 0 on success, or a LIBUSB_ERROR code on failure
1993  * \see \ref mtasync
1994  */
1995 API_EXPORTED int libusb_handle_events_locked(libusb_context *ctx,
1996         struct timeval *tv)
1997 {
1998         int r;
1999         struct timeval poll_timeout;
2000
2001         USBI_GET_CONTEXT(ctx);
2002         r = get_next_timeout(ctx, tv, &poll_timeout);
2003         if (r) {
2004                 /* timeout already expired */
2005                 return handle_timeouts(ctx);
2006         }
2007
2008         return handle_events(ctx, &poll_timeout);
2009 }
2010
2011 /** \ingroup poll
2012  * Determines whether your application must apply special timing considerations
2013  * when monitoring libusb's file descriptors.
2014  *
2015  * This function is only useful for applications which retrieve and poll
2016  * libusb's file descriptors in their own main loop (\ref pollmain).
2017  *
2018  * Ordinarily, libusb's event handler needs to be called into at specific
2019  * moments in time (in addition to times when there is activity on the file
2020  * descriptor set). The usual approach is to use libusb_get_next_timeout()
2021  * to learn about when the next timeout occurs, and to adjust your
2022  * poll()/select() timeout accordingly so that you can make a call into the
2023  * library at that time.
2024  *
2025  * Some platforms supported by libusb do not come with this baggage - any
2026  * events relevant to timing will be represented by activity on the file
2027  * descriptor set, and libusb_get_next_timeout() will always return 0.
2028  * This function allows you to detect whether you are running on such a
2029  * platform.
2030  *
2031  * Since v1.0.5.
2032  *
2033  * \param ctx the context to operate on, or NULL for the default context
2034  * \returns 0 if you must call into libusb at times determined by
2035  * libusb_get_next_timeout(), or 1 if all timeout events are handled internally
2036  * or through regular activity on the file descriptors.
2037  * \see \ref pollmain "Polling libusb file descriptors for event handling"
2038  */
2039 API_EXPORTED int libusb_pollfds_handle_timeouts(libusb_context *ctx)
2040 {
2041 #if defined(USBI_OS_HANDLES_TIMEOUT)
2042         return 1;
2043 #elif defined(USBI_TIMERFD_AVAILABLE)
2044         USBI_GET_CONTEXT(ctx);
2045         return usbi_using_timerfd(ctx);
2046 #else
2047         return 0;
2048 #endif
2049 }
2050
2051 /** \ingroup poll
2052  * Determine the next internal timeout that libusb needs to handle. You only
2053  * need to use this function if you are calling poll() or select() or similar
2054  * on libusb's file descriptors yourself - you do not need to use it if you
2055  * are calling libusb_handle_events() or a variant directly.
2056  * 
2057  * You should call this function in your main loop in order to determine how
2058  * long to wait for select() or poll() to return results. libusb needs to be
2059  * called into at this timeout, so you should use it as an upper bound on
2060  * your select() or poll() call.
2061  *
2062  * When the timeout has expired, call into libusb_handle_events_timeout()
2063  * (perhaps in non-blocking mode) so that libusb can handle the timeout.
2064  *
2065  * This function may return 1 (success) and an all-zero timeval. If this is
2066  * the case, it indicates that libusb has a timeout that has already expired
2067  * so you should call libusb_handle_events_timeout() or similar immediately.
2068  * A return code of 0 indicates that there are no pending timeouts.
2069  *
2070  * On some platforms, this function will always returns 0 (no pending
2071  * timeouts). See \ref polltime.
2072  *
2073  * \param ctx the context to operate on, or NULL for the default context
2074  * \param tv output location for a relative time against the current
2075  * clock in which libusb must be called into in order to process timeout events
2076  * \returns 0 if there are no pending timeouts, 1 if a timeout was returned,
2077  * or LIBUSB_ERROR_OTHER on failure
2078  */
2079 API_EXPORTED int libusb_get_next_timeout(libusb_context *ctx,
2080         struct timeval *tv)
2081 {
2082 #ifndef USBI_OS_HANDLES_TIMEOUT
2083         struct usbi_transfer *transfer;
2084         struct timespec cur_ts;
2085         struct timeval cur_tv;
2086         struct timeval *next_timeout;
2087         int r;
2088         int found = 0;
2089
2090         USBI_GET_CONTEXT(ctx);
2091         if (usbi_using_timerfd(ctx))
2092                 return 0;
2093
2094         pthread_mutex_lock(&ctx->flying_transfers_lock);
2095         if (list_empty(&ctx->flying_transfers)) {
2096                 pthread_mutex_unlock(&ctx->flying_transfers_lock);
2097                 usbi_dbg("no URBs, no timeout!");
2098                 return 0;
2099         }
2100
2101         /* find next transfer which hasn't already been processed as timed out */
2102         list_for_each_entry(transfer, &ctx->flying_transfers, list) {
2103                 if (!(transfer->flags & USBI_TRANSFER_TIMED_OUT)) {
2104                         found = 1;
2105                         break;
2106                 }
2107         }
2108         pthread_mutex_unlock(&ctx->flying_transfers_lock);
2109
2110         if (!found) {
2111                 usbi_dbg("all URBs have already been processed for timeouts");
2112                 return 0;
2113         }
2114
2115         next_timeout = &transfer->timeout;
2116
2117         /* no timeout for next transfer */
2118         if (!timerisset(next_timeout)) {
2119                 usbi_dbg("no URBs with timeouts, no timeout!");
2120                 return 0;
2121         }
2122
2123         r = usbi_backend->clock_gettime(USBI_CLOCK_MONOTONIC, &cur_ts);
2124         if (r < 0) {
2125                 usbi_err(ctx, "failed to read monotonic clock, errno=%d", errno);
2126                 return LIBUSB_ERROR_OTHER;
2127         }
2128         TIMESPEC_TO_TIMEVAL(&cur_tv, &cur_ts);
2129
2130         if (timercmp(&cur_tv, next_timeout, >=)) {
2131                 usbi_dbg("first timeout already expired");
2132                 timerclear(tv);
2133         } else {
2134                 timersub(next_timeout, &cur_tv, tv);
2135                 usbi_dbg("next timeout in %d.%06ds", tv->tv_sec, tv->tv_usec);
2136         }
2137
2138         return 1;
2139 #else
2140         return 0;
2141 #endif
2142 }
2143
2144 /** \ingroup poll
2145  * Register notification functions for file descriptor additions/removals.
2146  * These functions will be invoked for every new or removed file descriptor
2147  * that libusb uses as an event source.
2148  *
2149  * To remove notifiers, pass NULL values for the function pointers.
2150  *
2151  * Note that file descriptors may have been added even before you register
2152  * these notifiers (e.g. at libusb_init() time).
2153  *
2154  * Additionally, note that the removal notifier may be called during
2155  * libusb_exit() (e.g. when it is closing file descriptors that were opened
2156  * and added to the poll set at libusb_init() time). If you don't want this,
2157  * remove the notifiers immediately before calling libusb_exit().
2158  *
2159  * \param ctx the context to operate on, or NULL for the default context
2160  * \param added_cb pointer to function for addition notifications
2161  * \param removed_cb pointer to function for removal notifications
2162  * \param user_data User data to be passed back to callbacks (useful for
2163  * passing context information)
2164  */
2165 API_EXPORTED void libusb_set_pollfd_notifiers(libusb_context *ctx,
2166         libusb_pollfd_added_cb added_cb, libusb_pollfd_removed_cb removed_cb,
2167         void *user_data)
2168 {
2169         USBI_GET_CONTEXT(ctx);
2170         ctx->fd_added_cb = added_cb;
2171         ctx->fd_removed_cb = removed_cb;
2172         ctx->fd_cb_user_data = user_data;
2173 }
2174
2175 /* Add a file descriptor to the list of file descriptors to be monitored.
2176  * events should be specified as a bitmask of events passed to poll(), e.g.
2177  * POLLIN and/or POLLOUT. */
2178 int usbi_add_pollfd(struct libusb_context *ctx, int fd, short events)
2179 {
2180         struct usbi_pollfd *ipollfd = malloc(sizeof(*ipollfd));
2181         if (!ipollfd)
2182                 return LIBUSB_ERROR_NO_MEM;
2183
2184         usbi_dbg("add fd %d events %d", fd, events);
2185         ipollfd->pollfd.fd = fd;
2186         ipollfd->pollfd.events = events;
2187         pthread_mutex_lock(&ctx->pollfds_lock);
2188         list_add_tail(&ipollfd->list, &ctx->pollfds);
2189         pthread_mutex_unlock(&ctx->pollfds_lock);
2190
2191         if (ctx->fd_added_cb)
2192                 ctx->fd_added_cb(fd, events, ctx->fd_cb_user_data);
2193         return 0;
2194 }
2195
2196 /* Remove a file descriptor from the list of file descriptors to be polled. */
2197 void usbi_remove_pollfd(struct libusb_context *ctx, int fd)
2198 {
2199         struct usbi_pollfd *ipollfd;
2200         int found = 0;
2201
2202         usbi_dbg("remove fd %d", fd);
2203         pthread_mutex_lock(&ctx->pollfds_lock);
2204         list_for_each_entry(ipollfd, &ctx->pollfds, list)
2205                 if (ipollfd->pollfd.fd == fd) {
2206                         found = 1;
2207                         break;
2208                 }
2209
2210         if (!found) {
2211                 usbi_dbg("couldn't find fd %d to remove", fd);
2212                 pthread_mutex_unlock(&ctx->pollfds_lock);
2213                 return;
2214         }
2215
2216         list_del(&ipollfd->list);
2217         pthread_mutex_unlock(&ctx->pollfds_lock);
2218         free(ipollfd);
2219         if (ctx->fd_removed_cb)
2220                 ctx->fd_removed_cb(fd, ctx->fd_cb_user_data);
2221 }
2222
2223 /** \ingroup poll
2224  * Retrieve a list of file descriptors that should be polled by your main loop
2225  * as libusb event sources.
2226  *
2227  * The returned list is NULL-terminated and should be freed with free() when
2228  * done. The actual list contents must not be touched.
2229  *
2230  * \param ctx the context to operate on, or NULL for the default context
2231  * \returns a NULL-terminated list of libusb_pollfd structures, or NULL on
2232  * error
2233  */
2234 API_EXPORTED const struct libusb_pollfd **libusb_get_pollfds(
2235         libusb_context *ctx)
2236 {
2237         struct libusb_pollfd **ret = NULL;
2238         struct usbi_pollfd *ipollfd;
2239         size_t i = 0;
2240         size_t cnt = 0;
2241         USBI_GET_CONTEXT(ctx);
2242
2243         pthread_mutex_lock(&ctx->pollfds_lock);
2244         list_for_each_entry(ipollfd, &ctx->pollfds, list)
2245                 cnt++;
2246
2247         ret = calloc(cnt + 1, sizeof(struct libusb_pollfd *));
2248         if (!ret)
2249                 goto out;
2250
2251         list_for_each_entry(ipollfd, &ctx->pollfds, list)
2252                 ret[i++] = (struct libusb_pollfd *) ipollfd;
2253         ret[cnt] = NULL;
2254
2255 out:
2256         pthread_mutex_unlock(&ctx->pollfds_lock);
2257         return (const struct libusb_pollfd **) ret;
2258 }
2259
2260 /* Backends call this from handle_events to report disconnection of a device.
2261  * The transfers get cancelled appropriately.
2262  */
2263 void usbi_handle_disconnect(struct libusb_device_handle *handle)
2264 {
2265         struct usbi_transfer *cur;
2266         struct usbi_transfer *to_cancel;
2267
2268         usbi_dbg("device %d.%d",
2269                 handle->dev->bus_number, handle->dev->device_address);
2270
2271         /* terminate all pending transfers with the LIBUSB_TRANSFER_NO_DEVICE
2272          * status code.
2273          * 
2274          * this is a bit tricky because:
2275          * 1. we can't do transfer completion while holding flying_transfers_lock
2276          * 2. the transfers list can change underneath us - if we were to build a
2277          *    list of transfers to complete (while holding look), the situation
2278          *    might be different by the time we come to free them
2279          *
2280          * so we resort to a loop-based approach as below
2281          * FIXME: is this still potentially racy?
2282          */
2283
2284         while (1) {
2285                 pthread_mutex_lock(&HANDLE_CTX(handle)->flying_transfers_lock);
2286                 to_cancel = NULL;
2287                 list_for_each_entry(cur, &HANDLE_CTX(handle)->flying_transfers, list)
2288                         if (__USBI_TRANSFER_TO_LIBUSB_TRANSFER(cur)->dev_handle == handle) {
2289                                 to_cancel = cur;
2290                                 break;
2291                         }
2292                 pthread_mutex_unlock(&HANDLE_CTX(handle)->flying_transfers_lock);
2293
2294                 if (!to_cancel)
2295                         break;
2296
2297                 usbi_backend->clear_transfer_priv(to_cancel);
2298                 usbi_handle_transfer_completion(to_cancel, LIBUSB_TRANSFER_NO_DEVICE);
2299         }
2300
2301 }
2302