69 lines
2.1 KiB
Lua
69 lines
2.1 KiB
Lua
---
|
|
-- Implementation of IRC server message parsing
|
|
-- initialization {{{
|
|
local constants = libs.constants
|
|
local ctcp = libs.ctcp
|
|
local irc_debug = libs.debug
|
|
local misc = libs.misc
|
|
local socket = libs.socket
|
|
-- }}}
|
|
|
|
---
|
|
-- This module contains parsing functions for IRC server messages.
|
|
local message = {}
|
|
|
|
-- internal functions {{{
|
|
-- _parse {{{
|
|
--
|
|
-- Parse a server command.
|
|
-- @param str Command to parse
|
|
-- @return Table containing the parsed message. It contains:
|
|
-- <ul>
|
|
-- <li><i>from:</i> The source of this message, in full usermask
|
|
-- form (nick!user@host) for messages originating
|
|
-- from users, and as a hostname for messages from
|
|
-- servers</li>
|
|
-- <li><i>command:</i> The command sent, in name form if possible,
|
|
-- otherwise as a numeric code</li>
|
|
-- <li><i>args:</i> Array of strings corresponding to the arguments
|
|
-- to the received command</li>
|
|
--
|
|
-- </ul>
|
|
function message._parse(str)
|
|
-- low-level ctcp quoting {{{
|
|
str = ctcp._low_dequote(str)
|
|
-- }}}
|
|
-- parse the from field, if it exists (leading :) {{{
|
|
local from = ""
|
|
if str:sub(1, 1) == ":" then
|
|
local e
|
|
e, from = socket.skip(1, str:find("^:([^ ]*) "))
|
|
str = str:sub(e + 1)
|
|
end
|
|
-- }}}
|
|
-- get the command name or numerical reply value {{{
|
|
local command, argstr = socket.skip(2, str:find("^([^ ]*) ?(.*)"))
|
|
local reply = false
|
|
if command:find("^%d%d%d$") then
|
|
reply = true
|
|
if constants.replies[tonumber(command)] then
|
|
command = constants.replies[tonumber(command)]
|
|
else
|
|
irc_debug._warn("Unknown server reply: " .. command)
|
|
end
|
|
end
|
|
-- }}}
|
|
-- get the args {{{
|
|
local args = misc._split(argstr, " ", ":")
|
|
-- the first arg in a reply is always your nick
|
|
if reply then table.remove(args, 1) end
|
|
-- }}}
|
|
-- return the parsed message {{{
|
|
return {from = from, command = command, args = args}
|
|
-- }}}
|
|
end
|
|
-- }}}
|
|
-- }}}
|
|
|
|
return message
|