首页 > 解决方案 > 有没有办法用ffmpeg按章节批量拆分文件,然后在windows中用mkvmerge重新组装?

问题描述

所以我最初制作了一个批处理脚本,能够相对精确地将视频修剪成章节,而无需通过关键帧运行,但代码看起来很糟糕,我无法让它循环遍历所有 mp4 文件,也无法让 mkvmerge 附加文件将它们分开后。代码在下面,但要温柔,这是我的第一次尝试。

@echo off
setlocal enableDelayedExpansion

REM CODE BELOW CREATES JSON FILES FOR ALL MP4 FILES WITHIN THE SAME DIRECTORY
ffprobe -v quiet -print_format json -show_chapters -loglevel error "01x01.mp4" > "01x01.json"

REM CODE BELOW SETS VARIABLES FROM EACH SPECIFIC JSON
FOR /F "delims=" %%i in ('jq .chapters[2].start ^< 01x01.json') DO SET /A start1=%%i
FOR /F "delims=" %%j in ('jq .chapters[2].end ^< 01x01.json') DO SET /A end1=%%j

FOR /F "delims=" %%k in ('jq .chapters[4].start ^< 01x01.json') DO SET /A start2=%%k
FOR /F "delims=" %%l in ('jq .chapters[4].end ^< 01x01.json') DO SET /A end2=%%l

FOR /F "delims=" %%m in ('jq .chapters[6].start ^< 01x01.json') DO SET /A start3=%%m
FOR /F "delims=" %%n in ('jq .chapters[6].end ^< 01x01.json') DO SET /A end3=%%n

FOR /F "delims=" %%o in ('jq .chapters[8].start ^< 01x01.json') DO SET /A start4=%%o
FOR /F "delims=" %%p in ('jq .chapters[8].end ^< 01x01.json') DO SET /A end4=%%p

REM SETS THE DURATION OF EACH FILE TO USE PRECISION TIMING FOR START AND STOP TIMES
CALL vbs (%end1%-%start1%)/1000
SET duration1=%val%
CALL vbs (%end2%-%start2%)/1000
SET duration2=%val%
CALL vbs (%end3%-%start3%)/1000
SET duration3=%val%
CALL vbs (%end4%-%start4%)/1000
SET duration4=%val%

REM SETS THE START TIME IN SECONDS VS MILLISECONDS
CALL vbs (%start1%)/1000
SET start1=%val%
CALL vbs (%start2%)/1000
SET start2=%val%
CALL vbs (%start3%)/1000
SET start3=%val%
CALL vbs (%start4%)/1000
SET start4=%val%

REM TRIM AND SPLIT ORIGINAL FILE INTO SEPERATE SECTIONS BASED ON CHAPTER MARKERS
ffmpeg -ss %START1% -i 01x01.mp4 -ss 0 -c copy -to %DURATION1% -avoid_negative_ts make_zero 01x01-1.mp4
ffmpeg -ss %START2% -i 01x01.mp4 -ss 0 -c copy -to %DURATION2% -avoid_negative_ts make_zero 01x01-2.mp4
ffmpeg -ss %START3% -i 01x01.mp4 -ss 0 -c copy -to %DURATION3% -avoid_negative_ts make_zero 01x01-3.mp4
ffmpeg -ss %START4% -i 01x01.mp4 -ss 0 -c copy -to %DURATION4% -avoid_negative_ts make_zero 01x01-4.mp4

REM DELETES UNNEEDED JSON AFTER USE
del /s *.json

REM APPEND ALL MP4 FILES INTO COHESIVE MKV
for /d /r %%D in (*) do (
    pushd %%D
    set files=
    for %%F in (*.mp4) do set files=!files! + ^( "%%F" ^)
    if not "!files!"=="" %mkvmerge% -o "01x01-FINAL.mkv" !files:~2!
    popd
)

REM DELETE UNNEEDED MP4 ORIGINALS AND SPLIT FILES
del /s *.mp4

我知道它很长,每次我尝试使用变量或循环来遍历所有文件时,它都无法读取 json 文件。我整天都在做这个,我可以按原样使用脚本,但我必须为每次迭代制作一个文件。

我也希望能够让它只拉出标记为“视频”的章节,但我还没有完全弄清楚那个。

如果有帮助,我将为算术部分添加 vbs 批处理文件以及示例 json。

@echo off
>"%temp%\VBS.vbs" echo Set fso = CreateObject("Scripting.FileSystemObject") : Wscript.echo (%*)
for /f "delims=" %%a in ('cscript /nologo "%temp%\VBS.vbs"') do set "val=%%a"
del "%temp%\VBS.vbs"
{
    "chapters": [
        {
            "id": 0,
            "time_base": "1/1000",
            "start": 0,
            "start_time": "0.000000",
            "end": 5590,
            "end_time": "5.590000",
            "tags": {
                "title": "Video"
            }
        },
        {
            "id": 1,
            "time_base": "1/1000",
            "start": 5590,
            "start_time": "5.590000",
            "end": 13994,
            "end_time": "13.994000",
            "tags": {
                "title": "Advertisement"
            }
        },
        {
            "id": 2,
            "time_base": "1/1000",
            "start": 13994,
            "start_time": "13.994000",
            "end": 163964,
            "end_time": "163.964000",
            "tags": {
                "title": "Video"
            }
        },
        {
            "id": 3,
            "time_base": "1/1000",
            "start": 163964,
            "start_time": "163.964000",
            "end": 195940,
            "end_time": "195.940000",
            "tags": {
                "title": "Advertisement"
            }
        },
        {
            "id": 4,
            "time_base": "1/1000",
            "start": 195940,
            "start_time": "195.940000",
            "end": 547849,
            "end_time": "547.849000",
            "tags": {
                "title": "Video"
            }
        },
        {
            "id": 5,
            "time_base": "1/1000",
            "start": 547849,
            "start_time": "547.849000",
            "end": 595850,
            "end_time": "595.850000",
            "tags": {
                "title": "Advertisement"
            }
        },
        {
            "id": 6,
            "time_base": "1/1000",
            "start": 595850,
            "start_time": "595.850000",
            "end": 1413588,
            "end_time": "1413.588000",
            "tags": {
                "title": "Video"
            }
        },
        {
            "id": 7,
            "time_base": "1/1000",
            "start": 1413588,
            "start_time": "1413.588000",
            "end": 1477569,
            "end_time": "1477.569000",
            "tags": {
                "title": "Advertisement"
            }
        },
        {
            "id": 8,
            "time_base": "1/1000",
            "start": 1477569,
            "start_time": "1477.569000",
            "end": 1529696,
            "end_time": "1529.696000",
            "tags": {
                "title": "Video"
            }
        }
    ]
}

我也尝试使用 start_time,所以我不必做额外的计算,但 jq 也不喜欢那样。

当我将 mkvmerge 放在这里时,它甚至都不会尝试运行,一旦它再次成为一个文件,我仍然需要在结尾处减少 7 秒,在前面减少 12 秒。

任何帮助将不胜感激,我知道这很多,但我似乎遇到了障碍,或者此时只是睡眠不足。

更新

这太棒了,我只需要弄清楚如何使用带空格的文件就可以了。我想我可以先运行一批,然后再用下划线替换所有空格。这可能会奏效,但如果我能提供帮助,我不想更改文件名。

@echo off

for %%i in (*.mp4) do (
FOR /F "delims=" %%A IN ('ffprobe -v quiet -print_format json -show_chapters -loglevel error "%%i" ^| xidel - -se "$json/(chapters)()[id!=0 and tags/title='Video']/concat('ffmpeg -ss ',start div 1000,' -i %%i -to ',((end - start) div 1000),' -c copy -avoid_negative_ts make_zero %%~ni-',position(),'.mp4')"') DO %%A
FOR /F "delims=" %%A IN ('xidel -s --xquery "concat('mkvmerge -o &quot;%%~ni-FINAL.mkv&quot; &quot;',join(file:list(.,false(),'%%~ni-*.mp4'),'&quot; + &quot;'),'&quot;')"') DO %%A
)

标签: jsonffmpegjqtrimmkv

解决方案


如果我理解正确,您想删除“广告”-章节。
这可能完全可以用 来完成ffmpeg,但如果没有源视频,我不能肯定地说。

无论如何,让我在的帮助下为您提供一个非常优雅的拆分过程解决方案。

首先,您不必将ffprobe's 的输出保存到 JSON 文件中。您可以将其通过管道传输到xidel

ffprobe -v quiet -print_format json -show_chapters -loglevel error "01x01.mp4" | xidel - -se "$json"

选择标记为“视频”的对象/章节:

ffprobe [...] | xidel - -se "$json/(chapters)()[id!=0 and tags/title='Video']"
{
  "id": 2,
  "time_base": "1/1000",
  "start": 13994,
  "start_time": "13.994000",
  "end": 163964,
  "end_time": "163.964000",
  "tags": {
    "title": "Video"
  }
}
[...]
{
  "id": 8,
  "time_base": "1/1000",
  "start": 1477569,
  "start_time": "1477.569000",
  "end": 1529696,
  "end_time": "1529.696000",
  "tags": {
    "title": "Video"
  }
}

(我不知道你为什么不想要第一章。如果你想要,那么只需删除 id!=0 and。)

要计算 4 个章节的持续时间:

ffprobe [...] | xidel - -se "$json/(chapters)()[id!=0 and tags/title='Video']/round-half-to-even(end_time - start_time,3)"
#or
ffprobe [...] | xidel - -se "$json/(chapters)()[id!=0 and tags/title='Video']/((end - start) div 1000)"
149.97
351.909
817.738
52.127

使用这些值和创建ffmpeg字符串/命令start

ffprobe [...] | xidel - -se "$json/(chapters)()[id!=0 and tags/title='Video']/concat('ffmpeg -ss ',start div 1000,' -i 01x01.mp4 -to ',((end - start) div 1000),' -c copy -avoid_negative_ts make_zero 01x01-',position(),'.mp4')"
ffmpeg -ss 13.994 -i 01x01.mp4 -to 149.97 -c copy -avoid_negative_ts make_zero 01x01-1.mp4
ffmpeg -ss 195.94 -i 01x01.mp4 -to 351.909 -c copy -avoid_negative_ts make_zero 01x01-2.mp4
ffmpeg -ss 595.85 -i 01x01.mp4 -to 817.738 -c copy -avoid_negative_ts make_zero 01x01-3.mp4
ffmpeg -ss 1477.569 -i 01x01.mp4 -to 52.127 -c copy -avoid_negative_ts make_zero 01x01-4.mp4

美化命令/查询:

ffprobe [...] | xidel - -se ^"^
  $json/(chapters)()[id!=0 and tags/title='Video']/concat(^
    'ffmpeg -ss ',^
    start div 1000,^
    ' -i 01x01.mp4 -to ',^
    ((end - start) div 1000),^
    ' -c copy -avoid_negative_ts make_zero 01x01-',^
    position(),^
    '.mp4'^
  )^
"

要执行这些ffmpeg命令,只需将整个ffprobe/xidel命令放在FOR-loop 中:

FOR /F "delims=" %A IN ('ffprobe [...] ^| xidel - -se "$json/(chapters)()[id!=0 and tags/title='Video']/concat('ffmpeg -ss ',start div 1000,' -i 01x01.mp4 -to ',((end - start) div 1000),' -c copy -avoid_negative_ts make_zero 01x01-',position(),'.mp4')"') DO %A

(在批处理脚本使用 %%A 中,如果 SETLOCAL ENABLEDELAYEDEXPANSION 转义感叹号; id^!=0

有了所有cmd的缺点,我将再次使用它xidel来创建mkvmerge字符串/命令:

xidel -s -e "file:list(.,false(),'01x01-*.mp4')"
01x01-1.mp4
01x01-2.mp4
01x01-3.mp4
01x01-4.mp4

xidel -s -e "join(file:list(.,false(),'01x01-*.mp4'),' + ')"
01x01-1.mp4 + 01x01-2.mp4 + 01x01-3.mp4 + 01x01-4.mp4

xidel -s -e "concat('\"',join(file:list(.,false(),'01x01-*.mp4'),'\" + \"'),'\"')"
#or
xidel -s --xquery "concat('&quot;',join(file:list(.,false(),'01x01-*.mp4'),'&quot; + &quot;'),'&quot;')"
"01x01-1.mp4" + "01x01-2.mp4" + "01x01-3.mp4" + "01x01-4.mp4"

xidel -s --xquery "concat('mkvmerge -o &quot;01x01-FINAL.mkv&quot; &quot;',join(file:list(.,false(),'01x01-*.mp4'),'&quot; + &quot;'),'&quot;')"
mkvmerge -o "01x01-FINAL.mkv" "01x01-1.mp4" + "01x01-2.mp4" + "01x01-3.mp4" + "01x01-4.mp4"

要再次执行mkvmerge命令,只需将整个xidel命令放在FOR-loop 中:

FOR /F "delims=" %A IN ('xidel -s --xquery "concat('mkvmerge -o &quot;01x01-FINAL.mkv&quot; &quot;',join(file:list(.,false(),'01x01-*.mp4'),'&quot; + &quot;'),'&quot;')"') DO %A

(为什么 --xquery &quot;?因为 \" 会在循环中导致“escape-character-hell” FOR

如果您只使用这两个FOR-loop,这也意味着SETLOCAL ENABLEDELAYEDEXPANSION不再需要。


推荐阅读