New tests, update
[mono.git] / mcs / class / System.XML / Mono.Xml.Xsl.Operations / XslForEach.cs
1 //
2 // XslForEach.cs
3 //
4 // Authors:
5 //      Ben Maurer (bmaurer@users.sourceforge.net)
6 //      Atsushi Enomoto (ginga@kit.hi-ho.ne.jp)
7 //      
8 // (C) 2003 Ben Maurer
9 // (C) 2003 Atsushi Enomoto
10 //
11
12 //
13 // Permission is hereby granted, free of charge, to any person obtaining
14 // a copy of this software and associated documentation files (the
15 // "Software"), to deal in the Software without restriction, including
16 // without limitation the rights to use, copy, modify, merge, publish,
17 // distribute, sublicense, and/or sell copies of the Software, and to
18 // permit persons to whom the Software is furnished to do so, subject to
19 // the following conditions:
20 // 
21 // The above copyright notice and this permission notice shall be
22 // included in all copies or substantial portions of the Software.
23 // 
24 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
25 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
26 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
27 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
28 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
29 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
30 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
31 //
32
33 using System;
34 using System.Collections;
35 using System.Xml;
36 using System.Xml.XPath;
37 using System.Xml.Xsl;
38
39 namespace Mono.Xml.Xsl.Operations {
40         internal class XslForEach : XslCompiledElement {
41                 XPathExpression select;
42                 XslOperation children;
43                 XslSortEvaluator sortEvaluator;
44                 
45                 public XslForEach (Compiler c) : base (c) {}
46                 
47                 protected override void Compile (Compiler c)
48                 {
49                         if (c.Debugger != null)
50                                 c.Debugger.DebugCompile (c.Input);
51
52                         c.CheckExtraAttributes ("for-each", "select");
53
54                         c.AssertAttribute ("select");
55                         select = c.CompileExpression (c.GetAttribute ("select"));
56                         ArrayList sorterList = null;
57                         
58                         if (c.Input.MoveToFirstChild ()) {
59                                 bool alldone = true;
60                                 do {
61                                         if (c.Input.NodeType == XPathNodeType.Text)
62                                                 { alldone = false; break; }
63                                         
64                                         if (c.Input.NodeType != XPathNodeType.Element)
65                                                 continue;
66                                         if (c.Input.NamespaceURI != Compiler.XsltNamespace)
67                                                 { alldone = false; break; }
68                                         if (c.Input.LocalName != "sort")
69                                                 { alldone = false; break; }
70                                         //c.AddSort (select, new Sort (c));
71                                         if (sorterList == null)
72                                                 sorterList = new ArrayList ();
73                                         sorterList.Add (new Sort (c));
74                                 } while (c.Input.MoveToNext ());
75                                 if (!alldone)
76                                         children = c.CompileTemplateContent ();
77                                 c.Input.MoveToParent ();
78                         }
79                         if (sorterList != null)
80                                 sortEvaluator = new XslSortEvaluator (select,
81                                         (Sort []) sorterList.ToArray (typeof (Sort)));
82                 }
83                 
84                 public override void Evaluate (XslTransformProcessor p)
85                 {
86                         if (p.Debugger != null)
87                                 p.Debugger.DebugExecute (p, this.DebugInput);
88
89                         if (children == null)
90                                 return;
91
92                         XPathNodeIterator iter = sortEvaluator != null ?
93                                 sortEvaluator.SortedSelect (p) :
94                                 p.Select (select);
95
96                         
97                         while (p.NodesetMoveNext (iter)) {
98                                 p.PushNodeset (iter);
99                                 p.PushForEachContext ();
100                                 children.Evaluate (p);
101                                 p.PopForEachContext();
102                                 p.PopNodeset ();
103                         }
104                 }
105         }
106 }