]> git.proxmox.com Git - ceph.git/blobdiff - ceph/src/civetweb/test/page4.lua
import quincy beta 17.1.0
[ceph.git] / ceph / src / civetweb / test / page4.lua
diff --git a/ceph/src/civetweb/test/page4.lua b/ceph/src/civetweb/test/page4.lua
deleted file mode 100644 (file)
index e2b84d7..0000000
+++ /dev/null
@@ -1,180 +0,0 @@
--- This test checks the Lua functions:\r
--- get_var, get_cookie, md5, url_encode\r
-\r
-now = os.time()\r
-cookie_name = "civetweb-test-page4"\r
-\r
-if mg.request_info.http_headers.Cookie then\r
-   cookie_value = tonumber(mg.get_cookie(mg.request_info.http_headers.Cookie, cookie_name))\r
-end\r
-\r
-mg.write("HTTP/1.0 200 OK\r\n")\r
-mg.write("Connection: close\r\n")\r
-mg.write("Content-Type: text/html; charset=utf-8\r\n")\r
-mg.write("Cache-Control: max-age=0, must-revalidate\r\n")\r
-if not cookie_value then\r
-    mg.write("Set-Cookie: " .. cookie_name .. "=" .. tostring(now) .. "\r\n")\r
-end\r
-mg.write("\r\n")\r
-\r
-mg.write("<html>\r\n<head><title>Civetweb Lua script test page 4</title></head>\r\n<body>\r\n")\r
-mg.write("<p>Test of Civetweb Lua Functions:</p>\r\n");\r
-mg.write("<pre>\r\n");\r
-\r
--- get_var of query_string\r
-mg.write("get_var test (check query string):\r\n")\r
-if not mg.request_info.query_string then\r
-    mg.write("  No query string. You may try <a href='?a=a1&amp;junk&amp;b=b2&amp;cc=cNotSet&amp;d=a, b and d should be set&amp;z=z'>this example</a>.\r\n")\r
-else\r
-    for _,var in ipairs({'a','b','c','d'}) do\r
-       value = mg.get_var(mg.request_info.query_string, var);\r
-       if value then\r
-         mg.write("  Variable " .. var .. ": value " .. value .. "\r\n");\r
-       else\r
-         mg.write("  Variable " .. var .. " not set\r\n");\r
-       end\r
-    end\r
-end\r
-mg.write("\r\n")\r
-\r
--- md5\r
-mg.write("MD5 test:\r\n")\r
-test_string = "abcd\0efgh"\r
-mg.write("  String with embedded 0, length " .. string.len(test_string))\r
-test_md5 = mg.md5(test_string)\r
-mg.write(", MD5 " .. test_md5 .. "\r\n")\r
-if mg.md5("") == "d41d8cd98f00b204e9800998ecf8427e" then\r
-    mg.write("  MD5 of empty string OK\r\n")\r
-else\r
-    mg.write("  Error: MD5 of empty string NOT OK\r\n")\r
-end\r
-if mg.md5("The quick brown fox jumps over the lazy dog.") == "e4d909c290d0fb1ca068ffaddf22cbd0" then\r
-    mg.write("  MD5 of test string OK\r\n")\r
-else\r
-    mg.write("  Error: MD5 of test string NOT OK\r\n")\r
-end\r
-mg.write("\r\n")\r
-\r
--- get_cookie\r
-mg.write("Cookie test:\r\n")\r
-if not cookie_value then\r
-    mg.write("  Cookie not set yet. Please reload the page.\r\n")\r
-else\r
-    mg.write("  Cookie set to " .. cookie_value .. "\r\n")\r
-    mg.write("  You visited this page " .. os.difftime(now, cookie_value) .. " seconds before.\r\n")\r
-end\r
-mg.write("\r\n")\r
-\r
--- test 'require' of other Lua scripts\r
-mg.write("require test\r\n")\r
-script_path = mg.script_name:match("(.*)page%d*.lua")\r
-if type(script_path)=='string' then\r
-    package.path = script_path .. "?.lua;" .. package.path\r
-    mg.write("  Lua search path: " .. package.path .. "\r\n")\r
-    require "html_esc"\r
-    require "require_test"\r
-    if htmlEscape then\r
-      for i=0,15 do\r
-        mg.write("  ")\r
-        for j=0,15 do\r
-            mg.write(tostring(htmlEscape[16*i+j]))\r
-        end\r
-        mg.write("\r\n")\r
-      end\r
-    else\r
-      mg.write("  'require' test failed (htmlEscape)\r\n")\r
-    end\r
-    if HugeText then\r
-      mg.write("\r\n")\r
-      local ht = HugeText(os.date("%a %b. %d"))\r
-      for i=1,#ht do\r
-        mg.write("  " .. ht[i] .. "\r\n")\r
-      end\r
-    else\r
-      mg.write("  'require' test failed (HugeText)\r\n")\r
-    end\r
-else\r
-    mg.write("  name match failed\r\n")\r
-end\r
-mg.write("\r\n")\r
-\r
--- test get_response_code_text\r
-mg.write("HTTP helper methods test:\r\n")\r
-if (htmlEscape("<a b & c d>") == "&lt;a b &amp; c d&gt;") then\r
-    mg.write("  htmlEscape test OK\r\n")\r
-else\r
-    mg.write("  Error: htmlEscape test NOT OK\r\n")\r
-end\r
-if (mg.get_response_code_text(200) == "OK") then\r
-    mg.write("  get_response_code_text test OK\r\n")\r
-else\r
-    mg.write("  Error: get_response_code_text test NOT OK\r\n")\r
-end\r
-mg.write("\r\n")\r
-\r
--- url_encode\r
-mg.write("URL encode/decode test:\r\n")\r
-if mg.url_encode("") == "" then\r
-    mg.write("  url_encode of empty string OK\r\n")\r
-else\r
-    mg.write("  Error: url_encode of empty string NOT OK\r\n")\r
-end\r
-raw_string = [[ !"#$%&'()*+,-./0123456789:;<=>?@]]\r
-mg.write("  original string: " .. htmlEscape(raw_string) .. "\r\n")\r
-mg_string = mg.url_encode(raw_string):upper()\r
-ref_string = "%20!%22%23%24%25%26'()*%2B%2C-.%2F0123456789%3A%3B%3C%3D%3E%3F%40" -- from http://www.w3schools.com/tags/ref_urlencode.asp\r
-mg.write("  mg-url:        " .. htmlEscape(mg_string) .. "\r\n")\r
-mg.write("  reference url: " .. htmlEscape(ref_string) .. "\r\n")\r
-dec_mg_string = mg.url_decode(mg_string)\r
-dec_ref_string = mg.url_decode(ref_string)\r
-mg.write("  decoded mg-url:        " .. htmlEscape(dec_mg_string) .. "\r\n")\r
-mg.write("  decoded reference url: " .. htmlEscape(dec_ref_string) .. "\r\n")\r
-dec_mg_string = mg.url_decode(mg_string, false)\r
-dec_ref_string = mg.url_decode(ref_string, false)\r
-mg.write("  decoded mg-url:        " .. htmlEscape(dec_mg_string) .. "\r\n")\r
-mg.write("  decoded reference url: " .. htmlEscape(dec_ref_string) .. "\r\n")\r
-dec_mg_string = mg.url_decode(mg_string, true)\r
-dec_ref_string = mg.url_decode(ref_string, true)\r
-mg.write("  decoded mg-url:        " .. htmlEscape(dec_mg_string) .. "\r\n")\r
-mg.write("  decoded reference url: " .. htmlEscape(dec_ref_string) .. "\r\n")\r
-mg.write("\r\n")\r
-\r
--- base64_encode\r
-mg.write("BASE64 encode/decode test:\r\n")\r
-raw_string = [[ !"#$%&'()*+,-./0123456789:;<=>?@]]\r
-mg.write("  original string:  " .. htmlEscape(raw_string) .. "\r\n")\r
-mg_string = mg.base64_encode(raw_string)\r
-ref_string = "ICEiIyQlJicoKSorLC0uLzAxMjM0NTY3ODk6Ozw9Pj9A" -- from http://www.base64encode.org/\r
-mg.write("  mg-base64:        " .. htmlEscape(mg_string) .. "\r\n")\r
-mg.write("  reference base64: " .. htmlEscape(ref_string) .. "\r\n")\r
-dec_mg_string = mg.base64_decode(mg_string)\r
-dec_ref_string = mg.base64_decode(ref_string)\r
-mg.write("  decoded mg-base64:        " .. htmlEscape(dec_mg_string) .. "\r\n")\r
-mg.write("  decoded reference base64: " .. htmlEscape(dec_ref_string) .. "\r\n")\r
-mg.write("\r\n")\r
-raw_string = [[<?> -?-]]\r
-mg.write("  original string:  " .. htmlEscape(raw_string) .. "\r\n")\r
-mg_string = mg.base64_encode(raw_string)\r
-ref_string = "PD8+IC0/LQ==" -- from http://www.base64encode.org/\r
-mg.write("  mg-base64:        " .. htmlEscape(mg_string) .. "\r\n")\r
-mg.write("  reference base64: " .. htmlEscape(ref_string) .. "\r\n")\r
-dec_mg_string = mg.base64_decode(mg_string)\r
-dec_ref_string = mg.base64_decode(ref_string)\r
-mg.write("  decoded mg-base64:        " .. htmlEscape(dec_mg_string) .. "\r\n")\r
-mg.write("  decoded reference base64: " .. htmlEscape(dec_ref_string) .. "\r\n")\r
-mg.write("\r\n")\r
-\r
--- random\r
-mg.write("Random numbers:\r\n")\r
-for i=1,10 do mg.write(string.format("%18u\r\n", mg.random())) end\r
-mg.write("\r\n")\r
-\r
--- uuid\r
-if mg.uuid then\r
-mg.write("UUIDs:\r\n")\r
-for i=1,10 do mg.write(string.format("%40s\r\n", mg.uuid())) end\r
-mg.write("\r\n")\r
-end\r
-\r
--- end of page\r
-mg.write("</pre>\r\n</body>\r\n</html>\r\n")\r