utf-8 cp1251 сортировка файлов(фильтр) Опции

[FREEON]

Кто знает программу, плагин, фильтр или способ сортировки текстовых файлов(массовый) по кодировке. Что бы например выбрал папку и там показывалось какой файл находится кодировке utf-8 или cp1251 или еще какой.
Массовая перекодировка различными программами не дает желаемого результата т.к. из перекодировки допустим из cp1251 в utf-8 будет норм вариант если этот файл в этой кодировке но если он был в ютф то при кодировке выдаст крокозябры. Поэтому и нужно точный фильтр который показал какой файл в какой кодировке изначально. Знаю к пилоту мало относится но есть ли разумное решения вопроса

[cirus]

uft8 или ansi

Код

--lua
function utf ( path_to_file )
    local f = io.open(path_to_file, "rb")  -- открыть файл
    if f then   -- если открылся
        local s = ''
        for v in f:lines() do s = s .. v end   -- прочитать файл
        f:close()  -- закрыть файл

        if string.match(table.concat({s:byte(1, 3)}, ' '), "239 187 191")  then return 1 end   -- если есть bom uft8

        -- поиск русских символов в юникод
        for i = 144, 191 do
            if string.match(table.concat({s:byte(1, #s)}, ' '), "208 " .. tostring(i)) then return 1 end
        end
        for i = 128, 143 do
            if string.match(table.concat({s:byte(1, #s)}, ' '), "209 " .. tostring(i)) then return 1 end
        end
        return 0
    end
    return -1
end


local path = [[C:\123.txt]]  -- путь к файлу
local result = utf (path)  -- вызов функции
if result == 0 then log("ANSI") end
if result == 1 then log("UTF8") end
if result == -1 then log("Файл не найден") end