1

<?xml version="1.0"?>

     2

<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:exsl="http://exslt.org/common" xmlns:regexp="http://exslt.org/regular-expressions" xmlns:str="http://exslt.org/strings" xmlns:func="http://exslt.org/functions" xmlns:ppx="http://www.plcopen.org/xml/tc6_0201" xmlns:xhtml="http://www.w3.org/1999/xhtml" xmlns:ns="beremiz" version="1.0" extension-element-prefixes="ns" exclude-result-prefixes="ns">

     3

  <xsl:output method="xml"/>

     4

  <xsl:param name="instance_type"/>

     5

  <xsl:template match="text()"/>

     6

  <xsl:variable name="project" select="ns:GetProject()"/>

     7

  <xsl:variable name="stdlib" select="ns:GetStdLibs()"/>

     8

  <xsl:variable name="extensions" select="ns:GetExtensions()"/>

     9

  <xsl:variable name="all_types" select="($project | $stdlib | $extensions)/ppx:types"/>

    10

  <xsl:template match="ppx:project">

    11

    <xsl:apply-templates select="ppx:instances/ppx:configurations/ppx:configuration"/>

    12

  </xsl:template>

    13

  <xsl:template match="ppx:configuration">

    14

    <xsl:apply-templates select="ppx:globalVars/ppx:variable[ppx:type/ppx:derived] | ppx:resource">

    15

      <xsl:with-param name="parent_path">

    16

        <xsl:value-of select="@name"/>

    17

      </xsl:with-param>

    18

    </xsl:apply-templates>

    19

  </xsl:template>

    20

  <xsl:template match="ppx:resource">

    21

    <xsl:param name="parent_path"/>

    22

    <xsl:variable name="resource_path">

    23

      <xsl:value-of select="$parent_path"/>

    24

      <xsl:text>.</xsl:text>

    25

      <xsl:value-of select="@name"/>

    26

    </xsl:variable>

    27

    <xsl:apply-templates select="ppx:globalVars/ppx:variable[ppx:type/ppx:derived] | ppx:pouInstance | ppx:task/ppx:pouInstance">

    28

      <xsl:with-param name="parent_path">

    29

        <xsl:value-of select="$resource_path"/>

    30

      </xsl:with-param>

    31

    </xsl:apply-templates>

    32

  </xsl:template>

    33

  <xsl:template match="ppx:pouInstance">

    34

    <xsl:param name="parent_path"/>

    35

    <xsl:variable name="pou_instance_path">

    36

      <xsl:value-of select="$parent_path"/>

    37

      <xsl:text>.</xsl:text>

    38

      <xsl:value-of select="@name"/>

    39

    </xsl:variable>

    40

    <xsl:choose>

    41

      <xsl:when test="@typeName=$instance_type">

    42

        <xsl:value-of select="ns:AddInstance($pou_instance_path)"/>

    43

      </xsl:when>

    44

      <xsl:otherwise>

    45

        <xsl:variable name="type_name">

    46

          <xsl:value-of select="@typeName"/>

    47

        </xsl:variable>

    48

        <xsl:apply-templates select="$all_types/ppx:pous/ppx:pou[@name=$type_name] |                          $all_types/ppx:dataTypes/ppx:dataType[@name=$type_name]">

    49

          <xsl:with-param name="instance_path">

    50

            <xsl:value-of select="$pou_instance_path"/>

    51

          </xsl:with-param>

    52

        </xsl:apply-templates>

    53

      </xsl:otherwise>

    54

    </xsl:choose>

    55

  </xsl:template>

    56

  <xsl:template match="ppx:pou">

    57

    <xsl:param name="instance_path"/>

    58

    <xsl:apply-templates select="ppx:interface/*/ppx:variable[ppx:type/ppx:derived]">

    59

      <xsl:with-param name="parent_path">

    60

        <xsl:value-of select="$instance_path"/>

    61

      </xsl:with-param>

    62

    </xsl:apply-templates>

    63

  </xsl:template>

    64

  <xsl:template match="ppx:dataType">

    65

    <xsl:param name="instance_path" select="concat('#',@name)"/>

    66

    <xsl:apply-templates select="ppx:baseType/*[self::ppx:derived or self::ppx:struct or self::ppx:array]">

    67

      <xsl:with-param name="variable_path">

    68

        <xsl:value-of select="$instance_path"/>

    69

      </xsl:with-param>

    70

    </xsl:apply-templates>

    71

  </xsl:template>

    72

  <xsl:template match="ppx:variable">

    73

    <xsl:param name="parent_path"/>

    74

    <xsl:variable name="variable_path">

    75

      <xsl:value-of select="$parent_path"/>

    76

      <xsl:text>.</xsl:text>

    77

      <xsl:value-of select="@name"/>

    78

    </xsl:variable>

    79

    <xsl:apply-templates select="ppx:type/ppx:derived">

    80

      <xsl:with-param name="variable_path">

    81

        <xsl:value-of select="$variable_path"/>

    82

      </xsl:with-param>

    83

    </xsl:apply-templates>

    84

  </xsl:template>

    85

  <xsl:template match="ppx:derived">

    86

    <xsl:param name="variable_path"/>

    87

    <xsl:choose>

    88

      <xsl:when test="@name=$instance_type">

    89

        <xsl:value-of select="ns:AddInstance($variable_path)"/>

    90

      </xsl:when>

    91

      <xsl:otherwise>

    92

        <xsl:variable name="type_name">

    93

          <xsl:value-of select="@name"/>

    94

        </xsl:variable>

    95

        <xsl:apply-templates select="$all_types/ppx:pous/ppx:pou[@name=$type_name] |                          $all_types/ppx:dataTypes/ppx:dataType[@name=$type_name]">

    96

          <xsl:with-param name="instance_path">

    97

            <xsl:value-of select="$variable_path"/>

    98

          </xsl:with-param>

    99

        </xsl:apply-templates>

   100

      </xsl:otherwise>

   101

    </xsl:choose>

   102

  </xsl:template>

   103

  <xsl:template match="ppx:struct">

   104

    <xsl:param name="variable_path"/>

   105

    <xsl:for-each select="ppx:variable[ppx:type/ppx:derived or ppx:type/ppx:struct or ppx:type/ppx:array]">

   106

      <xsl:variable name="element_path">

   107

        <xsl:value-of select="$variable_path"/>

   108

        <xsl:text>.</xsl:text>

   109

        <xsl:value-of select="@name"/>

   110

      </xsl:variable>

   111

      <xsl:apply-templates select="ppx:type/*[self::ppx:derived or self::ppx:struct or self::ppx:array]">

   112

        <xsl:with-param name="variable_path">

   113

          <xsl:value-of select="$element_path"/>

   114

        </xsl:with-param>

   115

      </xsl:apply-templates>

   116

    </xsl:for-each>

   117

  </xsl:template>

   118

  <xsl:template match="ppx:array">

   119

    <xsl:param name="variable_path"/>

   120

    <xsl:apply-templates select="ppx:baseType/*[self::ppx:derived or self::ppx:struct or self::ppx:array]">

   121

      <xsl:with-param name="variable_path">

   122

        <xsl:value-of select="$variable_path"/>

   123

      </xsl:with-param>

   124

    </xsl:apply-templates>

   125

  </xsl:template>

   126

</xsl:stylesheet>