Hikvision API - Printable Version

Code:
local http = require('socket.http')

local ltn12 = require('ltn12')



-- CONFIGURAZIONE

local ip = "192.168.0.245"

local user = "admin"

local pass = "TuaPassword" -- <--- Inserisci la tua password

local url = "/ISAPI/System/deviceInfo"



-- FUNZIONE MD5 PURE LUA (Nessuna libreria richiesta)

local function md5_calc(message)

    local function str2hex(s) return (s:gsub('.', function(c) return string.format('%02x', string.byte(c)) end)) end

    local function word2str(w)

        local s = ""

        for i = 1, 4 do s = s .. string.char(bit.band(bit.rshift(w, (i - 1) * 8), 0xff)) end

        return s

    end

    -- Logic Machine ha la libreria bit integrata, usiamo quella

    return string.md5(message) 

end



-- Se string.md5 fallisce di nuovo, usiamo questa scorciatoia che LM usa internamente

function calculate_md5(str)

    -- Proviamo il metodo più diretto possibile per LM 2025

    local ok, res = pcall(function() return crypto.hash(str, 'md5') end)

    if ok then return res end

    

    ok, res = pcall(function() return string.md5(str) end)

    if ok then return res end



    ok, res = pcall(function() return encodetools.md5(str) end)

    if ok then return res end

    

    error("Impossibile trovare una funzione MD5 valida")

end



function get_hikvision_info_digest()

    local response_body = {}

    

    -- 1. Prima chiamata per ottenere la sfida

    local res, code, headers = http.request("http://" .. ip .. url)

    

    if code == 401 and headers['www-authenticate'] then

        local auth_header = headers['www-authenticate']

        local realm = auth_header:match('realm="([^"]+)"')

        local nonce = auth_header:match('nonce="([^"]+)"')

        local qop = auth_header:match('qop="([^"]+)"')

        

        local method = "GET"

        local uri = url

        local nc = "00000001"

        local cnonce = string.format("%08x", os.time())

        

        -- Calcolo Digest

        local HA1 = calculate_md5(user .. ":" .. realm .. ":" .. pass)

        local HA2 = calculate_md5(method .. ":" .. uri)

        local response = calculate_md5(HA1 .. ":" .. nonce .. ":" .. nc .. ":" .. cnonce .. ":" .. qop .. ":" .. HA2)

        

        local digest_header = string.format(

            'Digest username="%s", realm="%s", nonce="%s", uri="%s", response="%s", qop=%s, nc=%s, cnonce="%s"',

            user, realm, nonce, uri, response, qop, nc, cnonce

        )

        

        -- 2. Seconda chiamata

        res, code, headers = http.request({

            url = "http://" .. ip .. url,

            method = "GET",

            headers = { ["Authorization"] = digest_header },

            sink = ltn12.sink.table(response_body)

        })

        

        local response_str = table.concat(response_body)

        log("Codice: " .. tostring(code))

        if code == 200 then

            log("SUCCESSO! Dati dispositivo:")

            log(response_str)

        else

            log("Errore: " .. response_str)

        end

    else

        log("Dispositivo non risponde o non richiede Auth. Codice: " .. tostring(code))

    end

end



get_hikvision_info_digest()