urlencode

gistfile1.txt

function utils.urlencode(data)
    if type(data) == 'string' then
        if data then
            local res = string.gsub(data, '\n', '\r\n')
            res = string.gsub(res, '([^%w _.~-])', function(c)
                return string.format('%%%02X', string.byte(c))
            end)
            return string.gsub(res, ' ', '+')
        end
    elseif type(data) == 'number' then
        return tostring(data)
    elseif type(data) == 'table' then
        local res = ''
        for k, v in pairs(data) do
            local template = res:len() == 0 and '%s=%s' or '&%s=%s'
            res = res .. template:format(utils.urlencode(k),
                utils.urlencode(v))
        end
        return res
    else
        error('unsupported type of data for utils.urlencode: ' .. type(data))
    end
end