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                 Hashtable nsDecls;
  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                         nsDecls = c.GetNamespacesToCopy ();
  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                                 if (colonAt > 0)
  65                                         calcName = calcName.Substring (colonAt + 1);
  66
  67                                 try {
  68                                         XmlConvert.VerifyNCName (calcName);
  69                                         if (calcPrefix != String.Empty)
  70                                                 XmlConvert.VerifyNCName (calcPrefix);
  71                                 } catch (XmlException ex) {
  72                                         throw new XsltCompileException ("Invalid name attribute", ex, c.Input);
  73                                 }
  74
  75                                 if (ns == null) {
  76                                         calcNs = c.Input.GetNamespace (calcPrefix);
  77                                         if (calcPrefix != String.Empty && calcNs == String.Empty)
  78                                                 throw new XsltCompileException ("Invalid name attribute", null, c.Input);
  79                                 }
  80                         } else if (ns != null)
  81                                 calcNs = XslAvt.AttemptPreCalc (ref ns);
  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                         QName q = XslNameUtil.FromString (nm, nsDecls);
 101                         localName = q.Name;
 102                         if (nmsp == null)
 103                                 nmsp = q.Namespace;
 104                         int colonAt = nm.IndexOf (':');
 105                         if (colonAt > 0)
 106                                 calcPrefix = nm.Substring (0, colonAt);
 107                         else if (colonAt == 0)
 108                                 // raises an error
 109                                 XmlConvert.VerifyNCName (String.Empty);
 110
 111                         prefix = calcPrefix != null ? calcPrefix : String.Empty;
 112
 113                         if (prefix != String.Empty)
 114                                 XmlConvert.VerifyNCName (prefix);
 115                         XmlConvert.VerifyNCName (localName);
 116
 117                         bool isCData = p.InsideCDataElement;
 118                         p.PushElementState (prefix, localName, nmsp, false);
 119                         p.Out.WriteStartElement (prefix, localName, nmsp);
 120
 121                         if (useAttributeSets != null)
 122                                 foreach (XmlQualifiedName s in useAttributeSets)
 123                                         p.ResolveAttributeSet (s).Evaluate (p);
 124
 125                         if (value != null) value.Evaluate (p);
 126
 127                         if (isEmptyElement && useAttributeSets == null)
 128                                 p.Out.WriteEndElement ();
 129                         else
 130                                 p.Out.WriteFullEndElement ();
 131                         p.PopCDataState (isCData);
 132                 }
 133         }
 134 }