wm: infra

Info  •  Files  •  Log  •  Branches

getaudio: import

--- /dev/null

+++ b/getaudio

@@ -1,0 +1,13 @@

+#!/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

+

+hget -o $file $url && {echo $url >> $plist && audio/mkplist $file >> $plist}

--- a/mkfile

+++ b/mkfile

@@ -5,7 +5,8 @@

 RC=\

 	newuser\

-	pasted

+	pasted\

+	getaudio

 </sys/src/cmd/mkmany