- 【UOT-100】24時間ワンセグ野郎 Part04【LOG-J200】
818 ：名無しさん＠編集中[sage]：2010/10/15(金) 01:32:00 ID:azP4ptI+ - >>817
乙です。
うちではBuzzPlayerでうまく動いています。
指定日時の番組表示も１〜２秒で出ます。ATOM環境です。
出来れば、録画が完了していない番組は選択出来ないようにしてもらえると嬉しいです。
Perl RTMPは以下のように改造してあります。
lib/RTMP.pm
sub receive {
my($s, $buf) = @_;
$s->{buffer}->append($buf);
my $Crebeg;
$Crebeg = 0;
if($buf =~ /createStream/i){
$s->{method}->createStream();
warn "[rtmp] createStream\n";
$Crebeg = 1;
}elsif($buf =~ /play/i){
$buf =~ /([0-9]{6}-[0-9]{6}-[0-9]{6}-[0-9]{2}\.flv)/;
my $opt = $1;
if($opt ne ""){
$s->play($opt);
warn "[rtmp] play $opt\n";
}
} elsif ($buf =~ /closeStream/i) {
warn "[rtmp] closeStream\n";
} elsif ($buf =~ /deleteStream/i) {
warn "[rtmp] deleteStream\n";
}
|
- 【UOT-100】24時間ワンセグ野郎 Part04【LOG-J200】
819 ：名無しさん＠編集中[sage]：2010/10/15(金) 01:33:25 ID:azP4ptI+ - つづき
while($s->{buffer}->{pos} < $s->{buffer}->{length}) {
if (!$s->{handshake}->complete) {
$s->{handshake}->execute();
next;
}
my $packet = $s->{serializer}->receive();
if ($packet->{data_type} == 20) {
my($method, $request_id, $args, $option) = RTMP::AMF::loadArray
($packet->{data});
if ($method eq 'connect') {
$s->{method}->connect();
warn "[rtmp] connect\n";
} elsif ($method eq 'createStream') {
if($Crebeg eq 0){
$s->{method}->createStream();
warn "[rtmp] createStream\n";
}
ここまで
|
- 【UOT-100】24時間ワンセグ野郎 Part04【LOG-J200】
820 ：名無しさん＠編集中[sage]：2010/10/15(金) 09:42:41 ID:azP4ptI+ - >>817
訂正です。
録画が開始されていない番組を選択出来ないようになるといいなと思いました。
あと指定日時の次の画面は放送局選択になり、そこから番組表という遷移になると見やすいと思いました。
スタートページですが１週間ごとに指定日時が出ますが、録画されている日数分全て表示されても良いと思います。
指定日時で１５秒かかるとのことですが、ちょっと思い当たる点があります。
僕も同じ現象で悩んでいたのですが、3G回線経由で接続すると速いがWifiだと遅いという現象でした。
結局のところ、ローカルIPの逆引きに時間が掛かっていて遅かったという落ちでした。
Apacheを使っていて、アクセスコントロールしていたり逆引きする設定をしているのであれば確認してみてください。
|