--[[
解æžç®€å•çš„æ ‡ç¾ç»“构富文本转化为Luaä¸çš„表结构
作者：Luwei
规则：
* 被解æžçš„富文本显示内容ä¸èƒ½å«æœ‰""è¿™ç§æ ·å¼çš„å—符串, å•ç‹¬çš„'<', '>'是å¯ä»¥æ”¯æŒçš„，但是为了é¿å…解æžé”™è¯¯æœ€å¥½ä¸è¦ä½¿ç”¨
* æ ‡ç¾ä¸å¯ä»¥å˜åœ¨å±žæ€§ï¼Œä½†æ˜¯å±žæ€§å¿…é¡»ä»¥ç©ºæ ¼åˆ†éš”ï¼Œå¦‚ï¼šhello,world
* æ ‡ç¾ä¸çš„属性值默认å¯ä»¥æ˜¯å—符串ã€æ•°å—ã€å¸ƒå°”值(true,false)，若是å—符串å¯ä»¥åŠ å•å¼•å·ï¼Œä¹Ÿå¯ä»¥ä¸åŠ ，为了é¿å…解æžé”™è¯¯æœ€å¥½æ·»åŠ å•å¼•å·
* 属性å和属性值之间用‘=’连接，但是ä¸èƒ½å˜åœ¨ç©ºæ ¼
* æ ‡ç¾å和属性åä¸åŒºåˆ†å¤§å°å†™ï¼Œå…¨éƒ¨è½¬åŒ–为å°å†™(主è¦æ˜¯ä¸ºäº†é¿å…大å°å†™é€ æˆçš„书写错误，å‡å°å¯Œæ–‡æœ¬ä¸²çš„编写难度)
* æ ‡ç¾å±žæ€§å€¼ä¸å…许å˜åœ¨ç©ºç™½å—符，例如：
* 属性ä¿ç•™å—'content', ä¸å¯é‡å，å³ä¸å¯ä½¿ç”¨å±žæ€§åcontent，å¦åˆ™è§£æžå‡ºæ¥æ²¡æœ‰æ–‡æœ¬å†…容å˜åœ¨
* è‹¥å¼€å¤´å’Œç»“å°¾æ²¡æœ‰æ ‡ç¾çš„è¯ï¼Œå†…部会自动在最外层包上一层(å¯ä»¥ä¿®æ”¹LABEL_DIV_BEGINä»Žè€ŒåŒ…ä¸Šå…¶ä»–æ ‡ç¾)
* 支æŒè‡ªé—å’Œæ ‡ç¾
* æ ‡ç¾èŒƒå›´ä¸å¯äº¤å‰ï¼Œä½†æ˜¯å¯ä»¥åµŒå¥—包å«
* 空的éžè‡ªé—åˆæ ‡ç¾æ²¡æœ‰ä»»ä½•æ„义，ä¸ä¼šè¢«è§£æžï¼Œç›´æŽ¥å¿½ç•¥
* 自é—åˆæ ‡ç¾çš„'/>'与属性值之间最好å˜åœ¨ç©ºæ ¼,å¦åˆ™è¿™ç§æƒ…况出错
示例：
local labelparser = require("labelparser")
local text1 = "hello worldd hello world
ä½ å¥½ hello,world
"
local parsedtable = labelparser.parse(text1)
-- output:
= {
{
content = "hello worldd ",
labelname = "div",
},
{
content = "hello world",
labelname = "div",
},
{
content = " ä½ å¥½ ",
labelname = "div",
},
{
content = "hello,world",
fontname = "nihao",
fontsize = "#123456",
labelname = "div",
},
}
当å‰ç‰ˆæœ¬ï¼šv1.01
v1.0 - 支æŒæœ€åŸºæœ¬åŠŸèƒ½
v1.01 - æ·»åŠ è‡ªé—åˆæ ‡ç¾æ”¯æŒï¼Œä¿®å¤è‹¥å¹²BUG
]]--
local print = print
local table = table
local string = string
local _M = {}
local LABEL_DIV_BEGIN = ""
local LABEL_DIV_END = "
"
local BOOLEAN_TRUE = "true"
local BOOLEAN_FALSE = "false"
function _M.parse(text)
-- 用于å˜å‚¨è§£æžç»“æžœ
local parsedtable = {}
-- 检测开头和结尾是å¦ä¸ºæ ‡ç¾ å³ä¸ºæ ‡ç¾
if not string.find(text, "^%b<>.+%b<>$") then
-- åœ¨æœ€å¤–å±‚åŒ…è£…ä¸€ä¸ªæ ‡ç¾ï¼Œä¾¿äºŽè§£æžæ—¶çš„统一处ç†ï¼Œä¸ç”¨å¤„ç†æ²¡æœ‰åŒ…è£…æ ‡ç¾çš„情况
text = table.concat({LABEL_DIV_BEGIN, text, LABEL_DIV_END})
end
-- æ ‡ç¾å¤´æ ˆï¼Œç”¨äºŽå˜å‚¨æ ‡ç¾å¤´(æ˜¯æ ‡ç¾å¤´ï¼Œ
æ˜¯æ ‡ç¾å°¾)
-- æ ‡ç¾å¤´å˜å‚¨äº†æ ¼å¼ä¿¡æ¯ï¼Œç¢°åˆ°æ ‡ç¾æ—¶å¯ä»¥ç›´æŽ¥ä½¿ç”¨å½“å‰æ ˆé¡¶çš„æ ‡ç¾å¤´æ ¼å¼ä¿¡æ¯ï¼Œåº”ç”¨åˆ°æ ‡ç¾ä¹‹é—´çš„内容上
local labelheadstack = {}
-- è¿ä»£æ‰€æœ‰æ ¼å¼ä¸ºçš„æ ‡ç¾(包å«äº†æ ‡ç¾å¤´å’Œæ ‡ç¾å°¾å·´)
local index = 0
for beginindex, endindex in function() return string.find(text, "%b<>", index) end do
local label = string.sub(text, beginindex, endindex)
-- 检测å—符串是å¦ä»¥""开头
if string.find(label, "^") then
-- æ ‡ç¾å°¾
_M.disposeLabelTail(labelheadstack, parsedtable, text, label, beginindex, endindex)
elseif string.find(label, "/>$") then -- 检测以'/>'结尾
-- 自é—åˆæ ‡ç¾
_M.disposeLabelSelfClosing(labelheadstack, parsedtable, text, label, beginindex, endindex)
else-- æ£€æµ‹åˆ°æ ‡ç¾å¤´
_M.disposeLabelHead(labelheadstack, parsedtable, text, label, beginindex, endindex)
end
index = endindex + 1
end
return parsedtable
end
-- 处ç†æ ‡ç¾å¤´
function _M.disposeLabelHead(labelheadstack, parsedtable, text, labelhead, beginindex, endindex)
-- å–出当å‰æ ˆé¡¶ä½ç½®çš„æ ‡ç¾ä¿¡æ¯
local labelinfo = _M.peekstack(labelheadstack)
if labelinfo then
-- 获得当å‰æ ‡ç¾å¤´å’Œä¸Šä¸€ä¸ªæ ‡ç¾å¤´ä¹‹é—´å†…容(æ ‡ç¾åµŒå¥—é€ æˆ)
local content = string.sub(text, labelinfo.endindex+1, beginindex-1)
-- 解æžä¸¤ä¸ªæ ‡ç¾å¤´ä¹‹é—´çš„内容
local labelparams = _M.parseLabelWithContent(labelinfo.labelhead, content)
table.insert(parsedtable, labelparams)
end
-- 将当å‰æ ‡ç¾å¤´å’Œä½ç½®ä¿¡æ¯ï¼Œæ”¾å…¥æ ˆé¡¶ä½ç½®
_M.pushstack(labelheadstack, {["labelhead"]=labelhead, ["beginindex"]=beginindex, ["endindex"]=endindex})
end
-- 处ç†æ ‡ç¾å°¾
function _M.disposeLabelTail(labelheadstack, parsedtable, text, labeltail, beginindex, endindex, selfclosing)
-- æ£€æµ‹åˆ°æ ‡ç¾å°¾ï¼Œå¯ä»¥è§£æžå½“å‰æ ‡ç¾èŒƒå›´å†…çš„ä¸²ï¼Œæ ‡ç¾å¤´åœ¨æ ˆé¡¶ä½ç½®
-- å°†ä¸Žæ ‡ç¾å°¾å¯¹åº”çš„æ ‡ç¾å¤´å‡ºæ ˆ(æ ˆé¡¶)
local labelinfo = _M.popstack(labelheadstack)
-- 解æžæ ˆé¡¶æ ‡ç¾å¤´å’Œå½“å‰æ ‡ç¾å°¾ä¹‹é—´çš„内容
if labelinfo then
-- æ£€æµ‹æ ‡ç¾æ˜¯å¦åŒ¹é…
if not _M.checkLabelMatch(labelinfo.labelhead, labeltail) then
return print(string.format("labelparser # error: label can not match(%s, %s)",
labelinfo.labelhead, labeltail))
end
-- 获得当å‰æ ‡ç¾å°¾å’Œå¯¹åº”æ ‡ç¾å¤´ä¹‹é—´å†…容
local content = string.sub(text, labelinfo.endindex+1, beginindex-1)
local labelparams = _M.parseLabelWithContent(labelinfo.labelhead, content, selfclosing)
table.insert(parsedtable, labelparams)
-- å› ä¸ºæ¤å‰å†…容都解æžè¿‡äº†ï¼Œæ‰€ä»¥ä¿®æ”¹æ ˆé¡¶æ ‡ç¾å¤´ä¿¡æ¯ï¼Œè®©å…¶ä¿®é¥°èŒƒå›´æ”¹å˜ä¸ºæ£ç¡®çš„
-- 修改当å‰æ ˆé¡¶æ ‡ç¾å¤´ä½ç½®åˆ°å½“å‰æ ‡ç¾å°¾çš„范围
local labelinfo_unused = _M.peekstack(labelheadstack)
if labelinfo_unused then
labelinfo_unused.beginindex = beginindex
labelinfo_unused.endindex = endindex
end
end
end
-- 处ç†è‡ªé—åˆæ ‡ç¾
function _M.disposeLabelSelfClosing(labelheadstack, parsedtable, text, label, beginindex, endindex)
_M.disposeLabelHead(labelheadstack, parsedtable, text, label, beginindex, endindex)
_M.disposeLabelTail(labelheadstack, parsedtable, text, label, beginindex, endindex, true)
end
-- æ£€æµ‹æ ‡ç¾å¤´å’Œæ ‡ç¾å°¾æ˜¯å¦é…对，å³æ ‡ç¾å是å¦ç›¸åŒ
function _M.checkLabelMatch(labelhead, labeltail)
local labelheadname = _M.parseLabelname(labelhead)
local labeltailname = _M.parseLabelname(labeltail)
return labeltailname == labelheadname
end
-- æ•´åˆæ ‡ç¾å¤´å±žæ€§å’Œå†…容
function _M.parseLabelWithContent(labelhead, content, selfclosing)
-- ä¸æ˜¯è‡ªé—å’Œæ ‡ç¾åˆ™ï¼Œåˆ™æ£€æµ‹å†…容，内容为空则直接返回
if not selfclosing then
if content == nil or content == "" then return
end
else
-- 是自é—å’Œæ ‡ç¾
content = nil
end
-- èŽ·å¾—æ ‡ç¾å称
local labelname = _M.parseLabelname(labelhead)
-- 解æžæ ‡ç¾å±žæ€§
local labelparams = _M.parseLabelHead(labelhead)
labelparams.labelname = labelname
labelparams.content = content
return labelparams
end
-- ä»Žæ ‡ç¾å¤´æˆ–è€…æ ‡ç¾å°¾è§£æžå‡ºæ ‡ç¾å称
function _M.parseLabelname(label)
-- 解æžæ ‡ç¾å
local labelnameindex1, labelnameindex2 = string.find(label, "%w+")
if not labelnameindex1 then
return print ("labelparser # error: label name not found") and nil
end
-- èŽ·å¾—æ ‡ç¾å称
local labelname = string.sub(label, labelnameindex1, labelnameindex2)
local labelname = string.lower(labelname)
return labelname
end
-- 解æžæ ‡ç¾å¤´å±žæ€§
function _M.parseLabelHead(labelhead)
local labelparams = {}
-- 匹é…æ ¼å¼ï¼šproperty=value
-- valueè¦æ±‚éžç©ºç™½å—符并且ä¸å«æœ‰â€˜>’
for property in string.gmatch(labelhead, "[%w%_]+%=[^%s%>]+") do
local equalmarkpos = string.find(property, "=")
-- 分离属性å和属性值
local propertyname = string.sub(property, 1, equalmarkpos-1)
local propertyvalue = string.sub(property, equalmarkpos+1, string.len(property))
-- 属性å转为å°å†™
propertyname = string.lower(propertyname)
-- 属性值处ç†
local continue = false
-- 1.检测是å¦ä¸ºå—符串(å•å¼•å·æˆ–者åŒå¼•å·æ‹¬èµ·æ¥)
local beginindex, endindex = string.find(propertyvalue, "['\"].+['\"]")
if beginindex then
propertyvalue = string.sub(propertyvalue, beginindex+1, endindex-1)
continue = true
end
-- 2.检测是å¦ä¸ºå¸ƒå°”值
if not continue then
local propertyvalue_lower = string.lower(propertyvalue)
if propertyvalue_lower == BOOLEAN_TRUE then
propertyvalue = true
continue = true
elseif propertyvalue_lower == BOOLEAN_FALSE then
propertyvalue = false
continue = true
end
end
-- 3.检测是å¦ä¸ºæ•°å—
if not continue then
local propertyvalue_number = tonumber(propertyvalue)
if propertyvalue_number then
propertyvalue = propertyvalue_number
continue = true
end
end
-- 若以上都ä¸æ˜¯ï¼Œåˆ™é»˜è®¤ç›´æŽ¥ä¸ºå—符串
labelparams[propertyname] = propertyvalue
end
return labelparams
end
--
-- utils-stack
--
function _M.peekstack(stacktable)
return stacktable[#stacktable]
end
function _M.pushstack(stacktable, elem)
table.insert(stacktable, elem)
end
function _M.popstack(stacktable)
local elem = stacktable[#stacktable]
stacktable[#stacktable] = nil
return elem
end
return _M