// Gonzalo Paniagua Javier (gonzalo@ximian.com)
//
// (C) 2002,2003 Ximian, Inc. (http://www.ximian.com)
+// Copyright (C) 2005 Novell, Inc (http://www.novell.com)
//
-using System;
+// 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.CodeDom.Compiler;
using System.Collections;
using System.IO;
using System.Reflection;
-using System.Web;
+using System.Security.Permissions;
using System.Web.Compilation;
using System.Web.Configuration;
using System.Web.Util;
-namespace System.Web.UI
-{
+namespace System.Web.UI {
+
+ // CAS
+ [AspNetHostingPermission (SecurityAction.LinkDemand, Level = AspNetHostingPermissionLevel.Minimal)]
+ [AspNetHostingPermission (SecurityAction.InheritanceDemand, Level = AspNetHostingPermissionLevel.Minimal)]
public abstract class TemplateParser : BaseParser
{
string inputFile;
bool debug;
string compilerOptions;
string language;
+ bool strictOn = false;
+ bool explicitOn = false;
bool output_cache;
int oc_duration;
string oc_header, oc_custom, oc_param, oc_controls;
bool oc_shared;
OutputCacheLocation oc_location;
+#if NET_2_0
+ string src;
+ string partialClassName;
+#endif
Assembly srcAssembly;
-
+ int appAssemblyIndex = -1;
+
internal TemplateParser ()
{
imports = new ArrayList ();
imports.Add ("System.Web.UI.HtmlControls");
assemblies = new ArrayList ();
- assemblies.AddRange (CompilationConfig.Assemblies);
+#if NET_2_0
+ bool addAssembliesInBin = false;
+ foreach (AssemblyInfo info in CompilationConfig.Assemblies) {
+ if (info.Assembly == "*")
+ addAssembliesInBin = true;
+ else
+ AddAssemblyByName (info.Assembly);
+ }
+ if (addAssembliesInBin)
+ AddAssembliesInBin ();
+
+ foreach (NamespaceInfo info in PagesConfig.Namespaces) {
+ imports.Add (info.Namespace);
+ }
+#else
+ foreach (string a in CompilationConfig.Assemblies)
+ AddAssemblyByName (a);
if (CompilationConfig.AssembliesInBin)
AddAssembliesInBin ();
+#endif
language = CompilationConfig.DefaultLanguage;
}
internal void AddApplicationAssembly ()
{
string location = Context.ApplicationInstance.AssemblyLocation;
- if (location != typeof (TemplateParser).Assembly.Location)
- assemblies.Add (location);
+ if (location != typeof (TemplateParser).Assembly.Location) {
+ appAssemblyIndex = assemblies.Add (location);
+ }
}
protected abstract Type CompileIntoType ();
case "duration":
oc_duration = Int32.Parse ((string) entry.Value);
if (oc_duration < 1)
- ThrowParseException ("The 'd uration' attribute must be set " +
+ ThrowParseException ("The 'duration' attribute must be set " +
"to a positive integer value");
break;
case "varybyparam":
oc_param = (string) entry.Value;
+ if (String.Compare (oc_param, "none") == 0)
+ oc_param = null;
break;
case "varybyheader":
oc_header = (string) entry.Value;
oc_custom = (string) entry.Value;
break;
case "location":
- oc_location = (OutputCacheLocation) Enum.Parse (typeof (OutputCacheLocation),
- (string) entry.Value);
+ if (!(this is PageParser))
+ goto default;
+
+ try {
+ oc_location = (OutputCacheLocation) Enum.Parse (
+ typeof (OutputCacheLocation), (string) entry.Value, true);
+ } catch {
+ ThrowParseException ("The 'location' attribute is case sensitive and " +
+ "must be one of the following values: Any, Client, " +
+ "Downstream, Server, None, ServerAndClient.");
+ }
+ break;
+ case "varybycontrol":
+ if (this is PageParser)
+ goto default;
+
+ oc_controls = (string) entry.Value;
+ break;
+ case "shared":
+ if (this is PageParser)
+ goto default;
+
+ try {
+ oc_shared = Boolean.Parse ((string) entry.Value);
+ } catch {
+ ThrowParseException ("The 'shared' attribute is case sensitive" +
+ " and must be set to 'true' or 'false'.");
+ }
break;
default:
ThrowParseException ("The '" + key + "' attribute is not " +
internal Type LoadType (string typeName)
{
// First try loaded assemblies, then try assemblies in Bin directory.
- // By now i do this 'by hand' but may be this is a runtime/gac task.
Type type = null;
+ bool seenBin = false;
Assembly [] assemblies = AppDomain.CurrentDomain.GetAssemblies ();
foreach (Assembly ass in assemblies) {
type = ass.GetType (typeName);
- if (type != null) {
- AddAssembly (ass, false);
- AddDependency (ass.Location);
- return type;
+ if (type == null)
+ continue;
+
+ if (Path.GetDirectoryName (ass.Location) != PrivateBinPath) {
+ AddAssembly (ass, true);
+ } else {
+ seenBin = true;
}
+
+ AddDependency (ass.Location);
+ return type;
}
- return null;
- }
+ if (seenBin)
+ return null;
- void AddAssembliesInBin ()
- {
+ // Load from bin
if (!Directory.Exists (PrivateBinPath))
- return;
+ return null;
string [] binDlls = Directory.GetFiles (PrivateBinPath, "*.dll");
- foreach (string dll in binDlls) {
- Assembly assembly = Assembly.LoadFrom (dll);
- AddAssembly (assembly, true);
+ foreach (string s in binDlls) {
+ Assembly binA = Assembly.LoadFrom (s);
+ type = binA.GetType (typeName);
+ if (type == null)
+ continue;
+
+ AddDependency (binA.Location);
+ return type;
}
+
+ return null;
}
- Assembly LoadAssemblyFromBin (string name)
+ void AddAssembliesInBin ()
{
- Assembly assembly;
if (!Directory.Exists (PrivateBinPath))
- return null;
+ return;
string [] binDlls = Directory.GetFiles (PrivateBinPath, "*.dll");
- foreach (string dll in binDlls) {
- string fn = Path.GetFileName (dll);
- fn = Path.ChangeExtension (fn, null);
- if (fn != name)
- continue;
-
- assembly = Assembly.LoadFrom (dll);
- return assembly;
+ foreach (string s in binDlls) {
+ assemblies.Add (s);
}
-
- return null;
}
internal virtual void AddInterface (string iface)
if (!imports.Contains (namesp))
imports.Add (namesp);
}
-
+
+ internal virtual void AddSourceDependency (string filename)
+ {
+ if (dependencies != null && dependencies.Contains (filename)) {
+ ThrowParseException ("Circular file references are not allowed. File: " + filename);
+ }
+
+ AddDependency (filename);
+ }
+
internal virtual void AddDependency (string filename)
{
+ if (filename == "")
+ return;
+
if (dependencies == null)
dependencies = new ArrayList ();
internal virtual void AddAssembly (Assembly assembly, bool fullPath)
{
+ if (assembly.Location == "")
+ return;
+
if (anames == null)
anames = new Hashtable ();
}
}
+ internal virtual Assembly AddAssemblyByFileName (string filename)
+ {
+ Assembly assembly = null;
+ Exception error = null;
+
+ try {
+ assembly = Assembly.LoadFrom (filename);
+ } catch (Exception e) { error = e; }
+
+ if (assembly == null)
+ ThrowParseException ("Assembly " + filename + " not found", error);
+
+ AddAssembly (assembly, true);
+ return assembly;
+ }
+
internal virtual Assembly AddAssemblyByName (string name)
{
if (anames == null)
return (Assembly) o;
}
- bool fullpath = true;
- Assembly assembly = LoadAssemblyFromBin (name);
- if (assembly != null) {
- AddAssembly (assembly, fullpath);
- return assembly;
+ Assembly assembly = null;
+ Exception error = null;
+ if (name.IndexOf (',') != -1) {
+ try {
+ assembly = Assembly.Load (name);
+ } catch (Exception e) { error = e; }
}
- try {
- assembly = Assembly.Load (name);
- string loc = assembly.Location;
- fullpath = (Path.GetDirectoryName (loc) == PrivateBinPath);
- } catch (Exception e) {
- ThrowParseException ("Assembly " + name + " not found", e);
+ if (assembly == null) {
+ try {
+ assembly = Assembly.LoadWithPartialName (name);
+ } catch (Exception e) { error = e; }
}
+
+ if (assembly == null)
+ ThrowParseException ("Assembly " + name + " not found", error);
- AddAssembly (assembly, fullpath);
+ AddAssembly (assembly, true);
return assembly;
}
internal virtual void ProcessMainAttributes (Hashtable atts)
{
atts.Remove ("Description"); // ignored
+#if NET_1_1
atts.Remove ("CodeBehind"); // ignored
+#endif
atts.Remove ("AspCompat"); // ignored
debug = GetBool (atts, "Debug", true);
- compilerOptions = GetString (atts, "CompilerOptions", null);
+ compilerOptions = GetString (atts, "CompilerOptions", "");
language = GetString (atts, "Language", CompilationConfig.DefaultLanguage);
+ strictOn = GetBool (atts, "Strict", CompilationConfig.Strict);
+ explicitOn = GetBool (atts, "Explicit", CompilationConfig.Explicit);
+
+ string inherits = GetString (atts, "Inherits", null);
+#if NET_2_0
+ // In ASP 2, the source file is actually integrated with
+ // the generated file via the use of partial classes. This
+ // means that the code file has to be confirmed, but not
+ // used at this point.
+ src = GetString (atts, "CodeFile", null);
+
+ if (src != null && inherits != null) {
+ // Make sure the source exists
+ src = UrlUtils.Combine (BaseVirtualDir, src);
+ string realPath = MapPath (src, false);
+ if (!File.Exists (realPath))
+ ThrowParseException ("File " + src + " not found");
+
+ // Verify that the inherits is a valid identify not a
+ // fully-qualified name.
+ if (!CodeGenerator.IsValidLanguageIndependentIdentifier (inherits))
+ ThrowParseException (String.Format ("'{0}' is not valid for 'inherits'", inherits));
+
+ // We are going to create a partial class that shares
+ // the same name as the inherits tag, so reset the
+ // name. The base type is changed because it is the
+ // code file's responsibilty to extend the classes
+ // needed.
+ partialClassName = inherits;
+
+ // Add the code file as an option to the
+ // compiler. This lets both files be compiled at once.
+ compilerOptions += " \"" + realPath + "\"";
+ } else if (inherits != null) {
+ // We just set the inherits directly because this is a
+ // Single-Page model.
+ SetBaseType (inherits);
+ }
+#else
string src = GetString (atts, "Src", null);
+
if (src != null)
srcAssembly = GetAssemblyFromSource (src);
- string inherits = GetString (atts, "Inherits", null);
if (inherits != null)
SetBaseType (inherits);
className = GetString (atts, "ClassName", null);
if (className != null && !CodeGenerator.IsValidLanguageIndependentIdentifier (className))
ThrowParseException (String.Format ("'{0}' is not valid for 'className'", className));
+#endif
if (atts.Count > 0)
ThrowParseException ("Unknown attribute: " + GetOneKey (atts));
if (!File.Exists (realPath))
ThrowParseException ("File " + vpath + " not found");
- AddDependency (realPath);
+ AddSourceDependency (realPath);
- CompilerResults result = CachingCompiler.Compile (realPath, realPath, assemblies);
+ CompilerResults result = CachingCompiler.Compile (language, realPath, realPath, assemblies);
if (result.NativeCompilerReturnValue != 0) {
- StringWriter writer = new StringWriter();
StreamReader reader = new StreamReader (realPath);
throw new CompilationException (realPath, result.Errors, reader.ReadToEnd ());
}
set { inputFile = value; }
}
+#if NET_2_0
+ internal bool IsPartial
+ {
+ get { return src != null; }
+ }
+
+ internal string PartialClassName
+ {
+ get { return partialClassName; }
+ }
+#endif
+
internal string Text
{
get { return text; }
}
internal ArrayList Assemblies {
- get { return assemblies; }
+ get {
+ if (appAssemblyIndex != -1) {
+ object o = assemblies [appAssemblyIndex];
+ assemblies.RemoveAt (appAssemblyIndex);
+ assemblies.Add (o);
+ appAssemblyIndex = -1;
+ }
+
+ return assemblies;
+ }
}
internal ArrayList Interfaces {
internal ArrayList Dependencies {
get { return dependencies; }
+ set { dependencies = value; }
}
internal string CompilerOptions {
get { return language; }
}
+ internal bool StrictOn {
+ get { return strictOn; }
+ }
+
+ internal bool ExplicitOn {
+ get { return explicitOn; }
+ }
+
internal bool Debug {
get { return debug; }
}
get { return oc_param; }
}
+#if NET_2_0
+ internal PagesSection PagesConfig {
+ get {
+ return WebConfigurationManager.GetSection ("system.web/pages") as PagesSection;
+ }
+ }
+#else
internal PagesConfiguration PagesConfig {
get { return PagesConfiguration.GetInstance (Context); }
}
-
+#endif
}
}