Error: \" .. method .. \"() method not found in \" .. moduleName .. \" lua module !
\")\n end\n ngx.exit(404)\nend\n\n-- 执行模块方法，报错则显示错误信息，所见即所得，可以追踪lua报错行数\nret, err = pcall(req_method)\n\nif ret == false then\n if is_debug then\n ngx.status = 404\n ngx.say(\"
Error: \" .. err .. \"
\")\n else\n ngx.exit(500)\n end\nend\n"
},
{
"path": "demo12/lualib/lite/req.lua",
"content": "local _M = {}\n\n-- 获取http get/post 请求参数\nfunction _M.getArgs()\n local request_method = ngx.var.request_method\n local args = ngx.req.get_uri_args()\n -- 参数获取\n if \"POST\" == request_method then\n ngx.req.read_body()\n local postArgs = ngx.req.get_post_args()\n if postArgs then\n for k, v in pairs(postArgs) do\n args[k] = v\n end\n end\n end\n return args\nend\n\nreturn _M"
},
{
"path": "demo12/lualib/resty/cookie.lua",
"content": "-- Copyright (C) 2013-2016 Jiale Zhi (calio), CloudFlare Inc.\n-- See RFC6265 http://tools.ietf.org/search/rfc6265\n-- require \"luacov\"\n\nlocal type = type\nlocal byte = string.byte\nlocal sub = string.sub\nlocal format = string.format\nlocal log = ngx.log\nlocal ERR = ngx.ERR\nlocal WARN = ngx.WARN\nlocal ngx_header = ngx.header\n\nlocal EQUAL = byte(\"=\")\nlocal SEMICOLON = byte(\";\")\nlocal SPACE = byte(\" \")\nlocal HTAB = byte(\"\\t\")\n\n-- table.new(narr, nrec)\nlocal ok, new_tab = pcall(require, \"table.new\")\nif not ok then\n new_tab = function () return {} end\nend\n\nlocal ok, clear_tab = pcall(require, \"table.clear\")\nif not ok then\n clear_tab = function(tab) for k, _ in pairs(tab) do tab[k] = nil end end\nend\n\nlocal _M = new_tab(0, 2)\n\n_M._VERSION = '0.01'\n\n\nlocal function get_cookie_table(text_cookie)\n if type(text_cookie) ~= \"string\" then\n log(ERR, format(\"expect text_cookie to be \\\"string\\\" but found %s\",\n type(text_cookie)))\n return {}\n end\n\n local EXPECT_KEY = 1\n local EXPECT_VALUE = 2\n local EXPECT_SP = 3\n\n local n = 0\n local len = #text_cookie\n\n for i=1, len do\n if byte(text_cookie, i) == SEMICOLON then\n n = n + 1\n end\n end\n\n local cookie_table = new_tab(0, n + 1)\n\n local state = EXPECT_SP\n local i = 1\n local j = 1\n local key, value\n\n while j <= len do\n if state == EXPECT_KEY then\n if byte(text_cookie, j) == EQUAL then\n key = sub(text_cookie, i, j - 1)\n state = EXPECT_VALUE\n i = j + 1\n end\n elseif state == EXPECT_VALUE then\n if byte(text_cookie, j) == SEMICOLON\n or byte(text_cookie, j) == SPACE\n or byte(text_cookie, j) == HTAB\n then\n value = sub(text_cookie, i, j - 1)\n cookie_table[key] = value\n\n key, value = nil, nil\n state = EXPECT_SP\n i = j + 1\n end\n elseif state == EXPECT_SP then\n if byte(text_cookie, j) ~= SPACE\n and byte(text_cookie, j) ~= HTAB\n then\n state = EXPECT_KEY\n i = j\n j = j - 1\n end\n end\n j = j + 1\n end\n\n if key ~= nil and value == nil then\n cookie_table[key] = sub(text_cookie, i)\n end\n\n return cookie_table\nend\n\nfunction _M.new(self)\n local _cookie = ngx.var.http_cookie\n --if not _cookie then\n --return nil, \"no cookie found in current request\"\n --end\n return setmetatable({ _cookie = _cookie, set_cookie_table = new_tab(4, 0) },\n { __index = self })\nend\n\nfunction _M.get(self, key)\n if not self._cookie then\n return nil, \"no cookie found in the current request\"\n end\n if self.cookie_table == nil then\n self.cookie_table = get_cookie_table(self._cookie)\n end\n\n return self.cookie_table[key]\nend\n\nfunction _M.get_all(self)\n if not self._cookie then\n return nil, \"no cookie found in the current request\"\n end\n\n if self.cookie_table == nil then\n self.cookie_table = get_cookie_table(self._cookie)\n end\n\n return self.cookie_table\nend\n\nlocal function bake(cookie)\n if not cookie.key or not cookie.value then\n return nil, 'missing cookie field \"key\" or \"value\"'\n end\n\n if cookie[\"max-age\"] then\n cookie.max_age = cookie[\"max-age\"]\n end\n\n if (cookie.samesite) then\n local samesite = cookie.samesite\n\n -- if we dont have a valid-looking attribute, ignore the attribute\n if (samesite ~= \"Strict\" and samesite ~= \"Lax\") then\n log(WARN, \"SameSite value must be 'Strict' or 'Lax'\")\n cookie.samesite = nil\n end\n end\n\n local str = cookie.key .. \"=\" .. cookie.value\n .. (cookie.expires and \"; Expires=\" .. cookie.expires or \"\")\n .. (cookie.max_age and \"; Max-Age=\" .. cookie.max_age or \"\")\n .. (cookie.domain and \"; Domain=\" .. cookie.domain or \"\")\n .. (cookie.path and \"; Path=\" .. cookie.path or \"\")\n .. (cookie.secure and \"; Secure\" or \"\")\n .. (cookie.httponly and \"; HttpOnly\" or \"\")\n .. (cookie.samesite and \"; SameSite=\" .. cookie.samesite or \"\")\n .. (cookie.extension and \"; \" .. cookie.extension or \"\")\n return str\nend\n\nfunction _M.set(self, cookie)\n local cookie_str, err = bake(cookie)\n if not cookie_str then\n return nil, err\n end\n\n local set_cookie = ngx_header['Set-Cookie']\n local set_cookie_type = type(set_cookie)\n local t = self.set_cookie_table\n clear_tab(t)\n\n if set_cookie_type == \"string\" then\n -- only one cookie has been setted\n if set_cookie ~= cookie_str then\n t[1] = set_cookie\n t[2] = cookie_str\n ngx_header['Set-Cookie'] = t\n end\n elseif set_cookie_type == \"table\" then\n -- more than one cookies has been setted\n local size = #set_cookie\n\n -- we can not set cookie like ngx.header['Set-Cookie'][3] = val\n -- so create a new table, copy all the values, and then set it back\n for i=1, size do\n t[i] = ngx_header['Set-Cookie'][i]\n if t[i] == cookie_str then\n -- new cookie is duplicated\n return true\n end\n end\n t[size + 1] = cookie_str\n ngx_header['Set-Cookie'] = t\n else\n -- no cookie has been setted\n ngx_header['Set-Cookie'] = cookie_str\n end\n return true\nend\n\nreturn _M"
},
{
"path": "demo12/lualib/resty/template.lua",
"content": "local setmetatable = setmetatable\nlocal loadstring = loadstring\nlocal loadchunk\nlocal tostring = tostring\nlocal setfenv = setfenv\nlocal require = require\nlocal capture\nlocal concat = table.concat\nlocal assert = assert\nlocal prefix\nlocal write = io.write\nlocal pcall = pcall\nlocal phase\nlocal open = io.open\nlocal load = load\nlocal type = type\nlocal dump = string.dump\nlocal find = string.find\nlocal gsub = string.gsub\nlocal byte = string.byte\nlocal null\nlocal sub = string.sub\nlocal ngx = ngx\nlocal jit = jit\nlocal var\n\nlocal _VERSION = _VERSION\nlocal _ENV = _ENV\nlocal _G = _G\n\nlocal HTML_ENTITIES = {\n [\"&\"] = \"&\",\n [\"<\"] = \"<\",\n [\">\"] = \">\",\n ['\"'] = \""\",\n [\"'\"] = \"'\",\n [\"/\"] = \"/\"\n}\n\nlocal CODE_ENTITIES = {\n [\"{\"] = \"{\",\n [\"}\"] = \"}\",\n [\"&\"] = \"&\",\n [\"<\"] = \"<\",\n [\">\"] = \">\",\n ['\"'] = \""\",\n [\"'\"] = \"'\",\n [\"/\"] = \"/\"\n}\n\nlocal VAR_PHASES\n\nlocal ok, newtab = pcall(require, \"table.new\")\nif not ok then newtab = function() return {} end end\n\nlocal caching = true\nlocal template = newtab(0, 12)\n\ntemplate._VERSION = \"1.9\"\ntemplate.cache = {}\n\nlocal function enabled(val)\n if val == nil then return true end\n return val == true or (val == \"1\" or val == \"true\" or val == \"on\")\nend\n\nlocal function trim(s)\n return gsub(gsub(s, \"^%s+\", \"\"), \"%s+$\", \"\")\nend\n\nlocal function rpos(view, s)\n while s > 0 do\n local c = sub(view, s, s)\n if c == \" \" or c == \"\\t\" or c == \"\\0\" or c == \"\\x0B\" then\n s = s - 1\n else\n break\n end\n end\n return s\nend\n\nlocal function escaped(view, s)\n if s > 1 and sub(view, s - 1, s - 1) == \"\\\\\" then\n if s > 2 and sub(view, s - 2, s - 2) == \"\\\\\" then\n return false, 1\n else\n return true, 1\n end\n end\n return false, 0\nend\n\nlocal function readfile(path)\n local file = open(path, \"rb\")\n if not file then return nil end\n local content = file:read \"*a\"\n file:close()\n return content\nend\n\nlocal function loadlua(path)\n return readfile(path) or path\nend\n\nlocal function loadngx(path)\n local vars = VAR_PHASES[phase()]\n local file, location = path, vars and var.template_location\n if sub(file, 1) == \"/\" then file = sub(file, 2) end\n if location and location ~= \"\" then\n if sub(location, -1) == \"/\" then location = sub(location, 1, -2) end\n local res = capture(concat{ location, '/', file})\n if res.status == 200 then return res.body end\n end\n local root = vars and (var.template_root or var.document_root) or prefix\n if sub(root, -1) == \"/\" then root = sub(root, 1, -2) end\n return readfile(concat{ root, \"/\", file }) or path\nend\n\ndo\n if ngx then\n VAR_PHASES = {\n set = true,\n rewrite = true,\n access = true,\n content = true,\n header_filter = true,\n body_filter = true,\n log = true\n }\n template.print = ngx.print or write\n template.load = loadngx\n prefix, var, capture, null, phase = ngx.config.prefix(), ngx.var, ngx.location.capture, ngx.null, ngx.get_phase\n if VAR_PHASES[phase()] then\n caching = enabled(var.template_cache)\n end\n else\n template.print = write\n template.load = loadlua\n end\n if _VERSION == \"Lua 5.1\" then\n local context = { __index = function(t, k)\n return t.context[k] or t.template[k] or _G[k]\n end }\n if jit then\n loadchunk = function(view)\n return assert(load(view, nil, nil, setmetatable({ template = template }, context)))\n end\n else\n loadchunk = function(view)\n local func = assert(loadstring(view))\n setfenv(func, setmetatable({ template = template }, context))\n return func\n end\n end\n else\n local context = { __index = function(t, k)\n return t.context[k] or t.template[k] or _ENV[k]\n end }\n loadchunk = function(view)\n return assert(load(view, nil, nil, setmetatable({ template = template }, context)))\n end\n end\nend\n\nfunction template.caching(enable)\n if enable ~= nil then caching = enable == true end\n return caching\nend\n\nfunction template.output(s)\n if s == nil or s == null then return \"\" end\n if type(s) == \"function\" then return template.output(s()) end\n return tostring(s)\nend\n\nfunction template.escape(s, c)\n if type(s) == \"string\" then\n if c then return gsub(s, \"[}{\\\">/<'&]\", CODE_ENTITIES) end\n return gsub(s, \"[\\\">/<'&]\", HTML_ENTITIES)\n end\n return template.output(s)\nend\n\nfunction template.new(view, layout)\n assert(view, \"view was not provided for template.new(view, layout).\")\n local render, compile = template.render, template.compile\n if layout then\n if type(layout) == \"table\" then\n return setmetatable({ render = function(self, context)\n local context = context or self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n layout.blocks = context.blocks or {}\n layout.view = context.view or \"\"\n return layout:render()\n end }, { __tostring = function(self)\n local context = self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n layout.blocks = context.blocks or {}\n layout.view = context.view\n return tostring(layout)\n end })\n else\n return setmetatable({ render = function(self, context)\n local context = context or self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n return render(layout, context)\n end }, { __tostring = function(self)\n local context = self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n return compile(layout)(context)\n end })\n end\n end\n return setmetatable({ render = function(self, context)\n return render(view, context or self)\n end }, { __tostring = function(self)\n return compile(view)(self)\n end })\nend\n\nfunction template.precompile(view, path, strip)\n local chunk = dump(template.compile(view), strip ~= false)\n if path then\n local file = open(path, \"wb\")\n file:write(chunk)\n file:close()\n end\n return chunk\nend\n\nfunction template.compile(view, key, plain)\n assert(view, \"view was not provided for template.compile(view, key, plain).\")\n if key == \"no-cache\" then\n return loadchunk(template.parse(view, plain)), false\n end\n key = key or view\n local cache = template.cache\n if cache[key] then return cache[key], true end\n local func = loadchunk(template.parse(view, plain))\n if caching then cache[key] = func end\n return func, false\nend\n\nfunction template.parse(view, plain)\n assert(view, \"view was not provided for template.parse(view, plain).\")\n if not plain then\n view = template.load(view)\n if byte(sub(view, 1, 1)) == 27 then return view end\n end\n local j = 2\n local c = {[[\ncontext=... or {}\nlocal function include(v, c) return template.compile(v)(c or context) end\nlocal ___,blocks,layout={},blocks or {}\n]] }\n local i, s = 1, find(view, \"{\", 1, true)\n while s do\n local t, p = sub(view, s + 1, s + 1), s + 2\n if t == \"{\" then\n local e = find(view, \"}}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n c[j] = \"___[#___+1]=template.escape(\"\n c[j+1] = trim(sub(view, p, e - 1))\n c[j+2] = \")\\n\"\n j=j+3\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"*\" then\n local e = find(view, \"*}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n c[j] = \"___[#___+1]=template.output(\"\n c[j+1] = trim(sub(view, p, e - 1))\n c[j+2] = \")\\n\"\n j=j+3\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"%\" then\n local e = find(view, \"%}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if z then\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n i = s\n else\n local n = e + 2\n if sub(view, n, n) == \"\\n\" then\n n = n + 1\n end\n local r = rpos(view, s - 1)\n if i <= r then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, r)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = trim(sub(view, p, e - 1))\n c[j+1] = \"\\n\"\n j=j+2\n s, i = n - 1, n\n end\n end\n elseif t == \"(\" then\n local e = find(view, \")}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n local f = sub(view, p, e - 1)\n local x = find(f, \",\", 2, true)\n if x then\n c[j] = \"___[#___+1]=include([=[\"\n c[j+1] = trim(sub(f, 1, x - 1))\n c[j+2] = \"]=],\"\n c[j+3] = trim(sub(f, x + 1))\n c[j+4] = \")\\n\"\n j=j+5\n else\n c[j] = \"___[#___+1]=include([=[\"\n c[j+1] = trim(f)\n c[j+2] = \"]=])\\n\"\n j=j+3\n end\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"[\" then\n local e = find(view, \"]}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n c[j] = \"___[#___+1]=include(\"\n c[j+1] = trim(sub(view, p, e - 1))\n c[j+2] = \")\\n\"\n j=j+3\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"-\" then\n local e = find(view, \"-}\", p, true)\n if e then\n local x, y = find(view, sub(view, s, e + 1), e + 2, true)\n if x then\n local z, w = escaped(view, s)\n if z then\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n i = s\n else\n y = y + 1\n x = x - 1\n if sub(view, y, y) == \"\\n\" then\n y = y + 1\n end\n local b = trim(sub(view, p, e - 1))\n if b == \"verbatim\" or b == \"raw\" then\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = \"___[#___+1]=[=[\"\n c[j+1] = sub(view, e + 2, x)\n c[j+2] = \"]=]\\n\"\n j=j+3\n else\n if sub(view, x, x) == \"\\n\" then\n x = x - 1\n end\n local r = rpos(view, s - 1)\n if i <= r then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, r)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = 'blocks[\"'\n c[j+1] = b\n c[j+2] = '\"]=include[=['\n c[j+3] = sub(view, e + 2, x)\n c[j+4] = \"]=]\\n\"\n j=j+5\n end\n s, i = y - 1, y\n end\n end\n end\n elseif t == \"#\" then\n local e = find(view, \"#}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n e = e + 2\n if sub(view, e, e) == \"\\n\" then\n e = e + 1\n end\n s, i = e - 1, e\n end\n end\n end\n s = find(view, \"{\", s + 1, true)\n end\n s = sub(view, i)\n if s and s ~= \"\" then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = s\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = \"return layout and include(layout,setmetatable({view=table.concat(___),blocks=blocks},{__index=context})) or table.concat(___)\"\n return concat(c)\nend\n\nfunction template.render(view, context, key, plain)\n assert(view, \"view was not provided for template.render(view, context, key, plain).\")\n return template.print(template.compile(view, key, plain)(context))\nend\n\nreturn template\n"
},
{
"path": "demo13/README.md",
"content": "#### 在对接一些第三方系统的时候，经常会遇到https的问题，好比如做微信公众号的开发，接口基本都是https的，这个时候，很多人试着用http的那种方式来访问https，结果报错了，误以为lua不支持https，其实不是的，只需要配置一个证书即可，证书可以通过浏览器访问接口的url，然后通过浏览器导出这个网站所对应的pem证书，然后配置到nginx里面就行了，其他的调用方法跟http的类型，所用到的http库，跟我写的这篇[文章](https://github.com/362228416/openresty-web-dev/tree/master/demo7)一致，就不过多介绍了\n\nnginx.conf\n```\n\nworker_processes 1;\n\nerror_log logs/error.log notice;\n\nevents {\n worker_connections 1024;\n}\n\nhttp {\n lua_ssl_verify_depth 2;\n lua_ssl_trusted_certificate GeoTrust_Global_CA.pem;\n lua_package_path \"$prefix/lua/?.lua;$prefix/lualib/?.lua\";\n server {\n listen 8888;\n server_name localhost;\n lua_code_cache off;\n\n location / {\n root html;\n index index.html;\n }\n\n location ~ /lua/(.+) {\n default_type text/html;\n resolver 223.5.5.5 223.6.6.6; # 这里位设置阿里的DNS，不设置DNS无法解析http请求的域名\n content_by_lua_file lua/$1.lua;\n }\n }\n}\n```\n\n为了简单起见，以下只是调一下获取access_key的接口，只要这个可以，同理，微信下单那些也是一样的，这点可以保证，我就用openresty做过微信公众号开发，包含微信登录，微信支付，以及数据库mysql部分全都是lua开发的\n\nlua/test.lua \n```\nlocal req = require \"req\"\nlocal cjson = require \"cjson\"\nlocal http = require \"resty.http\"\n\nfunction get_access_token(code)\n local httpc = http.new()\n local params = {}\n params['grant_type'] = 'authorization_code'\n params['appid'] = '' -- config.appid\n params['secret'] = '' -- config.secret\n params['code'] = ''\n local res,err = httpc:request_uri(\"https://api.weixin.qq.com/sns/oauth2/access_token?\" .. ngx.encode_args(params), {\n method = \"GET\",\n headers = {\n [\"Accept\"] = \"application/json\",\n [\"Accept-Encoding\"] = \"utf-8\",\n }\n })\n print(err)\n httpc:set_keepalive(60)\n return cjson.decode(res.body)\nend\n\nlocal args = req.getArgs()\nlocal code = args['code']\nlocal res = get_access_token(code)\nngx.say(cjson.encode(res))\nngx.say(res.openid)\n\n```\n\nindex.html\n\n```\n\n\n\t\n\tLogin Page\n\n\n\t测试\n \n\t\n\t\n\n\n```\n\n启动nginx\n\n```\n$ openresty -p `pwd`/demo13\n```\n\n打开浏览器访问：http://localhost:8888/ 点击页面上的测试按钮\n\n应该会返回类似以下这样的东西，说明调用成功了，只是参数有问题而已\n\n```\n{\"errcode\":41002,\"errmsg\":\"appid missing, hints: [ req_id: eMR_KA0444ns88 ]\"}\nnil\n```\n\n到此，你可以用openresty更深层次的跟后端进行整合，开发出更强大的前端应用了，当前开发方式很简单，部署也只需要一个nginx\n\n[示例代码](https://github.com/362228416/openresty-web-dev) 参见demo13部分\n"
},
{
"path": "demo13/conf/GeoTrust_Global_CA.pem",
"content": "-----BEGIN CERTIFICATE-----\nMIIDVDCCAjygAwIBAgIDAjRWMA0GCSqGSIb3DQEBBQUAMEIxCzAJBgNVBAYTAlVT\nMRYwFAYDVQQKEw1HZW9UcnVzdCBJbmMuMRswGQYDVQQDExJHZW9UcnVzdCBHbG9i\nYWwgQ0EwHhcNMDIwNTIxMDQwMDAwWhcNMjIwNTIxMDQwMDAwWjBCMQswCQYDVQQG\nEwJVUzEWMBQGA1UEChMNR2VvVHJ1c3QgSW5jLjEbMBkGA1UEAxMSR2VvVHJ1c3Qg\nR2xvYmFsIENBMIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEA2swYYzD9\n9BcjGlZ+W988bDjkcbd4kdS8odhM+KhDtgPpTSEHCIjaWC9mOSm9BXiLnTjoBbdq\nfnGk5sRgprDvgOSJKA+eJdbtg/OtppHHmMlCGDUUna2YRpIuT8rxh0PBFpVXLVDv\niS2Aelet8u5fa9IAjbkU+BQVNdnARqN7csiRv8lVK83Qlz6cJmTM386DGXHKTubU\n1XupGc1V3sjs0l44U+VcT4wt/lAjNvxm5suOpDkZALeVAjmRCw7+OC7RHQWa9k0+\nbw8HHa8sHo9gOeL6NlMTOdReJivbPagUvTLrGAMoUgRx5aszPeE4uwc2hGKceeoW\nMPRfwCvocWvk+QIDAQABo1MwUTAPBgNVHRMBAf8EBTADAQH/MB0GA1UdDgQWBBTA\nephojYn7qwVkDBF9qn1luMrMTjAfBgNVHSMEGDAWgBTAephojYn7qwVkDBF9qn1l\nuMrMTjANBgkqhkiG9w0BAQUFAAOCAQEANeMpauUvXVSOKVCUn5kaFOSPeCpilKIn\nZ57QzxpeR+nBsqTP3UEaBU6bS+5Kb1VSsyShNwrrZHYqLizz/Tt1kL/6cdjHPTfS\ntQWVYrmm3ok9Nns4d0iXrKYgjy6myQzCsplFAMfOEVEiIuCl6rYVSAlk6l5PdPcF\nPseKUgzbFbS9bZvlxrFUaKnjaZC2mqUPuLk/IH2uSrW4nOQdtqvmlKXBx4Ot2/Un\nhw4EbNX/3aBd7YdStysVAq45pmp06drE57xNNB6pXE0zX5IJL4hmXXeXxx12E6nV\n5fEWCRE11azbJHFwLJhWC9kXtNHjUStedejV0NxPNO3CBWaAocvmMw==\n-----END CERTIFICATE-----\n"
},
{
"path": "demo13/conf/nginx.conf",
"content": "\nworker_processes 1;\n\nerror_log logs/error.log notice;\n\nevents {\n worker_connections 1024;\n}\n\nhttp {\n lua_ssl_verify_depth 2;\n lua_ssl_trusted_certificate GeoTrust_Global_CA.pem;\n lua_package_path \"$prefix/lua/?.lua;$prefix/lualib/?.lua\";\n server {\n listen 8888;\n server_name localhost;\n lua_code_cache off;\n\n location / {\n root html;\n index index.html;\n }\n\n location ~ /lua/(.+) {\n default_type text/html;\n resolver 223.5.5.5 223.6.6.6; # 这里位设置阿里的DNS，不设置DNS无法解析http请求的域名\n content_by_lua_file lua/$1.lua;\n }\n }\n}\n"
},
{
"path": "demo13/html/index.html",
"content": "\n\n\t\n\tLogin Page\n\n\n\t测试\n \n\t\n\t\n\n\n"
},
{
"path": "demo13/logs/.gitignore",
"content": "*.log\n*.pid\n"
},
{
"path": "demo13/lua/req.lua",
"content": "local _M = {}\n\n-- 获取http get/post 请求参数\nfunction _M.getArgs()\n local request_method = ngx.var.request_method\n local args = ngx.req.get_uri_args()\n -- 参数获取\n if \"POST\" == request_method then\n ngx.req.read_body()\n local postArgs = ngx.req.get_post_args()\n if postArgs then\n for k, v in pairs(postArgs) do\n args[k] = v\n end\n end\n end\n return args\nend\n\nreturn _M"
},
{
"path": "demo13/lua/test.lua",
"content": "local req = require \"req\"\nlocal cjson = require \"cjson\"\nlocal http = require \"resty.http\"\n\nfunction get_access_token(code)\n local httpc = http.new()\n local params = {}\n params['grant_type'] = 'authorization_code'\n params['appid'] = '' -- config.appid\n params['secret'] = '' -- config.secret\n params['code'] = ''\n local res,err = httpc:request_uri(\"https://api.weixin.qq.com/sns/oauth2/access_token?\" .. ngx.encode_args(params), {\n method = \"GET\",\n headers = {\n [\"Accept\"] = \"application/json\",\n [\"Accept-Encoding\"] = \"utf-8\",\n }\n })\n print(err)\n httpc:set_keepalive(60)\n return cjson.decode(res.body)\nend\n\nlocal args = req.getArgs()\nlocal code = args['code']\nlocal res = get_access_token(code)\nngx.say(cjson.encode(res))\nngx.say(res.openid)\n"
},
{
"path": "demo13/lualib/resty/http.lua",
"content": "local http_headers = require \"resty.http_headers\"\n\nlocal ngx_socket_tcp = ngx.socket.tcp\nlocal ngx_req = ngx.req\nlocal ngx_req_socket = ngx_req.socket\nlocal ngx_req_get_headers = ngx_req.get_headers\nlocal ngx_req_get_method = ngx_req.get_method\nlocal str_gmatch = string.gmatch\nlocal str_lower = string.lower\nlocal str_upper = string.upper\nlocal str_find = string.find\nlocal str_sub = string.sub\nlocal str_gsub = string.gsub\nlocal tbl_concat = table.concat\nlocal tbl_insert = table.insert\nlocal ngx_encode_args = ngx.encode_args\nlocal ngx_re_match = ngx.re.match\nlocal ngx_re_gsub = ngx.re.gsub\nlocal ngx_log = ngx.log\nlocal ngx_DEBUG = ngx.DEBUG\nlocal ngx_ERR = ngx.ERR\nlocal ngx_NOTICE = ngx.NOTICE\nlocal ngx_var = ngx.var\nlocal co_yield = coroutine.yield\nlocal co_create = coroutine.create\nlocal co_status = coroutine.status\nlocal co_resume = coroutine.resume\n\n\n-- http://www.w3.org/Protocols/rfc2616/rfc2616-sec13.html#sec13.5.1\nlocal HOP_BY_HOP_HEADERS = {\n [\"connection\"] = true,\n [\"keep-alive\"] = true,\n [\"proxy-authenticate\"] = true,\n [\"proxy-authorization\"] = true,\n [\"te\"] = true,\n [\"trailers\"] = true,\n [\"transfer-encoding\"] = true,\n [\"upgrade\"] = true,\n [\"content-length\"] = true, -- Not strictly hop-by-hop, but Nginx will deal\n -- with this (may send chunked for example).\n}\n\n\n-- Reimplemented coroutine.wrap, returning \"nil, err\" if the coroutine cannot\n-- be resumed. This protects user code from inifite loops when doing things like\n-- repeat\n-- local chunk, err = res.body_reader()\n-- if chunk then -- <-- This could be a string msg in the core wrap function.\n-- ...\n-- end\n-- until not chunk\nlocal co_wrap = function(func)\n local co = co_create(func)\n if not co then\n return nil, \"could not create coroutine\"\n else\n return function(...)\n if co_status(co) == \"suspended\" then\n return select(2, co_resume(co, ...))\n else\n return nil, \"can't resume a \" .. co_status(co) .. \" coroutine\"\n end\n end\n end\nend\n\n\nlocal _M = {\n _VERSION = '0.09',\n}\n_M._USER_AGENT = \"lua-resty-http/\" .. _M._VERSION .. \" (Lua) ngx_lua/\" .. ngx.config.ngx_lua_version\n\nlocal mt = { __index = _M }\n\n\nlocal HTTP = {\n [1.0] = \" HTTP/1.0\\r\\n\",\n [1.1] = \" HTTP/1.1\\r\\n\",\n}\n\nlocal DEFAULT_PARAMS = {\n method = \"GET\",\n path = \"/\",\n version = 1.1,\n}\n\n\nfunction _M.new(self)\n local sock, err = ngx_socket_tcp()\n if not sock then\n return nil, err\n end\n return setmetatable({ sock = sock, keepalive = true }, mt)\nend\n\n\nfunction _M.set_timeout(self, timeout)\n local sock = self.sock\n if not sock then\n return nil, \"not initialized\"\n end\n\n return sock:settimeout(timeout)\nend\n\n\nfunction _M.ssl_handshake(self, ...)\n local sock = self.sock\n if not sock then\n return nil, \"not initialized\"\n end\n\n self.ssl = true\n\n return sock:sslhandshake(...)\nend\n\n\nfunction _M.connect(self, ...)\n local sock = self.sock\n if not sock then\n return nil, \"not initialized\"\n end\n\n self.host = select(1, ...)\n self.port = select(2, ...)\n\n -- If port is not a number, this is likely a unix domain socket connection.\n if type(self.port) ~= \"number\" then\n self.port = nil\n end\n\n self.keepalive = true\n\n return sock:connect(...)\nend\n\n\nfunction _M.set_keepalive(self, ...)\n local sock = self.sock\n if not sock then\n return nil, \"not initialized\"\n end\n\n if self.keepalive == true then\n return sock:setkeepalive(...)\n else\n -- The server said we must close the connection, so we cannot setkeepalive.\n -- If close() succeeds we return 2 instead of 1, to differentiate between\n -- a normal setkeepalive() failure and an intentional close().\n local res, err = sock:close()\n if res then\n return 2, \"connection must be closed\"\n else\n return res, err\n end\n end\nend\n\n\nfunction _M.get_reused_times(self)\n local sock = self.sock\n if not sock then\n return nil, \"not initialized\"\n end\n\n return sock:getreusedtimes()\nend\n\n\nfunction _M.close(self)\n local sock = self.sock\n if not sock then\n return nil, \"not initialized\"\n end\n\n return sock:close()\nend\n\n\nlocal function _should_receive_body(method, code)\n if method == \"HEAD\" then return nil end\n if code == 204 or code == 304 then return nil end\n if code >= 100 and code < 200 then return nil end\n return true\nend\n\n\nfunction _M.parse_uri(self, uri)\n local m, err = ngx_re_match(uri, [[^(http[s]?)://([^:/]+)(?::(\\d+))?(.*)]],\n \"jo\")\n\n if not m then\n if err then\n return nil, \"failed to match the uri: \" .. uri .. \", \" .. err\n end\n\n return nil, \"bad uri: \" .. uri\n else\n if m[3] then\n m[3] = tonumber(m[3])\n else\n if m[1] == \"https\" then\n m[3] = 443\n else\n m[3] = 80\n end\n end\n if not m[4] or \"\" == m[4] then m[4] = \"/\" end\n return m, nil\n end\nend\n\n\nlocal function _format_request(params)\n local version = params.version\n local headers = params.headers or {}\n\n local query = params.query or \"\"\n if query then\n if type(query) == \"table\" then\n query = \"?\" .. ngx_encode_args(query)\n end\n end\n\n -- Initialize request\n local req = {\n str_upper(params.method),\n \" \",\n params.path,\n query,\n HTTP[version],\n -- Pre-allocate slots for minimum headers and carriage return.\n true,\n true,\n true,\n }\n local c = 6 -- req table index it's faster to do this inline vs table.insert\n\n -- Append headers\n for key, values in pairs(headers) do\n if type(values) ~= \"table\" then\n values = {values}\n end\n\n key = tostring(key)\n for _, value in pairs(values) do\n req[c] = key .. \": \" .. tostring(value) .. \"\\r\\n\"\n c = c + 1\n end\n end\n\n -- Close headers\n req[c] = \"\\r\\n\"\n\n return tbl_concat(req)\nend\n\n\nlocal function _receive_status(sock)\n local line, err = sock:receive(\"*l\")\n if not line then\n return nil, nil, nil, err\n end\n\n return tonumber(str_sub(line, 10, 12)), tonumber(str_sub(line, 6, 8)), str_sub(line, 14)\nend\n\n\n\nlocal function _receive_headers(sock)\n local headers = http_headers.new()\n\n repeat\n local line, err = sock:receive(\"*l\")\n if not line then\n return nil, err\n end\n\n for key, val in str_gmatch(line, \"([^:%s]+):%s*(.+)\") do\n if headers[key] then\n if type(headers[key]) ~= \"table\" then\n headers[key] = { headers[key] }\n end\n tbl_insert(headers[key], tostring(val))\n else\n headers[key] = tostring(val)\n end\n end\n until str_find(line, \"^%s*$\")\n\n return headers, nil\nend\n\n\nlocal function _chunked_body_reader(sock, default_chunk_size)\n return co_wrap(function(max_chunk_size)\n local max_chunk_size = max_chunk_size or default_chunk_size\n local remaining = 0\n local length\n\n repeat\n -- If we still have data on this chunk\n if max_chunk_size and remaining > 0 then\n\n if remaining > max_chunk_size then\n -- Consume up to max_chunk_size\n length = max_chunk_size\n remaining = remaining - max_chunk_size\n else\n -- Consume all remaining\n length = remaining\n remaining = 0\n end\n else -- This is a fresh chunk\n\n -- Receive the chunk size\n local str, err = sock:receive(\"*l\")\n if not str then\n co_yield(nil, err)\n end\n\n length = tonumber(str, 16)\n\n if not length then\n co_yield(nil, \"unable to read chunksize\")\n end\n\n if max_chunk_size and length > max_chunk_size then\n -- Consume up to max_chunk_size\n remaining = length - max_chunk_size\n length = max_chunk_size\n end\n end\n\n if length > 0 then\n local str, err = sock:receive(length)\n if not str then\n co_yield(nil, err)\n end\n\n max_chunk_size = co_yield(str) or default_chunk_size\n\n -- If we're finished with this chunk, read the carriage return.\n if remaining == 0 then\n sock:receive(2) -- read \\r\\n\n end\n else\n -- Read the last (zero length) chunk's carriage return\n sock:receive(2) -- read \\r\\n\n end\n\n until length == 0\n end)\nend\n\n\nlocal function _body_reader(sock, content_length, default_chunk_size)\n return co_wrap(function(max_chunk_size)\n local max_chunk_size = max_chunk_size or default_chunk_size\n\n if not content_length and max_chunk_size then\n -- We have no length, but wish to stream.\n -- HTTP 1.0 with no length will close connection, so read chunks to the end.\n repeat\n local str, err, partial = sock:receive(max_chunk_size)\n if not str and err == \"closed\" then\n max_chunk_size = tonumber(co_yield(partial, err) or default_chunk_size)\n end\n\n max_chunk_size = tonumber(co_yield(str) or default_chunk_size)\n if max_chunk_size and max_chunk_size < 0 then max_chunk_size = nil end\n\n if not max_chunk_size then\n ngx_log(ngx_ERR, \"Buffer size not specified, bailing\")\n break\n end\n until not str\n\n elseif not content_length then\n -- We have no length but don't wish to stream.\n -- HTTP 1.0 with no length will close connection, so read to the end.\n co_yield(sock:receive(\"*a\"))\n\n elseif not max_chunk_size then\n -- We have a length and potentially keep-alive, but want everything.\n co_yield(sock:receive(content_length))\n\n else\n -- We have a length and potentially a keep-alive, and wish to stream\n -- the response.\n local received = 0\n repeat\n local length = max_chunk_size\n if received + length > content_length then\n length = content_length - received\n end\n\n if length > 0 then\n local str, err = sock:receive(length)\n if not str then\n max_chunk_size = tonumber(co_yield(nil, err) or default_chunk_size)\n end\n received = received + length\n\n max_chunk_size = tonumber(co_yield(str) or default_chunk_size)\n if max_chunk_size and max_chunk_size < 0 then max_chunk_size = nil end\n\n if not max_chunk_size then\n ngx_log(ngx_ERR, \"Buffer size not specified, bailing\")\n break\n end\n end\n\n until length == 0\n end\n end)\nend\n\n\nlocal function _no_body_reader()\n return nil\nend\n\n\nlocal function _read_body(res)\n local reader = res.body_reader\n\n if not reader then\n -- Most likely HEAD or 304 etc.\n return nil, \"no body to be read\"\n end\n\n local chunks = {}\n local c = 1\n\n local chunk, err\n repeat\n chunk, err = reader()\n\n if err then\n return nil, err, tbl_concat(chunks) -- Return any data so far.\n end\n if chunk then\n chunks[c] = chunk\n c = c + 1\n end\n until not chunk\n\n return tbl_concat(chunks)\nend\n\n\nlocal function _trailer_reader(sock)\n return co_wrap(function()\n co_yield(_receive_headers(sock))\n end)\nend\n\n\nlocal function _read_trailers(res)\n local reader = res.trailer_reader\n if not reader then\n return nil, \"no trailers\"\n end\n\n local trailers = reader()\n setmetatable(res.headers, { __index = trailers })\nend\n\n\nlocal function _send_body(sock, body)\n if type(body) == 'function' then\n repeat\n local chunk, err, partial = body()\n\n if chunk then\n local ok,err = sock:send(chunk)\n\n if not ok then\n return nil, err\n end\n elseif err ~= nil then\n return nil, err, partial\n end\n\n until chunk == nil\n elseif body ~= nil then\n local bytes, err = sock:send(body)\n\n if not bytes then\n return nil, err\n end\n end\n return true, nil\nend\n\n\nlocal function _handle_continue(sock, body)\n local status, version, reason, err = _receive_status(sock)\n if not status then\n return nil, nil, err\n end\n\n -- Only send body if we receive a 100 Continue\n if status == 100 then\n local ok, err = sock:receive(\"*l\") -- Read carriage return\n if not ok then\n return nil, nil, err\n end\n _send_body(sock, body)\n end\n return status, version, err\nend\n\n\nfunction _M.send_request(self, params)\n -- Apply defaults\n setmetatable(params, { __index = DEFAULT_PARAMS })\n\n local sock = self.sock\n local body = params.body\n local headers = http_headers.new()\n\n local params_headers = params.headers\n if params_headers then\n -- We assign one by one so that the metatable can handle case insensitivity\n -- for us. You can blame the spec for this inefficiency.\n for k,v in pairs(params_headers) do\n headers[k] = v\n end\n end\n\n -- Ensure minimal headers are set\n if type(body) == 'string' and not headers[\"Content-Length\"] then\n headers[\"Content-Length\"] = #body\n end\n if not headers[\"Host\"] then\n if (str_sub(self.host, 1, 5) == \"unix:\") then\n return nil, \"Unable to generate a useful Host header for a unix domain socket. Please provide one.\"\n end\n -- If we have a port (i.e. not connected to a unix domain socket), and this\n -- port is non-standard, append it to the Host heaer.\n if self.port then\n if self.ssl and self.port ~= 443 then\n headers[\"Host\"] = self.host .. \":\" .. self.port\n elseif not self.ssl and self.port ~= 80 then\n headers[\"Host\"] = self.host .. \":\" .. self.port\n else\n headers[\"Host\"] = self.host\n end\n else\n headers[\"Host\"] = self.host\n end\n end\n if not headers[\"User-Agent\"] then\n headers[\"User-Agent\"] = _M._USER_AGENT\n end\n if params.version == 1.0 and not headers[\"Connection\"] then\n headers[\"Connection\"] = \"Keep-Alive\"\n end\n\n params.headers = headers\n\n -- Format and send request\n local req = _format_request(params)\n ngx_log(ngx_DEBUG, \"\\n\", req)\n local bytes, err = sock:send(req)\n\n if not bytes then\n return nil, err\n end\n\n -- Send the request body, unless we expect: continue, in which case\n -- we handle this as part of reading the response.\n if headers[\"Expect\"] ~= \"100-continue\" then\n local ok, err, partial = _send_body(sock, body)\n if not ok then\n return nil, err, partial\n end\n end\n\n return true\nend\n\n\nfunction _M.read_response(self, params)\n local sock = self.sock\n\n local status, version, reason, err\n\n -- If we expect: continue, we need to handle this, sending the body if allowed.\n -- If we don't get 100 back, then status is the actual status.\n if params.headers[\"Expect\"] == \"100-continue\" then\n local _status, _version, _err = _handle_continue(sock, params.body)\n if not _status then\n return nil, _err\n elseif _status ~= 100 then\n status, version, err = _status, _version, _err\n end\n end\n\n -- Just read the status as normal.\n if not status then\n status, version, reason, err = _receive_status(sock)\n if not status then\n return nil, err\n end\n end\n\n\n local res_headers, err = _receive_headers(sock)\n if not res_headers then\n return nil, err\n end\n\n -- keepalive is true by default. Determine if this is correct or not.\n local ok, connection = pcall(str_lower, res_headers[\"Connection\"])\n if ok then\n if (version == 1.1 and connection == \"close\") or\n (version == 1.0 and connection ~= \"keep-alive\") then\n self.keepalive = false\n end\n else\n -- no connection header\n if version == 1.0 then\n self.keepalive = false\n end\n end\n\n local body_reader = _no_body_reader\n local trailer_reader, err = nil, nil\n local has_body = false\n\n -- Receive the body_reader\n if _should_receive_body(params.method, status) then\n local ok, encoding = pcall(str_lower, res_headers[\"Transfer-Encoding\"])\n if ok and version == 1.1 and encoding == \"chunked\" then\n body_reader, err = _chunked_body_reader(sock)\n has_body = true\n else\n\n local ok, length = pcall(tonumber, res_headers[\"Content-Length\"])\n if ok then\n body_reader, err = _body_reader(sock, length)\n has_body = true\n end\n end\n end\n\n if res_headers[\"Trailer\"] then\n trailer_reader, err = _trailer_reader(sock)\n end\n\n if err then\n return nil, err\n else\n return {\n status = status,\n reason = reason,\n headers = res_headers,\n has_body = has_body,\n body_reader = body_reader,\n read_body = _read_body,\n trailer_reader = trailer_reader,\n read_trailers = _read_trailers,\n }\n end\nend\n\n\nfunction _M.request(self, params)\n local res, err = self:send_request(params)\n if not res then\n return res, err\n else\n return self:read_response(params)\n end\nend\n\n\nfunction _M.request_pipeline(self, requests)\n for i, params in ipairs(requests) do\n if params.headers and params.headers[\"Expect\"] == \"100-continue\" then\n return nil, \"Cannot pipeline request specifying Expect: 100-continue\"\n end\n\n local res, err = self:send_request(params)\n if not res then\n return res, err\n end\n end\n\n local responses = {}\n for i, params in ipairs(requests) do\n responses[i] = setmetatable({\n params = params,\n response_read = false,\n }, {\n -- Read each actual response lazily, at the point the user tries\n -- to access any of the fields.\n __index = function(t, k)\n local res, err\n if t.response_read == false then\n res, err = _M.read_response(self, t.params)\n t.response_read = true\n\n if not res then\n ngx_log(ngx_ERR, err)\n else\n for rk, rv in pairs(res) do\n t[rk] = rv\n end\n end\n end\n return rawget(t, k)\n end,\n })\n end\n return responses\nend\n\n\nfunction _M.request_uri(self, uri, params)\n if not params then params = {} end\n\n local parsed_uri, err = self:parse_uri(uri)\n if not parsed_uri then\n return nil, err\n end\n\n local scheme, host, port, path = unpack(parsed_uri)\n if not params.path then params.path = path end\n\n local c, err = self:connect(host, port)\n if not c then\n return nil, err\n end\n\n if scheme == \"https\" then\n local verify = true\n if params.ssl_verify == false then\n verify = false\n end\n local ok, err = self:ssl_handshake(nil, host, verify)\n if not ok then\n return nil, err\n end\n end\n\n local res, err = self:request(params)\n if not res then\n return nil, err\n end\n\n local body, err = res:read_body()\n if not body then\n return nil, err\n end\n\n res.body = body\n\n local ok, err = self:set_keepalive()\n if not ok then\n ngx_log(ngx_ERR, err)\n end\n\n return res, nil\nend\n\n\nfunction _M.get_client_body_reader(self, chunksize, sock)\n local chunksize = chunksize or 65536\n if not sock then\n local ok, err\n ok, sock, err = pcall(ngx_req_socket)\n\n if not ok then\n return nil, sock -- pcall err\n end\n\n if not sock then\n if err == \"no body\" then\n return nil\n else\n return nil, err\n end\n end\n end\n\n local headers = ngx_req_get_headers()\n local length = headers.content_length\n local encoding = headers.transfer_encoding\n if length then\n return _body_reader(sock, tonumber(length), chunksize)\n elseif encoding and str_lower(encoding) == 'chunked' then\n -- Not yet supported by ngx_lua but should just work...\n return _chunked_body_reader(sock, chunksize)\n else\n return nil\n end\nend\n\n\nfunction _M.proxy_request(self, chunksize)\n return self:request{\n method = ngx_req_get_method(),\n path = ngx_re_gsub(ngx_var.uri, \"\\\\s\", \"%20\", \"jo\") .. ngx_var.is_args .. (ngx_var.query_string or \"\"),\n body = self:get_client_body_reader(chunksize),\n headers = ngx_req_get_headers(),\n }\nend\n\n\nfunction _M.proxy_response(self, response, chunksize)\n if not response then\n ngx_log(ngx_ERR, \"no response provided\")\n return\n end\n\n ngx.status = response.status\n\n -- Filter out hop-by-hop headeres\n for k,v in pairs(response.headers) do\n if not HOP_BY_HOP_HEADERS[str_lower(k)] then\n ngx.header[k] = v\n end\n end\n\n local reader = response.body_reader\n repeat\n local chunk, err = reader(chunksize)\n if err then\n ngx_log(ngx_ERR, err)\n break\n end\n\n if chunk then\n local res, err = ngx.print(chunk)\n if not res then\n ngx_log(ngx_ERR, err)\n break\n end\n end\n until not chunk\nend\n\n\nreturn _M\n"
},
{
"path": "demo13/lualib/resty/http_headers.lua",
"content": "local rawget, rawset, setmetatable =\n rawget, rawset, setmetatable\n\nlocal str_gsub = string.gsub\nlocal str_lower = string.lower\n\n\nlocal _M = {\n _VERSION = '0.01',\n}\n\n\n-- Returns an empty headers table with internalised case normalisation.\n-- Supports the same cases as in ngx_lua:\n--\n-- headers.content_length\n-- headers[\"content-length\"]\n-- headers[\"Content-Length\"]\nfunction _M.new(self)\n local mt = { \n normalised = {},\n }\n\n\n mt.__index = function(t, k)\n local k_hyphened = str_gsub(k, \"_\", \"-\")\n local matched = rawget(t, k)\n if matched then\n return matched\n else\n local k_normalised = str_lower(k_hyphened)\n return rawget(t, mt.normalised[k_normalised])\n end\n end\n\n\n -- First check the normalised table. If there's no match (first time) add an entry for\n -- our current case in the normalised table. This is to preserve the human (prettier) case\n -- instead of outputting lowercased header names.\n --\n -- If there's a match, we're being updated, just with a different case for the key. We use\n -- the normalised table to give us the original key, and perorm a rawset().\n mt.__newindex = function(t, k, v)\n -- we support underscore syntax, so always hyphenate.\n local k_hyphened = str_gsub(k, \"_\", \"-\")\n\n -- lowercase hyphenated is \"normalised\"\n local k_normalised = str_lower(k_hyphened)\n\n if not mt.normalised[k_normalised] then\n mt.normalised[k_normalised] = k_hyphened\n rawset(t, k_hyphened, v)\n else\n rawset(t, mt.normalised[k_normalised], v)\n end\n end\n\n return setmetatable({}, mt)\nend\n\n\nreturn _M\n"
},
{
"path": "demo14/README.md",
"content": "有的时候我们希望在启动openresty的时候，在后台运行一些定时任务，可以放在`init_worker_by_lua_block`阶段运行，如果想重复执行可以通过不断`ngx.timer.at`来实现多次调用\n\n需要注意的是`init_worker_by_lua_block`会在每个worker启动的时候都会运行，当你的worker_processes配置为1的时候，没有任何问题，但是当你worker_processes配置为大于1的时候，会在后台运行多个定时任务，如果你的任务可以重复执行，那还没关系，假如不能的话，就有点问题了。\n\n为了解决配置多个worker会启动多个任务的问题，需要有一种机制就是即使这段代码会重复运行，但是也只能启动一个定时任务，那么就需要多个worker进行排他处理\n\n我们可以配置一个`lua_shared_dict`共享字典，这个字典在多个worker之间共享，有了这个就好办了，只需要在第一个worker启动完成之后，在内存里面设置一个字段，标识任务已经启动，那么其他worker启动的时候发现已经启动了一个定时任务，不再启动就可以了。\n\n大多数情况下这样就已经可以了，但是lua_shared_dict保存的数据的生命周期是即使在nginx -s reload 的时候它还是会继续存在的，并不会消失，除非stop。\n\n而nginx -s reload 又会导致旧worker被结束，新worker被启动，但是又由于之前在共享内存里面保存了已启动标识状态，导致新的worker不能启动定时任务，知道了原因解决起来就很简单了，只需要在第一worker启动定时任务的时候延迟一小会，把共享字典里面的值重置了就行了，这样下次reload的时候就相当于第一次启动，ok 完美。。\n\nconf/nginx.conf\n```\n\nworker_processes 3;\n\nerror_log logs/error.log notice;\n\nevents {\n worker_connections 1024;\n}\n\nhttp {\n lua_package_path \"$prefix/lua/?.lua;$prefix/lualib/?.lua\";\n\n\tlua_shared_dict task 1m;\n init_worker_by_lua_block {\n local task = ngx.shared.task\n local time = 2\n local count = task:incr(\"invoke\", 1, 0)\n if count == 1 then\n local timer_at = ngx.timer.at\n function do_some_thing()\n print(\"do some thing\")\n timer_at(time, do_some_thing)\n end\n timer_at(time, do_some_thing)\n timer_at(5, function()\n task:set(\"invoke\", 0)\n end\n )\n end\n }\n\n server {\n listen 8888;\n server_name localhost;\n lua_code_cache off;\n\n location / {\n default_type text/html;\n content_by_lua_block {\n ngx.say('定时任务')\n }\n }\n }\n}\n\n```\n\n[示例代码](https://github.com/362228416/openresty-web-dev) 参见demo14部分\n\n"
},
{
"path": "demo14/conf/nginx.conf",
"content": "worker_processes 3;\n\nerror_log logs/error.log notice;\n\nevents {\n worker_connections 1024;\n}\n\nhttp {\n lua_package_path \"$prefix/lua/?.lua;$prefix/lualib/?.lua\";\n\n lua_shared_dict task 1m;\n init_worker_by_lua_block {\n local task = ngx.shared.task\n local time = 2\n local count = task:incr(\"invoke\", 1, 0)\n if count == 1 then\n local timer_at = ngx.timer.at\n function do_some_thing()\n print(\"do some thing\")\n timer_at(time, do_some_thing)\n end\n timer_at(time, do_some_thing)\n timer_at(5, function()\n task:set(\"invoke\", 0)\n end\n )\n end\n }\n\n server {\n listen 8888;\n server_name localhost;\n lua_code_cache off;\n\n location / {\n default_type text/html;\n content_by_lua_block {\n ngx.say('定时任务')\n }\n }\n }\n}"
},
{
"path": "demo14/logs/.gitignore",
"content": "*.log\n*.pid\n"
},
{
"path": "demo15/README.md",
"content": "以前用tengine自带了session_sticky，现在换成openresty，没有现成的，nginx-sticky-module 太老， 编译有点问题，于是自己写了一个，废话不多说，直接看代码\n\nlua/balancer.lua \n```lua\n\nlocal balancer = require \"ngx.balancer\"\nlocal upstream = require \"ngx.upstream\"\n\nlocal upstream_name = 'backend'\n\nlocal srvs = upstream.get_servers(upstream_name)\n\nfunction get_server()\n local cache = ngx.shared.cache\n local key = \"req_index\"\n local index = cache:get(key)\n if index == nil or index > #srvs then\n index = 1\n cache:set(key, index)\n end\n cache:incr(key, 1)\n return index\nend\n\nfunction is_down(server)\n local down = false\n local perrs = upstream.get_primary_peers(upstream_name)\n for i = 1, #perrs do\n local peer = perrs[i]\n if server == peer.name and peer.down == true then\n down = true\n end\n end\n return down\nend\n\n----------------------------\n\nlocal route = ngx.var.cookie_route\n\nlocal server\n\nif route then\n for k, v in pairs(srvs) do\n if ngx.md5(v.name) == route then\n server = v.addr\n end\n end\n if is_down(server) then\n route = nil\n end\nend\n\nif not route then\n for i = 1, #srvs do\n if not server or is_down(server) then\n server = srvs[get_server()].addr\n end\n end\n ngx.header[\"Set-Cookie\"] = 'route=' .. ngx.md5(server) .. '; path=/;'\nend\n\nlocal index = string.find(server, ':')\nlocal host = string.sub(server, 1, index - 1)\nlocal port = string.sub(server, index + 1)\nbalancer.set_current_peer(host, tonumber(port))\n\n```\n\nnginx.conf\n```\nlua_shared_dict cache 1m;\nupstream backend {\n server 192.168.0.2:8080;\n server 192.168.0.3:8080; \n balancer_by_lua_file lua/balancer.lua;\n} \n\nserver {\n listen 80;\n server_name localhost;\n location / {\n proxy_pass http://backend;\n ...\n }\n \n}\n\n# 健康检查\nlua_shared_dict healthcheck 1m;\nlua_socket_log_errors off; \ninit_worker_by_lua_block {\n local hc = require \"resty.upstream.healthcheck\"\n local ok, err = hc.spawn_checker{\n shm = \"healthcheck\", -- defined by \"lua_shared_dict\"\n upstream = \"backend\", -- defined by \"upstream\"\n type = \"http\",\n\n http_req = \"GET / HTTP/1.0\\r\\nHost: localhost\\r\\n\\r\\n\",\n -- raw HTTP request for checking\n\n interval = 2000, -- run the check cycle every 2 sec\n timeout = 1000, -- 1 sec is the timeout for network operations\n fall = 3, -- # of successive failures before turning a peer down\n rise = 2, -- # of successive successes before turning a peer up\n valid_statuses = {200, 302}, -- a list valid HTTP status code\n concurrency = 10, -- concurrency level for test requests\n }\n if not ok then\n ngx.log(ngx.ERR, \"failed to spawn health checker: \", err)\n return\n end\n }\n\n```\n\n\n\n主要是利用`ngx.upstream`、`ngx.balancer` 这两个模块，动态获取upstream，以及设置返回的上游名单，然后写到cookie里面，这里有判断后端是否down掉，如果down掉的话，则获取下一个，后端的状态通过`resty.upstream.healthcheck`模块健康检查来实现，以此为模型可以写更复杂的负载均衡逻辑\n\n我这里比较简单，嫌丑了\n"
},
{
"path": "demo16/README.md",
"content": "\n# 这篇文章主要介绍，怎么用lua实现单一文件入口\n\n之前的例子都需要在nginx.conf文件中，单独配置静态文件location，以及lua_package_path，其实可以把这些整合到一个入口文件\n\n## 几个关键指令和api\n\nset_by_lua_file\n\naccess_by_lua_file\n\nngx.config.prefix()\n\npackage.path\n\nngx.get_phase()\n\n## 实现思路\n\n在一个location / 里面处理所有请求，所以原型配置会是这样 \n\n```\nlocation / {\n default_type \"text/html; charset=utf-8\";\n content_by_lua_file lua/web/mvc.lua;\n}\n```\n\n我想要访问静态资源的时候使用nginx默认的处理机制，也就是指定root 目录，所以配置文件成了下面的样子\n\n```\nlocation / {\n default_type \"text/html; charset=utf-8\";\n access_by_lua_file lua/web/mvc.lua;\n root html;\n}\n```\n\n最后我想用lua来配置root目录，那样就不需要改nginx.conf配置文件，最后变成这样\n\n```\nlocation / {\n default_type \"text/html; charset=utf-8\";\n set_by_lua_file $root lua/web/mvc.lua;\n access_by_lua_file lua/web/mvc.lua;\n root $root;\n}\n```\n\n这样的话，所有的处理都指向了mvc.lua文件，接下来看lua端怎么实现\n\n首先我们需要知道lua package加载路径，否则引入自定义的lua模块可能会失败\n\n代码很简单\n\n```lua\nlocal package = package\nlocal pack_path = package.path\nlocal prefix = ngx.config.prefix()\nlocal p = prefix .. \"lualib/?.lua;\" .. prefix .. \"lua/?.lua;;\" .. pack_path\npackage.path = p\n```\n\n先获取package默认加载路径，再获取当前项目安装目录，最后组装成新的package覆盖原来的package.path即可实现在nginx.conf里面配置lua_package_path一致的效果\n\n\n接下来处理set_by_lua_file，通过ngx.get_phase()获取到当前执行环境是set，既set_by_*阶段\n\n\n```lua\nlocal phase = ngx.get_phase()\n\n-- 设置root环境变量\nif phase == 'set' then\n local global_config = require \"global_config\"\n return global_config.baseDir\nend\n```\n\n这样外面的root值就动态指定，但是因为配置了access_by_lua_file所以静态资源请求，还是会执行这个lua文件，这里只需要忽略掉就好了，直接return\n\n```lua\n-- 静态文件\nif paths[1] == 'image' or paths[1] == 'style' or paths[1] == 'js' then\n return\nend\n\n```\n\n\n最后就是lua模块渲染了，这里只是随便写一个demo，仅供参考\n\n```lua\nlocal template = require \"web.template\"\n\nlocal router = {}\n\nrouter['/'] = function()\n local ctx = {}\n template.render('index.html', ctx)\nend\n\n\nlocal ctl = router[uri]\n\nif ctl ~= nil then\n pcall(ctl)\nelse\n ngx.exit(404)\nend\n```\n\n执行命令\n\n```bash\ncd demo16\nopenresty -p . -c conf/nginx.conf\n```\n\n浏览器访问 http://localhost:8080/\n\n页面是由lua渲染的，可以看得出index.html里面有模板代码，都被替换了，然后js文件也能正常加载，点击hello按钮会弹出hello\n\n到这里基本就结束了，发挥你的想象力吧，lua真的很强\n\n\n"
},
{
"path": "demo16/conf/nginx.conf",
"content": "\nworker_processes 1;\n\nerror_log logs/error.log notice;\n\nevents {\n worker_connections 1024;\n}\n\nhttp {\n\n server {\n listen 8080;\n server_name localhost;\n lua_code_cache off;\n\n location / {\n \tdefault_type \"text/html; charset=utf-8\";\n \tset_by_lua_file $root lua/web/mvc.lua;\n \taccess_by_lua_file lua/web/mvc.lua;\n \troot $root;\n }\n\n }\n\n}\n"
},
{
"path": "demo16/html/index.html",
"content": "\n\n\n \n {*site_name*}\n \n\n\n\n\n\n\n\n"
},
{
"path": "demo16/html/js/index.js",
"content": "\nfunction hello() {\n alert('hello')\n}"
},
{
"path": "demo16/logs/.gitignore",
"content": "*.log\n*.pid\n"
},
{
"path": "demo16/lua/global_config.lua",
"content": "\n-- 全站配置\n\nlocal _M = {\n __version = 0.1\n}\n\n-- 文件路径\n\n_M.baseDir = \"html\"\n\n\n--站点配置信息\n\n_M.siteConfig = {\n site_name = '网站名称',\n domain = 'localhost:8080',\n host = 'http://localhost:8080'\n}\n\n\nreturn _M"
},
{
"path": "demo16/lua/utils.lua",
"content": "\nlocal _M = {\n __version = 0.1\n}\n\n-- 分隔字符串\nfunction split( str,reps )\n local resultStrList = {}\n string.gsub(str,'[^'..reps..']+',function ( w )\n table.insert(resultStrList,w)\n end)\n return resultStrList\nend\n\n\n_M.split = split\n\nreturn _M"
},
{
"path": "demo16/lua/web/mvc.lua",
"content": "local package = package\nlocal pack_path = package.path\nlocal prefix = ngx.config.prefix()\nlocal p = prefix .. \"lualib/?.lua;\" .. prefix .. \"lua/?.lua;;\" .. pack_path\npackage.path = p\n\nlocal utils = require \"utils\"\nlocal uri = ngx.var.uri\n\nlocal paths = utils.split(uri, '/')\n\nlocal phase = ngx.get_phase()\n\n-- 设置root环境变量\nif phase == 'set' then\n local global_config = require \"global_config\"\n return global_config.baseDir\nend\n\n--ngx.say(uri)\n\n-- 静态文件\nif paths[1] == 'image' or paths[1] == 'style' or paths[1] == 'js' then\n return\nend\n\n\nlocal template = require \"web.template\"\n\nlocal router = {}\n\nrouter['/'] = function()\n local ctx = {}\n template.render('index.html', ctx)\nend\n\n\nlocal ctl = router[uri]\n\nif ctl ~= nil then\n pcall(ctl)\nelse\n ngx.exit(404)\nend\n\n"
},
{
"path": "demo16/lua/web/template.lua",
"content": "local template = require \"resty.template\"\nlocal global_config = require \"global_config\"\n\nlocal _M = {\n __version = 0.1\n}\n\nfunction _M.render(view, context, key, plain)\n if context == nil then\n context = {}\n end\n for k, v in pairs(global_config.siteConfig) do\n context[k] = v\n end\n return template.render(view, context, key, plain)\nend\n\nreturn _M"
},
{
"path": "demo16/lualib/resty/template.lua",
"content": "local setmetatable = setmetatable\nlocal loadstring = loadstring\nlocal loadchunk\nlocal tostring = tostring\nlocal setfenv = setfenv\nlocal require = require\nlocal capture\nlocal concat = table.concat\nlocal assert = assert\nlocal prefix\nlocal write = io.write\nlocal pcall = pcall\nlocal phase\nlocal open = io.open\nlocal load = load\nlocal type = type\nlocal dump = string.dump\nlocal find = string.find\nlocal gsub = string.gsub\nlocal byte = string.byte\nlocal null\nlocal sub = string.sub\nlocal ngx = ngx\nlocal jit = jit\nlocal var\n\nlocal _VERSION = _VERSION\nlocal _ENV = _ENV\nlocal _G = _G\n\nlocal HTML_ENTITIES = {\n [\"&\"] = \"&\",\n [\"<\"] = \"<\",\n [\">\"] = \">\",\n ['\"'] = \""\",\n [\"'\"] = \"'\",\n [\"/\"] = \"/\"\n}\n\nlocal CODE_ENTITIES = {\n [\"{\"] = \"{\",\n [\"}\"] = \"}\",\n [\"&\"] = \"&\",\n [\"<\"] = \"<\",\n [\">\"] = \">\",\n ['\"'] = \""\",\n [\"'\"] = \"'\",\n [\"/\"] = \"/\"\n}\n\nlocal VAR_PHASES\n\nlocal ok, newtab = pcall(require, \"table.new\")\nif not ok then newtab = function() return {} end end\n\nlocal caching = true\nlocal template = newtab(0, 12)\n\ntemplate._VERSION = \"1.9\"\ntemplate.cache = {}\n\nlocal function enabled(val)\n if val == nil then return true end\n return val == true or (val == \"1\" or val == \"true\" or val == \"on\")\nend\n\nlocal function trim(s)\n return gsub(gsub(s, \"^%s+\", \"\"), \"%s+$\", \"\")\nend\n\nlocal function rpos(view, s)\n while s > 0 do\n local c = sub(view, s, s)\n if c == \" \" or c == \"\\t\" or c == \"\\0\" or c == \"\\x0B\" then\n s = s - 1\n else\n break\n end\n end\n return s\nend\n\nlocal function escaped(view, s)\n if s > 1 and sub(view, s - 1, s - 1) == \"\\\\\" then\n if s > 2 and sub(view, s - 2, s - 2) == \"\\\\\" then\n return false, 1\n else\n return true, 1\n end\n end\n return false, 0\nend\n\nlocal function readfile(path)\n local file = open(path, \"rb\")\n if not file then return nil end\n local content = file:read \"*a\"\n file:close()\n return content\nend\n\nlocal function loadlua(path)\n return readfile(path) or path\nend\n\nlocal function loadngx(path)\n local vars = VAR_PHASES[phase()]\n local file, location = path, vars and var.template_location\n if sub(file, 1) == \"/\" then file = sub(file, 2) end\n if location and location ~= \"\" then\n if sub(location, -1) == \"/\" then location = sub(location, 1, -2) end\n local res = capture(concat{ location, '/', file})\n if res.status == 200 then return res.body end\n end\n local root = vars and (var.template_root or var.document_root) or prefix\n if sub(root, -1) == \"/\" then root = sub(root, 1, -2) end\n return readfile(concat{ root, \"/\", file }) or path\nend\n\ndo\n if ngx then\n VAR_PHASES = {\n set = true,\n rewrite = true,\n access = true,\n content = true,\n header_filter = true,\n body_filter = true,\n log = true\n }\n template.print = ngx.print or write\n template.load = loadngx\n prefix, var, capture, null, phase = ngx.config.prefix(), ngx.var, ngx.location.capture, ngx.null, ngx.get_phase\n if VAR_PHASES[phase()] then\n caching = enabled(var.template_cache)\n end\n else\n template.print = write\n template.load = loadlua\n end\n if _VERSION == \"Lua 5.1\" then\n local context = { __index = function(t, k)\n return t.context[k] or t.template[k] or _G[k]\n end }\n if jit then\n loadchunk = function(view)\n return assert(load(view, nil, nil, setmetatable({ template = template }, context)))\n end\n else\n loadchunk = function(view)\n local func = assert(loadstring(view))\n setfenv(func, setmetatable({ template = template }, context))\n return func\n end\n end\n else\n local context = { __index = function(t, k)\n return t.context[k] or t.template[k] or _ENV[k]\n end }\n loadchunk = function(view)\n return assert(load(view, nil, nil, setmetatable({ template = template }, context)))\n end\n end\nend\n\nfunction template.caching(enable)\n if enable ~= nil then caching = enable == true end\n return caching\nend\n\nfunction template.output(s)\n if s == nil or s == null then return \"\" end\n if type(s) == \"function\" then return template.output(s()) end\n return tostring(s)\nend\n\nfunction template.escape(s, c)\n if type(s) == \"string\" then\n if c then return gsub(s, \"[}{\\\">/<'&]\", CODE_ENTITIES) end\n return gsub(s, \"[\\\">/<'&]\", HTML_ENTITIES)\n end\n return template.output(s)\nend\n\nfunction template.new(view, layout)\n assert(view, \"view was not provided for template.new(view, layout).\")\n local render, compile = template.render, template.compile\n if layout then\n if type(layout) == \"table\" then\n return setmetatable({ render = function(self, context)\n local context = context or self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n layout.blocks = context.blocks or {}\n layout.view = context.view or \"\"\n return layout:render()\n end }, { __tostring = function(self)\n local context = self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n layout.blocks = context.blocks or {}\n layout.view = context.view\n return tostring(layout)\n end })\n else\n return setmetatable({ render = function(self, context)\n local context = context or self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n return render(layout, context)\n end }, { __tostring = function(self)\n local context = self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n return compile(layout)(context)\n end })\n end\n end\n return setmetatable({ render = function(self, context)\n return render(view, context or self)\n end }, { __tostring = function(self)\n return compile(view)(self)\n end })\nend\n\nfunction template.precompile(view, path, strip)\n local chunk = dump(template.compile(view), strip ~= false)\n if path then\n local file = open(path, \"wb\")\n file:write(chunk)\n file:close()\n end\n return chunk\nend\n\nfunction template.compile(view, key, plain)\n assert(view, \"view was not provided for template.compile(view, key, plain).\")\n if key == \"no-cache\" then\n return loadchunk(template.parse(view, plain)), false\n end\n key = key or view\n local cache = template.cache\n if cache[key] then return cache[key], true end\n local func = loadchunk(template.parse(view, plain))\n if caching then cache[key] = func end\n return func, false\nend\n\nfunction template.parse(view, plain)\n assert(view, \"view was not provided for template.parse(view, plain).\")\n if not plain then\n view = template.load(view)\n if byte(sub(view, 1, 1)) == 27 then return view end\n end\n local j = 2\n local c = {[[\ncontext=... or {}\nlocal function include(v, c) return template.compile(v)(c or context) end\nlocal ___,blocks,layout={},blocks or {}\n]] }\n local i, s = 1, find(view, \"{\", 1, true)\n while s do\n local t, p = sub(view, s + 1, s + 1), s + 2\n if t == \"{\" then\n local e = find(view, \"}}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n c[j] = \"___[#___+1]=template.escape(\"\n c[j+1] = trim(sub(view, p, e - 1))\n c[j+2] = \")\\n\"\n j=j+3\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"*\" then\n local e = find(view, \"*}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n c[j] = \"___[#___+1]=template.output(\"\n c[j+1] = trim(sub(view, p, e - 1))\n c[j+2] = \")\\n\"\n j=j+3\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"%\" then\n local e = find(view, \"%}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if z then\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n i = s\n else\n local n = e + 2\n if sub(view, n, n) == \"\\n\" then\n n = n + 1\n end\n local r = rpos(view, s - 1)\n if i <= r then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, r)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = trim(sub(view, p, e - 1))\n c[j+1] = \"\\n\"\n j=j+2\n s, i = n - 1, n\n end\n end\n elseif t == \"(\" then\n local e = find(view, \")}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n local f = sub(view, p, e - 1)\n local x = find(f, \",\", 2, true)\n if x then\n c[j] = \"___[#___+1]=include([=[\"\n c[j+1] = trim(sub(f, 1, x - 1))\n c[j+2] = \"]=],\"\n c[j+3] = trim(sub(f, x + 1))\n c[j+4] = \")\\n\"\n j=j+5\n else\n c[j] = \"___[#___+1]=include([=[\"\n c[j+1] = trim(f)\n c[j+2] = \"]=])\\n\"\n j=j+3\n end\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"[\" then\n local e = find(view, \"]}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n c[j] = \"___[#___+1]=include(\"\n c[j+1] = trim(sub(view, p, e - 1))\n c[j+2] = \")\\n\"\n j=j+3\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"-\" then\n local e = find(view, \"-}\", p, true)\n if e then\n local x, y = find(view, sub(view, s, e + 1), e + 2, true)\n if x then\n local z, w = escaped(view, s)\n if z then\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n i = s\n else\n y = y + 1\n x = x - 1\n if sub(view, y, y) == \"\\n\" then\n y = y + 1\n end\n local b = trim(sub(view, p, e - 1))\n if b == \"verbatim\" or b == \"raw\" then\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = \"___[#___+1]=[=[\"\n c[j+1] = sub(view, e + 2, x)\n c[j+2] = \"]=]\\n\"\n j=j+3\n else\n if sub(view, x, x) == \"\\n\" then\n x = x - 1\n end\n local r = rpos(view, s - 1)\n if i <= r then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, r)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = 'blocks[\"'\n c[j+1] = b\n c[j+2] = '\"]=include[=['\n c[j+3] = sub(view, e + 2, x)\n c[j+4] = \"]=]\\n\"\n j=j+5\n end\n s, i = y - 1, y\n end\n end\n end\n elseif t == \"#\" then\n local e = find(view, \"#}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n e = e + 2\n if sub(view, e, e) == \"\\n\" then\n e = e + 1\n end\n s, i = e - 1, e\n end\n end\n end\n s = find(view, \"{\", s + 1, true)\n end\n s = sub(view, i)\n if s and s ~= \"\" then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = s\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = \"return layout and include(layout,setmetatable({view=table.concat(___),blocks=blocks},{__index=context})) or table.concat(___)\"\n return concat(c)\nend\n\nfunction template.render(view, context, key, plain)\n assert(view, \"view was not provided for template.render(view, context, key, plain).\")\n return template.print(template.compile(view, key, plain)(context))\nend\n\nreturn template\n"
},
{
"path": "demo2/README.md",
"content": "#### 这一章主要介绍介绍怎么获取请求参数，并且处理之后返回数据\n\n我们知道http请求通常分为两种，分别是GET，POST，在http协议中，GET参数通常会紧跟在uri后面，而POST请求参数则包含在请求体中，nginx默认情况下是不会读取POST请求参数的，最好也不要试图使改变这种行为，因为大多数情况下，POST请求都是转到后端去处理，nginx只需要读取请求uri部分，以及请求头\n\n由于这样的设计，所以获取请求参数的方式也有两种\n\nGET \n```\nlocal args = ngx.req.get_uri_args() -- 这里是一个table，包含所有get请求参数\nlocal id = ngx.var.arg_id -- 这里获取单个请求参数，但是如果没有传递这个参数，则会报错，推荐上面那张获取方式\n```\n\nPOST\n```\nngx.req.read_body() -- 先读取请求体\nlocal args = ngx.req.get_post_args() -- 这里也是一个table，包含所有post请求参数\n```\n\n可以通过下面这个方法获取http请求方法\n```\nlocal request_method = ngx.var.request_method -- GET or POST\n```\n\n为了统一获取请求参数的方式，隐藏具体细节，提供一个更友好的api接口，我们可以简单的封装一下\n\nlua/req.lua\n```\nlocal _M = {}\n\n-- 获取http get/post 请求参数\nfunction _M.getArgs()\n local request_method = ngx.var.request_method\n local args = ngx.req.get_uri_args()\n -- 参数获取\n if \"POST\" == request_method then\n ngx.req.read_body()\n local postArgs = ngx.req.get_post_args()\n if postArgs then\n for k, v in pairs(postArgs) do\n args[k] = v\n end\n end\n end\n return args\nend\n\nreturn _M\n```\n\n这个模块就实现了参数的获取，而且支持GET，POST两种传参方式，以及参数放在uri，body的post请求，会合并两种方式提交的参数\n\n接下来我们可以写一个简单的lua，来引入这个模块，然后测试一下效果\n\nconf/nginx.conf\n```\nworker_processes 1;\n\nerror_log logs/error.log;\n\nevents {\n worker_connections 1024;\n}\n\nhttp {\n lua_package_path /Users/Lin/opensource/openresty-web-dev/demo2/lua/?.lua; # 这里一定要指定package_path，否则会找不到引入的模块，然后会500\n server {\n listen 80;\n server_name localhost;\n lua_code_cache off;\n location ~ /lua/(.+) {\n \tdefault_type text/html;\t\n\t\t content_by_lua_file lua/$1.lua;\n\t\t}\n }\n}\n```\n\nlua/hello.lua\n```\nlocal req = require \"req\"\n\nlocal args = req.getArgs()\n\nlocal name = args['name']\n\nif name == nil or name == \"\" then\n\tname = \"guest\"\nend\n\nngx.say(\"
Error: \" .. method .. \"() method not found in \" .. moduleName .. \" lua module !
\")\n end\n ngx.exit(404)\nend\n\n-- 执行模块方法，报错则显示错误信息，所见即所得，可以追踪lua报错行数\nret, err = pcall(req_method)\n\nif ret == false then\n if is_debug then\n ngx.status = 404\n ngx.say(\"
Error: \" .. err .. \"
\")\n else\n ngx.exit(500)\n end\nend\n\n\n"
},
{
"path": "demo9/lualib/lite/req.lua",
"content": "local _M = {}\n\n-- 获取http get/post 请求参数\nfunction _M.getArgs()\n local request_method = ngx.var.request_method\n local args = ngx.req.get_uri_args()\n -- 参数获取\n if \"POST\" == request_method then\n ngx.req.read_body()\n local postArgs = ngx.req.get_post_args()\n if postArgs then\n for k, v in pairs(postArgs) do\n args[k] = v\n end\n end\n end\n return args\nend\n\nreturn _M"
},
{
"path": "demo9/lualib/resty/template.lua",
"content": "local setmetatable = setmetatable\nlocal loadstring = loadstring\nlocal loadchunk\nlocal tostring = tostring\nlocal setfenv = setfenv\nlocal require = require\nlocal capture\nlocal concat = table.concat\nlocal assert = assert\nlocal prefix\nlocal write = io.write\nlocal pcall = pcall\nlocal phase\nlocal open = io.open\nlocal load = load\nlocal type = type\nlocal dump = string.dump\nlocal find = string.find\nlocal gsub = string.gsub\nlocal byte = string.byte\nlocal null\nlocal sub = string.sub\nlocal ngx = ngx\nlocal jit = jit\nlocal var\n\nlocal _VERSION = _VERSION\nlocal _ENV = _ENV\nlocal _G = _G\n\nlocal HTML_ENTITIES = {\n [\"&\"] = \"&\",\n [\"<\"] = \"<\",\n [\">\"] = \">\",\n ['\"'] = \""\",\n [\"'\"] = \"'\",\n [\"/\"] = \"/\"\n}\n\nlocal CODE_ENTITIES = {\n [\"{\"] = \"{\",\n [\"}\"] = \"}\",\n [\"&\"] = \"&\",\n [\"<\"] = \"<\",\n [\">\"] = \">\",\n ['\"'] = \""\",\n [\"'\"] = \"'\",\n [\"/\"] = \"/\"\n}\n\nlocal VAR_PHASES\n\nlocal ok, newtab = pcall(require, \"table.new\")\nif not ok then newtab = function() return {} end end\n\nlocal caching = true\nlocal template = newtab(0, 12)\n\ntemplate._VERSION = \"1.9\"\ntemplate.cache = {}\n\nlocal function enabled(val)\n if val == nil then return true end\n return val == true or (val == \"1\" or val == \"true\" or val == \"on\")\nend\n\nlocal function trim(s)\n return gsub(gsub(s, \"^%s+\", \"\"), \"%s+$\", \"\")\nend\n\nlocal function rpos(view, s)\n while s > 0 do\n local c = sub(view, s, s)\n if c == \" \" or c == \"\\t\" or c == \"\\0\" or c == \"\\x0B\" then\n s = s - 1\n else\n break\n end\n end\n return s\nend\n\nlocal function escaped(view, s)\n if s > 1 and sub(view, s - 1, s - 1) == \"\\\\\" then\n if s > 2 and sub(view, s - 2, s - 2) == \"\\\\\" then\n return false, 1\n else\n return true, 1\n end\n end\n return false, 0\nend\n\nlocal function readfile(path)\n local file = open(path, \"rb\")\n if not file then return nil end\n local content = file:read \"*a\"\n file:close()\n return content\nend\n\nlocal function loadlua(path)\n return readfile(path) or path\nend\n\nlocal function loadngx(path)\n local vars = VAR_PHASES[phase()]\n local file, location = path, vars and var.template_location\n if sub(file, 1) == \"/\" then file = sub(file, 2) end\n if location and location ~= \"\" then\n if sub(location, -1) == \"/\" then location = sub(location, 1, -2) end\n local res = capture(concat{ location, '/', file})\n if res.status == 200 then return res.body end\n end\n local root = vars and (var.template_root or var.document_root) or prefix\n if sub(root, -1) == \"/\" then root = sub(root, 1, -2) end\n return readfile(concat{ root, \"/\", file }) or path\nend\n\ndo\n if ngx then\n VAR_PHASES = {\n set = true,\n rewrite = true,\n access = true,\n content = true,\n header_filter = true,\n body_filter = true,\n log = true\n }\n template.print = ngx.print or write\n template.load = loadngx\n prefix, var, capture, null, phase = ngx.config.prefix(), ngx.var, ngx.location.capture, ngx.null, ngx.get_phase\n if VAR_PHASES[phase()] then\n caching = enabled(var.template_cache)\n end\n else\n template.print = write\n template.load = loadlua\n end\n if _VERSION == \"Lua 5.1\" then\n local context = { __index = function(t, k)\n return t.context[k] or t.template[k] or _G[k]\n end }\n if jit then\n loadchunk = function(view)\n return assert(load(view, nil, nil, setmetatable({ template = template }, context)))\n end\n else\n loadchunk = function(view)\n local func = assert(loadstring(view))\n setfenv(func, setmetatable({ template = template }, context))\n return func\n end\n end\n else\n local context = { __index = function(t, k)\n return t.context[k] or t.template[k] or _ENV[k]\n end }\n loadchunk = function(view)\n return assert(load(view, nil, nil, setmetatable({ template = template }, context)))\n end\n end\nend\n\nfunction template.caching(enable)\n if enable ~= nil then caching = enable == true end\n return caching\nend\n\nfunction template.output(s)\n if s == nil or s == null then return \"\" end\n if type(s) == \"function\" then return template.output(s()) end\n return tostring(s)\nend\n\nfunction template.escape(s, c)\n if type(s) == \"string\" then\n if c then return gsub(s, \"[}{\\\">/<'&]\", CODE_ENTITIES) end\n return gsub(s, \"[\\\">/<'&]\", HTML_ENTITIES)\n end\n return template.output(s)\nend\n\nfunction template.new(view, layout)\n assert(view, \"view was not provided for template.new(view, layout).\")\n local render, compile = template.render, template.compile\n if layout then\n if type(layout) == \"table\" then\n return setmetatable({ render = function(self, context)\n local context = context or self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n layout.blocks = context.blocks or {}\n layout.view = context.view or \"\"\n return layout:render()\n end }, { __tostring = function(self)\n local context = self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n layout.blocks = context.blocks or {}\n layout.view = context.view\n return tostring(layout)\n end })\n else\n return setmetatable({ render = function(self, context)\n local context = context or self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n return render(layout, context)\n end }, { __tostring = function(self)\n local context = self\n context.blocks = context.blocks or {}\n context.view = compile(view)(context)\n return compile(layout)(context)\n end })\n end\n end\n return setmetatable({ render = function(self, context)\n return render(view, context or self)\n end }, { __tostring = function(self)\n return compile(view)(self)\n end })\nend\n\nfunction template.precompile(view, path, strip)\n local chunk = dump(template.compile(view), strip ~= false)\n if path then\n local file = open(path, \"wb\")\n file:write(chunk)\n file:close()\n end\n return chunk\nend\n\nfunction template.compile(view, key, plain)\n assert(view, \"view was not provided for template.compile(view, key, plain).\")\n if key == \"no-cache\" then\n return loadchunk(template.parse(view, plain)), false\n end\n key = key or view\n local cache = template.cache\n if cache[key] then return cache[key], true end\n local func = loadchunk(template.parse(view, plain))\n if caching then cache[key] = func end\n return func, false\nend\n\nfunction template.parse(view, plain)\n assert(view, \"view was not provided for template.parse(view, plain).\")\n if not plain then\n view = template.load(view)\n if byte(sub(view, 1, 1)) == 27 then return view end\n end\n local j = 2\n local c = {[[\ncontext=... or {}\nlocal function include(v, c) return template.compile(v)(c or context) end\nlocal ___,blocks,layout={},blocks or {}\n]] }\n local i, s = 1, find(view, \"{\", 1, true)\n while s do\n local t, p = sub(view, s + 1, s + 1), s + 2\n if t == \"{\" then\n local e = find(view, \"}}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n c[j] = \"___[#___+1]=template.escape(\"\n c[j+1] = trim(sub(view, p, e - 1))\n c[j+2] = \")\\n\"\n j=j+3\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"*\" then\n local e = find(view, \"*}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n c[j] = \"___[#___+1]=template.output(\"\n c[j+1] = trim(sub(view, p, e - 1))\n c[j+2] = \")\\n\"\n j=j+3\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"%\" then\n local e = find(view, \"%}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if z then\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n i = s\n else\n local n = e + 2\n if sub(view, n, n) == \"\\n\" then\n n = n + 1\n end\n local r = rpos(view, s - 1)\n if i <= r then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, r)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = trim(sub(view, p, e - 1))\n c[j+1] = \"\\n\"\n j=j+2\n s, i = n - 1, n\n end\n end\n elseif t == \"(\" then\n local e = find(view, \")}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n local f = sub(view, p, e - 1)\n local x = find(f, \",\", 2, true)\n if x then\n c[j] = \"___[#___+1]=include([=[\"\n c[j+1] = trim(sub(f, 1, x - 1))\n c[j+2] = \"]=],\"\n c[j+3] = trim(sub(f, x + 1))\n c[j+4] = \")\\n\"\n j=j+5\n else\n c[j] = \"___[#___+1]=include([=[\"\n c[j+1] = trim(f)\n c[j+2] = \"]=])\\n\"\n j=j+3\n end\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"[\" then\n local e = find(view, \"]}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n c[j] = \"___[#___+1]=include(\"\n c[j+1] = trim(sub(view, p, e - 1))\n c[j+2] = \")\\n\"\n j=j+3\n s, i = e + 1, e + 2\n end\n end\n elseif t == \"-\" then\n local e = find(view, \"-}\", p, true)\n if e then\n local x, y = find(view, sub(view, s, e + 1), e + 2, true)\n if x then\n local z, w = escaped(view, s)\n if z then\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n i = s\n else\n y = y + 1\n x = x - 1\n if sub(view, y, y) == \"\\n\" then\n y = y + 1\n end\n local b = trim(sub(view, p, e - 1))\n if b == \"verbatim\" or b == \"raw\" then\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = \"___[#___+1]=[=[\"\n c[j+1] = sub(view, e + 2, x)\n c[j+2] = \"]=]\\n\"\n j=j+3\n else\n if sub(view, x, x) == \"\\n\" then\n x = x - 1\n end\n local r = rpos(view, s - 1)\n if i <= r then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, r)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = 'blocks[\"'\n c[j+1] = b\n c[j+2] = '\"]=include[=['\n c[j+3] = sub(view, e + 2, x)\n c[j+4] = \"]=]\\n\"\n j=j+5\n end\n s, i = y - 1, y\n end\n end\n end\n elseif t == \"#\" then\n local e = find(view, \"#}\", p, true)\n if e then\n local z, w = escaped(view, s)\n if i < s - w then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = sub(view, i, s - 1 - w)\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n if z then\n i = s\n else\n e = e + 2\n if sub(view, e, e) == \"\\n\" then\n e = e + 1\n end\n s, i = e - 1, e\n end\n end\n end\n s = find(view, \"{\", s + 1, true)\n end\n s = sub(view, i)\n if s and s ~= \"\" then\n c[j] = \"___[#___+1]=[=[\\n\"\n c[j+1] = s\n c[j+2] = \"]=]\\n\"\n j=j+3\n end\n c[j] = \"return layout and include(layout,setmetatable({view=table.concat(___),blocks=blocks},{__index=context})) or table.concat(___)\"\n return concat(c)\nend\n\nfunction template.render(view, context, key, plain)\n assert(view, \"view was not provided for template.render(view, context, key, plain).\")\n return template.print(template.compile(view, key, plain)(context))\nend\n\nreturn template\n"
},
{
"path": "install/install-openresty.sh",
"content": "#!/bin/bash\nsudo apt-get update\nsudo apt-get install -y libpcre3 libpcre3-dev\nsudo apt-get install -y openssl libssl-dev\nsudo apt-get install -y openssl zlib1g-dev\ncd /tmp\nversion=\"1.21.4.1\"\nname=openresty-$version\nfile=$name.tar.gz\nprefix=/usr/local/openresty\n#echo $file\nwget https://openresty.org/download/$file\ntar zxvf $file\ncd $name\n./configure --with-http_stub_status_module --with-http_realip_module\nmake -j2\nsudo make install\nsudo ln -s $prefix/nginx/sbin/nginx /usr/local/sbin/openresty\n"
}
]