shithub: rc

Info  •  Files  •  Log  •  Branches

gibmehrcinap: fix hang and add lazily exceptions to filtering

--- a/bin/gibmehrcinap

+++ b/bin/gibmehrcinap

@@ -1,11 +1,18 @@

 #!/bin/rc

 hget http://felloff.net/usr/cinap_lenrek/music \

 	| awk '

+BEGIN{

+	excl["quality83"] = 1

+}

 /mp3/{

 	sub(".*<a href=\"","")

 	sub("\">.*\.mp3</a>","")

 	s = $1

 	sub("\.mp3$", "")

+	if($0 in excl){

+		h["excl" $1] = s

+		next

+	}

 	if($1 ~ /[^0-9][0-9]+$/)

 		sub("[0-9]+$", "")

 	d[$1] = d[$1] " " h[$1]

@@ -26,4 +33,5 @@

 	}

 }

 ' >list

-{tee list | xargs -n 256 dw} && rm list

+cat list

+{<list xargs -n 256 dw} && rm list