Бардак

local options = require "mp.options"

local start_pos = nil

local settings = {
    target_dir = "",
}
options.read_options(settings)

function timestamp(duration)
    local hours = duration / 3600
    local minutes = duration % 3600 / 60
    local seconds = duration % 60
    return string.format("%02d:%02d:%02.03f", hours, minutes, seconds)
end

function print_msg(string) 
    return mp.osd_message(string)
end

function get_outname(start_pos, end_pos)
    local name = mp.get_property("filename/no-ext")
    local ext = mp.get_property("file-format")
    local cut_time = string.format("_%s-%s", timestamp(start_pos), timestamp(end_pos))
    return name .. cut_time .. "." .. ext
end

function cut(start_pos, end_pos)
    local duration = end_pos - start_pos
    local outname = get_outname(start_pos, end_pos)
    -- local path = nil 

    -- if target_dir then
    --     path = target_dir .. "/" .. outname
    -- else
    --     local filename = mp.get_property("filename")
    --     local dir = mp.get_property("working-directory")
    --     path = dir .. "/" .. mp.get_property("path"):gsub(filename, outname)
    -- end
    
    mp.command_native_async(
        {
         name = "subprocess",
         args = { "ffmpeg", "-ss", string.format(start_pos),
                  "-accurate_seek", "-y", "-i", mp.get_property("path"),
                  "-t", string.format(duration),
                  "-c:v", "copy", "-c:a", "copy", "file:" .. outname },
        },
        function(success, result, error)
            if success then
                print_msg("Finish cutting")
            elseif error then
                print_msg("Failed to encode: " .. error)
            end
        end
    )
end

function toggle_mark()
    local pos = mp.get_property_number("time-pos")
    if not start_pos then
        start_pos = pos
        print_msg(string.format("Marked %s as start position", timestamp(start_pos)))
    else
        local end_pos = pos
        if start_pos > end_pos then
            start_pos, end_pos = end_pos, start_pos
        end
        if start_pos == end_pos then
            print_msg("Cut fragment is empty")
        else
            print_msg(string.format("Cut fragment: %s - %s",
                                         timestamp(start_pos),
                                         timestamp(end_pos)))
            cut(start_pos, end_pos)
            start_pos = nil
        end
    end
end

mp.add_key_binding("c", "cut_fragment", toggle_mark)

    -- local path = nil 

    -- if target_dir then
    --     path = target_dir .. "/" .. outname
    -- else
    --     local filename = mp.get_property("filename")
    --     local dir = mp.get_property("working-directory")
    --     path = dir .. "/" .. mp.get_property("path"):gsub(filename, outname)
    -- end

local start_pos = nil

function toggle_mark()
    local pos = mp.get_property_number('time-pos')
    if start_pos then
        local end_pos = pos
        local cut_fragment_fmt = 'Cut fragment: %s - %s'
        
        if start_pos == end_pos then
            return print_msg('Cut fragment is empty')
        end
        
        if start_pos > end_pos then
            start_pos, end_pos = end_pos, start_pos
        end

        print_msg(cut_fragment_fmt:format(
                convert_time(start_pos),
                convert_time(end_pos))
            )
        cut(start_pos, end_pos)
        start_pos = nil
    else
        local marked_fmt = 'Marked %s as start position'
        start_pos = pos
        print_msg(marked_fmt:format(convert_time(start_pos)))
    end
end

function cut(start_pos, end_pos)
    local duration = end_pos - start_pos
    local out_name = get_out_name(start_pos, end_pos)
    
    mp.command_native_async(
        {
         name = 'subprocess',
         args = { 'ffmpeg', '-ss', string.format(start_pos),
                  '-accurate_seek', '-y', '-i', mp.get_property('path'),
                  '-t', string.format(duration),
                  '-c:v', 'copy', '-c:a', 'copy', 'file:' .. out_name },
        },
        function(success, result, error)
            if success then
                return print_msg('Finish cutting')
            end
            if error then
                return print_msg('Failed to encode: ' .. error)
            end
        end
    )
end

function print_msg(string) 
    return mp.osd_message(string)
end

function convert_time(duration)
    local time_fmt = '%02d:%02d:%02.03f'
    local hours    = duration / 3600
    local minutes  = duration % 3600 / 60
    local seconds  = duration % 60
    return time_fmt:format(hours, minutes, seconds)
end

function get_out_name(start_pos, end_pos)
    local out_name_fmt = '%s_%s%s'
    local cut_time_fmt = '%s-%s'
    local name         = mp.get_property('filename')
    local ext          = name:match('^.+(%..+)$')
    local cut_time     = cut_time_fmt:format(
                                convert_time(start_pos),
                                convert_time(end_pos)
                            )
    name = name:gsub(ext, '')
    return out_name_fmt:format(name, cut_time, ext)
end

mp.add_key_binding('c', 'cut_fragment', toggle_mark)