radikoセキュリティ強化対応版

radikoのセキュリティ強化とやらで前回設定したラジオの録音が出来ていなかった.(週末楽しみにしていたAVANTIもエレ片も聞き逃してしまった...).twitterで書いてみたところ,例によって@hitoriblogさんに教えてもらった.

http://twitter.com/hitoriblog/status/11998593848
@gm_kou これでいけるんかな http://bit.ly/cmSHew

というわけで,nukeさんの記事を元に,radikoのセキュリティ強化対応版.あと,変数を多用するように修正.


rtmpdump への -Bでの時間指定もうまくいっているようなので,これで対応する.

on run
set fDate to myDate()


set RTMPDUMP to "/opt/local/bin/rtmpdump"
set FFMPEG to "/usr/local/bin/ffmpeg"
set fPATH to "/Users/{USERNAME}/Sites/Radio/"


set fPROGRAM to "JUNK_ELEKATA"
set fSEC to "7200"


set fFLV to "" & fPATH & fPROGRAM & fDate & ".flv"
set fMP3 to "" & fPATH & fPROGRAM & fDate & ".mp3"

set fSTA to "TBS"
-- STA = (TBS, QRR, LFR, NSB, INT, FMT, FMJ)
-- STA = (ABC, MBS, OBC, CCL, 802, FMO)

do shell script "" & RTMPDUMP & " --rtmp \"rtmpe://radiko.smartstream.ne.jp/" & fSTA & "/_defInst_/simul-stream\" --live -B " & fSEC & " --flv " & fFLV
do shell script "" & FFMPEG & " -y -i " & fFLV & " -vn " & fMP3
do shell script "rm " & fFLV
end run

やってることは,前回と同じでシェルスクリプトを呼び出してるだけ.AppleScriptのdelay関数でタイマー張ってやろうかと思ったが,rtmpdumpが終了しないのでやめにした.

do shell script の直後に空文字列いれなきゃ動かないというのがなんともはや.