2008-09-04 Jb Evain <jbevain@novell.com>
[mono.git] / mcs / class / System.Web / System.Web.UI / PageParser.cs
index c870f85bccbe69c06d3ef2507e96c5ecf55ca0f4..e2ea3a0ae141c50921d8b1a7f405d078265ab6d6 100644 (file)
@@ -43,14 +43,13 @@ namespace System.Web.UI
        [AspNetHostingPermission (SecurityAction.LinkDemand, Level = AspNetHostingPermissionLevel.Minimal)]
        public sealed class PageParser : TemplateControlParser
        {
-               bool enableSessionState = true;
+               PagesEnableSessionState enableSessionState = PagesEnableSessionState.True;
                bool enableViewStateMac = true;
-               bool smartNavigation = false;
+               bool smartNavigation;
                bool haveTrace;
                bool trace;
                bool notBuffer;
-               TraceMode tracemode;
-               bool readonlySessionState;
+               TraceMode tracemode = TraceMode.Default;
                string responseEncoding;
                string contentType;
                int codepage = -1;
@@ -60,9 +59,10 @@ namespace System.Web.UI
                string errorPage;
                bool validateRequest;
                string clientTarget;
-               Type baseType = typeof (Page);
 
 #if NET_2_0
+               bool async;
+               int asyncTimeout = -1;
                string masterPage;
                Type masterType;
                string title;
@@ -72,11 +72,12 @@ namespace System.Web.UI
                bool maintainScrollPositionOnPostBack;
                int maxPageStateFieldLength = -1;
                string pageParserFilter = String.Empty;
+               Type previousPageType;
 #endif
 
                public PageParser ()
                {
-                       LoadPagesConfigDefaults ();
+                       LoadConfigDefaults ();
                }
                
                internal PageParser (string virtualPath, string inputFile, HttpContext context)
@@ -84,51 +85,51 @@ namespace System.Web.UI
                        Context = context;
                        BaseVirtualDir = UrlUtils.GetDirectory (virtualPath);
                        InputFile = inputFile;
-                       SetBaseType (PagesConfig.PageBaseType);
+                       SetBaseType (null);
                        AddApplicationAssembly ();
-                       LoadPagesConfigDefaults ();
+                       LoadConfigDefaults ();
+#if NET_2_0
+                       this.VirtualPath = new VirtualPath (virtualPath);
+#endif
                }
 
 #if NET_2_0
                internal PageParser (string virtualPath, TextReader reader, HttpContext context)
+                       : this (virtualPath, null, reader, context)
+               {
+               }
+               
+               internal PageParser (string virtualPath, string inputFile, TextReader reader, HttpContext context)
                {
                        Context = context;
                        BaseVirtualDir = UrlUtils.GetDirectory (virtualPath);
                        Reader = reader;
-                       SetBaseType (PagesConfig.PageBaseType);
+                       if (String.IsNullOrEmpty (inputFile)) {
+                               HttpRequest req = context != null ? context.Request : null;
+                               if (req != null)
+                                       InputFile = req.MapPath (virtualPath);
+                       } else
+                               InputFile = inputFile;
+                       SetBaseType (null);
                        AddApplicationAssembly ();
-                       LoadPagesConfigDefaults ();
+                       LoadConfigDefaults ();
+#if NET_2_0
+                       this.VirtualPath = new VirtualPath (virtualPath);
+#endif
                }
 #endif
 
-               internal override void LoadPagesConfigDefaults ()
+               internal override void LoadConfigDefaults ()
                {
-                       base.LoadPagesConfigDefaults ();
+                       base.LoadConfigDefaults ();
 #if NET_2_0
                        PagesSection ps = PagesConfig;
 #else
                        PagesConfiguration ps = PagesConfig;
-#endif
+#endif                 
 
                        notBuffer = !ps.Buffer;
-#if NET_2_0
-                       switch (ps.EnableSessionState) {
-                               case PagesEnableSessionState.True:
-                               case PagesEnableSessionState.ReadOnly:
-                                       enableSessionState = true;
-                                       break;
-
-                               default:
-                                       enableSessionState = false;
-                                       break;
-                       }
-#else
-                       if (String.Compare (ps.EnableSessionState, "true") == 0)
-                               enableSessionState = true;
-                       else
-                               enableSessionState = false;
-#endif
-                       
+                       enableSessionState = ps.EnableSessionState;
                        enableViewStateMac = ps.EnableViewStateMac;
                        smartNavigation = ps.SmartNavigation;
                        validateRequest = ps.ValidateRequest;
@@ -154,9 +155,13 @@ namespace System.Web.UI
                                                                    string inputFile, 
                                                                    HttpContext context)
                {
+#if NET_2_0
+                       return BuildManager.CreateInstanceFromVirtualPath (virtualPath, typeof (IHttpHandler)) as IHttpHandler;
+#else
                        PageParser pp = new PageParser (virtualPath, inputFile, context);
                        IHttpHandler h = (IHttpHandler) pp.GetCompiledInstance ();
                        return h;
+#endif
                }
                
                internal override void ProcessMainAttributes (Hashtable atts)
@@ -164,23 +169,23 @@ namespace System.Web.UI
                        // note: the 'enableSessionState' configuration property is
                        // processed in a case-sensitive manner while the page-level
                        // attribute is processed case-insensitive
-                       string enabless = GetString (atts, "EnableSessionState", enableSessionState.ToString ());
+                       string enabless = GetString (atts, "EnableSessionState", null);
                        if (enabless != null) {
-                               readonlySessionState = (String.Compare (enabless, "readonly", true) == 0);
-                               if (readonlySessionState == true || String.Compare (enabless, "true", true) == 0) {
-                                       enableSessionState = true;
-                               } else if (String.Compare (enabless, "false", true) == 0) {
-                                       enableSessionState = false;
-                               } else {
+                               if (String.Compare (enabless, "readonly", true) == 0)
+                                       enableSessionState = PagesEnableSessionState.ReadOnly;
+                               else if (String.Compare (enabless, "true", true) == 0)
+                                       enableSessionState = PagesEnableSessionState.True;
+                               else if (String.Compare (enabless, "false", true) == 0)
+                                       enableSessionState = PagesEnableSessionState.False;
+                               else
                                        ThrowParseException ("Invalid value for enableSessionState: " + enabless);
-                               }
                        }
 
                        string cp = GetString (atts, "CodePage", null);
                        if (cp != null) {
                                if (responseEncoding != null)
                                        ThrowParseException ("CodePage and ResponseEncoding are " +
-                                                            "mutually exclusive.");
+                                               "mutually exclusive.");
 
                                int codepage = 0;
                                try {
@@ -312,42 +317,68 @@ namespace System.Web.UI
                        validateRequest = GetBool (atts, "ValidateRequest", validateRequest);
                        clientTarget = GetString (atts, "ClientTarget", null);
                        if (clientTarget != null) {
+                               clientTarget = clientTarget.Trim ();
 #if NET_2_0
                                ClientTargetSection sec = (ClientTargetSection)WebConfigurationManager.GetSection ("system.web/clientTarget");
-                               if (sec.ClientTargets[clientTarget] == null) {
+                               ClientTarget ct = null;
+                               
+                               if ((ct = sec.ClientTargets [clientTarget]) == null)
+                                       clientTarget = clientTarget.ToLower (CultureInfo.InvariantCulture);
+                               
+                               if (ct == null && (ct = sec.ClientTargets [clientTarget]) == null) {
                                        ThrowParseException (String.Format (
                                                        "ClientTarget '{0}' is an invalid alias. See the " +
                                                        "documentation for <clientTarget> config. section.",
                                                        clientTarget));
                                }
-                               clientTarget = sec.ClientTargets[clientTarget].UserAgent;
+                               clientTarget = ct.UserAgent;
 #else
                                NameValueCollection coll;
                                coll = (NameValueCollection) Context.GetConfig ("system.web/clientTarget");
-                               if (coll == null || coll [clientTarget] == null) {
+                               object ct = null;
+                               
+                               if (coll != null) {
+                                       ct = coll [clientTarget];
+                                       if (ct == null)
+                                               ct = coll [clientTarget.ToLower ()];
+                               }
+                               
+                               if (ct == null) {
                                        ThrowParseException (String.Format (
                                                        "ClientTarget '{0}' is an invalid alias. See the " +
                                                        "documentation for <clientTarget> config. section.",
                                                        clientTarget));
                                }
-                               clientTarget = (string) coll [clientTarget];
+                               clientTarget = (string) ct;
 #endif
                        }
 
                        notBuffer = !GetBool (atts, "Buffer", true);
                        
 #if NET_2_0
+                       async = GetBool (atts, "Async", false);
+                       string asyncTimeoutVal = GetString (atts, "AsyncTimeout", null);
+                       if (asyncTimeoutVal != null) {
+                               try {
+                                       asyncTimeout = Int32.Parse (asyncTimeoutVal);
+                               } catch (Exception) {
+                                       ThrowParseException ("AsyncTimeout must be an integer value");
+                               }
+                       }
+                       
                        masterPage = GetString (atts, "MasterPageFile", masterPage);
                        
                        // Make sure the page exists
-                       if (!String.IsNullOrEmpty (masterPage))
-                               MasterPageParser.GetCompiledMasterType (masterPage, MapPath (masterPage), HttpContext.Current);
-
+                       if (!String.IsNullOrEmpty (masterPage)) {
+                               BuildManager.GetCompiledType (masterPage);
+                               AddDependency (masterPage);
+                       }
+                       
                        title = GetString(atts, "Title", null);
 
                        theme = GetString (atts, "Theme", theme);
                        styleSheetTheme = GetString (atts, "StyleSheetTheme", styleSheetTheme);
-                       enable_event_validation = GetBool (atts, "EnableEventValidation", true);
+                       enable_event_validation = GetBool (atts, "EnableEventValidation", enable_event_validation);
                        maintainScrollPositionOnPostBack = GetBool (atts, "MaintainScrollPositionOnPostBack", maintainScrollPositionOnPostBack);
 #endif
                        // Ignored by now
@@ -359,23 +390,39 @@ namespace System.Web.UI
                
 #if NET_2_0
                internal override void AddDirective (string directive, Hashtable atts)
-               {
-                       if (String.Compare ("MasterType", directive, true) == 0) {
-                               string type = GetString (atts, "TypeName", null);
-                               if (type != null) {
-                                       masterType = LoadType (type);
-                                       if (masterType == null)
-                                               ThrowParseException ("Could not load type '" + type + "'.");
-                               } else {
-                                       string path = GetString (atts, "VirtualPath", null);
-                                       if (path != null)
-                                               masterType = MasterPageParser.GetCompiledMasterType (path, MapPath (path), HttpContext.Current);
+               {                       
+                       bool isMasterType = String.Compare ("MasterType", directive, StringComparison.OrdinalIgnoreCase) == 0;
+                       bool isPreviousPageType = isMasterType ? false : String.Compare ("PreviousPageType", directive,
+                                                                                        StringComparison.OrdinalIgnoreCase) == 0;
+                       
+                       string typeName = null;
+                       string virtualPath = null;
+                       Type type = null;
+                       
+                       if (isMasterType || isPreviousPageType) {
+                               typeName = GetString (atts, "TypeName", null);
+                               virtualPath = GetString (atts, "VirtualPath", null);
+
+                               if (typeName != null && virtualPath != null)
+                                       ThrowParseException (
+                                               String.Format ("The '{0}' directive must have exactly one attribute: TypeName or VirtualPath", directive));
+                               if (typeName != null) {
+                                       type = LoadType (typeName);
+                                       if (type == null)
+                                               ThrowParseException (String.Format ("Could not load type '{0}'.", typeName));
+                               } else if (virtualPath != null) {
+                                       string mappedPath = MapPath (virtualPath);
+                                       if (isMasterType)
+                                               type = masterType = BuildManager.GetCompiledType (virtualPath);
                                        else
-                                               ThrowParseException ("The MasterType directive must have either a TypeName or a VirtualPath attribute.");
-                               }
-                               AddAssembly (masterType.Assembly, true);
-                       }
-                       else
+                                               type = previousPageType = GetCompiledPageType (virtualPath, mappedPath,
+                                                                                              HttpContext.Current);
+                               } else
+                                       ThrowParseException (
+                                               String.Format ("The {0} directive must have either a TypeName or a VirtualPath attribute.", directive));
+
+                               AddAssembly (type.Assembly, true);
+                       } else
                                base.AddDirective (directive, atts);
                }
 #endif
@@ -390,6 +437,16 @@ namespace System.Web.UI
                        return retval;
                }
 
+               public static Type GetCompiledPageType (string virtualPath, string inputFile, HttpContext context)
+               {
+#if NET_2_0
+                       return BuildManager.GetCompiledType (virtualPath);
+#else
+                       PageParser pp = new PageParser (virtualPath, inputFile, context);
+                       return pp.CompileIntoType ();
+#endif
+               }
+               
                protected override Type CompileIntoType ()
                {
                        AspGenerator generator = new AspGenerator (this);
@@ -397,7 +454,10 @@ namespace System.Web.UI
                }
 
                internal bool EnableSessionState {
-                       get { return enableSessionState; }
+                       get {
+                               return enableSessionState == PagesEnableSessionState.True ||
+                                       ReadOnlySessionState;
+                       }
                }
 
                internal bool EnableViewStateMac {
@@ -409,7 +469,9 @@ namespace System.Web.UI
                }
                
                internal bool ReadOnlySessionState {
-                       get { return readonlySessionState; }
+                       get {
+                               return enableSessionState == PagesEnableSessionState.ReadOnly;
+                       }
                }
 
                internal bool HaveTrace {
@@ -422,16 +484,18 @@ namespace System.Web.UI
 
                internal TraceMode TraceMode {
                        get { return tracemode; }
-               }
-               
-               internal override Type DefaultBaseType {
-                       get { return baseType; }
-               }
+               }               
 
+#if NET_2_0
+               internal override string DefaultBaseTypeName {
+                       get { return PagesConfig.PageBaseType; }
+               }
+#else
                internal override string DefaultBaseTypeName {
                        get { return "System.Web.UI.Page"; }
                }
-
+#endif
+               
                internal override string DefaultDirectiveName {
                        get { return "page"; }
                }
@@ -477,6 +541,14 @@ namespace System.Web.UI
                }
 
 #if NET_2_0
+               internal bool Async {
+                       get { return async; }
+               }
+
+               internal int AsyncTimeout {
+                       get { return asyncTimeout; }
+               }
+               
                internal string Theme {
                        get { return theme; }
                }
@@ -512,6 +584,10 @@ namespace System.Web.UI
                internal string PageParserFilterType {
                        get { return pageParserFilter; }
                }
+
+               internal Type PreviousPageType {
+                       get { return previousPageType; }
+               }
 #endif
        }
 }