mcs/class/System.XML/Mono.Xml.Xsl.Operations/XslLiteralElement.cs

   1 //
   2 // XslLiteralElement.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 XslLiteralElement : XslCompiledElement {
  41                 XslOperation children;
  42                 string localname, prefix, nsUri;
  43                 bool isEmptyElement;
  44                 ArrayList attrs;
  45                 XmlQualifiedName [] useAttributeSets;
  46                 Hashtable nsDecls;
  47
  48                 public XslLiteralElement (Compiler c) : base (c) {}
  49
  50                 class XslLiteralAttribute {
  51                         string localname, prefix, nsUri;
  52                         XslAvt val;
  53
  54                         public XslLiteralAttribute (Compiler c)
  55                         {
  56                                 this.prefix = c.Input.Prefix;
  57                                 if (prefix.Length > 0) {
  58                                         string alias =
  59                                                 c.CurrentStylesheet.GetActualPrefix (prefix);
  60                                         if (alias != prefix) {
  61                                                 prefix = alias;
  62                                                 XPathNavigator clone = c.Input.Clone ();
  63                                                 clone.MoveToParent ();
  64                                                 nsUri = clone.GetNamespace (alias);
  65                                         }
  66                                         else
  67                                                 nsUri = c.Input.NamespaceURI;
  68                                 }
  69                                 else
  70                                         nsUri = String.Empty;
  71                                 this.localname = c.Input.LocalName;
  72                                 this.val = new XslAvt (c.Input.Value, c);
  73                         }
  74
  75                         public void Evaluate (XslTransformProcessor p)
  76                         {
  77                                 //FIXME: fix attribute prefixes according to aliases
  78                                 p.Out.WriteAttributeString (prefix, localname, nsUri, val.Evaluate (p));
  79                         }
  80                 }
  81
  82                 protected override void Compile (Compiler c)
  83                 {
  84                         if (c.Debugger != null)
  85                                 c.Debugger.DebugCompile (this.DebugInput);
  86
  87                         prefix = c.Input.Prefix;
  88                         string alias = c.CurrentStylesheet.GetActualPrefix (prefix);
  89                         if (alias != prefix) {
  90                                 prefix = alias;
  91                                 nsUri = c.Input.GetNamespace (alias);
  92                         }
  93                         else
  94                                 nsUri = c.Input.NamespaceURI;
  95
  96                         this.localname = c.Input.LocalName;
  97                         this.useAttributeSets = c.ParseQNameListAttribute ("use-attribute-sets", XsltNamespace);
  98                         this.nsDecls = c.GetNamespacesToCopy ();
  99                         if (nsDecls.Count == 0) nsDecls = null;
 100                         this.isEmptyElement = c.Input.IsEmptyElement;
 101
 102                         if (c.Input.MoveToFirstAttribute ())
 103                         {
 104                                 attrs = new ArrayList ();
 105                                 do {
 106                                         if (c.Input.NamespaceURI == XsltNamespace)
 107                                                 continue; //already handled
 108                                         attrs.Add (new XslLiteralAttribute (c));
 109                                 } while (c.Input.MoveToNextAttribute());
 110                                 c.Input.MoveToParent ();
 111                         }
 112
 113                         if (!c.Input.MoveToFirstChild ()) return;
 114                         children = c.CompileTemplateContent ();
 115                         c.Input.MoveToParent ();
 116                 }
 117
 118                 public override void Evaluate (XslTransformProcessor p)
 119                 {
 120                         if (p.Debugger != null)
 121                                 p.Debugger.DebugExecute (p, this.DebugInput);
 122
 123                         // Since namespace-alias might be determined after compilation
 124                         // of import-ing stylesheets, this must be determined later.
 125                         bool isCData = p.InsideCDataElement;
 126                         p.PushElementState (prefix, localname, nsUri, true);
 127                         p.Out.WriteStartElement (prefix, localname, nsUri);
 128
 129                         if (useAttributeSets != null)
 130                                 foreach (XmlQualifiedName s in useAttributeSets)
 131                                         p.ResolveAttributeSet (s).Evaluate (p);
 132
 133                         if (attrs != null) {
 134                                 int len = attrs.Count;
 135                                 for (int i = 0; i < len; i++)
 136                                         ((XslLiteralAttribute)attrs [i]).Evaluate (p);
 137                         }
 138
 139                         p.OutputLiteralNamespaceUriNodes (nsDecls, null, null);
 140
 141                         if (children != null) children.Evaluate (p);
 142
 143                         var templateContent = children as XslTemplateContent;
 144                         if (isEmptyElement || (templateContent != null && templateContent.IsEmptyElement))
 145                                 p.Out.WriteEndElement ();
 146                         else
 147                                 p.Out.WriteFullEndElement ();
 148
 149                         p.PopCDataState (isCData);
 150                 }
 151         }
 152 }