1

include yslt_noindent.yml2

     2

     3

in xsl decl svgtmpl(match, xmlns="http://www.w3.org/2000/svg") alias template;

     4

     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:xlink="http://www.w3.org/1999/xlink"

    12

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

    13

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

    14

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

    15

    16

            /* Namespace to invoke python code */

    17

            xmlns:ns="beremiz"

    18

    19

            extension-element-prefixes="ns func exsl regexp str dyn"

    20

            exclude-result-prefixes="ns func exsl regexp str dyn" {

    21

    22

    param "hmi_path";

    23

    const "svg", "/svg:svg";

    24

    const "hmi_elements", "//svg:*[starts-with(@inkscape:label, 'HMI:')]";

    25

    const "subhmitree", "ns:GetSubHMITree()";

    26

    27

    const "indexed_hmitree", "/.."; // compatibility with parse_labels.ysl2

    28

    include parse_labels.ysl2

    29

    const "_parsed_widgets" apply "$hmi_elements", mode="parselabel";

    30

    const "parsed_widgets","exsl:node-set($_parsed_widgets)";

    31

    32

    const "selected_node_type","local-name($subhmitree)";

    33

    const "svg_widget", "$parsed_widgets/widget[1]";

    34

    const "svg_widget_type", "$svg_widget/@type";

    35

    const "svg_widget_path", "$svg_widget/@path";

    36

    const "svg_widget_count", "count($parsed_widgets/widget)";

    37

    38

    svgtmpl "@*", mode="inline_svg" xsl:copy;

    39

    40

    svgtmpl "@inkscape:label[starts-with(., 'HMI:')]", mode="inline_svg" {

    41

        attrib "inkscape:label" > «substring-before(., '@')»@«$hmi_path»

    42

    }

    43

    44

    template "node()", mode="inline_svg" {

    45

      xsl:copy apply "@* | node()", mode="inline_svg";

    46

    }

    47

    48

    49

    const "NODES_TYPES","str:split('HMI_ROOT HMI_NODE')";

    50

    const "HMI_NODES_COMPAT","str:split('Page Jump Foreach')";

    51

    template "/" {

    52

        comment > Widget dropped in Inkscape from Beremiz

    53

    54

        choose {

    55

            when "$svg_widget_count < 1"

    56

                error > No widget detected on selected SVG

    57

            when "$svg_widget_count > 1"

    58

                error > Multiple widget DnD not yet supported

    59

            when """$selected_node_type = $NODES_TYPES and \

    60

                    not($svg_widget_type = $HMI_NODES_COMPAT)"""

    61

                error > Widget incompatible with selected HMI tree node

    62

        }

    63

    64

        const "testmsg" {

    65

            msg value "$hmi_path";

    66

            msg value "$selected_node_type";

    67

            msg value "$svg_widget_type";

    68

        }

    69

    70

        value "ns:GiveDetails($testmsg)";

    71

    72

        apply "/", mode="inline_svg";

    73

    }

    74

}