2005-03-02 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                 public XslElement (Compiler c) : base (c) {}
52                 protected override void Compile (Compiler c)
53                 {
54                         name = c.ParseAvtAttribute ("name");
55                         ns = c.ParseAvtAttribute ("namespace");
56                         
57                         calcName = XslAvt.AttemptPreCalc (ref name);
58                         
59                         if (calcName != null) {
60                                 int colonAt = calcName.IndexOf (':');
61                                 if (colonAt == 0)
62                                         throw new XsltCompileException ("Invalid name attribute.", null, c.Input);
63                                 calcPrefix = colonAt < 0 ? String.Empty : calcName.Substring (0, colonAt);
64                                 calcName = colonAt < 0 ? calcName : calcName.Substring (colonAt + 1, calcName.Length - colonAt - 1);
65                                 if (ns == null)
66                                         calcNs = c.Input.GetNamespace (calcPrefix);
67
68                                 try {
69                                         XmlConvert.VerifyNCName (calcName);
70                                         if (calcPrefix != String.Empty)
71                                                 XmlConvert.VerifyNCName (calcPrefix);
72                                 } catch (XmlException ex) {
73                                         throw new XsltCompileException ("Invalid name attribute.", ex, c.Input);
74                                 }
75                         } else if (ns != null)
76                                 calcNs = XslAvt.AttemptPreCalc (ref ns);
77                         
78                         if (ns == null && calcNs == null)
79                                 nsm = c.GetNsm ();
80                         
81                         useAttributeSets = c.ParseQNameListAttribute ("use-attribute-sets");
82                         
83                         isEmptyElement = c.Input.IsEmptyElement;
84
85                         if (c.Input.MoveToFirstChild ()) {
86                                 value = c.CompileTemplateContent (XPathNodeType.Element);
87                                 c.Input.MoveToParent ();
88                         }
89                 }
90                 
91                 public override void Evaluate (XslTransformProcessor p)
92                 {
93                         string nm, nmsp, localName, prefix;
94                         
95                         localName = nm = calcName != null ? calcName : name.Evaluate (p);
96                         nmsp = calcNs != null ? calcNs : ns != null ? ns.Evaluate (p) : null;
97
98                         if (nmsp == null) {
99                                 QName q = XslNameUtil.FromString (nm, nsm);
100                                 localName = q.Name;
101                                 nmsp = q.Namespace;
102                                 int colonAt = nm.IndexOf (':');
103                                 if (colonAt > 0)
104                                         calcPrefix = nm.Substring (0, colonAt);
105                                 else if (colonAt == 0)
106                                         // raises an error
107                                         XmlConvert.VerifyNCName (String.Empty);
108                         }
109                         prefix = calcPrefix != null ? calcPrefix : String.Empty;
110
111                         if (prefix != String.Empty)
112                                 XmlConvert.VerifyNCName (prefix);
113                         XmlConvert.VerifyNCName (localName);
114
115                         bool isCData = p.InsideCDataElement;
116                         p.PushElementState (prefix, localName, nmsp, false);
117                         p.Out.WriteStartElement (prefix, localName, nmsp);
118
119                         if (useAttributeSets != null)
120                                 foreach (XmlQualifiedName s in useAttributeSets)
121                                         p.ResolveAttributeSet (s).Evaluate (p);
122
123                         if (value != null) value.Evaluate (p);
124
125                         if (isEmptyElement && useAttributeSets == null)
126                                 p.Out.WriteEndElement ();
127                         else
128                                 p.Out.WriteFullEndElement ();
129                         p.PopCDataState (isCData);
130                 }
131         }
132 }