r271-635

Radikoを録音するスクリプトがgoogle検索で沢山見つかるが、うまくいかないものもあるので、録音を確認できたスクリプトを転載しておく。

rec_radiko2.shをダウンロードする

スクリプト中で PID を用いて一時ファイル名を決定しているため、スクリプトに実行属性を与えて実行すること。放送局IDは、http://www.dcc-jpl.com/foltia/wiki/radikomemoを参照。

#!/bin/bash
 
# original sourcecode from 
# http://shinyamatsuyama.blogspot.jp/2013/06/raspberrypiradiko.html
 
pid=$$
date=`date '+%Y%m%d%H%M'`
playerurl=http://radiko.jp/player/swf/player_3.0.0.01.swf
playerfile="/tmp/player.swf"
keyfile="/tmp/authkey.png"
 
channel=$1
DURATION=`expr $2 \* 60`
if [ $# -eq 2 ]; then
  outdir="."
elif [ $# -eq 3 ]; then
  outdir=$3
else
  echo "usage : $0 channel_name duration(minuites) [outputdir]"
  exit 1
fi
 
#
# get player
#
if [ ! -f $playerfile ]; then
  wget -q -O $playerfile $playerurl
 
  if [ $? -ne 0 ]; then
    echo "failed get player (${playerurl})"
    exit 1
  fi
fi
 
#
# get keydata (need swftool)
#
if [ ! -f $keyfile ]; then
  swfextract -b 14 $playerfile -o $keyfile
 
  if [ ! -f $keyfile ]; then
    echo "failed get keydata"
    exit 1
  fi
fi
 
if [ -f auth1_fms_${pid} ]; then
  rm -f auth1_fms_${pid}
fi
 
#
# access auth1_fms
#
wget -q \
     --header="pragma: no-cache" \
     --header="X-Radiko-App: pc_1" \
     --header="X-Radiko-App-Version: 2.0.1" \
     --header="X-Radiko-User: test-stream" \
     --header="X-Radiko-Device: pc" \
     --post-data='\r\n' \
     --no-check-certificate \
     --save-headers \
     -O auth1_fms_${pid} \
     https://radiko.jp/v2/api/auth1_fms
 
if [ $? -ne 0 ]; then
  echo "failed auth1 process"
  exit 1
fi
 
#
# get partial key
#
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}"
echo "offset: ${offset} length: ${length}"
echo "partialkey: $partialkey"
 
rm -f auth1_fms_${pid}
 
if [ -f auth2_fms_${pid} ]; then
  rm -f auth2_fms_${pid}
fi
 
#
# access auth2_fms
#
wget -q \
     --header="pragma: no-cache" \
     --header="X-Radiko-App: pc_1" \
     --header="X-Radiko-App-Version: 2.0.1" \
     --header="X-Radiko-User: test-stream" \
     --header="X-Radiko-Device: pc" \
     --header="X-Radiko-Authtoken: ${authtoken}" \
     --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_${pid} ]; then
  echo "failed auth2 process"
  exit 1
fi
 
echo "authentication success"
 
areaid=`perl -ne 'print $1 if(/^([^,]+),/i)' auth2_fms_${pid}`
echo "areaid: $areaid"
 
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
 
echo "stream_url: ${stream_url}"
echo "url_parts: ${url_parts}"
 
#
# rtmpdump
#
rtmpdump -v \
         -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 ${DURATION} \
         --flv "/tmp/${channel}_${date}"
 
#
# convert flv into mp3 (ffmpeg)
#
ffmpeg -y -i "/tmp/${channel}_${date}" -vn -acodec libmp3lame -ar 44100 -ab 128k "${outdir}/${channel}_${date}.mp3"
 
if [ $? = 0 ]; then
  rm -f "/tmp/${channel}_${date}"
fi
 
#
# remove playerfile and keyfile
#
rm -f "/tmp/$playerfile"
rm -f "/tmp/$keyfile"