Module:Arguments：修订间差异

←上一编辑下一编辑→

@@ 第5行： / 第5行： @@
 end
--- 语法：
+function p.parse_template(str, start)
--- S ::= args
+  local i=start
--- args ::= args,arg | arg
+  local template={}
--- arg ::= name:value | value
+  template["type"]="template"
--- value ::= value char | value template | char | template
+  local len=mw.ustring.len(str)
--- template ::= (name,args)
+  local ch=mw.ustring.sub(str, i, i)
--- name ::= value
+  local a
+  a, i=p.parse_value(str, i+1)
+  table.insert(template, a)
+  a, i=p.parse_args(str, i+1)
+  table.insert(template, a)
+  return template, i+1
+end
-p.parse=function(frame)
+function p.parse_value(str, start)
-   local argstr=frame.args[1]
+   local i=start
-   if not argstr then return end
+  local escape=false
+  local val={}
+  val["type"]="value"
+   local len=mw.ustring.len(str)
-   local function parse_template(str, start)
+   while i and i<=len do
-    local i=start
-    local template={}
-    template["type"]="template"
-    local len=mw.ustring.len(str)
      local ch=mw.ustring.sub(str, i, i)
-     local a
+     if escape then
-    a, i=parse_value(str, i+1)
+      table.insert(val, ch)
-    table.insert(template, a)
+      i=i+1
-    a, i=parse_args(str, i+1)
+      escape=false
-    table.insert(template, a)
+     else
-     return template, i+1
+      if ch=="\\" then
-  end
+        i=i+1
+        escape=true
-  local function parse_value(str, start)
+      elseif ch==")" or ch=="," or ch==":" then
-    local i=start
+        return val, i
-    local escape=false
+      elseif ch=="(" then
-    local val={}
+        local t
-    val["type"]="value"
+        t, i=p.parse_template(str, i)
-    local len=mw.ustring.len(str)
+        table.insert(val, t)
+       else
-    while i and i<=len do
-      local ch=mw.ustring.sub(str, i, i)
-       if escape then
          table.insert(val, ch)
          i=i+1
-        escape=false
-      else
-        if ch=="\\" then
-          i=i+1
-          escape=true
-        elseif ch==")" or ch=="," or ch==":" then
-          return val, i
-        elseif ch=="(" then
-          local t
-          t, i=parse_template(str, i)
-          table.insert(val, t)
-        else
-          table.insert(val, ch)
-          i=i+1
-        end
        end
      end
-    return val
    end
+  return val
+end
-  local function parse_arg(str, start)
+function p.parse_arg(str, start)
-    local i=start
+  local i=start
-    local arg={}
+  local arg={}
-    arg["type"]="arg"
+  arg["type"]="arg"
-    local len=mw.ustring.len(str)
+  local len=mw.ustring.len(str)
-    local v
+  local v
-    v, i=parse_value(str, i)
+  v, i=p.parse_value(str, i)
-    if mw.ustring.sub(str, i, i)==":" then
+  if mw.ustring.sub(str, i, i)==":" then
-      arg[2]=v
+    arg[2]=v
-      v, i=parse_value(str, i+1)
+    v, i=p.parse_value(str, i+1)
-    end
-    arg[1]=v
-    return arg, i
    end
+  arg[1]=v
+  return arg, i
+end
-  local function parse_args(str, start)
+function p.parse_args(str, start)
-    local i=start
+  local i=start
-    local args={}
+  local args={}
-    args["type"]="list"
+  args["type"]="list"
-    local len=mw.ustring.len(str)
+  local len=mw.ustring.len(str)
-    while i and i<=len do
+  while i and i<=len do
-      local a
+    local a
-      a, i=parse_arg(str, i)
+    a, i=p.parse_arg(str, i)
-      table.insert(args, a)
+    table.insert(args, a)
-      --mw.log(i, mw.ustring.sub(str, i, i))
+    --mw.log(i, mw.ustring.sub(str, i, i))
-      if mw.ustring.sub(str, i, i)~="," then
+    if mw.ustring.sub(str, i, i)~="," then
-        return args, i
+      return args, i
-      end
-      i=i+1
      end
-     return args
+     i=i+1
    end
+  return args
+end
+-- 语法：
+-- S ::= args
+-- args ::= args,arg | arg
+-- arg ::= name:value | value
+-- value ::= value char | value template | char | template
+-- template ::= (name,args)
+-- name ::= value
+p.parse=function(frame)
+  local argstr=frame.args[1]
+  if not argstr then return end
    local function merge(obj)
@@ 第121行： / 第122行： @@
        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
@@ 第135行： / 第137行： @@
    end
-   --mw.log(table.concat(merge(parse_args(argstr, 1)), "|"))
+   --mw.log(table.concat(merge(p.parse_args(argstr, 1)), "|"))
-   local r=merge(parse_args(argstr, 1))
+   local r=merge(p.parse_args(argstr, 1))
    local nr={}
    for i, v in pairs(r) do
@@ 第149行： / 第151行： @@
      end
    end
-  --mw.log(r[1],r[3])
    return frame:expandTemplate{title=r[1], args=nr}
 end
 return p