| Copyright | Kiwamu Okabe Ivan Perez and the cwiid team |
|---|---|
| License | GPL-2 |
| Maintainer | ivan.perez@keera.co.uk |
| Stability | experimental |
| Portability | unknown |
| Safe Haskell | Safe |
| Language | Haskell98 |
System.CWiid
Description
Bindings for the cwiid library, a working userspace driver along with various applications implementing event drivers, multiple Wiimote connectivity, gesture recognition, and other Wiimote-based functionality.
The current implementation is rather incomplete. In particular:
- Some Haskell functions (those related to rpt mode, rumble, leds) had hard-coded values in them. Therefore, they implemented only a very partial interface to their C counterparts. The new versions should be tested and, if any other function is like this, then exported properly.
- Not all functions/wiimote fields are accessible. In particular, acceleromoter and IR is in testing stage. Nunchuck, calibration, wiimote plus are not handled at all (but will be in the future).
All in all, the code works quite well and is currently being used to implement several real games.
- cwiidOpen :: IO (Maybe CWiidWiimote)
- data CWiidWiimote
- data CWiidState = CWiidState {}
- cwiidSetRptMode :: CWiidWiimote -> CUChar -> IO CInt
- data CWiidLedFlag
- cwiidLed1 :: CWiidLedFlag
- cwiidLed2 :: CWiidLedFlag
- cwiidLed3 :: CWiidLedFlag
- cwiidLed4 :: CWiidLedFlag
- cwiidSetLed :: CWiidWiimote -> CWiidLedFlag -> IO CInt
- combineCwiidLedFlag :: [CWiidLedFlag] -> CWiidLedFlag
- cwiidSetRumble :: CWiidWiimote -> CUChar -> IO CInt
- cwiidGetBtnState :: CWiidWiimote -> IO CWiidBtnFlag
- cwiidIsBtnPushed :: CWiidBtnFlag -> CWiidBtnFlag -> Bool
- cwiidBtn2 :: CWiidBtnFlag
- cwiidBtn1 :: CWiidBtnFlag
- cwiidBtnB :: CWiidBtnFlag
- cwiidBtnA :: CWiidBtnFlag
- cwiidBtnMinus :: CWiidBtnFlag
- cwiidBtnHome :: CWiidBtnFlag
- cwiidBtnLeft :: CWiidBtnFlag
- cwiidBtnRight :: CWiidBtnFlag
- cwiidBtnDown :: CWiidBtnFlag
- cwiidBtnUp :: CWiidBtnFlag
- cwiidBtnPlus :: CWiidBtnFlag
- combineCwiidBtnFlag :: [CWiidBtnFlag] -> CWiidBtnFlag
- diffCwiidBtnFlag :: CWiidBtnFlag -> CWiidBtnFlag -> CWiidBtnFlag
- newtype CWiidBtnFlag = CWiidBtnFlag {}
- cwiidGetAcc :: CWiidWiimote -> IO CWiidAcc
- newtype CWiidAcc = CWiidAcc {
- unCWiidAcc :: [Int]
- data CWiidIRSrc = CWiidIRSrc {}
- cwiidGetIR :: CWiidWiimote -> IO [CWiidIRSrc]
Initialization
cwiidOpen :: IO (Maybe CWiidWiimote) #
Try to establish a connection to any existing Wiimote using any existing bluetooth interface.
The function returns Nothing if there is no bluetooth interface
or if no wiimote can be located. If the connection succeeds,
a CWiidWiimote is returned (inside a Just), which can be used to
poll the wiimote using other functions.
There is a default timeout of 5 seconds.
- TODO: export cwiid_open_time and cwiid_close as well.
data CWiidWiimote #
A connection to an existing wiimote. Use cwiidOpen to
connect to a wiimote and obtain one of these.
State
data CWiidState #
The state of the wiimote. Use cwiidSetRptMode to enable/disable
sensors.
- FIXME: incomplete state
- FIXME: export get_state
Constructors
| CWiidState | |
Instances
Reception mode
cwiidSetRptMode :: CWiidWiimote -> CUChar -> IO CInt #
Enable/disable reception of certain sensors. Use 2 to enable buttons.
Leds
data CWiidLedFlag #
Instances
Flag with exactly led 1 enabled. Use combineCwiidLedFlag
to create flags with several leds enabled.
Flag with exactly led 2 enabled. Use combineCwiidLedFlag
to create flags with several leds enabled.
Flag with exactly led 2 enabled. Use combineCwiidLedFlag
to create flags with several leds enabled.
Flag with exactly led 4 enabled. Use combineCwiidLedFlag
to create flags with several leds enabled.
Led operations
cwiidSetLed :: CWiidWiimote -> CWiidLedFlag -> IO CInt #
Enable/disable certain leds.
Use cwiidLed1 .. cwiidLed4 together with combineCwiidLedFlag
to create a flag with just the leds you want enabled and change
all at once with one operation.
combineCwiidLedFlag :: [CWiidLedFlag] -> CWiidLedFlag #
Combine several led flags into one led flag with those leds enabled and all other leds disabled.
Rumble
cwiidSetRumble :: CWiidWiimote -> CUChar -> IO CInt #
Buttons
cwiidGetBtnState :: CWiidWiimote -> IO CWiidBtnFlag #
Returns a mask with the buttons that are currently pushed.
Arguments
| :: CWiidBtnFlag | The button flags as returned by |
| -> CWiidBtnFlag | A mask that flags the button/s that we want to check. |
| -> Bool |
Returns True if the button indicated by the flag is pushed,
False otherwise.
This is a pure function, so the first argument must be the
button flags as returned by cwiidGetBtnState.
combineCwiidBtnFlag :: [CWiidBtnFlag] -> CWiidBtnFlag #
Accelerometers
cwiidGetAcc :: CWiidWiimote -> IO CWiidAcc #
Obtain accelerometer information. FIXME: read wmgui/main.c:cwiid_acc(1119) to understand how to use this information, what else might need to be exported, and how to calibrate the accelerometers.
Array of accelerometer information. It will always contain exactly three elements.
- TODO: provide a more informative and restrictive interface with exactly three named Int (byte?) fields.
Constructors
| CWiidAcc | |
Fields
| |
Infra-red
data CWiidIRSrc #
Internal representation of an infrared point. You should no use it
unless you know what you are doing; use CWiidIR instead.
Constructors
| CWiidIRSrc | |
Fields
| |
Instances
cwiidGetIR :: CWiidWiimote -> IO [CWiidIRSrc] #