Author: gert
Date: 2007-12-07 08:30:20 -0500 (Fri, 07 Dec 2007)
New Revision: 90927
Added:
trunk/gert/standalone/bug346762/
trunk/gert/standalone/bug346762/default.build
trunk/gert/standalone/bug346762/test.cs
trunk/gert/standalone/bug346762/web/
trunk/gert/standalone/bug346762/web/Default.aspx
Modified:
trunk/gert/standalone/known-issues
Log:
Added test for bug #346762.
Added: trunk/gert/standalone/bug346762/default.build
===================================================================
--- trunk/gert/standalone/bug346762/default.build 2007-12-07 13:17:58 UTC
(rev 90926)
+++ trunk/gert/standalone/bug346762/default.build 2007-12-07 13:30:20 UTC
(rev 90927)
@@ -0,0 +1,81 @@
+<project name="bug346762" default="rebuild">
+ <target name="mono-1.0">
+ <property name="csc.defines"
value="NET_1_0,NET_1_1,ONLY_1_1,MONO" />
+ <property name="xsp.package" value="xsp" />
+ </target>
+
+ <target name="mono-2.0">
+ <property name="csc.defines"
value="NET_1_0,NET_1_1,NET_2_0,ONLY_2_0,MONO" />
+ <property name="xsp.package" value="xsp-2" />
+ </target>
+
+ <target name="net-1.1">
+ <property name="csc.defines" value="NET_1_0,NET_1_1,ONLY_1_1" />
+ <property name="xsp.package" value="xsp" />
+ </target>
+
+ <target name="net-2.0">
+ <property name="csc.defines"
value="NET_1_0,NET_1_1,NET_2_0,ONLY_2_0" />
+ <property name="xsp.package" value="xsp-2" />
+ </target>
+
+ <property name="frameworks" value="mono-1.0,mono-2.0,net-1.1,net-2.0" />
+
+ <target name="init">
+ <if test="${not
target::exists(nant.settings.currentframework)}">
+ <fail>Framework '${nant.settings.currentframework}' is
not supported.</fail>
+ </if>
+ <call target="${nant.settings.currentframework}" />
+ </target>
+
+ <target name="clean">
+ <delete>
+ <fileset>
+ <include name="web/bin/**" />
+ <include name="out" />
+ <include name="TestWebService.cs" />
+ <include name="test.exe" />
+ </fileset>
+ </delete>
+ </target>
+
+ <target name="build">
+ <property name="original.targetframework"
value="${nant.settings.currentframework}" />
+
+ <foreach property="framework" item="String" in="${frameworks}"
delim=",">
+ <if test="${framework::exists(framework)}">
+ <property name="nant.settings.currentframework"
value="${framework}" />
+ <call
target="${nant.settings.currentframework}" />
+ <call target="run-test" />
+ <call target="clean" />
+ </if>
+ </foreach>
+
+ <property name="nant.settings.currentframework"
value="${original.targetframework}" />
+ </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>
+ </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>
+
+ <target name="rebuild" depends="clean, build" />
+</project>
Property changes on: trunk/gert/standalone/bug346762/default.build
___________________________________________________________________
Name: svn:eol-style
+ native
Added: trunk/gert/standalone/bug346762/test.cs
===================================================================
--- trunk/gert/standalone/bug346762/test.cs 2007-12-07 13:17:58 UTC (rev
90926)
+++ trunk/gert/standalone/bug346762/test.cs 2007-12-07 13:30:20 UTC (rev
90927)
@@ -0,0 +1,37 @@
+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?Pippo=ciao,ciao&Pippo=ciao";);
+ 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 ("<p>Lenght:
2</p>") != -1, "#1:" + result);
+ Assert.IsTrue (result.IndexOf ("<p>P[0]:
ciao,ciao</p>") != -1, "#2:" + result);
+ Assert.IsTrue (result.IndexOf ("<p>P[1]:
ciao</p>") != -1, "#3:" + result);
+ }
+ response.Close ();
+ } catch (WebException ex) {
+ if (ex.Response != null) {
+ StreamReader sr = new StreamReader
(ex.Response.GetResponseStream ());
+ Console.WriteLine (sr.ReadToEnd ());
+ }
+ Assert.Fail ("#4");
+ }
+
+ return 0;
+ }
+}
Property changes on: trunk/gert/standalone/bug346762/test.cs
___________________________________________________________________
Name: svn:eol-style
+ native
Added: trunk/gert/standalone/bug346762/web/Default.aspx
===================================================================
--- trunk/gert/standalone/bug346762/web/Default.aspx 2007-12-07 13:17:58 UTC
(rev 90926)
+++ trunk/gert/standalone/bug346762/web/Default.aspx 2007-12-07 13:30:20 UTC
(rev 90927)
@@ -0,0 +1,11 @@
+<%@ Page Language="C#" %>
+<html>
+<body>
+ <%
+ string[] P=Request.Params.GetValues("Pippo");
+ Response.Write("<p>Lenght: " + P.Length + "</p>");
+ for (int i = 0; i < P.Length; i++)
+ Response.Write("<p>P[" + i + "]: " + P [i] + "</p>");
+ %>
+</body>
+</html>
Property changes on: trunk/gert/standalone/bug346762/web/Default.aspx
___________________________________________________________________
Name: svn:eol-style
+ native
Modified: trunk/gert/standalone/known-issues
===================================================================
--- trunk/gert/standalone/known-issues 2007-12-07 13:17:58 UTC (rev 90926)
+++ trunk/gert/standalone/known-issues 2007-12-07 13:30:20 UTC (rev 90927)
@@ -133,3 +133,4 @@
bug342533/**
bug343837/**
bug345627/**
+bug346762/**
_______________________________________________
Mono-patches maillist - [email protected]
http://lists.ximian.com/mailman/listinfo/mono-patches
