Centralise code for mp3 & mpg generation. Update to ffmpeg 2.8

This commit is contained in:
HummyPkg 2017-02-22 07:26:58 +00:00
parent 40c54af482
commit 19a2eaf8db
8 changed files with 93 additions and 87 deletions

View File

@ -18,27 +18,12 @@ set base [file rootname $rfile]
set shname [file tail $base]
puts "Processing $shname"
set cmd [list ffmpeg -y -benchmark -v 0 -i "$rfile" -f mp3 -vn]
set slow [[settings] audiomp3]
if {![[settings] audiomp3]} {
lappend cmd -acodec copy
}
lappend cmd "${base}.mp3"
#puts "$cmd"
set token [system startop -multiple mp3 $rfile]
puts [exec {*}$cmd]
puts [$ts mkmp3 $slow]
system endop $token
if {[system pkginst id3v2]} {
puts [exec /mod/bin/id3v2 \
--song "[$ts get title]" \
--comment "[$ts get synopsis]" \
--album "[$ts get channel_name]" \
--year "[clock format [$ts get start] -format {%Y}]" \
"${base}.mp3"]
}
set xtime [expr [expr [clock milliseconds] - $xstart] / 1000.0]
puts "Time taken: $xtime"

View File

@ -5,10 +5,6 @@ source /mod/webif/lib/setup
httpheader
if {[file exists /mod/bin/ffmpeg]} {
set file [cgi_get file]
puts [exec /mod/webif/lib/bin/ffmpeg -i $file]
} else {
puts "Install ffmpeg package for more information..."
}
puts [exec /mod/bin/ffprobe -hide_banner $file]

View File

@ -13,7 +13,8 @@ foreach file [readdir $dir] {
if {[file extension $file] ne ".mp3"} continue
if {[catch {
set lines [exec ffprobe -v error -show_streams "$dir/$file"]
set lines [exec ffprobe -hide_banner -v error \
-show_streams "$dir/$file"]
}]} continue
foreach line $lines {

View File

@ -14,15 +14,8 @@ set len [$ts duration 1]
set xstart [clock milliseconds]
set base [file rootname $rfile]
set shname [file tail $base]
puts "Processing $shname"
set token [system startop -multiple mpg $rfile]
puts [exec /mod/bin/ffmpeg -y -benchmark -v 0 \
-i $rfile \
-map 0:0 -map 0:1 \
-vcodec copy -acodec copy "${base}.mpg"]
$ts mkmpg
system endop $token
set xtime [expr [expr [clock milliseconds] - $xstart] / 1000.0]

View File

@ -17,11 +17,6 @@ proc ::mp3::dequeue {q ts} {
return {"DEFER" "Not decrypted"}
}
if {[$ts get definition] eq "HD"} {
# Cannot extract a useful MP3 from a HD recording.
return {"FAILED" "Cannot process high-definition recording"}
}
if {[::auto::inuse $ts]} {
return {"DEFER" "Recording in use"}
}
@ -38,34 +33,16 @@ proc ::mp3::dequeue {q ts} {
log " MP3: $file" 0
log " Converting... [$::auto::settings \
audiomp3descr $mp3mode]" 0
if {[catch {
set cmd [list nice -n 19 \
/mod/bin/ffmpeg -y -benchmark -v 0 -i "$file.ts" \
-f mp3 -vn]
if {!$mp3mode} { lappend cmd -acodec copy }
lappend cmd "$tmp/mp3.mp3"
foreach line [split [exec {*}$cmd] "\n"] {
log [string trim $line] 0
}
} msg]} {
if {[catch {set msg [$ts mkmp3 $mp3mode "$tmp/mp3"]} msg]} {
system notify "$file - auto-mp3 - error $msg."
system endop mp3
return [list "FAILED" $msg]
}
if {[system pkginst id3v2]} {
catch {
log [exec /mod/bin/id3v2 \
--song "[$ts get title]" \
--comment "[$ts get synopsis]" \
--album "[$ts get channel_name]" \
--year "[clock format [$ts get start] -format {%Y}]" \
"$tmp/mp3.mp3"] 0
}
foreach line [split $msg "\n"] {
log [string trim $line] 0
}
# Move the MP3 into the local directory
file rename $tmp/mp3.mp3 $file.mp3
set summary [::auto::endclock [$ts size]]
system endop mp3

View File

@ -30,22 +30,17 @@ proc ::mpg::dequeue {q ts} {
log " MPG: $file" 0
log " Converting..." 0
if {[catch {
foreach line [split \
[exec nice -n 19 /mod/bin/ffmpeg -y -benchmark -v 0 \
-i $file.ts \
-map 0:0 -map 0:1 \
-vcodec copy -acodec copy $tmp/mpg.mpg] "\n"] {
log $line 0
}
} msg]} {
if {[catch {set msg [$ts mkmpg "$tmp/mpg"]} msg]} {
system notify "$file - auto-mpg - error $msg."
system endop mpg
return [list "FAILED" $msg]
}
# Move the MPG into the local directory
file rename $tmp/mpg.mpg $file.mpg
foreach line [split $msg "\n"] {
log [string trim $line] 0
}
set summary [::auto::endclock [$ts size]]
system endop mpg

View File

@ -1,14 +0,0 @@
#!/bin/sh
if [ -x /mod/bin/ffprobe ]; then
/mod/bin/ffprobe "$@" 2>&1 | sed '
1,10d
'
else
/mod/bin/ffmpeg "$@" 2>&1 | sed '
1,8d
$d
'
fi
exit 0

View File

@ -364,9 +364,82 @@ ts method mkthm {{offset 0}} {
exec /bin/echo -n " " >> $bfile.thm~
file rename -force $bfile.thm~ $bfile.thm
file tdelete $bfile.bmp
$self setflag thumbnail
return 1
}
# From MontysEvilTwin
# - https://hummy.tv/forum/threads/7787/page-2#post-106826
# ffmpeg -i "File 1.ts" -c:a mp3 -b:a 128k "File 1.mp3"
# ffmpeg -i "File 1.ts" -c:a copy "File 1.mp2"
# ffmpeg -i "File 1.ts" -c:a copy "File 1.loas"
ts method mkmp3 {{slow false} {tmp ""} {v 0} {br 128}} {
set rfile [file rootname $file]
if {$slow} {
set opts [list -c:a mp3 -b:a ${br}k]
set ext mp3
} else {
set opts [list -c:a copy]
if {$definition eq "HD"} {
set ext loas
} else {
set ext mp2
}
}
set cmd [list /mod/bin/ffmpeg \
-y -benchmark -vn -v $v \
-i $file {*}$opts \
]
if {$tmp eq ""} {
lappend cmd "${rfile}.$ext"
} else {
lappend cmd "$tmp.$ext"
}
set output [exec {*}$cmd]
if {$tmp ne ""} {
file rename "$tmp.$ext" "${rfile}.mp3"
} elseif {$ext ne "mp3"} {
file rename "${rfile}.$ext" "${rfile}.mp3"
}
exec /mod/bin/id3v2 \
--song $title \
--comment $synopsis \
--album $channel_name \
--year "[clock format $start -format {%Y}]" \
"${rfile}.mp3"
return $output
}
ts method mkmpg {{tmp ""}} {
set rfile [file rootname $file]
set cmd [list /mod/bin/ffmpeg \
-y -benchmark -v 0 \
-i $file \
-map 0:0 -map 0:1 \
-vcodec copy -acodec copy]
if {$tmp eq ""} {
lappend cmd "${rfile}.mpg"
} else {
lappend cmd "$tmp.mpg"
}
set output [exec {*}$cmd]
if {$tmp ne ""} {
file rename "$tmp.mpg" "${rfile}.mpg"
}
return $output
}
proc {ts renamegroup} {from to} {
global tsgroup