Annotation of Amaya/amaya/HTML.S, revision 1.122

1.116     cvs         1:                { I. Vatton      November 1994-2001  }
1.68      cvs         2: 
1.1       cvs         3: STRUCTURE HTML;
                      4: 
                      5: DEFPRES HTMLP;
1.44      cvs         6: 
1.1       cvs         7: ATTR
1.59      cvs         8:                        { coreattrs }
1.63      cvs         9:    ID = Text;                  { id }
                     10:    Class = Text;               { class }
                     11:    PseudoClass = Text;
                     12:    Style\240 = Text;           { style }
                     13:    Title = Text;               { title }
1.59      cvs        14:                        { i18n }
                     15:    dir = ltr, rtl;             { dir }
                     16:                        { events }
1.63      cvs        17:    onclick = Text;             { onclick }
                     18:    ondblclick = Text;          { ondblclick }
                     19:    onmousedown = Text;         { onmousedown }
                     20:    onmouseup = Text;           { onmouseup }
                     21:    onmouseover = Text;         { onmouseover }
                     22:    onmousemove = Text;         { onmousemove }
                     23:    onmouseout = Text;          { onmouseout }
                     24:    onkeypress = Text;          { onkeypress }
                     25:    onkeydown = Text;           { onkeydown }
                     26:    onkeyup = Text;             { onkeyup }
1.59      cvs        27: 
1.63      cvs        28:    Invalid_attribute = Text;
                     29:    Ghost_restruct = Text;
1.114     cvs        30:    Highlight = Yes_;    { to show the HTML element corresponding to the
                     31:                          current selection in the source view }
1.100     cvs        32:    IntEntity = Yes_;   { do not translate & into & in output file }
                     33:    EntityName = Text;   { the content of the element is the name of an entity }
1.110     cvs        34:    xml_space = xml_space_default, xml_space_preserve; { xml:space }
1.1       cvs        35: 
                     36: CONST
1.59      cvs        37: 
1.1       cvs        38:    C_Empty = ' ';
                     39:    C_Foot = ' ';
                     40:    C_Head = ' ';
1.64      cvs        41:    C_BR   = '\12';
1.1       cvs        42: 
                     43: STRUCT
1.59      cvs        44: 
1.63      cvs        45:   HTML                                                         { HTML }
1.65      cvs        46:      (ATTR SectionNumbering = Yes_; ShowAreas = Yes_;
1.109     cvs        47:           PrintURL = Yes_; HtmlDTD = Text;
1.101     cvs        48:           Namespaces = Text; RealLang = Yes_; Charset = Text) =
1.17      cvs        49:        BEGIN
1.1       cvs        50:        HEAD;
1.109     cvs        51:       ? BODY;  { only one of BODY, document type }
1.72      cvs        52:       ? FRAMESET;
1.113     cvs        53:        END + (Invalid_element, Comment\240, XMLPI);
1.1       cvs        54: 
1.59      cvs        55:   BODY                                                         { BODY }
1.63      cvs        56:      (ATTR onload = Text; onunload = Text;
                     57:         { onload         onunload }
                     58:           background_ = Text; BackgroundColor = Text;
                     59:         { background          bgcolor }
                     60:           TextColor = Text; LinkColor = Text;
                     61:          { text              link }
                     62:           VisitedLinkColor = Text; ActiveLinkColor = Text) =
                     63:          { vlink                    alink }
                     64:        LIST OF (Element) + (INS, DEL);
1.1       cvs        65: 
1.11      cvs        66:   Invalid_element (ATTR Error_type = UnknownTag, BadPosition) = TEXT;
1.113     cvs        67: 
1.1       cvs        68:   Comment\240 = LIST OF (Comment_line = TEXT);
                     69: 
1.113     cvs        70:   XMLPI = LIST OF (PI_line = TEXT);
                     71:        
1.77      cvs        72:   Head_misc =
                     73:        CASE OF
                     74:        STYLE_;
                     75:        SCRIPT;
                     76:        META;
                     77:        LINK;
                     78:        END;
1.63      cvs        79:   HEAD                                                         { HEAD }
                     80:      (ATTR profile = Text) =
                     81:        AGGREGATE
1.77      cvs        82:        Document_URL = TEXT - (Head_misc);
1.81      cvs        83:        TITLE = TEXT - (Head_misc);                             { TITLE }
1.63      cvs        84:       ? ISINDEX (ATTR Prompt = Text) = CONSTANT C_Empty;       { ISINDEX }
                     85:                    { prompt }
                     86:       ? BASE;                                                  { BASE }
1.77      cvs        87:        END + (Object, Head_misc);
1.63      cvs        88: 
1.64      cvs        89:   STYLE_                                                       { STYLE }
                     90:      (ATTR Notation = Text; media = Text) =
                     91:         { type             media }
                     92:         TEXT;
                     93: 
1.63      cvs        94:   SCRIPT                                                       { SCRIPT }
                     95:      (ATTR charset = Text; !content_type = Text;
                     96:         { charset          type }
                     97:           script_language = Text; script_src = Text;
                     98:         { language                src }
                     99:           defer = Yes_; event = Text; for_ = Text) =
                    100:         { defer         event         for }
                    101:        TEXT;
1.59      cvs       102: 
                    103:   META                                                         { META }
1.63      cvs       104:      (ATTR http_equiv = Text;
                    105:         { http-equiv }
1.96      cvs       106:           meta_name = Text; meta_content = Text;
                    107:          { name              content }
1.63      cvs       108:           scheme = Text) =
                    109:         { scheme }
                    110:        CONSTANT C_Empty;
1.1       cvs       111: 
1.63      cvs       112:   LINK                                                         { LINK }
                    113:      (ATTR charset; HREF_ = Text; hreflang = Text;
                    114:         { charset  href          hreflang }
                    115:           Link_type = Text; REL = Text; REV = Text;
                    116:         { type              rel         rev }
                    117:           media; target_ = Text) =
                    118:         { media  target }
                    119:        CONSTANT C_Empty;
                    120: 
                    121:   BASE                                                         { BASE }
                    122:      (ATTR !HREF_; target_) =
                    123:          { href   target }
                    124:        CONSTANT C_Empty;
1.1       cvs       125: 
1.59      cvs       126:   Element = CASE OF                                            { block }
                    127:        Paragraph;                                              { P }
1.20      cvs       128:        Pseudo_paragraph;
1.59      cvs       129:        Heading;                                                { heading }
                    130:        List_;                                                  { list + DL }
                    131:        Preformatted;                                           { PRE preformatted }
                    132:        Division;                                               { DIV }
                    133:        Center;                                                 { CENTER }
1.62      cvs       134:        NOSCRIPT = LIST OF (Element);                           { NOSCRIPT }
1.63      cvs       135:        Block_Quote;                                            { BLOCKQUOTE }
1.59      cvs       136:        Form;                                                   { FORM }
                    137:        ISINDEX;                                                { ISINDEX }
1.63      cvs       138:        Horizontal_Rule;                                        { HR }
1.59      cvs       139:        Table;                                                  { TABLE }
                    140:        Address = LIST OF (AddressContent);                     { ADDRESS }
                    141:        PICTURE                                                 { IMG }
1.63      cvs       142:            (ATTR SRC = Text; ALT = Text; longdesc = Text;
                    143:                { src         alt         longdesc }
                    144:                  Height_ = Integer; Width__ = Text;
1.59      cvs       145:                { height             width }
1.63      cvs       146:                  IntWidthPercent = Integer; IntWidthPxl = Integer;
1.94      cvs       147:                  USEMAP = Text; ISMAP = Yes_;
1.63      cvs       148:                { usemap         ismap }
1.94      cvs       149:                 IsInput = Yes_;    NAME = Text;
                    150:                { input type=IMAGE  name }
1.63      cvs       151:                  Alignment = Top_, Middle_, Bottom_, Left_, Right_;
                    152:                { align       top   middle   bottom   left   right }
                    153:                  Img_border = Integer;
                    154:                { border }
                    155:                  hspace = Integer; vspace = Integer);
                    156:                { hspace            vspace }
1.59      cvs       157:        Object;                                                 { OBJECT }
1.60      cvs       158:        Applet;                                                 { APPLET }
1.108     cvs       159:        MathML;                                                 { MATH }
                    160:         GraphML;                                               { SVG }
1.59      cvs       161:        MAP;                                                    { MAP }
1.111     kahan     162:        XLink;                                                  { Annotations }
1.1       cvs       163:        END;
                    164: 
1.52      cvs       165:        HTMLfragment = LIST OF (Element);
                    166: 
1.63      cvs       167:   Block_Quote                                                  { BLOCKQUOTE }
                    168:      (ATTR cite = Text;
                    169:         { cite }
                    170:           InternalLink = Reference(Any); ExternalLink = Yes_) =
                    171:        LIST OF (Element);
                    172: 
                    173:   Horizontal_Rule                                              { HR }
                    174:      (ATTR Align = left_, center_, right_;
                    175:         { align   left   center   right }
                    176:           NoShade = NoShade_; Size_ = Integer; Width__;
                    177:         { noshade             size             width }
                    178:           IntWidthPercent; IntWidthPxl) =
                    179:        CONSTANT C_Empty;
                    180: 
1.67      cvs       181:   Basic_Set = LIST OF (Basic_Elem);
                    182: 
1.1       cvs       183:   AddressContent = CASE OF
                    184:        Basic_Elem;
1.59      cvs       185:        Paragraph;              { P }
1.20      cvs       186:        Pseudo_paragraph;
1.1       cvs       187:        END;
                    188: 
1.59      cvs       189:   Paragraph                                                    { P }
1.63      cvs       190:      (ATTR TextAlign = left_, center_, right_, justify_) =
                    191:         { align       left   center   right   justify }
                    192:        Basic_Set;
                    193: 
1.59      cvs       194:   Pseudo_paragraph = Basic_Set;
                    195: 
                    196:   Heading = CASE OF                                            { heading }
                    197:        H1 (ATTR TextAlign) = Basic_Set;                        { H1 }
                    198:               { align }
                    199:        H2 (ATTR TextAlign) = Basic_Set;                        { H2 }
                    200:        H3 (ATTR TextAlign) = Basic_Set;                        { H3 }
                    201:        H4 (ATTR TextAlign) = Basic_Set;                        { H4 }
                    202:        H5 (ATTR TextAlign) = Basic_Set;                        { H5 }
                    203:        H6 (ATTR TextAlign) = Basic_Set;                        { H6 }
1.1       cvs       204:        END;
                    205: 
1.63      cvs       206:   Preformatted                                                 { PRE }
                    207:      (ATTR Width__; IntWidthPercent; IntWidthPxl) =
                    208:         { width }
                    209:        Basic_Set
1.59      cvs       210:             - (PICTURE, Object, Applet,
                    211:                Big_text, Small_text, Subscript, Superscript,
                    212:                Font_, BaseFont);
                    213: 
1.63      cvs       214:   Anchor                                                       { A }
1.94      cvs       215:      (ATTR charset; Link_type; NAME;
1.63      cvs       216:         { charset  type       name }
                    217:           HREF_; hreflang; target_;
                    218:         { href   hreflang  target}
                    219:           REL; REV; accesskey = Text;
                    220:         { rel  rev  accesskey }
                    221:           shape = rectangle, circle, polygon, default_;
                    222:         { shape   rect       cirecle poly     default }
                    223:           coords = Text; tabindex = Integer;
                    224:         { coords         tabindex }
                    225:           onfocus = Text; onblur = Text;
1.76      cvs       226:         { onfocus         onblur }
1.89      cvs       227:           InternalLink; ExternalLink;
1.112     kahan     228:         { InternalLink  ExternalLink }) =
1.63      cvs       229:        Basic_Set;
1.1       cvs       230: 
1.63      cvs       231:   Basic_Elem = CASE OF                                         { special }
1.1       cvs       232:         TEXT;
1.63      cvs       233:        Font;                                                   { fontstyle }
                    234:        Phrase;                                                 { phrase }
1.61      cvs       235:        Anchor;                                                 { A }
                    236:        PICTURE;                                                { IMG }
                    237:        Applet;                                                 { APPLET }
                    238:        Font_;                                                  { FONT }
                    239:        BaseFont;                                               { BASEFONT }
1.63      cvs       240:        BR;                                                     { BR }
1.61      cvs       241:        SCRIPT;                                                 { SCRIPT }
                    242:        MAP;                                                    { MAP }
1.63      cvs       243:        Quotation;                                              { Q }
1.61      cvs       244:        Subscript = Basic_Set;                                  { SUB }
                    245:        Superscript = Basic_Set;                                { SUP }
                    246:        Span = Basic_Set;                                       { SPAN }
                    247:        BDO = Basic_Set;                                        { BDO }
1.77      cvs       248:        Object;                                                 { OBJECT }
1.61      cvs       249:        IFRAME;                                                 { IFRAME }
1.121     cvs       250:        ruby;                                                   { ruby }
1.108     cvs       251:        MathML;                                                 { MATH }
1.111     kahan     252:        XLink;                                                  { Annotations }
1.59      cvs       253:        END;
                    254: 
1.60      cvs       255:   BaseFont                                                     { BASEFONT }
1.63      cvs       256:      (ATTR BaseFontSize = Integer; BaseFontColor = Text;
                    257:         { size                    color }
                    258:           BaseFontFace = Text) =
                    259:          { face }
                    260:        CONSTANT C_Empty;
                    261: 
                    262:   BR                                                           { BR }
1.97      cvs       263:      (ATTR Clear = Left_, Right_, All_, None_) =
1.63      cvs       264:         { clear   left   right   all   none }
                    265:        CONSTANT C_BR;
                    266: 
                    267:   Quotation                                                    { Q }
                    268:      (ATTR cite; InternalLink; ExternalLink) =
                    269:         { cite }
                    270:        Basic_Set;
1.59      cvs       271: 
1.60      cvs       272:   Font = CASE OF               { fontstyle }
                    273:        Teletype_text = Basic_Set;      { TT }
1.59      cvs       274:        Italic_text = Basic_Set;        { I }
                    275:        Bold_text = Basic_Set;          { B }
                    276:        Underlined_text = Basic_Set;    { U }
1.60      cvs       277:        Struck_text = Basic_Set;        { S or STRIKE }
1.59      cvs       278:        Big_text = Basic_Set;           { BIG }
                    279:        Small_text = Basic_Set;         { SMALL }
                    280:        END;
                    281: 
1.60      cvs       282:   Phrase = CASE OF             { phrase }
1.59      cvs       283:        Emphasis = Basic_Set;           { EM }
                    284:        Strong = Basic_Set;             { STRONG }
                    285:        Def = Basic_Set;                { DFN }
                    286:        Code = Basic_Set;               { CODE }
                    287:        Sample = Basic_Set;             { SAMP }
                    288:        Keyboard = Basic_Set;           { KBD }
                    289:        Variable = Basic_Set;           { VAR }
                    290:        Cite = Basic_Set;               { CITE }
1.60      cvs       291:        ABBR = Basic_Set;               { ABBR }
                    292:         ACRONYM = Basic_Set;           { ACRONYM }
1.59      cvs       293:        END;
                    294: 
1.63      cvs       295:   Font_                                                                { FONT }
                    296:      (ATTR Font_size = Text; color = Text; face = Text;
                    297:         { size              color            face }
                    298:           IntSizeIncr = Integer; IntSizeDecr = Integer;
                    299:           IntSizeRel = Integer) =
                    300:        Basic_Set;
                    301: 
                    302:   Applet                                                       { APPLET }
                    303:      (ATTR codebase = Text; archive = Text; code = Text;
                    304:         { codebase         archive         code }
                    305:           object = Text; alt = Text; applet_name = Text;
                    306:         { object         alt         name }
                    307:           Width__; Height_; IntWidthPercent; IntWidthPxl;
                    308:         { width    height }
                    309:           Alignment; hspace; vspace) =
                    310:         { align      hspace  vspace }
1.1       cvs       311:        LIST OF (Applet_Content = CASE OF
1.59      cvs       312:                                  Parameter;                    { PARAM }
1.1       cvs       313:                                  Basic_Set;
                    314:                                  END);
1.63      cvs       315:   Parameter                                                    { PARAM }
                    316:      (ATTR Param_name = Text; Param_value = Text;
                    317:         { name               value }
                    318:           valuetype = data_, ref, object_;
                    319:         { valuetype   data   ref  object }
                    320:           Param_type = Text) =
                    321:         { type }
1.59      cvs       322:        CONSTANT C_Empty;
                    323: 
                    324:   Object                                                       { OBJECT }
1.63      cvs       325:      (ATTR declare = Yes_; classid = Text; codebase;
                    326:         { declare         classid         codebase }
                    327:           data = Text; Object_type = Text;
                    328:         { data         type }
                    329:           codetype = Text; archive; standby = Text;
                    330:          { codetype         archive  standby }
                    331:           !Height_; !Width__; IntWidthPercent; IntWidthPxl; 
                    332:         {  height    width }
                    333:           USEMAP; NAME; tabindex; Alignment; Img_border;
                    334:         { usemap  name  tabindex  align      border }
                    335:           hspace; vspace) =
                    336:          { hspace  vspace }
1.10      cvs       337:        BEGIN
1.13      cvs       338:        PICTURE;
1.10      cvs       339:        Object_Content = LIST OF (CASE OF Element; Parameter; END);
1.59      cvs       340:                                                 { PARAM }
1.63      cvs       341:        END with Height_ ?= 400, Width__ ?= '400',
                    342:                 IntWidthPxl ?= 400;
1.61      cvs       343: 
1.63      cvs       344:   INS                                                          { INS }
1.72      cvs       345:      (ATTR cite; datetime = Text; InternalLink; ExternalLink) =
1.63      cvs       346:         { cite  datetime }
                    347:        Basic_Set;
                    348: 
                    349:   DEL                                                          { DEL }
1.72      cvs       350:      (ATTR cite; datetime; InternalLink; ExternalLink) =
1.63      cvs       351:         { cite  datetime }
                    352:        Basic_Set;
1.1       cvs       353: 
1.59      cvs       354:   Block = CASE OF                                              { block }
                    355:        Paragraph;                                              { P }
1.20      cvs       356:        Pseudo_paragraph;
1.59      cvs       357:        Heading;                                                { heading }
                    358:        List_;                                                  { list + DL }
                    359:        Block_Quote;                                            { BLOCKQUOTE }
                    360:        Preformatted;                                           { PRE }
                    361:        Division;                                               { DIV }
1.63      cvs       362:        Center;                                                 { CENTER }
1.1       cvs       363:        Form;
1.73      cvs       364:        Horizontal_Rule;                                        { HR }
                    365:        Table;                                                  { TABLE }
                    366:        Address;                                                { ADDRESS }
1.1       cvs       367:        END;
                    368: 
1.63      cvs       369:   Division                                                     { DIV }
                    370:      (ATTR TextAlign) =
                    371:         { align }
                    372:        LIST OF (Element);
                    373: 
                    374:   Center =                                                     { CENTER }
                    375:        LIST OF (Element);
1.1       cvs       376: 
1.59      cvs       377:   List_ = CASE OF                                              { list }
1.63      cvs       378:        Unnumbered_List;                                        { UL }
                    379:        Numbered_List;                                          { OL }
                    380:        Directory;                                              { DIR }
                    381:        Menu;                                                   { MENU }
                    382:        Definition_List;                                        { DL }
                    383:        END;
                    384: 
                    385:   Unnumbered_List                                              { UL }
                    386:      (ATTR BulletStyle = disc, circle, square;
                    387:         { type          disc  circle  square }
                    388:           COMPACT = Yes_) =
                    389:         { compact }
                    390:        LIST OF (List_Item);
                    391: 
                    392:   Numbered_List                                                        { OL }
                    393:      (ATTR NumberStyle = Arabic_, LowerAlpha, UpperAlpha,
                    394:         { type          1        a           A }
                    395:           LowerRoman, UpperRoman;
                    396:         { i           I }
                    397:           Start = Integer; COMPACT) =
                    398:         { start            compact }
                    399:        LIST OF (List_Item) with Start ?= 1;
                    400: 
                    401:   Directory                                                    { DIR }
                    402:      (ATTR COMPACT) =
                    403:         { compact }
                    404:        LIST OF (List_Item);
                    405: 
                    406:   Menu                                                         { MENU }
                    407:      (ATTR COMPACT) =
                    408:         { compact }
                    409:        LIST OF (List_Item);
                    410: 
                    411:   Definition_List                                              { DL }
                    412:      (ATTR COMPACT) =
                    413:         { compact }
                    414:        LIST OF (Definition_Item);
                    415: 
                    416:   List_Item                                                    { LI }
                    417:      (ATTR ItemStyle = disc, circle, square, Arabic_,
                    418:         { type        disc  circle  square  1 }
                    419:           LowerAlpha, UpperAlpha, LowerRoman, UpperRoman;
                    420:         { a           A           i           I }
                    421:           IntItemStyle = disc, circle, square, Arabic_,
                    422:           LowerAlpha, UpperAlpha, LowerRoman, UpperRoman;
                    423:           ItemValue = Integer) =
                    424:         { value }
1.1       cvs       425:        LIST OF (Block);
                    426: 
1.59      cvs       427:   Definition_Item = BEGIN
                    428:        Term_List = LIST OF (Term = Basic_Set);                 { DT }
1.63      cvs       429:       ? Definition = LIST OF (Block);                          { DD }
1.1       cvs       430:        END;
                    431: 
1.63      cvs       432:   Form                                                         { FORM }
                    433:      (ATTR !Script_URL = Text; METHOD = Get_, Post_;
                    434:         {  action             method }
                    435:           ENCTYPE = Text; onsubmit = Text; onreset = Text;
                    436:         { enctype         onsubmit         onreset }
                    437:           target_; accept_charset = Text) =
                    438:         { target   accept-charset }
1.1       cvs       439:        LIST OF (Form_Element) + (Input) with METHOD ?= Get_;
                    440: 
                    441:   Form_Element = CASE OF
1.59      cvs       442:        Paragraph;                                              { P }
1.20      cvs       443:        Pseudo_paragraph;
1.80      cvs       444:        FIELDSET;                                               { FIELDSET }
1.59      cvs       445:        Option_Menu;                                            { SELECT }
1.63      cvs       446:        Text_Area;                                              { TEXTAREA }
1.59      cvs       447:        Heading;                                                { heading }
                    448:        List_;                                                  { list + DL }
                    449:        Horizontal_Rule;                                        { HR }
                    450:        Block_Quote;                                            { BLOCKQUOTE }
                    451:        Preformatted;                                           { PRE }
                    452:        Division;                                               { DIV }
                    453:        Table;                                                  { TABLE }
                    454:        Center;                                                 { CENTER }
                    455:        ISINDEX;                                                { ISINDEX }
1.1       cvs       456:        END;
                    457: 
1.63      cvs       458:   Option_Menu                                                  { SELECT }
                    459:      (ATTR !NAME; MenuSize = Integer; Multiple = Yes_;
                    460:         {  name  size                multiple }
                    461:            disabled = Yes_; tabindex; onfocus; onblur;
                    462:          { disabled         tabindex  onfocus  onblur}
                    463:            onchange = Text) =
                    464:          { onchange }
1.91      cvs       465:        LIST OF (Option_item = CASE OF Option; OptGroup; END) - (Input);
1.63      cvs       466: 
                    467:   Option                                                       { OPTION }
                    468:      (ATTR Selected = Yes_; DefaultSelected = Yes_;
                    469:         { selected }
                    470:           disabled; label = Text; !Value_ = Text) =
                    471:          { disabled  label          value }
1.1       cvs       472:        TEXT;
1.76      cvs       473: 
                    474:   OptGroup                                                     { OPTGROUP }
1.78      cvs       475:      (ATTR disabled; !label) =
                    476:         { disabled   label }
1.76      cvs       477:        LIST OF (Option);
1.1       cvs       478: 
1.63      cvs       479:   Text_Area                                                    { TEXTAREA }
                    480:      (ATTR !NAME; Rows = Integer; Columns = Integer;
                    481:         {  name  rows            cols }
                    482:           disabled; readonly = Yes_; tabindex; accesskey;
                    483:         { disabled  readonly         tabindex  accesskey  }
                    484:           onfocus; onblur; onselect = Text; onchange;
                    485:         { onfocus  onblur  onselect         onchange }
                    486:           Default_Value = Text) =
1.68      cvs       487:        Text_With_Frame - (Input) with Rows ?= 4, Columns ?= 20;
1.63      cvs       488: 
1.79      cvs       489:   FIELDSET =                                                   { FIELDSET }
                    490:        BEGIN
                    491:        LEGEND;
                    492:        Basic_Set;
                    493:        END;
                    494: 
                    495:   LEGEND                                                       { LEGEND }
                    496:      (ATTR accesskey; LAlign = Top_, Bottom_, Left_, Right_) =
                    497:         { accesskey  align    top   bottom   left   right }
                    498:        Basic_Set;
                    499: 
1.62      cvs       500:   Input = CASE OF                                      { formctrl }
1.63      cvs       501:        Text_Input                                      { INPUT / TEXT }
                    502:           (ATTR !NAME; Value_; disabled; readonly;
                    503:                { name  value   disabled  readonly }
                    504:                  Area_Size = Integer; MaxLength = Integer;
                    505:                { size                 maxlength }
                    506:                  tabindex; accesskey;
                    507:                { tabindex  accesskey }
1.66      cvs       508:                  onfocus; onblur; onselect; onchange;
1.63      cvs       509:                { onfocus  onblur  onselect  onchange }
1.66      cvs       510:                  Default_Value) =
1.68      cvs       511:                Text_With_Frame - (Input) with Area_Size ?= 20;
1.63      cvs       512:        Password_Input                                  { INPUT / PASSWORD }
1.66      cvs       513:           (ATTR !NAME; Value_; disabled; readonly;
                    514:                { name  value   disabled  readonly }
1.63      cvs       515:                  Area_Size; MaxLength;
                    516:                { size       maxlength }
1.66      cvs       517:                  tabindex; accesskey;
                    518:                { tabindex  accesskey }
                    519:                  onfocus; onblur; onselect; onchange;
                    520:                { onfocus  onblur  onselect  onchange }
                    521:                  Default_Value) =
1.68      cvs       522:                Text_With_Frame  - (Input) with Area_Size ?= 20;
                    523:        File_Input                                      { INPUT / FILE }
                    524:           (ATTR !NAME; Value_; disabled; readonly;
                    525:                { name  value   disabled  readonly }
                    526:                  Area_Size; MaxLength;
                    527:                { size       maxlength }
                    528:                  tabindex; accesskey;
                    529:                { tabindex  accesskey }
                    530:                  onfocus; onblur; accept = Text;
                    531:                { onfocus  onblur }
                    532:                  Default_Value) =
                    533:                Text_With_Frame - (Input) with Area_Size ?= 20;
1.59      cvs       534:        Checkbox_Input                                  { INPUT / CHECKBOX }
1.63      cvs       535:           (ATTR !NAME; Value_; Checked = Yes_, No_;
1.66      cvs       536:                { name  value   checked }
1.63      cvs       537:                  disabled; readonly;
                    538:                { disabled  readonly }
                    539:                  tabindex; accesskey; onfocus; onblur;
                    540:                { tabindex  accesskey  onfocus  onblur }
                    541:                  DefaultChecked = Yes_, No_) =
1.1       cvs       542:                CONSTANT C_Empty with Checked ?= No_;
1.59      cvs       543:        Radio_Input                                     { INPUT / RADIO }
1.63      cvs       544:           (ATTR !NAME; !Value_; Checked; disabled;
                    545:                { name  value    checked   disabled }
                    546:                  readonly; tabindex; accesskey;
                    547:                { readonly  tabindex  accesskey }
                    548:                  onfocus; onblur;
                    549:                { onfocus  onblur }
                    550:                  DefaultChecked) =
                    551:                CONSTANT C_Empty with Checked ?= No_,
                    552:                                      NAME ?= 'radio';
                    553:        Submit_Input                                    { INPUT / SUBMIT }
                    554:           (ATTR  NAME; Value_; disabled; readonly;
                    555:                { name  value   disabled; readonly }
                    556:                  tabindex; accesskey;
                    557:                { tabindex  accesskey }
                    558:                  onfocus; onblur) =
                    559:                { onfocus  onblur }
                    560:                BEGIN
1.99      cvs       561:                CONSTANT C_Empty;
1.63      cvs       562:                END with Value_ ?= 'Submit';
                    563:        Reset_Input                                     { INPUT / RESET }
                    564:           (ATTR  NAME; Value_; disabled; readonly;
                    565:                { name  value   disabled  readonly }
                    566:                  tabindex; accesskey;
                    567:                { tabindex  accesskey }
                    568:                  onfocus; onblur) =
                    569:                { onfocus  onblur }
                    570:                BEGIN
1.99      cvs       571:                CONSTANT C_Empty;
1.68      cvs       572:                END  - (Input) with NAME ?= 'Reset',
                    573:                                    Value_ ?= 'Reset';
                    574:         Button_Input                                   { INPUT / BUTTON }
1.66      cvs       575:           (ATTR !NAME; Value_; disabled; readonly;
                    576:                { name  value   disabled  readonly }
1.63      cvs       577:                  tabindex; accesskey;
                    578:                { tabindex  accesskey }
1.68      cvs       579:                  onfocus; onblur) =
1.63      cvs       580:                { onfocus  onblur }
1.68      cvs       581:                BEGIN
1.99      cvs       582:                CONSTANT C_Empty;
1.68      cvs       583:                END;
1.79      cvs       584: 
1.120     cvs       585:         BUTTON_                                                { BUTTON }
1.68      cvs       586:           (ATTR !NAME; Value_;
                    587:                { name  value }
                    588:                  Button_type = button, submit, reset;
                    589:                { type          button  submit  reset }
                    590:                  disabled; tabindex; accesskey;
                    591:                { disabled  tabindex  accesskey }
                    592:                  onfocus; onblur) =
                    593:                { onfocus  onblur }
1.79      cvs       594:                Basic_Set - (Anchor, Input, Form, FIELDSET, IFRAME);
1.68      cvs       595:         LABEL                                          { LABEL }
                    596:           (ATTR  Associated_control = TEXT;
                    597:                { for }
                    598:                  accesskey; onfocus; onblur) =
                    599:                { accesskey  onfocus  onblur }
1.71      cvs       600:                Basic_Set;
1.63      cvs       601:        Hidden_Input                                    { INPUT / HIDDEN }
1.68      cvs       602:           (ATTR !NAME; Value_; disabled;
                    603:                { name  value   disabled }
1.63      cvs       604:                  tabindex; accesskey;
                    605:                { tabindex  accesskey }
                    606:                  onfocus; onblur) =
                    607:                { onfocus  onblur }
                    608:                CONSTANT C_Empty;
1.59      cvs       609:        Option_Menu;                                    { SELECT }
                    610:        Text_Area;                                      { TEXTAREA }
1.8       cvs       611:        END;
1.1       cvs       612: 
                    613:   Text_With_Frame = BEGIN
                    614:        Inserted_Text = TEXT;
                    615:        Frame = CONSTANT C_Empty;
                    616:        END;
                    617: 
1.63      cvs       618:   Table_row                                                    { TR }
                    619:      (ATTR Cell_align = Cell_left, Cell_center, Cell_right,
                    620:         { align        left       center       right }
                    621:                        Cell_justify, Cell_char;
                    622:         {              justify       char }
                    623:           char = Text; charoff = Text;
                    624:         { char         charoff }
                    625:           Row_valign = Row_top, Row_middle, Row_bottom, Row_baseline;
                    626:         { valign       top      middle      bottom      baseline }
1.71      cvs       627:           BackgroundColor; height\240 = Integer) =
                    628:         { bgcolor          Special attribute to control row span }
1.63      cvs       629:        LIST OF (Table_cell);
                    630: 
                    631:   Table                                                                { TABLE }
                    632:      (ATTR summary = Text; Width__; Border = Integer;
                    633:         { summary         width    border }
                    634:           frame = void, above, below, hsides, lhs, rhs,
                    635:         { frame   void  above  below  hsides  lhs  rhs  }
                    636:                   vsides, box, border;
                    637:         {         vsides  box  border }
1.97      cvs       638:           rules_ = none_, groups, rows, cols, all;
                    639:         { rules    none   groups  rows  cols  all }
1.63      cvs       640:           cellspacing = Integer; cellpadding = Integer;
                    641:         { cellspacing            cellpadding }
                    642:           Align; BackgroundColor;
                    643:         { align  bgcolor }
                    644:           datapagesize = Text; IntWidthPxl; IntWidthPercent) =
                    645:         { datapagesize }
1.1       cvs       646:        BEGIN
1.84      cvs       647:        CAPTION;                                                { CAPTION }
1.115     cvs       648:       ? Cols = LIST OF (Col_elem = CASE OF
1.85      cvs       649:                                COL;                            { COL }
                    650:                                COLGROUP;                       { COLGROUP }
                    651:                                END);
1.1       cvs       652:        Table_head = LIST OF (Column_head);
1.63      cvs       653:       ? thead;                                                 { THEAD }
                    654:        Table_body = LIST OF (tbody);
                    655:       ? tfoot;                                                 { TFOOT }
1.1       cvs       656:        Table_foot = CONSTANT C_Foot;
1.49      cvs       657:        END;
1.63      cvs       658: 
                    659:   CAPTION                                                      { CAPTION }
                    660:      (ATTR Position = Position_top, Position_bottom,
                    661:         { align      top           bottom }
                    662:           Position_left, Position_right) =
                    663:         { left           right }
                    664:        Basic_Set;
                    665: 
1.44      cvs       666:   Column_head (ATTR IntWidthPercent; IntWidthPxl) =
                    667:        CONSTANT C_Head;
1.63      cvs       668: 
                    669:   thead                                                                { THEAD }
                    670:      (ATTR Cell_align; char; charoff; Row_valign) =
                    671:        LIST OF (Table_row);
                    672: 
                    673:   tbody                                                                 { TBODY }
                    674:      (ATTR Cell_align; char; charoff; Row_valign) =
                    675:        LIST OF (Table_row);
                    676: 
                    677:   tfoot                                                                { TFOOT }
                    678:      (ATTR Cell_align; char; charoff; Row_valign) =
                    679:        LIST OF (Table_row);
                    680: 
1.1       cvs       681:   Table_cell = CASE OF
1.63      cvs       682:        Data_cell;                                              { TD }
                    683:        Heading_cell;                                           { TH }
                    684:        END;
                    685: 
                    686:   Data_cell                                                    { TD }
                    687:      (ATTR Ref_column = REFERENCE(Column_head);
                    688:            ColExt = REFERENCE(Column_head);
                    689:            RowExt = REFERENCE(Table_row);
                    690:           abbr = Text; axis = Text; headers = Text; scope = Text;
                    691:         { abbr         axis         headers         scope }
                    692:            rowspan_ = INTEGER; colspan_ = INTEGER;
                    693:         { rowspan             colspan }
                    694:            Cell_align; char; charoff;
                    695:         { align       char  charoff }
                    696:            Cell_valign = Cell_top, Cell_middle, Cell_bottom, Cell_baseline;
                    697:         { valign        top       middle       bottom       baseline }
                    698:            No_wrap = no_wrap; BackgroundColor;
                    699:         { nowrap             bgcolor }
                    700:           Width__; Height_; IntWidthPxl; IntWidthPercent) =
                    701:         { width    height }
                    702:        LIST OF (Element);
                    703: 
                    704:   Heading_cell                                                 { TH }
                    705:      (ATTR Ref_column; ColExt; RowExt;
                    706:           abbr; axis; headers; scope;
                    707:         { abbr  axis  headers  scope }
                    708:           rowspan_; colspan_;
                    709:         { rowspan   colspan }
                    710:           Cell_align; char; charoff; Cell_valign;
                    711:         { align       char  charoff  valign }
                    712:           No_wrap; BackgroundColor;
                    713:         { nowrap   bgcolor }
                    714:           Width__; Height_; IntWidthPxl; IntWidthPercent) =
                    715:         { width    height }
                    716:        LIST OF (Element);
                    717: 
1.85      cvs       718:   COLGROUP                                                     { COLGROUP }
                    719:     (ATTR Cell_align; Cell_valign; Width__; span_ = Integer)
                    720:        { align       valign       width    span }
                    721:         = LIST OF (COL);
                    722: 
                    723:   COL                                                          { COL }
                    724:     (ATTR Cell_align; Cell_valign; Width__; span_)
                    725:        { align       valign       width    span }
                    726:         = CONSTANT C_Empty;
                    727: 
1.63      cvs       728:   MAP                                                          { MAP }
                    729:      (ATTR NAME; Ref_IMG = REFERENCE(Any)) =
                    730:         { name }
                    731:        LIST OF (AREA);
                    732: 
                    733:   AREA                                                         { AREA }
                    734:      (ATTR shape; coords; HREF_; target_; nohref = Yes_; ALT;
                    735:         { shape  coords  href   target   nohref         alt }
                    736:           tabindex; accesskey; onfocus; onblur;
                    737:         { tabindex  accesskey  onfocus  onblur }
                    738:           x_coord = Integer; y_coord = Integer; IntWidthPxl;
1.71      cvs       739:            height\240; AreaRef_IMG = REFERENCE(Any)) =
1.63      cvs       740:        GRAPHICS with x_coord ?= 0, y_coord ?= 0,
                    741:                      IntWidthPxl ?= 25, height\240 ?= 10;
1.1       cvs       742: 
1.72      cvs       743:   FRAMESET                                                     { FRAMESET }
                    744:      (ATTR RowHeight = Text; ColWidth = Text;
                    745:         { rows              cols }
                    746:           onload; onunload) =
                    747:         { onload  onunload }
1.59      cvs       748:        AGGREGATE
1.72      cvs       749:        Frames = LIST [1 .. *] OF (FrameElem = CASE OF
                    750:                                        FRAME;
                    751:                                        FRAMESET;
                    752:                                        END - (NOFRAMES));
                    753:       ? NOFRAMES = BODY + (INS, DEL);                          { NOFRAMES }
1.59      cvs       754:        END;
                    755: 
1.72      cvs       756:   FRAME                                                                { FRAME }
                    757:      (ATTR longdesc; FrameName = Text; FrameSrc = Text;
                    758:         { longdesc  name              src }
                    759:           frameborder = Border1, Border0;
                    760:         { frameborder   1        0 }
                    761:           marginwidth = Integer; marginheight = Integer;
                    762:         { marginwidth            marginheight }
1.98      cvs       763:           no_resize = Yes_; scrolling = Yes_, No_, auto_) =
1.72      cvs       764:         { noresize          scrolling   yes   no   auto }
1.63      cvs       765:        CONSTANT C_Empty;
1.59      cvs       766: 
1.63      cvs       767:   IFRAME                                                       { IFRAME }
1.72      cvs       768:      (ATTR longdesc; FrameName; FrameSrc; frameborder;
                    769:         { longdesc  name       src       frameborder }
                    770:           marginwidth; marginheight; scrolling;
                    771:         { marginwidth  marginheight  scrolling }
                    772:           Alignment; Width__; Height_) =
                    773:         { align      width    height }
1.63      cvs       774:        LIST OF (Element);
1.59      cvs       775: 
1.121     cvs       776:   ruby =                                                        { ruby }
                    777:         CASE OF
                    778:        simple_ruby;
                    779:        complex_ruby;
                    780:        END;
                    781: 
                    782:   simple_ruby =
                    783:        BEGIN
1.122   ! cvs       784:        rb = Basic_Set - (simple_ruby, complex_ruby);
1.121     cvs       785:        CASE OF
1.122   ! cvs       786:              rt (ATTR rbspan = Integer) = Basic_Set
        !           787:                                           - (simple_ruby, complex_ruby);
1.121     cvs       788:              BEGIN
                    789:                  rp = TEXT;
                    790:                  rt;
                    791:                  rp;
                    792:                  END;
                    793:              END;
                    794:        END;
                    795: 
                    796:   complex_ruby =
                    797:        BEGIN
                    798:        rbc = LIST OF (rb);
                    799:        rtc1 = LIST OF (rt);
                    800:       ? rtc2 = LIST OF (rt);
                    801:        END;    
                    802:        
1.72      cvs       803:   { AnyLink is an alias for all elements with an attribute
                    804:     of type URI.  Only elements to be shown in the Links view
                    805:     are taken into account }
                    806:   AnyLink = CASE OF
                    807:        Anchor;         { HREF_ }
                    808:        Block_Quote;    { cite }
                    809:        Quotation;      { cite }
                    810:        INS;            { cite }
                    811:        DEL;            { cite }
                    812:        END;
                    813: 
1.1       cvs       814: EXCEPT
1.25      cvs       815:        HTML:           NoMove, NoResize;
1.87      cvs       816:        BODY:           NoCut, CssBackground;
1.1       cvs       817:        HEAD:           NoCut;
                    818:        TITLE:          NoCut;
                    819:        Document_URL:   Hidden, NoSpellCheck;
1.68      cvs       820:        C_Empty:        Hidden;
1.118     cvs       821:        C_BR:           SelectParent;
1.77      cvs       822:        Head_misc:      Hidden;
1.72      cvs       823:        Frames:         Hidden;
1.68      cvs       824:        Frame:          Hidden, NoCut;
1.74      cvs       825:        FRAMESET:       NoCreate;       { prevent a Return at the end of the
                    826:                                          document from creating a FRAMESET }
1.68      cvs       827:        Inserted_Text:  Hidden, NoCut;
                    828:        Basic_Set:      Hidden;
                    829:        Term_List:      Hidden;
1.63      cvs       830:        Definition_Item:Hidden;
1.1       cvs       831:        Comment_line:   Hidden;
1.113     cvs       832:        PI_line:        Hidden;
1.1       cvs       833:        GRAPHICS:       NoMove, NoResize;
1.41      cvs       834:        TEXT:           NoMove, NoResize;
1.26      cvs       835:        PICTURE:        MoveResize;
1.63      cvs       836:        Invalid_element:NoCreate;
                    837:        Pseudo_paragraph: ParagraphBreak, Hidden;
1.117     kahan     838:        Basic_Elem:     Hidden;
1.1       cvs       839:        Paragraph:      ParagraphBreak;
                    840:        H1:             ParagraphBreak;
                    841:        H2:             ParagraphBreak;
                    842:        H3:             ParagraphBreak;
                    843:        H4:             ParagraphBreak;
                    844:        H5:             ParagraphBreak;
                    845:        H6:             ParagraphBreak;
                    846:        Address:        ParagraphBreak;
                    847:        Term:           ParagraphBreak;
                    848:        MAP:            IsDraw;
1.119     cvs       849:        AREA:           MoveResize, ClickableSurface;
1.70      cvs       850:        Password_Input: Shadow;
1.19      cvs       851:        Preformatted:   ReturnCreateNL;
1.64      cvs       852:        STYLE_:         ReturnCreateNL;
                    853:        SCRIPT:         ReturnCreateNL;
1.68      cvs       854:        Text_Area:      ReturnCreateNL;
                    855:        HTMLfragment:   NoMove, NoResize, Hidden;
1.1       cvs       856: 
1.29      cvs       857:        ExternalLink:   Invisible;
1.15      cvs       858:        InternalLink:   Invisible;
1.44      cvs       859:        IntWidthPercent:NewPercentWidth, Invisible;
                    860:        IntWidthPxl:    NewWidth, Invisible;
1.1       cvs       861:        IntItemStyle:   Invisible;
                    862:        IntSizeIncr:    Invisible;
                    863:        IntSizeDecr:    Invisible;
                    864:        IntSizeRel:     Invisible;
1.93      cvs       865:        IsInput:        Invisible;
1.1       cvs       866:        x_coord:        Invisible, NewHPos;
                    867:        y_coord:        Invisible, NewVPos;
                    868:        height\240:     Invisible, NewHeight;
                    869:        Ref_IMG:        Invisible;
                    870:        AreaRef_IMG:    Invisible;
                    871:        Invalid_attribute: Invisible;
1.90      cvs       872:        Highlight:      Invisible;
1.87      cvs       873:        PseudoClass:    Invisible, CssPseudoClass;
1.1       cvs       874:        Default_Value:  Invisible;
1.63      cvs       875:        DefaultSelected:Invisible;
1.1       cvs       876:        DefaultChecked: Invisible;
1.17      cvs       877:        SectionNumbering:Invisible;
1.22      cvs       878:        ShowAreas:      Invisible;
1.83      cvs       879:        PrintURL:       Invisible;
1.65      cvs       880:        Namespaces:     Invisible;
1.92      cvs       881:        RealLang:       Invisible;
1.101     cvs       882:        Charset:        Invisible;
1.72      cvs       883:        HtmlDTD:        Invisible;
1.50      cvs       884:        shape:          Invisible;
1.44      cvs       885:        Data_cell:      IsCell, NoMove, NoResize;
                    886:        Heading_cell:   IsCell, NoMove, NoResize;
                    887:        Table:          IsTable, PageBreak;
1.68      cvs       888:        Column_head:    IsColHead, NoCut, Hidden;
1.75      cvs       889:        Table_head:     NoCut, Hidden, NoSelect;
                    890:        C_Head:         Hidden, NoSelect;
                    891:        Table_foot:     NoCut, Hidden, NoSelect, PageBreakRepBefore;
                    892:        C_Foot:         Hidden, NoSelect;
1.85      cvs       893:        Cols:           Hidden, NoSelect;
1.38      cvs       894:        Table_body:     PageBreakAllowed, Hidden;
1.44      cvs       895:        Table_row:      IsRow, PageBreakPlace;
1.1       cvs       896:        ColExt:         Invisible;
1.2       cvs       897:        RowExt:         Invisible;
1.44      cvs       898:        Ref_column:     ColRef, Invisible;
                    899:        colspan_:       ColSpan;
                    900:        rowspan_:       RowSpan;
1.68      cvs       901:        Object_Content: Hidden, NoCreate, NoCut;
1.1       cvs       902:        Ghost_restruct: Invisible;
1.100     cvs       903:         IntEntity:     Invisible;
                    904:         EntityName:    Invisible;
1.82      cvs       905:        onclick:        EventAttr;
                    906:        ondblclick:     EventAttr;
                    907:        onmousedown:    EventAttr;
                    908:        onmouseup:      EventAttr;
                    909:        onmouseover:    EventAttr;
                    910:        onmousemove:    EventAttr;
                    911:        onmouseout:     EventAttr;
                    912:        onkeypress:     EventAttr;
                    913:        onkeydown:      EventAttr;
                    914:        onkeyup:        EventAttr;
1.87      cvs       915:        ID :            CssId;
                    916:        Class:          CssClass;
1.63      cvs       917: 
1.1       cvs       918: END

Webmaster