Užitečné skripty 4: nahráváme z rádia

23.3.2007 21:43 | Přečteno: 1802× | Linux

V dnešním díle Užitečných skriptů klesneme s kvalitou skriptu jak to jenom jde. Ukážeme si skript na nahrávání z internetového rádia, který je zajímavý jenom tím, že si člověk nemusí pamatovat spoustu detailů, protože si je předem napíše do skriptu.

Abstrakt

Člověk si někdy chce nahrát nahrát něco z internetového rádia, ale jako na potvoru člověk zapomene a na poslední chvíli nahazuje Firefox, hledá adresu, odkud rádio vysílá a přemýšlí, jak se vlastně ten pitomý (nahrávací) program jmenuje a jaké mu vlastně dát parametry. Všechno ještě komplikuje fakt, že ne všechna rádia vysílají v oblíbeném a všeobecně rozšířeném formátu OGG.

Samotný skript

Soubor nahravat.sh

#!/bin/sh
# coding: utf-8

help (){
echo "Nahrávání internetového rádia"
echo "Použití: $0 <název rádia> [pocet minut]"
echo Názvy mohou být tyto:
echo "    radiozurnal: Radiožurnál"
echo "    praha: ČRo 2 Praha"
echo "    brno: ČRo 2 Brno"

echo "    vltava: ČRo 3 Vltava"
echo "    beat: Rádio beat"
}

radio=$1
parentDir=~/tmp/radio

case $radio in
    radiozurnal)

#kdyz nefunguej amp1, jeste existuje amp2
        address=http://amp1.cesnet.cz:8000/cro1-256.ogg
        ;;
    brno)
	address=mms://82.208.50.129/crobrno?WMContentBitrate=130000
        ;;

    praha)
        address=http://amp1.cesnet.cz:8000/cro2-256.ogg
        ;;
    vltava)
        address=http://amp1.cesnet.cz:8000/cro3-256.ogg
        ;;

    beat)
        address=http://netshow.play.cz:8000/radiobeat128.ogg
	#mms://netshow4.live.cz/beat128
        ;;
    *)
       help

       exit
       ;;
esac

dateStr=`date +%m_%d_%H_%M`
[ -d $parentDir ] || mkdir $parentDira
tmpDir=`mktemp -d -p $parentDir ${radio}_${dateStr}.XXXXXX`
if [ x$2 != x ]

then
    duration=`expr $2 '*' 60`
fi

cd $tmpDir


case $radio in
    beat|praha|radiozurnal|vltava)

        if [ x$2 != x ]
        then
            options="-l $duration"
        fi
        streamripper $address -a $options
    ;;

    brno)
        mplayer -dumpstream -dumpfile dump_${dateStr}.asx $address &
        if [ x$2 != x ]
        then
	    sleep ${duration}s;
	    killall mplayer

        fi
        ;;
esac

Lehké vysvětlení:

• řádky 3--11: nápověda. Musí se udržovat ručně. Nenapadlo mě, jak to vyřešit líp (aby výsledek stál za tu práci)
• řádek 15: Definice adresáře, kam se uloží stream. Adresář musí existovat (nebo si připište podmínečné vytvoření)
• řádky 17--39: definice adres: většinou je potřeba nějak je vymlátit z webu
• řádky 41--43: vytvoření jedinečného adresáře: jde jenom o to, aby se se nepřepsaly nějaké starší soubory. V názvu adresář je datum, takže se dobře hledá.
• řádky 44--47 : Pokud uživatel zadal délku nahrávání, spočte se tato doba v sekundách.
• řádky 52--68: vlastní nahrávání. Podle typu streamu se pouští různé programy
• řádek 65: neohrabané vypnutí procesu na pozadí

Místa k vylepšení, otázky

1. Pokud si chcete z rádia něco nahrávat pravidelně, není nic jednoduššího, než přidat záznam do cronu. Například od pondělí 19. 3. se vyplatí mít v cronu řádek

       00 19 * * * ~/bin/nahravat.sh praha 90
       

2. Nevíte o programu (nejlépe GUI, ale není to nutné), který by uměl rádio přehrávat a v případě potřeby by stačilo zmáčknutí čudlíku, aby začal nahrávat? Důležité je, aby se data přenášela jen jednou.
3. Nevíte, jak zjistit PID posledního procesu spuštěného na pozadí?

       

Komentáře

[eh]

Jednoducha konfigurace muze vypadat treba takto (co je mezi ---cut--- znackamy lze umistit do souboru a pouzit misto toho na zacatku source ten_soubor):

#! /bin/sh

BANNER="Script \"${0%%*/}\" version 1.0.\nReleased under the terms of GNU/GPL.\n"

# ---cut---
RSTATION[0]=cro1
RSTATION[1]=cro2
RSTATION[2]=cro3

RSTATION_URL[0]="http://..."
RSTATION_URL[1]="http://..."
RSTATION_URL[2]="http://..."

RSTATION_DESCRIPTION[0]="Cesky rozhlas 1"
RSTATION_DESCRIPTION[1]="Cesky rozhlas 2"
RSTATION_DESCRIPTION[2]="Cesky rozhlas 3"
# ---cut---

if [[ $# != 1 ]]
then
  echo -e 1>&2 "$BANNER"
  echo -e 1>&2 "Usage: ${0%%*/} [ station ]\n\nAvailable stations:"
  i=0
  for station in ${RSTATION[@]}
  do
    echo -e 1>&2 "   $station -- ${RSTATION_DESCRIPTION[$i]}"
    (( i++ ))
  done
fi

# a tady pokracujes cal jak potrebujes apod...

exit 0

[eh]

Promin, chybi v napovede exit 1, takze si ho tam pridej(te)...

    # ...
    (( i++ ))
  done
  exit 1 # <<< TADY!
fi

[eh]

PS: asi ten script napisu celej a pak ho sem nekam pastnu (kdyz budu mit naladu)... Zjistil jsem totiz, ze by se mi neco podobneho take hodilo...

[Vlastimil Ott]

ad 2)

http://www.abclinuxu.cz/clanky/multimedia/kradio

A na titulce je http://www.abclinuxu.cz/software/multimedia/audio/radio/kradio

[Tomáš]

Kradio je aplikace na obsluhu radio karty v pocitaci. Mozna jsem to v zapisku zamlzil, ale cely skript resi nahravani z internetoveho radia.

[Vlastimil Ott]

Jasně, nevím, proč jsem si to spletl. Mea culpa.

[Lu-Tze]

killall mplayer nene, to si prohledej diskuzi, řeší se to tu den co den, takže určitě najdeš jak to udělat lépe

[Tomáš]

Uz jsem to nasel. Zda se, ze kdyz se pred radek 64 prida pid=$!, tak mam spravne process ID. Zbyva jenom vyresit, jak ten mplayer nejak citlive zabit.

[hele]

pekne, pana prstenu na cro2 asi sleduje dost lidi jak to koukam

[Peter]

No hej to killall je naozaj dost skarede. Pozri pgrep naposledy spusteny proces tak isto nieje boh vie co ja pouzivam (btw tak isto v skripte na nahravanie z radia :)) pgrep a pkill.

[Snilard]

Pána prstenů trochu sleduju. Pokoušel jsem se o nahrávání, leč se nezadařilo. :( :( Nechcete někdo ...?

[Tomáš]

Nevim, co myslis tim dovetkem, ale urcite Te potesi adresa http://forum.panprstenov.com/tema28-0-asc-75.php

[Snilard]

Potěšila :) Díky