Версия для печати темы

tRanges = {
    {"127.0.0.1", "127.0.0.255"},
}

sMsg = "*** Доступ на хаб для вашего ip-адреса закрыт!"

function Main()
    local res
    res, BotName = VH:GetConfig("config", "hub_security")
    tBadIps = {}
    tGoodIps = {}
    for i = 1, table.maxn(tRanges) do
        tRanges[i][1] = CountIP(tRanges[i][1])
        tRanges[i][2] = CountIP(tRanges[i][2])
    end
end

function VH_OnUserLogin(nick)
    local ip = VH:GetUserIP(nick)
    if not ip then
        return 1
    end
    local iIp = CountIP(ip)
    if tBadIps[iIP] then
        VH:SendDataToUser("<"..BotName.."> "..sMsg.."|",nick)
        VH:CloseConnection(nick)
    elseif not tGoodIps[iIP] then
        local bBad = true
        for i = 1, table.maxn(tRanges) do
            if iIp >= tRanges[i][1] and iIp <= tRanges[i][2] then
                bBad = nil
                break
            end
        end
        if bBad then
            tBadIps[iIP] = true
            VH:SendDataToUser("<"..BotName.."> "..sMsg.."|",nick)
            VH:CloseConnection(nick)
        else
            tGoodIps[iIP] = true
        end
    end
    return 1
end

function CountIP(sIP)
    if sIP then
        local _,_, iIPsPart1, iIPsPart2, iIPsPart3, iIPsPart4 = string.find(sIP, "(%d+)%.(%d+)%.(%d+)%.(%d+)")
        if iIPsPart1 and iIPsPart2 and iIPsPart3 and iIPsPart4 then
            local iIPsPart1, iIPsPart2, iIPsPart3, iIPsPart4 = tonumber(iIPsPart1), tonumber(iIPsPart2), tonumber(iIPsPart3), tonumber(iIPsPart4)
            local iCountedIP = iIPsPart1 * 16777216 + iIPsPart2 * 65536 + iIPsPart3 * 256 + iIPsPart4
            return iCountedIP
        end
    end
end