The usb-safe package
The usb library provides a standard Haskell abstracting layer over bindings-libusb providing: abstract types instead of Ptrs, automatic marshalling and unmarshalling, automatic garbage collection, exceptions instead of integer return codes, etc..
While all that is very nice there are still some things that you can do wrong. For example doing I/O with a closed device or reading from or writing to an endpoint which doesn't belong to the claimed interface. Or reading from an Out endpoint or writing to an In endpoint.
usb-safe provides the following guarantees:
You can't reference handles to devices that are closed. In other words: no I/O with closed handles is possible.
The programmer specifies the region in which devices should remain open. On exit from the region the opened devices are automatically closed.
You can't reference handles to configurations that have not been set.
You can't reference handles to interfaces that have not been claimed.
You can't reference handles to alternates that have not been set.
You can't reference endpoints that don't belong to a setted alternate.
You can't read from an endpoint with an Out transfer direction.
You can't write to an endpoint with an In transfer direction.
You can't read from or write to endpoints with the unsupported transfer types Control and Isochronous. Only I/O with endpoints with the Bulk and Interrupt transfer types is allowed.
The primary technique used in usb-safe is called "Lightweight monadic regions" which was invented by Oleg Kiselyov and Chung-chieh Shan. See:
|Versions||0.1, 0.2, 0.3, 0.4, 0.4.1, 0.5, 0.5.1, 0.5.1.1, 0.6, 0.7, 0.8, 0.9, 0.10, 0.11, 0.11.0.1, 0.11.0.2, 0.12, 0.13, 0.14|
|Dependencies||base (≥4 & <4.2), bytestring (0.9.*), MonadCatchIO-transformers (0.0.2.*), monads-fd (0.0.*), transformers (≥0.1.4 & <0.2), unicode-symbols (0.1.*), usb (0.3.*)|
|Copyright||2009 Bas van Dijk|
|Author||Bas van Dijk|
|Maintainer||Bas van Dijk <firstname.lastname@example.org>|
|Source repository||darcs get http://code.haskell.org/~basvandijk/code/usb-safe|
|Upload date||Wed Dec 9 14:43:25 UTC 2009|
|Build failure||ghc-6.12 (log), ghc-7.4 (log)|