Skip to content

Instantly share code, notes, and snippets.

@macrat
Forked from ihsoy-s/play_nhk-radio.sh
Last active August 28, 2016 15:21
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save macrat/957e676be2e09ff866c894abaeee85f2 to your computer and use it in GitHub Desktop.
Save macrat/957e676be2e09ff866c894abaeee85f2 to your computer and use it in GitHub Desktop.
コンソールからradiko.jp聞くやつ。
#!/bin/bash
if [ $# -eq 1 ]; then
channel=$1
else
echo "usage : $0 channel_name"
echo " channel_name list"
echo " TBS Radio: TBS"
echo " Nippon Cultural Broadcasting: QRR"
echo " Nippon Broadcasting: LFR"
echo " Radio Nippon: JORF"
echo " Inter FM: INT"
echo " Tokyo FM: FMT"
echo " J-WAVE: FMJ"
echo " bayfm 78.0MHz: BAYFM78"
echo " NACK5: NACK5"
echo " FM yokohama 84.7: YFM"
exit 1
fi
#
# parameter setting
#
pid=$$
date=`date '+%Y-%m-%d-%H:%M'`
playerurl=http://radiko.jp/player/swf/player_4.1.0.00.swf
outdir="${XDG_CACHE_HOME:-/tmp}/radio"
playerfile="${outdir}/player.swf"
keyfile="${outdir}/authkey.png"
auth1_fms_file="${outdir}/auth1_fms_${pid}"
auth2_fms_file="${outdir}/auth2_fms_${pid}"
channel_file="${outdir}/${channel}.xml"
mkdir -p ${outdir}
#
# get player
#
if [ ! -f $playerfile ]; then
wget -q -O $playerfile $playerurl
if [ $? -ne 0 ]; then
echo "failed to get player"
exit 1
fi
fi
#
# get keydata (need swftool)
#
if [ ! -f $keyfile ]; then
swfextract -b 14 $playerfile -o $keyfile
if [ ! -f $keyfile ]; then
echo "failed to get keydata"
exit 1
fi
fi
if [ -f ${auth1_fms_file} ]; then
rm -f ${auth1_fms_file}
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_file} \
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_file}`
offset=`perl -ne 'print $1 if(/x-radiko-keyoffset: (\d+)/i)' ${auth1_fms_file}`
length=`perl -ne 'print $1 if(/x-radiko-keylength: (\d+)/i)' ${auth1_fms_file}`
partialkey=`dd if=$keyfile bs=1 skip=${offset} count=${length} 2> /dev/null | base64`
printf "authtoken: ${authtoken}\noffset: ${offset} length: ${length}\npartialkey: $partialkey\n"
rm -f ${auth1_fms_file}
if [ -f ${auth2_fms_file} ]; then
rm -f ${auth2_fms_file}
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_file} \
https://radiko.jp/v2/api/auth2_fms
if [ $? -ne 0 -o ! -f ${auth2_fms_file} ]; then
echo "failed auth2 process"
exit 1
fi
echo "authentication success"
areaid=`perl -ne 'print $1 if(/^([^,]+),/i)' ${auth2_fms_file}`
echo "areaid: $areaid"
rm -f ${auth2_fms_file}
#
# rtmpdump and mplayer
#
rtmpdump -v \
-r 'rtmpe://f-radiko.smartstream.ne.jp' \
--app "${channel}/_definst_" \
--playpath 'simul-stream.stream' \
-W $playerurl \
-C S:"" -C S:"" -C S:"" -C S:$authtoken \
--live\
| mplayer -
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment