Blame test/rawmidi.c

Packit Service db8eaa
#include <stdio.h>
Packit Service db8eaa
#include <stdlib.h>
Packit Service db8eaa
#include <ctype.h>
Packit Service db8eaa
#include "../include/asoundlib.h"
Packit Service db8eaa
#include <signal.h>
Packit Service db8eaa
Packit Service db8eaa
static void usage(void)
Packit Service db8eaa
{
Packit Service db8eaa
	fprintf(stderr, "usage: rawmidi [options]\n");
Packit Service db8eaa
	fprintf(stderr, "  options:\n");
Packit Service db8eaa
	fprintf(stderr, "    -v: verbose mode\n");
Packit Service db8eaa
	fprintf(stderr, "    -i device-id : test ALSA input device\n");
Packit Service db8eaa
	fprintf(stderr, "    -o device-id : test ALSA output device\n");
Packit Service db8eaa
	fprintf(stderr, "    -I node      : test input node\n");
Packit Service db8eaa
	fprintf(stderr, "    -O node      : test output node\n");
Packit Service db8eaa
	fprintf(stderr, "    -t: test midi thru\n");
Packit Service db8eaa
	fprintf(stderr, "  example:\n");
Packit Service db8eaa
	fprintf(stderr, "    rawmidi -i hw:0,0 -O /dev/midi1\n");
Packit Service db8eaa
	fprintf(stderr, "    tests input for card 0, device 0, using snd_rawmidi API\n");
Packit Service db8eaa
	fprintf(stderr, "    and /dev/midi1 using file descriptors\n");
Packit Service db8eaa
}
Packit Service db8eaa
Packit Service db8eaa
int stop=0;
Packit Service db8eaa
Packit Service db8eaa
void sighandler(int dum)
Packit Service db8eaa
{
Packit Service db8eaa
	stop=1;
Packit Service db8eaa
}
Packit Service db8eaa
Packit Service db8eaa
int main(int argc,char** argv)
Packit Service db8eaa
{
Packit Service db8eaa
	int i;
Packit Service db8eaa
	int err;
Packit Service db8eaa
	int thru=0;
Packit Service db8eaa
	int verbose = 0;
Packit Service db8eaa
	char *device_in = NULL;
Packit Service db8eaa
	char *device_out = NULL;
Packit Service db8eaa
	char *node_in = NULL;
Packit Service db8eaa
	char *node_out = NULL;
Packit Service db8eaa
	
Packit Service db8eaa
	int fd_in = -1,fd_out = -1;
Packit Service db8eaa
	snd_rawmidi_t *handle_in = 0,*handle_out = 0;
Packit Service db8eaa
	
Packit Service db8eaa
	if (argc==1) {
Packit Service db8eaa
		usage();
Packit Service db8eaa
		exit(0);
Packit Service db8eaa
	}
Packit Service db8eaa
	
Packit Service db8eaa
	for (i = 1 ; i
Packit Service db8eaa
		if (argv[i][0]=='-') {
Packit Service db8eaa
			switch (argv[i][1]) {
Packit Service db8eaa
				case 'h':
Packit Service db8eaa
					usage();
Packit Service db8eaa
					break;
Packit Service db8eaa
				case 'v':
Packit Service db8eaa
					verbose = 1;
Packit Service db8eaa
					break;
Packit Service db8eaa
				case 't':
Packit Service db8eaa
					thru = 1;
Packit Service db8eaa
					break;
Packit Service db8eaa
				case 'i':
Packit Service db8eaa
					if (i + 1 < argc)
Packit Service db8eaa
						device_in = argv[++i];
Packit Service db8eaa
					break;
Packit Service db8eaa
				case 'I':
Packit Service db8eaa
					if (i + 1 < argc)
Packit Service db8eaa
						node_in = argv[++i];
Packit Service db8eaa
					break;
Packit Service db8eaa
				case 'o':
Packit Service db8eaa
					if (i + 1 < argc)
Packit Service db8eaa
						device_out = argv[++i];
Packit Service db8eaa
					break;
Packit Service db8eaa
				case 'O':
Packit Service db8eaa
					if (i + 1 < argc)
Packit Service db8eaa
						node_out = argv[++i];
Packit Service db8eaa
					break;
Packit Service db8eaa
			}			
Packit Service db8eaa
		}
Packit Service db8eaa
	}
Packit Service db8eaa
Packit Service db8eaa
	if (verbose) {
Packit Service db8eaa
		fprintf(stderr,"Using: \n");
Packit Service db8eaa
		fprintf(stderr,"Input: ");
Packit Service db8eaa
		if (device_in) {
Packit Service db8eaa
			fprintf(stderr,"device %s\n",device_in);
Packit Service db8eaa
		}else if (node_in){
Packit Service db8eaa
			fprintf(stderr,"%s\n",node_in);	
Packit Service db8eaa
		}else{
Packit Service db8eaa
			fprintf(stderr,"NONE\n");
Packit Service db8eaa
		}
Packit Service db8eaa
		fprintf(stderr,"Output: ");
Packit Service db8eaa
		if (device_out) {
Packit Service db8eaa
			fprintf(stderr,"device %s\n",device_out);
Packit Service db8eaa
		}else if (node_out){
Packit Service db8eaa
			fprintf(stderr,"%s\n",node_out);		
Packit Service db8eaa
		}else{
Packit Service db8eaa
			fprintf(stderr,"NONE\n");
Packit Service db8eaa
		}
Packit Service db8eaa
	}
Packit Service db8eaa
	
Packit Service db8eaa
	if (device_in) {
Packit Service db8eaa
		err = snd_rawmidi_open(&handle_in,NULL,device_in,0);	
Packit Service db8eaa
		if (err) {
Packit Service db8eaa
			fprintf(stderr,"snd_rawmidi_open %s failed: %d\n",device_in,err);
Packit Service db8eaa
		}
Packit Service db8eaa
	}
Packit Service db8eaa
	if (node_in && (!node_out || strcmp(node_out,node_in))) {
Packit Service db8eaa
		fd_in = open(node_in,O_RDONLY);
Packit Service db8eaa
		if (fd_in<0) {
Packit Service db8eaa
			fprintf(stderr,"open %s for input failed\n",node_in);
Packit Service db8eaa
		}	
Packit Service db8eaa
	}
Packit Service db8eaa
Packit Service db8eaa
	signal(SIGINT,sighandler);
Packit Service db8eaa
Packit Service db8eaa
	if (device_out) {
Packit Service db8eaa
		err = snd_rawmidi_open(NULL,&handle_out,device_out,0);
Packit Service db8eaa
		if (err) {
Packit Service db8eaa
			fprintf(stderr,"snd_rawmidi_open %s failed: %d\n",device_out,err);
Packit Service db8eaa
		}
Packit Service db8eaa
	}
Packit Service db8eaa
	if (node_out && (!node_in || strcmp(node_out,node_in))) {
Packit Service db8eaa
		fd_out = open(node_out,O_WRONLY);		
Packit Service db8eaa
		if (fd_out<0) {
Packit Service db8eaa
			fprintf(stderr,"open %s for output failed\n",node_out);
Packit Service db8eaa
		}	
Packit Service db8eaa
	}
Packit Service db8eaa
Packit Service db8eaa
	if (node_in && node_out && strcmp(node_out,node_in)==0) {
Packit Service db8eaa
		fd_in = fd_out = open(node_out,O_RDWR);		
Packit Service db8eaa
		if (fd_out<0) {
Packit Service db8eaa
			fprintf(stderr,"open %s for input and output failed\n",node_out);
Packit Service db8eaa
		}		
Packit Service db8eaa
	}
Packit Service db8eaa
Packit Service db8eaa
Packit Service db8eaa
Packit Service db8eaa
	if (!thru) {
Packit Service db8eaa
		if (handle_in || fd_in!=-1) {
Packit Service db8eaa
			fprintf(stderr,"Read midi in\n");
Packit Service db8eaa
			fprintf(stderr,"Press ctrl-c to stop\n");
Packit Service db8eaa
		}
Packit Service db8eaa
Packit Service db8eaa
		if (handle_in) {
Packit Service db8eaa
			unsigned char ch;
Packit Service db8eaa
			while (!stop) {
Packit Service db8eaa
				snd_rawmidi_read(handle_in,&ch,1);
Packit Service db8eaa
				if (verbose) {
Packit Service db8eaa
					fprintf(stderr,"read %02x\n",ch);
Packit Service db8eaa
				}
Packit Service db8eaa
			}
Packit Service db8eaa
		}
Packit Service db8eaa
		if (fd_in!=-1) {
Packit Service db8eaa
			unsigned char ch;
Packit Service db8eaa
			while (!stop) {
Packit Service db8eaa
				read(fd_in,&ch,1);
Packit Service db8eaa
				if (verbose) {
Packit Service db8eaa
					fprintf(stderr,"read %02x\n",ch);
Packit Service db8eaa
				}
Packit Service db8eaa
			}	
Packit Service db8eaa
		}
Packit Service db8eaa
Packit Service db8eaa
		if (handle_out || fd_out!=-1) {
Packit Service db8eaa
			fprintf(stderr,"Writing note on / note off\n");
Packit Service db8eaa
		}
Packit Service db8eaa
Packit Service db8eaa
		if (handle_out) {
Packit Service db8eaa
			unsigned char ch;
Packit Service db8eaa
			ch=0x90; snd_rawmidi_write(handle_out,&ch,1);
Packit Service db8eaa
			ch=60;   snd_rawmidi_write(handle_out,&ch,1);
Packit Service db8eaa
			ch=100;  snd_rawmidi_write(handle_out,&ch,1);
Packit Service db8eaa
			snd_rawmidi_drain(handle_out);
Packit Service db8eaa
			sleep(1);
Packit Service db8eaa
			ch=0x90; snd_rawmidi_write(handle_out,&ch,1);
Packit Service db8eaa
			ch=60;   snd_rawmidi_write(handle_out,&ch,1);
Packit Service db8eaa
			ch=0;    snd_rawmidi_write(handle_out,&ch,1);
Packit Service db8eaa
			snd_rawmidi_drain(handle_out); 
Packit Service db8eaa
		}
Packit Service db8eaa
		if (fd_out!=-1) {
Packit Service db8eaa
			unsigned char ch;
Packit Service db8eaa
			ch=0x90; write(fd_out,&ch,1);
Packit Service db8eaa
			ch=60;   write(fd_out,&ch,1);
Packit Service db8eaa
			ch=100;  write(fd_out,&ch,1);
Packit Service db8eaa
			sleep(1);
Packit Service db8eaa
			ch=0x90; write(fd_out,&ch,1);
Packit Service db8eaa
			ch=60;   write(fd_out,&ch,1);
Packit Service db8eaa
			ch=0;    write(fd_out,&ch,1);
Packit Service db8eaa
		}
Packit Service db8eaa
	} else {
Packit Service db8eaa
		if ((handle_in || fd_in!=-1) && (handle_out || fd_out!=-1)) {
Packit Service db8eaa
			if (verbose) {
Packit Service db8eaa
				fprintf(stderr,"Testing midi thru in\n");
Packit Service db8eaa
			}
Packit Service db8eaa
			while (!stop) {
Packit Service db8eaa
				unsigned char ch;
Packit Service db8eaa
			
Packit Service db8eaa
				if (handle_in) {
Packit Service db8eaa
					snd_rawmidi_read(handle_in,&ch,1);
Packit Service db8eaa
				}
Packit Service db8eaa
				if (fd_in!=-1) {
Packit Service db8eaa
					read(fd_in,&ch,1);
Packit Service db8eaa
				}	
Packit Service db8eaa
				if (verbose) {
Packit Service db8eaa
					fprintf(stderr,"thru: %02x\n",ch);
Packit Service db8eaa
				}
Packit Service db8eaa
Packit Service db8eaa
				if (handle_out) {
Packit Service db8eaa
					snd_rawmidi_write(handle_out,&ch,1);
Packit Service db8eaa
					snd_rawmidi_drain(handle_out); 
Packit Service db8eaa
				}
Packit Service db8eaa
				if (fd_out!=-1) {
Packit Service db8eaa
					write(fd_out,&ch,1);
Packit Service db8eaa
				}
Packit Service db8eaa
			}
Packit Service db8eaa
		}else{
Packit Service db8eaa
				fprintf(stderr,"Testing midi thru needs both input and output\n");		
Packit Service db8eaa
				exit(-1);
Packit Service db8eaa
		}
Packit Service db8eaa
	}
Packit Service db8eaa
Packit Service db8eaa
	if (verbose) {
Packit Service db8eaa
		fprintf(stderr,"Closing\n");
Packit Service db8eaa
	}
Packit Service db8eaa
	
Packit Service db8eaa
	if (handle_in) {
Packit Service db8eaa
		snd_rawmidi_drain(handle_in); 
Packit Service db8eaa
		snd_rawmidi_close(handle_in);	
Packit Service db8eaa
	}
Packit Service db8eaa
	if (handle_out) {
Packit Service db8eaa
		snd_rawmidi_drain(handle_out); 
Packit Service db8eaa
		snd_rawmidi_close(handle_out);	
Packit Service db8eaa
	}
Packit Service db8eaa
	if (fd_in!=-1) {
Packit Service db8eaa
		close(fd_in);
Packit Service db8eaa
	}
Packit Service db8eaa
	if (fd_out!=-1) {
Packit Service db8eaa
		close(fd_out);
Packit Service db8eaa
	}
Packit Service db8eaa
Packit Service db8eaa
	return 0;
Packit Service db8eaa
}