junit/mock-scripts/TestTextArea.xml

<?xml version="1.0" encoding="UTF-8"?>

<!-- $Id$ -->
<!--
   Copyright 2004 The Apache Software Foundation
  
   Licensed under the Apache License, Version 2.0 (the "License");
   you may not use this file except in compliance with the License.
   You may obtain a copy of the License at
  
       http://www.apache.org/licenses/LICENSE-2.0
  
   Unless required by applicable law or agreed to in writing, software
   distributed under the License is distributed on an "AS IS" BASIS,
   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
   See the License for the specific language governing permissions and
   limitations under the License.
-->
<mock-test>
    <context name="c20" root="context20"/>

  	<servlet name="app" class="org.apache.tapestry.ApplicationServlet"/>

	<request>
	
		<assert-output name="Page Title">
<![CDATA[
<title>Home</title>
]]>	
		</assert-output>
		
		<assert-output name="TextArea">
<![CDATA[
<textarea name="text"></textarea>
]]>
		</assert-output>
		
		<assert-output-matches name="Modes">
<![CDATA[
<option.*?/option>
]]>
			<match><![CDATA[<option value="0" selected="selected">Break</option>]]></match>
			<match><![CDATA[<option value="1">Paragraph</option>]]></match>
		</assert-output-matches>
		
	</request>

	<request>
		<parameter name="service" value="direct/0/Home/main"/>
		<parameter name="sp" value="S0"/>
		<parameter name="text" value="One &lt;&gt; zero."/>
		<parameter name="mode" value="0"/>
		<parameter name="Form0" value="text,mode"/>
		
		<assert-output name="Page Title">
<![CDATA[
<title>Two</title>
]]>	
		</assert-output>
		
		<assert-regexp name="Inserted Text">
<![CDATA[
Text:\[\s*One &lt;&gt; zero.\s*\]		
]]>
		</assert-regexp>
		
	</request>


	<request>
		<parameter name="service" value="direct/1/Home/main"/>
		<parameter name="sp" value="S0"/>
		<parameter name="text" value="Alpha&#010;Beta&#010;Gamma"/>
		<parameter name="mode" value="0"/>
		<parameter name="Form0" value="text,mode"/>
		
		<assert-output name="Page Title">
<![CDATA[
<title>Two</title>
]]>	
		</assert-output>
		
		<assert-regexp name="Inserted Text">
<![CDATA[Text:\[\s+Alpha<br/>Beta<br/>Gamma\s+\]		
]]>
		</assert-regexp>
		
	</request>
	
	<request>
		<parameter name="service" value="direct/1/Home/main"/>
		<parameter name="sp" value="S0"/>
		<parameter name="text" value="Moe&#010;Larry&#010;Curly"/>
		<parameter name="mode" value="1"/>
		<parameter name="Form0" value="text,mode"/>
		
		<assert-output name="Page Title">
<![CDATA[
<title>Two</title>
]]>	
		</assert-output>
		
		<assert-regexp name="Inserted Text">
<![CDATA[
Text:\[\s+<p>Moe</p><p>Larry</p><p>Curly</p>\s+\]
]]>	
		</assert-regexp>
		
	</request>
	
	<!-- Test TextArea ignoring request when not in the rewinding form. -->
	
	<request>
		<parameter name="service" value="action/1/Home/1/actionForm"/>
		<parameter name="Form1" value=""/>
		
		<assert-output name="Page Title">
<![CDATA[
<title>Home</title>
]]>	
		</assert-output>
		
		<assert-regexp name="TextArea">
<![CDATA[
<textarea name="text">Moe\s+Larry\s+Curly</textarea>
]]>	
		</assert-regexp>
	</request>
	
	<request>
		<parameter name="service" value="direct/1/Home/main"/>
		<parameter name="sp" value="S0"/>
		<parameter name="mode" value="1"/>
		<parameter name="Form0" value="text,mode"/>
		
		<assert-output name="Page Title">
<![CDATA[
<title>Two</title>
]]>	
		</assert-output>
		
		<assert-regexp name="Inserted Text">
Text:\[\s+\]
		</assert-regexp>
		
	</request>
	
	<!-- Disable the TextArea. -->
	
	<request>
		<parameter name="service" value="direct/1/Home/disable"/>
		
		<assert-output name="Page Title">
<![CDATA[
<title>Home</title>
]]>	
		</assert-output>
		
		<assert-output name="TextArea">
<![CDATA[
<textarea name="text" disabled="disabled"></textarea>
]]>	
		</assert-output>	
	</request>

	<!-- Make sure property not updated when TextArea disabled. -->
	
	<request>
		<parameter name="service" value="direct/1/Home/main"/>
		<parameter name="sp" value="S0"/>
		<parameter name="text" value="Peter&#010;Paul&#010;Mary"/>
		<parameter name="mode" value="1"/>
		<parameter name="Form0" value="text,mode"/>
		
		<assert-output name="Page Title">
<![CDATA[
<title>Two</title>
]]>	
		</assert-output>
		
		<assert-regexp name="Inserted Text">
Text:\[\s+\]
		</assert-regexp>
		
	</request>
	
	<request>
		<parameter name="service" value="page/Three"/>
		
		<assert-output name="Page Title">
<![CDATA[
<title>Three</title>
]]>
		</assert-output>

		<assert-output name="TextArea">
<![CDATA[
<textarea name="$TextArea" class="magic"></textarea>
]]>
		</assert-output>

	</request>
</mock-test>