Core: Make writing of log lines a single fprintf call.
[platform/upstream/libusb.git] / libusb / core.c
1 /* -*- Mode: C; indent-tabs-mode:t ; c-basic-offset:8 -*- */
2 /*
3  * Core functions for libusbx
4  * Copyright © 2012-2013 Nathan Hjelm <hjelmn@cs.unm.edu>
5  * Copyright © 2007-2008 Daniel Drake <dsd@gentoo.org>
6  * Copyright © 2001 Johannes Erdfelt <johannes@erdfelt.com>
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with this library; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22
23 #include "config.h"
24
25 #include <errno.h>
26 #include <stdarg.h>
27 #include <stdio.h>
28 #include <stdlib.h>
29 #include <string.h>
30 #ifdef HAVE_SYS_TYPES_H
31 #include <sys/types.h>
32 #endif
33 #ifdef HAVE_SYS_TIME_H
34 #include <sys/time.h>
35 #endif
36
37 #ifdef __ANDROID__
38 #include <android/log.h>
39 #endif
40
41 #include "libusbi.h"
42 #include "hotplug.h"
43
44 #if defined(OS_LINUX)
45 const struct usbi_os_backend * const usbi_backend = &linux_usbfs_backend;
46 #elif defined(OS_DARWIN)
47 const struct usbi_os_backend * const usbi_backend = &darwin_backend;
48 #elif defined(OS_OPENBSD)
49 const struct usbi_os_backend * const usbi_backend = &openbsd_backend;
50 #elif defined(OS_WINDOWS)
51 const struct usbi_os_backend * const usbi_backend = &windows_backend;
52 #elif defined(OS_WINCE)
53 const struct usbi_os_backend * const usbi_backend = &wince_backend;
54 #else
55 #error "Unsupported OS"
56 #endif
57
58 struct libusb_context *usbi_default_context = NULL;
59 const struct libusb_version libusb_version_internal =
60         { LIBUSB_MAJOR, LIBUSB_MINOR, LIBUSB_MICRO, LIBUSB_NANO,
61           LIBUSB_RC, "http://libusbx.org" };
62 static int default_context_refcnt = 0;
63 static usbi_mutex_static_t default_context_lock = USBI_MUTEX_INITIALIZER;
64 static struct timeval timestamp_origin = { 0, 0 };
65
66 usbi_mutex_static_t active_contexts_lock = USBI_MUTEX_INITIALIZER;
67 struct list_head active_contexts_list;
68
69 /**
70  * \mainpage libusbx-1.0 API Reference
71  *
72  * \section intro Introduction
73  *
74  * libusbx is an open source library that allows you to communicate with USB
75  * devices from userspace. For more info, see the
76  * <a href="http://libusbx.org">libusbx homepage</a>.
77  *
78  * This documentation is aimed at application developers wishing to
79  * communicate with USB peripherals from their own software. After reviewing
80  * this documentation, feedback and questions can be sent to the
81  * <a href="http://mailing-list.libusbx.org">libusbx-devel mailing list</a>.
82  *
83  * This documentation assumes knowledge of how to operate USB devices from
84  * a software standpoint (descriptors, configurations, interfaces, endpoints,
85  * control/bulk/interrupt/isochronous transfers, etc). Full information
86  * can be found in the <a href="http://www.usb.org/developers/docs/">USB 3.0
87  * Specification</a> which is available for free download. You can probably
88  * find less verbose introductions by searching the web.
89  *
90  * \section features Library features
91  *
92  * - All transfer types supported (control/bulk/interrupt/isochronous)
93  * - 2 transfer interfaces:
94  *    -# Synchronous (simple)
95  *    -# Asynchronous (more complicated, but more powerful)
96  * - Thread safe (although the asynchronous interface means that you
97  *   usually won't need to thread)
98  * - Lightweight with lean API
99  * - Compatible with libusb-0.1 through the libusb-compat-0.1 translation layer
100  * - Hotplug support (see \ref hotplug)
101  *
102  * \section gettingstarted Getting Started
103  *
104  * To begin reading the API documentation, start with the Modules page which
105  * links to the different categories of libusbx's functionality.
106  *
107  * One decision you will have to make is whether to use the synchronous
108  * or the asynchronous data transfer interface. The \ref io documentation
109  * provides some insight into this topic.
110  *
111  * Some example programs can be found in the libusbx source distribution under
112  * the "examples" subdirectory. The libusbx homepage includes a list of
113  * real-life project examples which use libusbx.
114  *
115  * \section errorhandling Error handling
116  *
117  * libusbx functions typically return 0 on success or a negative error code
118  * on failure. These negative error codes relate to LIBUSB_ERROR constants
119  * which are listed on the \ref misc "miscellaneous" documentation page.
120  *
121  * \section msglog Debug message logging
122  *
123  * libusbx uses stderr for all logging. By default, logging is set to NONE,
124  * which means that no output will be produced. However, unless the library
125  * has been compiled with logging disabled, then any application calls to
126  * libusb_set_debug(), or the setting of the environmental variable
127  * LIBUSB_DEBUG outside of the application, can result in logging being
128  * produced. Your application should therefore not close stderr, but instead
129  * direct it to the null device if its output is undesireable.
130  *
131  * The libusb_set_debug() function can be used to enable logging of certain
132  * messages. Under standard configuration, libusbx doesn't really log much
133  * so you are advised to use this function to enable all error/warning/
134  * informational messages. It will help debug problems with your software.
135  *
136  * The logged messages are unstructured. There is no one-to-one correspondence
137  * between messages being logged and success or failure return codes from
138  * libusbx functions. There is no format to the messages, so you should not
139  * try to capture or parse them. They are not and will not be localized.
140  * These messages are not intended to being passed to your application user;
141  * instead, you should interpret the error codes returned from libusbx functions
142  * and provide appropriate notification to the user. The messages are simply
143  * there to aid you as a programmer, and if you're confused because you're
144  * getting a strange error code from a libusbx function, enabling message
145  * logging may give you a suitable explanation.
146  *
147  * The LIBUSB_DEBUG environment variable can be used to enable message logging
148  * at run-time. This environment variable should be set to a log level number,
149  * which is interpreted the same as the libusb_set_debug() parameter. When this
150  * environment variable is set, the message logging verbosity level is fixed
151  * and libusb_set_debug() effectively does nothing.
152  *
153  * libusbx can be compiled without any logging functions, useful for embedded
154  * systems. In this case, libusb_set_debug() and the LIBUSB_DEBUG environment
155  * variable have no effects.
156  *
157  * libusbx can also be compiled with verbose debugging messages always. When
158  * the library is compiled in this way, all messages of all verbosities are
159  * always logged. libusb_set_debug() and the LIBUSB_DEBUG environment variable
160  * have no effects.
161  *
162  * \section remarks Other remarks
163  *
164  * libusbx does have imperfections. The \ref caveats "caveats" page attempts
165  * to document these.
166  */
167
168 /**
169  * \page caveats Caveats
170  *
171  * \section devresets Device resets
172  *
173  * The libusb_reset_device() function allows you to reset a device. If your
174  * program has to call such a function, it should obviously be aware that
175  * the reset will cause device state to change (e.g. register values may be
176  * reset).
177  *
178  * The problem is that any other program could reset the device your program
179  * is working with, at any time. libusbx does not offer a mechanism to inform
180  * you when this has happened, so if someone else resets your device it will
181  * not be clear to your own program why the device state has changed.
182  *
183  * Ultimately, this is a limitation of writing drivers in userspace.
184  * Separation from the USB stack in the underlying kernel makes it difficult
185  * for the operating system to deliver such notifications to your program.
186  * The Linux kernel USB stack allows such reset notifications to be delivered
187  * to in-kernel USB drivers, but it is not clear how such notifications could
188  * be delivered to second-class drivers that live in userspace.
189  *
190  * \section blockonly Blocking-only functionality
191  *
192  * The functionality listed below is only available through synchronous,
193  * blocking functions. There are no asynchronous/non-blocking alternatives,
194  * and no clear ways of implementing these.
195  *
196  * - Configuration activation (libusb_set_configuration())
197  * - Interface/alternate setting activation (libusb_set_interface_alt_setting())
198  * - Releasing of interfaces (libusb_release_interface())
199  * - Clearing of halt/stall condition (libusb_clear_halt())
200  * - Device resets (libusb_reset_device())
201  *
202  * \section configsel Configuration selection and handling
203  *
204  * When libusbx presents a device handle to an application, there is a chance
205  * that the corresponding device may be in unconfigured state. For devices
206  * with multiple configurations, there is also a chance that the configuration
207  * currently selected is not the one that the application wants to use.
208  *
209  * The obvious solution is to add a call to libusb_set_configuration() early
210  * on during your device initialization routines, but there are caveats to
211  * be aware of:
212  * -# If the device is already in the desired configuration, calling
213  *    libusb_set_configuration() using the same configuration value will cause
214  *    a lightweight device reset. This may not be desirable behaviour.
215  * -# libusbx will be unable to change configuration if the device is in
216  *    another configuration and other programs or drivers have claimed
217  *    interfaces under that configuration.
218  * -# In the case where the desired configuration is already active, libusbx
219  *    may not even be able to perform a lightweight device reset. For example,
220  *    take my USB keyboard with fingerprint reader: I'm interested in driving
221  *    the fingerprint reader interface through libusbx, but the kernel's
222  *    USB-HID driver will almost always have claimed the keyboard interface.
223  *    Because the kernel has claimed an interface, it is not even possible to
224  *    perform the lightweight device reset, so libusb_set_configuration() will
225  *    fail. (Luckily the device in question only has a single configuration.)
226  *
227  * One solution to some of the above problems is to consider the currently
228  * active configuration. If the configuration we want is already active, then
229  * we don't have to select any configuration:
230 \code
231 cfg = libusb_get_configuration(dev);
232 if (cfg != desired)
233         libusb_set_configuration(dev, desired);
234 \endcode
235  *
236  * This is probably suitable for most scenarios, but is inherently racy:
237  * another application or driver may change the selected configuration
238  * <em>after</em> the libusb_get_configuration() call.
239  *
240  * Even in cases where libusb_set_configuration() succeeds, consider that other
241  * applications or drivers may change configuration after your application
242  * calls libusb_set_configuration().
243  *
244  * One possible way to lock your device into a specific configuration is as
245  * follows:
246  * -# Set the desired configuration (or use the logic above to realise that
247  *    it is already in the desired configuration)
248  * -# Claim the interface that you wish to use
249  * -# Check that the currently active configuration is the one that you want
250  *    to use.
251  *
252  * The above method works because once an interface is claimed, no application
253  * or driver is able to select another configuration.
254  *
255  * \section earlycomp Early transfer completion
256  *
257  * NOTE: This section is currently Linux-centric. I am not sure if any of these
258  * considerations apply to Darwin or other platforms.
259  *
260  * When a transfer completes early (i.e. when less data is received/sent in
261  * any one packet than the transfer buffer allows for) then libusbx is designed
262  * to terminate the transfer immediately, not transferring or receiving any
263  * more data unless other transfers have been queued by the user.
264  *
265  * On legacy platforms, libusbx is unable to do this in all situations. After
266  * the incomplete packet occurs, "surplus" data may be transferred. For recent
267  * versions of libusbx, this information is kept (the data length of the
268  * transfer is updated) and, for device-to-host transfers, any surplus data was
269  * added to the buffer. Still, this is not a nice solution because it loses the
270  * information about the end of the short packet, and the user probably wanted
271  * that surplus data to arrive in the next logical transfer.
272  *
273  *
274  * \section zlp Zero length packets
275  *
276  * - libusbx is able to send a packet of zero length to an endpoint simply by
277  * submitting a transfer of zero length.
278  * - The \ref libusb_transfer_flags::LIBUSB_TRANSFER_ADD_ZERO_PACKET
279  * "LIBUSB_TRANSFER_ADD_ZERO_PACKET" flag is currently only supported on Linux.
280  */
281
282 /**
283  * \page contexts Contexts
284  *
285  * It is possible that libusbx may be used simultaneously from two independent
286  * libraries linked into the same executable. For example, if your application
287  * has a plugin-like system which allows the user to dynamically load a range
288  * of modules into your program, it is feasible that two independently
289  * developed modules may both use libusbx.
290  *
291  * libusbx is written to allow for these multiple user scenarios. The two
292  * "instances" of libusbx will not interfere: libusb_set_debug() calls
293  * from one user will not affect the same settings for other users, other
294  * users can continue using libusbx after one of them calls libusb_exit(), etc.
295  *
296  * This is made possible through libusbx's <em>context</em> concept. When you
297  * call libusb_init(), you are (optionally) given a context. You can then pass
298  * this context pointer back into future libusbx functions.
299  *
300  * In order to keep things simple for more simplistic applications, it is
301  * legal to pass NULL to all functions requiring a context pointer (as long as
302  * you're sure no other code will attempt to use libusbx from the same process).
303  * When you pass NULL, the default context will be used. The default context
304  * is created the first time a process calls libusb_init() when no other
305  * context is alive. Contexts are destroyed during libusb_exit().
306  *
307  * The default context is reference-counted and can be shared. That means that
308  * if libusb_init(NULL) is called twice within the same process, the two
309  * users end up sharing the same context. The deinitialization and freeing of
310  * the default context will only happen when the last user calls libusb_exit().
311  * In other words, the default context is created and initialized when its
312  * reference count goes from 0 to 1, and is deinitialized and destroyed when
313  * its reference count goes from 1 to 0.
314  *
315  * You may be wondering why only a subset of libusbx functions require a
316  * context pointer in their function definition. Internally, libusbx stores
317  * context pointers in other objects (e.g. libusb_device instances) and hence
318  * can infer the context from those objects.
319  */
320
321 /**
322  * @defgroup lib Library initialization/deinitialization
323  * This page details how to initialize and deinitialize libusbx. Initialization
324  * must be performed before using any libusbx functionality, and similarly you
325  * must not call any libusbx functions after deinitialization.
326  */
327
328 /**
329  * @defgroup dev Device handling and enumeration
330  * The functionality documented below is designed to help with the following
331  * operations:
332  * - Enumerating the USB devices currently attached to the system
333  * - Choosing a device to operate from your software
334  * - Opening and closing the chosen device
335  *
336  * \section nutshell In a nutshell...
337  *
338  * The description below really makes things sound more complicated than they
339  * actually are. The following sequence of function calls will be suitable
340  * for almost all scenarios and does not require you to have such a deep
341  * understanding of the resource management issues:
342  * \code
343 // discover devices
344 libusb_device **list;
345 libusb_device *found = NULL;
346 ssize_t cnt = libusb_get_device_list(NULL, &list);
347 ssize_t i = 0;
348 int err = 0;
349 if (cnt < 0)
350         error();
351
352 for (i = 0; i < cnt; i++) {
353         libusb_device *device = list[i];
354         if (is_interesting(device)) {
355                 found = device;
356                 break;
357         }
358 }
359
360 if (found) {
361         libusb_device_handle *handle;
362
363         err = libusb_open(found, &handle);
364         if (err)
365                 error();
366         // etc
367 }
368
369 libusb_free_device_list(list, 1);
370 \endcode
371  *
372  * The two important points:
373  * - You asked libusb_free_device_list() to unreference the devices (2nd
374  *   parameter)
375  * - You opened the device before freeing the list and unreferencing the
376  *   devices
377  *
378  * If you ended up with a handle, you can now proceed to perform I/O on the
379  * device.
380  *
381  * \section devshandles Devices and device handles
382  * libusbx has a concept of a USB device, represented by the
383  * \ref libusb_device opaque type. A device represents a USB device that
384  * is currently or was previously connected to the system. Using a reference
385  * to a device, you can determine certain information about the device (e.g.
386  * you can read the descriptor data).
387  *
388  * The libusb_get_device_list() function can be used to obtain a list of
389  * devices currently connected to the system. This is known as device
390  * discovery.
391  *
392  * Just because you have a reference to a device does not mean it is
393  * necessarily usable. The device may have been unplugged, you may not have
394  * permission to operate such device, or another program or driver may be
395  * using the device.
396  *
397  * When you've found a device that you'd like to operate, you must ask
398  * libusbx to open the device using the libusb_open() function. Assuming
399  * success, libusbx then returns you a <em>device handle</em>
400  * (a \ref libusb_device_handle pointer). All "real" I/O operations then
401  * operate on the handle rather than the original device pointer.
402  *
403  * \section devref Device discovery and reference counting
404  *
405  * Device discovery (i.e. calling libusb_get_device_list()) returns a
406  * freshly-allocated list of devices. The list itself must be freed when
407  * you are done with it. libusbx also needs to know when it is OK to free
408  * the contents of the list - the devices themselves.
409  *
410  * To handle these issues, libusbx provides you with two separate items:
411  * - A function to free the list itself
412  * - A reference counting system for the devices inside
413  *
414  * New devices presented by the libusb_get_device_list() function all have a
415  * reference count of 1. You can increase and decrease reference count using
416  * libusb_ref_device() and libusb_unref_device(). A device is destroyed when
417  * its reference count reaches 0.
418  *
419  * With the above information in mind, the process of opening a device can
420  * be viewed as follows:
421  * -# Discover devices using libusb_get_device_list().
422  * -# Choose the device that you want to operate, and call libusb_open().
423  * -# Unref all devices in the discovered device list.
424  * -# Free the discovered device list.
425  *
426  * The order is important - you must not unreference the device before
427  * attempting to open it, because unreferencing it may destroy the device.
428  *
429  * For convenience, the libusb_free_device_list() function includes a
430  * parameter to optionally unreference all the devices in the list before
431  * freeing the list itself. This combines steps 3 and 4 above.
432  *
433  * As an implementation detail, libusb_open() actually adds a reference to
434  * the device in question. This is because the device remains available
435  * through the handle via libusb_get_device(). The reference is deleted during
436  * libusb_close().
437  */
438
439 /** @defgroup misc Miscellaneous */
440
441 /* we traverse usbfs without knowing how many devices we are going to find.
442  * so we create this discovered_devs model which is similar to a linked-list
443  * which grows when required. it can be freed once discovery has completed,
444  * eliminating the need for a list node in the libusb_device structure
445  * itself. */
446 #define DISCOVERED_DEVICES_SIZE_STEP 8
447
448 static struct discovered_devs *discovered_devs_alloc(void)
449 {
450         struct discovered_devs *ret =
451                 malloc(sizeof(*ret) + (sizeof(void *) * DISCOVERED_DEVICES_SIZE_STEP));
452
453         if (ret) {
454                 ret->len = 0;
455                 ret->capacity = DISCOVERED_DEVICES_SIZE_STEP;
456         }
457         return ret;
458 }
459
460 /* append a device to the discovered devices collection. may realloc itself,
461  * returning new discdevs. returns NULL on realloc failure. */
462 struct discovered_devs *discovered_devs_append(
463         struct discovered_devs *discdevs, struct libusb_device *dev)
464 {
465         size_t len = discdevs->len;
466         size_t capacity;
467
468         /* if there is space, just append the device */
469         if (len < discdevs->capacity) {
470                 discdevs->devices[len] = libusb_ref_device(dev);
471                 discdevs->len++;
472                 return discdevs;
473         }
474
475         /* exceeded capacity, need to grow */
476         usbi_dbg("need to increase capacity");
477         capacity = discdevs->capacity + DISCOVERED_DEVICES_SIZE_STEP;
478         discdevs = usbi_reallocf(discdevs,
479                 sizeof(*discdevs) + (sizeof(void *) * capacity));
480         if (discdevs) {
481                 discdevs->capacity = capacity;
482                 discdevs->devices[len] = libusb_ref_device(dev);
483                 discdevs->len++;
484         }
485
486         return discdevs;
487 }
488
489 static void discovered_devs_free(struct discovered_devs *discdevs)
490 {
491         size_t i;
492
493         for (i = 0; i < discdevs->len; i++)
494                 libusb_unref_device(discdevs->devices[i]);
495
496         free(discdevs);
497 }
498
499 /* Allocate a new device with a specific session ID. The returned device has
500  * a reference count of 1. */
501 struct libusb_device *usbi_alloc_device(struct libusb_context *ctx,
502         unsigned long session_id)
503 {
504         size_t priv_size = usbi_backend->device_priv_size;
505         struct libusb_device *dev = calloc(1, sizeof(*dev) + priv_size);
506         int r;
507
508         if (!dev)
509                 return NULL;
510
511         r = usbi_mutex_init(&dev->lock, NULL);
512         if (r) {
513                 free(dev);
514                 return NULL;
515         }
516
517         dev->ctx = ctx;
518         dev->refcnt = 1;
519         dev->session_data = session_id;
520         dev->speed = LIBUSB_SPEED_UNKNOWN;
521
522         if (!libusb_has_capability(LIBUSB_CAP_HAS_HOTPLUG)) {
523                 usbi_connect_device (dev);
524         }
525
526         return dev;
527 }
528
529 void usbi_connect_device(struct libusb_device *dev)
530 {
531         libusb_hotplug_message message;
532         ssize_t ret;
533
534         memset(&message, 0, sizeof(message));
535         message.event = LIBUSB_HOTPLUG_EVENT_DEVICE_ARRIVED;
536         message.device = dev;
537         dev->attached = 1;
538
539         usbi_mutex_lock(&dev->ctx->usb_devs_lock);
540         list_add(&dev->list, &dev->ctx->usb_devs);
541         usbi_mutex_unlock(&dev->ctx->usb_devs_lock);
542
543         /* Signal that an event has occurred for this device if we support hotplug AND
544          * the hotplug pipe is ready. This prevents an event from getting raised during
545          * initial enumeration. */
546         if (libusb_has_capability(LIBUSB_CAP_HAS_HOTPLUG) && dev->ctx->hotplug_pipe[1] > 0) {
547                 ret = usbi_write(dev->ctx->hotplug_pipe[1], &message, sizeof(message));
548                 if (sizeof (message) != ret) {
549                         usbi_err(DEVICE_CTX(dev), "error writing hotplug message");
550                 }
551         }
552 }
553
554 void usbi_disconnect_device(struct libusb_device *dev)
555 {
556         libusb_hotplug_message message;
557         struct libusb_context *ctx = dev->ctx;
558         ssize_t ret;
559
560         memset(&message, 0, sizeof(message));
561         message.event = LIBUSB_HOTPLUG_EVENT_DEVICE_LEFT;
562         message.device = dev;
563         usbi_mutex_lock(&dev->lock);
564         dev->attached = 0;
565         usbi_mutex_unlock(&dev->lock);
566
567         /* Signal that an event has occurred for this device if we support hotplug AND
568          * the hotplug pipe is ready. This prevents an event from getting raised during
569          * initial enumeration. libusb_handle_events will take care of dereferencing the
570          * device. */
571         if (libusb_has_capability(LIBUSB_CAP_HAS_HOTPLUG) && dev->ctx->hotplug_pipe[1] > 0) {
572                 ret = usbi_write(dev->ctx->hotplug_pipe[1], &message, sizeof(message));
573                 if (sizeof(message) != ret) {
574                         usbi_err(DEVICE_CTX(dev), "error writing hotplug message");
575                 }
576         }
577
578         usbi_mutex_lock(&ctx->usb_devs_lock);
579         list_del(&dev->list);
580         usbi_mutex_unlock(&ctx->usb_devs_lock);
581 }
582
583 /* Perform some final sanity checks on a newly discovered device. If this
584  * function fails (negative return code), the device should not be added
585  * to the discovered device list. */
586 int usbi_sanitize_device(struct libusb_device *dev)
587 {
588         int r;
589         uint8_t num_configurations;
590
591         r = usbi_device_cache_descriptor(dev);
592         if (r < 0)
593                 return r;
594
595         num_configurations = dev->device_descriptor.bNumConfigurations;
596         if (num_configurations > USB_MAXCONFIG) {
597                 usbi_err(DEVICE_CTX(dev), "too many configurations");
598                 return LIBUSB_ERROR_IO;
599         } else if (0 == num_configurations)
600                 usbi_dbg("zero configurations, maybe an unauthorized device");
601
602         dev->num_configurations = num_configurations;
603         return 0;
604 }
605
606 /* Examine libusbx's internal list of known devices, looking for one with
607  * a specific session ID. Returns the matching device if it was found, and
608  * NULL otherwise. */
609 struct libusb_device *usbi_get_device_by_session_id(struct libusb_context *ctx,
610         unsigned long session_id)
611 {
612         struct libusb_device *dev;
613         struct libusb_device *ret = NULL;
614
615         usbi_mutex_lock(&ctx->usb_devs_lock);
616         list_for_each_entry(dev, &ctx->usb_devs, list, struct libusb_device)
617                 if (dev->session_data == session_id) {
618                         ret = dev;
619                         break;
620                 }
621         usbi_mutex_unlock(&ctx->usb_devs_lock);
622
623         return ret;
624 }
625
626 /** @ingroup dev
627  * Returns a list of USB devices currently attached to the system. This is
628  * your entry point into finding a USB device to operate.
629  *
630  * You are expected to unreference all the devices when you are done with
631  * them, and then free the list with libusb_free_device_list(). Note that
632  * libusb_free_device_list() can unref all the devices for you. Be careful
633  * not to unreference a device you are about to open until after you have
634  * opened it.
635  *
636  * This return value of this function indicates the number of devices in
637  * the resultant list. The list is actually one element larger, as it is
638  * NULL-terminated.
639  *
640  * \param ctx the context to operate on, or NULL for the default context
641  * \param list output location for a list of devices. Must be later freed with
642  * libusb_free_device_list().
643  * \returns the number of devices in the outputted list, or any
644  * \ref libusb_error according to errors encountered by the backend.
645  */
646 ssize_t API_EXPORTED libusb_get_device_list(libusb_context *ctx,
647         libusb_device ***list)
648 {
649         struct discovered_devs *discdevs = discovered_devs_alloc();
650         struct libusb_device **ret;
651         int r = 0;
652         ssize_t i, len;
653         USBI_GET_CONTEXT(ctx);
654         usbi_dbg("");
655
656         if (!discdevs)
657                 return LIBUSB_ERROR_NO_MEM;
658
659         if (libusb_has_capability(LIBUSB_CAP_HAS_HOTPLUG)) {
660                 /* backend provides hotplug support */
661                 struct libusb_device *dev;
662
663                 if (usbi_backend->hotplug_poll)
664                         usbi_backend->hotplug_poll();
665
666                 usbi_mutex_lock(&ctx->usb_devs_lock);
667                 list_for_each_entry(dev, &ctx->usb_devs, list, struct libusb_device) {
668                         discdevs = discovered_devs_append(discdevs, dev);
669
670                         if (!discdevs) {
671                                 r = LIBUSB_ERROR_NO_MEM;
672                                 break;
673                         }
674                 }
675                 usbi_mutex_unlock(&ctx->usb_devs_lock);
676         } else {
677                 /* backend does not provide hotplug support */
678                 r = usbi_backend->get_device_list(ctx, &discdevs);
679         }
680
681         if (r < 0) {
682                 len = r;
683                 goto out;
684         }
685
686         /* convert discovered_devs into a list */
687         len = discdevs->len;
688         ret = calloc(len + 1, sizeof(struct libusb_device *));
689         if (!ret) {
690                 len = LIBUSB_ERROR_NO_MEM;
691                 goto out;
692         }
693
694         ret[len] = NULL;
695         for (i = 0; i < len; i++) {
696                 struct libusb_device *dev = discdevs->devices[i];
697                 ret[i] = libusb_ref_device(dev);
698         }
699         *list = ret;
700
701 out:
702         discovered_devs_free(discdevs);
703         return len;
704 }
705
706 /** \ingroup dev
707  * Frees a list of devices previously discovered using
708  * libusb_get_device_list(). If the unref_devices parameter is set, the
709  * reference count of each device in the list is decremented by 1.
710  * \param list the list to free
711  * \param unref_devices whether to unref the devices in the list
712  */
713 void API_EXPORTED libusb_free_device_list(libusb_device **list,
714         int unref_devices)
715 {
716         if (!list)
717                 return;
718
719         if (unref_devices) {
720                 int i = 0;
721                 struct libusb_device *dev;
722
723                 while ((dev = list[i++]) != NULL)
724                         libusb_unref_device(dev);
725         }
726         free(list);
727 }
728
729 /** \ingroup dev
730  * Get the number of the bus that a device is connected to.
731  * \param dev a device
732  * \returns the bus number
733  */
734 uint8_t API_EXPORTED libusb_get_bus_number(libusb_device *dev)
735 {
736         return dev->bus_number;
737 }
738
739 /** \ingroup dev
740  * Get the number of the port that a device is connected to
741  * \param dev a device
742  * \returns the port number (0 if not available)
743  */
744 uint8_t API_EXPORTED libusb_get_port_number(libusb_device *dev)
745 {
746         return dev->port_number;
747 }
748
749 /** \ingroup dev
750  * Get the list of all port numbers from root for the specified device
751  *
752  * Since version 1.0.16, \ref LIBUSBX_API_VERSION >= 0x01000102
753  * \param dev a device
754  * \param port_numbers the array that should contain the port numbers
755  * \param port_numbers_len the maximum length of the array. As per the USB 3.0
756  * specs, the current maximum limit for the depth is 7.
757  * \returns the number of elements filled
758  * \returns LIBUSB_ERROR_OVERFLOW if the array is too small
759  */
760 int API_EXPORTED libusb_get_port_numbers(libusb_device *dev,
761         uint8_t* port_numbers, int port_numbers_len)
762 {
763         int i = port_numbers_len;
764
765         while(dev) {
766                 // HCDs can be listed as devices and would have port #0
767                 // TODO: see how the other backends want to implement HCDs as parents
768                 if (dev->port_number == 0)
769                         break;
770                 i--;
771                 if (i < 0) {
772                         usbi_warn(DEVICE_CTX(dev),
773                                 "port numbers array too small");
774                         return LIBUSB_ERROR_OVERFLOW;
775                 }
776                 port_numbers[i] = dev->port_number;
777                 dev = dev->parent_dev;
778         }
779         memmove(port_numbers, &port_numbers[i], port_numbers_len - i);
780         return port_numbers_len - i;
781 }
782
783 /** \ingroup dev
784  * Deprecated please use libusb_get_port_numbers instead.
785  */
786 int API_EXPORTED libusb_get_port_path(libusb_context *ctx, libusb_device *dev,
787         uint8_t* port_numbers, uint8_t port_numbers_len)
788 {
789         UNUSED(ctx);
790
791         return libusb_get_port_numbers(dev, port_numbers, port_numbers_len);
792 }
793
794 /** \ingroup dev
795  * Get the the parent from the specified device [EXPERIMENTAL]
796  * \param dev a device
797  * \returns the device parent or NULL if not available
798  * You should issue a libusb_get_device_list() before calling this
799  * function and make sure that you only access the parent before issuing
800  * libusb_free_device_list(). The reason is that libusbx currently does
801  * not maintain a permanent list of device instances, and therefore can
802  * only guarantee that parents are fully instantiated within a 
803  * libusb_get_device_list() - libusb_free_device_list() block.
804  */
805 DEFAULT_VISIBILITY
806 libusb_device * LIBUSB_CALL libusb_get_parent(libusb_device *dev)
807 {
808         return dev->parent_dev;
809 }
810
811 /** \ingroup dev
812  * Get the address of the device on the bus it is connected to.
813  * \param dev a device
814  * \returns the device address
815  */
816 uint8_t API_EXPORTED libusb_get_device_address(libusb_device *dev)
817 {
818         return dev->device_address;
819 }
820
821 /** \ingroup dev
822  * Get the negotiated connection speed for a device.
823  * \param dev a device
824  * \returns a \ref libusb_speed code, where LIBUSB_SPEED_UNKNOWN means that
825  * the OS doesn't know or doesn't support returning the negotiated speed.
826  */
827 int API_EXPORTED libusb_get_device_speed(libusb_device *dev)
828 {
829         return dev->speed;
830 }
831
832 static const struct libusb_endpoint_descriptor *find_endpoint(
833         struct libusb_config_descriptor *config, unsigned char endpoint)
834 {
835         int iface_idx;
836         for (iface_idx = 0; iface_idx < config->bNumInterfaces; iface_idx++) {
837                 const struct libusb_interface *iface = &config->interface[iface_idx];
838                 int altsetting_idx;
839
840                 for (altsetting_idx = 0; altsetting_idx < iface->num_altsetting;
841                                 altsetting_idx++) {
842                         const struct libusb_interface_descriptor *altsetting
843                                 = &iface->altsetting[altsetting_idx];
844                         int ep_idx;
845
846                         for (ep_idx = 0; ep_idx < altsetting->bNumEndpoints; ep_idx++) {
847                                 const struct libusb_endpoint_descriptor *ep =
848                                         &altsetting->endpoint[ep_idx];
849                                 if (ep->bEndpointAddress == endpoint)
850                                         return ep;
851                         }
852                 }
853         }
854         return NULL;
855 }
856
857 /** \ingroup dev
858  * Convenience function to retrieve the wMaxPacketSize value for a particular
859  * endpoint in the active device configuration.
860  *
861  * This function was originally intended to be of assistance when setting up
862  * isochronous transfers, but a design mistake resulted in this function
863  * instead. It simply returns the wMaxPacketSize value without considering
864  * its contents. If you're dealing with isochronous transfers, you probably
865  * want libusb_get_max_iso_packet_size() instead.
866  *
867  * \param dev a device
868  * \param endpoint address of the endpoint in question
869  * \returns the wMaxPacketSize value
870  * \returns LIBUSB_ERROR_NOT_FOUND if the endpoint does not exist
871  * \returns LIBUSB_ERROR_OTHER on other failure
872  */
873 int API_EXPORTED libusb_get_max_packet_size(libusb_device *dev,
874         unsigned char endpoint)
875 {
876         struct libusb_config_descriptor *config;
877         const struct libusb_endpoint_descriptor *ep;
878         int r;
879
880         r = libusb_get_active_config_descriptor(dev, &config);
881         if (r < 0) {
882                 usbi_err(DEVICE_CTX(dev),
883                         "could not retrieve active config descriptor");
884                 return LIBUSB_ERROR_OTHER;
885         }
886
887         ep = find_endpoint(config, endpoint);
888         if (!ep)
889                 return LIBUSB_ERROR_NOT_FOUND;
890
891         r = ep->wMaxPacketSize;
892         libusb_free_config_descriptor(config);
893         return r;
894 }
895
896 /** \ingroup dev
897  * Calculate the maximum packet size which a specific endpoint is capable is
898  * sending or receiving in the duration of 1 microframe
899  *
900  * Only the active configution is examined. The calculation is based on the
901  * wMaxPacketSize field in the endpoint descriptor as described in section
902  * 9.6.6 in the USB 2.0 specifications.
903  *
904  * If acting on an isochronous or interrupt endpoint, this function will
905  * multiply the value found in bits 0:10 by the number of transactions per
906  * microframe (determined by bits 11:12). Otherwise, this function just
907  * returns the numeric value found in bits 0:10.
908  *
909  * This function is useful for setting up isochronous transfers, for example
910  * you might pass the return value from this function to
911  * libusb_set_iso_packet_lengths() in order to set the length field of every
912  * isochronous packet in a transfer.
913  *
914  * Since v1.0.3.
915  *
916  * \param dev a device
917  * \param endpoint address of the endpoint in question
918  * \returns the maximum packet size which can be sent/received on this endpoint
919  * \returns LIBUSB_ERROR_NOT_FOUND if the endpoint does not exist
920  * \returns LIBUSB_ERROR_OTHER on other failure
921  */
922 int API_EXPORTED libusb_get_max_iso_packet_size(libusb_device *dev,
923         unsigned char endpoint)
924 {
925         struct libusb_config_descriptor *config;
926         const struct libusb_endpoint_descriptor *ep;
927         enum libusb_transfer_type ep_type;
928         uint16_t val;
929         int r;
930
931         r = libusb_get_active_config_descriptor(dev, &config);
932         if (r < 0) {
933                 usbi_err(DEVICE_CTX(dev),
934                         "could not retrieve active config descriptor");
935                 return LIBUSB_ERROR_OTHER;
936         }
937
938         ep = find_endpoint(config, endpoint);
939         if (!ep)
940                 return LIBUSB_ERROR_NOT_FOUND;
941
942         val = ep->wMaxPacketSize;
943         ep_type = (enum libusb_transfer_type) (ep->bmAttributes & 0x3);
944         libusb_free_config_descriptor(config);
945
946         r = val & 0x07ff;
947         if (ep_type == LIBUSB_TRANSFER_TYPE_ISOCHRONOUS
948                         || ep_type == LIBUSB_TRANSFER_TYPE_INTERRUPT)
949                 r *= (1 + ((val >> 11) & 3));
950         return r;
951 }
952
953 /** \ingroup dev
954  * Increment the reference count of a device.
955  * \param dev the device to reference
956  * \returns the same device
957  */
958 DEFAULT_VISIBILITY
959 libusb_device * LIBUSB_CALL libusb_ref_device(libusb_device *dev)
960 {
961         usbi_mutex_lock(&dev->lock);
962         dev->refcnt++;
963         usbi_mutex_unlock(&dev->lock);
964         return dev;
965 }
966
967 /** \ingroup dev
968  * Decrement the reference count of a device. If the decrement operation
969  * causes the reference count to reach zero, the device shall be destroyed.
970  * \param dev the device to unreference
971  */
972 void API_EXPORTED libusb_unref_device(libusb_device *dev)
973 {
974         int refcnt;
975
976         if (!dev)
977                 return;
978
979         usbi_mutex_lock(&dev->lock);
980         refcnt = --dev->refcnt;
981         usbi_mutex_unlock(&dev->lock);
982
983         if (refcnt == 0) {
984                 usbi_dbg("destroy device %d.%d", dev->bus_number, dev->device_address);
985
986                 libusb_unref_device(dev->parent_dev);
987
988                 if (usbi_backend->destroy_device)
989                         usbi_backend->destroy_device(dev);
990
991                 if (!libusb_has_capability(LIBUSB_CAP_HAS_HOTPLUG)) {
992                         /* backend does not support hotplug */
993                         usbi_disconnect_device(dev);
994                 }
995
996                 usbi_mutex_destroy(&dev->lock);
997                 free(dev);
998         }
999 }
1000
1001 /*
1002  * Interrupt the iteration of the event handling thread, so that it picks
1003  * up the new fd.
1004  */
1005 void usbi_fd_notification(struct libusb_context *ctx)
1006 {
1007         unsigned char dummy = 1;
1008         ssize_t r;
1009
1010         if (ctx == NULL)
1011                 return;
1012
1013         /* record that we are messing with poll fds */
1014         usbi_mutex_lock(&ctx->pollfd_modify_lock);
1015         ctx->pollfd_modify++;
1016         usbi_mutex_unlock(&ctx->pollfd_modify_lock);
1017
1018         /* write some data on control pipe to interrupt event handlers */
1019         r = usbi_write(ctx->ctrl_pipe[1], &dummy, sizeof(dummy));
1020         if (r <= 0) {
1021                 usbi_warn(ctx, "internal signalling write failed");
1022                 usbi_mutex_lock(&ctx->pollfd_modify_lock);
1023                 ctx->pollfd_modify--;
1024                 usbi_mutex_unlock(&ctx->pollfd_modify_lock);
1025                 return;
1026         }
1027
1028         /* take event handling lock */
1029         libusb_lock_events(ctx);
1030
1031         /* read the dummy data */
1032         r = usbi_read(ctx->ctrl_pipe[0], &dummy, sizeof(dummy));
1033         if (r <= 0)
1034                 usbi_warn(ctx, "internal signalling read failed");
1035
1036         /* we're done with modifying poll fds */
1037         usbi_mutex_lock(&ctx->pollfd_modify_lock);
1038         ctx->pollfd_modify--;
1039         usbi_mutex_unlock(&ctx->pollfd_modify_lock);
1040
1041         /* Release event handling lock and wake up event waiters */
1042         libusb_unlock_events(ctx);
1043 }
1044
1045 /** \ingroup dev
1046  * Open a device and obtain a device handle. A handle allows you to perform
1047  * I/O on the device in question.
1048  *
1049  * Internally, this function adds a reference to the device and makes it
1050  * available to you through libusb_get_device(). This reference is removed
1051  * during libusb_close().
1052  *
1053  * This is a non-blocking function; no requests are sent over the bus.
1054  *
1055  * \param dev the device to open
1056  * \param handle output location for the returned device handle pointer. Only
1057  * populated when the return code is 0.
1058  * \returns 0 on success
1059  * \returns LIBUSB_ERROR_NO_MEM on memory allocation failure
1060  * \returns LIBUSB_ERROR_ACCESS if the user has insufficient permissions
1061  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1062  * \returns another LIBUSB_ERROR code on other failure
1063  */
1064 int API_EXPORTED libusb_open(libusb_device *dev,
1065         libusb_device_handle **handle)
1066 {
1067         struct libusb_context *ctx = DEVICE_CTX(dev);
1068         struct libusb_device_handle *_handle;
1069         size_t priv_size = usbi_backend->device_handle_priv_size;
1070         int r;
1071         usbi_dbg("open %d.%d", dev->bus_number, dev->device_address);
1072
1073         if (!dev->attached) {
1074                 return LIBUSB_ERROR_NO_DEVICE;
1075         }
1076
1077         _handle = malloc(sizeof(*_handle) + priv_size);
1078         if (!_handle)
1079                 return LIBUSB_ERROR_NO_MEM;
1080
1081         r = usbi_mutex_init(&_handle->lock, NULL);
1082         if (r) {
1083                 free(_handle);
1084                 return LIBUSB_ERROR_OTHER;
1085         }
1086
1087         _handle->dev = libusb_ref_device(dev);
1088         _handle->auto_detach_kernel_driver = 0;
1089         _handle->claimed_interfaces = 0;
1090         memset(&_handle->os_priv, 0, priv_size);
1091
1092         r = usbi_backend->open(_handle);
1093         if (r < 0) {
1094                 usbi_dbg("open %d.%d returns %d", dev->bus_number, dev->device_address, r);
1095                 libusb_unref_device(dev);
1096                 usbi_mutex_destroy(&_handle->lock);
1097                 free(_handle);
1098                 return r;
1099         }
1100
1101         usbi_mutex_lock(&ctx->open_devs_lock);
1102         list_add(&_handle->list, &ctx->open_devs);
1103         usbi_mutex_unlock(&ctx->open_devs_lock);
1104         *handle = _handle;
1105
1106         /* At this point, we want to interrupt any existing event handlers so
1107          * that they realise the addition of the new device's poll fd. One
1108          * example when this is desirable is if the user is running a separate
1109          * dedicated libusbx events handling thread, which is running with a long
1110          * or infinite timeout. We want to interrupt that iteration of the loop,
1111          * so that it picks up the new fd, and then continues. */
1112         usbi_fd_notification(ctx);
1113
1114         return 0;
1115 }
1116
1117 /** \ingroup dev
1118  * Convenience function for finding a device with a particular
1119  * <tt>idVendor</tt>/<tt>idProduct</tt> combination. This function is intended
1120  * for those scenarios where you are using libusbx to knock up a quick test
1121  * application - it allows you to avoid calling libusb_get_device_list() and
1122  * worrying about traversing/freeing the list.
1123  *
1124  * This function has limitations and is hence not intended for use in real
1125  * applications: if multiple devices have the same IDs it will only
1126  * give you the first one, etc.
1127  *
1128  * \param ctx the context to operate on, or NULL for the default context
1129  * \param vendor_id the idVendor value to search for
1130  * \param product_id the idProduct value to search for
1131  * \returns a handle for the first found device, or NULL on error or if the
1132  * device could not be found. */
1133 DEFAULT_VISIBILITY
1134 libusb_device_handle * LIBUSB_CALL libusb_open_device_with_vid_pid(
1135         libusb_context *ctx, uint16_t vendor_id, uint16_t product_id)
1136 {
1137         struct libusb_device **devs;
1138         struct libusb_device *found = NULL;
1139         struct libusb_device *dev;
1140         struct libusb_device_handle *handle = NULL;
1141         size_t i = 0;
1142         int r;
1143
1144         if (libusb_get_device_list(ctx, &devs) < 0)
1145                 return NULL;
1146
1147         while ((dev = devs[i++]) != NULL) {
1148                 struct libusb_device_descriptor desc;
1149                 r = libusb_get_device_descriptor(dev, &desc);
1150                 if (r < 0)
1151                         goto out;
1152                 if (desc.idVendor == vendor_id && desc.idProduct == product_id) {
1153                         found = dev;
1154                         break;
1155                 }
1156         }
1157
1158         if (found) {
1159                 r = libusb_open(found, &handle);
1160                 if (r < 0)
1161                         handle = NULL;
1162         }
1163
1164 out:
1165         libusb_free_device_list(devs, 1);
1166         return handle;
1167 }
1168
1169 static void do_close(struct libusb_context *ctx,
1170         struct libusb_device_handle *dev_handle)
1171 {
1172         struct usbi_transfer *itransfer;
1173         struct usbi_transfer *tmp;
1174
1175         libusb_lock_events(ctx);
1176
1177         /* remove any transfers in flight that are for this device */
1178         usbi_mutex_lock(&ctx->flying_transfers_lock);
1179
1180         /* safe iteration because transfers may be being deleted */
1181         list_for_each_entry_safe(itransfer, tmp, &ctx->flying_transfers, list, struct usbi_transfer) {
1182                 struct libusb_transfer *transfer =
1183                         USBI_TRANSFER_TO_LIBUSB_TRANSFER(itransfer);
1184
1185                 if (transfer->dev_handle != dev_handle)
1186                         continue;
1187
1188                 if (!(itransfer->flags & USBI_TRANSFER_DEVICE_DISAPPEARED)) {
1189                         usbi_err(ctx, "Device handle closed while transfer was still being processed, but the device is still connected as far as we know");
1190
1191                         if (itransfer->flags & USBI_TRANSFER_CANCELLING)
1192                                 usbi_warn(ctx, "A cancellation for an in-flight transfer hasn't completed but closing the device handle");
1193                         else
1194                                 usbi_err(ctx, "A cancellation hasn't even been scheduled on the transfer for which the device is closing");
1195                 }
1196
1197                 /* remove from the list of in-flight transfers and make sure
1198                  * we don't accidentally use the device handle in the future
1199                  * (or that such accesses will be easily caught and identified as a crash)
1200                  */
1201                 usbi_mutex_lock(&itransfer->lock);
1202                 list_del(&itransfer->list);
1203                 transfer->dev_handle = NULL;
1204                 usbi_mutex_unlock(&itransfer->lock);
1205
1206                 /* it is up to the user to free up the actual transfer struct.  this is
1207                  * just making sure that we don't attempt to process the transfer after
1208                  * the device handle is invalid
1209                  */
1210                 usbi_dbg("Removed transfer %p from the in-flight list because device handle %p closed",
1211                          transfer, dev_handle);
1212         }
1213         usbi_mutex_unlock(&ctx->flying_transfers_lock);
1214
1215         libusb_unlock_events(ctx);
1216
1217         usbi_mutex_lock(&ctx->open_devs_lock);
1218         list_del(&dev_handle->list);
1219         usbi_mutex_unlock(&ctx->open_devs_lock);
1220
1221         usbi_backend->close(dev_handle);
1222         libusb_unref_device(dev_handle->dev);
1223         usbi_mutex_destroy(&dev_handle->lock);
1224         free(dev_handle);
1225 }
1226
1227 /** \ingroup dev
1228  * Close a device handle. Should be called on all open handles before your
1229  * application exits.
1230  *
1231  * Internally, this function destroys the reference that was added by
1232  * libusb_open() on the given device.
1233  *
1234  * This is a non-blocking function; no requests are sent over the bus.
1235  *
1236  * \param dev_handle the handle to close
1237  */
1238 void API_EXPORTED libusb_close(libusb_device_handle *dev_handle)
1239 {
1240         struct libusb_context *ctx;
1241         unsigned char dummy = 1;
1242         ssize_t r;
1243
1244         if (!dev_handle)
1245                 return;
1246         usbi_dbg("");
1247
1248         ctx = HANDLE_CTX(dev_handle);
1249
1250         /* Similarly to libusb_open(), we want to interrupt all event handlers
1251          * at this point. More importantly, we want to perform the actual close of
1252          * the device while holding the event handling lock (preventing any other
1253          * thread from doing event handling) because we will be removing a file
1254          * descriptor from the polling loop. */
1255
1256         /* record that we are messing with poll fds */
1257         usbi_mutex_lock(&ctx->pollfd_modify_lock);
1258         ctx->pollfd_modify++;
1259         usbi_mutex_unlock(&ctx->pollfd_modify_lock);
1260
1261         /* write some data on control pipe to interrupt event handlers */
1262         r = usbi_write(ctx->ctrl_pipe[1], &dummy, sizeof(dummy));
1263         if (r <= 0) {
1264                 usbi_warn(ctx, "internal signalling write failed, closing anyway");
1265                 do_close(ctx, dev_handle);
1266                 usbi_mutex_lock(&ctx->pollfd_modify_lock);
1267                 ctx->pollfd_modify--;
1268                 usbi_mutex_unlock(&ctx->pollfd_modify_lock);
1269                 return;
1270         }
1271
1272         /* take event handling lock */
1273         libusb_lock_events(ctx);
1274
1275         /* read the dummy data */
1276         r = usbi_read(ctx->ctrl_pipe[0], &dummy, sizeof(dummy));
1277         if (r <= 0)
1278                 usbi_warn(ctx, "internal signalling read failed, closing anyway");
1279
1280         /* Close the device */
1281         do_close(ctx, dev_handle);
1282
1283         /* we're done with modifying poll fds */
1284         usbi_mutex_lock(&ctx->pollfd_modify_lock);
1285         ctx->pollfd_modify--;
1286         usbi_mutex_unlock(&ctx->pollfd_modify_lock);
1287
1288         /* Release event handling lock and wake up event waiters */
1289         libusb_unlock_events(ctx);
1290 }
1291
1292 /** \ingroup dev
1293  * Get the underlying device for a handle. This function does not modify
1294  * the reference count of the returned device, so do not feel compelled to
1295  * unreference it when you are done.
1296  * \param dev_handle a device handle
1297  * \returns the underlying device
1298  */
1299 DEFAULT_VISIBILITY
1300 libusb_device * LIBUSB_CALL libusb_get_device(libusb_device_handle *dev_handle)
1301 {
1302         return dev_handle->dev;
1303 }
1304
1305 /** \ingroup dev
1306  * Determine the bConfigurationValue of the currently active configuration.
1307  *
1308  * You could formulate your own control request to obtain this information,
1309  * but this function has the advantage that it may be able to retrieve the
1310  * information from operating system caches (no I/O involved).
1311  *
1312  * If the OS does not cache this information, then this function will block
1313  * while a control transfer is submitted to retrieve the information.
1314  *
1315  * This function will return a value of 0 in the <tt>config</tt> output
1316  * parameter if the device is in unconfigured state.
1317  *
1318  * \param dev a device handle
1319  * \param config output location for the bConfigurationValue of the active
1320  * configuration (only valid for return code 0)
1321  * \returns 0 on success
1322  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1323  * \returns another LIBUSB_ERROR code on other failure
1324  */
1325 int API_EXPORTED libusb_get_configuration(libusb_device_handle *dev,
1326         int *config)
1327 {
1328         int r = LIBUSB_ERROR_NOT_SUPPORTED;
1329
1330         usbi_dbg("");
1331         if (usbi_backend->get_configuration)
1332                 r = usbi_backend->get_configuration(dev, config);
1333
1334         if (r == LIBUSB_ERROR_NOT_SUPPORTED) {
1335                 uint8_t tmp = 0;
1336                 usbi_dbg("falling back to control message");
1337                 r = libusb_control_transfer(dev, LIBUSB_ENDPOINT_IN,
1338                         LIBUSB_REQUEST_GET_CONFIGURATION, 0, 0, &tmp, 1, 1000);
1339                 if (r == 0) {
1340                         usbi_err(HANDLE_CTX(dev), "zero bytes returned in ctrl transfer?");
1341                         r = LIBUSB_ERROR_IO;
1342                 } else if (r == 1) {
1343                         r = 0;
1344                         *config = tmp;
1345                 } else {
1346                         usbi_dbg("control failed, error %d", r);
1347                 }
1348         }
1349
1350         if (r == 0)
1351                 usbi_dbg("active config %d", *config);
1352
1353         return r;
1354 }
1355
1356 /** \ingroup dev
1357  * Set the active configuration for a device.
1358  *
1359  * The operating system may or may not have already set an active
1360  * configuration on the device. It is up to your application to ensure the
1361  * correct configuration is selected before you attempt to claim interfaces
1362  * and perform other operations.
1363  *
1364  * If you call this function on a device already configured with the selected
1365  * configuration, then this function will act as a lightweight device reset:
1366  * it will issue a SET_CONFIGURATION request using the current configuration,
1367  * causing most USB-related device state to be reset (altsetting reset to zero,
1368  * endpoint halts cleared, toggles reset).
1369  *
1370  * You cannot change/reset configuration if your application has claimed
1371  * interfaces. It is advised to set the desired configuration before claiming
1372  * interfaces.
1373  *
1374  * Alternatively you can call libusb_release_interface() first. Note if you
1375  * do things this way you must ensure that auto_detach_kernel_driver for
1376  * <tt>dev</tt> is 0, otherwise the kernel driver will be re-attached when you
1377  * release the interface(s).
1378  *
1379  * You cannot change/reset configuration if other applications or drivers have
1380  * claimed interfaces.
1381  *
1382  * A configuration value of -1 will put the device in unconfigured state.
1383  * The USB specifications state that a configuration value of 0 does this,
1384  * however buggy devices exist which actually have a configuration 0.
1385  *
1386  * You should always use this function rather than formulating your own
1387  * SET_CONFIGURATION control request. This is because the underlying operating
1388  * system needs to know when such changes happen.
1389  *
1390  * This is a blocking function.
1391  *
1392  * \param dev a device handle
1393  * \param configuration the bConfigurationValue of the configuration you
1394  * wish to activate, or -1 if you wish to put the device in unconfigured state
1395  * \returns 0 on success
1396  * \returns LIBUSB_ERROR_NOT_FOUND if the requested configuration does not exist
1397  * \returns LIBUSB_ERROR_BUSY if interfaces are currently claimed
1398  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1399  * \returns another LIBUSB_ERROR code on other failure
1400  * \see libusb_set_auto_detach_kernel_driver()
1401  */
1402 int API_EXPORTED libusb_set_configuration(libusb_device_handle *dev,
1403         int configuration)
1404 {
1405         usbi_dbg("configuration %d", configuration);
1406         return usbi_backend->set_configuration(dev, configuration);
1407 }
1408
1409 /** \ingroup dev
1410  * Claim an interface on a given device handle. You must claim the interface
1411  * you wish to use before you can perform I/O on any of its endpoints.
1412  *
1413  * It is legal to attempt to claim an already-claimed interface, in which
1414  * case libusbx just returns 0 without doing anything.
1415  *
1416  * If auto_detach_kernel_driver is set to 1 for <tt>dev</tt>, the kernel driver
1417  * will be detached if necessary, on failure the detach error is returned.
1418  *
1419  * Claiming of interfaces is a purely logical operation; it does not cause
1420  * any requests to be sent over the bus. Interface claiming is used to
1421  * instruct the underlying operating system that your application wishes
1422  * to take ownership of the interface.
1423  *
1424  * This is a non-blocking function.
1425  *
1426  * \param dev a device handle
1427  * \param interface_number the <tt>bInterfaceNumber</tt> of the interface you
1428  * wish to claim
1429  * \returns 0 on success
1430  * \returns LIBUSB_ERROR_NOT_FOUND if the requested interface does not exist
1431  * \returns LIBUSB_ERROR_BUSY if another program or driver has claimed the
1432  * interface
1433  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1434  * \returns a LIBUSB_ERROR code on other failure
1435  * \see libusb_set_auto_detach_kernel_driver()
1436  */
1437 int API_EXPORTED libusb_claim_interface(libusb_device_handle *dev,
1438         int interface_number)
1439 {
1440         int r = 0;
1441
1442         usbi_dbg("interface %d", interface_number);
1443         if (interface_number >= USB_MAXINTERFACES)
1444                 return LIBUSB_ERROR_INVALID_PARAM;
1445
1446         if (!dev->dev->attached)
1447                 return LIBUSB_ERROR_NO_DEVICE;
1448
1449         usbi_mutex_lock(&dev->lock);
1450         if (dev->claimed_interfaces & (1 << interface_number))
1451                 goto out;
1452
1453         r = usbi_backend->claim_interface(dev, interface_number);
1454         if (r == 0)
1455                 dev->claimed_interfaces |= 1 << interface_number;
1456
1457 out:
1458         usbi_mutex_unlock(&dev->lock);
1459         return r;
1460 }
1461
1462 /** \ingroup dev
1463  * Release an interface previously claimed with libusb_claim_interface(). You
1464  * should release all claimed interfaces before closing a device handle.
1465  *
1466  * This is a blocking function. A SET_INTERFACE control request will be sent
1467  * to the device, resetting interface state to the first alternate setting.
1468  *
1469  * If auto_detach_kernel_driver is set to 1 for <tt>dev</tt>, the kernel
1470  * driver will be re-attached after releasing the interface.
1471  *
1472  * \param dev a device handle
1473  * \param interface_number the <tt>bInterfaceNumber</tt> of the
1474  * previously-claimed interface
1475  * \returns 0 on success
1476  * \returns LIBUSB_ERROR_NOT_FOUND if the interface was not claimed
1477  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1478  * \returns another LIBUSB_ERROR code on other failure
1479  * \see libusb_set_auto_detach_kernel_driver()
1480  */
1481 int API_EXPORTED libusb_release_interface(libusb_device_handle *dev,
1482         int interface_number)
1483 {
1484         int r;
1485
1486         usbi_dbg("interface %d", interface_number);
1487         if (interface_number >= USB_MAXINTERFACES)
1488                 return LIBUSB_ERROR_INVALID_PARAM;
1489
1490         usbi_mutex_lock(&dev->lock);
1491         if (!(dev->claimed_interfaces & (1 << interface_number))) {
1492                 r = LIBUSB_ERROR_NOT_FOUND;
1493                 goto out;
1494         }
1495
1496         r = usbi_backend->release_interface(dev, interface_number);
1497         if (r == 0)
1498                 dev->claimed_interfaces &= ~(1 << interface_number);
1499
1500 out:
1501         usbi_mutex_unlock(&dev->lock);
1502         return r;
1503 }
1504
1505 /** \ingroup dev
1506  * Activate an alternate setting for an interface. The interface must have
1507  * been previously claimed with libusb_claim_interface().
1508  *
1509  * You should always use this function rather than formulating your own
1510  * SET_INTERFACE control request. This is because the underlying operating
1511  * system needs to know when such changes happen.
1512  *
1513  * This is a blocking function.
1514  *
1515  * \param dev a device handle
1516  * \param interface_number the <tt>bInterfaceNumber</tt> of the
1517  * previously-claimed interface
1518  * \param alternate_setting the <tt>bAlternateSetting</tt> of the alternate
1519  * setting to activate
1520  * \returns 0 on success
1521  * \returns LIBUSB_ERROR_NOT_FOUND if the interface was not claimed, or the
1522  * requested alternate setting does not exist
1523  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1524  * \returns another LIBUSB_ERROR code on other failure
1525  */
1526 int API_EXPORTED libusb_set_interface_alt_setting(libusb_device_handle *dev,
1527         int interface_number, int alternate_setting)
1528 {
1529         usbi_dbg("interface %d altsetting %d",
1530                 interface_number, alternate_setting);
1531         if (interface_number >= USB_MAXINTERFACES)
1532                 return LIBUSB_ERROR_INVALID_PARAM;
1533
1534         usbi_mutex_lock(&dev->lock);
1535         if (!dev->dev->attached) {
1536                 usbi_mutex_unlock(&dev->lock);
1537                 return LIBUSB_ERROR_NO_DEVICE;
1538         }
1539
1540         if (!(dev->claimed_interfaces & (1 << interface_number))) {
1541                 usbi_mutex_unlock(&dev->lock);
1542                 return LIBUSB_ERROR_NOT_FOUND;
1543         }
1544         usbi_mutex_unlock(&dev->lock);
1545
1546         return usbi_backend->set_interface_altsetting(dev, interface_number,
1547                 alternate_setting);
1548 }
1549
1550 /** \ingroup dev
1551  * Clear the halt/stall condition for an endpoint. Endpoints with halt status
1552  * are unable to receive or transmit data until the halt condition is stalled.
1553  *
1554  * You should cancel all pending transfers before attempting to clear the halt
1555  * condition.
1556  *
1557  * This is a blocking function.
1558  *
1559  * \param dev a device handle
1560  * \param endpoint the endpoint to clear halt status
1561  * \returns 0 on success
1562  * \returns LIBUSB_ERROR_NOT_FOUND if the endpoint does not exist
1563  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1564  * \returns another LIBUSB_ERROR code on other failure
1565  */
1566 int API_EXPORTED libusb_clear_halt(libusb_device_handle *dev,
1567         unsigned char endpoint)
1568 {
1569         usbi_dbg("endpoint %x", endpoint);
1570         if (!dev->dev->attached)
1571                 return LIBUSB_ERROR_NO_DEVICE;
1572
1573         return usbi_backend->clear_halt(dev, endpoint);
1574 }
1575
1576 /** \ingroup dev
1577  * Perform a USB port reset to reinitialize a device. The system will attempt
1578  * to restore the previous configuration and alternate settings after the
1579  * reset has completed.
1580  *
1581  * If the reset fails, the descriptors change, or the previous state cannot be
1582  * restored, the device will appear to be disconnected and reconnected. This
1583  * means that the device handle is no longer valid (you should close it) and
1584  * rediscover the device. A return code of LIBUSB_ERROR_NOT_FOUND indicates
1585  * when this is the case.
1586  *
1587  * This is a blocking function which usually incurs a noticeable delay.
1588  *
1589  * \param dev a handle of the device to reset
1590  * \returns 0 on success
1591  * \returns LIBUSB_ERROR_NOT_FOUND if re-enumeration is required, or if the
1592  * device has been disconnected
1593  * \returns another LIBUSB_ERROR code on other failure
1594  */
1595 int API_EXPORTED libusb_reset_device(libusb_device_handle *dev)
1596 {
1597         usbi_dbg("");
1598         if (!dev->dev->attached)
1599                 return LIBUSB_ERROR_NO_DEVICE;
1600
1601         return usbi_backend->reset_device(dev);
1602 }
1603
1604 /** \ingroup dev
1605  * Determine if a kernel driver is active on an interface. If a kernel driver
1606  * is active, you cannot claim the interface, and libusbx will be unable to
1607  * perform I/O.
1608  *
1609  * This functionality is not available on Windows.
1610  *
1611  * \param dev a device handle
1612  * \param interface_number the interface to check
1613  * \returns 0 if no kernel driver is active
1614  * \returns 1 if a kernel driver is active
1615  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1616  * \returns LIBUSB_ERROR_NOT_SUPPORTED on platforms where the functionality
1617  * is not available
1618  * \returns another LIBUSB_ERROR code on other failure
1619  * \see libusb_detach_kernel_driver()
1620  */
1621 int API_EXPORTED libusb_kernel_driver_active(libusb_device_handle *dev,
1622         int interface_number)
1623 {
1624         usbi_dbg("interface %d", interface_number);
1625
1626         if (!dev->dev->attached)
1627                 return LIBUSB_ERROR_NO_DEVICE;
1628
1629         if (usbi_backend->kernel_driver_active)
1630                 return usbi_backend->kernel_driver_active(dev, interface_number);
1631         else
1632                 return LIBUSB_ERROR_NOT_SUPPORTED;
1633 }
1634
1635 /** \ingroup dev
1636  * Detach a kernel driver from an interface. If successful, you will then be
1637  * able to claim the interface and perform I/O.
1638  *
1639  * This functionality is not available on Darwin or Windows.
1640  *
1641  * Note that libusbx itself also talks to the device through a special kernel
1642  * driver, if this driver is already attached to the device, this call will
1643  * not detach it and return LIBUSB_ERROR_NOT_FOUND.
1644  *
1645  * \param dev a device handle
1646  * \param interface_number the interface to detach the driver from
1647  * \returns 0 on success
1648  * \returns LIBUSB_ERROR_NOT_FOUND if no kernel driver was active
1649  * \returns LIBUSB_ERROR_INVALID_PARAM if the interface does not exist
1650  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1651  * \returns LIBUSB_ERROR_NOT_SUPPORTED on platforms where the functionality
1652  * is not available
1653  * \returns another LIBUSB_ERROR code on other failure
1654  * \see libusb_kernel_driver_active()
1655  */
1656 int API_EXPORTED libusb_detach_kernel_driver(libusb_device_handle *dev,
1657         int interface_number)
1658 {
1659         usbi_dbg("interface %d", interface_number);
1660
1661         if (!dev->dev->attached)
1662                 return LIBUSB_ERROR_NO_DEVICE;
1663
1664         if (usbi_backend->detach_kernel_driver)
1665                 return usbi_backend->detach_kernel_driver(dev, interface_number);
1666         else
1667                 return LIBUSB_ERROR_NOT_SUPPORTED;
1668 }
1669
1670 /** \ingroup dev
1671  * Re-attach an interface's kernel driver, which was previously detached
1672  * using libusb_detach_kernel_driver(). This call is only effective on
1673  * Linux and returns LIBUSB_ERROR_NOT_SUPPORTED on all other platforms.
1674  *
1675  * This functionality is not available on Darwin or Windows.
1676  *
1677  * \param dev a device handle
1678  * \param interface_number the interface to attach the driver from
1679  * \returns 0 on success
1680  * \returns LIBUSB_ERROR_NOT_FOUND if no kernel driver was active
1681  * \returns LIBUSB_ERROR_INVALID_PARAM if the interface does not exist
1682  * \returns LIBUSB_ERROR_NO_DEVICE if the device has been disconnected
1683  * \returns LIBUSB_ERROR_NOT_SUPPORTED on platforms where the functionality
1684  * is not available
1685  * \returns LIBUSB_ERROR_BUSY if the driver cannot be attached because the
1686  * interface is claimed by a program or driver
1687  * \returns another LIBUSB_ERROR code on other failure
1688  * \see libusb_kernel_driver_active()
1689  */
1690 int API_EXPORTED libusb_attach_kernel_driver(libusb_device_handle *dev,
1691         int interface_number)
1692 {
1693         usbi_dbg("interface %d", interface_number);
1694
1695         if (!dev->dev->attached)
1696                 return LIBUSB_ERROR_NO_DEVICE;
1697
1698         if (usbi_backend->attach_kernel_driver)
1699                 return usbi_backend->attach_kernel_driver(dev, interface_number);
1700         else
1701                 return LIBUSB_ERROR_NOT_SUPPORTED;
1702 }
1703
1704 /** \ingroup dev
1705  * Enable/disable libusbx's automatic kernel driver detachment. When this is
1706  * enabled libusbx will automatically detach the kernel driver on an interface
1707  * when claiming the interface, and attach it when releasing the interface.
1708  *
1709  * Automatic kernel driver detachment is disabled on newly opened device
1710  * handles by default.
1711  *
1712  * On platforms which do not have LIBUSB_CAP_SUPPORTS_DETACH_KERNEL_DRIVER
1713  * this function will return LIBUSB_ERROR_NOT_SUPPORTED, and libusbx will
1714  * continue as if this function was never called.
1715  *
1716  * \param dev a device handle
1717  * \param enable whether to enable or disable auto kernel driver detachment
1718  *
1719  * \returns LIBUSB_SUCCESS on success
1720  * \returns LIBUSB_ERROR_NOT_SUPPORTED on platforms where the functionality
1721  * is not available
1722  * \see libusb_claim_interface()
1723  * \see libusb_release_interface()
1724  * \see libusb_set_configuration()
1725  */
1726 int API_EXPORTED libusb_set_auto_detach_kernel_driver(
1727         libusb_device_handle *dev, int enable)
1728 {
1729         if (!(usbi_backend->caps & USBI_CAP_SUPPORTS_DETACH_KERNEL_DRIVER))
1730                 return LIBUSB_ERROR_NOT_SUPPORTED;
1731
1732         dev->auto_detach_kernel_driver = enable;
1733         return LIBUSB_SUCCESS;
1734 }
1735
1736 /** \ingroup lib
1737  * Set log message verbosity.
1738  *
1739  * The default level is LIBUSB_LOG_LEVEL_NONE, which means no messages are ever
1740  * printed. If you choose to increase the message verbosity level, ensure
1741  * that your application does not close the stdout/stderr file descriptors.
1742  *
1743  * You are advised to use level LIBUSB_LOG_LEVEL_WARNING. libusbx is conservative
1744  * with its message logging and most of the time, will only log messages that
1745  * explain error conditions and other oddities. This will help you debug
1746  * your software.
1747  *
1748  * If the LIBUSB_DEBUG environment variable was set when libusbx was
1749  * initialized, this function does nothing: the message verbosity is fixed
1750  * to the value in the environment variable.
1751  *
1752  * If libusbx was compiled without any message logging, this function does
1753  * nothing: you'll never get any messages.
1754  *
1755  * If libusbx was compiled with verbose debug message logging, this function
1756  * does nothing: you'll always get messages from all levels.
1757  *
1758  * \param ctx the context to operate on, or NULL for the default context
1759  * \param level debug level to set
1760  */
1761 void API_EXPORTED libusb_set_debug(libusb_context *ctx, int level)
1762 {
1763         USBI_GET_CONTEXT(ctx);
1764         if (!ctx->debug_fixed)
1765                 ctx->debug = level;
1766 }
1767
1768 /** \ingroup lib
1769  * Initialize libusb. This function must be called before calling any other
1770  * libusbx function.
1771  *
1772  * If you do not provide an output location for a context pointer, a default
1773  * context will be created. If there was already a default context, it will
1774  * be reused (and nothing will be initialized/reinitialized).
1775  *
1776  * \param context Optional output location for context pointer.
1777  * Only valid on return code 0.
1778  * \returns 0 on success, or a LIBUSB_ERROR code on failure
1779  * \see contexts
1780  */
1781 int API_EXPORTED libusb_init(libusb_context **context)
1782 {
1783         struct libusb_device *dev, *next;
1784         char *dbg = getenv("LIBUSB_DEBUG");
1785         struct libusb_context *ctx;
1786         static int first_init = 1;
1787         int r = 0;
1788
1789         usbi_mutex_static_lock(&default_context_lock);
1790
1791         if (!timestamp_origin.tv_sec) {
1792                 usbi_gettimeofday(&timestamp_origin, NULL);
1793         }
1794
1795         if (!context && usbi_default_context) {
1796                 usbi_dbg("reusing default context");
1797                 default_context_refcnt++;
1798                 usbi_mutex_static_unlock(&default_context_lock);
1799                 return 0;
1800         }
1801
1802         ctx = calloc(1, sizeof(*ctx));
1803         if (!ctx) {
1804                 r = LIBUSB_ERROR_NO_MEM;
1805                 goto err_unlock;
1806         }
1807
1808 #ifdef ENABLE_DEBUG_LOGGING
1809         ctx->debug = LIBUSB_LOG_LEVEL_DEBUG;
1810 #endif
1811
1812         if (dbg) {
1813                 ctx->debug = atoi(dbg);
1814                 if (ctx->debug)
1815                         ctx->debug_fixed = 1;
1816         }
1817
1818         /* default context should be initialized before calling usbi_dbg */
1819         if (!usbi_default_context) {
1820                 usbi_default_context = ctx;
1821                 default_context_refcnt++;
1822                 usbi_dbg("created default context");
1823         }
1824
1825         usbi_dbg("libusbx v%d.%d.%d.%d", libusb_version_internal.major, libusb_version_internal.minor,
1826                 libusb_version_internal.micro, libusb_version_internal.nano);
1827
1828         usbi_mutex_init(&ctx->usb_devs_lock, NULL);
1829         usbi_mutex_init(&ctx->open_devs_lock, NULL);
1830         usbi_mutex_init(&ctx->hotplug_cbs_lock, NULL);
1831         list_init(&ctx->usb_devs);
1832         list_init(&ctx->open_devs);
1833         list_init(&ctx->hotplug_cbs);
1834
1835         usbi_mutex_static_lock(&active_contexts_lock);
1836         if (first_init) {
1837                 first_init = 0;
1838                 list_init (&active_contexts_list);
1839         }
1840         list_add (&ctx->list, &active_contexts_list);
1841         usbi_mutex_static_unlock(&active_contexts_lock);
1842
1843         if (usbi_backend->init) {
1844                 r = usbi_backend->init(ctx);
1845                 if (r)
1846                         goto err_free_ctx;
1847         }
1848
1849         r = usbi_io_init(ctx);
1850         if (r < 0)
1851                 goto err_backend_exit;
1852
1853         usbi_mutex_static_unlock(&default_context_lock);
1854
1855         if (context)
1856                 *context = ctx;
1857
1858         return 0;
1859
1860 err_backend_exit:
1861         if (usbi_backend->exit)
1862                 usbi_backend->exit();
1863 err_free_ctx:
1864         if (ctx == usbi_default_context)
1865                 usbi_default_context = NULL;
1866
1867         usbi_mutex_destroy(&ctx->open_devs_lock);
1868         usbi_mutex_destroy(&ctx->usb_devs_lock);
1869         usbi_mutex_destroy(&ctx->hotplug_cbs_lock);
1870
1871         usbi_mutex_static_lock(&active_contexts_lock);
1872         list_del (&ctx->list);
1873         usbi_mutex_static_unlock(&active_contexts_lock);
1874
1875         usbi_mutex_lock(&ctx->usb_devs_lock);
1876         list_for_each_entry_safe(dev, next, &ctx->usb_devs, list, struct libusb_device) {
1877                 list_del(&dev->list);
1878                 libusb_unref_device(dev);
1879         }
1880         usbi_mutex_unlock(&ctx->usb_devs_lock);
1881
1882         free(ctx);
1883 err_unlock:
1884         usbi_mutex_static_unlock(&default_context_lock);
1885         return r;
1886 }
1887
1888 /** \ingroup lib
1889  * Deinitialize libusb. Should be called after closing all open devices and
1890  * before your application terminates.
1891  * \param ctx the context to deinitialize, or NULL for the default context
1892  */
1893 void API_EXPORTED libusb_exit(struct libusb_context *ctx)
1894 {
1895         struct libusb_device *dev, *next;
1896
1897         usbi_dbg("");
1898         USBI_GET_CONTEXT(ctx);
1899
1900         /* if working with default context, only actually do the deinitialization
1901          * if we're the last user */
1902         usbi_mutex_static_lock(&default_context_lock);
1903         if (ctx == usbi_default_context) {
1904                 if (--default_context_refcnt > 0) {
1905                         usbi_dbg("not destroying default context");
1906                         usbi_mutex_static_unlock(&default_context_lock);
1907                         return;
1908                 }
1909                 usbi_dbg("destroying default context");
1910                 usbi_default_context = NULL;
1911         }
1912         usbi_mutex_static_unlock(&default_context_lock);
1913
1914         usbi_mutex_static_lock(&active_contexts_lock);
1915         list_del (&ctx->list);
1916         usbi_mutex_static_unlock(&active_contexts_lock);
1917
1918         if (libusb_has_capability(LIBUSB_CAP_HAS_HOTPLUG)) {
1919                 usbi_hotplug_deregister_all(ctx);
1920                 usbi_mutex_lock(&ctx->usb_devs_lock);
1921                 list_for_each_entry_safe(dev, next, &ctx->usb_devs, list, struct libusb_device) {
1922                         list_del(&dev->list);
1923                         libusb_unref_device(dev);
1924                 }
1925                 usbi_mutex_unlock(&ctx->usb_devs_lock);
1926         }
1927
1928         /* a few sanity checks. don't bother with locking because unless
1929          * there is an application bug, nobody will be accessing these. */
1930         if (!list_empty(&ctx->usb_devs))
1931                 usbi_warn(ctx, "some libusb_devices were leaked");
1932         if (!list_empty(&ctx->open_devs))
1933                 usbi_warn(ctx, "application left some devices open");
1934
1935         usbi_io_exit(ctx);
1936         if (usbi_backend->exit)
1937                 usbi_backend->exit();
1938
1939         usbi_mutex_destroy(&ctx->open_devs_lock);
1940         usbi_mutex_destroy(&ctx->usb_devs_lock);
1941         usbi_mutex_destroy(&ctx->hotplug_cbs_lock);
1942         free(ctx);
1943 }
1944
1945 /** \ingroup misc
1946  * Check at runtime if the loaded library has a given capability.
1947  * This call should be performed after \ref libusb_init(), to ensure the
1948  * backend has updated its capability set.
1949  *
1950  * \param capability the \ref libusb_capability to check for
1951  * \returns nonzero if the running library has the capability, 0 otherwise
1952  */
1953 int API_EXPORTED libusb_has_capability(uint32_t capability)
1954 {
1955         switch (capability) {
1956         case LIBUSB_CAP_HAS_CAPABILITY:
1957                 return 1;
1958         case LIBUSB_CAP_HAS_HOTPLUG:
1959                 return !(usbi_backend->get_device_list);
1960         case LIBUSB_CAP_HAS_HID_ACCESS:
1961                 return (usbi_backend->caps & USBI_CAP_HAS_HID_ACCESS);
1962         case LIBUSB_CAP_SUPPORTS_DETACH_KERNEL_DRIVER:
1963                 return (usbi_backend->caps & USBI_CAP_SUPPORTS_DETACH_KERNEL_DRIVER);
1964         }
1965         return 0;
1966 }
1967
1968 /* this is defined in libusbi.h if needed */
1969 #ifdef LIBUSB_GETTIMEOFDAY_WIN32
1970 /*
1971  * gettimeofday
1972  * Implementation according to:
1973  * The Open Group Base Specifications Issue 6
1974  * IEEE Std 1003.1, 2004 Edition
1975  */
1976
1977 /*
1978  *  THIS SOFTWARE IS NOT COPYRIGHTED
1979  *
1980  *  This source code is offered for use in the public domain. You may
1981  *  use, modify or distribute it freely.
1982  *
1983  *  This code is distributed in the hope that it will be useful but
1984  *  WITHOUT ANY WARRANTY. ALL WARRANTIES, EXPRESS OR IMPLIED ARE HEREBY
1985  *  DISCLAIMED. This includes but is not limited to warranties of
1986  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
1987  *
1988  *  Contributed by:
1989  *  Danny Smith <dannysmith@users.sourceforge.net>
1990  */
1991
1992 /* Offset between 1/1/1601 and 1/1/1970 in 100 nanosec units */
1993 #define _W32_FT_OFFSET (116444736000000000)
1994
1995 int usbi_gettimeofday(struct timeval *tp, void *tzp)
1996 {
1997         union {
1998                 unsigned __int64 ns100; /* Time since 1 Jan 1601, in 100ns units */
1999                 FILETIME ft;
2000         } _now;
2001         UNUSED(tzp);
2002
2003         if(tp) {
2004 #if defined(OS_WINCE)
2005                 SYSTEMTIME st;
2006                 GetSystemTime(&st);
2007                 SystemTimeToFileTime(&st, &_now.ft);
2008 #else
2009                 GetSystemTimeAsFileTime (&_now.ft);
2010 #endif
2011                 tp->tv_usec=(long)((_now.ns100 / 10) % 1000000 );
2012                 tp->tv_sec= (long)((_now.ns100 - _W32_FT_OFFSET) / 10000000);
2013         }
2014         /* Always return 0 as per Open Group Base Specifications Issue 6.
2015            Do not set errno on error.  */
2016         return 0;
2017 }
2018 #endif
2019
2020 static void usbi_log_str(struct libusb_context *ctx, const char * str)
2021 {
2022         UNUSED(ctx);
2023         fprintf(stderr, str);
2024 }
2025
2026 void usbi_log_v(struct libusb_context *ctx, enum libusb_log_level level,
2027         const char *function, const char *format, va_list args)
2028 {
2029         const char *prefix = "";
2030         char buf[USBI_MAX_LOG_LEN];
2031         struct timeval now;
2032         int global_debug, header_len, text_len;
2033         static int has_debug_header_been_displayed = 0;
2034
2035 #ifdef ENABLE_DEBUG_LOGGING
2036         global_debug = 1;
2037         UNUSED(ctx);
2038 #else
2039         USBI_GET_CONTEXT(ctx);
2040         if (ctx == NULL)
2041                 return;
2042         global_debug = (ctx->debug == LIBUSB_LOG_LEVEL_DEBUG);
2043         if (!ctx->debug)
2044                 return;
2045         if (level == LIBUSB_LOG_LEVEL_WARNING && ctx->debug < LIBUSB_LOG_LEVEL_WARNING)
2046                 return;
2047         if (level == LIBUSB_LOG_LEVEL_INFO && ctx->debug < LIBUSB_LOG_LEVEL_INFO)
2048                 return;
2049         if (level == LIBUSB_LOG_LEVEL_DEBUG && ctx->debug < LIBUSB_LOG_LEVEL_DEBUG)
2050                 return;
2051 #endif
2052
2053 #ifdef __ANDROID__
2054         int prio;
2055         switch (level) {
2056         case LOG_LEVEL_INFO:
2057                 prio = ANDROID_LOG_INFO;
2058                 break;
2059         case LOG_LEVEL_WARNING:
2060                 prio = ANDROID_LOG_WARN;
2061                 break;
2062         case LOG_LEVEL_ERROR:
2063                 prio = ANDROID_LOG_ERROR;
2064                 break;
2065         case LOG_LEVEL_DEBUG:
2066                 prio = ANDROID_LOG_DEBUG;
2067                 break;
2068         default:
2069                 prio = ANDROID_LOG_UNKNOWN;
2070                 break;
2071         }
2072
2073         __android_log_vprint(prio, "LibUsb", format, args);
2074 #else
2075         usbi_gettimeofday(&now, NULL);
2076         if ((global_debug) && (!has_debug_header_been_displayed)) {
2077                 has_debug_header_been_displayed = 1;
2078                 usbi_log_str(ctx, "[timestamp] [threadID] facility level [function call] <message>\n");
2079                 usbi_log_str(ctx, "--------------------------------------------------------------------------------\n");
2080         }
2081         if (now.tv_usec < timestamp_origin.tv_usec) {
2082                 now.tv_sec--;
2083                 now.tv_usec += 1000000;
2084         }
2085         now.tv_sec -= timestamp_origin.tv_sec;
2086         now.tv_usec -= timestamp_origin.tv_usec;
2087
2088         switch (level) {
2089         case LIBUSB_LOG_LEVEL_INFO:
2090                 prefix = "info";
2091                 break;
2092         case LIBUSB_LOG_LEVEL_WARNING:
2093                 prefix = "warning";
2094                 break;
2095         case LIBUSB_LOG_LEVEL_ERROR:
2096                 prefix = "error";
2097                 break;
2098         case LIBUSB_LOG_LEVEL_DEBUG:
2099                 prefix = "debug";
2100                 break;
2101         case LIBUSB_LOG_LEVEL_NONE:
2102                 break;
2103         default:
2104                 prefix = "unknown";
2105                 break;
2106         }
2107
2108         if (global_debug) {
2109                 header_len = snprintf(buf, sizeof(buf),
2110                         "[%2d.%06d] [%08x] libusbx: %s [%s] ",
2111                         (int)now.tv_sec, (int)now.tv_usec, usbi_get_tid(), prefix, function);
2112         } else {
2113                 header_len = snprintf(buf, sizeof(buf),
2114                         "libusbx: %s [%s] ", prefix, function);
2115         }
2116
2117         if (header_len < 0 || header_len >= sizeof(buf)) {
2118                 /* Somehow snprintf failed to write to the buffer,
2119                  * remove the header so something useful is output. */
2120                 header_len = 0;
2121         }
2122         /* Make sure buffer is NUL terminated */
2123         buf[header_len] = '\0';
2124         text_len = vsnprintf(buf + header_len, sizeof(buf) - header_len,
2125                 format, args);
2126         if (text_len < 0 || text_len + header_len >= sizeof(buf)) {
2127                 /* Truncated log output. On some platforms a -1 return value means
2128                  * that the output was truncated. */
2129                 text_len = sizeof(buf) - header_len;
2130         }
2131         if (header_len + text_len + sizeof(USBI_LOG_LINE_END) >= sizeof(buf)) {
2132                 /* Need to truncate the text slightly to fit on the terminator. */
2133                 text_len -= (header_len + text_len + sizeof(USBI_LOG_LINE_END)) - sizeof(buf);
2134         }
2135         strcpy(buf + header_len + text_len, USBI_LOG_LINE_END);
2136
2137         usbi_log_str(ctx, buf);
2138 #endif
2139 }
2140
2141 void usbi_log(struct libusb_context *ctx, enum libusb_log_level level,
2142         const char *function, const char *format, ...)
2143 {
2144         va_list args;
2145
2146         va_start (args, format);
2147         usbi_log_v(ctx, level, function, format, args);
2148         va_end (args);
2149 }
2150
2151 /** \ingroup misc
2152  * Returns a constant NULL-terminated string with the ASCII name of a libusbx
2153  * error or transfer status code. The caller must not free() the returned
2154  * string.
2155  *
2156  * \param error_code The \ref libusb_error or libusb_transfer_status code to
2157  * return the name of.
2158  * \returns The error name, or the string **UNKNOWN** if the value of
2159  * error_code is not a known error / status code.
2160  */
2161 DEFAULT_VISIBILITY const char * LIBUSB_CALL libusb_error_name(int error_code)
2162 {
2163         switch (error_code) {
2164         case LIBUSB_ERROR_IO:
2165                 return "LIBUSB_ERROR_IO";
2166         case LIBUSB_ERROR_INVALID_PARAM:
2167                 return "LIBUSB_ERROR_INVALID_PARAM";
2168         case LIBUSB_ERROR_ACCESS:
2169                 return "LIBUSB_ERROR_ACCESS";
2170         case LIBUSB_ERROR_NO_DEVICE:
2171                 return "LIBUSB_ERROR_NO_DEVICE";
2172         case LIBUSB_ERROR_NOT_FOUND:
2173                 return "LIBUSB_ERROR_NOT_FOUND";
2174         case LIBUSB_ERROR_BUSY:
2175                 return "LIBUSB_ERROR_BUSY";
2176         case LIBUSB_ERROR_TIMEOUT:
2177                 return "LIBUSB_ERROR_TIMEOUT";
2178         case LIBUSB_ERROR_OVERFLOW:
2179                 return "LIBUSB_ERROR_OVERFLOW";
2180         case LIBUSB_ERROR_PIPE:
2181                 return "LIBUSB_ERROR_PIPE";
2182         case LIBUSB_ERROR_INTERRUPTED:
2183                 return "LIBUSB_ERROR_INTERRUPTED";
2184         case LIBUSB_ERROR_NO_MEM:
2185                 return "LIBUSB_ERROR_NO_MEM";
2186         case LIBUSB_ERROR_NOT_SUPPORTED:
2187                 return "LIBUSB_ERROR_NOT_SUPPORTED";
2188         case LIBUSB_ERROR_OTHER:
2189                 return "LIBUSB_ERROR_OTHER";
2190
2191         case LIBUSB_TRANSFER_ERROR:
2192                 return "LIBUSB_TRANSFER_ERROR";
2193         case LIBUSB_TRANSFER_TIMED_OUT:
2194                 return "LIBUSB_TRANSFER_TIMED_OUT";
2195         case LIBUSB_TRANSFER_CANCELLED:
2196                 return "LIBUSB_TRANSFER_CANCELLED";
2197         case LIBUSB_TRANSFER_STALL:
2198                 return "LIBUSB_TRANSFER_STALL";
2199         case LIBUSB_TRANSFER_NO_DEVICE:
2200                 return "LIBUSB_TRANSFER_NO_DEVICE";
2201         case LIBUSB_TRANSFER_OVERFLOW:
2202                 return "LIBUSB_TRANSFER_OVERFLOW";
2203
2204         case 0:
2205                 return "LIBUSB_SUCCESS / LIBUSB_TRANSFER_COMPLETED";
2206         default:
2207                 return "**UNKNOWN**";
2208         }
2209 }
2210
2211 /** \ingroup misc
2212  * Returns a pointer to const struct libusb_version with the version
2213  * (major, minor, micro, nano and rc) of the running library.
2214  */
2215 DEFAULT_VISIBILITY
2216 const struct libusb_version * LIBUSB_CALL libusb_get_version(void)
2217 {
2218         return &libusb_version_internal;
2219 }