xslt adventure

Hi,


As good things are good to replicate, I would like to send my regards and copy-paste replicate this hashtable implementation by Mukul Gandhi:

view plainprint?

1. <?xml version="1.0" encoding="UTF-8"?>  
2. <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">  
3.  <xsl:output method="text" />  
4.    
5.  <xsl:template match="/">  
6.       <xsl:call-template name="getValue">  
7.           <xsl:with-param name="hashtable" select="'key:a,1,2,3,4,key:b,5,6,7,key:c,8,9'" />  
8.           <xsl:with-param name="key" select="'b'" />  
9.           <xsl:with-param name="delim" select="','" />  
10.       </xsl:call-template>        
11.       <xsl:text>--------------------------  
12. </xsl:text>  
13.       <xsl:call-template name="getValue">  
14.           <xsl:with-param name="hashtable" select="'key:1,1,2,3,4,key:2,5,6,7,key:3,8,9'" />  
15.           <xsl:with-param name="key" select="'3'" />  
16.           <xsl:with-param name="delim" select="','" />  
17.       </xsl:call-template>        
18.       <xsl:text>--------------------------  
19. </xsl:text>  
20.       <xsl:call-template name="getValue">  
21.           <xsl:with-param name="hashtable" select="'key:1,a,key:2,b,key:3,c'" />  
22.           <xsl:with-param name="key" select="'3'" />  
23.           <xsl:with-param name="delim" select="','" />  
24.       </xsl:call-template>        
25.       <xsl:text>--------------------------  
26. </xsl:text>  
27.       <xsl:call-template name="enumerateKeys">  
28.           <xsl:with-param name="hashtable" select="'key:1,1,2,3,4,key:2,5,6,7,key:3,8,9'" />  
29.           <xsl:with-param name="delim" select="','" />  
30.       </xsl:call-template>        
31.       <xsl:text>--------------------------  
32. </xsl:text>  
33.             <xsl:call-template name="enumerateKeys">  
34.           <xsl:with-param name="hashtable" select="'key:1,qwert'" />  
35.           <xsl:with-param name="delim" select="','" />  
36.       </xsl:call-template>        
37.       <xsl:text>--------------------------  
38. </xsl:text>  
39.       <xsl:call-template name="enumerateKeyValuePairs">  
40.           <xsl:with-param name="hashtable" select="'key:1,qwert'" />  
41.           <xsl:with-param name="delim" select="','" />  
42.       </xsl:call-template>        
43.       <xsl:text>--------------------------  
44. </xsl:text>  
45.       <xsl:call-template name="enumerateKeyValuePairs">  
46.           <xsl:with-param name="hashtable" select="'key:fruits,apple,guava,key:flowers,rose,sunflower'" />  
47.           <xsl:with-param name="delim" select="','" />  
48.       </xsl:call-template>        
49.       <xsl:text>--------------------------  
50. </xsl:text>  
51.  </xsl:template>  
52.    
53.  <xsl:template name="getValue">  
54.      <xsl:param name="hashtable" />  
55.      <xsl:param name="key" />  
56.      <xsl:param name="delim" />  
57.        
58.      <xsl:if test="contains(substring-after($hashtable, concat('key:', $key, $delim)), 'key:')">  
59.          <xsl:value-of select="substring-before(substring-after($hashtable, concat('key:', $key, $delim)), concat($delim, 'key:'))" /><xsl:text>  
60. </xsl:text>  
61.      </xsl:if>  
62.      <xsl:if test="not(contains(substring-after($hashtable, concat('key:', $key, $delim)), 'key:'))">  
63.          <xsl:value-of select="substring-after($hashtable, concat('key:', $key, $delim))" /><xsl:text>  
64. </xsl:text>  
65.      </xsl:if>  
66.  </xsl:template>  
67.    
68.  <xsl:template name="enumerateKeys">  
69.      <xsl:param name="hashtable" />  
70.            <xsl:param name="delim" />  
71.   
72.            <xsl:if test="contains($hashtable, $delim)">  
73.                <xsl:if test="starts-with(substring-before($hashtable, $delim), 'key:')">  
74.                    <xsl:value-of select="substring-after(substring-before($hashtable, $delim), 'key:')" /><xsl:text>  
75. </xsl:text>  
76.                </xsl:if>           
77.          <xsl:call-template name="enumerateKeys">  
78.              <xsl:with-param name="hashtable" select="substring-after($hashtable, $delim)" />  
79.              <xsl:with-param name="delim" select="$delim" />  
80.          </xsl:call-template>  
81.      </xsl:if>  
82.      <xsl:if test="not(contains($hashtable, $delim))">  
83.         <xsl:if test="starts-with($hashtable, 'key:')">  
84.            <xsl:value-of select="substring-after($hashtable, 'key:')" /><xsl:text>  
85. </xsl:text>  
86.         </xsl:if>    
87.      </xsl:if>  
88.  </xsl:template>  
89.    
90.  <xsl:template name="enumerateKeyValuePairs">  
91.      <xsl:param name="hashtable" />  
92.            <xsl:param name="delim" />  
93.    
94.            <xsl:if test="contains($hashtable, 'key:')">  
95.                <xsl:if test="starts-with(substring-before($hashtable, $delim), 'key:')">  
96.                    Key : <xsl:value-of select="substring-after(substring-before($hashtable, $delim), 'key:')" />   
97.                    <xsl:variable name="val">  
98.                       <xsl:call-template name="getValue">  
99.                  <xsl:with-param name="hashtable" select="$hashtable" />  
100.                     <xsl:with-param name="key" select="substring-after(substring-before($hashtable, $delim), 'key:')" />  
101.                     <xsl:with-param name="delim" select="$delim" />  
102.                 </xsl:call-template>        
103.              </xsl:variable>  
104.              Value: <xsl:value-of select="$val" />  
105.                   <xsl:text>  
106. </xsl:text>  
107.                    <xsl:call-template name="enumerateKeyValuePairs">  
108.                   <xsl:with-param name="hashtable" select="substring-after($hashtable, normalize-space(concat(substring-before($hashtable, $delim), $delim, substring($val, 1, string-length($val) - 1), $delim)))" />  
109.                   <xsl:with-param name="delim" select="$delim" />  
110.              </xsl:call-template>             
111.                </xsl:if>                    
112.      </xsl:if>  
113.  </xsl:template>  
114.    
115. </xsl:stylesheet>  

<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
 <xsl:output method="text" />
 
 <xsl:template match="/">
      <xsl:call-template name="getValue">
          <xsl:with-param name="hashtable" select="'key:a,1,2,3,4,key:b,5,6,7,key:c,8,9'" />
          <xsl:with-param name="key" select="'b'" />
          <xsl:with-param name="delim" select="','" />
      </xsl:call-template>      
      <xsl:text>--------------------------
</xsl:text>
      <xsl:call-template name="getValue">
          <xsl:with-param name="hashtable" select="'key:1,1,2,3,4,key:2,5,6,7,key:3,8,9'" />
          <xsl:with-param name="key" select="'3'" />
          <xsl:with-param name="delim" select="','" />
      </xsl:call-template>      
      <xsl:text>--------------------------
</xsl:text>
      <xsl:call-template name="getValue">
          <xsl:with-param name="hashtable" select="'key:1,a,key:2,b,key:3,c'" />
          <xsl:with-param name="key" select="'3'" />
          <xsl:with-param name="delim" select="','" />
      </xsl:call-template>      
      <xsl:text>--------------------------
</xsl:text>
      <xsl:call-template name="enumerateKeys">
          <xsl:with-param name="hashtable" select="'key:1,1,2,3,4,key:2,5,6,7,key:3,8,9'" />
          <xsl:with-param name="delim" select="','" />
      </xsl:call-template>      
      <xsl:text>--------------------------
</xsl:text>
            <xsl:call-template name="enumerateKeys">
          <xsl:with-param name="hashtable" select="'key:1,qwert'" />
          <xsl:with-param name="delim" select="','" />
      </xsl:call-template>      
      <xsl:text>--------------------------
</xsl:text>
      <xsl:call-template name="enumerateKeyValuePairs">
          <xsl:with-param name="hashtable" select="'key:1,qwert'" />
          <xsl:with-param name="delim" select="','" />
      </xsl:call-template>      
      <xsl:text>--------------------------
</xsl:text>
      <xsl:call-template name="enumerateKeyValuePairs">
          <xsl:with-param name="hashtable" select="'key:fruits,apple,guava,key:flowers,rose,sunflower'" />
          <xsl:with-param name="delim" select="','" />
      </xsl:call-template>      
      <xsl:text>--------------------------
</xsl:text>
 </xsl:template>
 
 <xsl:template name="getValue">
     <xsl:param name="hashtable" />
     <xsl:param name="key" />
     <xsl:param name="delim" />
     
     <xsl:if test="contains(substring-after($hashtable, concat('key:', $key, $delim)), 'key:')">
         <xsl:value-of select="substring-before(substring-after($hashtable, concat('key:', $key, $delim)), concat($delim, 'key:'))" /><xsl:text>
</xsl:text>
     </xsl:if>
     <xsl:if test="not(contains(substring-after($hashtable, concat('key:', $key, $delim)), 'key:'))">
         <xsl:value-of select="substring-after($hashtable, concat('key:', $key, $delim))" /><xsl:text>
</xsl:text>
     </xsl:if>
 </xsl:template>
 
 <xsl:template name="enumerateKeys">
     <xsl:param name="hashtable" />
           <xsl:param name="delim" />

           <xsl:if test="contains($hashtable, $delim)">
               <xsl:if test="starts-with(substring-before($hashtable, $delim), 'key:')">
                   <xsl:value-of select="substring-after(substring-before($hashtable, $delim), 'key:')" /><xsl:text>
</xsl:text>
               </xsl:if>         
         <xsl:call-template name="enumerateKeys">
             <xsl:with-param name="hashtable" select="substring-after($hashtable, $delim)" />
             <xsl:with-param name="delim" select="$delim" />
         </xsl:call-template>
     </xsl:if>
     <xsl:if test="not(contains($hashtable, $delim))">
        <xsl:if test="starts-with($hashtable, 'key:')">
           <xsl:value-of select="substring-after($hashtable, 'key:')" /><xsl:text>
</xsl:text>
        </xsl:if>  
     </xsl:if>
 </xsl:template>
 
 <xsl:template name="enumerateKeyValuePairs">
     <xsl:param name="hashtable" />
           <xsl:param name="delim" />
 
           <xsl:if test="contains($hashtable, 'key:')">
               <xsl:if test="starts-with(substring-before($hashtable, $delim), 'key:')">
                   Key : <xsl:value-of select="substring-after(substring-before($hashtable, $delim), 'key:')" /> 
                   <xsl:variable name="val">
                      <xsl:call-template name="getValue">
                 <xsl:with-param name="hashtable" select="$hashtable" />
                    <xsl:with-param name="key" select="substring-after(substring-before($hashtable, $delim), 'key:')" />
                    <xsl:with-param name="delim" select="$delim" />
                </xsl:call-template>      
             </xsl:variable>
             Value: <xsl:value-of select="$val" />
                  <xsl:text>
</xsl:text>
                   <xsl:call-template name="enumerateKeyValuePairs">
                  <xsl:with-param name="hashtable" select="substring-after($hashtable, normalize-space(concat(substring-before($hashtable, $delim), $delim, substring($val, 1, string-length($val) - 1), $delim)))" />
                  <xsl:with-param name="delim" select="$delim" />
             </xsl:call-template>           
               </xsl:if>                  
     </xsl:if>
 </xsl:template>
 
</xsl:stylesheet>

Want to dive into more of such advanced things done with xslt? Go ahead!