#include <stdio.h>
#include <midi.h>
#include <dx7voice.h>
#include <ctype.h>

int Literal = 0;	/* if true, name string is unretouched */
#define e MidiError

Error(s) { e("%s: ", av0); perror(s); exit(1); }
use(){ e("Use: %s [-l] [dx7 voice files, or stdin]\n", av0); exit(1); }

char *
pname(s) char *s;{
	if (!Literal){
	   striptrailc(s,' ');
	   translate(s,' ','_');
	   strtolower(s);
	}
	printf("%s\n",s);
}

main(ac, av) char **av; {
	FILE *f, *fopen();
	Dx7Voice *v, *dx7ReadVoice(), *dx7readVoice();
	int i;

	for_each_argument{
	Case 'l': toggle(Literal);
	Default: use();
	}

	if (ac == 1){
		if (v = dx7readVoice(stdin,"stdin")) pname(v->name);
		else use();
	} else for (;i<ac;i++)
		if (v = dx7ReadVoice(av[i])) pname(v->name);
	exit(0);
}