int main(int argc, char **argv)
{
int rn = BUFF_SZ, sn;
int fd, s;
char buf[BUFF_SZ];
s = open_client(PORT_NUMBER, "localhost");
while (1) {
printf("Pid=%d client ready %s %d, socket %d\n",
getpid(), HOST_IP, PORT_NUMBER, s);
while (rn > 0) {
//rn = read(0, buf, BUFF_SZ);
memset(buf, 0, BUFF_SZ);
scanf("%s", buf);
rn = strnlen(buf, BUFF_SZ);
fprintf(stderr, "Writing to socket\n");
sn = write(s, buf, rn);
fprintf(stderr, "Reading fronm socket\n");
rn = read(s, buf, rn);
rn = write(1, buf, rn);
ASSERT(rn == sn);
}
if (rn < 0) {
perror("read() failed: ");
close(s);
exit(errno);
}
}
close(fd);
return 0;
}
int init_alsa(ALSA_SEQ* seq, unsigned char verbose)
{
if ( verbose) printf("Setting up alsa\n");
seq->g_seq = open_client();
if (seq->g_seq == NULL) {
if ( verbose >= 0) printf("Error: open_client failed.\n");
return 0;
}
int my_client_id = snd_seq_client_id(seq->g_seq);
seq->g_port = my_new_port(seq->g_seq);
if ( verbose) printf("client:port = %i:%i\n", my_client_id, seq->g_port);
program_change(seq->g_seq, seq->g_port, 9, 0);
int ret = 1;
notedown_alsa((void*)seq, 9, 57, 55);
if ( verbose) printf("Returning %i\n", ret);
return ret;
}
/** main
*
*/
int
main ( int argc, char **argv )
{
fprintf( stderr, "lsmi-joystick" " v" VERSION "\n" );
get_args( argc, argv );
fprintf( stderr, "Registering MIDI port...\n" );
seq = open_client( CLIENT_NAME );
if ( NULL == seq )
{
fprintf( stderr, "Error opening alsa sequencer!\n" );
exit( 1 );
}
if ( ( port = open_output_port( seq ) ) < 0 )
{
fprintf( stderr, "Error opening MIDI output port!\n" );
exit( 1 );
}
if ( sub_name )
{
snd_seq_addr_t addr;
if ( snd_seq_parse_address( seq, &addr, sub_name ) < 0 )
fprintf( stderr, "Couldn't parse address '%s'", sub_name );
else
if ( snd_seq_connect_to( seq, port, addr.client, addr.port ) < 0 )
{
fprintf( stderr, "Error creating subscription for port %i:%i", addr.client, addr.port );
exit( 1 );
}
}
if ( daemonize )
{
printf( "Running as daemon...\n" );
if ( fork() )
exit( 0 );
else
{
fclose( stdout );
fclose( stderr );
}
}
fprintf( stderr, "Initializing joystick...\n" );
if ( -1 == ( jfd = open( joydevice, O_RDONLY ) ) )
{
fprintf( stderr, "Error opening event interface! (%s)\n", strerror( errno ) );
clean_up();
exit(1);
}
set_traps();
fprintf( stderr, "Waiting for events...\n" );
for ( ;; )
{
struct js_event e;
snd_seq_event_t ev;
static int b1;
static int b2;
read (jfd, &e, sizeof(struct js_event));
snd_seq_ev_clear( &ev );
switch (e.type)
{
case JS_EVENT_BUTTON:
switch (e.number)
{
case 0:
if(e.value)
b1 = 1;
else
{
b1 = 0;
snd_seq_ev_set_pitchbend( &ev, channel, 0 );
send_event( &ev );
}
break;
case 1:
if (e.value)
b2 = 1;
else
{
b2 = 0;
snd_seq_ev_set_controller( &ev, channel, 1, 0 );
send_event( &ev );
snd_seq_ev_set_controller( &ev, channel, 33, 0 );
send_event( &ev );
}
break;
}
break;
case JS_EVENT_AXIS:
if ( e.number == 1 && ( b1 || nohold ) )
{
snd_seq_ev_set_pitchbend( &ev, channel, 0 - (int)((e.value) * ((float)8191/32767) ));
send_event( &ev );
}
else
if ( ( e.number == 1 && b2 ) ||
( e.number == 0 && ( ( b1 && b2 ) || nohold ) )
)
{
int fine = (int)((0 - e.value) + 32767) * ((float)16383/65534);
int course = fine >> 7;
fine &= 0x7F;
snd_seq_ev_set_controller( &ev, channel, 1, course );
send_event( &ev );
snd_seq_ev_set_controller( &ev, channel, 33, fine );
send_event( &ev );
}
break;
default:
break;
}
}
/** main
*
*/
int
main ( int argc, char **argv )
{
snd_seq_event_t ev;
struct input_event iev;
snd_seq_addr_t addr;
fprintf( stderr, "lsmi-mouse" " v" VERSION "\n" );
get_args( argc, argv );
fprintf( stderr, "Initializing mouse interface...\n" );
if ( -1 == ( fd = open( device, O_RDONLY ) ) )
{
fprintf( stderr, "Error opening event interface! (%s)\n", strerror( errno ) );
exit(1);
}
init_mouse();
fprintf( stderr, "Registering MIDI port...\n" );
seq = open_client( CLIENT_NAME );
port = open_output_port( seq );
if ( sub_name )
{
if ( snd_seq_parse_address( seq, &addr, sub_name ) < 0 )
fprintf( stderr, "Couldn't parse address '%s'", sub_name );
else
if ( snd_seq_connect_to( seq, port, addr.client, addr.port ) < 0 )
{
fprintf( stderr, "Error creating subscription for port %i:%i", addr.client, addr.port );
exit( 1 );
}
}
if ( daemonize )
{
printf( "Running as daemon...\n" );
if ( fork() )
exit( 0 );
else
{
fclose( stdout );
fclose( stderr );
}
}
set_traps();
fprintf( stderr, "Waiting for packets...\n" );
for ( ;; )
{
int i;
read( fd, &iev, sizeof( iev ) );
if ( iev.type != EV_KEY )
continue;
switch ( iev.code )
{
case BTN_LEFT: i = 0; break;
case BTN_MIDDLE: i = 1; break;
case BTN_RIGHT: i = 2; break;
break;
default:
continue;
break;
}
snd_seq_ev_clear( &ev );
switch ( ev.type = map[i].ev_type )
{
case SND_SEQ_EVENT_CONTROLLER:
snd_seq_ev_set_controller( &ev, map[i].channel,
map[i].number,
iev.value == DOWN ? 127 : 0 );
break;
case SND_SEQ_EVENT_NOTEON:
snd_seq_ev_set_noteon( &ev, map[i].channel,
map[i].number,
iev.value == DOWN ? 127 : 0 );
break;
default:
fprintf( stderr,
"Internal error: invalid mapping!\n" );
continue;
break;
}
send_event( &ev );
}
}
/** main
*
*/
int
main ( int argc, char **argv )
{
int keys = 0;
int mc_offset = 0;
snd_seq_event_t ev;
int patch = 0;
int bank = 0;
fprintf( stderr, "lsmi-keyhack" " v" VERSION "\n" );
get_args( argc, argv );
fprintf( stderr, "Registering MIDI port...\n" );
seq = open_client( CLIENT_NAME );
if ( NULL == seq )
{
fprintf( stderr, "Error opening alsa sequencer!\n" );
exit( 1 );
}
if ( ( port = open_output_port( seq ) ) < 0 )
{
fprintf( stderr, "Error opening MIDI output port!\n" );
exit( 1 );
}
if ( sub_name )
{
snd_seq_addr_t addr;
if ( snd_seq_parse_address( seq, &addr, sub_name ) < 0 )
fprintf( stderr, "Couldn't parse address '%s'", sub_name );
else if ( snd_seq_connect_to( seq, port, addr.client, addr.port ) <
0 )
{
fprintf( stderr, "Error creating subscription for port %i:%i",
addr.client, addr.port );
exit( 1 );
}
}
fprintf( stderr, "Initializing keyboard...\n" );
if ( -1 == ( fd = open( device, O_RDWR ) ) )
{
fprintf( stderr, "Error opening event interface! (%s)\n",
strerror( errno ) );
exit( 1 );
}
init_keyboard();
set_traps();
update_leds();
fprintf( stderr, "Opening database...\n" );
if ( database == defaultdatabase )
{
char *home = getenv( "HOME" );
database = malloc( strlen( home ) + strlen( defaultdatabase ) + 2 );
sprintf( database, "%s/%s", home, defaultdatabase );
}
if ( -1 == open_database( database ) )
{
fprintf( stderr, "******Key database missing or invalid******\n"
"Entering learning mode...\n"
"Make sure your \"keyboard\" device is connected!\n" );
learn_mode();
}
analyze_map( &keys, &mc_offset );
octave_min = ( mc_offset / 12 ) + 1;
octave_max = 9 - ( ( keys - mc_offset ) / 12 );
fprintf( stderr,
"%i keys, middle C is %ith from the left, lowest MIDI octave == %i, highest, %i\n",
keys, mc_offset + 1, octave_min, octave_max );
fprintf( stderr, "Waiting for events...\n" );
for ( ;; )
{
int keyi, newstate;
keyi = get_keypress( &newstate );
snd_seq_ev_clear( &ev );
if ( map[keyi].control )
{
snd_seq_event_t e;
if ( newstate == UP )
continue;
switch ( map[keyi].control )
{
/* All notes off */
snd_seq_ev_set_controller( &ev, channel, 123, 0 );
send_event( &ev );
snd_seq_ev_clear( &ev );
case CKEY_EXIT:
fprintf( stderr, "Exiting...\n" );
if ( close_database( database ) < 0 )
fprintf( stderr, "Error saving database!\n" );
clean_up();
exit( 0 );
case CKEY_MODE:
prog_mode =
prog_mode + 1 >
NUM_PROG_MODES - 1 ? 0 : prog_mode + 1;
fprintf( stderr, "Input mode change to %s\n",
mode_names[prog_mode] );
update_leds();
break;
case CKEY_OCTAVE_DOWN:
octave = min( octave - 1, octave_min );
break;
case CKEY_OCTAVE_UP:
octave = max( octave + 1, octave_max );
break;
case CKEY_CHANNEL_DOWN:
channel = min( channel - 1, 0 );
break;
case CKEY_CHANNEL_UP:
channel = max( channel + 1, 15 );
break;
case CKEY_PATCH_DOWN:
if ( patch == 0 && bank > 0 )
{
bank = min( bank - 1, 0 );
patch = 127;
snd_seq_ev_set_controller( &e, channel, 0, bank );
send_event( &e );
}
else
patch = min( patch - 1, 0 );
snd_seq_ev_set_pgmchange( &ev, channel, patch );
break;
case CKEY_PATCH_UP:
if ( patch == 127 && bank < 127 )
{
bank = max( bank + 1, 127 );
patch = 0;
snd_seq_ev_set_controller( &e, channel, 0, bank );
send_event( &e );
}
else
patch = max( patch + 1, 127 );
snd_seq_ev_set_pgmchange( &ev, channel, patch );
break;
case CKEY_NUMERIC:
{
struct timeval tv;
gettimeofday( &tv, NULL );
/* Timeout in 5 secs */
if ( tv.tv_sec - timeout.tv_sec >= 5 )
{
prog_index = 0;
}
timeout = tv;
if ( prog_index == 0 )
printf( "INPUT %s #: ", mode_names[prog_mode] );
}
prog_buf[prog_index++] = 48 + map[keyi].number;
printf( "%i", map[keyi].number );
fflush( stdout );
if ( prog_index == 2 && prog_mode == CHANNEL )
{
/* FIXME: all notes off->channel */
prog_buf[++prog_index] = '\0';
channel = atoi( prog_buf );
channel = max( channel, 15 );
prog_index = 0;
printf( " ENTER\n" );
}
else if ( prog_index == 3 )
{
prog_buf[++prog_index] = '\0';
switch ( prog_mode )
{
case PATCH:
patch = atoi( prog_buf );
patch = max( patch, 127 );
snd_seq_ev_set_pgmchange( &ev, channel,
patch );
break;
case BANK:
bank = atoi( prog_buf );
bank = max( bank, 127 );
snd_seq_ev_set_controller( &ev, channel, 0,
bank );
break;
default:
fprintf( stderr, "Internal error!\n" );
}
prog_index = 0;
printf( " ENTER\n" );
}
break;
default:
fprintf( stderr, "Internal error!\n" );
}
send_event( &ev );
continue;
}
else
switch ( map[keyi].ev_type )
{
case SND_SEQ_EVENT_CONTROLLER:
snd_seq_ev_set_controller( &ev, channel,
map[keyi].number,
newstate == DOWN ? 127 : 0 );
break;
case SND_SEQ_EVENT_NOTE:
if ( newstate == DOWN )
snd_seq_ev_set_noteon( &ev, channel,
map[keyi].number +
( 12 * octave ), 64 );
else
snd_seq_ev_set_noteoff( &ev, channel,
map[keyi].number +
( 12 * octave ), 64 );
break;
default:
fprintf( stderr, "Key has invalid mapping!\n" );
break;
}
send_event( &ev );
}
}
