narf 0.5.1

data/examples/webunit/conv/test_digit_view.rb

@@ -0,0 +1,134 @@
+=begin
+= sample of WebUnit( test_digit_view.rb )
+  Copyright(C) 2001 yuichi TAKAHASHI
+  $Id: test_digit_view.rb,v 1.1.1.1 2003/01/21 11:50:40 yuichi Exp $
+=end
+
+require 'webunit/webunit'
+
+class TestDigitView < WebUnit::TestCase
+
+  def setup
+    super
+    @url = "webunit/sample/conv/digit.cgi"
+  end
+
+  def test_initial
+
+    response = Response::get( @url )
+    assert_title( 'Digit - WebUnit Sample -', response )
+
+    assert_equals( 1, response.forms.size )
+    assert_equals( 1, response.tables.size )
+
+    form = response.form
+    assert_urls( @url, form.action )
+    assert_equals( 'post', form.method )
+
+    parameters = form.parameters #=> array
+    assert_equals( 6, parameters.size )
+    i = -1
+
+    assert_input( 'toct', 'text', '0', parameters[i+=1] )
+    assert_input( 'tdec', 'text', '0', parameters[i+=1] )
+    assert_input( 'thex', 'text', '0x0', parameters[i+=1] )
+    assert_input( 'boct', 'submit', '8=&gt;', parameters[i+=1] )
+    assert_input( 'bdec', 'submit', '10=&gt;', parameters[i+=1] )
+    assert_input( 'bhex', 'submit', '16=&gt;', parameters[i+=1] )
+
+    table = response.table
+    params = form.params #=> hash
+    c = 0
+
+    assert_include( params['toct'], table.at(1,c+=1) )
+    assert_include( params['boct'], table.at(2,c) )
+    assert_equals( 'center', table.at(2,c).attrs['align'] )
+
+    assert_include( params['tdec'], table.at(1,c+=1) )
+    assert_include( params['bdec'], table.at(2,c) )
+    assert_equals( 'center', table.at(2,c).attrs['align'] )
+
+    assert_include( params['thex'], table.at(1,c+=1) )
+    assert_include( params['bhex'], table.at(2,c) )
+    assert_equals( 'center', table.at(2,c).attrs['align'] )
+
+  end
+
+  def test_links
+
+    response = Response::get( @url )
+    assert_title( 'Digit - WebUnit Sample -', response )
+    assert_equals( 3, response.links.size )
+
+    links = response.links
+    i = -1
+
+    link_ruby = links[i+=1]
+    assert_equals( 'Ruby', link_ruby.data )
+    url = 'http://www.ruby-lang.org/ja/'
+    assert_urls( url, link_ruby.href )
+
+    link_rubyunit = links[i+=1]
+    assert_equals( 'RubyUnit', link_rubyunit.data )
+    url = 'http://homepage1.nifty.com/markey/ruby/rubyunit/index.html'
+    assert_urls( url, link_rubyunit.href )
+
+    link_webunit = links[i+=1]
+    assert_equals( 'WebUnit', link_webunit.data )
+    url = 'http://www.jbt.co.jp/user/yuichi/ruby/webunit/index-ja.html'
+    assert_urls( url, link_webunit.href )
+
+  end
+
+  def test_8_to
+
+    response = Response::get( @url )
+    assert_title( 'Digit - WebUnit Sample -', response )
+
+    form = response.form
+    params = form.params
+
+    params['toct'].value = '017'
+    response = form.submit( 'boct' )
+
+    params = response.form.params
+    assert_equals( '15', params['tdec'].value )
+    assert_equals( '0xF', params['thex'].value )
+
+  end
+
+  def test_10_to
+
+    response = Response::get( @url )
+    assert_title( 'Digit - WebUnit Sample -', response )
+
+    form = response.form
+    params = form.params
+
+    params['tdec'].value = '10'
+    response = form.submit( 'bdec' )
+
+    params = response.form.params
+    assert_equals( '012', params['toct'].value )
+    assert_equals( '0xA', params['thex'].value )
+
+  end
+
+  def test_16_to
+
+    response = Response::get( @url )
+    assert_title( 'Digit - WebUnit Sample -', response )
+
+    form = response.form
+    params = form.params
+
+    params['thex'].value = '0x1A'
+    response = form.submit( 'bhex' )
+
+    params = response.form.params
+    assert_equals( '032', params['toct'].value )
+    assert_equals( '26', params['tdec'].value )
+
+  end
+
+end

data/examples/webunit/example.rd

@@ -0,0 +1,37 @@
+=begin
+
+  % ln -s webunit/cgi $DOCUMENT_ROOT/tmp/webunit
+  % cp webunit/cgi/auth/.htpasswd /tmp
+  % URLBASE=http://localhost/tmp/ runtest.rb test_link.rb
+
+
+  require 'webunit/webunit'
+  
+  # get start HTML page
+  url = 'test-1.html'
+  response = WebUnit::Response::get( url )
+
+  # test HTML page contents
+  assert_title( 'test-1', response )
+  assert_equals( 1, response.forms.size )
+
+  form = response.form
+
+  # test form of HTML page contents
+  assert_equals( 'ntext',     form.parameters[0].name )
+  assert_equals( 'npassword', form.parameters[1].name )
+
+  # execute CGI script, after setting parameters
+  form.parameters[0].value = "this is test"
+  form.parameters[1].value = '!@#$%'
+  response = form.submit
+
+  # test output from CGI script
+  assert_equals( 'result', response.title )
+  assert_equals( 1, response.links.size )
+  assert_equals( 'http://....', response.links[0] )
+
+  # read link
+  response = response.links[0].read
+
+=end

data/examples/webunit/index-en.html

@@ -0,0 +1,263 @@
+<?xml version="1.0" ?>
+<!DOCTYPE html 
+  PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
+  "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml">
+<head>
+<title>index-en.rd</title>
+</head>
+<body>
+<h1><a name="label:0" id="label:0">WebUnit</a></h1><!-- RDLabel: "WebUnit" -->
+<h2><a name="label:1" id="label:1">What's WebUnit</a></h2><!-- RDLabel: "What's WebUnit" -->
+<p>WebUnit is Ruby API for testing html/cgi without browser,
+and is idealy suited for automated unit testing of web sites when combined
+with a Ruby unit test framework such as RubyUnit.
+It was designed and implemented by Masaki Suketa.</p>
+<p>I used HttpUnit with JUnit, however, I didn't like writing test in Java,
+when I write program in Ruby. Then, I made it.</p>
+<h2><a name="label:2" id="label:2">Libraries Used</a></h2><!-- RDLabel: "Libraries Used" -->
+<p>WebUnit uses these software follow.
+Now, these files of htmlrepair/htmlsplit and html-parser are included
+in WebUnit package, so, you don't have to install them.
+You have to install RubyUnit and NQXML, before using WebUnit.</p>
+<ul>
+<li><a href="http://homepage1.nifty.com/markey/ruby/rubyunit/index_e.html">RubyUnit</a>
+  or <a href="http://www.ruby-lang.org/raa/list.rhtml?name=testunit">testunit</a></li>
+<li><a href="http://www.moonwolf.com/ruby/">htmlrepair/htmlsplit</a></li>
+<li><a href="http://www.jin.gr.jp/~nahi/Ruby/html-parser/README.htm">html-parser</a></li>
+<li><a href="http://www.io.com/~jimm/downloads/nqxml/index.html">NQXML</a>
+  or <a href="http://www.ruby-lang.org/raa/list.rhtml?name=rexml">REXML</a></li>
+</ul>
+<h2><a name="label:3" id="label:3">Download and Install</a></h2><!-- RDLabel: "Download and Install" -->
+<p>Download webunit-20YYMMDD-*.tar.gz from 
+<a href="http://xpenguin.biz/download/webunit/">&lt;URL:http://xpenguin.biz/download/webunit/&gt;</a>,
+and, extract it to some directory, then, do <code>ruby install.rb</code>.</p>
+<h2><a name="label:4" id="label:4">Example</a></h2><!-- RDLabel: "Example" -->
+<p>Execute test/test_*.rb with test runner like runtest.rb,
+after make symbolic link cgi directory to accessable directory via httpd,
+with name "webunit".</p>
+<pre>% ln -s webunit/cgi $DOCUMENT_ROOT/tmp/webunit
+% cp webunit/cgi/auth/.htpasswd /tmp
+% URLBASE=http://localhost/tmp/ runtest.rb test_link.rb
+
+
+require 'webunit/webunit'
+
+# get start HTML page
+url = 'test-1.html'
+response = WebUnit::Response::get( url )
+
+# test HTML page contents
+assert_title( 'test-1', response )
+assert_equals( 1, response.forms.size )
+
+form = response.form
+
+# test form of HTML page contents
+assert_equals( 'ntext',     form.parameters[0].name )
+assert_equals( 'npassword', form.parameters[1].name )
+
+# execute CGI script, after setting parameters
+form.parameters[0].value = "this is test"
+form.parameters[1].value = '!@#$%'
+response = form.submit
+
+# test output from CGI script
+assert_equals( 'result', response.title )
+assert_equals( 1, response.links.size )
+assert_equals( 'http://....', response.links[0] )
+
+# read link
+response = response.links[0].read</pre>
+<h2><a name="label:5" id="label:5">Copying</a></h2><!-- RDLabel: "Copying" -->
+<p>This Program is copyrighted free software by yuichi TAKAHASHI.</p>
+<p>You can redistribute it and/or modify it under either the terms of the GPL
+(see COPYING file), or same as Ruby.</p>
+<h2><a name="label:6" id="label:6">Bug Report</a></h2><!-- RDLabel: "Bug Report" -->
+<p><a href="mailto:yt@xpenguin.biz">&lt;URL:mailto:yt@xpenguin.biz&gt;</a></p>
+<h2><a name="label:7" id="label:7">Changes</a></h2><!-- RDLabel: "Changes" -->
+<h3><a name="label:8" id="label:8">20020410-alpha -&gt; 20030121</a></h3><!-- RDLabel: "20020410-alpha -> 20030121" -->
+<ul>
+<li>enable using "Test::Unit" for Testing Framework. (by Kouhei Sutou)</li>
+<li>appends XML Parser support "REXML". (by Kouhei Sutou)</li>
+<li>supports multipart formdata. ready file transfer test. (by Narushima Hironori)</li>
+<li>changes document type sdf to rd. (by Narushima Hironori)</li>
+<li>changes installer to setup.rb. (by Narushima Hironori)</li>
+<li>fix Textarea#query_data and Parser#feed. (Thanks to Torsten Rueger)</li>
+</ul>
+<h3><a name="label:9" id="label:9">20020330-alpha -&gt; 20020410-alpha</a></h3><!-- RDLabel: "20020330-alpha -> 20020410-alpha" -->
+<ul>
+<li>XmlDocument -&gt; DomWalker : rename</li>
+<li>fix for 1.7 parser.(Thanks to Kazuhiro NISHIYAMA)</li>
+<li>fix install.rb for "--program-suffix".(Thanks to Kazuhiro NISHIYAMA)</li>
+</ul>
+<h3><a name="label:10" id="label:10">20011019-alpha -&gt; 20020330-alpha</a></h3><!-- RDLabel: "20011019-alpha -> 20020330-alpha" -->
+<ul>
+<li>XmlDocument#size : new.</li>
+<li>mail addres of author is changed.</li>
+</ul>
+<h3><a name="label:11" id="label:11">20011019-alpha -&gt; 20011022-alpha</a></h3><!-- RDLabel: "20011019-alpha -> 20011022-alpha" -->
+<ul>
+<li>XmlDocument#change_node : bug fix.</li>
+</ul>
+<h3><a name="label:12" id="label:12">20011002-alpha -&gt; 20011019-alpha</a></h3><!-- RDLabel: "20011002-alpha -> 20011019-alpha" -->
+<ul>
+<li>XmlDocument : new - class to test xml document.</li>
+</ul>
+<h3><a name="label:13" id="label:13">20010919-alpha -&gt; 20011002-alpha</a></h3><!-- RDLabel: "20010919-alpha -> 20011002-alpha" -->
+<ul>
+<li>Parser#do_input : support input tag without form tag. (Thanks to IKAGAWA, Kauztomo)</li>
+<li>Response#init_http : append header(Content-Type) for POST method.</li>
+<li>Response#init_http : catch IOError of HTTP::finish (for ruby 1.6.5)</li>
+</ul>
+<h3><a name="label:14" id="label:14">20010912-alpha -&gt; 20010919-alpha</a></h3><!-- RDLabel: "20010912-alpha -> 20010919-alpha" -->
+<ul>
+<li>Response#get,post,init_http : to use BasicAuth.</li>
+<li>sample/cgi : remove space charactor between '#!' and '/usr/bin/env'</li>
+</ul>
+<h3><a name="label:15" id="label:15">20010714-alpha -&gt; 20010912-alpha</a></h3><!-- RDLabel: "20010714-alpha -> 20010912-alpha" -->
+<ul>
+<li>Responss : use Net::HTTP::new_implementation.</li>
+<li>HtmlElem : fix inspect output when @tag is nil.( as toplevel )</li>
+<li>sgml-parser.rb(line:257) : bug fix, fail when nested tags.</li>
+<li>html-parser/install.rb : fix.</li>
+</ul>
+<h3><a name="label:16" id="label:16">20010618-alpha -&gt; 20010714-alpha</a></h3><!-- RDLabel: "20010618-alpha -> 20010714-alpha" -->
+<ul>
+<li>Parser : add link tag to SingleTags.</li>
+<li>Parser#start_a : execute complete_url, unless the href begins '#'.</li>
+<li>Link : append onClick attribute, and reader.</li>
+<li>Response#init_http : retry, when Errno::EPIPE</li>
+<li>Response::html : append &lt;html&gt; tag, when there is no &lt;html&gt; tag.</li>
+</ul>
+<h3><a name="label:17" id="label:17">20010611-alpha -&gt; 20010618-alpha</a></h3><!-- RDLabel: "20010611-alpha -> 20010618-alpha" -->
+<ul>
+<li>add sample</li>
+</ul>
+<h3><a name="label:18" id="label:18">20010604-alpha -&gt; 20010611-alpha</a></h3><!-- RDLabel: "20010604-alpha -> 20010611-alpha" -->
+<ul>
+<li>HtmlElem#name : new</li>
+<li>Response#init_html : new, to use WebUnit without http access.</li>
+<li>(code using Response#new) : change to Response#new.init_http</li>
+<li>Response#init_http,feed, : divide initialize.</li>
+<li>perse_url : correspond to relative url and 'file:' prefix.</li>
+<li>perse_url : add '-' to regexp, will match to hostname.</li>
+<li>assert_urls : add success case, use orthop_url for expected url.</li>
+</ul>
+<h3><a name="label:19" id="label:19">20010521-alpha -&gt; 20010604-alpha</a></h3><!-- RDLabel: "20010521-alpha -> 20010604-alpha" -->
+<ul>
+<li>include contrib/{html-parser,htmlrepair} : Thanks these authors.
+  - html-parser : Takahiro Maebashi
+  - htmlrepair : MoonWolf</li>
+<li>installer supports to install contrib/{html-parser,htmlrepair}</li>
+</ul>
+<h3><a name="label:20" id="label:20">20010507-alpha -&gt; 20010521-alpha</a></h3><!-- RDLabel: "20010507-alpha -> 20010521-alpha" -->
+<ul>
+<li>Response#initialize : use $URLBASE when url is relational</li>
+<li>Parser#do_img: new</li>
+<li>Response#add_image, Response#images, Response#image : new</li>
+<li>Image : new</li>
+</ul>
+<h3><a name="label:21" id="label:21">20010330-alpha -&gt; 20010507-alpha</a></h3><!-- RDLabel: "20010330-alpha -> 20010507-alpha" -->
+<ul>
+<li>sample, contrib: only directory</li>
+<li>install.rb : new</li>
+<li>all files : reject TAB code ( expect COPYING and Makefile )</li>
+<li>bin : make some commands</li>
+<li>doc : separate document files from cgi directory</li>
+<li>tests : split files, and add testcase methods.</li>
+<li>Utils#complete_url : bug fix</li>
+<li>TestCase#setup : set $URLBASE as @urlbase, Response::reset, restore Cookies</li>
+<li>TestCase#teardown : Response::reset, keep Cookies</li>
+<li>Cookies#cookies/cookies= : new</li>
+<li>Response#reset: close http connection</li>
+<li>assert_urls : new</li>
+<li>WebUnit#assert_equal_url : -&gt; assert_urls</li>
+<li>Select#value : new</li>
+<li>assert_select_option : new</li>
+<li>HtmlElem#initialize : add default value for 2nd argument.</li>
+<li>assert_title : new - show response.body with message.</li>
+<li>HtmlElem#extract : new - make string with nested HtmlElems.</li>
+<li>Response#pbody : use Response#format</li>
+<li>Response#format : new</li>
+<li>MemWriter : new - used by Response#format</li>
+</ul>
+<h3><a name="label:22" id="label:22">20010314-alpha -&gt; 20010330-alpha</a></h3><!-- RDLabel: "20010314-alpha -> 20010330-alpha" -->
+<ul>
+<li>Response#pbody : new - print orthopped Response#body.</li>
+<li>Select#select : accept Array of String(value|data) and Integer(index)</li>
+<li>assert_include : add using HtmlElem#has?</li>
+<li>Link#target : new</li>
+<li>Response#freeze,Form#freeze : new</li>
+<li>Select#value= : </li>
+<li>Form#submit : </li>
+</ul>
+<h3><a name="label:23" id="label:23">20010223-alpha -&gt; 20010314-alpha</a></h3><!-- RDLabel: "20010223-alpha -> 20010314-alpha" -->
+<ul>
+<li>Paser#start_a : replace "&amp;amp;" -&gt; "&amp;" of href. bug of sgml-parser?</li>
+<li>Table#row_index,col_index : new</li>
+<li>Form#store_test_data : new</li>
+<li>assert_input,assert_attrs,assert_include : new</li>
+<li>InputRadio#value= : bug fix</li>
+<li>Textarea#initialize, Select#initialize, SelectOption#initialize : set type</li>
+<li>Parser#attrs_to_hash : bug fix</li>
+<li>Response#push : no longer support, puts WARNING</li>
+<li>Response#click : support for readlink and submit</li>
+<li>Utils#complete_url : &lt;- Response#complete_url &amp; Parser#complete_url</li>
+<li>JSciriptOpenObject : new</li>
+<li>Response#redirect : new</li>
+<li>Form#submit, Response#submit : support InputImage ( add args )</li>
+<li>InputImage : new</li>
+<li>Input#inspect : bug fix.</li>
+<li>Response#initialize : better performance with keeping connection.</li>
+<li>Table#at : to access TableRow with one argument. ( two args for Cell )</li>
+<li>Parser#complete_url : use orthop_url</li>
+<li>Utils#orthop_url : '//', '/\./', '[^/]*/\.\./' -&gt; '/'</li>
+<li>TestCase#initialize : append '/' if last char of URLBASE isn't '/'</li>
+<li>TableRow : new ( Table is also changed )</li>
+<li>Response : attr_accessor -&gt; attr_reader</li>
+<li>HtmlElem#inspect : change format, and stop recursive.</li>
+<li>HtmlElem#print : change format as inspect.</li>
+<li>Response#readlink : use HtmlElem#readlink</li>
+<li>HtmlElem#readlink : new</li>
+<li>Response#click : alias of Response#readlink</li>
+<li>Response#submit,push : same as Response#forms[0].submit</li>
+<li>Response#params : same as Response#forms[0].params</li>
+<li>Response#link,form,table,frame : same as Response#*[0]</li>
+<li>Response#search,find : new</li>
+<li>HtmlElem#search : new</li>
+<li>change file struct.</li>
+</ul>
+<h3><a name="label:24" id="label:24">20010216-alpha -&gt; 20010223-alpha</a></h3><!-- RDLabel: "20010216-alpha -> 20010223-alpha" -->
+<ul>
+<li>Cookies#header : bug fix. ( handle when path == nil )</li>
+<li>Parser#endtag : raise BadHtmlTags exception</li>
+<li>Response#readlink : new ( raise ElemNotFound when failed )</li>
+<li>rename exception : NotFound -&gt; HttpNotFound</li>
+<li>unify linefeed code to '\n'(0x0a) on each files.</li>
+</ul>
+<h3><a name="label:25" id="label:25">20010215-alpha -&gt; 20010216-alpha</a></h3><!-- RDLabel: "20010215-alpha -> 20010216-alpha" -->
+<ul>
+<li>Frame#read : bug fix.</li>
+<li>Response#initialize : raise NotFound exception</li>
+<li>Param#query_data : rename method from data</li>
+<li>InputRadio#query_data : rename method from data</li>
+<li>InputCheckBox#query_data : rename method from data</li>
+<li>InputSubmit#query_data : rename method from data</li>
+<li>InputReset#query_data : rename method from data</li>
+<li>Select#query_data : rename method from data, and so on.</li>
+<li>SelectOption#query_data : rename method from data</li>
+<li>Form#submit : Param#query_data -&gt; Param#query_data</li>
+<li>SelectOption#value : return data, when value is nil</li>
+<li>SelectOption#value= : remove</li>
+<li>SelectOption#data : remove</li>
+<li>SelectOption#data= : remove</li>
+<li>SelectOption#stat= : remove</li>
+<li>Param#value : method -&gt; attr_accessor</li>
+<li>InputRadio#value= : new ( from Param#value )</li>
+<li>Textarea#value : new ( as SelectOption#value )</li>
+<li>Cookies#add : new</li>
+</ul>
+
+</body>
+</html>

data/examples/webunit/index-en.rd

@@ -0,0 +1,60 @@
+=begin
+
+= WebUnit
+
+== What's WebUnit
+
+WebUnit is Ruby API for testing html/cgi without browser,
+and is idealy suited for automated unit testing of web sites when combined
+with a Ruby unit test framework such as RubyUnit.
+It was designed and implemented by Masaki Suketa.
+
+I used HttpUnit with JUnit, however, I didn't like writing test in Java,
+when I write program in Ruby. Then, I made it.
+
+== Libraries Used
+
+WebUnit uses these software follow.
+Now, these files of htmlrepair/htmlsplit and html-parser are included
+in WebUnit package, so, you don't have to install them.
+You have to install RubyUnit and NQXML, before using WebUnit.
+
+* ((<RubyUnit|URL:http://homepage1.nifty.com/markey/ruby/rubyunit/index_e.html>))
+  or ((<testunit|URL:http://www.ruby-lang.org/raa/list.rhtml?name=testunit>))
+* ((<"htmlrepair/htmlsplit"|URL:http://www.moonwolf.com/ruby/>))
+* ((<html-parser|URL:http://www.jin.gr.jp/~nahi/Ruby/html-parser/README.htm>))
+* ((<NQXML|URL:http://www.io.com/~jimm/downloads/nqxml/index.html>))
+  or ((<REXML|URL:http://www.ruby-lang.org/raa/list.rhtml?name=rexml>))
+
+== Download and Install
+
+Download webunit-20YYMMDD-*.tar.gz from 
+((<URL:http://xpenguin.biz/download/webunit/>)),
+and, extract it to some directory, then, do (({ruby install.rb})).
+
+== Example
+
+Execute test/test_*.rb with test runner like runtest.rb,
+after make symbolic link cgi directory to accessable directory via httpd,
+with name "webunit".
+
+<<<example.rd
+
+== Copying
+
+This Program is copyrighted free software by yuichi TAKAHASHI.
+
+You can redistribute it and/or modify it under either the terms of the GPL
+(see COPYING file), or same as Ruby.
+
+== Bug Report
+
+((<URL:mailto:yt@xpenguin.biz>))
+
+== Changes
+
+<<<changes.rd
+
+# $Id: index-en.rd,v 1.1.1.1 2003/01/21 11:50:39 yuichi Exp $
+
+=end