2005-01-31 Zoltan Varga <vargaz@freemail.hu>
[mono.git] / mcs / class / System.Web / System.Web.UI / SimpleWebHandlerParser.cs
index a4032638f3b2fbc5a1e00675b65850f09e2ebf07..d075d404a5cc89064fb60ccde2e54a397c427dca 100644 (file)
@@ -7,6 +7,27 @@
 // (C) 2002,2003 Ximian, Inc (http://www.ximian.com)
 //
 
+//
+// 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;
 using System.CodeDom.Compiler;
 using System.Collections;
@@ -15,6 +36,7 @@ using System.Reflection;
 using System.Text;
 using System.Web;
 using System.Web.Compilation;
+using System.Web.Configuration;
 using System.Web.Util;
 
 namespace System.Web.UI
@@ -36,26 +58,40 @@ namespace System.Web.UI
                string privateBinPath;
                string baseDir;
                string baseVDir;
+               CompilationConfiguration compilationConfig;
+               int appAssemblyIndex = -1;
+               Type cachedType;
 
                protected SimpleWebHandlerParser (HttpContext context, string virtualPath, string physicalPath)
                {
+                       cachedType = CachingCompiler.GetTypeFromCache (physicalPath);
+                       if (cachedType != null)
+                               return; // We don't need anything else.
+
                        this.context = context;
                        this.vPath = virtualPath;
                        this.physPath = physicalPath;
                        AddDependency (physicalPath);
 
                        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.Web.Services.dll");
-                       assemblies.Add ("System.Xml.dll");
-                       AddAssembliesInBin ();
+                       string location = Context.ApplicationInstance.AssemblyLocation;
+                       if (location != typeof (TemplateParser).Assembly.Location)
+                               appAssemblyIndex = assemblies.Add (location);
+
+                       assemblies.AddRange (CompilationConfig.Assemblies);
+                       if (CompilationConfig.AssembliesInBin)
+                               AddAssembliesInBin ();
+
+                       language = CompilationConfig.DefaultLanguage;
 
                        GetDirectivesAndContent ();
                }
 
+               protected Type GetCompiledTypeFromCache ()
+               {
+                       return cachedType;
+               }
+
                void GetDirectivesAndContent ()
                {
                        StreamReader reader = new StreamReader (File.OpenRead (physPath));
@@ -63,7 +99,7 @@ namespace System.Web.UI
                        bool directiveFound = false;
                        StringBuilder content = new StringBuilder ();
 
-                       while ((line = reader.ReadLine ()) != null) {
+                       while ((line = reader.ReadLine ()) != null && cachedType == null) {
                                string trimmed = line.Trim ();
                                if (!directiveFound && trimmed == String.Empty)
                                        continue;
@@ -71,18 +107,26 @@ namespace System.Web.UI
                                if (trimmed.StartsWith ("<")) {
                                        ParseDirective (trimmed);
                                        directiveFound = true;
+                                       if (gotDefault) {
+                                               cachedType = CachingCompiler.GetTypeFromCache (physPath);
+                                               if (cachedType != null)
+                                                       break;
+                                       }
+
                                        continue;
                                }
 
                                content.Append (line + "\n");
                                content.Append (reader.ReadToEnd ());
                        }
+                       reader.Close ();
 
                        if (!gotDefault)
-                               throw new ParseException (null, "No @WebService directive found");
-                               
-                       this.program = content.ToString ();
-                       reader.Close ();
+                               throw new ParseException (null, "No @" + DefaultDirectiveName +
+                                                       " directive found");
+
+                       if (cachedType == null)
+                               this.program = content.ToString ();
                }
 
                void TagParsed (ILocation location, System.Web.Compilation.TagType tagtype, string tagid, TagAttributes attributes)
@@ -146,10 +190,8 @@ namespace System.Web.UI
                        }
 
                        language = GetAndRemove (attributes, "language");
-                       if (language != null) {
-                               if (0 != String.Compare (language, "C#", true))
-                                       throw new ParseException (null, "Only C# language is supported by now.");
-                       }
+                       if (language == null)
+                               language = CompilationConfig.DefaultLanguage;
 
                        codeBehind = GetAndRemove (attributes, "codebehind");
                        if (attributes.Count > 0)
@@ -222,7 +264,7 @@ namespace System.Web.UI
                        }
 
                        try {
-                               assembly = Assembly.Load (name);
+                               assembly = Assembly.LoadWithPartialName (name);
                                string loc = assembly.Location;
                                fullpath = (Path.GetDirectoryName (loc) == PrivateBinPath);
                        } catch (Exception e) {
@@ -240,8 +282,12 @@ namespace System.Web.UI
 
                        string [] binDlls = Directory.GetFiles (PrivateBinPath, "*.dll");
                        foreach (string dll in binDlls) {
-                               Assembly assembly = Assembly.LoadFrom (dll);
-                               AddAssembly (assembly, true);
+                               try {
+                                       Assembly assembly = Assembly.LoadFrom (dll);
+                                       AddAssembly (assembly, true);
+                               } catch (Exception e) {
+                                       throw new Exception ("Error while loading " + dll, e);
+                               }
                        }
                }
 
@@ -274,7 +320,7 @@ namespace System.Web.UI
 
                        AddDependency (realPath);
 
-                       CompilerResults result = CachingCompiler.Compile (realPath, realPath, assemblies);
+                       CompilerResults result = CachingCompiler.Compile (language, realPath, realPath, assemblies);
                        if (result.NativeCompilerReturnValue != 0) {
                                StreamReader reader = new StreamReader (realPath);
                                throw new CompilationException (realPath, result.Errors, reader.ReadToEnd ());
@@ -353,7 +399,16 @@ namespace System.Web.UI
                }
 
                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 Dependencies {
@@ -399,6 +454,15 @@ namespace System.Web.UI
                                return baseVDir;
                        }
                }
+
+               internal CompilationConfiguration CompilationConfig {
+                       get {
+                               if (compilationConfig == null)
+                                       compilationConfig = CompilationConfiguration.GetInstance (context);
+
+                               return compilationConfig;
+                       }
+               }
        }
 }