Module:Arguments:修订间差异

修正错误
受到保护的"模块:Arguments": 高流量页面: 包含代码 (‎[edit=sysop] (无限期) ‎[move=sysop] (无限期)) [连锁]
 
(未显示同一用户的5个中间版本)
第86行: 第86行:
end
end


function p.merge(frame, obj)
  if type(obj)~="table" then return obj end
  if obj["type"]=="list" then
    local res={}
    for i, v in ipairs(obj) do
      if i~="type" then
        if v["type"]=="arg" then
          if v[2] then
            --mw.log(v[2],v[1])
            res[p.merge(frame, v[2])]=p.merge(frame, v[1])
          else
            --mw.log(v[1])
            table.insert(res, p.merge(frame, v[1]))
          end
        else
          --mw.log(v)
          table.insert(res, p.merge(frame, v))
        end
      end
    end
    return res
  elseif obj["type"]=="template" then
    --return "{{" .. p.merge(frame, obj[1]) .. "|" .. table.concat(p.merge(frame, obj[2]), "|") .. "}}"
    return frame:expandTemplate{title=p.merge(frame, obj[1]), args=p.merge(frame, obj[2])}
  elseif obj["type"]=="value" then
    local res={}
    for i, v in ipairs(obj) do
      if i~="type" then
        table.insert(res, p.merge(frame, v))
      end
    end
    return table.concat(res)
  else
    return obj
  end
end


-- 语法:
-- 语法:
第95行: 第132行:
-- name ::= value
-- name ::= value


p.parse=function(frame)
p.execute=function(frame)
   local argstr=frame.args[1]
   local argstr=frame.args[1]
   if not argstr then return end
   if not argstr then return end


   local function merge(obj)
   local r=p.merge(frame, p.parse_args(argstr, 1))
    if type(obj)~="table" then return obj end
 
    if obj["type"]=="list" then
      local res={}
      for i, v in ipairs(obj) do
        if i~="type" then
          if v["type"]=="arg" then
            if v[2] then
              --mw.log(v[2],v[1])
              res[merge(v[2])]=merge(v[1])
            else
              --mw.log(v[1])
              table.insert(res, merge(v[1]))
            end
          else
            --mw.log(v)
            table.insert(res, merge(v))
          end
        end
      end
      return res
    elseif obj["type"]=="template" then
      --return merge(obj[1]) .. "|" .. table.concat(merge(obj[2]), "|")
      return frame:expandTemplate{title=merge(obj[1]), args=merge(obj[2])}
    elseif obj["type"]=="value" then
      local res={}
      for i, v in ipairs(obj) do
        if i~="type" then
          table.insert(res, merge(v))
        end
      end
      return table.concat(res)
    else
      return obj
    end
  end
 
  --mw.log(table.concat(merge(p.parse_args(argstr, 1)), "|"))
  local r=merge(p.parse_args(argstr, 1))
   local nr={}
   local nr={}
   for i, v in pairs(r) do
   for i, v in pairs(r) do
第152行: 第150行:
   end
   end
   return frame:expandTemplate{title=r[1], args=nr}
   return frame:expandTemplate{title=r[1], args=nr}
end
p.serialize=function(frame)
  local argstr=frame.args[1]
  if not argstr then return end
  local r=p.merge(frame, p.parse_args(argstr, 1))
  local nr={}
  for i, v in ipairs(r) do
    table.insert(nr, v)
  end
  for i, v in pairs(r) do
    if type(i)~="number" then
      table.insert(nr, i .. "=" .. v)
    end
  end
  return mw.text.nowiki("{{") .. table.concat(nr, mw.text.nowiki("|")) .. mw.text.nowiki("}}")
end
p.fullserialize=function(frame)
  local argstr=frame.args[1]
  if not argstr then return end
  local fakeframe={}
  fakeframe.expandTemplate=function(self, value)
    return "{{" .. value.title .. "|" .. table.concat(value.args, "|") .. "}}"
  end
  setmetatable(fakeframe, {__index=frame})
  local r=p.merge(fakeframe, p.parse_args(argstr, 1))
  local nr={}
  for i, v in ipairs(r) do
    table.insert(nr, v)
  end
  for i, v in pairs(r) do
    if type(i)~="number" then
      table.insert(nr, i .. "=" .. v)
    end
  end
  return mw.text.nowiki("{{" .. table.concat(nr, "|") .. "}}")
end
end


return p
return p