Merge pull request #993 from ancailliau/fix-datacontract-json-serialization
[mono.git] / mcs / class / System.XML / Mono.Xml.Xsl.Operations / XslProcessingInstruction.cs
1 //
2 // XslProcessingInstruction.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.Globalization;
36 using System.Xml;
37 using System.Xml.XPath;
38 using System.Xml.Xsl;
39 using System.IO;
40
41 namespace Mono.Xml.Xsl.Operations {
42         internal class XslProcessingInstruction : XslCompiledElement {
43                 XslAvt name;
44                 XslOperation value;
45                 
46                 public XslProcessingInstruction (Compiler c) : base (c) {}
47                 
48                 protected override void Compile (Compiler c)
49                 {
50                         if (c.Debugger != null)
51                                 c.Debugger.DebugCompile (this.DebugInput);
52
53                         c.CheckExtraAttributes ("processing-instruction", "name");
54
55                         name = c.ParseAvtAttribute ("name");
56
57                         if (!c.Input.MoveToFirstChild ()) return;
58                         
59                         value = c.CompileTemplateContent (XPathNodeType.ProcessingInstruction);
60                         c.Input.MoveToParent ();
61                 }
62
63                 public override void Evaluate (XslTransformProcessor p)
64                 {
65                         if (p.Debugger != null)
66                                 p.Debugger.DebugExecute (p, this.DebugInput);
67
68                         string actualName = name.Evaluate (p);
69                         if (String.Compare (actualName, "xml", true, CultureInfo.InvariantCulture) == 0)
70                                 throw new XsltException ("Processing instruction name was evaluated to \"xml\"", null, p.CurrentNode);
71                         if (actualName.IndexOf (':') >= 0)
72                                 return; //MS.NET ignores such processing instructions
73
74                         p.Out.WriteProcessingInstruction (actualName,
75                                 value == null ? String.Empty :
76                                 value.EvaluateAsString (p));
77                 }
78         }
79 }