shithub: rc

ref: ffa46c0251c8856b4ca47c806446ffdbd65a6e6c
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
}