wm: infra

ref: 15ae03ea862fbd3bef2fcde9c34285f8b8e8311a
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}
}