wm: infra

ref: 86611da1a62c3303335b35be4e753dcecf029431
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}
}