Adobe flashのサポート終了に伴う、ザリガニが見ていたさんのrec_radiko.shの変更

主題
Adobe flashのサポート終了に伴う、ザリガニが見ていたさんのrec_radiko.shの変更点について述べる。

背景
遅きに失した感はあるが、Adobe flashのサポート終了に伴い、ファンであるザリガニが見ていたさんのrec_radiko.shが動かなくなってしまっていた。使っていないのがバレた気もするし、ほとんどあるスクリプトのコピペなのだが、一応公開しておく。
なお、このスクリプトはエリアフリー対応ではない。エリア外のラジオ局を録音しようとすると、403 Forbiddenで終了する。

手順

ベーススクリプト
ザリガニが見ていたさんのスクリプト
筆者によるベーススクリプトの仕様変更
diffファイルはこちらからダウンロードできる。
Big Sur導入によって必要となったスクリプトの仕様変更

diffファイルは、こちらからダウンロードできる。

Adobe flash廃止によって必要となったスクリプトの仕様変更

--- a/rec_radiko.sh	2020-11-16 09:04:23.000000000 +0900
+++ b/rec_radiko.sh	2021-07-17 16:25:11.000000000 +0900
@@ -2,7 +2,7 @@
# Original1: https://gist.github.com/875864 saiten / rec_radiko.sh
# Original2: http://backslash.ddo.jp/wordpress/archives/1020 http://backslash.ddo.jp/tools/rec_radiko2.txt

-# Install: wget swftools rtmpdump ffmpeg http://d.hatena.ne.jp/zariganitosh/20130120/radiko_recoding_again
+# Install: wget ffmpeg http://d.hatena.ne.jp/zariganitosh/20130120/radiko_recoding_again

PATH=$PATH:/usr/local/bin
VERSION=4.0.0
@@ -25,39 +25,13 @@
# 認証
radiko_authorize() {
echo "==== authorize ===="
-  #
-  # get player
-  #
-  if [ ! -f $playerfile ]; then
-    echo $playerfile downloading...
-    wget -q -O $playerfile $playerurl
-
-    if [ $? -ne 0 ]; then
-      echo "failed get player"
-      exit 1
-    fi
-  fi
-
-  #
-  # get keydata (need swftool)
-  #
-  if [ ! -f $keyfile ]; then
-    echo $keyfile extracting...
-    # swfextract -b 5 $playerfile -o $keyfile <---radiko仕様変更点
-    swfextract -b 12 $playerfile -o $keyfile
-
-    if [ ! -f $keyfile ]; then
-      echo "failed get keydata"
-      exit 1
-    fi
-  fi
-
+authkey_value="bcd151073c03b352e1ef2fd66c32209da9ca0afa"
#
# access auth1_fms
#
wget -q \
        --header="pragma: no-cache" \
-       --header="X-Radiko-App: pc_ts" \
+       --header="X-Radiko-App: pc_html5" \
        --header="X-Radiko-App-Version: $VERSION" \
        --header="X-Radiko-User: test-stream" \
        --header="X-Radiko-Device: pc" \
@@ -77,16 +51,20 @@
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_$$`
-  partialkey=`dd if=$keyfile bs=1 skip=${offset} count=${length} 2> /dev/null | base64`
+  partialkey=`echo $authkey_value | dd bs=1 skip=${offset} count=${length} 2> /dev/null | base64`
+
+  echo "authtoken: ${authtoken}
+  offset: ${offset}
+  length: ${length}
+  partialkey:
+  $partialkey"

-  echo "authtoken: ${authtoken}\n offset: ${offset}\n length: ${length}\n partialkey: $partialkey"
-
#
# access auth2_fms
#
wget -q \
        --header="pragma: no-cache" \
-       --header="X-Radiko-App: pc_ts" \
+       --header="X-Radiko-App: pc_html5" \
        --header="X-Radiko-App-Version: $VERSION" \
        --header="X-Radiko-User: test-stream" \
        --header="X-Radiko-Device: pc" \
@@ -113,27 +91,24 @@
#
# get stream-url
#
-  channel_xml=`wget -q "http://radiko.jp/v2/station/stream/${channel}.xml" -O -`
-  stream_url=`echo $channel_xml | sed 's/^\(\)/\1UTF-8\2/' | xpath -e  "//url/item[1]/text()" 2>/dev/null`
-  stream_url_parts=(`echo ${stream_url} | perl -pe 's!^(.*)://(.*?)/(.*)/(.*?)$/!$1://$2 $3 $4!'`)
+  channel_xml=`wget -q "http://radiko.jp/v2/station/stream_smh_multi/${channel}.xml" -O -`
+  stream_url=`echo $channel_xml | xpath -e "/urls/url[@areafree='0'][1]/playlist_create_url/text()" 2>/dev/null`

#
-  # get authtoken
-  #
-  authtoken=`perl -ne 'print $1 if(/x-radiko-authtoken: ([\w-]+)/i)' auth1_fms_$$`
-
-  #
-  # rtmpdump
+  # Record HLS with ffmpeg
#
echo "save as '$output'"
-  rtmpdump -r ${stream_url_parts[0]} \
-           --app ${stream_url_parts[1]} \
-           --playpath ${stream_url_parts[2]} \
-           -W $playerurl \
-           -C S:"" -C S:"" -C S:"" -C S:$authtoken \
-           --live \
-           --stop "${rectime:=30}" \
-           --flv "${output}"
+  ffmpeg \
+    -loglevel error \
+    -fflags +discardcorrupt \
+    -headers "X-Radiko-Authtoken: ${authtoken}" \
+    -i "${stream_url}" \
+    -acodec copy \
+    -vn \
+    -bsf:a aac_adtstoasc \
+    -y \
+    -t ${rectime:=30} \
+    "${output}"
}

# 引数解析
@@ -173,13 +148,8 @@

mkdir -p ${wdir:=$HOME/Downloads} ; cd $wdir ; wdir=`pwd`

-station_name=`curl -s http://radiko.jp/v2/api/program/station/today?station_id=$channel|xpath "//station/name/text()" 2>/dev/null`
-output="${wdir}/${fname:=${station_name}_`date +%Y%m%d-%H%M`}${fext:=.flv}"
-
-# playerurl=http://radiko.jp/player/swf/player_2.0.1.00.swf <---radiko仕様変更点
-playerurl=http://radiko.jp/apps/js/flash/myplayer-release.swf
-playerfile=./player.swf
-keyfile=./authkey.jpg
+station_name=`curl -s http://radiko.jp/v2/api/program/station/today?station_id=$channel|xpath -e "//station/name/text()" 2>/dev/null`
+output="${wdir}/${fname:=${station_name}_`date +%Y%m%d-%H%M`}${fext:=.m4a}"

if [ "$OPTION_a" = "TRUE" ]; then
radiko_authorize && cat auth2_fms_$$|grep -e '^\w\+'
@@ -187,9 +157,5 @@
radiko_authorize && radiko_record
fi

-ffmpeg -v quiet -y -i "${output}" -c: copy "${output%.*}.aac"
-MP4Box -add "${output%.*}.aac" "${output%.*}.m4a" -sbr
-rm -f "${output}"
-rm -f "${output%.*}.aac"
rm -f auth1_fms_$$
rm -f auth2_fms_$$

diffファイルは、こちらからダウンロードできる。

パッチの適用

patch -p1 < rec_radiko.patch
patch -p1 < rec_radiko_big_sur.patch
patch -p1 < rec_radiko_remove_flash_releted.patch

参考サイト

radiko – nagahara

以上。

桃源老師のつぶやき

Adobe flashのサポート終了に伴う、ザリガニが見ていたさんのrec_radiko.shの変更

この投稿へのコメント

コメントを残すコメントをキャンセル

この投稿へのトラックバック

2021年7月
月	火	水	木	金	土	日
			1	2	3	4
5	6	7	8	9	10	11
12	13	14	15	16	17	18
19	20	21	22	23	24	25
26	27	28	29	30	31

Adobe flashのサポート終了に伴う、ザリガニが見ていたさんのrec_radiko.shの変更

関連記事

macOSをVirtualBoxの仮想マシンにインストールするスクリプトの紹介

ザリガニさんのrec_radiko.shへのradiko仕様変更点の反映

Retina Displayの威力でWindowsのフォントの見栄えが改善したという話

この投稿へのコメント

コメントを残す コメントをキャンセル

この投稿へのトラックバック

コメントを残すコメントをキャンセル