cudan 0.0.1

data/CHANGES

@@ -0,0 +1,3 @@
+= 0.0.1
+ * 2011/01/12
+ * create

data/README

@@ -0,0 +1 @@
+simple functional test tool.

data/bin/cudan

@@ -0,0 +1,9 @@
+#!/usr/bin/env ruby
+
+begin
+    require 'cudan'
+rescue LoadError
+    require 'rubygems'
+    require 'cudan'
+end
+Cudan::Main::new::main

data/lib/cudan/base_cudan.rb

@@ -0,0 +1,79 @@
+require 'net/http'
+module Cudan
+    GET="GET"
+    POST="POST"
+    PUT="PUT"
+    DELETE="DELETE"
+    class BaseCudan
+        def initialize
+            @headers = {}
+            @showbody = false
+        end
+        attr_accessor :showbody
+        def set_header key, value
+            @headers[key] = value
+        end
+        def fetch url, method=GET, body=nil
+            host, port, path = Util::parse_url(url)
+            @post_string = body
+            if method == GET
+                req = Net::HTTP::Get::new(path, @headers)
+            elsif method == POST
+                req = Net::HTTP::Post::new(path, @headers)
+            end
+            response = nil
+            Net::HTTP.start(host, port) do |http|
+                @starttime = Time::now
+                response = http.request(req, @post_string)
+                @response_time = Time::now - @starttime
+            end
+            if response
+                @response = response.body.to_s
+            else
+                @response = ''
+            end
+            if @showbody
+                Logger.log(@response, 2)
+            end
+        end
+        def execute query, expect, url, method=GET, body=nil
+            fetch(url, method, body)
+            @query_result = do_query(query)
+            r = do_expect(expect)
+            unless r
+                do_message
+                exit 1
+            else
+            end
+        end
+        def do_message
+            Logger.log 'failure:'
+            Logger.log @query_result.gsub(/^(.*)$/){|r| "\t" + r}
+        end
+        def do_query query
+            @response.include? query ? query : ''
+        end
+        def do_expect expect
+            @query_result.include? expect
+        end
+    end
+    class Util
+        def self::parse_url url
+            hostpath = url.slice(url.index('://')+3, url.size)
+            if pathstart = hostpath.index('/')
+                host = hostpath.slice(0, pathstart)
+                path = hostpath.slice(pathstart, hostpath.size)
+            else
+                host = hostpath
+                path = '/'
+            end
+            if portstart = host.index(':')
+                host, port = host.split(':')
+                port = port.to_i
+            else
+                port = 80
+            end
+            [host, port, path]
+        end
+    end
+end

data/lib/cudan/logger.rb

@@ -0,0 +1,11 @@
+class Cudan::Logger
+    @@level = 7
+    def self::setlevel level
+        @@level = level
+    end
+    def self::log(message, level=7)
+        if level <= @@level
+            puts message
+        end
+    end
+end

data/lib/cudan/main.rb

@@ -0,0 +1,40 @@
+class Cudan::Main
+    require 'optparse'
+    def main
+        opts = OptionParser.new("Usage: #{File::basename($0)} [OPTIONS] URL")
+        opts.on("-v", "--version", "show version") do
+            puts "%s %s" %[File.basename($0), Cudan::VERSION]
+            puts "ruby %s" % RUBY_VERSION
+            exit
+        end
+        opts.on('-q QUERY', '--query QUERY', 'query') do |q|
+            @query = q
+        end
+        opts.on('-e EXPECT_STRING', '--expects EXPECT_STRING', 'expect string') do |ex|
+            @expects = ex
+        end
+        opts.on('-u USER_AGENT', '--user-agent USER_AGENT', 'set user agent') do |ua|
+            @ua = ua
+        end
+        opts.on('--show-body', 'show body') do |b|
+            @showbody = b
+        end
+        opts.version = Cudan::VERSION
+        opts.parse!(ARGV)
+        @url = ARGV[0]
+        unless @url
+            puts opts.to_s
+            exit
+        end
+        if /\/(.*)\// =~ @query
+            klass = Cudan::RegexpCudan
+            @query = $~[1]
+        else
+            klass = Cudan::XpathCudan
+        end
+        instance = klass::new
+        instance.set_header('UserAgent', @ua) if @ua
+        instance.showbody = @showbody
+        instance.execute(@query, @expects, @url)
+    end
+end

data/lib/cudan/regexp_cudan.rb

@@ -0,0 +1,19 @@
+module Cudan
+    class RegexpCudan < BaseCudan
+        def do_query query
+            regexp = Regexp::new(query)
+            @matched = regexp.match(@response)
+            if @matched
+                @matched[0]
+            else
+                ''
+            end
+        end
+        def do_expect expect
+            nexpect = expect.gsub(/\\\d/){|m|
+                @matched[m.to_i].to_s
+            }
+            @query_result.include? nexpect
+        end
+    end
+end

data/lib/cudan/xpath_cudan.rb

@@ -0,0 +1,20 @@
+module Cudan
+    class XpathCudan < BaseCudan
+        require 'nokogiri'
+        def do_query query
+            @doc = Nokogiri::HTML(@response)
+            @result = @doc.search(query)
+            @result = @result[0]
+            if @result.is_a? Nokogiri::XML::Text
+                return @result.content.to_s
+            elsif @result
+                return @result.inner_html.to_s
+            else
+                return ''
+            end
+        end
+        def do_expect expect
+            @query_result.include? expect
+        end
+    end
+end

data/lib/cudan.rb

@@ -0,0 +1,8 @@
+module Cudan
+    require 'cudan/logger'
+    require 'cudan/base_cudan'
+    require 'cudan/regexp_cudan'
+    require 'cudan/xpath_cudan'
+    require 'cudan/main'
+    VERSION="0.0.1"
+end

data/test/cudanspec.rb

@@ -0,0 +1,59 @@
+require 'rubygems'
+require 'ww'
+require 'lib/cudan'
+require File::dirname(__FILE__) + '/wwutil'
+
+
+port = 3080 + rand(10)
+baseurl  = "http://localhost:#{port}"
+html = <<EOS
+<html>
+    <body>
+       <p class='hoge'>abcdefg</p>
+    </body>
+</html>
+EOS
+##
+WW::Server[:server] ||= WW::Server::build_double(port) do
+    spy.get('/regexp'){
+        body = html
+    }
+    spy.get('/xpath'){
+        body = html
+    }
+end
+WW::Server.start_once
+RSpec.configure {|c| c.mock_with :mocha}
+
+describe Cudan::RegexpCudan, 'request for localhost' do
+    before(:each) do
+        Cudan::Logger::stubs(:log).returns nil
+    end
+    it 'should raise no error with regexp' do
+        url = baseurl + '/regexp'
+        o = Cudan::RegexpCudan::new
+        expect{
+             o.execute('<p class=\'hoge\'>(.*)</p>', 'abcdefg', url)
+        }.to_not raise_error(nil)
+    end
+end
+describe Cudan::XpathCudan, 'request for localhost' do
+    before(:each) do
+        Cudan::Logger::stubs(:log).returns nil
+    end
+    it 'should raise no error with xpath' do
+        url = baseurl + '/xpath'
+        o = Cudan::XpathCudan::new
+        expect{
+            o.execute('//p[@class="hoge"]/text()', 'abcdefg', url)
+        }.to_not raise_error(nil)
+        expect{
+            o.execute('//p[@class="hoge"]', 'abcdefg', url)
+        }.to_not raise_error(nil)
+    end
+    it 'should raise error with xpath' do
+        url = baseurl + '/xpath'
+        o = Cudan::XpathCudan::new
+        expect{ o.execute('//p[@class="fuga"]', 'hoge', url) }.to raise_error(SystemExit)
+    end
+end

data/test/wwutil.rb

@@ -0,0 +1,69 @@
+require 'rubygems'
+require 'ww'
+
+class Requests < Array
+    def self::from_a(ar)
+        is = self.new
+        ar.each do |i|
+            is << i
+        end
+        is
+    end
+    def filter &pred
+        Requests::from_a(find_all(&pred))
+    end
+    def params p
+        filter do |rq|
+            p.any?{|k,v| rq.params[k] == v}
+        end
+    end
+    def request_method method
+        filter {|rq|
+            rq.request_method == method
+        }
+    end
+    def filter_opt p
+        filter do |rq|
+            p.any?{|k,v| rq[k] == v}
+        end
+    end
+end
+class Ww::Server
+    def compile(path)
+        keys = []
+        if path.respond_to? :to_str
+            special_chars = %w{. + ( )}
+            pattern =
+                path.to_str.gsub(/((:\w+)|[\*#{special_chars.join}])/) do |match|
+                case match
+                when "*"
+                    keys << 'splat'
+                    "(.*?)"
+                when *special_chars
+                    Regexp.escape(match)
+                else
+                    keys << $2[1..-1]
+                    "([^/?&#]+)"
+                end
+            end
+            [/^#{pattern}$/, keys]
+        elsif path.respond_to?(:keys) && path.respond_to?(:match)
+            [path, path.keys]
+        elsif path.respond_to? :match
+            [path, keys]
+        else
+            raise TypeError, path
+        end
+    end
+    def filter &pred
+        Requests::from_a(requests).reverse.filter &pred
+    end
+    def path path, opt=nil
+        reg,p = compile(path)
+        r = filter do |rq|
+            rq.path =~ reg
+        end
+        r = r.params(opt) if opt
+        r
+    end
+end

metadata

@@ -0,0 +1,76 @@
+--- !ruby/object:Gem::Specification 
+name: cudan
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- takada-at
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-01-13 00:00:00 +09:00
+default_executable: cudan
+dependencies: []
+
+description: |
+  simple functinal test tool
+
+email: nightly at at-akada dot org
+executables: 
+- cudan
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- lib/cudan/xpath_cudan.rb
+- lib/cudan/logger.rb
+- lib/cudan/base_cudan.rb
+- lib/cudan/regexp_cudan.rb
+- lib/cudan/main.rb
+- lib/cudan.rb
+- bin/cudan
+- test/cudanspec.rb
+- test/wwutil.rb
+- README
+- CHANGES
+has_rdoc: true
+homepage: http://github.com/takada-at/cudan
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 1
+      - 8
+      - 6
+      version: 1.8.6
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: ""
+rubygems_version: 1.3.6
+signing_key: 
+specification_version: 3
+summary: functional test tool
+test_files: []
+