script/3rd/lua-uri/uri/telnet.lua


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38

local M = { _NAME = "uri.telnet" }
local Util = require "uri._util"
local LoginURI = require "uri._login"
Util.subclass_of(M, LoginURI)

function M.default_port () return 23 end

function M.init (self)
    self, err = M._SUPER.init_base(self)
    if not self then return nil, err end

    -- RFC 4248 does not discuss what a path longer than '/' might mean, and
    -- there are no examples with anything significant in the path, so I'm
    -- assuming that extra information in the path is not allowed.
    local path = M._SUPER.path(self)
    if path ~= "" and path ~= "/" then
        return nil, "superfluous information in path of telnet URI"
    end

    -- RFC 4248 section 2 says that the '/' can be omitted.  I chose to
    -- normalize to having it there, since the example shown in the RFC has
    -- it, and this is consistent with the way I treat HTTP URIs.
    if path == "" then self:path("/") end

    return self
end

-- The path is always '/', so setting it won't do anything, but we do throw
-- an exception on an attempt to set it to anything invalid.
function M.path (self, new)
    if new and new ~= "" and new ~= "/" then
        error("invalid path for telnet URI")
    end
    return "/"
end

return M
-- vi:ts=4 sw=4 expandtab