[Mono-patches] r94922 - in trunk/gert/standalone: . bug357498 bug357498/web

[Gert Driesen ([EMAIL PROTECTED])]

Author: gert
Date: 2008-02-05 13:43:44 -0500 (Tue, 05 Feb 2008)
New Revision: 94922

Added:
   trunk/gert/standalone/bug357498/
   trunk/gert/standalone/bug357498/default.build
   trunk/gert/standalone/bug357498/test.cs
   trunk/gert/standalone/bug357498/web/
   trunk/gert/standalone/bug357498/web/Default.aspx
   trunk/gert/standalone/bug357498/web/body.inc
   trunk/gert/standalone/bug357498/web/header.inc
   trunk/gert/standalone/bug357498/web/registertest1.ascx
   trunk/gert/standalone/bug357498/web/registertest2.ascx
Log:
Added test for bug #357498.


Added: trunk/gert/standalone/bug357498/default.build
===================================================================
--- trunk/gert/standalone/bug357498/default.build       2008-02-05 18:32:54 UTC 
(rev 94921)
+++ trunk/gert/standalone/bug357498/default.build       2008-02-05 18:43:44 UTC 
(rev 94922)
@@ -0,0 +1,56 @@
+<project name="bug357498" default="rebuild">
+       <include buildfile="../../build/common.build" />
+
+       <target name="mono-1.0-init">
+               <property name="xsp.package" value="xsp" />
+       </target>
+
+       <target name="mono-2.0-init">
+               <property name="xsp.package" value="xsp-2" />
+       </target>
+
+       <target name="net-1.1-init">
+               <property name="xsp.package" value="xsp" />
+       </target>
+
+       <target name="net-2.0-init">
+               <property name="xsp.package" value="xsp-2" />
+       </target>
+
+       <property name="frameworks" value="mono-2.0,net-2.0" />
+
+       <target name="clean">
+               <delete>
+                       <fileset>
+                               <include name="out" />
+                               <include name="test.exe" />
+                       </fileset>
+               </delete>
+       </target>
+
+       <target name="compile" depends="init">
+               <csc target="exe" define="${csc.defines}" output="test.exe" 
warnaserror="true" warninglevel="4">
+                       <sources>
+                               <include name="../../build/common/Assert.cs" />
+                               <include name="test.cs" />
+                       </sources>
+                       <references>
+                               <include name="System.Web.dll" />
+                       </references>
+               </csc>
+       </target>
+
+       <target name="run-test" depends="compile">
+               <exec 
program="${pkg-config::get-variable(xsp.package,'Executable')}" managed="true" 
spawn="true" pidproperty="server.pid">
+                       <arg value="--root" />
+                       <arg dir="web" />
+                       <arg value="--port" />
+                       <arg value="8081" />
+               </exec>
+               <sleep milliseconds="1000" />
+               <exec program="test.exe" managed="true" output="out" />
+               <fail if="${file::exists('out')}" />
+               <kill pid="${server.pid}" />
+               <sleep milliseconds="1000" />
+       </target>
+</project>


Property changes on: trunk/gert/standalone/bug357498/default.build
___________________________________________________________________
Name: svn:eol-style
   + native

Added: trunk/gert/standalone/bug357498/test.cs
===================================================================
--- trunk/gert/standalone/bug357498/test.cs     2008-02-05 18:32:54 UTC (rev 
94921)
+++ trunk/gert/standalone/bug357498/test.cs     2008-02-05 18:43:44 UTC (rev 
94922)
@@ -0,0 +1,39 @@
+using System;
+using System.Globalization;
+using System.IO;
+using System.Net;
+using System.Text;
+using System.Threading;
+
+class Program
+{
+       static int Main ()
+       {
+               Thread.CurrentThread.CurrentCulture = 
CultureInfo.InvariantCulture;
+               Thread.CurrentThread.CurrentUICulture = 
CultureInfo.InvariantCulture;
+
+               HttpWebRequest request = (HttpWebRequest) WebRequest.Create 
("http://localhost:8081/Default.aspx";);
+               request.Method = "GET";
+
+               try {
+                       HttpWebResponse response = (HttpWebResponse) 
request.GetResponse ();
+                       using (StreamReader sr = new StreamReader 
(response.GetResponseStream (), Encoding.UTF8, true)) {
+                               string result = sr.ReadToEnd ();
+                               Assert.IsTrue (result.IndexOf ("<html>") != -1, 
"#1:" + result);
+                               Assert.IsTrue (result.IndexOf ("his is pretty 
much the same as registertest.aspx") != -1, "#2:" + result);
+                               Assert.IsTrue (result.IndexOf ("<span 
id=\"Message\" style=\"color:blue\">This is a default One!</span>") != -1, 
"#3:" + result);
+                               Assert.IsTrue (result.IndexOf ("</html>") != 
-1, "#4:" + result);
+                       }
+                       response.Close ();
+                       return 0;
+               } catch (WebException ex) {
+                       HttpWebResponse response = (HttpWebResponse) 
ex.Response;
+                       if (response != null) {
+                               using (StreamReader sr = new StreamReader 
(response.GetResponseStream ())) {
+                                       Console.WriteLine (sr.ReadToEnd ());
+                               }
+                       }
+                       return 1;
+               }
+       }
+}


Property changes on: trunk/gert/standalone/bug357498/test.cs
___________________________________________________________________
Name: svn:eol-style
   + native

Added: trunk/gert/standalone/bug357498/web/Default.aspx
===================================================================
--- trunk/gert/standalone/bug357498/web/Default.aspx    2008-02-05 18:32:54 UTC 
(rev 94921)
+++ trunk/gert/standalone/bug357498/web/Default.aspx    2008-02-05 18:43:44 UTC 
(rev 94922)
@@ -0,0 +1,17 @@
+<!-- #include virtual="header.inc" -->
+<script language="C#" runat="server">
+       void Clicked (object sender, EventArgs e)
+       {
+               One.Text = "Message text changed!";
+               One.Color = "red";
+               Two.Text = "Message text changed2!";
+               Two.Color = "red";
+               Three.Text = "Text changed!";
+       }
+</script>
+<body>
+       This is pretty much the same as registertest.aspx, but splitted in 3 
files.
+       <p>
+       <!-- #include virtual="body.inc" -->
+</body>
+</html>


Property changes on: trunk/gert/standalone/bug357498/web/Default.aspx
___________________________________________________________________
Name: svn:eol-style
   + native

Added: trunk/gert/standalone/bug357498/web/body.inc
===================================================================
--- trunk/gert/standalone/bug357498/web/body.inc        2008-02-05 18:32:54 UTC 
(rev 94921)
+++ trunk/gert/standalone/bug357498/web/body.inc        2008-02-05 18:43:44 UTC 
(rev 94922)
@@ -0,0 +1,9 @@
+<form runat="server">
+       <Acme:One id="One" Text="This is a default One!" Color="blue" 
runat="server" />
+       <p>
+       <Acme:Two id="Two" Text="This is a default Two!" Color="blue" 
runat="server" />
+       <p>
+       <Acme:Label id="Three" Text="This is a label!" Color="blue" 
runat="server" />
+       <p>
+       <asp:Button text="Change" OnClick="Clicked" runat=server />
+</form>


Property changes on: trunk/gert/standalone/bug357498/web/body.inc
___________________________________________________________________
Name: svn:eol-style
   + native

Added: trunk/gert/standalone/bug357498/web/header.inc
===================================================================
--- trunk/gert/standalone/bug357498/web/header.inc      2008-02-05 18:32:54 UTC 
(rev 94921)
+++ trunk/gert/standalone/bug357498/web/header.inc      2008-02-05 18:43:44 UTC 
(rev 94922)
@@ -0,0 +1,6 @@
+<%@ Page language="C#" %>
+<%-- we can even override the asp prefix with @ register --%>
+<%@ Register TagPrefix="Acme" namespace="System.Web.UI.WebControls" 
assembly="System.Web" %>
+<%@ Register TagPrefix="Acme" TagName="One" Src="registertest1.ascx" %>
+<%@ Register TagPrefix="Acme" TagName="Two" Src="registertest2.ascx" %>
+<html>


Property changes on: trunk/gert/standalone/bug357498/web/header.inc
___________________________________________________________________
Name: svn:eol-style
   + native

Added: trunk/gert/standalone/bug357498/web/registertest1.ascx
===================================================================
--- trunk/gert/standalone/bug357498/web/registertest1.ascx      2008-02-05 
18:32:54 UTC (rev 94921)
+++ trunk/gert/standalone/bug357498/web/registertest1.ascx      2008-02-05 
18:43:44 UTC (rev 94922)
@@ -0,0 +1,7 @@
+<script language="C#" runat="server">
+       public String Color = "blue";
+       public String Text = "This is registertest1!";
+</script>
+
+<span id="Message" style="color:<%=Color%>"><%=Text%></span>
+


Property changes on: trunk/gert/standalone/bug357498/web/registertest1.ascx
___________________________________________________________________
Name: svn:eol-style
   + native

Added: trunk/gert/standalone/bug357498/web/registertest2.ascx
===================================================================
--- trunk/gert/standalone/bug357498/web/registertest2.ascx      2008-02-05 
18:32:54 UTC (rev 94921)
+++ trunk/gert/standalone/bug357498/web/registertest2.ascx      2008-02-05 
18:43:44 UTC (rev 94922)
@@ -0,0 +1,7 @@
+<script language="C#" runat="server">
+       public String Color = "blue";
+       public String Text = "This is registertest2!";
+</script>
+
+<span id="Message2" style="color:<%=Color%>"><%=Text%></span>
+


Property changes on: trunk/gert/standalone/bug357498/web/registertest2.ascx
___________________________________________________________________
Name: svn:eol-style
   + native

_______________________________________________
Mono-patches maillist  -  Mono-patches@lists.ximian.com
http://lists.ximian.com/mailman/listinfo/mono-patches