チェンジセット 83: trunk/install/perl/ipodtranscode.pl

コミット日時:

2008/12/30 22:12:46 (15 年前)

コミッタ:

sorshi

ログメッセージ:

foltiaHD最初のリリース。
デジタル録画はFriio/Friio BS/CSのみに対応。
ivtvは1.0系使用になりました。

ファイル:

• trunk/install/perl/ipodtranscode.pl (更新) (6 diffs)

trunk/install/perl/ipodtranscode.pl

@@ -1 +1 @@
-#!/usr/bin/perl
-/path/to/mpeg2.m2p mp4filenamestring /path/to/mpeg2/tid.localized/mp4/ PID [aspect]
+
-#
-# Anime recording system foltia
-# http://www.dcc-jpl.com/soft/foltia/
-#
-#
-# iPod MPEG4/H.264トラコン
-# ffmpegを呼び出して変換
-# ffmpegはiPodパッチあて版を想定している
-# ffmpegの作り方は
-# http://www.dcc-jpl.com/diary/ddata2006/02A.html#20060215-00
-#
-# DCC-JPL Japan/foltia project
@@ -18 +14 @@
-use DBD::Pg;
-use Jcode;
-
-
-$path = $0;
@@ -25 +20 @@
-push( @INC, "$path");
-}
-
-require "foltialib.pl";
-
-
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
-
-#DB初期化
@@ -46 +39 @@
-         $dbh = DBI->connect($data_source,$DBUser,$DBPass) ||die $DBI::error;;
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-# タイトル取得
-if ($pid ne ""){
@@ -82 +119 @@
-
-}
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-# クオリティごとに
-
-
-
+
+
-$mp4file = "${mp4outdir}M4V${mp4filenamestring}.MP4";
-
-
-
-
+
+
+
+
+
+
-$mp4file = "${mp4outdir}MAQ${mp4filenamestring}.MP4";
-
-
-
-
+
+
+
+
+
+
-$mp4file = "${mp4outdir}MAQ${mp4filenamestring}.MP4";
-
-
-
-
+
+
+
+
+
+
-$mp4file = "${mp4outdir}MAQ${mp4filenamestring}.MP4";
-
-
-
-
+
+
+
+
+
+
-$mp4file = "${mp4outdir}MAQ${mp4filenamestring}.MP4";
-
-
-
+
+
+
+
+
-
-$encodeoptionlog = $encodeoption;
@@ -122 +347 @@
-&writelog("ipodtranscode START QTY=$trconqty $encodeoptionlog");
-#print "ffmpeg $encodeoptionlog \n";
-
+
+
-&writelog("ipodtranscode FFEND $inputmpeg2");
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+