From 763f589be1adf8421135cfe59d3c56543b8964db Mon Sep 17 00:00:00 2001 From: Leo Butler Date: Sun, 28 Jun 2020 17:27:57 -0500 Subject: [PATCH] scripts to remove cut or skip lists Uses the concat muxer --- ffmpeg-cut-list.sh | 13 +++++ ffmpeg-cut-list0.sh | 130 ++++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 143 insertions(+) create mode 100755 ffmpeg-cut-list.sh create mode 100755 ffmpeg-cut-list0.sh diff --git a/ffmpeg-cut-list.sh b/ffmpeg-cut-list.sh new file mode 100755 index 0000000..c91ff10 --- /dev/null +++ b/ffmpeg-cut-list.sh @@ -0,0 +1,13 @@ +#!/bin/bash +chanid=$1 +starttime=$2 +skip_or_cutlist=${3:-"cutlist"} +logdir="/mnt/lvraid5/ffmpeg-cut-list.d" +logfile="$logdir/user-job-${chanid}-${starttime}.log" + +if ! test -d $logdir; then + mkdir -p $logdir; +fi + +ionice -c 3 ffmpeg-cut-list0.sh $chanid $starttime $skip_or_cutlist 2>> $logfile >> $logfile + diff --git a/ffmpeg-cut-list0.sh b/ffmpeg-cut-list0.sh new file mode 100755 index 0000000..25b4ffd --- /dev/null +++ b/ffmpeg-cut-list0.sh @@ -0,0 +1,130 @@ +#!/bin/bash +set -e +set -x +chanid=$1 +starttime=$2 +skip_or_cutlist=$3 +if test "$skip_or_cutlist" = "cutlist" -o "$skip_or_cutlist" = "skiplist"; then + echo skip_or_cutlist set to ${skip_or_cutlist} by "\$3" +else + if test "$A1" = "cutlist" -o "$A1" = "skiplist"; then + skip_or_cutlist="$A1" + else + echo Setting skip_or_cutlist to cutlist + skip_or_cutlist="cutlist" + fi +fi +overwrite=${overwrite:-1} +updatedb=${updatedb:-1} + +# 1071_20190127040000.ts +function get_cut_list { + cmd="mythutil --quiet --get${skip_or_cutlist} --chanid $chanid --starttime $starttime | awk -v RS=': +' -v OFS=' ' '/^[0-9]/{gsub(/-/,\",\"); print \$1}'" + $debug $cmd +} +function ffmpeg_concat { + ## use solution from stackoverflow ffmpeg concat video and audio out of sync + ## this may be overkill and unneeded? + outsave_ffconcat="$1" + files=$(tail -n +2 "$outsave_ffconcat" | cut -d' ' -f 2) + for f in $files; do + outf=${workdir}/${f/.${ending}/_tmp.${ending}} + inf=${workdir}/$f + $ffmpeg -y -i "$inf" -map 0 -c:a ac3 -af apad -c:v copy -shortest -avoid_negative_ts make_zero -fflags +genpts "$outf" + if test $? -eq 0; then + mv "$outf" "$inf" + else + echo Error generating $outf. Halt + exit 10 + fi + done + $ffmpeg -y -f concat -safe 0 -i $outsave_ffconcat -codec copy -map 0 -metadata \"service_name=$0\" $outfile +} + +framelist="$(get_cut_list)" +if test -z "$framelist"; then + echo Empty frame list with skip_or_cutlist=$skip_or_cutlist. Stop. + exit 0 +else + echo Frame list: $framelist. +fi +framelist0=${framelist:0:1} +if test "0" = "$framelist0"; then + inclbeginning=1 + framelist=${framelist:2} +else + inclbeginning=0 +fi +echo Cutting every other window beginning with $((1-inclbeginning)). +echo Frame list: $framelist + +if ! test -d $workdir; then + mkdir $workdir + chmod 1777 $workdir +fi +fileroot="${chanid}_${starttime}" +# should get infile from recorded.basename in db +infile=$(ls ${recordingsdir}/${fileroot}.{mpg,ts,mkv,mp4} 2>/dev/null | sort -u | head -n 1) +out_ffconcat="${workdir}/${fileroot}.ffconcat" +outsave_ffconcat="${workdir}/${fileroot}-save.ffconcat" +ending=$(echo "$infile" | awk -v FS='.' '{print $NF}') +outfile_tmp="${workdir}/${fileroot}_%05d.${ending}" +outfile="${workdir}/${fileroot}.${ending}" + +if test -z "$infile"; then + echo Did not find input file. Stop. + exit 8 +fi +if ! test -r "$infile"; then + echo File "$infile" is not readable. Stop. + exit 8 +fi +if test -z "$ending"; then + echo Did not find file ending. Stop. + exit 9 +fi + +## https://superuser.com/questions/710008/how-to-get-rid-of-ffmpeg-pts-has-no-value-error/ +ffmpegcut="$ffmpeg -fflags '+genpts' -ignore_unknown -y -i \"$infile\" -codec copy -map 0 -map -0:d -f segment -segment_list \"$out_ffconcat\" -segment_frames \"$framelist\" \"${outfile_tmp}\"" +echo $ffmpegcut +eval $ffmpegcut + +if test $? -ne 0; then + echo "Error in ffmpeg command. Halt." + exit 2 +fi +match="1{p};" +n=$(cat $out_ffconcat | wc -l) +for((i=$((inclbeginning+2));i<$n;i=i+2)); do + match="${match}$i{p};" +done +echo $match +sed -n -e "${match}" $out_ffconcat > $outsave_ffconcat +if ! test -r $outsave_ffconcat; then + echo File $outsave_ffconcat not created. Halt. + exit 3 +fi +nlines=$(wc -l $outsave_ffconcat | cut -d' ' -f 1) +if test "x$nlines" = "x2"; then + mv $workdir/$(tail -n 1 $outsave_ffconcat | cut -d' ' -f 2) $outfile +else + ffmpeg_concat "$outsave_ffconcat" +fi + +if test $? -ne 0; then + echo Concat failed. Halt. + exit 4 +else + touch --reference="$infile" "$outfile" + if test $overwrite -ne 0; then + mv $outfile $destdir/. + # only update the db if we overwrite the recording + if test $updatedb -ne 0; then + myth-rebuild-seektable.sh $chanid $starttime $workdir + fi + fi +fi +exit 0 + +## (export path=/var/lib/mythtv/recordings/; export file=1031_20181128070100.ts; /usr/local/bin/ffmpeg -y -i ${path}/${file} -f lavfi -i movie=${path}/${file}[out0+subcc] -preset slow -crf 21 -map 0:a -map 1 -map_metadata 1:s:0 -metadata:s:s "language=fre" ${file/.ts/1.mkv}) +##