* Form.cs: Provide meaningful message when MdiParent is assigned a

[mono.git] / mcs / class / System.XML / Mono.Xml.Xsl.Operations / XslElement.cs

diff --git a/mcs/class/System.XML/Mono.Xml.Xsl.Operations/XslElement.cs b/mcs/class/System.XML/Mono.Xml.Xsl.Operations/XslElement.cs
index 120569a71c88e2c7d2d10f4810341f636fcc45a9..19f2d7d9d45f7cedad236738ef62ca6c9be26400 100644 (file)
--- a/mcs/class/System.XML/Mono.Xml.Xsl.Operations/XslElement.cs
+++ b/mcs/class/System.XML/Mono.Xml.Xsl.Operations/XslElement.cs
@@ -9,44 +9,126 @@
 // (C) 2003 Atsushi Enomoto
 //
 
+//
+// Permission is hereby granted, free of charge, to any person obtaining
+// a copy of this software and associated documentation files (the
+// "Software"), to deal in the Software without restriction, including
+// without limitation the rights to use, copy, modify, merge, publish,
+// distribute, sublicense, and/or sell copies of the Software, and to
+// permit persons to whom the Software is furnished to do so, subject to
+// the following conditions:
+// 
+// The above copyright notice and this permission notice shall be
+// included in all copies or substantial portions of the Software.
+// 
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+//
+
 using System;
 using System.Collections;
 using System.Xml;
 using System.Xml.XPath;
 using System.Xml.Xsl;
 
+using QName = System.Xml.XmlQualifiedName;
+
 namespace Mono.Xml.Xsl.Operations {    
-       public class XslElement : XslCompiledElement {
-               XslAvt name;
-               XslAvt ns;
+       internal class XslElement : XslCompiledElement {
+               XslAvt name, ns;
+               string calcName, calcNs, calcPrefix;
+               Hashtable nsDecls;
+               bool isEmptyElement;
+
                XslOperation value;
                XmlQualifiedName [] useAttributeSets;
-               
+
                public XslElement (Compiler c) : base (c) {}
                protected override void Compile (Compiler c)
                {
                        name = c.ParseAvtAttribute ("name");
                        ns = c.ParseAvtAttribute ("namespace");
+                       nsDecls = c.GetNamespacesToCopy ();
+                       calcName = XslAvt.AttemptPreCalc (ref name);
+                       
+                       if (calcName != null) {
+                               int colonAt = calcName.IndexOf (':');
+                               if (colonAt == 0)
+                                       throw new XsltCompileException ("Invalid name attribute", null, c.Input);
+                               calcPrefix = colonAt < 0 ? String.Empty : calcName.Substring (0, colonAt);
+                               if (colonAt > 0)
+                                       calcName = calcName.Substring (colonAt + 1);
+
+                               try {
+                                       XmlConvert.VerifyNCName (calcName);
+                                       if (calcPrefix != String.Empty)
+                                               XmlConvert.VerifyNCName (calcPrefix);
+                               } catch (XmlException ex) {
+                                       throw new XsltCompileException ("Invalid name attribute", ex, c.Input);
+                               }
+
+                               if (ns == null) {
+                                       calcNs = c.Input.GetNamespace (calcPrefix);
+                                       if (calcPrefix != String.Empty && calcNs == String.Empty)
+                                               throw new XsltCompileException ("Invalid name attribute", null, c.Input);
+                               }
+                       } else if (ns != null)
+                               calcNs = XslAvt.AttemptPreCalc (ref ns);
+                       
                        useAttributeSets = c.ParseQNameListAttribute ("use-attribute-sets");
                        
+                       isEmptyElement = c.Input.IsEmptyElement;
+
                        if (c.Input.MoveToFirstChild ()) {
-                               value = c.CompileTemplateContent ();
+                               value = c.CompileTemplateContent (XPathNodeType.Element);
                                c.Input.MoveToParent ();
                        }
                }
                
                public override void Evaluate (XslTransformProcessor p)
                {
-                       string nm = name.Evaluate (p);
-                       string nsUri = ns == null ? null : ns.Evaluate (p);
+                       string nm, nmsp, localName, prefix;
                        
-                       p.Out.WriteStartElement (nm, nsUri);
+                       localName = nm = calcName != null ? calcName : name.Evaluate (p);
+                       nmsp = calcNs != null ? calcNs : ns != null ? ns.Evaluate (p) : null;
+
+                       QName q = XslNameUtil.FromString (nm, nsDecls);
+                       localName = q.Name;
+                       if (nmsp == null)
+                               nmsp = q.Namespace;
+                       int colonAt = nm.IndexOf (':');
+                       if (colonAt > 0)
+                               calcPrefix = nm.Substring (0, colonAt);
+                       else if (colonAt == 0)
+                               // raises an error
+                               XmlConvert.VerifyNCName (String.Empty);
+
+                       prefix = calcPrefix != null ? calcPrefix : String.Empty;
+
+                       if (prefix != String.Empty)
+                               XmlConvert.VerifyNCName (prefix);
+                       XmlConvert.VerifyNCName (localName);
+
+                       bool isCData = p.InsideCDataElement;
+                       p.PushElementState (prefix, localName, nmsp, false);
+                       p.Out.WriteStartElement (prefix, localName, nmsp);
+
                        if (useAttributeSets != null)
                                foreach (XmlQualifiedName s in useAttributeSets)
                                        p.ResolveAttributeSet (s).Evaluate (p);
-                       
+
                        if (value != null) value.Evaluate (p);
-                       p.Out.WriteEndElement ();
+
+                       if (isEmptyElement && useAttributeSets == null)
+                               p.Out.WriteEndElement ();
+                       else
+                               p.Out.WriteFullEndElement ();
+                       p.PopCDataState (isCData);
                }
        }
 }