// 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.Add ("System.Web.UI.HtmlControls");
assemblies = new ArrayList ();
- assemblies.Add ("System.dll");
- assemblies.Add ("System.Drawing.dll");
- assemblies.Add ("System.Data.dll");
- assemblies.Add ("System.Web.dll");
- assemblies.Add ("System.Xml.dll");
- AddAssembliesInBin ();
+#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) {
+ appAssemblyIndex = assemblies.Add (location);
+ }
}
protected abstract Type CompileIntoType ();
return;
}
+ cmp = String.Compare ("OutputCache", directive, true);
+ if (cmp == 0) {
+ output_cache = true;
+
+ if (atts ["Duration"] == null)
+ ThrowParseException ("The directive is missing a 'duration' attribute.");
+ if (atts ["VaryByParam"] == null)
+ ThrowParseException ("This directive is missing a 'VaryByParam' " +
+ "attribute, which should be set to \"none\", \"*\", " +
+ "or a list of name/value pairs.");
+
+ foreach (DictionaryEntry entry in atts) {
+ string key = (string) entry.Key;
+ switch (key.ToLower ()) {
+ case "duration":
+ oc_duration = Int32.Parse ((string) entry.Value);
+ if (oc_duration < 1)
+ 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;
+ break;
+ case "varybycustom":
+ oc_custom = (string) entry.Value;
+ break;
+ case "location":
+ 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 " +
+ "supported by the 'Outputcache' directive.");
+ break;
+ }
+
+ }
+
+ return;
+ }
+
ThrowParseException ("Unknown directive: " + directive);
}
-
+
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);
- language = GetString (atts, "Language", "C#");
- if (String.Compare (language, "c#", true) != 0)
- ThrowParseException ("Only C# supported.");
+ 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);
- Assembly srcAssembly = null;
+
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 (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
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; }
className = Path.GetFileName (inputFile).Replace ('.', '_');
className = className.Replace ('-', '_');
className = className.Replace (' ', '_');
+
+ if (Char.IsDigit(className[0])) {
+ className = "_" + className;
+ }
+
return className;
}
}
return privateBinPath;
AppDomainSetup setup = AppDomain.CurrentDomain.SetupInformation;
- privateBinPath = setup.PrivateBinPath;
-
- if (!Path.IsPathRooted (privateBinPath)) {
- string appbase = setup.ApplicationBase;
- if (appbase.StartsWith ("file://")) {
- appbase = appbase.Substring (7);
- if (Path.DirectorySeparatorChar != '/')
- appbase = appbase.Replace ('/', Path.DirectorySeparatorChar);
- }
- privateBinPath = Path.Combine (appbase, privateBinPath);
- }
+ privateBinPath = Path.Combine (setup.ApplicationBase, setup.PrivateBinPath);
return privateBinPath;
}
}
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; }
}
+
+ internal bool OutputCache {
+ get { return output_cache; }
+ }
+
+ internal int OutputCacheDuration {
+ get { return oc_duration; }
+ }
+
+ internal string OutputCacheVaryByHeader {
+ get { return oc_header; }
+ }
+
+ internal string OutputCacheVaryByCustom {
+ 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; }
+ }
+
+#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
}
}
projects / mono.git / blobdiff