MIDI::RtMidi::FFI::Device - OO interface for MIDI::RtMidi::FFI
version 0.01
use MIDI::RtMidi::FFI::Device; my $device = MIDI::RtMidi::FFI::Device->new; $device->open_virtual_port( 'perl-rtmidi' ); $device->send_event( note_on => 0, 0, 0x40, 0x5a ); sleep 1; $device->send_event( note_off => 0, 0, 0x40, 0x5a );
MIDI::RtMidi::FFI::Device is an OO interface for MIDI::RtMidi::FFI to help you manage devices, ports and MIDI events.
my $device = MIDI::RtMidi::FFI::Device->new( %attributes );
Returns a new MIDI::RtMidi::FFI::Device object. Valid attributes:
type - Device type : 'in' or 'out' (defaults to 'out')
name - Device name
queue_size_limit - (Type 'in' only) The buffer size to allocate for queueing incoming messages (defaults to 1024)
bufsize - (Type 'in' only) An alias for queue_size_limit.
ignore_sysex - (Type 'in' only) Ignore incoming SYSEX messages (defaults to true)
ignore_timing - (Type 'in' only) Ignore incoming timing messages (defaults to true)
ignore_sensing - (Type 'in' only) Ignore incoming active sensing messages (defaults to true)
_skip_free - A hack to prevent memory errors when a device is being cleaned up. Skips free() (defaults to false)
free()
warn $device->msg unless $device->ok;
Getters for RtMidiWrapper device struct members
$device->open_virtual_port( $name );
Open a virtual device port.
This method will not work on Windows.
$device->open_port( $port, $name );
Open a port.
$device->get_ports_by_name( $name ); $device->get_ports_by_name( qr/name/ );
Returns a list of ports matching the supplied name criteria.
$device->open_port_by_name( $name ); $device->open_port_by_name( qr/name/ ); $device->open_port_by_name( [ $name, $othername, qr/anothername/ ] );
Opens the first port found matching the supplied name criteria.
$device->close_port();
Closes the currently open port
$device->get_port_count();
Return the number of available MIDI ports to connect to.
$self->get_port_name( $port );
Returns the name of the supplied port number.
$self->get_current_api();
Returns the MIDI API in use for the device.
This is a RtMidiApi constant.
Here be dragons.
$device->set_callback( sub { my ( $ts, $msg, $data ); # handle $msg here }, $data );
Type 'in' only. Sets a callback to be executed when an incoming message is received. Your callback receives the timestamp of the event, the message, and optionally some data you set while defining the callback. This data should be a simple scalar string, not a reference or other data structure.
In my experience, receiving a message on your device while a callback is in progress results in a crash.
Depending on the message rate your application expects, this may be OK.
$device->cancel_callback();
Type 'in' only. Removes the callback from your device.
$device->ignore_types( $ignore_sysex, $ignore_timing, $ignore_sensing ); $device->ignore_types( (1)x3 );
Type 'in' only. Set message types to ignore.
$device->get_message();
Type 'in' only. Gets the next message from the queue, if available.
$device->send_message( $msg );
Type 'out' only. Sends a message to the open port.
$device->send_event( @event ); $device->send_event( note_on => 0, 0, 0x40, 0x5a );
Type 'out' only. Sends a MIDI::Event encoded message to the open port.
The callback mechanism for handling incoming events is useful. It would be nice if it were more robust.
I've found this is only required for certain builds of librtmidi v3.0.0, but not requiring it at all would be better.
RtMidi
MIDI::RtMidi::FFI
MIDI::Event
John Barrett, <john@jbrt.org>
https://github.com/jbarrett/MIDI-RtMidi-FFI
All comments and contributions welcome.
Please direct all requests to https://github.com/jbarrett/MIDI-RtMidi-FFI/issues
Copyright 2019 John Barrett.
This application is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install MIDI::RtMidi::FFI, copy and paste the appropriate command in to your terminal.
cpanm
cpanm MIDI::RtMidi::FFI
CPAN shell
perl -MCPAN -e shell install MIDI::RtMidi::FFI
For more information on module installation, please visit the detailed CPAN module installation guide.