💾 Archived View for gemini.conman.org › extensions › port70 › handlers › blog › html.peg captured on 2020-11-01 at 01:04:07.
-=-=-=-=-=-=-
#########################################################################
#
# Copyright 2020 by Sean Conner. All Rights Reserved.
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
# Comments, questions and criticisms can be sent to: sean@conman.org
#
########################################################################
BODY <- flow+ !.
flow <- block / inline
# **************************************
# INLINE tags
# **************************************
inline <- fontstyle / phrase / special / iINS / formctrl / iDEL / Cinline / PCDATA
fontstyle <- TT / I / B / BIG / SMALL / U
phrase <- EM / STRONG / DFN / CODE / SAMP / KBD / VAR / CITE / ABBR / ACRONYM
special <- A / IMG / BR / SCRIPT / BDO / Q / SUB / SUP / SPAN / OBJECT / FONT / MAP
formctrl <- INPUT / SELECT / TEXTAREA / LABEL / BUTTON
TT <- "<" _TT & ET { tagi(yy,"tt"); } attrs* S* ">" inline* "</" _TT ">" { endtag(yy); }
I <- "<" _I & ET { tagi(yy,"i"); } attrs* S* ">" inline* "</" _I ">" { endtag(yy); }
B <- "<" _B & ET { tagi(yy,"b"); } attrs* S* ">" inline* "</" _B ">" { endtag(yy); }
BIG <- "<" _BIG & ET { tagi(yy,"big"); } attrs* S* ">" inline* "</" _BIG ">" { endtag(yy); }
SMALL <- "<" _SMALL & ET { tagi(yy,"small"); } attrs* S* ">" inline* "</" _SMALL ">" { endtag(yy); }
U <- "<" _U & ET { tagi(yy,"u"); } attrs* S* ">" inline* "</" _U ">" { endtag(yy); } # XXX non-standard
EM <- "<" _EM & ET { tagi(yy,"em"); } attrs* S* ">" inline* "</" _EM ">" { endtag(yy); }
STRONG <- "<" _STRONG & ET { tagi(yy,"strong"); } attrs* S* ">" inline* "</" _STRONG ">" { endtag(yy); }
DFN <- "<" _DFN & ET { tagi(yy,"dfn"); } attrs* S* ">" inline* "</" _DFN ">" { endtag(yy); }
CODE <- "<" _CODE & ET { tagi(yy,"code"); } attrs* S* ">" inline* "</" _CODE ">" { endtag(yy); }
SAMP <- "<" _SAMP & ET { tagi(yy,"samp"); } attrs* S* ">" inline* "</" _SAMP ">" { endtag(yy); }
KBD <- "<" _KBD & ET { tagi(yy,"kbd"); } attrs* S* ">" inline* "</" _KBD ">" { endtag(yy); }
VAR <- "<" _VAR & ET { tagi(yy,"var"); } attrs* S* ">" inline* "</" _VAR ">" { endtag(yy); }
CITE <- "<" _CITE & ET { tagi(yy,"cite"); } attrs* S* ">" inline* "</" _CITE ">" { endtag(yy); }
ABBR <- "<" _ABBR & ET { tagi(yy,"abbr"); } attrs* S* ">" inline* "</" _ABBR ">" { endtag(yy); }
ACRONYM <- "<" _ACRONYM & ET { tagi(yy,"acronym"); } attrs* S* ">" inline* "</" _ACRONYM ">" { endtag(yy); }
A <- "<" _A & ET { tagi(yy,"a"); } A_attr* S* ">" (!A inline)* "</" _A ">" { endtag(yy); }
IMG <- "<" _IMG & ET { tagi(yy,"img"); } IMG_attr* S* ">" (S* "</" _IMG ">")? { endtag(yy); }
BR <- "<" _BR & ET { tagi(yy,"br"); } coreattrs* S* ">" (S* "</" _BR ">")? { endtag(yy); }
SCRIPT <- "<" _SCRIPT & ET { tagi(yy,"script"); } SCRIPT_attr* S* ">" scriptDATA "</" _SCRIPT ">" { endtag(yy); }
BDO <- "<" _BDO & ET { tagi(yy,"bdo"); } BDO_attr* S* ">" inline* "</" _BDO ">" { endtag(yy); }
Q <- "<" _Q & ET { tagi(yy,"q"); } Q_attr* S* ">" inline* "</" _Q ">" { endtag(yy); }
SUB <- "<" _SUB & ET { tagi(yy,"sub"); } attrs* S* ">" inline* "</" _SUB ">" { endtag(yy); }
SUP <- "<" _SUP & ET { tagi(yy,"sup"); } attrs* S* ">" inline* "</" _SUP ">" { endtag(yy); }
SPAN <- "<" _SPAN & ET { tagi(yy,"span"); } attrs* S* ">" inline* "</" _SPAN ">" { endtag(yy); }
OBJECT <- "<" _OBJECT & ET { tagi(yy,"object"); } OBJECT_attr* S* ">" object_flow* "</" _OBJECT ">" { endtag(yy); }
PARAM <- "<" _PARAM & ET { tagi(yy,"param"); } PARAM_attr* S* ">" (S* "</" _PARAM ">")? { endtag(yy); }
EMBED <- "<" _EMBED & ET { tagi(yy,"embed"); } EMBED_attr* S* ">" inline* "</" _EMBED ">" { endtag(yy); }
FONT <- "<" _FONT & ET { tagi(yy,"font"); } FONT_attr* S* ">" inline* "</" _FONT ">" { endtag(yy); }
MAP <- "<" _MAP & ET { tagi(yy,"map"); } MAP_attr* S* ">" map_flow+ "</" _MAP ">" { endtag(yy); }
AREA <- "<" _AREA & ET { tagi(yy,"area"); } AREA_attr* S* ">" (S* "</" _AREA ">")? { endtag(yy); }
INPUT <- "<" _INPUT & ET { tagi(yy,"input"); } INPUT_attr* S* ">" (S* "</" _INPUT ">")? { endtag(yy); }
SELECT <- "<" _SELECT & ET { tagi(yy,"select"); } SELECT_attr* S* ">" select_flow+ "</" _SELECT ">" { endtag(yy); }
TEXTAREA <- "<" _TEXTAREA & ET { tagi(yy,"textarea"); } TEXTAREA_attr* S* ">" PCDATA* "</" _TEXTAREA ">" { endtag(yy); }
LABEL <- "<" _LABEL & ET { tagi(yy,"label"); } LABEL_attr* S* ">" (! LABEL inline)* "</" _LABEL ">" { endtag(yy); }
BUTTON <- "<" _BUTTON & ET { tagi(yy,"button"); } BUTTON_attr* S* ">" button_flow* "</" _BUTTON ">" { endtag(yy); }
OPTGROUP <- "<" _OPTGROUP & ET { tagi(yy,"optgroup"); } OPTGROUP_attr* S* ">" (OPTION / S)+ "</" _OPTGROUP ">" { endtag(yy); }
OPTION <- "<" _OPTION & ET { tagi(yy,"option"); } OPTION_attr* S* ">" PCDATA* "</" _OPTION ">" { endtag(yy); }
iINS <- "<" _INS & ET { tagi(yy,"ins"); } INSDEL_attr* S* ">" flow* "</" _INS ">" { endtag(yy); }
iDEL <- "<" _DEL & ET { tagi(yy,"del"); } INSDEL_attr* S* ">" flow* "</" _DEL ">" { endtag(yy); }
object_flow <- PARAM / EMBED / flow
map_flow <- block / AREA / S
select_flow <- OPTGROUP / OPTION / S
button_flow <- ! (A / formctrl / FORM / FIELDSET) flow
# *************************************
# BLOCK tags
# *************************************
block <- P / PRE / DL / NOSCRIPT / BLOCKQUOTE
/ FORM / HR / TABLE / FIELDSET / ADDRESS
/ H1 / H2 / H3 / H4 / H5
/ H6 / UL / OL / DIV
/ bINS / bDEL / Cblock
BLOCKQUOTE <- S* "<" _BLOCKQUOTE & ET { tagb(yy,"blockquote"); } bq_attr* S* ">" S* bq_flow+ "</" _BLOCKQUOTE ">" S* { endtag(yy); }
P <- S* "<" _P & ET { tagb(yy,"p"); } attrs* S* ">" S* inline* ("</" _P ">" S*)? { endtag(yy); }
HR <- S* "<" _HR & ET { tagb(yy,"hr"); } attrs* S* ">" S* ("</" _HR ">" S*)? { endtag(yy); }
ADDRESS <- S* "<" _ADDRESS & ET { tagb(yy,"address"); } attrs* S* ">" S* inline* "</" _ADDRESS ">" S* { endtag(yy); }
H1 <- S* "<" _H1 & ET { tagb(yy,"h1"); } attrs* S* ">" S* inline* "</" _H1 ">" S* { endtag(yy); }
H2 <- S* "<" _H2 & ET { tagb(yy,"h2"); } attrs* S* ">" S* inline* "</" _H2 ">" S* { endtag(yy); }
H3 <- S* "<" _H3 & ET { tagb(yy,"h3"); } attrs* S* ">" S* inline* "</" _H3 ">" S* { endtag(yy); }
H4 <- S* "<" _H4 & ET { tagb(yy,"h4"); } attrs* S* ">" S* inline* "</" _H4 ">" S* { endtag(yy); }
H5 <- S* "<" _H5 & ET { tagb(yy,"h5"); } attrs* S* ">" S* inline* "</" _H5 ">" S* { endtag(yy); }
H6 <- S* "<" _H6 & ET { tagb(yy,"h6"); } attrs* S* ">" S* inline* "</" _H6 ">" S* { endtag(yy); }
DIV <- S* "<" _DIV & ET { tagb(yy,"div"); } div_attr* S* ">" S* flow* "</" _DIV ">" S* { endtag(yy); }
DL <- S* "<" _DL & ET { tagb(yy,"dl"); } attrs* S* ">" S* (DT / DD)+ "</" _DL ">" S* { endtag(yy); }
DT <- S* "<" _DT & ET { tagb(yy,"dt"); } attrs* S* ">" S* inline* ("</" _DT ">" S*)? { endtag(yy); }
DD <- S* "<" _DD & ET { tagb(yy,"dd"); } attrs* S* ">" S* flow* ("</" _DD ">" S*)? { endtag(yy); }
UL <- S* "<" _UL & ET { tagb(yy,"ul"); } attrs* S* ">" S* (LI / Cblock)+ "</" _UL ">" S* { endtag(yy); }
OL <- S* "<" _OL & ET { tagb(yy,"ol"); } OL_attr* S* ">" S* (LI / Cblock)+ "</" _OL ">" S* { endtag(yy); }
LI <- S* "<" _LI & ET { tagb(yy,"li"); } attrs* S* ">" S* flow* ("</" _LI ">" S*)? { endtag(yy); }
NOSCRIPT <- S* "<" _NOSCRIPT & ET { tagb(yy,"noscript"); } attrs* S* ">" S* block+ "</" _NOSCRIPT ">" S* { endtag(yy); }
FORM <- S* "<" _FORM & ET { tagb(yy,"form"); } FORM_attr* S* ">" S* FORM_flow* "</" _FORM ">" S* { endtag(yy); }
FIELDSET <- S* "<" _FIELDSET & ET { tagb(yy,"fieldset"); } attrs* S* ">" S* fs_flow* "</" _FIELDSET ">" S* { endtag(yy); }
LEGEND <- S* "<" _LEGEND & ET { tagb(yy,"legend"); } legend_attr* S* ">" S* inline* "</" _LEGEND ">" S* { endtag(yy); }
TABLE <- S* "<" _TABLE & ET { tagb(yy,"table"); } TABLE_attr* S* ">" S* TABLE_flow "</" _TABLE ">" S* { endtag(yy); }
CAPTION <- S* "<" _CAPTION & ET { tagb(yy,"caption"); } attrs* S* ">" S* inline* "</" _CAPTION ">" S* { endtag(yy); }
COL <- S* "<" _COL & ET { tagb(yy,"col"); } col_attr* S* ">" S* ("</" _COL ">" S*)? { endtag(yy); }
COLGROUP <- S* "<" _COLGROUP & ET { tagb(yy,"colgroup"); } col_attr* S* ">" S* COL* ("</" _COLGROUP ">" S*)? { endtag(yy); }
THEAD <- S* "<" _THEAD & ET { tagb(yy,"thead"); } tr_attr* S* ">" S* TR+ ("</" _THEAD ">" S*)? { endtag(yy); }
TFOOT <- S* "<" _TFOOT & ET { tagb(yy,"tfoot"); } tr_attr* S* ">" S* TR+ ("</" _TFOOT ">" S*)? { endtag(yy); }
TR <- S* "<" _TR & ET { tagb(yy,"tr"); } tr_attr* S* ">" S* (TH / TD)+ ("</" _TR ">" S*)? { endtag(yy); }
TH <- S* "<" _TH & ET { tagb(yy,"th"); } THD_attr* S* ">" S* flow* ("</" _TH ">" S*)? { endtag(yy); }
TD <- S* "<" _TD & ET { tagb(yy,"td"); } THD_attr* S* ">" S* flow* ("</" _TD ">" S*)? { endtag(yy); }
bINS <- S* "<" _INS & ET { tagb(yy,"ins"); } INSDEL_attr* S* ">" S* flow* "</" _INS ">" S* { endtag(yy); }
bDEL <- S* "<" _DEL & ET { tagb(yy,"del"); } INSDEL_attr* S* ">" S* flow* "</" _DEL ">" S* { endtag(yy); }
#------------------------------------------------------
# TBODY opening and closing tag are optional. Lovely.
#------------------------------------------------------
TBODY <- (S* "<" _TBODY & ET { tagb(yy,"tbody"); } tr_attr* S* ">" S* / { tagb(yy,"tbody"); })
TR+
(S* "</" _TBODY ">" S*)? { endtag(yy); }
PRE <- S* "<" _PRE & ET { tagb(yy,"pre"); yy->pre = true; } attrs* S* ">" S* PRE_flow* "</" _PRE ">" S* { endtag(yy); yy->pre = false; }
bq_flow <- block / SCRIPT
PRE_flow <- ! (IMG / OBJECT / BIG / SMALL / SUB / SUP) inline
FORM_flow <- ! FORM (block / SCRIPT)
fs_flow <- LEGEND/ flow / PCDATA
TABLE_flow <- CAPTION? (COL / COLGROUP)* THEAD? TFOOT? TBODY+
# *******************************************
# Attributes
# *******************************************
_defval <- ( S* "=" S* _value / nil)
_value <- '"' { luaL_buffinit(yy->L,&yy->buf); } (! '"' CHAR)* { luaL_pushresult(&yy->buf); } '"'
/ "'" { luaL_buffinit(yy->L,&yy->buf); } (! "'" CHAR)* { luaL_pushresult(&yy->buf); } "'"
/ { luaL_buffinit(yy->L,&yy->buf); } (! S CHAR)* { luaL_pushresult(&yy->buf); }
attrs <- coreattrs / i18n / events
coreattrs <- attr_id / attr_class / attr_style / attr_title
i18n <- attr_lang / attr_dir
events <- attr_onclick / attr_ondblclick / attr_onmousedown
/ attr_onmouseup / attr_onmouseover / attr_onmousemove
/ attr_onmouseout / attr_onkeypress / attr_onkeydown
/ attr_onkeyup
reserved <- attr_datasrc / attr_datafld
cellhalign <- attr_align / attr_char / attr_charoff
cellvalign <- attr_valign
A_attr <- attrs
/ attr_charset / attr_type / attr_name / attr_href
/ attr_hreflang / attr_rel / attr_rev / attr_accesskey
/ attr_shape / attr_coords / attr_tabindex / attr_onfocus
/ attr_onblur
IMG_attr <- attrs
/ attr_src / attr_alt / attr_longdesc / attr_name
/ attr_height / attr_width / attr_usemap / attr_ismap
BDO_attr <- coreattrs / attr_lang / attr_dir
Q_attr <- attrs / attr_cite
MAP_attr <- attrs / attr_name
INSDEL_attr <- attrs / attr_cite / attr_datetime
AREA_attr <- attrs
/ attr_shape / attr_coords / attr_href
/ attr_nohref / attr_alt / attr_tabindex
/ attr_accesskey / attr_onfocus / attr_onblur
FONT_attr <- coreattrs / i18n
/ attr_size / attr_color / attr_face
EMBED_attr <- attrs
/ attr_align
/ attr_allowfullscreen
/ attr_allowscriptaccess
/ attr_bgcolor
/ attr_flashvars
/ attr_height
/ attr_href
/ attr_pluginspage
/ attr_quality
/ attr_src
/ attr_type
/ attr_width
PARAM_attr <- attr_id / attr_name / attr_value / attr_valuetype
/ attr_type
OBJECT_attr <- attrs
/ attr_declare / attr_classid / attr_codebase / attr_data
/ attr_type / attr_codetype / attr_archive / attr_standby
/ attr_height / attr_width / attr_usemap / attr_name
/ attr_tabindex / reserved
SCRIPT_attr <- events
/ attr_charset / attr_type / attr_src
/ attr_defer / attr_for / attr_event
INPUT_attr <- attrs
/ attr_type / attr_name / attr_value / attr_checked
/ attr_disabled / attr_readonly / attr_size / attr_maxlength
/ attr_src / attr_alt / attr_usemap / attr_ismap
/ attr_tabindex / attr_accesskey / attr_onfocus / attr_onblur
/ attr_onselect / attr_onchange / attr_accept / reserved
SELECT_attr <- attrs
/ attr_name / attr_size / attr_multiple / attr_disabled
/ attr_tabindex / attr_onfocus / attr_onblur / attr_onchange
/ reserved
TEXTAREA_attr <- attrs
/ attr_name / attr_rows / attr_cols / attr_disabled
/ attr_readonly / attr_tabindex / attr_accesskey / attr_onfocus
/ attr_onblur / attr_onselect / attr_onchange / reserved
LABEL_attr <- attrs
/ attr_for / attr_accesskey / attr_onfocus / attr_onblur
BUTTON_attr <- attrs
/ attr_name / attr_value / attr_type2
/ attr_disabled / attr_tabindex / attr_accesskey
/ attr_onfocus / attr_onblur / reserved
OPTGROUP_attr <- attrs / attr_disabled / attr_label OPTION_attr <- attrs
/ attr_selected / attr_disabled / attr_label / attr_value
FORM_attr <- attrs
/ attr_action / attr_method / attr_enctype / attr_accept
/ attr_name / attr_onsubmit / attr_onreset / attr_accept_charset
TABLE_attr <- attrs
/ attr_abbr / attr_axis / attr_headers / attr_scope
/ attr_rowspan / attr_colspan / cellhalign / cellvalign
/ attr_summary / attr_rules / attr_frame / attr_datapagesize
/ attr_cellspacing / attr_cellpadding / attr_border
bq_attr <- attrs / attr_cite
div_attr <- attrs / reserved
OL_attr <- attrs / attr_start / attr_type
legend_attr <- attrs / attr_accesskey
col_attr <- attrs / attr_span / attr_width / cellhalign / cellvalign
tr_attr <- attrs / cellhalign / cellvalign
THD_attr <- attrs
/ attr_abbr / attr_axis / attr_headers / attr_scope
/ attr_rowspan / attr_colspan / cellhalign / cellvalign
ET <- " " / "\t" / "\r" / "\n" / ">" # end tag
EA <- " " / "\t" / "\r" / "\n" / "=" / ">" # end attribute
EQ <- S* "=" S*
_vDIR <- EQ ('"' _LTR '"' / "'" _LTR "'" / _LTR) { lua_pushliteral(yy->L,"ltr"); }
/ EQ ('"' _RTL '"' / "'" _RTL "'" / _RTL) { lua_pushliteral(yy->L,"rtl"); }
_vALIGN <- EQ ('"' _ALIGN '"' / "'" _ALIGN "'" / _ALIGN ) { lua_pushliteral(yy->L,"align"); }
/ EQ ('"' _LEFT '"' / "'" _LEFT "'" / _LEFT ) { lua_pushliteral(yy->L,"left"); }
/ EQ ('"' _CENTER '"' / "'" _CENTER "'" / _CENTER ) { lua_pushliteral(yy->L,"center"); }
/ EQ ('"' _RIGHT '"' / "'" _RIGHT "'" / _RIGHT ) { lua_pushliteral(yy->L,"right"); }
/ EQ ('"' _JUSTIFY '"' / "'" _JUSTIFY "'" / _JUSTIFY) { lua_pushliteral(yy->L,"justify"); }
/ EQ ('"' _CHAR '"' / "'" _CHAR "'" / _CHAR ) { lua_pushliteral(yy->L,"char"); }
_vAFS <- EQ ('"' _TRUE '"' / "'" _TRUE "'" / _TRUE ) { lua_pushliteral(yy->L,"true"); }
/ { lua_pushliteral(yy->L,"allowfullscreen"); }
_vCHECKED <- EQ ('"' _CHECKED '"' / "'" _CHECKED "'" / _CHECKED) { lua_pushliteral(yy->L,"checked"); }
/ { lua_pushliteral(yy->L,"checked"); }
_vDECLARE <- EQ ('"' _DECLARE '"' / "'" _DECLARE "'" / _DECLARE) { lua_pushliteral(yy->L,"declare"); }
/ { lua_pushliteral(yy->L,"declare"); }
_vDEFER <- EQ ('"' _DEFER '"' / "'" _DEFER "'" / _DEFER) { lua_pushliteral(yy->L,"defer"); }
/ { lua_pushliteral(yy->L,"defer"); }
_vDISABLED <- EQ ('"' _DISABLED '"' / "'" _DISABLED "'" / _DISABLED) { lua_pushliteral(yy->L,"disabled"); }
/ { lua_pushliteral(yy->L,"disabled"); }
_vFRAME <- EQ ('"' _VOID '"' / "'" _VOID "'" / _VOID ) { lua_pushliteral(yy->L,"void"); }
/ EQ ('"' _ABOVE '"' / "'" _ABOVE "'" / _ABOVE ) { lua_pushliteral(yy->L,"above"); }
/ EQ ('"' _BELOW '"' / "'" _BELOW "'" / _BELOW ) { lua_pushliteral(yy->L,"below"); }
/ EQ ('"' _HSIDES '"' / "'" _HSIDES "'" / _HSIDES) { lua_pushliteral(yy->L,"hsides"); }
/ EQ ('"' _LHS '"' / "'" _LHS "'" / _LHS ) { lua_pushliteral(yy->L,"lhs"); }
/ EQ ('"' _RHS '"' / "'" _RHS "'" / _RHS ) { lua_pushliteral(yy->L,"rhs"); }
/ EQ ('"' _VSIDES '"' / "'" _VSIDES "'" / _VSIDES) { lua_pushliteral(yy->L,"vsides"); }
/ EQ ('"' _BOX '"' / "'" _BOX "'" / _BOX ) { lua_pushliteral(yy->L,"box"); }
/ EQ ('"' _BORDER '"' / "'" _BORDER "'" / _BORDER) { lua_pushliteral(yy->L,"border"); }
_vISMAP <- EQ ('"' _ISMAP '"' / "'" _ISMAP "'" / _ISMAP) { lua_pushliteral(yy->L,"ismap"); }
/ { lua_pushliteral(yy->L,"ismap"); }
_vMETHOD <- EQ ('"' _GET '"' / "'" _GET "'" / _GET ) { lua_pushliteral(yy->L,"GET"); }
/ EQ ('"' _POST '"' / "'" _POST "'" / _POST) { lua_pushliteral(yy->L,"POST"); }
_vMULTIPLE <- EQ ('"' _MULTIPLE '"' / "'" _MULTIPLE "'" / _MULTIPLE) { lua_pushliteral(yy->L,"multiple"); }
/ { lua_pushliteral(yy->L,"multiple"); }
_vNOHREF <- EQ ('"' _NOHREF '"' / "'" _NOHREF "'" / _NOHREF) { lua_pushliteral(yy->L,"nohref"); }
/ { lua_pushliteral(yy->L,"nohref"); }
_vREADONLY <- EQ ('"' _READONLY '"' / "'" _READONLY "'" / _READONLY) { lua_pushliteral(yy->L,"readonly"); }
/ { lua_pushliteral(yy->L,"readonly"); }
_vRULES <- EQ ('"' _NONE '"' / "'" _NONE "'" / _NONE ) { lua_pushliteral(yy->L,"none"); }
/ EQ ('"' _GROUPS '"' / "'" _GROUPS "'" / _GROUPS) { lua_pushliteral(yy->L,"groups"); }
/ EQ ('"' _ROWS '"' / "'" _ROWS "'" / _ROWS ) { lua_pushliteral(yy->L,"rows"); }
/ EQ ('"' _COLS '"' / "'" _COLS "'" / _COLS ) { lua_pushliteral(yy->L,"cols"); }
/ EQ ('"' _ALL '"' / "'" _ALL "'" / _ALL ) { lua_pushliteral(yy->L,"all"); }
_vSELECTED <- EQ ('"' _SELECTED '"' / "'" _SELECTED "'" / _SELECTED) { lua_pushliteral(yy->L,"selected"); }
/ { lua_pushliteral(yy->L,"selected"); }
_vTYPE2 <- EQ ('"' _BUTTON '"' / "'" _BUTTON "'" / _BUTTON) { lua_pushliteral(yy->L,"button"); }
/ EQ ('"' _SUBMIT '"' / "'" _SUBMIT "'" / _SUBMIT) { lua_pushliteral(yy->L,"submit"); }
/ EQ ('"' _RESET '"' / "'" _RESET "'" / _RESET ) { lua_pushliteral(yy->L,"reset"); }
_vVALIGN <- EQ ('"' _TOP '"' / "'" _TOP "'" / _TOP ) { lua_pushliteral(yy->L,"top"); }
/ EQ ('"' _MIDDLE '"' / "'" _MIDDLE "'" / _MIDDLE ) { lua_pushliteral(yy->L,"middle"); }
/ EQ ('"' _BOTTOM '"' / "'" _BOTTOM "'" / _BOTTOM ) { lua_pushliteral(yy->L,"bottom"); }
/ EQ ('"' _BASELINE '"' / "'" _BASELINE "'" / _BASELINE) { lua_pushliteral(yy->L,"baseline"); }
_vVALUETYPE <- EQ ('"' _DATA '"' / "'" _DATA "'" / _DATA ) { lua_pushliteral(yy->L,"DATA"); }
/ EQ ('"' _REF '"' / "'" _REF "'" / _REF ) { lua_pushliteral(yy->L,"REF"); }
/ EQ ('"' _OBJECT '"' / "'" _OBJECT "'" / _OBJECT) { lua_pushliteral(yy->L,"OBJECT"); }
_vnum <- EQ '"' < [0-9]+ > '"' { lua_pushinteger(yy->L,strtoul(yytext,NULL,10)); }
/ EQ "'" < [0-9]+ > "'" { lua_pushinteger(yy->L,strtoul(yytext,NULL,10)); }
/ EQ [0-9]+ > { lua_pushinteger(yy->L,strtoul(yytext,NULL,10)); }
attr_abbr <- S+ _ABBR & EA _defval { setfield(yy,"abbr"); }
attr_accept <- S+ _ACCEPT & EA _defval { setfield(yy,"accept"); }
attr_accept_charset <- S+ _ACCEPT_CHARSET & EA _defval { setfield(yy,"accept_charset"); }
attr_accesskey <- S+ _ACCESSKEY & EA _defval { setfield(yy,"accesskey"); }
attr_action <- S+ _ACTION & EA _defval { setfield(yy,"action"); }
attr_align <- S+ _ALIGN & EA _vALIGN { setfield(yy,"align"); }
attr_allowfullscreen <- S+ _ALLOWFULLSCREEN & EA _vAFS { setfield(yy,"allowfullscreen"); }
attr_allowscriptaccess <- S+ _ALLOWSCRIPTACCESS & EA _defval { setfield(yy,"allowscriptaccess"); }
attr_alt <- S+ _ALT & EA _defval { setfield(yy,"alt"); }
attr_archive <- S+ _ARCHIVE & EA _defval { setfield(yy,"archive"); }
attr_axis <- S+ _AXIS & EA _defval { setfield(yy,"axis"); }
attr_bgcolor <- S+ _BGCOLOR & EA _defval { setfield(yy,"bgcolor"); }
attr_border <- S+ _BORDER & EA _defval { setfield(yy,"border"); }
attr_cellpadding <- S+ _CELLPADDING & EA _defval { setfield(yy,"cellpadding"); }
attr_cellspacing <- S+ _CELLSPACING & EA _defval { setfield(yy,"cellspacing"); }
attr_char <- S+ _CHAR & EA _defval { setfield(yy,"char"); }
attr_charoff <- S+ _CHAROFF & EA _defval { setfield(yy,"charoff"); }
attr_charset <- S+ _CHARSET & EA _defval { setfield(yy,"charset"); }
attr_checked <- S+ _CHECKED & EA _vCHECKED { setfield(yy,"checked"); }
attr_cite <- S+ _CITE & EA _defval { setfield(yy,"cite"); }
attr_class <- S+ _CLASS & EA _defval { setfield(yy,"class"); }
attr_classid <- S+ _CLASSID & EA _defval { setfield(yy,"classid"); }
attr_codebase <- S+ _CODEBASE & EA _defval { setfield(yy,"codebase"); }
attr_codetype <- S+ _CODETYPE & EA _defval { setfield(yy,"codetype"); }
attr_color <- S+ _COLOR & EA _defval { setfield(yy,"color"); }
attr_cols <- S+ _COLS & EA _vnum { setfield(yy,"cols"); }
attr_colspan <- S+ _COLSPAN & EA _vnum { setfield(yy,"colspan"); }
attr_coords <- S+ _COORDS & EA _defval { setfield(yy,"coords"); }
attr_data <- S+ _DATA & EA _defval { setfield(yy,"data"); }
attr_datafld <- S+ _DATAFLD & EA _defval { setfield(yy,"datafld"); }
attr_datapagesize <- S+ _DATAPAGESIZE & EA _defval { setfield(yy,"datapagesize"); }
attr_datasrc <- S+ _DATASRC & EA _defval { setfield(yy,"datasrc"); }
attr_datetime <- S+ _DATETIME & EA _defval { setfield(yy,"datetime"); }
attr_declare <- S+ _DECLARE & EA _vDECLARE { setfield(yy,"declare"); }
attr_defer <- S+ _DEFER & EA _vDEFER { setfield(yy,"defer"); }
attr_dir <- S+ _DIR & EA _vDIR { setfield(yy,"dir"); }
attr_disabled <- S+ _DISABLED & EA _vDISABLED { setfield(yy,"disabled"); }
attr_enctype <- S+ _ENCTYPE & EA _defval { setfield(yy,"enctype"); }
attr_event <- S+ _EVENT & EA _defval { setfield(yy,"event"); }
attr_face <- S+ _FACE & EA _defval { setfield(yy,"face"); }
attr_flashvars <- S+ _FLASHVARS & EA _defval { setfield(yy,"flashvars"); }
attr_for <- S+ _FOR & EA _defval { setfield(yy,"for"); }
attr_frame <- S+ _FRAME & EA _vFRAME { setfield(yy,"frame"); }
attr_headers <- S+ _HEADERS & EA _defval { setfield(yy,"headers"); }
attr_height <- S+ _HEIGHT & EA _defval { setfield(yy,"height"); }
attr_href <- S+ _HREF & EA _defval { setfield(yy,"href"); }
attr_hreflang <- S+ _HREFLANG & EA _defval { setfield(yy,"hreflang"); }
attr_id <- S+ _ID & EA _defval { setfield(yy,"id"); }
attr_ismap <- S+ _ISMAP & EA _vISMAP { setfield(yy,"ismap"); }
attr_label <- S+ _LABEL & EA _defval { setfield(yy,"label"); }
attr_lang <- S+ _LANG & EA _defval { setfield(yy,"lang"); }
attr_longdesc <- S+ _LONGDESC & EA _defval { setfield(yy,"longdesc"); }
attr_maxlength <- S+ _MAXLENGTH & EA _vnum { setfield(yy,"maxlength"); }
attr_method <- S+ _METHOD & EA _vMETHOD { setfield(yy,"method"); }
attr_multiple <- S+ _MULTIPLE & EA _vMULTIPLE { setfield(yy,"multiple"); }
attr_name <- S+ _NAME & EA _defval { setfield(yy,"name"); }
attr_nohref <- S+ _NOHREF & EA _vNOHREF { setfield(yy,"nohref"); }
attr_onblur <- S+ _ONBLUR & EA _defval { setfield(yy,"onblur"); }
attr_onchange <- S+ _ONCHANGE & EA _defval { setfield(yy,"onchange"); }
attr_onclick <- S+ _ONCLICK & EA _defval { setfield(yy,"onclick"); }
attr_ondblclick <- S+ _ONDBLCLICK & EA _defval { setfield(yy,"ondblclick"); }
attr_onfocus <- S+ _ONFOCUS & EA _defval { setfield(yy,"onfocus"); }
attr_onkeydown <- S+ _ONKEYDOWN & EA _defval { setfield(yy,"onkeydown"); }
attr_onkeypress <- S+ _ONKEYPRESS & EA _defval { setfield(yy,"onkeypress"); }
attr_onkeyup <- S+ _ONKEYUP & EA _defval { setfield(yy,"onkeyup"); }
attr_onmousedown <- S+ _ONMOUSEDOWN & EA _defval { setfield(yy,"onmousedown"); }
attr_onmousemove <- S+ _ONMOUSEMOVE & EA _defval { setfield(yy,"onmousemove"); }
attr_onmouseout <- S+ _ONMOUSEOUT & EA _defval { setfield(yy,"onmouseout"); }
attr_onmouseover <- S+ _ONMOUSEOVER & EA _defval { setfield(yy,"onmouseover"); }
attr_onmouseup <- S+ _ONMOUSEUP & EA _defval { setfield(yy,"onmouseup"); }
attr_onreset <- S+ _ONRESET & EA _defval { setfield(yy,"onreset"); }
attr_onselect <- S+ _ONSELECT & EA _defval { setfield(yy,"onselect"); }
attr_onsubmit <- S+ _ONSUBMIT & EA _defval { setfield(yy,"onsubmit"); }
attr_pluginspage <- S+ _PLUGINSPAGE & EA _defval { setfield(yy,"pluginspage"); }
attr_quality <- S+ _QUALITY & EA _defval { setfield(yy,"quality"); }
attr_readonly <- S+ _READONLY & EA _vREADONLY { setfield(yy,"readonly"); }
attr_rel <- S+ _REL & EA _defval { setfield(yy,"rel"); }
attr_rev <- S+ _REV & EA _defval { setfield(yy,"rev"); }
attr_rows <- S+ _ROWS & EA _vnum { setfield(yy,"rows"); }
attr_rowspan <- S+ _ROWSPAN & EA _vnum { setfield(yy,"rowspan"); }
attr_rules <- S+ _RULES & EA _vRULES { setfield(yy,"rules"); }
attr_scope <- S+ _SCOPE & EA _defval { setfield(yy,"scope"); }
attr_selected <- S+ _SELECTED & EA _vSELECTED { setfield(yy,"selected"); }
attr_shape <- S+ _SHAPE & EA _defval { setfield(yy,"shape"); }
attr_size <- S+ _SIZE & EA _defval { setfield(yy,"size"); }
attr_span <- S+ _SPAN & EA _vnum { setfield(yy,"span"); }
attr_src <- S+ _SRC & EA _defval { setfield(yy,"src"); }
attr_standby <- S+ _STANDBY & EA _defval { setfield(yy,"standby"); }
attr_start <- S+ _START & EA _vnum { setfield(yy,"start"); }
attr_style <- S+ _STYLE & EA _defval { setfield(yy,"style"); }
attr_summary <- S+ _SUMMARY & EA _defval { setfield(yy,"summary"); }
attr_tabindex <- S+ _TABINDEX & EA _vnum { setfield(yy,"tabindex"); }
attr_title <- S+ _TITLE & EA _defval { setfield(yy,"title"); }
attr_type <- S+ _TYPE & EA _defval { setfield(yy,"type"); }
attr_type2 <- S+ _TYPE2 & EA _vTYPE2 { setfield(yy,"type2"); }
attr_usemap <- S+ _USEMAP & EA _defval { setfield(yy,"usemap"); }
attr_valign <- S+ _VALIGN & EA _vVALIGN { setfield(yy,"valign"); }
attr_value <- S+ _VALUE & EA _defval { setfield(yy,"value"); }
attr_valuetype <- S+ _VALUETYPE & EA _vVALUETYPE { setfield(yy,"valuetype"); }
attr_width <- S+ _WIDTH & EA _defval { setfield(yy,"width"); }
# ****************************
_A <- ('A'/'a')
_ABBR <- ('A'/'a') ('B'/'b') ('B'/'b') ('R'/'r')
_ABOVE <- ('A'/'a') ('B'/'b') ('O'/'o') ('V'/'v') ('E'/'e')
_ACCEPT <- ('A'/'a') ('C'/'c') ('C'/'c') ('E'/'e') ('P'/'p') ('T'/'t')
_ACCEPT_CHARSET <- ('A'/'a') ('C'/'c') ('C'/'c') ('E'/'e') ('P'/'p') ('T'/'t') '_' ('C'/'c') ('H'/'h') ('A'/'a') ('R'/'r') ('S'/'s') ('E'/'e') ('T'/'t')
_ACCESSKEY <- ('A'/'a') ('C'/'c') ('C'/'c') ('E'/'e') ('S'/'s') ('S'/'s') ('K'/'k') ('E'/'e') ('Y'/'y')
_ACRONYM <- ('A'/'a') ('C'/'c') ('R'/'r') ('O'/'o') ('N'/'n') ('Y'/'y') ('M'/'m')
_ACTION <- ('A'/'a') ('C'/'c') ('T'/'t') ('I'/'i') ('O'/'o') ('N'/'n')
_ADDRESS <- ('A'/'a') ('D'/'d') ('D'/'d') ('R'/'r') ('E'/'e') ('S'/'s') ('S'/'s')
_ALIGN <- ('A'/'a') ('L'/'l') ('I'/'i') ('G'/'g') ('N'/'n')
_ALL <- ('A'/'a') ('L'/'l') ('L'/'l')
_ALLOWFULLSCREEN <- ('A'/'a') ('L'/'l') ('L'/'l') ('O'/'o') ('W'/'w') ('F'/'f') ('U'/'u') ('L'/'l') ('L'/'l') ('S'/'s') ('C'/'c') ('R'/'r') ('E'/'e') ('E'/'e') ('N'/'n')
_ALLOWSCRIPTACCESS <- ('A'/'a') ('L'/'l') ('L'/'l') ('O'/'o') ('W'/'w') ('S'/'s') ('C'/'c') ('R'/'r') ('I'/'i') ('P'/'p') ('T'/'t') ('A'/'a') ('C'/'c') ('C'/'c') ('E'/'e') ('S'/'s') ('S'/'s')
_ALT <- ('A'/'a') ('L'/'l') ('T'/'t')
_ARCHIVE <- ('A'/'a') ('R'/'r') ('C'/'c') ('H'/'h') ('I'/'i') ('V'/'v') ('E'/'e')
_AREA <- ('A'/'a') ('R'/'r') ('E'/'e') ('A'/'a')
_AXIS <- ('A'/'a') ('X'/'x') ('I'/'i') ('S'/'s')
_B <- ('B'/'b')
_BASELINE <- ('B'/'b') ('A'/'a') ('S'/'s') ('E'/'e') ('L'/'l') ('I'/'i') ('N'/'n') ('E'/'e')
_BDO <- ('B'/'b') ('D'/'d') ('O'/'o')
_BELOW <- ('B'/'b') ('E'/'e') ('L'/'l') ('O'/'o') ('W'/'w')
_BGCOLOR <- ('B'/'b') ('G'/'g') ('C'/'c') ('O'/'o') ('L'/'l') ('O'/'o') ('R'/'r')
_BIG <- ('B'/'b') ('I'/'i') ('G'/'g')
_BLOCKQUOTE <- ('B'/'b') ('L'/'l') ('O'/'o') ('C'/'c') ('K'/'k') ('Q'/'q') ('U'/'u') ('O'/'o') ('T'/'t') ('E'/'e')
_BORDER <- ('B'/'b') ('O'/'o') ('R'/'r') ('D'/'d') ('E'/'e') ('R'/'r')
_BOTTOM <- ('B'/'b') ('O'/'o') ('T'/'t') ('T'/'t') ('O'/'o') ('M'/'m')
_BOX <- ('B'/'b') ('O'/'o') ('X'/'x')
_BR <- ('B'/'b') ('R'/'r')
_BUTTON <- ('B'/'b') ('U'/'u') ('T'/'t') ('T'/'t') ('O'/'o') ('N'/'n')
_CAPTION <- ('C'/'c') ('A'/'a') ('P'/'p') ('T'/'t') ('I'/'i') ('O'/'o') ('N'/'n')
_CELLPADDING <- ('C'/'c') ('E'/'e') ('L'/'l') ('L'/'l') ('P'/'p') ('A'/'a') ('D'/'d') ('D'/'d') ('I'/'i') ('N'/'n') ('G'/'g')
_CELLSPACING <- ('C'/'c') ('E'/'e') ('L'/'l') ('L'/'l') ('S'/'s') ('P'/'p') ('A'/'a') ('C'/'c') ('I'/'i') ('N'/'n') ('G'/'g')
_CENTER <- ('C'/'c') ('E'/'e') ('N'/'n') ('T'/'t') ('E'/'e') ('R'/'r')
_CHAR <- ('C'/'c') ('H'/'h') ('A'/'a') ('R'/'r')
_CHAROFF <- ('C'/'c') ('H'/'h') ('A'/'a') ('R'/'r') ('O'/'o') ('F'/'f') ('F'/'f')
_CHARSET <- ('C'/'c') ('H'/'h') ('A'/'a') ('R'/'r') ('S'/'s') ('E'/'e') ('T'/'t')
_CHECKED <- ('C'/'c') ('H'/'h') ('E'/'e') ('C'/'c') ('K'/'k') ('E'/'e') ('D'/'d')
_CITE <- ('C'/'c') ('I'/'i') ('T'/'t') ('E'/'e')
_CLASS <- ('C'/'c') ('L'/'l') ('A'/'a') ('S'/'s') ('S'/'s')
_CLASSID <- ('C'/'c') ('L'/'l') ('A'/'a') ('S'/'s') ('S'/'s') ('I'/'i') ('D'/'d')
_CODE <- ('C'/'c') ('O'/'o') ('D'/'d') ('E'/'e')
_CODEBASE <- ('C'/'c') ('O'/'o') ('D'/'d') ('E'/'e') ('B'/'b') ('A'/'a') ('S'/'s') ('E'/'e')
_CODETYPE <- ('C'/'c') ('O'/'o') ('D'/'d') ('E'/'e') ('T'/'t') ('Y'/'y') ('P'/'p') ('E'/'e')
_COL <- ('C'/'c') ('O'/'o') ('L'/'l')
_COLGROUP <- ('C'/'c') ('O'/'o') ('L'/'l') ('G'/'g') ('R'/'r') ('O'/'o') ('U'/'u') ('P'/'p')
_COLOR <- ('C'/'c') ('O'/'o') ('L'/'l') ('O'/'o') ('R'/'r')
_COLS <- ('C'/'c') ('O'/'o') ('L'/'l') ('S'/'s')
_COLSPAN <- ('C'/'c') ('O'/'o') ('L'/'l') ('S'/'s') ('P'/'p') ('A'/'a') ('N'/'n')
_COORDS <- ('C'/'c') ('O'/'o') ('O'/'o') ('R'/'r') ('D'/'d') ('S'/'s')
_DATA <- ('D'/'d') ('A'/'a') ('T'/'t') ('A'/'a')
_DATAFLD <- ('D'/'d') ('A'/'a') ('T'/'t') ('A'/'a') ('F'/'f') ('L'/'l') ('D'/'d')
_DATAPAGESIZE <- ('D'/'d') ('A'/'a') ('T'/'t') ('A'/'a') ('P'/'p') ('A'/'a') ('G'/'g') ('E'/'e') ('S'/'s') ('I'/'i') ('Z'/'z') ('E'/'e')
_DATASRC <- ('D'/'d') ('A'/'a') ('T'/'t') ('A'/'a') ('S'/'s') ('R'/'r') ('C'/'c')
_DATETIME <- ('D'/'d') ('A'/'a') ('T'/'t') ('E'/'e') ('T'/'t') ('I'/'i') ('M'/'m') ('E'/'e')
_DD <- ('D'/'d') ('D'/'d')
_DECLARE <- ('D'/'d') ('E'/'e') ('C'/'c') ('L'/'l') ('A'/'a') ('R'/'r') ('E'/'e')
_DEFER <- ('D'/'d') ('E'/'e') ('F'/'f') ('E'/'e') ('R'/'r')
_DEL <- ('D'/'d') ('E'/'e') ('L'/'l')
_DFN <- ('D'/'d') ('F'/'f') ('N'/'n')
_DIR <- ('D'/'d') ('I'/'i') ('R'/'r')
_DISABLED <- ('D'/'d') ('I'/'i') ('S'/'s') ('A'/'a') ('B'/'b') ('L'/'l') ('E'/'e') ('D'/'d')
_DIV <- ('D'/'d') ('I'/'i') ('V'/'v')
_DL <- ('D'/'d') ('L'/'l')
_DT <- ('D'/'d') ('T'/'t')
_EM <- ('E'/'e') ('M'/'m')
_EMBED <- ('E'/'e') ('M'/'m') ('B'/'b') ('E'/'e') ('D'/'d')
_ENCTYPE <- ('E'/'e') ('N'/'n') ('C'/'c') ('T'/'t') ('Y'/'y') ('P'/'p') ('E'/'e')
_EVENT <- ('E'/'e') ('V'/'v') ('E'/'e') ('N'/'n') ('T'/'t')
_FACE <- ('F'/'f') ('A'/'a') ('C'/'c') ('E'/'e')
_FIELDSET <- ('F'/'f') ('I'/'i') ('E'/'e') ('L'/'l') ('D'/'d') ('S'/'s') ('E'/'e') ('T'/'t')
_FLASHVARS <- ('F'/'f') ('L'/'l') ('A'/'a') ('S'/'s') ('H'/'h') ('V'/'v') ('A'/'a') ('R'/'r') ('S'/'s')
_FONT <- ('F'/'f') ('O'/'o') ('N'/'n') ('T'/'t')
_FOR <- ('F'/'f') ('O'/'o') ('R'/'r')
_FORM <- ('F'/'f') ('O'/'o') ('R'/'r') ('M'/'m')
_FRAME <- ('F'/'f') ('R'/'r') ('A'/'a') ('M'/'m') ('E'/'e')
_GET <- ('G'/'g') ('E'/'e') ('T'/'t')
_GROUPS <- ('G'/'g') ('R'/'r') ('O'/'o') ('U'/'u') ('P'/'p') ('S'/'s')
_H1 <- ('H'/'h') '1'
_H2 <- ('H'/'h') '2'
_H3 <- ('H'/'h') '3'
_H4 <- ('H'/'h') '4'
_H5 <- ('H'/'h') '5'
_H6 <- ('H'/'h') '6'
_HEADERS <- ('H'/'h') ('E'/'e') ('A'/'a') ('D'/'d') ('E'/'e') ('R'/'r') ('S'/'s')
_HEIGHT <- ('H'/'h') ('E'/'e') ('I'/'i') ('G'/'g') ('H'/'h') ('T'/'t')
_HR <- ('H'/'h') ('R'/'r')
_HREF <- ('H'/'h') ('R'/'r') ('E'/'e') ('F'/'f')
_HREFLANG <- ('H'/'h') ('R'/'r') ('E'/'e') ('F'/'f') ('L'/'l') ('A'/'a') ('N'/'n') ('G'/'g')
_HSIDES <- ('H'/'h') ('S'/'s') ('I'/'i') ('D'/'d') ('E'/'e') ('S'/'s')
_I <- ('I'/'i')
_ID <- ('I'/'i') ('D'/'d')
_IMG <- ('I'/'i') ('M'/'m') ('G'/'g')
_INPUT <- ('I'/'i') ('N'/'n') ('P'/'p') ('U'/'u') ('T'/'t')
_INS <- ('I'/'i') ('N'/'n') ('S'/'s')
_ISMAP <- ('I'/'i') ('S'/'s') ('M'/'m') ('A'/'a') ('P'/'p')
_JUSTIFY <- ('J'/'j') ('U'/'u') ('S'/'s') ('T'/'t') ('I'/'i') ('F'/'f') ('Y'/'y')
_KBD <- ('K'/'k') ('B'/'b') ('D'/'d')
_LABEL <- ('L'/'l') ('A'/'a') ('B'/'b') ('E'/'e') ('L'/'l')
_LANG <- ('L'/'l') ('A'/'a') ('N'/'n') ('G'/'g')
_LEFT <- ('L'/'l') ('E'/'e') ('F'/'f') ('T'/'t')
_LEGEND <- ('L'/'l') ('E'/'e') ('G'/'g') ('E'/'e') ('N'/'n') ('D'/'d')
_LHS <- ('L'/'l') ('H'/'h') ('S'/'s')
_LI <- ('L'/'l') ('I'/'i')
_LONGDESC <- ('L'/'l') ('O'/'o') ('N'/'n') ('G'/'g') ('D'/'d') ('E'/'e') ('S'/'s') ('C'/'c')
_LTR <- ('L'/'l') ('T'/'t') ('R'/'r')
_MAP <- ('M'/'m') ('A'/'a') ('P'/'p')
_MAXLENGTH <- ('M'/'m') ('A'/'a') ('X'/'x') ('L'/'l') ('E'/'e') ('N'/'n') ('G'/'g') ('T'/'t') ('H'/'h')
_METHOD <- ('M'/'m') ('E'/'e') ('T'/'t') ('H'/'h') ('O'/'o') ('D'/'d')
_MIDDLE <- ('M'/'m') ('I'/'i') ('D'/'d') ('D'/'d') ('L'/'l') ('E'/'e')
_MULTIPLE <- ('M'/'m') ('U'/'u') ('L'/'l') ('T'/'t') ('I'/'i') ('P'/'p') ('L'/'l') ('E'/'e')
_NAME <- ('N'/'n') ('A'/'a') ('M'/'m') ('E'/'e')
_NOHREF <- ('N'/'n') ('O'/'o') ('H'/'h') ('R'/'r') ('E'/'e') ('F'/'f')
_NONE <- ('N'/'n') ('O'/'o') ('N'/'n') ('E'/'e')
_NOSCRIPT <- ('N'/'n') ('O'/'o') ('S'/'s') ('C'/'c') ('R'/'r') ('I'/'i') ('P'/'p') ('T'/'t')
_OBJECT <- ('O'/'o') ('B'/'b') ('J'/'j') ('E'/'e') ('C'/'c') ('T'/'t')
_OL <- ('O'/'o') ('L'/'l')
_ONBLUR <- ('O'/'o') ('N'/'n') ('B'/'b') ('L'/'l') ('U'/'u') ('R'/'r')
_ONCHANGE <- ('O'/'o') ('N'/'n') ('C'/'c') ('H'/'h') ('A'/'a') ('N'/'n') ('G'/'g') ('E'/'e')
_ONCLICK <- ('O'/'o') ('N'/'n') ('C'/'c') ('L'/'l') ('I'/'i') ('C'/'c') ('K'/'k')
_ONDBLCLICK <- ('O'/'o') ('N'/'n') ('D'/'d') ('B'/'b') ('L'/'l') ('C'/'c') ('L'/'l') ('I'/'i') ('C'/'c') ('K'/'k')
_ONFOCUS <- ('O'/'o') ('N'/'n') ('F'/'f') ('O'/'o') ('C'/'c') ('U'/'u') ('S'/'s')
_ONKEYDOWN <- ('O'/'o') ('N'/'n') ('K'/'k') ('E'/'e') ('Y'/'y') ('D'/'d') ('O'/'o') ('W'/'w') ('N'/'n')
_ONKEYPRESS <- ('O'/'o') ('N'/'n') ('K'/'k') ('E'/'e') ('Y'/'y') ('P'/'p') ('R'/'r') ('E'/'e') ('S'/'s') ('S'/'s')
_ONKEYUP <- ('O'/'o') ('N'/'n') ('K'/'k') ('E'/'e') ('Y'/'y') ('U'/'u') ('P'/'p')
_ONMOUSEDOWN <- ('O'/'o') ('N'/'n') ('M'/'m') ('O'/'o') ('U'/'u') ('S'/'s') ('E'/'e') ('D'/'d') ('O'/'o') ('W'/'w') ('N'/'n')
_ONMOUSEMOVE <- ('O'/'o') ('N'/'n') ('M'/'m') ('O'/'o') ('U'/'u') ('S'/'s') ('E'/'e') ('M'/'m') ('O'/'o') ('V'/'v') ('E'/'e')
_ONMOUSEOUT <- ('O'/'o') ('N'/'n') ('M'/'m') ('O'/'o') ('U'/'u') ('S'/'s') ('E'/'e') ('O'/'o') ('U'/'u') ('T'/'t')
_ONMOUSEOVER <- ('O'/'o') ('N'/'n') ('M'/'m') ('O'/'o') ('U'/'u') ('S'/'s') ('E'/'e') ('O'/'o') ('V'/'v') ('E'/'e') ('R'/'r')
_ONMOUSEUP <- ('O'/'o') ('N'/'n') ('M'/'m') ('O'/'o') ('U'/'u') ('S'/'s') ('E'/'e') ('U'/'u') ('P'/'p')
_ONRESET <- ('O'/'o') ('N'/'n') ('R'/'r') ('E'/'e') ('S'/'s') ('E'/'e') ('T'/'t')
_ONSELECT <- ('O'/'o') ('N'/'n') ('S'/'s') ('E'/'e') ('L'/'l') ('E'/'e') ('C'/'c') ('T'/'t')
_ONSUBMIT <- ('O'/'o') ('N'/'n') ('S'/'s') ('U'/'u') ('B'/'b') ('M'/'m') ('I'/'i') ('T'/'t')
_OPTGROUP <- ('O'/'o') ('P'/'p') ('T'/'t') ('G'/'g') ('R'/'r') ('O'/'o') ('U'/'u') ('P'/'p')
_OPTION <- ('O'/'o') ('P'/'p') ('T'/'t') ('I'/'i') ('O'/'o') ('N'/'n')
_P <- ('P'/'p')
_PARAM <- ('P'/'p') ('A'/'a') ('R'/'r') ('A'/'a') ('M'/'m')
_PLUGINSPAGE <- ('P'/'p') ('L'/'l') ('U'/'u') ('G'/'g') ('I'/'i') ('N'/'n') ('S'/'s') ('P'/'p') ('A'/'a') ('G'/'g') ('E'/'e')
_POST <- ('P'/'p') ('O'/'o') ('S'/'s') ('T'/'t')
_PRE <- ('P'/'p') ('R'/'r') ('E'/'e')
_Q <- ('Q'/'q')
_QUALITY <- ('Q'/'q') ('U'/'u') ('A'/'a') ('L'/'l') ('I'/'i') ('T'/'t') ('Y'/'y')
_READONLY <- ('R'/'r') ('E'/'e') ('A'/'a') ('D'/'d') ('O'/'o') ('N'/'n') ('L'/'l') ('Y'/'y')
_REF <- ('R'/'r') ('E'/'e') ('F'/'f')
_REL <- ('R'/'r') ('E'/'e') ('L'/'l')
_RESET <- ('R'/'r') ('E'/'e') ('S'/'s') ('E'/'e') ('T'/'t')
_REV <- ('R'/'r') ('E'/'e') ('V'/'v')
_RHS <- ('R'/'r') ('H'/'h') ('S'/'s')
_RIGHT <- ('R'/'r') ('I'/'i') ('G'/'g') ('H'/'h') ('T'/'t')
_ROWS <- ('R'/'r') ('O'/'o') ('W'/'w') ('S'/'s')
_ROWSPAN <- ('R'/'r') ('O'/'o') ('W'/'w') ('S'/'s') ('P'/'p') ('A'/'a') ('N'/'n')
_RTL <- ('R'/'r') ('T'/'t') ('L'/'l')
_RULES <- ('R'/'r') ('U'/'u') ('L'/'l') ('E'/'e') ('S'/'s')
_SAMP <- ('S'/'s') ('A'/'a') ('M'/'m') ('P'/'p')
_SCOPE <- ('S'/'s') ('C'/'c') ('O'/'o') ('P'/'p') ('E'/'e')
_SCRIPT <- ('S'/'s') ('C'/'c') ('R'/'r') ('I'/'i') ('P'/'p') ('T'/'t')
_SELECT <- ('S'/'s') ('E'/'e') ('L'/'l') ('E'/'e') ('C'/'c') ('T'/'t')
_SELECTED <- ('S'/'s') ('E'/'e') ('L'/'l') ('E'/'e') ('C'/'c') ('T'/'t') ('E'/'e') ('D'/'d')
_SHAPE <- ('S'/'s') ('H'/'h') ('A'/'a') ('P'/'p') ('E'/'e')
_SIZE <- ('S'/'s') ('I'/'i') ('Z'/'z') ('E'/'e')
_SMALL <- ('S'/'s') ('M'/'m') ('A'/'a') ('L'/'l') ('L'/'l')
_SPAN <- ('S'/'s') ('P'/'p') ('A'/'a') ('N'/'n')
_SRC <- ('S'/'s') ('R'/'r') ('C'/'c')
_STANDBY <- ('S'/'s') ('T'/'t') ('A'/'a') ('N'/'n') ('D'/'d') ('B'/'b') ('Y'/'y')
_START <- ('S'/'s') ('T'/'t') ('A'/'a') ('R'/'r') ('T'/'t')
_STRONG <- ('S'/'s') ('T'/'t') ('R'/'r') ('O'/'o') ('N'/'n') ('G'/'g')
_STYLE <- ('S'/'s') ('T'/'t') ('Y'/'y') ('L'/'l') ('E'/'e')
_SUB <- ('S'/'s') ('U'/'u') ('B'/'b')
_SUBMIT <- ('S'/'s') ('U'/'u') ('B'/'b') ('M'/'m') ('I'/'i') ('T'/'t')
_SUMMARY <- ('S'/'s') ('U'/'u') ('M'/'m') ('M'/'m') ('A'/'a') ('R'/'r') ('Y'/'y')
_SUP <- ('S'/'s') ('U'/'u') ('P'/'p')
_TABINDEX <- ('T'/'t') ('A'/'a') ('B'/'b') ('I'/'i') ('N'/'n') ('D'/'d') ('E'/'e') ('X'/'x')
_TABLE <- ('T'/'t') ('A'/'a') ('B'/'b') ('L'/'l') ('E'/'e')
_TBODY <- ('T'/'t') ('B'/'b') ('O'/'o') ('D'/'d') ('Y'/'y')
_TD <- ('T'/'t') ('D'/'d')
_TEXTAREA <- ('T'/'t') ('E'/'e') ('X'/'x') ('T'/'t') ('A'/'a') ('R'/'r') ('E'/'e') ('A'/'a')
_TFOOT <- ('T'/'t') ('F'/'f') ('O'/'o') ('O'/'o') ('T'/'t')
_TH <- ('T'/'t') ('H'/'h')
_THEAD <- ('T'/'t') ('H'/'h') ('E'/'e') ('A'/'a') ('D'/'d')
_TITLE <- ('T'/'t') ('I'/'i') ('T'/'t') ('L'/'l') ('E'/'e')
_TOP <- ('T'/'t') ('O'/'o') ('P'/'p')
_TR <- ('T'/'t') ('R'/'r')
_TRUE <- ('T'/'t') ('R'/'r') ('U'/'u') ('E'/'e')
_TT <- ('T'/'t') ('T'/'t')
_TYPE <- ('T'/'t') ('Y'/'y') ('P'/'p') ('E'/'e')
_TYPE2 <- ('T'/'t') ('Y'/'y') ('P'/'p') ('E'/'e') '2'
_U <- ('U'/'u')
_UL <- ('U'/'u') ('L'/'l')
_USEMAP <- ('U'/'u') ('S'/'s') ('E'/'e') ('M'/'m') ('A'/'a') ('P'/'p')
_VALIGN <- ('V'/'v') ('A'/'a') ('L'/'l') ('I'/'i') ('G'/'g') ('N'/'n')
_VALUE <- ('V'/'v') ('A'/'a') ('L'/'l') ('U'/'u') ('E'/'e')
_VALUETYPE <- ('V'/'v') ('A'/'a') ('L'/'l') ('U'/'u') ('E'/'e') ('T'/'t') ('Y'/'y') ('P'/'p') ('E'/'e')
_VAR <- ('V'/'v') ('A'/'a') ('R'/'r')
_VOID <- ('V'/'v') ('O'/'o') ('I'/'i') ('D'/'d')
_VSIDES <- ('V'/'v') ('S'/'s') ('I'/'i') ('D'/'d') ('E'/'e') ('S'/'s')
_WIDTH <- ('W'/'w') ('I'/'i') ('D'/'d') ('T'/'t') ('H'/'h')
# ***********************************
# Misc definitions
# ***********************************
Cinline <- "<!--" ___comment_start ___comment_data* ___comment_stop
Cblock <- "<!--" ___comment_start ___comment_data* ___comment_stop S*
# ^^^ add S* here at some point
___comment_start <- {
lua_createtable(yy->L,0,0);
luaL_buffinit(yy->L,&yy->buf);
}
___comment_data <- < ! "-->" . > { luaL_addchar(&yy->buf,*yytext); }
___comment_stop <- "-->"
{
luaL_pushresult(&yy->buf);
lua_setfield(yy->L,-2,"comment");
lua_pushinteger(yy->L,luaL_len(yy->L,-2) + 1);
lua_insert(yy->L,-2);
lua_settable(yy->L,-3);
}
PCDATA <- {
luaL_buffinit(yy->L,&yy->buf);
}
(! "<" CHAR)+
{
luaL_pushresult(&yy->buf);
lua_pushinteger(yy->L,luaL_len(yy->L,-2) + 1);
lua_insert(yy->L,-2);
lua_settable(yy->L,-3);
}
scriptDATA <- {
luaL_buffinit(yy->L,&yy->buf);
}
(!("</" _SCRIPT ">") CHAR)*
{
luaL_pushresult(&yy->buf);
lua_pushinteger(yy->L,luaL_len(yy->L,-2) + 1);
lua_insert(yy->L,-2);
lua_settable(yy->L,-3);
}
CHAR <- "&#x" < HEXDIG+ > ";" { deentifyn(yy,yytext,16); }
/ "&#X" < HEXDIG+ > ";" { deentifyn(yy,yytext,16); }
/ "&#" < DIGIT+ > ";" { deentifyn(yy,yytext,10); }
/ "&" < [A-Za-z0-9]+ > ";" { deentify(yy,yytext); }
/ < S+ > {
if (yy->pre)
luaL_addlstring(&yy->buf,yytext,yyleng);
else
luaL_addchar(&yy->buf,' ');
} # handle PRE
/ < . > { luaL_addchar(&yy->buf,*yytext); }
DIGIT <- [0-9]
HEXDIG <- [0-9A-Fa-f]
nil <- { lua_pushliteral(yy->L,""); }
S <- " " / "\t" / "\r" / "\n"