music-0.9.x-testing (Duke-Nukem-Edition)

#!/bin/bash
#
#  Name : shoutcast2vdr 0.0.8-rev03
#
#  Author: Unimatrix0
#          riverphoenix - Ergänzungen für LinVDR
#          Viking       - Kleinere anpassungen, sortiertung, ausgabe, Genres geht jetzt mit leerzeichen (Top 40) etc.
# 
#  (ursprünglich von scgen 0.2 (geschrieben von "echto") "abgekupfert" (das meiste komplizierte Zeug ist noch von ihm)
#
#
#  Usage: Am shell promp ./shoutcast2vdr gefolgt von einem Genre und der Anzahl der Stream-Links die heruntergeladen werden sollen.
#  Beispiel shoutcast2vdr Trance 50
#  Holt 50 Streams die auf das Genre Trance (mehr oder weniger) passen sollten.
#  Es werden Unterordner für jedes Genre angelegt (outputdir/genre) und dafür noch eine m3u-playlist erstellt, die im Stammordner (outputdir) abgelegt wird.
#
#  Original vom Author von scgen 0.2:
#  This script is work in progress so use at your own risk.  A few live streams don't get
#  created and maybe I'll fix that later.  You might see the error below during execution.
# 
#  Heres a quick and dirty script to generate .pls files from the top 20 shoutcast streams
#
#  What you do with it from here is up to you.  This script could easily be modified.
#
#  Add the script to your cron jobs with 24 Hour intervals for a up to date list.
#
#  mv: when moving multiple files, last argument must be a directory
#  (/Zitatende)
#
#
#   Ja ähm, genau...selbiges gilt für mich. Das ist mein erster Gehversuch mit bash. Ich weiss also nicht, ob ich den Fehler finde, der verursacher dafür ist,
#   dass nicht ganz alle Streams im Ordner landen, die eigentlich müssten. Bei 100 gestesteten, waren es bei mir aber immerhin über 70, die "durch kamen".
#   Bei Unterstützung und insbesonderen Vorschlägen wäre ich ganz sicher nicht böse. 
#
#
#=================================================================================================================
#      To do:
#
#	1. Mal schaun, im Moment fällt mir nix mehr ein ausser zu sehen, ob das Ding wirklich tut was es soll.
#	2. Vorschläge ?
#
#=================================================================================================================
#  Revision:
#  0.0.8	- Fehler behoben der die Namen doppelt erscheinen liess
#		- Maxbitrate hinzugefügt (danke wilderigel!)
#  0.0.7	- Nun sollten auch sender mit mehr als einem Stream korrekt, mit allen Streams eingelesen werden.
#  0.0.6	- SVDRP-Send hinzugefügt
#  0.0.5	- Aufräumarbeiten, da war noch was zuviel drinn, naja und jetzt sind dafür viel Kommentare drinn...naja..es muss es ja keiner lesen *fg*
#  0.0.4	- Filenamen verschönerung
#  0.0.3	- Variabeln die per Kommandozeile übergeben werden $1 und $2  das erste für das Genre und das zweite für die Anzahl zu holender streams.
#  0.0.2	- Variabeln um das temp und outputdir angeben zu können.
#  0.0.1	- Das Teil macht was es soll, die wichtigsten Anpassungen für VDR sind gemacht.
#=================================================================================================================
# 
# Variabeln
#=================================================================================================================
# Genre von der Kommandozeile übernehmen ($1). Kann auch fest eingetragen werden z.B.  "Alternative", "Classical", "Dance", "Funk", "Jazz", "Techno",
# "Metal", "Mixed", "Pop", "TopTen", "Rap", "Electronic", "Trance" etc. etc. siehe dazu bei shoutcast nach 
genre=$1
#=================================================================================================================
# Wo sollen die fertigen .pls und .m3u-files hin ? /etc/vdr/Network-Streams bei mir.
#outputdir=/etc/vdr/Network-Streams
#outputdir=/pub/mp3			# LinVDR
outputdir=/var/lib/video/musik/web-radio


# Das Temporäre Verzeichnis
# tempdir=/home/volker/vdr/radio/tempdir
tempdir=/tmp/shoutcast-tempdir


# Der Name der Playlist(s) haben soll (.m3u). Hintendran wird dann noch das Genre angehängt.
m3uname=Web-Streams-


# Soll ein route (#) vor der nummer des Streams 
# - gibt evt. probleme bei Windows, habe es aber nicht getestet.
# hashnr=
hashnr=\#


# Anzahl streams die für das Genre "besorgt" werden sollen. (wird jetzt per kommandozeile angegeben, kann natürlich auch fest eingestellt werden)
anzahl=$2
#anzahl=40


# Sortierung nach (entweder bitrate oder listeners)
# sortierung=bitrate


# Maximale Bitrate
# Wenn Bitrate egal ist leer lassen!
#maxbitrate=192
maxbitrate=




# pfad zu svdrpsend (für die OSD-Mitteilung)
# svdrpsend=echo			#Test
svdrpsend=/usr/lib/vdr/svdrpsend.pl	#LinVDR


# wenn rm = rm -f steht, werden die temp-dateien am Ende gelöscht, bei rm = echo nicht.
rm = rm -f
#rm = echo


# Debug
#set -xv


# Config ende, aber hier nur noch editieren, wenn man weiss was man tut.




# Streamfiles holen, die den Link und den vollen Namen der Station enthält
#get_streams () {
#	while read url; do
#		printf "."
#		wget -q $url
#	done
#}






# Meine veränderte Version von create_pls_2_files die sieht für die kenner wohl nicht sehr toll aus, aber sie funktioniert. 
create_pls2_files () {


	while read tempdata; do


		streams=`cat ${tempdata} | awk 'match($1,"numberofentries=") { print $0 }' |sed 's/numberofentries=//' |awk '{print $1}'`
		streamnr=0
		[ "$streams" = "" ] && streams=0
		while [ $streamnr -ne $streams ]
			do
			streamnr=$(( $streamnr + 1 ))

			suchkriterium="File"$streamnr"="
			cat $tempdata | awk 'match($1,"'"$suchkriterium"'") { print $0 }' \
			| sed 's/'"$suchkriterium"'//' > $tempdata.temp

			suchkriterium="Title"$streamnr"="
			streamname=`cat $tempdata |\
			awk 'match($1,"'"$suchkriterium"'") '  |\
			sed 's/Title.*) //' | cut -c1-75 | sed 's/[()*,&!?~{}#:\`]//g' | \
			sed 's/=//g' |sed 's/-=-//g' |sed '/^#/D;/^$/D' |sed 's/^$/_ffff_/g'  |sed 's/^#/_/g' |sed 's/\ /_/g' | sed 's/\///g' |\
			sed 's/__/_/g' | sed 's/+//g' | sed 's/-//g' |sed 's/__/_/g' | sed 's/\^//g' | sed 's/\[//g' | sed 's/\]//g' |sed 's/__/_/g' |\
			sed 's/\b_//g' | sed 's/[|]//g' | sed 's/[..]/./g' | sed 's/[..]/./g' |\
			awk '{print $1}'`
			mkdir $outputdir/"$genre"/$hashnr$streamname > /dev/null 2>&1
			# mv -f $tempdata.temp $outputdir/"$genre"/$streamname/$streamnr.pls
			mv -f $tempdata.temp $outputdir/"$genre"/$hashnr$streamname/$hashnr"$streamnr"_-_$streamname.pls
		done
	done

}


printf "\n\n-- Start shoutcast2vdr - Update genre : $1 --\n\n"


# VDR-OSD-Mitteilung
$svdrpsend MESG Shoutcast "$genre" aktualisierung startet... >/dev/null 2>&1


if [ -d $outputdir/"$genre"/ ]; then
  # alte pls- und m3u-files des genre's sowie leere Verzeichnisse löschen
  find $outputdir/"$genre"/ -name "*.pls" -exec rm -f {} \; 2>/dev/null
  find $outputdir/"$genre"/ -name "*.m3u" -exec rm -f {} \; 2>/dev/null
  find $outputdir/"$genre"/ -type d -exec rmdir --ignore-fail-on-non-empty {} \; 2>/dev/null
  rm -f $outputdir/$m3uname"$genre".m3u
fi


# Testen ob das Zielvertzeichnis schon existiert, sonst eins machen.
test -d $outputdir/"$genre" || mkdir $outputdir/"$genre" 2>/dev/null


# Testen ob tempvertzeichnis schon existiert, sonst eins machen.
test -d $tempdir || mkdir $tempdir 2>/dev/null
cd $tempdir


# Die html-page saugen
#wget -qO $tempdir/index.html "http://yp.shoutcast.com/directory/index.phtml?sgenre="$(echo $genre | sed 's/ /%20/g')"&numresult=$anzahl&orderby=$sortierung&maxbitrate=$maxbitrate"
#grep \.pls $tempdir/index.html | awk '!match($5,"Lucky") {print $5}' | sed 's/href="/shoutcast.com/g' | sed 's/"><img//g'>$tempdir/streamlist


#wget -qO $tempdir/index.html "http://yp.shoutcast.com/sbin/newxml.phtml?genre=80s&mt=audio/mpeg&br=192&limit=10"
#wget -qO $tempdir/index.html "http://yp.shoutcast.com/sbin/newxml.phtml?genre="$(echo $genre | sed 's/ /%20/g')"&mt=audio/mpeg&br="$(echo $maxbitrate)"&limit="$(echo $anzahl)""
wget -qO $tempdir/index.html "http://yp.shoutcast.com/sbin/newxml.phtml?genre="$(echo $genre | sed 's/ /%20/g')"&mt=audio/mpeg&br=$maxbitrate&limit="$(echo $anzahl | sed 's/ /%20/g')""
grep 'station name' $tempdir/index.html | cut -d'=' -f4 | cut -d' ' -f1 | cut -c 2-20 | cut -d'"' -f1 >$tempdir/streamlist




# stream data besorgen 
#printf "$(cat $tempdir/streamlist | wc -l) einträge gefunden, hole streams "
#get_streams < $tempdir/streamlist
#printf "\n\n"


FILE=`cat $tempdir/streamlist`
for i in $FILE
do
wget  http://yp.shoutcast.com/sbin/tunein-station.pls?id="$i" 
done


# .pls files erzeugen
ls -rc $tempdir/tunein-station.pls* | create_pls2_files


# alle erzeugten streams anzeigen
ls -all $outputdir/"$genre"/*.pls




# Aufräumen, was nicht mehr gebraucht wird.
$rm "$tempdir/shoutcast-playlist.pls*" 2>/dev/null
$rm $tempdir/index.html 2>/dev/null
$rm $tempdir/streamlist 2>/dev/null




# m3u-datei erstellen
cd $outputdir/"$genre"
for i in $(ls -rc)
  do
  if [ -d $i ]
      then
      for j in $(ls -rc $i/*.pls)
	do
	echo $j >> $i.m3u
	echo "$genre"/$j >> $outputdir/$m3uname"$genre".m3u
      done
      echo $m3uname"$genre".m3u: $i  erstellt!
  fi
done
cd ..


# einzelnes leeres pls-file löschen, kommt wahrscheinlich wegen "m3u-datei erstellen" 
#rm -f $outputdir/"$genre"/.pls


# tempdir löschen
rm -rf $tempdir/*	# löschen


# VDR-OSD-Mitteilung
$svdrpsend MESG Shoutcast "$genre" \(sender: $(cat $m3uname"$genre".m3u 2>/dev/null | wc -l)\) aktualisierung fertig! >/dev/null 2>&1


printf "\nFertig.\n"