* LosFormatter.cs: Avoid using Position when stream is unseekable.
[mono.git] / mcs / class / System.Web / System.Web.UI / UserControlParser.cs
1 //
2 // System.Web.UI.UserControlParser
3 //
4 // Authors:
5 //      Gonzalo Paniagua Javier (gonzalo@ximian.com)
6 //
7 // (C) 2002,2003 Ximian, Inc (http://www.ximian.com)
8 //
9
10 //
11 // Permission is hereby granted, free of charge, to any person obtaining
12 // a copy of this software and associated documentation files (the
13 // "Software"), to deal in the Software without restriction, including
14 // without limitation the rights to use, copy, modify, merge, publish,
15 // distribute, sublicense, and/or sell copies of the Software, and to
16 // permit persons to whom the Software is furnished to do so, subject to
17 // the following conditions:
18 // 
19 // The above copyright notice and this permission notice shall be
20 // included in all copies or substantial portions of the Software.
21 // 
22 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
23 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
25 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
26 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
27 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
28 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
29 //
30 using System;
31 using System.Collections;
32 using System.IO;
33 using System.Web;
34 using System.Web.Compilation;
35 using System.Web.Util;
36
37 namespace System.Web.UI
38 {
39         internal class UserControlParser : TemplateControlParser
40         {
41 #if NET_2_0
42                 string masterPage;
43 #endif
44
45                 internal UserControlParser (string virtualPath, string inputFile, HttpContext context)
46                         : this (virtualPath, inputFile, context, null)
47                 {
48                 }
49
50                 internal UserControlParser (string virtualPath, string inputFile, ArrayList deps, HttpContext context)
51                         : this (virtualPath, inputFile, context, null)
52                 {
53                         this.Dependencies = deps;
54                 }
55                 
56                 internal UserControlParser (string virtualPath, string inputFile, HttpContext context, string type)
57                 {
58                         Context = context;
59                         BaseVirtualDir = UrlUtils.GetDirectory (virtualPath);
60                         InputFile = inputFile;
61                         SetBaseType (type);
62                         AddApplicationAssembly ();
63                 }
64
65 #if NET_2_0
66                 internal UserControlParser (string virtualPath, TextReader reader, HttpContext context)
67                         : this (virtualPath, null, reader, context)
68                 {
69                 }
70                 
71                 internal UserControlParser (string virtualPath, string inputFile, TextReader reader, HttpContext context)
72                 {
73                         Context = context;
74                         BaseVirtualDir = UrlUtils.GetDirectory (virtualPath);
75
76                         if (String.IsNullOrEmpty (inputFile)) {
77                                 HttpRequest req = context != null ? context.Request : null;
78                                 if (req != null)
79                                         InputFile = req.MapPath (virtualPath);
80                         } else
81                                 InputFile = inputFile;
82                         
83                         Reader = reader;
84                         SetBaseType (null);
85                         AddApplicationAssembly ();
86                 }
87
88                 internal UserControlParser (TextReader reader, HttpContext context)
89                 {
90                         Context = context;
91
92                         string fpath = context.Request.FilePath;
93                         BaseVirtualDir = UrlUtils.GetDirectory (fpath);
94
95                         // We're probably being called by ParseControl - let's use the requested
96                         // control's path as our input file, since that's the context we're being
97                         // invoked from.
98                         InputFile = VirtualPathUtility.GetFileName (fpath);
99                         Reader = reader;
100                         SetBaseType (null);
101                         AddApplicationAssembly ();
102                 }
103 #endif
104
105 #if NET_2_0
106                 internal static Type GetCompiledType (TextReader reader, HttpContext context)
107                 {
108                         UserControlParser ucp = new UserControlParser (reader, context);
109                         return ucp.CompileIntoType ();
110                 }
111 #endif
112                 
113                 internal static Type GetCompiledType (string virtualPath, string inputFile, ArrayList deps, HttpContext context)
114                 {
115                         UserControlParser ucp = new UserControlParser (virtualPath, inputFile, deps, context);
116                         return ucp.CompileIntoType ();
117                 }
118
119                 public static Type GetCompiledType (string virtualPath, string inputFile, HttpContext context)
120                 {
121                         UserControlParser ucp = new UserControlParser (virtualPath, inputFile, context);
122                         return ucp.CompileIntoType ();
123                 }
124
125                 protected override Type CompileIntoType ()
126                 {
127                         AspGenerator generator = new AspGenerator (this);
128                         return generator.GetCompiledType ();
129                 }
130
131                 internal override void ProcessMainAttributes (Hashtable atts)
132                 {
133 #if NET_2_0
134                         masterPage = GetString (atts, "MasterPageFile", null);
135                         if (masterPage != null)
136                                 AddDependency (masterPage);
137 #endif
138
139                         base.ProcessMainAttributes (atts);
140                 }
141
142 #if NET_2_0
143                 internal override string DefaultBaseTypeName {
144                         get { return PagesConfig.UserControlBaseType; }
145                 }
146 #else
147                 internal override string DefaultBaseTypeName {
148                         get { return "System.Web.UI.UserControl"; }
149                 }
150 #endif
151                 internal override string DefaultDirectiveName {
152                         get { return "control"; }
153                 }
154
155 #if NET_2_0
156                 internal string MasterPageFile {
157                         get { return masterPage; }
158                 }
159 #endif
160
161         }
162 }
163