shithub: rc

ref: 07c6cc69733990ab295b8b201e119150dfd696a0
dir: /bin/midipipe/

View raw version 
#!/bin/rc
rfork en

fn cleanup{
	rm -f /srv/midi
}
fn sigint{
	cleanup
	exit
}
fn sigexit{
	cleanup
}

r=()
if(~ $1 -r){
	r=1
	shift
}
rm -f /srv/midi
bind -a '#|' /mnt/midi
<>[3]/mnt/midi/data1 {
	echo 3 >/srv/midi
	if(! ~ $#r 0)
		cat /mnt/midi/data
	if not
		cat $* >/mnt/midi/data
}