1

include yslt_noindent.yml2

     2

     3

// overrides yslt's output function to set CDATA

     4

decl output(method, cdata-section-elements="script");

     5

istylesheet 

     6

            /* From Inkscape */

     7

            xmlns:dc="http://purl.org/dc/elements/1.1/"

     8

            xmlns:cc="http://creativecommons.org/ns#"

     9

            xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"

    10

            xmlns:svg="http://www.w3.org/2000/svg"

    11

            xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"

    12

            xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"

    13

            xmlns:xhtml="http://www.w3.org/1999/xhtml"

    14

    15

            /* Our namespace to invoke python code */

    16

            xmlns:ns="beremiz"

    17

            extension-element-prefixes="ns" 

    18

            exclude-result-prefixes="ns" {

    19

    20

    /* This retrieves geometry obtained through "inkscape -S" 

    21

     * already parsed by python and presented as a list of 

    22

     * <bbox x="0" y="0" w="42" h="42">

    23

     */

    26

    28

        noindex > HMI_ROOT

    29

        noindex > HMI_LABEL

    30

        noindex > HMI_CLASS

    31

        noindex > HMI_PLC_STATUS

    32

        noindex > HMI_CURRENT_PAGE

    33

    }

    38

    40

        param "index", "0";

    48

            choose {

    49

                when "not(local-name() = $categories/noindex)" {

    50

                    xsl:copy {

    51

                        attrib "index" > «$index»

    53

                        foreach "@*" xsl:copy;

    54

                    }

    55

                    /* no node expected below value nodes */

    56

                }

    57

                otherwise {

    58

                    apply "*[1]", mode="index"{

    59

                        with "index", "$index";

    61

                    }

    62

                }

    63

            }

    64

        }

    65

    66

        copy "$content";

    67

        apply "following-sibling::*[1]", mode="index" {

    68

            with "index", "$index + count(exsl:node-set($content)/*)";

    70

        }

    71

    }

    72

    73

    /* Identity template :

    74

     *  - copy every attributes 

    75

     *  - copy every sub-elements

    76

     */

    78

      /* use real xsl:copy instead copy-of alias from yslt.yml2 */

    80

    }

    81

    83

    84

    /* copy root node and add geometry as comment for a test */

    85

    template "/" 

    86

      html xmlns="http://www.w3.org/1999/xhtml" {

    87

          head;

    88

          body style="margin:0;" {

    89

              xsl:copy {

    90

                  comment {

    91

                      apply "$geometry", mode="testgeo";

    92

                  }

    93

                  comment {

    94

                      apply "$hmitree", mode="testtree";

    95

                  }

    96

                  comment {

    98

                  }

   100

              }

   101

              script{

   102

                  /* TODO : paste hmitree hash stored in hmi tree root node */

   103

   104

                  /* TODO re-enable

   105

                  ||

   106

                  function evaluate_js_from_descriptions() {

   107

                      var Page;

   108

                      var Input;

   109

                      var Display;

   110

                      var res = [];

   111

                  ||

   113

                  apply """//*[contains(child::svg:desc, $midmark) or \

   114

                               starts-with(child::svg:desc, $mark)]""",2 

   115

                        mode="code_from_descs";

   116

                  ||

   117

                      return res;

   118

                  }

   119

                  ||

   120

                  */

   121

   122

                  /*TODO add :

   123

                    - pages content

   124

                      + with ref to elt ?

   125

                    - widgets parameters

   126

                  */

   127

   142

                  }

   146

                  include text svghmi.js

   147

              }

   148

          }

   149

    }

   150

   151

    template "*", mode="code_from_descs" {

   152

        ||

   153

        {

   154

            var path, role, name, priv;

   155

            var id = "«@id»";

   156

        ||

   157

   158

        /* if label is used, use it as default name */

   159

        if "@inkscape:label"

   160

            |> name = "«@inkscape:label»";

   161

   162

        | /* -------------- */

   163

   164

        // this breaks indent, but fixing indent could break string literals

   165

        value "substring-after(svg:desc, $mark)";

   166

        // nobody reads generated code anyhow...

   167

   168

        ||

   169

   170

            /* -------------- */

   171

            res.push({

   172

                path:path,

   173

                role:role,

   174

                name:name,

   175

                priv:priv

   176

            })

   177

        }

   178

        ||

   179

    }

   180

   181

   182

    template "bbox", mode="testgeo"{

   183

        | ID: «@Id» x: «@x» y: «@y» w: «@w» h: «@h»

   184

    }

   185

   186

    template "*", mode="testtree"{

   187

        param "indent", "''";

   188

        > «$indent» «local-name()» 

   189

        foreach "@*" > «local-name()»=«.» 

   190

        > \n

   191

        apply "*", mode="testtree" {

   192

            with "indent" value "concat($indent,'>')"

   193

        };

   194

    }

   195

}