Skip to content

Commit

Permalink
renew rec_radiko.sh and rec_aandgplus.sh
Browse files Browse the repository at this point in the history
and ShellCheck done
  • Loading branch information
unot committed Jan 2, 2015
1 parent cc19a5d commit ace4d8d
Show file tree
Hide file tree
Showing 5 changed files with 116 additions and 98 deletions.
2 changes: 1 addition & 1 deletion flv2m4a.sh
@@ -1,6 +1,6 @@
#!/bin/sh -e
if [ $# -ne 1 ]; then
echo "USAGE: `basename $0` hogehoge.flv"
echo "USAGE: $(basename "$0") hogehoge.flv"
exit 1
fi

Expand Down
36 changes: 18 additions & 18 deletions hibiki.sh
Expand Up @@ -5,24 +5,24 @@ TMPFILE="/var/tmp/tmp.$$"
trap 'rm -f ${TMPFILE}' EXIT

if [ $# -eq 1 ]; then
STR=$1

# save asx file
wget -q -O - http://hibiki-radio.jp/description/${STR} | grep WMV | ruby -ruri -e 'puts URI.extract(ARGF.read, "http")' | head -1 | xargs wget -q -O ${TMPFILE}
if [ ! -s ${TMPFILE} ]; then
echo "download ERROR"
exit 1
fi
TITLE=`cat ${TMPFILE} | ruby -rrexml/document -e 'puts REXML::Document.new(ARGF).elements["ASX/entry/title"].text' | tr '/' ''`
WMVFILE=`cat ${TMPFILE} | ruby -rrexml/document -e 'puts REXML::Document.new(ARGF).elements["ASX/entry/Ref"].attributes["href"]'`
if test a"$TITLE" = a"" ; then
echo "asx detection failed."
exit 1
fi
EXT=${WMVFILE##*.}
mimms -r ${WMVFILE} "${TITLE}.${EXT}" || mimms -r ${WMVFILE} "${TITLE}.${EXT}"
mimms -r ${WMVFILE} "${TITLE}.${EXT}" || mimms -r ${WMVFILE} "${TITLE}.${EXT}"
STR=$1

# save asx file
wget -q -O - http://hibiki-radio.jp/description/${STR} | grep WMV | ruby -ruri -e 'puts URI.extract(ARGF.read, "http")' | tail -1 | xargs wget -q -O "${TMPFILE}"
if [ ! -s "${TMPFILE}" ]; then
echo "download ERROR"
exit 1
fi
TITLE=$(ruby -rrexml/document -e 'puts REXML::Document.new(ARGF).elements["ASX/entry/title"].text' < ${TMPFILE} | tr '/' '')
WMVFILE=$(ruby -rrexml/document -e 'puts REXML::Document.new(ARGF).elements["ASX/entry/Ref"].attributes["href"]' < ${TMPFILE})
if test a"$TITLE" = a"" ; then
echo "asx detection failed."
exit 1
fi
EXT=${WMVFILE##*.}
mimms -r "${WMVFILE}" "${TITLE}.${EXT}" || mimms -r "${WMVFILE}" "${TITLE}.${EXT}"
mimms -r "${WMVFILE}" "${TITLE}.${EXT}" || mimms -r "${WMVFILE}" "${TITLE}.${EXT}"
else
echo "usage: `basename $0` STRING"
echo "usage: $(basename "$0") STRING"
fi

45 changes: 22 additions & 23 deletions onsen.sh
@@ -1,18 +1,18 @@
#!/bin/bash -e
# onsen.sh Ver. 0.8.5 (2013.06.28)
# onsen.sh Ver. 0.8.6 (2015.01.02)
# recording tool for onsen.ag
# require openssl, wget and ruby

# target date
GOTDATE=`date +%y%m%d`
#GOTDATE=$(date +%y%m%d)
# precode of POST data
PRECODE=onsen`date +%w%d%H`
PRECODE=onsen$(date +%w%d%H)
# POST data
PDATA="code=`echo $PRECODE | openssl dgst -md5 | sed -e 's/(stdin)= //'`&file%5Fname=regular%5F"
PDATA="code=$(echo "$PRECODE" | openssl dgst -md5 | sed -e 's/(stdin)= //')&file%5Fname=regular%5F"
# week number
REGXMLNUM=`date +%w`
REGXMLNUM=$(date +%w)
# onsen URL
URL="http://onsen.ag/getXML.php?`date +%s`000"
URL="http://onsen.ag/getXML.php?$(date +%s)000"
# tmp file
TMPFILE="/var/tmp/tmp.$$"

Expand All @@ -25,49 +25,48 @@ do
case $OPT in
a) AFLAG=TRUE
;; # with all programs on GOTDATE
y) GOTDATE=`TZ=JST+15 date +%y%m%d`
REGXMLNUM=`TZ=JST+15 date +%w`
y) REGXMLNUM=$(TZ=JST+15 date +%w)
;; # yesterday
v) WGETOPTION=
RMOPTION=-i
;; # verbose mode
w) REGXMLNUM=$OPTARG
;; # indicate week number
\?) echo "Usage: `basename $0` [-avy] [-w weeknumber]" 1>&2
\?) echo "Usage: $(basename "$0") [-avy] [-w weeknumber]" 1>&2
exit 1
;;
esac
done
shift `expr $OPTIND - 1`
shift $((--OPTIND))

# download regular XML file
wget ${WGETOPTION} --post-data="${PDATA}${REGXMLNUM}" ${URL} -O ${TMPFILE}
wget ${WGETOPTION} --post-data="${PDATA}${REGXMLNUM}" "${URL}" -O ${TMPFILE}

# number of program
PROGNUM=`grep -c '<title>' ${TMPFILE} | cut -d ":" -f2`
PROGNUM=$(grep -c '<title>' ${TMPFILE} | cut -d ":" -f2)
#echo "番組数: $PROGNUM"

# index number
i=1
while test ${PROGNUM} -gt 0
while test "${PROGNUM}" -gt 0
do
PROGNUM=`expr ${PROGNUM} - 1`
ISNEW=`cat ${TMPFILE} | ruby -rrexml/document -e "puts REXML::Document.new(ARGF).elements[\"data/regular/program/isNew[${i}]\"].text"`
if test ${AFLAG} = TRUE -a ${ISNEW} = 0 ; then
PROGNUM=$((--PROGNUM))
ISNEW=$(ruby -rrexml/document -e "puts REXML::Document.new(ARGF).elements[\"data/regular/program/isNew[${i}]\"].text" < ${TMPFILE})
if test ${AFLAG} = TRUE -a "${ISNEW}" = 0 ; then
ISNEW=1
fi
TITLE=`cat ${TMPFILE} | ruby -rrexml/document -e "puts REXML::Document.new(ARGF).elements[\"data/regular/program/title[${i}]\"].text" | tr '/' ''`
NUM=`cat ${TMPFILE} | ruby -rrexml/document -e "puts REXML::Document.new(ARGF).elements[\"data/regular/program/number[${i}]\"].text"`
UPDATE=`cat ${TMPFILE} | ruby -rrexml/document -e "puts REXML::Document.new(ARGF).elements[\"data/regular/program/update[${i}]\"].text" | tr '/' '' | sed -e 's/$/日配信/'`
MP3FILE=`cat ${TMPFILE} | ruby -rrexml/document -e "puts REXML::Document.new(ARGF).elements[\"data/regular/program/fileUrlIphone[${i}]\"].text"`
i=`expr ${i} + 1`
TITLE=$(ruby -rrexml/document -e "puts REXML::Document.new(ARGF).elements[\"data/regular/program/title[${i}]\"].text" < ${TMPFILE} | tr '/' '')
NUM=$(ruby -rrexml/document -e "puts REXML::Document.new(ARGF).elements[\"data/regular/program/number[${i}]\"].text" < ${TMPFILE})
UPDATE=$(ruby -rrexml/document -e "puts REXML::Document.new(ARGF).elements[\"data/regular/program/update[${i}]\"].text" < ${TMPFILE} | tr '/' '' | sed -e 's/$/日配信/')
MP3FILE=$(ruby -rrexml/document -e "puts REXML::Document.new(ARGF).elements[\"data/regular/program/fileUrlIphone[${i}]\"].text" < ${TMPFILE})
i=$((++i))
if test ${ISNEW} != 1 ; then
continue
fi
# Question
echo -n "Record \"${TITLE}${NUM}回(${UPDATE}).mp3\"?[Yes/no/quit] "
read ANSWER
case `echo "$ANSWER" | tr [A-Z] [a-z]` in
case $(echo "$ANSWER" | tr '[:upper:]' '[:lower:]') in
no | n ) ANSWER=no
continue
;;
Expand All @@ -77,7 +76,7 @@ do
;;
esac

wget ${WGETOPTION} -O "${TITLE}${NUM}回(${UPDATE}).mp3" ${MP3FILE}
wget ${WGETOPTION} -O "${TITLE}${NUM}回(${UPDATE}).mp3" "${MP3FILE}"
done

rm ${RMOPTION} ${TMPFILE}
Expand Down
9 changes: 6 additions & 3 deletions rec_aandgplus.sh
Expand Up @@ -15,9 +15,12 @@ for i in 2 1 ; do
# ${RTMPDUMP} --rtmp "rtmpe://fms1.uniqueradio.jp/" \
# --playpath "aandg$i" \
# --app "?rtmp://fms-base1.mitene.ad.jp/agqr/" \
${RTMPDUMP} --rtmp "rtmp://fms-base$i.mitene.ad.jp/agqr/aandg2" \
--stop ${STOPSECS} \
--live \
# ${RTMPDUMP} --rtmp "rtmp://fms-base$i.mitene.ad.jp/agqr/aandg2" \
# --stop ${STOPSECS} \
# --live \
${RTMPDUMP} -r "rtmpe://fms$i.uniqueradio.jp/" -y "aandg11"\
-a "?rtmp://fms-base$i.mitene.ad.jp/agqr/"\
--stop ${STOPSECS} -v\
-o "${OUTFILE}"
if [ $? -eq 0 ]; then
break;
Expand Down
122 changes: 69 additions & 53 deletions rec_radiko.sh
@@ -1,32 +1,37 @@
#!/bin/sh -ex
DESTDIR="$HOME"
#!/bin/bash -ex

LANG=ja_JP.utf8

pid=$$
date=`date '+%Y-%m-%d-%H_%M'`
playerurl=http://radiko.jp/player/swf/player_3.0.0.01.swf
playerfile=${DESTDIR}/player.swf
keyfile=${DESTDIR}/authkey.png
XDATE=`date -v+1M +"%Y-%m%d-%H%M"`
WGET="/usr/local/bin/wget"
SWFEXTRACT="/usr/local/bin/swfextract"
RTMPDUMP="/usr/local/bin/rtmpdump"
FFMPEG="/usr/local/bin/ffmpeg"
AFCONVERT="/usr/bin/afconvert"

if [ $# -eq 0 ]; then
echo "usage : `basename $0` channel_name [stopmins]"
playerfile="/tmp/player.swf"
keyfile="/tmp/authkey.png"

outdir="."

if [ $# -le 1 ]; then
echo "usage : $0 channel_name duration(minuites) [outputdir] [prefix]"
exit 1
fi
channel=$1
output=${DESTDIR}/${channel}_${XDATE}.flv
AACFILE=${output%.flv}.aac
STOPMINS=${2:-120}
STOPSECS=`expr ${STOPMINS} \* 60 + 120`

trap 'rm -f ${output} ${AACFILE} $playerfile $keyfile' EXIT
if [ $# -ge 2 ]; then
channel=$1
DURATION=`expr $2 \* 60`
fi
if [ $# -ge 3 ]; then
outdir=$3
fi
PREFIX=${channel}
if [ $# -ge 4 ]; then
PREFIX=$4
fi

#
# get player
#
if [ ! -f $playerfile ]; then
${WGET} -q -O $playerfile $playerurl
wget -q -O $playerfile $playerurl

if [ $? -ne 0 ]; then
echo "failed get player"
Expand All @@ -38,22 +43,22 @@ fi
# get keydata (need swftool)
#
if [ ! -f $keyfile ]; then
${SWFEXTRACT} -b 14 $playerfile -o $keyfile
swfextract -b 14 $playerfile -o $keyfile

if [ ! -f $keyfile ]; then
echo "failed get keydata"
exit 1
fi
fi

if [ -f auth1_fms ]; then
rm -f auth1_fms
if [ -f auth1_fms_${pid} ]; then
rm -f auth1_fms_${pid}
fi

#
# access auth1_fms
#
${WGET} -q \
wget -q \
--header="pragma: no-cache" \
--header="X-Radiko-App: pc_1" \
--header="X-Radiko-App-Version: 2.0.1" \
Expand All @@ -62,6 +67,7 @@ ${WGET} -q \
--post-data='\r\n' \
--no-check-certificate \
--save-headers \
-O auth1_fms_${pid} \
https://radiko.jp/v2/api/auth1_fms

if [ $? -ne 0 ]; then
Expand All @@ -72,24 +78,24 @@ fi
#
# get partial key
#
authtoken=`perl -ne 'print $1 if(/x-radiko-authtoken: ([\w-]+)/i)' auth1_fms`
offset=`perl -ne 'print $1 if(/x-radiko-keyoffset: (\d+)/i)' auth1_fms`
length=`perl -ne 'print $1 if(/x-radiko-keylength: (\d+)/i)' auth1_fms`
authtoken=`perl -ne 'print $1 if(/x-radiko-authtoken: ([\w-]+)/i)' auth1_fms_${pid}`
offset=`perl -ne 'print $1 if(/x-radiko-keyoffset: (\d+)/i)' auth1_fms_${pid}`
length=`perl -ne 'print $1 if(/x-radiko-keylength: (\d+)/i)' auth1_fms_${pid}`

partialkey=`dd if=$keyfile bs=1 skip=${offset} count=${length} 2> /dev/null | base64`

echo "authtoken: ${authtoken} \noffset: ${offset} length: ${length} \npartialkey: $partialkey"
#echo "authtoken: ${authtoken} \noffset: ${offset} length: ${length} \npartialkey: $partialkey"

rm -f auth1_fms
rm -f auth1_fms_${pid}

if [ -f auth2_fms ]; then
rm -f auth2_fms
if [ -f auth2_fms_${pid} ]; then
rm -f auth2_fms_${pid}
fi

#
# access auth2_fms
#
${WGET} -q \
wget -q \
--header="pragma: no-cache" \
--header="X-Radiko-App: pc_1" \
--header="X-Radiko-App-Version: 2.0.1" \
Expand All @@ -99,41 +105,51 @@ ${WGET} -q \
--header="X-Radiko-Partialkey: ${partialkey}" \
--post-data='\r\n' \
--no-check-certificate \
-O auth2_fms_${pid} \
https://radiko.jp/v2/api/auth2_fms

if [ $? -ne 0 -o ! -f auth2_fms ]; then
if [ $? -ne 0 -o ! -f auth2_fms_${pid} ]; then
echo "failed auth2 process"
exit 1
fi

echo "authentication success"
#echo "authentication success"

areaid=`perl -ne 'print $1 if(/^([^,]+),/i)' auth2_fms`
echo "areaid: $areaid"
areaid=`perl -ne 'print $1 if(/^([^,]+),/i)' auth2_fms_${pid}`
#echo "areaid: $areaid"

rm -f auth2_fms
rm -f auth2_fms_${pid}

#
# get stream-url
#

if [ -f ${channel}.xml ]; then
rm -f ${channel}.xml
fi

wget -q "http://radiko.jp/v2/station/stream/${channel}.xml"

stream_url=`echo "cat /url/item[1]/text()" | xmllint --shell ${channel}.xml | tail -2 | head -1`
url_parts=(`echo ${stream_url} | perl -pe 's!^(.*)://(.*?)/(.*)/(.*?)$/!$1://$2 $3 $4!'`)

rm -f ${channel}.xml

#
# rtmpdump
#
${RTMPDUMP} -v \
-r "rtmpe://w-radiko.smartstream.ne.jp" \
--playpath "simul-stream.stream" \
--app "${channel}/_definst_" \
#rtmpdump -q \
rtmpdump \
-r ${url_parts[0]} \
--app ${url_parts[1]} \
--playpath ${url_parts[2]} \
-W $playerurl \
-C S:"" -C S:"" -C S:"" -C S:$authtoken \
--live \
--stop ${STOPSECS} \
--flv $output
--stop ${DURATION} \
--flv "/tmp/${channel}_${date}"

#
# convert flv to m4a
#
${FFMPEG} -i ${output} -vn -acodec copy ${AACFILE}
if [ $? != 0 ]; then
# http://bui.asablo.jp/blog/2012/02/24/6347167
${FFMPEG} -i ${output} ${AACFILE}
ffmpeg -loglevel quiet -y -i "/tmp/${channel}_${date}" -acodec libmp3lame -ab 128k "${outdir}/${PREFIX}_${date}.mp3"
if [ $? = 0 ]; then
rm -f "/tmp/${channel}_${date}"
fi
${AFCONVERT} -f m4af -d aach -b 48000 ${AACFILE}

exit 0

0 comments on commit ace4d8d

Please sign in to comment.