[>] start the work on the 1.19.1 version.

There are lot of modification which make incompatible with secondary module whom rely on 1.19 version. These modules must be compiled again with that new version.

[>] start the work on the 1.19.1 version.
There are lot of modification which make incompatible with secondary module whom rely on 1.19 version. These modules must be compiled again with that new version.
David RENÉ
1 parent 772fe631
Showing 10 changed files with 524 additions and 203 deletions Show diff stats
types/version.anubis
version.anubis
web/HTML5/to_String.anubis
web/controllers_web_site.anubis
web/jQuery/jq_animate.anubis
web/making_a_web_site.anubis
web/multihost_http_server.anubis
web/types/HTML5.anubis
web/types/making_a_web_site.anubis
web/types/web_action_name.anubis
@@ -20,10 +20,10 @@ public define Maybe(Version) to_Version(String version_string).
 public define Version
   version(
-    Word8 a,
-    Word8 b,
-    Word8 c,
-    Word8 d
+    Word8 a,    //major
+    Word8 b,    //minor
+    Word8 c,    //release
+    Word8 d     //user defined
   )=
   version( word32(word16(d, c), word16(b, a)))
+/*
+ * Created by PyramIDE.
+ * User: フランスのトトロ aka (David RENÉ) 
+ * Date: 26/04/2026
+ * Time: 23:08
+ * © David RENÉ
+ */
+
+
+public define String __xlib_version__ = "1.19.1.0".
+/*
+ * Created by PyramIDE.
+ * User: フランスのトトロ aka (David RENÉ) 
+ * Date: 26/04/2026
+ * Time: 16:49
+ * © David RENÉ
+ */
+
+read ../types/HTML5.anubis
+
+
+
@@ -15,6 +15,7 @@
 read system/logger.anubis
 read tools/printable_tree.anubis
+read xlib/version.anubis
 transmit xlib/web/cookies.anubis
 transmit xlib/web/web_session.anubis
@@ -146,12 +147,12 @@ define HTTP_Answer
     ( 
       // list of body options
       [
-        background_color(rgb(255,200,200))
+        //background_color(rgb(255,200,200))
       ],
       // content of page
       sequence([
-        pre("Anubis Web Server - eXtended Lib v1.19.0.0 - Anubis language v1.19"),
+        pre("Anubis Web Server - eXtended Lib "+__xlib_version__+" - Anubis language v1.19"),
         pre("Error "+to_String(http_status)),
         pre("Internal message :"+message),
         br,
@@ -213,7 +213,7 @@ define JQueryFormattedAnimation
     ) =
         with css_props_as_json_members = animatables_to_json_members(styles),
              easing_str = format_easing(type),
-             trigger_str = event_name(trigger),
+             trigger_str = to_String(trigger),
              id_str = if id is id(id_str) then id_str,
@@ -1338,6 +1338,80 @@ url,
 week
 .
+public define String
+  to_String
+  (
+    Input_Type type
+  )=
+  if type is 
+  {
+    button          then "button",
+    checkbox        then "checkbox",
+    color           then "color",
+    date            then "date",
+    datetime_local  then "datetime_local",
+    email           then "email",
+    file            then "file",
+    hidden          then "hidden",
+    image           then "image",
+    month           then "month",
+    number          then "number",
+    password        then "password",
+    radio           then "radio",
+    range           then "range",
+    reset           then "reset",
+    search          then "search",
+    submit          then "submit",
+    tel             then "tel",
+    text            then "text",
+    time            then "time",
+    url             then "url",
+    week            then "week"  
+  }
+.
+
+define Printable_tree
+  add_js_files_attributes
+  (
+    List(JS_Attribute)   l
+  ) =
+  if l is 
+  {
+    [ ]     then [ ], 
+    [h . t] then 
+         [ " " + to_String(h) 
+           . add_js_files_attributes(t)]
+  }
+.
+
+
+define Printable_tree
+  add_js_files
+  (
+    List(JS_File)   l
+  ) =
+  if l is 
+  {
+    [ ]     then [ ], 
+    [h . t] then 
+      [ ["<script src=\""+ file_name(h) +"\" type=\"text/javascript\""
+            . add_js_files_attributes(attributes(h)) ]
+           . ["></script>\n"
+             . add_js_files(t)] ]
+  }
+.
+
+define Printable_tree
+  add_script
+  (
+    List(Script)   l
+  ) =
+  if l is 
+  {
+    [ ]     then [ ], 
+    [h . t] then [ "<script type=\""+ script_type(h) +"\">\n"+ content(h) + "\n</script>\n" . add_script(t) ]
+  }.
+
 public type FormMethod:
   get,
   post
@@ -1359,7 +1433,7 @@ public define CoreAttrs action(WEB_Action_Name action)= attr(&quot;action&quot;, &quot;/&quot;+forma
 public define CoreAttrs action(WEB_Action_Name action, List((String,String)) extra_ops)= attr("action", "/"+format_web_action_name(action, extra_ops)).
 public define CoreAttrs formmethod(String value)      = attr("formmethod", value).
 public define CoreAttrs form(String value)            = attr("form", value).
-
+public define CoreAttrs for(String value)             = attr("for", value).
 public define HTML_Off_Form text(List(CoreAttrs) attrs, Int i)  = text(attrs,   to_decimal(i)).
@@ -1373,12 +1447,15 @@ public define HTML_Off_Form a(List(CoreAttrs) attrs, A_href _href)              
 public define HTML_Off_Form a(List(CoreAttrs) attrs, A_href _href, HTML_Off_Form content)       = a(attrs,  _href, _self, [content]).
 public define HTML_Off_Form a(List(CoreAttrs) attrs, A_href _href, List(HTML_Off_Form) content) = a(attrs,  _href, _self, content).
 public define HTML_Off_Form a(A_href _href, HTML_Off_Form content)                              = a([],     _href, _self, [content]).
+public define HTML_Off_Form a(A_href _href, String _text)                                       = a([],     _href, _self, [text(_text)]).
 public define HTML_Off_Form a(A_href _href, List(HTML_Off_Form) content)                        = a([],     _href, _self, content).
 public define HTML_Off_Form a(List(CoreAttrs) attrs, A_href _href, A_target _target, HTML_Off_Form content) = a(attrs,     _href, _target, [content]).
 public define HTML_Off_Form a(CoreAttrs attr, A_href _href, A_target _target, HTML_Off_Form content)        = a([attr],    _href, _target, [content]).
 public define HTML_Off_Form a(A_href _href, A_target _target, HTML_Off_Form content)            = a([],     _href, _target, [content]).
 public define HTML_Off_Form a(A_href _href, A_target _target, List(HTML_Off_Form) content)      = a([],     _href, _target, content).
 public define HTML_Off_Form a(CoreAttrs attr, A_href _href, A_target _target, List(HTML_Off_Form) content)  = a([attr],     _href, _target, content).
+public define HTML_Off_Form a(CoreAttrs attr, A_href _href, List(HTML_Off_Form) content)        = a([attr],     _href, _self, content).
+public define HTML_Off_Form a(CoreAttrs attr, A_href _href, HTML_Off_Form content)              = a([attr],     _href, _self, [content]).
   // <article>
 public define HTML_Off_Form article(List(CoreAttrs) attrs, List(HTML_Off_Form) content)  = html_tag("article", attrs, content).
@@ -1511,7 +1588,9 @@ public define HTML_Off_Form header(HTML_Off_Form content)                       
   // <h1>
 public define HTML_Off_Form h1(List(CoreAttrs) attrs, List(HTML_Off_Form) content)  = html_tag("h1", attrs, content).
+public define HTML_Off_Form h1(CoreAttrs attr, List(HTML_Off_Form) content)         = html_tag("h1", [attr], content).
 public define HTML_Off_Form h1(List(CoreAttrs) attrs, HTML_Off_Form content)        = html_tag("h1", attrs, [content]).
+public define HTML_Off_Form h1(CoreAttrs attr, HTML_Off_Form content)               = html_tag("h1", [attr], [content]).
 public define HTML_Off_Form h1(List(HTML_Off_Form) content)                         = html_tag("h1", [],    content).
 public define HTML_Off_Form h1(HTML_Off_Form content)                               = html_tag("h1", [],    [content]).
   // <h2>
@@ -1546,6 +1625,17 @@ public define HTML_Off_Form hr                                                  
 public define HTML_Off_Form hr(List(CoreAttrs) attrs)                               = html_void_tag("hr", attrs).
 public define HTML_Off_Form hr(CoreAttrs attr)                                      = html_void_tag("hr", [attr]).
+  // <i>
+public define HTML_Off_Form i(List(CoreAttrs) attrs, List(HTML_Off_Form) content)  = html_tag("i", attrs,   content).
+public define HTML_Off_Form i(List(CoreAttrs) attrs, HTML_Off_Form content)        = html_tag("i", attrs,   [content]).
+public define HTML_Off_Form i(CoreAttrs attr, List(HTML_Off_Form) content)         = html_tag("i", [attr],  content).
+public define HTML_Off_Form i(CoreAttrs attr, HTML_Off_Form content)               = html_tag("i", [attr],  [content]).
+public define HTML_Off_Form i(List(HTML_Off_Form) content)                         = html_tag("i", [],      content).
+public define HTML_Off_Form i(HTML_Off_Form content)                               = html_tag("i", [],      [content]).
+public define HTML_Off_Form i(String string)                                       = html_tag("i", [],      [text(string)]).
+public define HTML_Off_Form i(CoreAttrs attr, String string)                       = html_tag("i", [attr],  [text(string)]).
+public define HTML_Off_Form i(List(CoreAttrs) attrs, String string)                = html_tag("i", attrs,   [text(string)]).
+
   // <iframe>
 public define HTML_Off_Form iframe(CoreAttrs _attr, String src, Int width, Int height) =
   html_tag("iframe", [_attr, attr("src",src), width_px(width), height_px(height)], []).
@@ -1557,9 +1647,11 @@ public define HTML_Off_Form iframe(String src)                                  
 public define HTML_Off_Form input(List(CoreAttrs) attrs)                            = html_void_tag("input", attrs).
 public define HTML_Off_Form input(CoreAttrs attr)                                   = html_void_tag("input", [attr]).
+public define CoreAttrs type(Input_Type value)= attr("type", to_String(value)).
 public define CoreAttrs type(String value)= attr("type", value).
 public define CoreAttrs name(String value)= attr("name", value).
 public define CoreAttrs value(String value)= attr("value", value).
+public define CoreAttrs placeholder(String value) = attr("placeholder", value).
 public define CoreAttrs init(String value)= attr("value", encode_HTML_entities(value)).
   //-- BEGIN of <input> preset type
@@ -1652,6 +1744,7 @@ public define HTML_Off_Form p(List(CoreAttrs) attrs, List(HTML_Off_Form) content
 public define HTML_Off_Form p(List(CoreAttrs) attrs, HTML_Off_Form content)               = html_tag("p", attrs, [content]).
 public define HTML_Off_Form p(CoreAttrs attr, List(HTML_Off_Form) content)                = html_tag("p", [attr], content).
 public define HTML_Off_Form p(CoreAttrs attr, HTML_Off_Form content)                      = html_tag("p", [attr], [content]).
+public define HTML_Off_Form p(CoreAttrs attr, String _text)                               = html_tag("p", [attr], [text(_text)]).
 public define HTML_Off_Form p(List(HTML_Off_Form) content)                                = html_tag("p", [],    content).
 public define HTML_Off_Form p(HTML_Off_Form content)                                      = html_tag("p", [],    [content]).
@@ -1678,6 +1771,9 @@ public define HTML_Off_Form progress(CoreAttrs _attr, Int value, Int max)       
 public define HTML_Off_Form progress(Int value, Int max, String content)                                      = html_tag("progress", [attr("value", value), attr("max", max)], [text(content)]).
 public define HTML_Off_Form progress(Int value, Int max)                                                      = html_tag("progress", [attr("value", value), attr("max", max)], []).
+  // <script>
+public define HTML_Off_Form script(String file_name, List(JS_Attribute) attrs)           = literal_pt(add_js_files([js_file(file_name, attrs)])).
+public define HTML_Off_Form script(String content)                                       = literal_pt(add_script([script("text/javascript", content)])).
   // <section>
 public define HTML_Off_Form section(List(CoreAttrs) attrs, List(HTML_Off_Form) content)  = html_tag("section", attrs, content).
@@ -2305,23 +2401,23 @@ public define HTML_Meta
 public define HTTP_Answer
-   html_page
-     (
-       String             title, 
-       List(HTML_Meta)    metas,
-       HTML_Body          body
-     ) =
-   html_page(http_ok, title,metas,[],[],[],[],body).
+  html_page
+  (
+    String               title, 
+    List(HTML_Head_Tag)  head_tags,
+    HTML_Body            body
+  )=
+  html_page(http_ok, title, head_tags,[],[],[],[],body).
 public define HTTP_Answer
-   html_page
-     (
-       String             title, 
-       List(HTML_Meta)    metas,
-       List(CSS_Style)    styles,
-       HTML_Body          body
-     ) =
-   html_page(http_ok, title, metas, styles, [], [], [], body).
+  html_page
+  (
+    String              title, 
+    List(HTML_Head_Tag) head_tags,
+    List(CSS_Style)     styles,
+    HTML_Body           body
+  )=
+  html_page(http_ok, title, head_tags, styles, [], [], [], body).
 public define HTTP_Answer   
   web_controller_error_page
@@ -2337,7 +2433,7 @@ public define HTTP_Answer
     ( 
       // list of body options
       [
-        background_color(rgb(255,200,200))
+        //background_color(rgb(255,200,200))
         // add more body options here
       ],
@@ -2549,7 +2645,6 @@ define Printable_tree
    format
      (
        CommonInfo               cinfo, 
-       //String                   sn,               // state_name
        Var(Int)                 ic_v,             // 'idnum' counter variable
        HTML_Off_Form            element,
        Bool                     is_https,
@@ -2764,14 +2859,6 @@ define One
    *** [2] Tools. 
       *** [2.1] Directories. 
-   
-   We need a tool for creating directories (if needed). 
-
-   (This tool has been moved to 'tools/basis.anubis'). 
-   
-   
-   
-   
       *** [2.2] Secondary documents. 
    Some HTML elements  (like '<object>', '<frame>') cannot receive  their content directly
@@ -2931,9 +3018,6 @@ define (List(Web_arg) lwa, HTTP_Info info) -&gt; Separated_Web_Args($State)
       }
   }.
-
-   
-   
       *** [3.3] Applying an action. 
    When the web arguments are separated (and their names cleaned up from prefixes), we may
@@ -2941,7 +3025,6 @@ define (List(Web_arg) lwa, HTTP_Info info) -&gt; Separated_Web_Args($State)
    applied in the  list of actions.  If no action  is found, the new state  is the same as
    the previous  state. Also, we  deny the  application of an  HTTP action if  the request
    arrives through the HTTPS channel and conversely.
-
 define ($State          previous,
         String          action_name, 
@@ -3011,13 +3094,6 @@ define ($State          previous,
     Bool                        is_https) |->
       f(previous, action_name, http_info, lwa, is_https, actions_list). 
-   
-     
-
-   
-   
-   
-   
    *** [4] Web site descriptions and the 'awp handlers'. 
       *** [4.1] The type 'Web_Site'.
@@ -3912,12 +3988,13 @@ define String
   format_attrs
   (
     List(CoreAttrs)  attributs,
-    List(String)     classes,
-    List(String)     styles
+    List(String)     classes,     //class accumulator
+    List(String)     styles       //styles accumulator
   )=
   if attributs is
   {
     []      then 
+      //concat all accumulated classes and styles 
       (if length(classes) = 0 then "" else " class=\""+join(" ",classes)+"\"")+
       if length(styles) = 0   then "" else " style=\""+join(";",styles)+"\"",
     [h . t] then 
@@ -3965,14 +4042,28 @@ define String
                               " contextmenu=\"" + id_name + "\"",
                             draggable(value)      then  //boolean value
-                              " draggable=\""+ to_String(value)+ "\""
+                              " draggable=\""+ to_String(value)+ "\"",
+                              
+                            enterkeyhint(value)   then
+                              " enterkeyhint=\""+ value + "\"",
                             hidden(value)         then  //boolean value
-                              " hidden=\""+ (if value then "hidden" else "") + "\""
+                              " hidden=\""+ (if value then "hidden" else "") + "\"",
+                            
+                            inert                 then  
+                              " inert",
+                            
+                            inputmode(value)      then
+                              " inputmode =\"" + value + "\"",
+                              
+                            popover               then
+                              " popover",
                             spellcheck(value)     then  //boolean value
                               " spellcheck=\""+ to_String(value)+ "\""
-                              
+                            
+                            translate(value)      then
+                              " translate=\"" + if value then "yes\"" else "no\""
                           },
       current + format_attrs(t + new_attrs, new_classes, new_styles)
   }.
@@ -4659,32 +4750,6 @@ define Printable_tree
-define Printable_tree
-  format
-    (
-      Body_Option o
-    ) =
-  if o is
-    {
-      core_attrs(core_attr_list)         then [" " + format_attrs(core_attr_list)], 
-      background_color(c)                then [" bgcolor=\"" , (String)html_format(c), "\""],
-      background_image(n)                then [" background=", n],
-      background_image(n,o2)             then [" style=\"background: url(",n,")",format(o2),"\""]
-      
-    }.
-   
-     
-          
-define Printable_tree
-   format
-     (
-       List(Body_Option) l
-     ) =
-   if l is 
-     {
-       [ ]     then [ ], 
-       [h . t] then [format(h) . format(t)]
-     }.
 define Printable_tree
   add_css_files
@@ -4700,47 +4765,6 @@ define Printable_tree
          . add_css_files(t)]
   }.
-define Printable_tree
-   add_js_files_attributes
-     (
-       List(JS_Attribute)   l
-     ) =
-   if l is 
-     {
-       [ ] then [ ], 
-       [h . t] then 
-         if h is attr(name, value) then 
-         [ " " + name + "=\"" + value + "\"" 
-           . add_js_files_attributes(t)]
-     }.
-
-
-define Printable_tree
-  add_js_files
-  (
-    List(JS_File)   l
-  ) =
-  if l is 
-  {
-    [ ]     then [ ], 
-    [h . t] then 
-      [ ["<script src=\""+ file_name(h) +"\" type=\"text/javascript\""
-            . add_js_files_attributes(attributes(h)) ]
-           . ["></script>\n"
-             . add_js_files(t)] ]
-  }
-.
-
-define Printable_tree
-  add_script
-  (
-    List(Script)   l
-  ) =
-  if l is 
-  {
-    [ ]     then [ ], 
-    [h . t] then [ "<script type=\""+ script_type(h) +"\">\n"+ content(h) + "\n</script>\n" . add_script(t) ]
-  }.
 define Printable_tree
   add_css_styles
@@ -5275,7 +5299,18 @@ define Printable_tree
     },
   "\""]
 .
-   
+
+define Printable_tree
+  format
+  (
+    CommonInfo               cinfo, 
+    Var(Int)                 ic_v,             // 'idnum' counter variable
+    List(HTML_Off_Form)      elements,
+    Bool                     is_https,
+    Var(Int)                 action_count,
+    Var(List(HTML_Head_Tag)) head_tags
+  ).
+
 define Printable_tree
   format
   (
@@ -5297,26 +5332,8 @@ define Printable_tree
        sequence(l)                  then flat(map(format_element,l)),
        text(opts,t)                 then 
          format(cinfo,ic_v,any_text(opts,t),format_element,is_https, action_count, head_tags), 
-//       preformated(o,s)             then 
-//         format(cinfo,ic_v,any_preformated(o,s),format_element,is_https, action_count, head_tags), 
-//       paragraph(opts,t)            then 
-//         format(cinfo,ic_v,any_paragraph(opts,t),format_element,is_https, action_count, head_tags), 
-//       image(opts,url,alt)          then 
-//         format(cinfo,ic_v,any_image(opts,url,alt),format_element,is_https, action_count, head_tags), 
-//       image(opts,url,alt,w,h)      then 
-//         format(cinfo,ic_v,any_image(opts,url,alt,w,h),format_element,is_https, action_count, head_tags), 
        table(opts,header_row, rows, footer_row) then 
          format(cinfo,ic_v,any_table(opts,header_row, rows, footer_row),format_element,is_https, action_count, head_tags), 
-//       center(e)                    then 
-//         format(cinfo,ic_v,any_center(e),format_element,is_https, action_count, head_tags), 
-//       mail_to(a,e)                 then
-//         format(cinfo,ic_v,any_mail_to(a,e),format_element,is_https, action_count, head_tags), 
-//       scroller(w,h,cw,ch,c)        then 
-//         format(cinfo,ic_v,any_scroller(w,h,cw,ch,c),format_element,is_https, action_count, head_tags), 
-//       fixed_size(w,h,c)            then 
-//         format(cinfo,ic_v,any_fixed_size(w,h,c),format_element,is_https, action_count, head_tags), 
-//       fixed_size_2(w,h,fn)           then 
-//         format(cinfo,ic_v,any_fixed_size_2(w,h,fn),format_element,is_https, action_count, head_tags), 
        actioner(c,t,a,an,eo,ja)     then 
          format(cinfo,ic_v,any_actioner(c,t,a,an,eo,ja,failure),format_element,is_https, action_count, head_tags), 
        actioner(c,t,a,an,eo,ja,fn)  then 
@@ -5329,7 +5346,6 @@ define Printable_tree
          format(cinfo,ic_v,any_foreign_link(options,url,name),format_element,is_https, action_count, head_tags), 
        private_download(url,name,extra,action)     then 
          format(cinfo,ic_v,any_private_download(url,name,extra,action),format_element,is_https, action_count, head_tags),    
-//       label(n)                     then ["<a name=\"",n,"\">"],
        form(fn,attributs, l)        then
          [
            "<form id=\"",fn,"\"",
@@ -5350,7 +5366,7 @@ define Printable_tree
                                       action, extra_ops, is_https), 
          [
            "<form id=\"",fn,"\"",
-           format(cinfo,ic_v,any_coreattrs(attributs),format_element,is_https, action_count, head_tags),
+           format(cinfo,ic_v, any_coreattrs(attributs),format_element,is_https, action_count, head_tags),
            " method=\"post\"",
               enctype(l),
               " action=\"" + url + "\">",
@@ -5366,14 +5382,10 @@ define Printable_tree
        in_form(fn, content)             then                
           if fn is html_Id(id) then
             format(cinfo,id,ic_v, content,is_https, action_count, head_tags), 
-//       div(options, e)              then
-//          format(cinfo, ic_v, any_div(options, e), format_element, is_https, action_count, head_tags),
        div(options, p_content)      then
         with html_elements = map((HTML_Partial_Content pc) |-> since pc is partial_content(tags, html_elem), head_tags <- *head_tags +tags; html_elem, p_content),
           format(cinfo, ic_v, any_div(options, html_elements), format_element, is_https, action_count, head_tags),    
-//       div_empty(options)           then
-//          format(cinfo, ic_v, any_div_empty(options), format_element, is_https, action_count, head_tags),    
        iframe(options, css_styles, css_files, js_files, body) then
           println("formating iframe");
           if body is body(body_options,elem) then
@@ -5386,8 +5398,8 @@ define Printable_tree
             add_css_files(css_files),
             add_js_files(js_files),
             "</head>\n",
-            "<body ", format(body_options), ">\n",                       // format body options
-            format(cinfo,ic_v,elem,is_https, action_count, head_tags), 
+            "<body ", format_attrs(body_options), ">\n",                       // format body options
+            format(cinfo,ic_v, elem ,is_https, action_count, head_tags), 
             "</body>\n",
             "</html>\n",])),
@@ -5397,29 +5409,28 @@ define Printable_tree
         if p_content is partial_content(tags, html_elements) then
           head_tags <- *head_tags + tags;          
           format(cinfo, ic_v, html_elements, is_https, action_count, head_tags),
-//       br                               then ["<br>"],
-//       progress(options, value, max)    then ["<progress max=\"",max,"\" value=\"",value,"\"",format_attrs(options),"></progress>"],
-//       ol(opts, t)            then 
-//         format(cinfo,ic_v,any_ol(opts,t),format_element,is_https, action_count, head_tags), 
-//       ul(opts, t)            then 
-//         format(cinfo,ic_v,any_ul(opts,t),format_element,is_https, action_count, head_tags), 
-//       li(opts, t)            then 
-//         format(cinfo,ic_v,any_li(opts,t),format_element,is_https, action_count, head_tags), 
-//       button(options, e)     then
-//          format(cinfo, ic_v, any_button(options, e), format_element, is_https, action_count, head_tags),
-       i(opts, t)             then 
-         format(cinfo,ic_v,any_i(opts,t),format_element,is_https, action_count, head_tags),
-//       span(opts,t)           then 
-//         format(cinfo,ic_v,any_span(opts,t),format_element,is_https, action_count, head_tags),
-
-         
-//       hr(opts)               then 
-//         format(cinfo,ic_v,any_hr(opts),format_element,is_https, action_count, head_tags),
-//       nav(opts, l)          then ["<nav", format_attrs(opts), ">",flat(map(format_element,l)),"</nav>\n"],
-       html_tag(tag_name, opts, l)    then ["<",tag_name, format_attrs(opts), ">",flat(map(format_element,l)),"</",tag_name,">\n"],
+//       i(opts, t)             then 
+//         format(cinfo,ic_v,any_i(opts,t),format_element,is_https, action_count, head_tags),
+       html_tag(tag_name, opts, l)    then ["<",tag_name, format_attrs(opts), ">", flat(map(format_element,l)), "</",tag_name,">\n"],
        html_void_tag(tag_name, opts)  then ["<",tag_name, format_attrs(opts), ">"],       
      }.
+define Printable_tree
+  format
+  (
+    CommonInfo               cinfo, 
+    Var(Int)                 ic_v,             // 'idnum' counter variable
+    List(HTML_Off_Form)      elements,
+    Bool                     is_https,
+    Var(Int)                 action_count,
+    Var(List(HTML_Head_Tag)) head_tags
+  ) =
+   if cinfo is info(common_name,http_port,https_port,site_directory,secret) then 
+   flat(map((HTML_Off_Form element) |->
+    format(cinfo, ic_v, element, is_https, action_count, head_tags),
+    elements))
+.   
+
       *** [5.10] Formating meta-tags. 
 define Printable_tree
@@ -5515,9 +5526,9 @@ define Printable_tree
 define Printable_tree
   _format_html_head
   (
-    List(HTML_Head_Tag) lwf,
-    Printable_tree so_far,
-    Dictionary(String, Word32) js_dict
+    List(HTML_Head_Tag)         lwf,
+    Printable_tree              so_far,
+    Dictionary(String, Word32)  js_dict
   )
   =
     //with lwf_ = rebuild_html_head_tags(lwf, []),
@@ -5551,11 +5562,15 @@ define Printable_tree
           css(cssf)         then
             since cssf is css_file(file_name, media),          
             ["<link rel=\"stylesheet\" type=\"text/css\" href=\""+file_name+"\" media=\""+to_String(media)+"\" />\n" . _format_html_head(t, so_far, js_dict)],
+
           css_inline(cssi)  then
             ["<style>"+cssi+"</style>\n" . _format_html_head(t, so_far, js_dict)]
+            
+          link(link_attrs)  then
+            ["<link " + to_String(link_attrs) + " />\n" . _format_html_head(t, so_far, js_dict)]
         }
     }
-  .
+.
 public define Printable_tree
   format_html_head
@@ -5597,7 +5612,8 @@ public define HTML_ajax_content
           js(jsf)           then /*println("sort_head_tag jsf["+jsf.file_name+"]");*/sort_head_tag(t, script, [file_name(jsf) . js_file], css_file),
           js_inline(jsi)    then /*println("sort_head_tag jsi["+jsi.content+"]");*/sort_head_tag(t, script + content(jsi), js_file, css_file),
           css(cssf)         then sort_head_tag(t, script, js_file, [file_name(cssf) . css_file]),
-          css_inline(cssi)  then sort_head_tag(t, script, js_file, css_file)
+          css_inline(cssi)  then sort_head_tag(t, script, js_file, css_file),
+          link(_)           then sort_head_tag(t, script, js_file, css_file),
         }  
   }.
@@ -5685,7 +5701,7 @@ public define AWP_Handler_Answer //Printable_tree
          if format(status) is (status_string, status_headers) then
           with
            answer_body_body = (Printable_tree)
-           [  "<body ", format(options), ">",                       // format body options
+           [  "<body ", format_attrs(options), ">",                       // format body options
               format(cinfo,ic_v,element,is_https, var(0), p_content_head_tags), 
               "</body>\n",
@@ -5707,12 +5723,12 @@ public define AWP_Handler_Answer //Printable_tree
              answer_body_body
            ]),
-       html_page(status, title, metas, css_styles, css_files, js_files, script, body) then 
+       html_page(status, title, head_tags, css_styles, css_files, js_files, script, body) then 
          if body is body(options,element) then
          if format(status) is (status_string, status_headers) then
           with
             answer_body_body = (Printable_tree)
-            [  "<body ", format(options), ">",                       // format body options
+            [  "<body ", format_attrs(options), ">",                       // format body options
               format(cinfo,ic_v,element,is_https, var(0), p_content_head_tags), 
               "</body>\n",
               "</html>"
@@ -5737,9 +5753,9 @@ public define AWP_Handler_Answer //Printable_tree
               "   { s[0]=1; d.style.visibility = 'visible'; d.zIndex = 100; } else\n",
               "   { s[0]=0; d.style.visibility = 'hidden'; }; }", 
               "</script>\n",
-              "<title>",title,"</title>\n",                         // put title
-              format(cinfo,metas,is_https,charset),      // format the metas
-              format_html_head(*p_content_head_tags, charset),
+              "<title>",title,"</title>\n",              // put title
+              //format(cinfo,metas,is_https,charset),      // format the metas
+              format_html_head(head_tags + *p_content_head_tags, charset),
               "</head>\n"
            ],
         printable_tree([
@@ -2429,7 +2429,7 @@ define One
         if (Maybe(RStream))file(path, read) is
         {
           failure    then
-            println("HTTP/1.1 404 	Not Found"+path);
+            println("HTTP/1.1 404 	Not Found "+path);
             forget(reliable_write(connection,to_byte_array("HTTP/1.1 404 	Not Found"+crlf+
                                                                    "Content-Length: 0"+crlf+crlf
                                                                    /*+"Connection: close"+crlf+crlf*/)));
+/*
+ * Created by PyramIDE.
+ * User: フランスのトトロ aka (David RENÉ) 
+ * Date: 26/04/2026
+ * Time: 15:58
+ * © David RENÉ
+ */
+
+
@@ -137,13 +137,167 @@ public type HtmlEvents:
   onshow,         //HTML5 Fires when a <menu> element is shown as a context menu
   ontoggle.       //HTML5 Fires when the user opens or closes the <details> element
+public define String 
+  to_String
+  (
+    HtmlEvents e
+  ) =
+  if e is
+  {
+    onafterprint      then "onafterprint",   //HTML5 Script to be run after the document is printed
+    onbeforeprint     then "onbeforeprint",  //HTML5 Script to be run before the document is printed
+    onbeforeunload    then "onbeforeunload", //HTML5 Script to be run when the document is about to be unloaded
+    onerror           then "onerror",        //HTML5 Script to be run when an error occurs
+    onhashchange      then "onhashchange",   //HTML5 Script to be run when there has been changes to the anchor part of the a URL
+    onload            then "onload",         //      Fires after the page is finished loading
+    onmessage         then "onmessage",      //HTML5 Script to be run when the message is triggered
+    onoffline         then "onoffline",      //HTML5 Script to be run when the browser starts to work offline
+    ononline          then "ononline",       //HTML5 Script to be run when the browser starts to work online
+    onpagehide        then "onpagehide",     //HTML5 Script to be run when a user navigates away from a page
+    onpageshow        then "onpageshow",     //HTML5 Script to be run when a user navigates to a page
+    onpopstate        then "onpopstate",     //HTML5 Script to be run when the window's history changes
+    onresize          then "onresize",       //HTML5 Fires when the browser window is resized
+    onstorage         then "onstorage",      //HTML5 Script to be run when a Web Storage area is updated
+    onunload          then "onunload",       //      Fires once a page has unloaded (or the browser window has been closed)
+    // Form element events
+    onblur            then "onblur",         //      Fires the moment that the element loses focus
+    onchange          then "onchange",       //      Fires the moment when the value of the element is changed
+    oncontextmenu     then "oncontextmenu",  //HTML5 Script to be run when a context menu is triggered
+    onfocus           then "onfocus",        //      Fires the moment when the element gets focus
+    oninput           then "oninput",        //HTML5 Script to be run when an element gets user input
+    oninvalid         then "oninvalid",      //HTML5 Script to be run when an element is invalid
+    onreset           then "onreset",        //      Fires when the Reset button in a form is clicked
+    onsearch          then "onsearch",       //      Fires when the user writes something in a search field (for <input="search">)
+    onselect          then "onselect",       //      Fires after some text has been selected in an element
+    onsubmit          then "onsubmit",       //      Fires when a form is submitted
+    // Keyboard events (Not valid in base, bdo, br, frame, frameset, head, html, iframe, meta, param, script, style, and title elements.)
+    onkeydown         then "onkeydown",      //      Fires when a user is pressing a key
+    onkeypress        then "onkeypress",     //      Fires when a user presses a key
+    onkeyup           then "onkeyup",        //      Fires when a user releases a key
+    // Mouse events (Not valid in base, bdo, br, frame, frameset, head, html, iframe, meta, param, script, style, and title elements.)
+    onclick           then "onclick",        //      Fires on a mouse click on the element
+    ondblclick        then "ondblclick",     //      Fires on a mouse double-click on the element
+    onmousedown       then "onmousedown",    //      Fires when a mouse button is pressed down on an element
+    onmousemove       then "onmousemove",    //      Fires when the mouse pointer is moving while it is over an element
+    onmouseout        then "onmouseout",     //      Fires when the mouse pointer moves out of an element
+    onmouseover       then "onmouseover",    //      Fires when the mouse pointer moves over an element
+    onmouseup         then "onmouseup",      //      Fires when a mouse button is released over an element
+    onwheel           then "onwheel",        //HTML5 Fires when the mouse wheel rolls up or down over an element
+    //Drag Events
+    ondrag            then "ondrag",         //HMTL5 Script to be run when an element is dragged
+    ondragend         then "ondragend",      //HTML5 Script to be run at the end of a drag operation
+    ondragenter       then "ondragenter",    //HTML5 Script to be run when an element has been dragged to a valid drop target
+    ondragleave       then "ondragleave",    //HTML5 Script to be run when an element leaves a valid drop target
+    ondragover        then "ondragover",     //HTML5 Script to be run when an element is being dragged over a valid drop target
+    ondragstart       then "ondragstart",    //HTML5 Script to be run at the start of a drag operation
+    ondrop            then "ondrop",         //HTML5 Script to be run when dragged element is being dropped
+    onscroll          then "onscroll",       //HTML5 Script to be run when an element's scrollbar is being scrolled
+    //Clipboard Events
+    oncopy            then "oncopy",         //HTML5 Fires when the user copies the content of an element
+    oncut             then "oncut",          //HTML5 Fires when the user cuts the content of an element
+    onpaste           then "onpaste",        //HTML5 Fires when the user pastes some content in an element
+    //Media Events
+    onabort           then "onabort",        //HTML5 Script to be run on abort
+    oncanplay         then "oncanplay",      //HTML5 Script to be run when a file is ready to start playing (when it has buffered enough to begin)
+    oncanplaythrough  then "oncanplaythrough", //HTML5 Script to be run when a file can be played all the way to the end without pausing for buffering
+    oncuechange       then "oncuechange",    //HTML5 Script to be run when the cue changes in a <track> element
+    ondurationchange  then "ondurationchange", //HTML5 Script to be run when the length of the media changes
+    onemptied         then "onemptied",      //HTML5 Script to be run when something bad happens and the file is suddenly unavailable (like unexpectedly disconnects)
+    onended           then "onended",        //HTML5 Script to be run when the media has reach the end (a useful event for messages like "thanks for listening")
+    onerror           then "onerror",        //HTML5 Script to be run when an error occurs when the file is being loaded
+    onloadeddata      then "onloadeddata",   //HTML5 Script to be run when media data is loaded
+    onloadedmetadata  then "onloadedmetadata", //HTML5 Script to be run when meta data (like dimensions and duration) are loaded
+    onloadstart       then "onloadstart",    //HTML5 Script to be run just as the file begins to load before anything is actually loaded
+    onpause           then "onpause",        //HTML5 Script to be run when the media is paused either by the user or programmatically
+    onplay            then "onplay",         //HTML5 Script to be run when the media is ready to start playing
+    onplaying         then "onplaying",      //HTML5 Script to be run when the media actually has started playing
+    onprogress        then "onprogress",     //HTML5 Script to be run when the browser is in the process of getting the media data
+    onratechange      then "onratechange",   //HTML5 Script to be run each time the playback rate changes (like when a user switches to a slow motion or fast forward mode)
+    onseeked          then "onseeked",       //HTML5 Script to be run when the seeking attribute is set to false indicating that seeking has ended
+    onseeking         then "onseeking",      //HTML5 Script to be run when the seeking attribute is set to true indicating that seeking is active
+    onstalled         then "onstalled",      //HTML5 Script to be run when the browser is unable to fetch the media data for whatever reason
+    onsuspend         then "onsuspend",      //HTML5 Script to be run when fetching the media data is stopped before it is completely loaded for whatever reason
+    ontimeupdate      then "ontimeupdate",   //HTML5 Script to be run when the playing position has changed (like when the user fast forwards to a different point in the media)
+    onvolumechange    then "onvolumechange", //HTML5 Script to be run each time the volume is changed which (includes setting the volume to "mute")
+    onwaiting         then "onwaiting",      //HTML5 Script to be run when the media has paused but is expected to resume (like when the media pauses to buffer more data)
+    //Misc Events
+    onshow            then "onshow",         //HTML5 Fires when a <menu> element is shown as a context menu
+    ontoggle          then "ontoggle"
+  }.
+
+public type Cross_origin:
+  anonymous,
+  use_credentials
+.
+
+public define String
+  to_String
+  (
+    Cross_origin c_origin
+  )=
+  if c_origin is
+  {
+    anonymous         then  "anonymous",
+    use_credentials   then  "use-credentials"
+  }
+.
+
+public type Referrer_policy:
+  no_referrer,
+  no_referrer_when_downgrade,
+  origin,
+  origin_when_cross_origin,
+  unsafe_url
+.
+
+public define String
+  to_String
+  (
+    Referrer_policy r_policy
+  )=
+  if r_policy is
+  {
+    no_referrer                 then  "no-referrer",
+    no_referrer_when_downgrade  then  "no-referrer-when-downgrade",
+    origin                      then  "origin",
+    origin_when_cross_origin    then  "origin-when-cross-origin",
+    unsafe_url                  then  "unsafe-url"
+  }
+.
 public type CSS_File:
    css_file(String file_name, CSS_File_Media).
 public type JS_Attribute:
-  attr      (String, String).
-  
+  async,
+  crossorigin(Cross_origin),          //Specifies how the element handles cross-origin requests
+  defer,                              //Specifies the location of the linked document
+  integrity(String),
+  nomodule(Bool),  
+  referrerpolicy(Referrer_policy),    //Specifies which referrer to use when fetching the resource
+//  src(String),                        //Specifies on what device the linked document will be displayed
+  type(String),
+  attr(String, String).
+
+public define String
+  to_String
+  (
+    JS_Attribute attr
+  )=
+  if attr is
+  {
+    async                   then  "async",
+    crossorigin(c_org)      then  "crossorigin=\""+to_String(c_org)+"\"",   //Specifies how the element handles cross-origin requests
+    defer                   then  "defer",                                  //Specifies the location of the linked document
+    integrity(filehash)     then  "integrity=\""+filehash+"\"",
+    nomodule(value)         then  "nomodule=\""+if value then "True\"" else "False\"",  
+    referrerpolicy(r_pol)   then  "referrerpolicy=\""+ to_String(r_pol)+ "\"",    //Specifies which referrer to use when fetching the resource
+    //src(url)                then  "src=\""+url+"\"",                        //Specifies on what device the linked document will be displayed
+    type(_type)             then  "type=\""+_type+"\"",
+    attr(key, value)        then  key+"=\""+value+"\""
+  }
+.
+
 public type JS_File:
   js_file(String              file_name,
           List(JS_Attribute)  attributes).
@@ -467,11 +621,100 @@ public type HTML_Off_Form:
                            HTML_Body        /*body*/),
   partial               (HTML_Partial_Content),
   //progress              (List(CoreAttrs), Int value, Int max),
-  i                     (List(CoreAttrs), String text),
+  //i                     (List(CoreAttrs), String text),
   html_tag              (String tag_name, List(CoreAttrs), List(HTML_Off_Form) content),
   html_void_tag         (String tag_name, List(CoreAttrs))
 .
+
+public type Rel_attr:
+  alternate,
+  author,
+  dns_prefetch,
+  help,
+  icon,
+  license,
+  next,
+  pingback,
+  preconnect,
+  prefetch,
+  preload,
+  prerender,
+  prev,
+  search,
+  stylesheet
+.
+
+public define String
+  to_String
+  (
+    Rel_attr r_attr
+  )=
+  if r_attr is
+  {
+    alternate     then "alternate",
+    author        then "author",
+    dns_prefetch  then "dns_prefetch",
+    help          then "help",
+    icon          then "icon",
+    license       then "license",
+    next          then "next",
+    pingback      then "pingback",
+    preconnect    then "preconnect",
+    prefetch      then "prefetch",
+    preload       then "preload",
+    prerender     then "prerender",
+    prev          then "prev",
+    search        then "search",
+    stylesheet    then "stylesheet"
+  }
+.
+
+public type Link_attr:
+  crossorigin(Cross_origin),          //Specifies how the element handles cross-origin requests
+  href(String),                       //Specifies the location of the linked document
+  media(String),                      //Specifies on what device the linked document will be displayed
+  referrerpolicy(Referrer_policy),    //Specifies which referrer to use when fetching the resource
+  rel(Rel_attr),
+  sizes(String),
+  type(String),
+  as(String),
+  integrity(String),
+  event(HtmlEvents, String)
+.
+
+public define String 
+  to_String
+  (
+    Link_attr attr
+  )=
+  if attr is
+  {
+    crossorigin(c_origin) then  "crossorigin=\""+to_String(c_origin)+"\"",
+    href(url)             then  "href=\""+url+"\"",
+    media(media)          then  "media=\""+media+"\"",
+    referrerpolicy(r_policy)  then  "referrerpolicy=\""+to_String(r_policy)+"\"",
+    rel(rel_attr)         then  "rel=\""+to_String(rel_attr)+"\"",
+    sizes(_sizes)         then  "sizes=\""+_sizes+"\"",
+    type(_type)           then  "type=\""+_type+"\"",
+    as(_as)               then  "as=\""+_as+"\"",
+    integrity(_integrity) then  "integrity=\""+_integrity+"\"",
+    event(_event, code)   then  to_String(_event)+"=\""+code+"\"",
+  }
+.
+
+public define String
+  to_String
+  (
+    List(Link_attr) attrs
+  )=
+  join(" ", map((Link_attr attr) |->
+    to_String(attr),
+    attrs))
+.
+
+
+
 public type HTML_Meta:
    keywords      (List(String)), 
    refresh       (Actioner_Connection connection, 
@@ -482,7 +725,7 @@ public type HTML_Meta:
    meta          (String name, String content),
    http_equiv    (String name, String content),
    generic_meta  (List((String,String))),
-   literal       (String). 
+   literal       (String).
 public type HTML_Head_Tag:
   meta(HTML_Meta),
@@ -490,10 +733,9 @@ public type HTML_Head_Tag:
   js(JS_File),
   js_inline(Script),
   css(CSS_File),
-  css_inline(String css_styles) /* Note: <style> and </style> tags are not necessaries */
-  .
-
-
+  css_inline(String css_styles), /* Note: <style> and </style> tags are not necessaries */
+  link(List(Link_attr) link_attrs)
+.
 public type HTML_Partial_Content:
   partial_content
@@ -503,16 +745,44 @@ public type HTML_Partial_Content:
   )
 .
-public type Body_Option:
-   core_attrs(List(CoreAttrs)),
-   background_color   (RGB),
-   background_image   (String url),
-   background_image   (String url, List(BackgroundOption)).
-   
 public type HTML_Body:  
-   body(List(Body_Option) options, HTML_Off_Form content).
-   
- 
+   body(List(CoreAttrs) attrs, List(HTML_Off_Form) content).
+
+public define HTML_Body
+  body
+  (
+    List(CoreAttrs) attrs,
+    HTML_Off_Form   content
+  )=
+  body(attrs, [content])
+.
+
+public define HTML_Body
+  body
+  (
+    CoreAttrs       attr,
+    HTML_Off_Form   content
+  )=
+  body([attr], [content])
+.
+
+public define HTML_Body
+  body
+  (
+    CoreAttrs             attr,
+    List(HTML_Off_Form)   content
+  )=
+  body([attr], content)
+.
+
+public define HTML_Body
+  body
+  (
+    HTML_Off_Form   content
+  )=
+  body([], [content])
+.
+
 public type HTML_tooltip:
   html_tooltip
@@ -542,6 +812,7 @@ public type HTML_tooltip:
   ).
+
 public type CoreAttrs:
   empty,
   id        (String),                   //A unique identifier for the element.
@@ -567,8 +838,13 @@ public type CoreAttrs:
   contenteditable(Bool),                //Specifies whether the contents of the element are editable
   contextmenu(String),                  //Identifies a menu with which to associate the element as a context menu.
   draggable(Bool),                      //Specifies whether the element is draggable.
+  enterkeyhint(String),                 //Specifies the text of the enter-key on a virtual keyboard
   hidden(Bool),                         //Specifies that the element represents an element that is not yet, or is no longer, relevant.
-  spellcheck(Bool)                      //Specifies whether the element represents an element whose contents are subject to spell checking and grammar checking.
+  inert,                                //Specifies that the browser should ignore this section
+  inputmode(String),                    //Specifies the mode of a virtual keyboard
+  popover,                              //Specifies a popover element
+  spellcheck(Bool),                     //Specifies whether the element represents an element whose contents are subject to spell checking and grammar checking.
+  translate(Bool)                       //Specifies whether the content of an element should be translated or not
 .
 public define CoreAttrs colspan(Int value)    = attr("colspan", to_String(value)).
@@ -580,10 +856,6 @@ public define CoreAttrs height_px(Int value)  = attr(&quot;height&quot;,  to_String(value)
 public define CoreAttrs alt(String value)     = attr("alt",     value).
 public define CoreAttrs size(Int value)       = attr("size",    to_String(value)).
-public define CoreAttrs for(String value)     = attr("for",     value).
-public define CoreAttrs placeholder(String value)    = attr("placeholder",    value).
-public define CoreAttrs role(String value)    = attr("role",    value).
-
 public define CoreAttrs
   boolean
   (
@@ -598,7 +870,7 @@ public type HTTP_Answer:
                  HTML_Body        /*body*/),
    html_page    (HTTP_Status      /*http_status*/,
                  String           /*title*/,
-                 List(HTML_Meta)  /*meta_tags*/, 
+                 List(HTML_Head_Tag)  /*meta_tags*/, 
                  List(CSS_Style)  /*styles*/,
                  List(CSS_File)   /*css_files*/,
                  List(JS_File)    /*js_files*/,
-/*
+/*
  * Created by 伝作 (Densaku).
  * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
  * Date: 2017-03-15
@@ -14,14 +14,15 @@ transmit tools/basis.anubis
 public type WEB_Action_Name:
   no_action,             
   controller_action(
-    String     controller, 
-    String     ac_name   
+    String     controller,    //controller name
+    String     ac_name        //action 
   ),
+  
   action_name(
-    String     ac_name   
+    String     ac_name        //action
   ),
+  
   //url is raw action, hence we will only copy that url in final link
-
   url(
     String     url_name  
   )