2004-08-25 Atsushi Enomoto <atsushi@ximian.com>
[mono.git] / mcs / class / System.XML / Mono.Xml.Xsl.Operations / XslElement.cs
1 //
2 // XslElement.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 using QName = System.Xml.XmlQualifiedName;
40
41 namespace Mono.Xml.Xsl.Operations {     
42         internal class XslElement : XslCompiledElement {
43                 XslAvt name, ns;
44                 string calcName, calcNs, calcPrefix;
45                 XmlNamespaceManager nsm;
46                 bool isEmptyElement;
47
48                 XslOperation value;
49                 XmlQualifiedName [] useAttributeSets;
50
51                 XPathNavigator nav;
52                 
53                 public XslElement (Compiler c) : base (c) {}
54                 protected override void Compile (Compiler c)
55                 {
56                         nav = c.Input.Clone ();
57
58                         name = c.ParseAvtAttribute ("name");
59                         ns = c.ParseAvtAttribute ("namespace");
60                         
61                         calcName = XslAvt.AttemptPreCalc (ref name);
62                         
63                         if (calcName != null) {
64                                 int colonAt = calcName.IndexOf (':');
65                                 calcPrefix = colonAt < 0 ? String.Empty : calcName.Substring (0, colonAt);
66                                 calcName = colonAt < 0 ? calcName : calcName.Substring (colonAt + 1, calcName.Length - colonAt - 1);
67                                 if (ns == null)
68                                         calcNs = c.Input.GetNamespace (calcPrefix);
69
70                                 try {
71                                         XmlConvert.VerifyNCName (calcName);
72                                         if (calcPrefix != String.Empty)
73                                                 XmlConvert.VerifyNCName (calcPrefix);
74                                 } catch (XmlException ex) {
75                                         throw new XsltCompileException ("Invalid attribute name.", ex, c.Input);
76                                 }
77                         } else if (ns != null)
78                                 calcNs = XslAvt.AttemptPreCalc (ref ns);
79                         
80                         if (ns == null && calcNs == null)
81                                 nsm = c.GetNsm ();
82                         
83                         useAttributeSets = c.ParseQNameListAttribute ("use-attribute-sets");
84                         
85                         isEmptyElement = c.Input.IsEmptyElement;
86
87                         if (c.Input.MoveToFirstChild ()) {
88                                 value = c.CompileTemplateContent (XPathNodeType.Element);
89                                 c.Input.MoveToParent ();
90                         }
91                 }
92                 
93                 public override void Evaluate (XslTransformProcessor p)
94                 {
95                         string nm, nmsp, localName, prefix;
96                         
97                         localName = nm = calcName != null ? calcName : name.Evaluate (p);
98                         nmsp = calcNs != null ? calcNs : ns != null ? ns.Evaluate (p) : null;
99
100                         if (nmsp == null) {
101                                 QName q = XslNameUtil.FromString (nm, nsm);
102                                 localName = q.Name;
103                                 nmsp = q.Namespace;
104                                 int colonAt = nm.IndexOf (':');
105                                 if (colonAt > 0)
106                                         calcPrefix = nm.Substring (0, colonAt);
107                         }
108                         prefix = calcPrefix != null ? calcPrefix : String.Empty;
109
110 #if false
111                         if (calcPrefix == String.Empty) {
112                                 if (nav.MoveToFirstNamespace (XPathNamespaceScope.ExcludeXml)) {
113                                         do {
114                                                 if (nav.Value == nmsp) {
115 //                                                      prefix = nav.Name;
116                                                         break;
117                                                 }
118                                         } while (nav.MoveToNextNamespace (XPathNamespaceScope.ExcludeXml));
119                                         nav.MoveToParent ();
120                                 }
121                         }
122 #endif
123
124                         XmlConvert.VerifyName (nm);
125
126                         bool isCData = p.InsideCDataElement;
127                         p.PushElementState (localName, nmsp, false);
128                         p.Out.WriteStartElement (prefix, localName, nmsp);
129                         p.TryStylesheetNamespaceOutput (null);
130
131                         if (useAttributeSets != null)
132                                 foreach (XmlQualifiedName s in useAttributeSets)
133                                         p.ResolveAttributeSet (s).Evaluate (p);
134
135                         if (value != null) value.Evaluate (p);
136
137                         if (isEmptyElement && useAttributeSets == null)
138                                 p.Out.WriteEndElement ();
139                         else
140                                 p.Out.WriteFullEndElement ();
141                         p.PopCDataState (isCData);
142                 }
143         }
144 }