如何实现Lua中关于捕获机制操作

移动开发 iOS
捕获值的第三个应用是用在函数gsub中。与其他模式一样,gsub的替换串可以包含 '%d',当替换发生时他被转换为对应的捕获值。

如何实现Lua中关于捕获机制操作是本文要介绍的内容,捕获是这样一种机制:可以使用模式串的一部分匹配目标串的一部分。将你想捕获的模式用圆括号括起来,就指定了一个捕获

在string.find使用捕获的时候,函数会返回捕获的值作为额外的结果。这常被用来将一个目标串拆分成多个:

  1. pair = "name = Anna" 
  2. _, _, key, value = string.find(pair, "(%a+)%s*=%s*(%a+)")  
  3. print(key, value)    --> name  Anna 

'%a+' 表示菲空的字母序列;'%s*' 表示0个或多个空白。在上面的例子中,整个模式代表:一个字母序列,后面是任意多个空白,然后是 '=' 再后面是任意多个空白,然后是一个字母序列。两个字母序列都是使用圆括号括起来的子模式,当他们被匹配的时候,他们就会被捕获。当匹配发生的时候,find函数总是先返回匹配串的索引下标(上面例子中我们存储哑元变量 _ 中),然后返回子模式匹配的捕获部分。下面的例子情况类似:

  1. date = "17/7/1990" 
  2. _, _, d, m, y = string.find(date, "(%d+)/(%d+)/(%d+)")  
  3. print(d, m, y)      --> 17 7 1990    

 我们可以在模式中使用向前引用,'%d'(d代表1-9的数字)表示第d个捕获的拷贝。

看个例子,假定你想查找一个字符串中单引号或者双引号引起来的子串,你可能使用模式 '["'].-["']',但是这个模式对处理类似字符串 "it's all right" 会出问题。为了解决这个问题,可以使用向前引用,使用捕获的第一个引号来表示第二个引号:

  1. s = [[then he said: "it's all right"!]]  
  2. a, b, c, quotedPart = string.find(s, "(["'])(.-)%1")  
  3. print(quotedPart)    --> it's all right  
  4. print(c)            --> "   

第一个捕获是引号字符本身,第二个捕获是引号中间的内容('.-' 匹配引号中间的子串)。

捕获值的第三个应用是用在函数gsub中。与其他模式一样,gsub的替换串可以包含 '%d',当替换发生时他被转换为对应的捕获值。(顺便说一下,由于存在这些情况,替换串中的字符 '%' 必须用 "%%" 表示)。下面例子中,对一个字符串中的每一个字母进行复制,并用连字符将复制的字母和原字母连接起来:

  1. print(string.gsub("hello Lua!", "(%a)", "%1-%1"))  
  2.     --> h-he-el-ll-lo-o L-Lu-ua-a!   

下面代码互换相邻的字符:

  1. print(string.gsub("hello Lua", "(.)(.)", "%2%1"))  
  2.     --> ehll ouLa   

让我们看一个更有用的例子,写一个格式转换器:从命令行获取LaTeX风格的字符串,形如:

  1. \command{some text} 

将它们转换为XML风格的字符串:

  1. <command>some text</command> 

对于这种情况,下面的代码可以实现这个功能:

  1. s = string.gsub(s, "\\(%a+){(.-)}", "<%1>%2</%1>")   

比如,如果字符串s为:

  1. the \quote{task} is to \em{change} that. 

调用gsub之后,转换为:

  1. the <quote>task</quote> is to change that. 

另一个有用的例子是去除字符串首尾的空格: 

  1. function trim (s)  
  2.     return (string.gsub(s, "^%s*(.-)%s*$", "%1"))  
  3. end   

注意模式串的用法,两个定位符('^' 和 '$')保证我们获取的是整个字符串。因为,两个 '%s*' 匹配首尾的所有空格,'.-' 匹配剩余部分。还有一点需要注意的是gsub返回两个值,我们使用额外的圆括号丢弃多余的结果(替换发生的次数)。

最后一个捕获值应用之处可能是功能最强大的。我们可以使用一个函数作为string.gsub的第三个参数调用gsub。在这种情况下,string.gsub每次发现一个匹配的时候就会调用给定的作为参数的函数,捕获值可以作为被调用的这个函数的参数,而这个函数的返回值作为gsub的替换串。先看一个简单的例子,下面的代码将一个字符串中全局变量$varname出现的地方替换为变量varname的值:

  1. function expand (s)  
  2.     s = string.gsub(s, "$(%w+)", function (n)  
  3.       return _G[n]  
  4.     end)  
  5.     return s  
  6. end  
  7.  
  8. name = "Lua"status = "great" 
  9. print(expand("$name is $status, isn't it?"))  
  10. --> Lua is great, isn't it? 

如果你不能确定给定的变量是否为string类型,可以使用tostring进行转换:

  1. function expand (s)  
  2.     return (string.gsub(s, "$(%w+)", function (n)  
  3.       return tostring(_G[n])  
  4.     end))  
  5. end  
  6. print(expand("print = $print; a = $a"))  
  7. --> print = function: 0x8050ce0; a = nil 

下面是一个稍微复杂点的例子,使用loadstring来计算一段文本内$后面跟着一对方括号内表达式的值:

  1. s = "sin(3) = $[math.sin(3)]; 2^5 = $[2^5]" 
  2. print((string.gsub(s, "$(%b[])", function (x)  
  3.     x = "return " .. string.sub(x, 2, -2)  
  4.     local f = loadstring(x)  
  5.     return f()  
  6. end)))  
  7.  
  8. --> sin(3) = 0.1411200080598672; 2^5 = 32 

第一次匹配是 "$[math.sin(3)]",对应的捕获为 "[math.sin(3)]",调用string.sub去掉首尾的方括号,所以被加载执行的字符串是 "return math.sin(3)","$[2^5]" 的匹配情况类似。

我们常常需要使用string.gsub遍历字符串,而对返回结果不感兴趣。比如,我们收集一个字符串中所有的单词,然后插入到一个表中:

  1. words = {}  
  2. string.gsub(s, "(%a+)", function (w)  
  3.     table.insert(words, w)  
  4. end) 

如果字符串s为 "hello hi, again!",上面代码的结果将是:

  1. {"hello", "hi", "again"} 

使用string.gfind函数可以简化上面的代码:

  1. words = {}  
  2. for w in string.gfind(s, "(%a)") do  
  3.     table.insert(words, w)  
  4. end 

gfind函数比较适合用于范性for循环。他可以遍历一个字符串内所有匹配模式的子串。我们可以进一步的简化上面的代码,调用gfind函数的时候,如果不显示的指定捕获,函数将捕获整个匹配模式。所以,上面代码可以简化为:

  1. words = {}  
  2. for w in string.gfind(s, "%a") do  
  3.     table.insert(words, w)  
  4. end 

下面的例子我们使用URL编码,URL编码是HTTP协议来用发送URL中的参数进行的编码。这种编码将一些特殊字符(比如 '='、'&'、'+')转换为 "%XX" 形式的编码,其中XX是字符的16进制表示,然后将空白转换成 '+'。比如,将字符串 "a+b = c" 编码为 "a%2Bb+%3D+c"。最后,将参数名和参数值之间加一个 '=';在name=value对之间加一个 "&"。比如字符串:

  1. name = "al"query = "a+b = c";  q="yes or no" 

被编码为:

  1. name=al&query=a%2Bb+%3D+c&q=yes+or+no 

现在,假如我们想将这URL解码并把每个值存储到表中,下标为对应的名字。下面的函数实现了解码功能:

  1. function unescape (s)  
  2.     s = string.gsub(s, "+", " ")  
  3.     s = string.gsub(s, "%%(%x%x)", function (h)  
  4.       return string.char(tonumber(h, 16))  
  5.     end)  
  6.     return s  
  7. end 

第一个语句将 '+' 转换成空白,第二个gsub匹配所有的 '%' 后跟两个数字的16进制数,然后调用一个匿名函数,匿名函数将16进制数转换成一个数字(tonumber在16进制情况下使用的)然后再转化为对应的字符。比如:

  1. print(unescape("a%2Bb+%3D+c"))    --> a+b = c 

对于name=value对,我们使用gfind解码,因为names和values都不能包含 '&' 和 '='我们可以用模式 '[^&=]+' 匹配他们:

  1. cgi = {}  
  2. function decode (s)  
  3.     for name, value in string.gfind(s, "([^&=]+)=([^&=]+)") do  
  4.       name = unescape(name)  
  5.       value = unescape(value)  
  6.       cgi[name] = value  
  7.     end  
  8. end 

调用gfind函数匹配所有的name=value对,对于每一个name=value对,迭代子将其相对应的捕获的值返回给变量name和value。循环体内调用unescape函数解码name和value部分,并将其存储到cgi表中。

与解码对应的编码也很容易实现。首先,我们写一个escape函数,这个函数将所有的特殊字符转换成 '%' 后跟字符对应的ASCII码转换成两位的16进制数字(不足两位,前面补0),然后将空白转换为 '+':

  1. function escape (s)  
  2.     s = string.gsub(s, "([&=+%c])", function (c)  
  3.       return string.format("%%%02X", string.byte(c))  
  4.     end)  
  5.     s = string.gsub(s, " ", "+")  
  6.     return s  
  7. end 

编码函数遍历要被编码的表,构造最终的结果串:

  1. function encode (t)  
  2.     local s = "" 
  3.     for k,v in pairs(t) do  
  4.       ss = s .. "&" .. escape(k) .. "=" .. escape(v)  
  5.     end  
  6.     return string.sub(s, 2)    -- remove first `&'  
  7. end  
  8. t = {name = "al"query = "a+b = c"q="yes or no"}  
  9. print(encode(t)) --> q=yes+or+no&query=a%2Bb+%3D+c&name=al 

转换的技巧(Tricks of the Trade)

模式匹配对于字符串操纵来说是强大的工具,你可能只需要简单的调用string.gsub和find就可以完成复杂的操作,然而,因为它功能强大你必须谨慎的使用它,否则会带来意想不到的结果。

对正常的解析器而言,模式匹配不是一个替代品。对于一个quick-and-dirty程序,你可以在源代码上进行一些有用的操作,但很难完成一个高质量的产品。前面提到的匹配C程序中注释的模式是个很好的例子:'/%*.-%*/'。如果你的程序有一个字符串包含了"/*",最终你将得到错误的结果:

  1. test = [[char s[] = "a /* here"; /* a tricky string */]]  
  2. print(string.gsub(test, "/%*.-%*/", "<COMMENT>"))  
  3.     --> char s[] = "a <COMMENT> 

虽然这样内容的字符串很罕见,如果是你自己使用的话上面的模式可能还凑活。但你不能将一个带有这种毛病的程序作为产品出售。

一般情况下,Lua中的模式匹配效率是不错的:一个奔腾333MHz机器在一个有200K字符的文本内匹配所有的单词(30K的单词)只需要1/10秒。但是你不能掉以轻心,应该一直对不同的情况特殊对待,尽可能的更明确的模式描述。一个限制宽松的模式比限制严格的模式可能慢很多。

一个极端的例子是模式 '(.-)%$' 用来获取一个字符串内$符号以前所有的字符,如果目标串中存在$符号,没有什么问题;但是如果目标串中不存在$符号。上面的算法会首先从目标串的第一个字符开始进行匹配,遍历整个字符串之后没有找到$符号,然后从目标串的第二个字符开始进行匹配,……这将花费原来平方次幂的时间,导致在一个奔腾333MHz的机器中需要3个多小时来处理一个200K的文本串。可以使用下面这个模式避免上面的问题 '^(.-)%$'。定位符^告诉算法如果在第一个位置没有没找到匹配的子串就停止查找。使用这个定位符之后,同样的环境也只需要不到1/10秒的时间。

也需要小心空模式:匹配空串的模式。比如,如果你打算用模式 '%a*' 匹配名字,你会发现到处都是名字:

  1. i, j = string.find(";$% **#$hello13", "%a*")  
  2. print(i,j)    --> 1 0 

这个例子中调用string.find正确的在目标串的开始处匹配了空字符。永远不要写一个以 '-' 开头或者结尾的模式,因为它将匹配空串。这个修饰符得周围总是需要一些东西来定位他的扩展。相似的,一个包含 '.*' 的模式是一个需要注意的,因为这个结构可能会比你预算的扩展的要多。

有时候,使用Lua本身构造模式是很有用的。看一个例子,我们查找一个文本中行字符大于70个的行,也就是匹配一个非换行符之前有70个字符的行。我们使用字符类'[^\n]'表示非换行符的字符。所以,我们可以使用这样一个模式来满足我们的需要:重复匹配单个字符的模式70次,后面跟着一个匹配一个字符0次或多次的模式。我们不手工来写这个最终的模式,而使用函数string.rep:

  1. pattern = string.rep("[^\n]", 70) .. "[^\n]*" 

另一个例子,假如你想进行一个大小写无关的查找。方法之一是将任何一个字符x变为字符类 '[xX]'。我们也可以使用一个函数进行自动转换:

  1. function nocase (s)  
  2.     s = string.gsub(s, "%a", function (c)  
  3.       return string.format("[%s%s]", string.lower(c),  
  4.                                           string.upper(c))  
  5.     end)  
  6.     return s  
  7. end  
  8.  
  9. print(nocase("Hi there!"))  
  10.     --> [hH][iI] [tT][hH][eE][rR][eE]! 

有时候你可能想要将字符串s1转化为s2,而不关心其中的特殊字符。如果字符串s1和s2都是字符串序列,你可以给其中的特殊字符加上转义字符来实现。但是如果这些字符串是变量呢,你可以使用gsub来完成这种转义:

  1. s1 = string.gsub(s1, "(%W)", "%%%1")  
  2. s2 = string.gsub(s2, "%%", "%%%%") 

在查找串中,我们转义了所有的非字母的字符。在替换串中,我们只转义了 '%' 。另一个对模式匹配而言有用的技术是在进行真正处理之前,对目标串先进行预处理。一个预处理的简单例子是,将一段文本内的双引号内的字符串转换为大写,但是要注意双引号之间可以包含转义的引号("""):
这是一个典型的字符串例子:

  1. "This is "great"!". 

我们处理这种情况的方法是,预处理文本把有问题的字符序列转换成其他的格式。比如,我们可以将 """ 编码为 "\1",但是如果原始的文本中包含 "\1",我们又陷入麻烦之中。一个避免这个问题的简单的方法是将所有 "\x" 类型的编码为 "\ddd",其中ddd是字符x的十进制表示:

  1. function code (s)  
  2.     return (string.gsub(s, "\\(.)", function (x)  
  3.       return string.format("\\%03d", string.byte(x))  
  4.     end))  
  5. end 

注意,原始串中的 "\ddd" 也会被编码,解码是很容易的:

  1. function decode (s)  
  2.     return (string.gsub(s, "\\(%d%d%d)", function (d)  
  3.       return "\" .. string.char(d)  
  4.     end))  
  5. end 

如果被编码的串不包含任何转义符,我们可以简单的使用 ' ".-" ' 来查找双引号字符串

  1. s = [[follows a typical string: "This is "great"!".]]  
  2. s = code(s)  
  3. s = string.gsub(s, '(".-")', string.upper)  
  4. s = decode(s)  
  5. print(s)  
  6.     --> follows a typical string: "THIS IS "GREAT"!". 

更紧缩的形式:

  1. print(decode(string.gsub(code(s), '(".-")', string.upper))) 

我们回到前面的一个例子,转换\command{string}这种格式的命令为XML风格:

  1. <command>string</command> 

但是这一次我们原始的格式中可以包含反斜杠作为转义符,这样就可以使用"\"、"\{" 和 "\}",分别表示 '\'、'{' 和 '}'。为了避免命令和转义的字符混合在一起,我们应该首先将原始串中的这些特殊序列重新编码,然而,与上面的一个例子不同的是,我们不能转义所有的 \x,因为这样会将我们的命令(\command)也转换掉。这里,我们仅当x不是字符的时候才对 \x 进行编码:

  1. function code (s)  
  2.     return (string.gsub(s, '\\(%A)', function (x)  
  3.       return string.format(" \\%03d ", string.byte(x))  
  4.     end))  
  5. end 

解码部分和上面那个例子类似,但是在最终的字符串中不包含反斜杠,所以我们可直接调用string.char:

  1. function decode (s)  
  2.     return (string.gsub(s, '\\(%d%d%d)', string.char))  
  3. end  
  4.  
  5. s = [[a \emph{command} is written as \\ command\{text\}.]]  
  6. s = code(s)  
  7. s = string.gsub(s, "\\ (%a+){(.-)}", "<%1>%2</%1>")  
  8.  
  9. print(decode(s))  
  10. --> a <emph>command</emph> is written as \command{text}. 

我们最后一个例子是处理CSV(逗号分割)的文件,很多程序都使用这种格式的文本,比如Microsoft Excel。CSV文件十多条记录的列表,每一条记录一行,一行内值与值之间逗号分割,如果一个值内也包含逗号这个值必须用双引号引起来,如果值内还包含双引号,需使用双引号转义双引号(就是两个双引号表示一个),看例子,下面的数组:

{'a b', 'a,b', 'a,"b"c', 'hello "world"!', }

可以看作为:

  1. a b,"a,b"," a,""b""c", hello "world"!, 

将一个字符串数组转换为CSV格式的文件是非常容易的。我们要做的只是使用逗号将所有的字符串连接起来:

  1. function toCSV (t)  
  2.     local s = "" 
  3.     for _,p in pairs(t) do  
  4.       ss = s .. "," .. escapeCSV(p)  
  5.     end  
  6.     return string.sub(s, 2)    -- remove first comma  
  7. end 

如果一个字符串包含逗号活着引号在里面,我们需要使用引号将这个字符串引起来,并转义原始的引号:

  1. function escapeCSV (s)  
  2.     if string.find(s, '[,"]') then  
  3.       s = '"' .. string.gsub(s, '"', '""') .. '"'  
  4.     end  
  5.     return s  
  6. end 

将CSV文件内容存放到一个数组中稍微有点难度,因为我们必须区分出位于引号中间的逗号和分割域的逗号。我们可以设法转义位于引号中间的逗号,然而并不是所有的引号都是作为引号存在,只有在逗号之后的引号才是一对引号的开始的那一个。只有不在引号中间的逗号才是真正的逗号。这里面有太多的细节需要注意,比如,两个引号可能表示单个引号,可能表示两个引号,还有可能表示空:

  1. "hello""hello", "","" 

这个例子中,第一个域是字符串 "hello"hello",第二个域是字符串 " """(也就是一个空白加两个引号),最后一个域是一个空串。

我们可以多次调用gsub来处理这些情况,但是对于这个任务使用传统的循环(在每个域上循环)来处理更有效。循环体的主要任务是查找下一个逗号;并将域的内容存放到一个表中。对于每一个域,我们循环查找封闭的引号。循环内使用模式 ' "("?) ' 来查找一个域的封闭的引号:如果一个引号后跟着一个引号,第二个引号将被捕获并赋给一个变量c,意味着这仍然不是一个封闭的引号

  1. function fromCSV (s)  
  2.     ss = s .. ','      -- ending comma  
  3.     local t = {}      -- table to collect fields  
  4.     local fieldstart = 1 
  5.     repeat  
  6.       -- next field is quoted? (start with `"'?)  
  7.       if string.find(s, '^"', fieldstart) then  
  8.       local a, c  
  9.       local i = fieldstart 
  10.       repeat  
  11.           -- find closing quote  
  12.           a, i, c = string.find(s, '"("?)', i+1)  
  13.       until c ~= '"'    -- quote not followed by quote?  
  14.       if not i then error('unmatched "') end  
  15.           local f = string.sub(s, fieldstart+1, i-1)  
  16.           table.insert(t, (string.gsub(f, '""', '"')))  
  17.           fieldstart = string.find(s, ',', i) + 1  
  18.       else              -- unquoted; find next comma  
  19.           local nexti = string.find(s, ',', fieldstart)  
  20.           table.insert(t, string.sub(s, fieldstart,  
  21.                                               nexti-1))  
  22.           fieldstart = nexti + 1  
  23.       end  
  24.     until fieldstart > string.len(s)  
  25.     return t  
  26. end  
  27.  
  28. t = fromCSV('"hello "" hello", "",""')  
  29. for i, s in ipairs(t) do print(i, s) end  
  30.     --> 1      hello " hello  
  31.     --> 2        ""  
  32.     --> 3 

小结:如何实现Lua中关于捕获机制操作的内容介绍完了,希望通过本文的学习能对你有所帮助!

责任编辑:zhaolei 来源: 博客园
相关推荐

2011-08-24 16:59:59

LuaModule

2011-08-24 17:09:35

LUA闭包函数

2011-08-23 17:06:03

2011-09-06 17:37:01

LUA应用

2011-08-23 16:14:27

Lua函数库函数

2011-08-23 17:11:13

Lua事件C#

2011-08-29 15:53:04

Lua位运算

2011-08-23 16:37:05

Lua数学库

2011-08-23 17:33:08

LuaMetatable

2011-06-13 10:21:25

QT 信号 槽机制

2011-08-31 16:47:07

Lua调试器

2011-08-30 09:59:47

Mysql ProxyLUA

2011-08-31 16:39:06

Lua调试器

2011-08-25 17:01:50

LUA网游游戏

2011-08-23 16:22:45

Lua 4.0函数

2011-08-23 15:02:59

LuaTable

2011-08-24 15:28:02

Lua编译器解释器

2011-08-25 10:07:24

Lua 5.0函数编译器

2011-08-23 13:15:37

LUAPackage

2010-09-08 16:50:11

JavaScriptDOM操作
点赞
收藏

51CTO技术栈公众号