One Level Up Top Level

a.lua - lemplate

Functions defined

Source code

  1. --[[
  2.    This Lua code was generated by Lemplate, the Lua
  3.    Template Toolkit. Any changes made to this file will be lost the next
  4.    time the templates are compiled.

  6.    Copyright 2016 - Yichun Zhang (agentzh) - All rights reserved.

  8.    Copyright 2006-2014 - Ingy döt Net - All rights reserved.
  9. ]]

  11. local gsub = ngx.re.gsub
  12. local concat = table.concat
  13. local type = type
  14. local math_floor = math.floor
  15. local table_maxn = table.maxn

  17. local _M = {
  18.     version = '0.01'
  19. }

  21. local template_map = {}

  23. ‌local function tt2_true(v)
  24.     return v and v ~= 0 and v ~= "" and v ~= '0'
  25. end

  27. ‌local function tt2_not(v)
  28.     return not v or v == 0 or v == "" or v == '0'
  29. end

  31. local context_meta = {}

  33. ‌function context_meta.plugin(context, name, args)
  34.     if name == "iterator" then
  35.         local list = args[1]
  36.         local count = table_maxn(list)
  37.         return { list = list, count = 1, max = count - 1, index = 0, size = count, first = true, last = false, prev = "" }
  38.     else
  39.         return error("unknown iterator: " .. name)
  40.     end
  41. end

  43. ‌function context_meta.process(context, file)
  44.     local f = template_map[file]
  45.     if not f then
  46.         return error("file error - " .. file .. ": not found")
  47.     end
  48.     return f(context)
  49. end

  51. ‌function context_meta.include(context, file)
  52.     local f = template_map[file]
  53.     if not f then
  54.         return error("file error - " .. file .. ": not found")
  55.     end
  56.     return f(context)
  57. end

  59. context_meta = { __index = context_meta }

  61. ‌local function stash_get(stash, k)
  62.     local v
  63.     if type(k) == "table" then
  64.         v = stash
  65.         for i = 1, #k, 2 do
  66.             local key = k[i]
  67.             local typ = k[i + 1]
  68.             if type(typ) == "table" then
  69.                 local value = v[key]
  70. ‌                if type(value) == "function" then
  71.                     return value()
  72.                 end
  73.                 if value then
  74.                     return value
  75.                 end
  76.                 if key == "size" then
  77.                     if type(v) == "table" then
  78.                         return #v
  79.                     else
  80.                         return 1
  81.                     end
  82.                 else
  83.                     return error("virtual method " .. key .. " not supported")
  84.                 end
  85.             end
  86.             if type(key) == "number" and key == math_floor(key) and key >= 0 then
  87.                 key = key + 1
  88.             end
  89.             if type(v) ~= "table" then
  90.                 return nil
  91.             end
  92.             v = v[key]
  93.         end
  94.     else
  95.         v = stash[k]
  96.     end
  97. ‌    if type(v) == "function" then
  98.         return v()
  99.     end
  100.     return v
  101. end

  103. ‌local function stash_set(stash, k, v, default)
  104.     if default then
  105.         local old = stash[k]
  106.         if old == nil then
  107.             stash[k] = v
  108.         end
  109.     else
  110.         stash[k] = v
  111.     end
  112. end

  114. ‌function _M.process(file, params)
  115.     local stash = params
  116.     local context = {
  117.         stash = stash,
  118. ‌        filter = function (bits, name, params)
  119.             local s = concat(bits)
  120.             if name == "html" then
  121.                 s = gsub(s, "&", '&', "jo")
  122.                 s = gsub(s, "<", '&lt;', "jo");
  123.                 s = gsub(s, ">", '&gt;', "jo");
  124.                 s = gsub(s, '"', '&quot;', "jo"); -- " end quote for emacs
  125.                 return s
  126.             end
  127.         end
  128.     }
  129.     context = setmetatable(context, context_meta)
  130.     local f = template_map[file]
  131.     if not f then
  132.         return error("file error - " .. file .. ": not found")
  133.     end
  134.     return f(context)
  135. end
  136. -- tmpQQS_k.tt2
  137. ‌template_map['tmpQQS_k.tt2'] = function (context)
  138.     if not context then
  139.         return error("Lemplate function called without context\n")
  140.     end
  141.     local stash = context.stash
  142.     local output = {}
  143.     local i = 0

  145. i = i + 1 output[i] = 'Hello, '
  146. -- line 1 "tmpQQS_k.tt2"
  147. i = i + 1 output[i] = stash_get(stash, 'world')
  148. i = i + 1 output[i] = '!\n'

  150.     return output
  151. end

  153. return _M

One Level Up Top Level