--[[

        cmd_regnick.lua v0.02 by blastbeat
        
        - this script adds a command "regnick" to reg users by nick
        - usage: [+!#]regnick <nick> <password> <level>

        - changelog 0.02:
          - updated script api

]]--

--// settings begin //--

local permission = {

    --// [ user_level = level means user_level can reg users with level max //--

    [ 40 ] = 10,    -- svip to guest
    [ 60 ] = 20,    -- operator to reg
    [ 80 ] = 30,    -- admin to vip
    [ 100 ] = 100,    -- hubowner can reg all

}

local msg_denied = "You are not allowed to use this command."
local msg_usage = "Usage: +regnick <nick> <password> <level>"
local msg_level = "You are not allowed to reg this level."
local msg_error = "An error occured: "
local msg_ok = "User regged with following parameters: "

local cmd = "regnick"

--// settings end //--

local utf_match = utf.match

hub:setListener( "onStart", { },
    function( )
        local help = hub.import "cmd_help"
        if help then
            help.reg( "regnick", "[+!#]regnick <nick> <password> <level>", "regs a new user by nick", 10 )
        end
        return nil
    end
)

hub:setListener( "onBroadcast", { },
    function( user, adccmd, txt )
        local command, parameters = utf_match( txt, "^[+!#](%a+) ?(.*)" )
        if command == cmd then
            local user_level = user:getLevel( )
            if not permission[ user_level ] then 
                user:reply( msg_denied, hub.getbot( ) )
                return PROCESSED
            end
            local nick, password, level = utf.match( parameters, "^(%S+) (%S+) (%d+)" )
            level = tonumber( level )
            if not ( nick and password and level ) then
                user:reply( msg_usage, hub.getbot( ) )
                return PROCESSED
            end
            local levels = cfg.get "levels" or { }
            if not levels[ level ] or ( permission[ user_level ] < level ) then
                user:reply( msg_level, hub.getbot( ) )
                return PROCESSED
            end
            local bol, err = hub.reguser{ nick = nick, password = password, level = level, by = user:getNick( ) }
            if not bol then
                user:reply( msg_error .. ( err or "" ), hub.getbot( ) )
            else
                user:reply( msg_ok .. nick .. " " .. password .. " " .. level, hub.getbot( ) )
            end
            return PROCESSED
        end
        return nil
    end
)

hub.debug( "** Loaded cmd_regnick.lua **" )