// 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;
+ string oc_header, oc_custom, oc_param, oc_controls;
+ bool oc_shared;
OutputCacheLocation oc_location;
+ Assembly srcAssembly;
+ int appAssemblyIndex = -1;
internal TemplateParser ()
{
imports.Add ("System.Web.UI.HtmlControls");
assemblies = new ArrayList ();
- assemblies.AddRange (CompilationConfig.Assemblies);
+ foreach (string a in CompilationConfig.Assemblies)
+ AddAssemblyByName (a);
if (CompilationConfig.AssembliesInBin)
AddAssembliesInBin ();
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 ();
ThrowParseException ("The directive is missing a 'duration' attribute.");
if (atts ["VaryByParam"] == null)
ThrowParseException ("This directive is missing a 'VaryByParam' " +
- "attribute, which should bne set to \"none\", \"*\", " +
+ "attribute, which should be set to \"none\", \"*\", " +
"or a list of name/value pairs.");
foreach (DictionaryEntry entry in atts) {
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 ();
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; }
}
- AddAssembly (assembly, fullpath);
+ if (assembly == null)
+ ThrowParseException ("Assembly " + name + " not found", error);
+
+ 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);
+#if NET_2_0
+ string src = GetString (atts, "CodeFile", null);
+#else
string src = GetString (atts, "Src", null);
- Assembly srcAssembly = null;
+#endif
if (src != null)
srcAssembly = GetAssemblyFromSource (src);
string inherits = GetString (atts, "Inherits", null);
- if (inherits != null) {
- Type parent;
- if (srcAssembly != null)
- parent = srcAssembly.GetType (inherits);
- else
- parent = LoadType (inherits);
-
- if (parent == null)
- ThrowParseException ("Cannot find type " + inherits);
-
- if (!DefaultBaseType.IsAssignableFrom (parent))
- ThrowParseException ("The parent type does not derive from " + DefaultBaseType);
-
- baseType = parent;
- }
+#if NET_2_0
+ if (srcAssembly == null)
+ className = inherits;
+ else
+ SetBaseType (inherits);
+#else
+ 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));
}
+ internal void SetBaseType (string type)
+ {
+ if (type == DefaultBaseTypeName)
+ return;
+
+ Type parent = null;
+ if (srcAssembly != null)
+ parent = srcAssembly.GetType (type);
+
+ if (parent == null)
+ parent = LoadType (type);
+
+ if (parent == null)
+ ThrowParseException ("Cannot find type " + type);
+
+ if (!DefaultBaseType.IsAssignableFrom (parent))
+ ThrowParseException ("The parent type does not derive from " + DefaultBaseType);
+
+ baseType = parent;
+ }
+
Assembly GetAssemblyFromSource (string vpath)
{
vpath = UrlUtils.Combine (BaseVirtualDir, vpath);
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 ());
}
}
internal abstract Type DefaultBaseType { get; }
-
+ internal abstract string DefaultBaseTypeName { get; }
internal abstract string DefaultDirectiveName { get; }
internal string InputFile
className = Path.GetFileName (inputFile).Replace ('.', '_');
className = className.Replace ('-', '_');
className = className.Replace (' ', '_');
+
+ if (Char.IsDigit(className[0])) {
+ className = "_" + className;
+ }
+
return className;
}
}
}
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_custom; }
}
+ internal string OutputCacheVaryByControls {
+ get { return oc_controls; }
+ }
+
+ internal bool OutputCacheShared {
+ get { return oc_shared; }
+ }
+
internal OutputCacheLocation OutputCacheLocation {
get { return oc_location; }
}
internal string OutputCacheVaryByParam {
get { return oc_param; }
}
-
+
+ internal PagesConfiguration PagesConfig {
+ get { return PagesConfiguration.GetInstance (Context); }
+ }
}
}
projects / mono.git / blobdiff