*** soita.sh -------- alkaa tästä --- #!/bin/bash echo "Käynnistä radio painalla Enter. Muu merkki lopettaa." read Lopetusvalinta if [ "$Lopetusvalinta" != "" ] then exit else : fi musiikkikansio="~/Musiikki" # musiikkikansio="/home/$USER/Musiikki/Coolradio Jazz" # Funktio 'teesoittolista' tekee soittolistan jos se puuttuu tai jos se on tyhjä. teesoittolista () { if [ ! -e ~/Radio/soittolista.m3u ] then touch ~/Radio/soittolista.m3u else echo "" > ~/Radio/soittolista.m3u # tyhjentää liian lyhyen soittolistan fi IFS=$'\n' for f in $(find "${musiikkikansio}" -name "*.mp3") do Kesto=$(mp3info -p "%S" "$f") Bitrate=$(mp3info -r a -p "%.0r" "$f") # echo "Kesto" "$Kesto" $Bitrate "$Bitrate" if [ "$Kesto" -lt 600 ] && [ "$Bitrate" -gt 96 ] then echo "$f" >> ~/Radio/soittolista.m3u fi done soitetaan } # Funktio *soitetaan' soittaa ensin musiikkia ja sitten vanhimman uutiskatsauksen. # Komennolla Ctrl+C voi vaihtaa musiikista uutiseen ja uutisesta musiikkiin. soitetaan () { echo "Aloitetaan musiikin soitto" soitettava=$(sort -R ~/Radio/soittolista.m3u | head -n 1) # soitettava=$(shuf -n 1 ~/Radio/soittolista.m3u) # kun shuf palaa Ubuntuun Artisti=$(mp3info -p "%a" "${soitettava}") Biisi=$(mp3info -p "%t" "${soitettava}") # Tiedosto=$(mp3info -p "%f" "${soitettava}") Tiedosto=$(basename "${soitettava}") echo "${Tiedosto}" echo "${Artisti}" - "${Biisi}" - "${Tiedosto}" >> ~/Radio/Arkisto/radioloki.txt mpg123 -C "${soitettava}" echo "Aloitetaan uutisen soitto" cd /home/$USER/Radio/Puhe/ uutinen=$(find . -type f -printf '%T+ %f\n' | sort | head -n 1 | cut -d" " -f2) echo "Soitetaan:" "${uutinen}" mp3gain -g 3 "${uutinen}" mpg123 -C "${uutinen}" mv "${uutinen}" /home/$USER/Radio/Arkisto/ sleep 1 } # Seuraavat komennot suoritetaan ohjelman aluksi. # Tarkistetaan onko 'soittolista.m3u' olemassa. # Sitten joko tehdään soittolista tai aletaan soittaa sitä. if [ ! -e ~/Radio/soittolista.m3u ] || [ ! -s ~/Radio/soittolista.m3u ] then echo "Soittolista puuttuu, tehdään uusi." teesoittolista else while : do soitetaan done exit fi exit # ~/Radio/soita.sh *** soita.sh -------- loppuu tähän --- *** aikataulu.sh -------- alkaa tästä --- #!/bin/bash for i in `atq | awk '{print $1}'` ; do atrm $i ; done sleep 2 at 06:30 -f ~/Radio/sverigesradio.sh at 07:00 -f ~/Radio/abcnews.sh at 08:00 -f ~/Radio/deutschlandfunk.sh at 11:30 -f ~/Radio/npr.sh at 12:30 -f ~/Radio/yleradiosuomi.sh at 12:30 -f ~/Radio/bbc4today.sh at 12:45 -f ~/Radio/abcpm.sh at 19:00 -f ~/Radio/deutschlandfunk.sh # ~/Radio/aikatalu.sh *** aikataulu.sh -------- loppuu tähän --- *** abcnews.sh -------- alkaa tästä --- #!/bin/bash nyt=$(date +%F_%H-%M) cvlc "http://www.abc.net.au/res/streaming/audio/mp3/news_radio.pls" --sout file/mp3:/home/$USER/Radio/Puhe/ABCnews_$nyt.mp3 \ --run-time=300 --stop-time=300 vlc://quit echo "ABCnews"_$nyt >> ~/Radio/Arkisto/radioloki.txt # ~/Radio/abcnews.sh *** abcnews.sh -------- loppuu tähän --- *** abcpm.sh -------- alkaa tästä --- #!/bin/bash nyt=$(date +%F_%H-%M) wget -O ~/Radio/Puhe/ABCpm_$nyt.mp3 `curl -s https://www.abc.net.au/radio/programs/pm/feed/8863592/podcast.xml | grep -o 'https*://[^"]*mp3' | head -1` echo "ABCpm"_$nyt >> ~/Radio/Arkisto/radioloki.txt # ~/Radio/ABCpm.sh *** abcpm.sh -------- loppuu tähän --- *** bbc4.sh -------- alkaa tästä --- #!/bin/bash nyt=$(date +%F_%H-%M) cvlc "http://bbcmedia.ic.llnwd.net/stream/bbcmedia_radio4fm_mf_p" --sout file/mp3:/home/$USER/Radio/Puhe/BBC4_$nyt.mp3 --run-time=240 --stop-time=240 vlc://quit echo "BBC4"_$nyt >> ~/Radio/Arkisto/radioloki.txt # ~/Radio/bbc4.sh *** bbc4.sh -------- loppuu tähän --- *** deutschlandfunk.sh -------- alkaa tästä --- #!/bin/bash nyt=$(date +%F_%H-%M) wget -O ~/Radio/Puhe/Deutschlandfunk_$nyt.mp3 http://ondemand-mp3.dradio.de/file/dradio/nachrichten/nachrichten.mp3 echo "Deutschlandfunk"_$nyt >> ~/Radio/Arkisto/radioloki.txt # ~/Radio/deutschlandfunk.sh # the address of the mp3-file is available at: https://de1.api.radio-browser.info/pls/url/9bce1899-bc6e-11e9-acb2-52543be04c81 *** deutschlandfunk.sh -------- loppuu tähän --- *** bbc4today.sh -------- alkaa tästä --- #!/bin/bash nyt=$(date +%F_%H-%M) wget -O ~/Radio/Puhe/BBC4today_$nyt.mp3 `curl -s https://podcasts.files.bbci.co.uk/p02nrtvg.rss | grep -o 'https*://[^"]*mp3' | head -1` echo "BBC4today"_$nyt >> ~/Radio/Arkisto/radioloki.txt # ~/Radio/bbc4_today.sh *** bbc4today.sh -------- loppuu tähän --- *** npr.sh -------- alkaa tästä --- #!/bin/bash nyt=$(date +%F_%H-%M) cvlc "http://pd.npr.org/anon.npr-mp3/npr/news/newscast.mp3" --sout file/mp3:/home/jorma/Radio/Puhe/Npr_$nyt.mp3 --run-time=300 --stop-time=300 vlc://quit echo "Npr"_$nyt >> ~/Radio/Arkisto/radioloki.txt # ~/Radio/npr.sh *** npr.sh -------- loppuu tähän --- *** sverigesradio.sh -------- alkaa tästä --- #!/bin/bash nyt=$(date +%F_%H-%M) rimpsu="$(wget -q -O - https://api.sr.se/api/rss/pod/3795 | grep enclosure | head -n 1)" echo "$rimpsu" osoite="$(echo "$rimpsu" | grep -oP '(?<=url=").*(?=" length)')" echo "osoite" "$osoite" wget -O ~/Radio/Puhe/Sverigesradio_$nyt.mp3 "${osoite}" echo "Sverigesradio"_$nyt >> ~/Radio/Arkisto/radioloki.txt # "$rimpsu" on *** sverigesradio.sh -------- loppuu tähän --- *** ylepsavo.sh -------- alkaa tästä --- #!/bin/bash nyt=$(date +%F_%H-%M) yle-dl -o ~/Radio/Puhe/Ylepsavo_$nyt.mp3 https://areena.yle.fi/1-4479312 --latestepisode # --destdir /home/$USER/Radio/Puhe/ # yle-dl https://areena.yle.fi/1-4479312 --destdir /home/$USER/Radio/Puhe/ # yle-dl https://areena.yle.fi/1-50485905 --destdir /home/$USER/Radio/Puhe/ echo "Yle Pohjois-Savo"_$nyt >> ~/Radio/Arkisto/radioloki.txt # ~/Radio/ylepsavo.sh *** ylepsavo.sh -------- loppuu tähän --- *** yleradiosuomi.sh -------- alkaa tästä --- #!/bin/bash nyt=$(date +%F_%H-%M) wget -O ~/Radio/Puhe/YLE_Radio_Suomi_$nyt.mp3 `curl -s https://feeds.yle.fi/areena/v1/series/1-1440981.rss? | grep -o 'https*://[^"]*mp3' | head -1` echo "YLE_Radio_Suomi"_$nyt >> ~/Radio/Arkisto/radioloki.txt # ~/Radio/YLEradiosuomi.sh *** yleradiosuomi.sh -------- loppuu tähän ---