wm: infra

ref: 5f392fec7dd509cf62d55e3b53faf6675f32f8de
dir: /getaudio/

View raw version 
#!/bin/rc
# to download songs and store their metadata

if(! ~ $#* 1){
	echo 'usage: wm/getaudio url' >[1=2]
	exit usage
}

url = $1
file = `{basename $1}
plist = ./plist
if(! test -f $file){
	hget -o $file $url && {echo $url >> $plist && audio/mkplist $file >> $plist}
}