bigbcast.rss 0100664 0001753 0000330 00000000446 10230077236 012357 0 ustar jill ljedit
The Big Broadcast
http://wamu.org/programs/bb/
The Big Broadcast - Old Time RadioWAMU Stream Capture using Linux shell tools
cartalk.rss 0100664 0001753 0000330 00000000430 10230075664 012216 0 ustar jill ljedit
Car Talk
http://www.cartalk.com
Car Talk with Tom and Ray MagliozziWHYY Stream Capture using Linux shell tools
catchbb 0100775 0001753 0000330 00000003677 10230215650 011367 0 ustar jill ljedit #!/bin/bash
# catchbb - capture "The Big Broadcast" - 7PM Saturdays
# For capturing the stream
DATE=`/bin/date +%F` # Save the date as YYYY-MM-DD
YEAR=`/bin/date +%Y` # Save just the year as YYYY
FILE=/media/mp3/radio/bigbcast.$DATE.mp3
STREAM=http://wamu.org/audio/wamu.m3u
DURATION=4.1h # enough to catch the show, plus a bit
#DURATION=30s # for testing
# For the RSS syndication
XML="/media/rss/bigbcast.rss" # file for the RSS feed
ITEMS=15 # Maximum items in RSS list
XTITLE="Big Broadcast - $DATE Broadcast"
XDATE=`date -R` # Date in RFC 822 format for RSS
i=\$i ; o=\$o ; m=\$m # replace "$" in the perl script
# For the id3v2 Tags
AUTHOR="Old Time Radio"
ALBUM="WAMU Stream Rip"
TITLE="Big Broadcast - $DATE"
# Use mplayer to capture the stream
# at $STREAM to the file $FILE
/usr/local/bin/mplayer -really-quiet -cache 128 \
-dumpfile $FILE -dumpaudio -playlist $STREAM &
# the & turns the capture into a background job
/bin/sleep $DURATION # wait for the show to be over
/bin/kill $! # end the stream capture
# Tag the resulting captured .mp3
/usr/bin/id3v2 -a "$AUTHOR" -A "$ALBUM" \
-t "$TITLE" -y $YEAR -T 1/1 -g 255 \
--TCON "Radio" $FILE
# Add a new entry in the rss file,
# keep the file to a max of $ITEMS entries,
# and change the file's date to right now.
/usr/bin/perl -e "use XML::RSS; use XML::Simple; \
$i=XMLin('$XML');$o=$i;bless $o,XML::RSS; \
$m=$i->{channel}{item};if((ref $m)ne ARRAY) \
{$o->add_item(%$m);} else \
{foreach $m (@{$m}) {$o->add_item(%$m);}} \
$o->channel(lastBuildDate=>'$XDATE', \
pubDate=>'$XDATE'); \
$o->add_item(title=>'$XTITLE', \
link=>$o->{'channel'}{'link'}, \
pubDate=>'$XDATE', \
enclosure=>{url=>'file://$FILE', \
length=>(stat('$FILE'))[7], \
type=>'audio/mpeg'}, mode=>'insert'); \
pop(@{$o->{'items'}}) \
while (@{$o->{'items'}}>$ITEMS); \
$o->{encoding}='UTF-8'; $o->save('$XML');"
/bin/echo "Caught The Big Broadcast."
catchct 0100775 0001753 0000330 00000003650 10230215650 011401 0 ustar jill ljedit #!/bin/bash
# catchct - capture "Car Talk" - 10AM Saturdays
# For capturing the stream
DATE=`/bin/date +%F` # Save the date as YYYY-MM-DD
YEAR=`/bin/date +%Y` # Save just the year as YYYY
FILE=/media/mp3/radio/cartalk.$DATE.mp3
STREAM=http://whyy.org/91FM/whyy.asx
DURATION=1.1h # enough to catch the show, plus a bit
#DURATION=30s # for testing
# For the RSS syndication
XML="/media/rss/cartalk.rss" # file for the RSS feed
ITEMS=15 # Maximum items in RSS list
XTITLE="Car Talk - $DATE Broadcast"
XDATE=`date -R` # Date in RFC 822 format for RSS
i=\$i ; o=\$o ; m=\$m # replace "$" in the perl script
# For the id3v2 Tags
AUTHOR="Tom and Ray Magliozzi"
ALBUM="WHYY Stream Rip"
TITLE="Car Talk - $DATE"
# Use mplayer to capture the stream
# at $STREAM to the file $FILE
/usr/local/bin/mplayer -really-quiet -cache 128 \
-dumpfile $FILE -dumpaudio -playlist $STREAM &
# the & turns the capture into a background job
/bin/sleep $DURATION # wait for the show to be over
/bin/kill $! # end the stream capture
# Tag the resulting captured .mp3
/usr/bin/id3v2 -a "$AUTHOR" -A "$ALBUM" \
-t "$TITLE" -y $YEAR -T 1/1 -g 255 \
--TCON "Radio" $FILE
# Add a new entry in the rss file,
# keep the file to a max of $ITEMS entries,
# and change the file's date to right now.
/usr/bin/perl -e "use XML::RSS; use XML::Simple; \
$i=XMLin('$XML');$o=$i;bless $o,XML::RSS; \
$m=$i->{channel}{item};if((ref $m)ne ARRAY) \
{$o->add_item(%$m);} else \
{foreach $m (@{$m}) {$o->add_item(%$m);}} \
$o->channel(lastBuildDate=>'$XDATE', \
pubDate=>'$XDATE'); \
$o->add_item(title=>'$XTITLE', \
link=>$o->{'channel'}{'link'}, \
pubDate=>'$XDATE', \
enclosure=>{url=>'file://$FILE', \
length=>(stat('$FILE'))[7], \
type=>'audio/mpeg'}, mode=>'insert'); \
pop(@{$o->{'items'}}) \
while (@{$o->{'items'}}>$ITEMS); \
$o->{encoding}='UTF-8'; $o->save('$XML');"
/bin/echo "Caught Car Talk."
catchphc 0100775 0001753 0000330 00000003751 10230215651 011550 0 ustar jill ljedit #!/bin/bash
# catchphc - capture "A Prairie Home Companion" - 11AM Sundays
# For capturing the stream
DATE=`/bin/date +%F` # Save the date as YYYY-MM-DD
YEAR=`/bin/date +%Y` # Save just the year as YYYY
FILE=/media/mp3/radio/prairie.$DATE.mp3
STREAM=http://wnyc.org/stream/wnycam.pls
DURATION=2.1h # enough to catch the show, plus a bit
#DURATION=30s # a quick run, just for testing
# For the RSS syndication
XML="/media/rss/prairie.rss" # file for the RSS feed
ITEMS=15 # Maximum items in RSS list
XTITLE="A Prairie Home Companion - $DATE Broadcast"
XDATE=`date -R` # Date in RFC 822 format for RSS
i=\$i ; o=\$o ; m=\$m # replace "$" in the perl script
# For the id3v2 Tags
AUTHOR="Garrison Kiellor"
ALBUM="WNYC Stream Rip"
TITLE="Prairie Home Companion - $DATE"
# Use mplayer to capture the stream
# at $STREAM to the file $FILE
/usr/local/bin/mplayer -really-quiet -cache 128 \
-dumpfile $FILE -dumpaudio -playlist $STREAM &
# the & turns the capture into a background job
/bin/sleep $DURATION # wait for the show to be over
/bin/kill $! # end the stream capture
# Tag the resulting captured .mp3
/usr/bin/id3v2 -a "$AUTHOR" -A "$ALBUM" \
-t "$TITLE" -y $YEAR -T 1/1 -g 255 \
--TCON "Radio" $FILE
# Add a new entry in the rss file,
# keep the file to a max of $ITEMS entries,
# and change the file's date to right now.
/usr/bin/perl -e "use XML::RSS; use XML::Simple; \
$i=XMLin('$XML');$o=$i;bless $o,XML::RSS; \
$m=$i->{channel}{item};if((ref $m)ne ARRAY) \
{$o->add_item(%$m);} else \
{foreach $m (@{$m}) {$o->add_item(%$m);}} \
$o->channel(lastBuildDate=>'$XDATE', \
pubDate=>'$XDATE'); \
$o->add_item(title=>'$XTITLE', \
link=>$o->{'channel'}{'link'}, \
pubDate=>'$XDATE', \
enclosure=>{url=>'file://$FILE', \
length=>(stat('$FILE'))[7], \
type=>'audio/mpeg'}, mode=>'insert'); \
pop(@{$o->{'items'}}) \
while (@{$o->{'items'}}>$ITEMS); \
$o->{encoding}='UTF-8'; $o->save('$XML');"
/bin/echo "Caught Prairie Home."
catchsch 0100775 0001753 0000330 00000003676 10230215651 011561 0 ustar jill ljedit #!/bin/bash
# catchsch - capture "Schickele Mix" - 11PM Saturdays
# For capturing the stream
DATE=`/bin/date +%F` # Save the date as YYYY-MM-DD
YEAR=`/bin/date +%Y` # Save just the year as YYYY
FILE=/media/mp3/radio/schickele.$DATE.mp3
STREAM=http://wnyc.org/stream/wnycfm.pls
DURATION=1.1h # enough to catch the show, plus a bit
#DURATION=30s # for testing
# For the RSS syndication
XML="/media/rss/schickele.rss" # file for the RSS feed
ITEMS=15 # Maximum items in RSS list
XTITLE="Schickele Mix - $DATE Broadcast"
XDATE=`date -R` # Date in RFC 822 format for RSS
i=\$i ; o=\$o ; m=\$m # replace "$" in the perl script
# For the id3v2 Tags
AUTHOR="Peter Schickele"
ALBUM="WNYC Stream Rip"
TITLE="Schickele Mix - $DATE"
# Use mplayer to capture the stream
# at $STREAM to the file $FILE
/usr/local/bin/mplayer -really-quiet -cache 128 \
-dumpfile $FILE -dumpaudio -playlist $STREAM &
# the & turns the capture into a background job
/bin/sleep $DURATION # wait for the show to be over
/bin/kill $! # end the stream capture
# Tag the resulting captured .mp3
/usr/bin/id3v2 -a "$AUTHOR" -A "$ALBUM" \
-t "$TITLE" -y $YEAR -T 1/1 -g 255 \
--TCON "Radio" $FILE
# Add a new entry in the rss file,
# keep the file to a max of $ITEMS entries,
# and change the file's date to right now.
/usr/bin/perl -e "use XML::RSS; use XML::Simple; \
$i=XMLin('$XML');$o=$i;bless $o,XML::RSS; \
$m=$i->{channel}{item};if((ref $m)ne ARRAY) \
{$o->add_item(%$m);} else \
{foreach $m (@{$m}) {$o->add_item(%$m);}} \
$o->channel(lastBuildDate=>'$XDATE', \
pubDate=>'$XDATE'); \
$o->add_item(title=>'$XTITLE', \
link=>$o->{'channel'}{'link'}, \
pubDate=>'$XDATE', \
enclosure=>{url=>'file://$FILE', \
length=>(stat('$FILE'))[7], \
type=>'audio/mpeg'}, mode=>'insert'); \
pop(@{$o->{'items'}}) \
while (@{$o->{'items'}}>$ITEMS); \
$o->{encoding}='UTF-8'; $o->save('$XML');"
/bin/echo "Caught Schickele Mix."
catchsel 0100775 0001753 0000330 00000003726 10230215651 011563 0 ustar jill ljedit #!/bin/bash
# catchsel - capture "Selected Shorts" - 4PM Sundays
# For capturing the stream
DATE=`/bin/date +%F` # Save the date as YYYY-MM-DD
YEAR=`/bin/date +%Y` # Save just the year as YYYY
FILE=/media/mp3/radio/selectedshorts.$DATE.mp3
STREAM=http://wnyc.org/stream/wnycam.pls
DURATION=1.1h # enough to catch the show, plus a bit
#DURATION=30s # a quick run, just for testing
# For the RSS syndication
XML="/media/rss/shorts.rss" # file for the RSS feed
ITEMS=15 # Maximum items in RSS list
XTITLE="Selected Shorts - $DATE Broadcast"
XDATE=`date -R` # Date in RFC 822 format for RSS
i=\$i ; o=\$o ; m=\$m # replace "$" in the perl script
# For the id3v2 Tags
AUTHOR="Symphony Space"
ALBUM="WNYC Stream Rip"
TITLE="Selected Shorts - $DATE"
# Use mplayer to capture the stream
# at $STREAM to the file $FILE
/usr/local/bin/mplayer -really-quiet -cache 128 \
-dumpfile $FILE -dumpaudio -playlist $STREAM &
# the & turns the capture into a background job
/bin/sleep $DURATION # wait for the show to be over
/bin/kill $! # end the stream capture
# Tag the resulting captured .mp3
/usr/bin/id3v2 -a "$AUTHOR" -A "$ALBUM" \
-t "$TITLE" -y $YEAR -T 1/1 -g 255 \
--TCON "Radio" $FILE
# Add a new entry in the rss file,
# keep the file to a max of $ITEMS entries,
# and change the file's date to right now.
/usr/bin/perl -e "use XML::RSS; use XML::Simple; \
$i=XMLin('$XML');$o=$i;bless $o,XML::RSS; \
$m=$i->{channel}{item};if((ref $m)ne ARRAY) \
{$o->add_item(%$m);} else \
{foreach $m (@{$m}) {$o->add_item(%$m);}} \
$o->channel(lastBuildDate=>'$XDATE', \
pubDate=>'$XDATE'); \
$o->add_item(title=>'$XTITLE', \
link=>$o->{'channel'}{'link'}, \
pubDate=>'$XDATE', \
enclosure=>{url=>'file://$FILE', \
length=>(stat('$FILE'))[7], \
type=>'audio/mpeg'}, mode=>'insert'); \
pop(@{$o->{'items'}}) \
while (@{$o->{'items'}}>$ITEMS); \
$o->{encoding}='UTF-8'; $o->save('$XML');"
/bin/echo "Caught Selected Shorts."
catchthewolf 0100775 0001753 0000330 00000003736 10230215652 012452 0 ustar jill ljedit #!/bin/bash
# catchthewolf - capture "Hour of the Wolf" - 5AM Saturdays
# For capturing the stream
DATE=`/bin/date +%F` # Save the date as YYYY-MM-DD
YEAR=`/bin/date +%Y` # Save just the year as YYYY
FILE=/media/mp3/radio/wolf.$DATE.mp3 # Where to save it
STREAM=http://www.2600.com/wbai/wbai.m3u
DURATION=2.1h # enough to catch the show, plus a bit
#DURATION=30s # a quick run, just for testing
# For the RSS syndication
XML="/media/rss/wolf.rss" # file for the RSS feed
ITEMS=15 # Maximum items in RSS list
XTITLE="Hour of the Wolf - $DATE Broadcast"
XDATE=`date -R` # Date in RFC 822 format for RSS
i=\$i ; o=\$o ; m=\$m # replace "$" in the perl script
# For the id3v2 Tags
AUTHOR="Jim Freund"
ALBUM="WBAI Stream Rip"
TITLE="Hour of the Wolf - $DATE"
# Use mplayer to capture the stream
# at $STREAM to the file $FILE
/usr/local/bin/mplayer -really-quiet -cache 128 \
-dumpfile $FILE -dumpaudio -playlist $STREAM &
# the & turns the capture into a background job
/bin/sleep $DURATION # wait for the show to be over
/bin/kill $! # end the stream capture
# Tag the resulting captured .mp3
/usr/bin/id3v2 -a "$AUTHOR" -A "$ALBUM" \
-t "$TITLE" -y $YEAR -T 1/1 -g 255 \
--TCON "Radio" $FILE
# Add a new entry in the rss file,
# keep the file to a max of $ITEMS entries,
# and change the file's date to right now.
/usr/bin/perl -e "use XML::RSS; use XML::Simple; \
$i=XMLin('$XML');$o=$i;bless $o,XML::RSS; \
$m=$i->{channel}{item};if((ref $m)ne ARRAY) \
{$o->add_item(%$m);} else \
{foreach $m (@{$m}) {$o->add_item(%$m);}} \
$o->channel(lastBuildDate=>'$XDATE', \
pubDate=>'$XDATE'); \
$o->add_item(title=>'$XTITLE', \
link=>$o->{'channel'}{'link'}, \
pubDate=>'$XDATE', \
enclosure=>{url=>'file://$FILE', \
length=>(stat('$FILE'))[7], \
type=>'audio/mpeg'}, mode=>'insert'); \
pop(@{$o->{'items'}}) \
while (@{$o->{'items'}}>$ITEMS); \
$o->{encoding}='UTF-8'; $o->save('$XML');"
/bin/echo "Caught The Wolf."
crontab 0100664 0001753 0000330 00000001224 10230102173 011403 0 ustar jill ljedit # DO NOT EDIT THIS FILE - edit the master and reinstall.
# (/tmp/crontab.4797 installed on Fri Apr 15 22:58:22 2005)
# (Cron version -- $Id: crontab.c,v 2.13 1994/01/17 03:20:37 vixie Exp $)
SHELL=/bin/bash
MAILTO=phil
# Catch prairie home companion 11AM sundays
59 10 * * sun /home/phil/catchphc
# Catch Hour of the Wolf 5AM Saturdays
59 4 * * sat /home/phil/catchthewolf
# Catch Car Talk 10AM Saturdays
59 9 * * sat /home/phil/catchct
# Catch Schickle Mix 11PM Saturdays
59 21 * * sat /home/phil/catchsch
# Catch Selected Shorts 4PM sundays
59 15 * * sun /home/phil/catchsel
# Catch The Big Broadcast 7PM sundays
59 18 * * sun /home/phil/catchbb
prairie.rss 0100664 0001753 0000330 00000000454 10230076031 012223 0 ustar jill ljedit
A Prairie Home Companion
http://www.prairiehome.org
Variety Show with Garrison KiellorWNYC Stream Capture using Linux shell tools
schickele.rss 0100664 0001753 0000330 00000000445 10230076301 012522 0 ustar jill ljedit
Schickele Mix
http://www.schickele.com/mix
Music Education with Peter SchickeleWNYC Stream Capture using Linux shell tools
shorts.rss 0100664 0001753 0000330 00000000465 10230076164 012123 0 ustar jill ljedit
Selected Shorts
http://www.symphonyspace.org
Short Story Readings at Symphony Space in New YorkWNYC Stream Capture using Linux shell tools
wolf.rss 0100664 0001753 0000330 00000000451 10227470777 011561 0 ustar jill ljedit
Hour of the Wolf
http://www.hourwolf.com
Science Fiction Talk Radio with Jim FreundWBAI Stream Capture using Linux shell tools