Sipper 1.1.3

data/sipper_test/test_expectation_parser.rb

@@ -0,0 +1,76 @@
+require 'base_test_case'
+require 'util/expectation_parser'
+
+class TestExpectationParser < BaseTestCase
+
+  def setup
+    super
+    @e = SipperUtil::ExpectationParser.new
+  end
+  
+  def test_simple
+    @e.parse(["< INVITE", "> 100", "> 200"])
+    assert(@e.match("< INVITE")[0])
+    assert(!@e.match("< INVITE")[0]) # only one
+    assert(!@e.match("> 180")[0]) # only 100
+    assert(@e.match("> 100")[0])
+    assert(!@e.match("> 100")[0])
+    assert(@e.match("> 200")[0])
+    assert(!@e.match("> 200")[0])
+  end
+  
+  def test_alteration
+    @e.parse(["< INVITE|SUBSCRIBE", "> 1xx", "> 2xx"])
+    assert(@e.match("< SUBSCRIBE")[0])
+    assert(!@e.match("< INVITE")[0]) # only one
+    assert(@e.match("> 180")[0])
+    assert(!@e.match("> 180")[0])  # only one 1xx
+    assert(@e.match("> 202")[0])
+    assert(!@e.match("> 202")[0]) # only one 2xx
+  end
+  
+  def test_repetition1
+    @e.parse(["< INVITE|SUBSCRIBE {2,2}", "> 1xx {3,3}", "> 2xx"])
+    assert(@e.match("< SUBSCRIBE")[0])
+    assert(@e.match("< INVITE")[0])
+    assert(!@e.match("< SUBSCRIBE")[0]) # exactly 2
+    assert(@e.match("> 100")[0])
+    assert(@e.match("> 180")[0])
+    assert(!@e.match("> 200")[0]) # not yet
+    assert(@e.match("> 180")[0])  # exactly 3
+    assert(@e.match("> 202")[0])  
+  end
+  
+  def test_repetition2
+    @e.parse(["< INVITE|SUBSCRIBE|NOTIFY {3,}", "> 1xx {1,}", "> 2xx {,2}"])
+    assert(@e.match("< SUBSCRIBE")[0])
+    assert(@e.match("< INVITE")[0])
+    assert(@e.match("< NOTIFY")[0])
+    assert(@e.match("< INVITE")[0]) # greater than 3
+    assert(@e.match("> 100")[0])
+    assert(@e.match("> 180")[0])
+    assert(@e.match("> 100")[0])
+    assert(@e.match("> 180")[0])
+    assert(@e.match("> 202")[0])
+    assert(!@e.match("> 302")[0])
+  end
+  
+  def test_optionality1
+    @e.parse(["> INVITE", "< 100 {0,}", "< 200"])
+    assert(@e.match("> INVITE")[0])
+    assert(@e.match("< 200")[0])
+  end
+  
+  def test_optionality2
+    @e.parse(["> INVITE", "< 100 {0,}", "> INVITE"])
+    assert(@e.match("> INVITE")[0])
+    assert(!@e.match("> INVITE")[0]) # does not match
+  end 
+  
+  def test_optionality3
+    @e.parse(["> INVITE", "< 100 {0,}", "< 200 {0,}", "> SUBSCRIBE"])
+    assert(@e.match("> INVITE")[0])
+    assert(@e.match("> SUBSCRIBE")[0])
+  end
+  
+end

data/sipper_test/test_extensions.rb

@@ -0,0 +1,28 @@
+
+$:.unshift File.join(File.dirname(__FILE__),"..","sipper")
+
+require 'driven_sip_test_case'
+
+class TestExtensions < DrivenSipTestCase
+   
+  def setup
+    @orig_cp = SipperConfigurator[:ControllerPath]
+    SipperConfigurator[:ControllerPath] = File.join(SipperConfigurator[:SipperBasePath],  "sipper_test", "test_controllers", "extensions")
+    super
+  end
+  
+  def test_extensions
+    start_named_controller("ExtensionUacController")
+    
+    record_in = get_in_recording(0)
+    
+    assert_header_value_in_recording_equals(record_in.get_recording[0], :from, "TEST EXTENSION <sip:nasir@sipper.com>;tag=1")
+    
+  end
+  
+  def teardown
+    SipperConfigurator[:ControllerPath] = @orig_cp
+    super
+  end
+  
+end

data/sipper_test/test_freeze.rb

@@ -0,0 +1,81 @@
+
+require 'driven_sip_test_case'
+
+
+class TestFreeze < DrivenSipTestCase
+
+  def setup
+    super
+    str = <<-EOF
+    
+    require 'sip_test_driver_controller'
+    
+    module SipInline
+      class UasFrController < SIP::SipTestDriverController
+      
+        transaction_usage :use_transactions=>true
+        
+        def on_invite(session)
+          session.do_record(session.irequest.content_length.to_s)
+          session.respond_with(200)
+          logd("Received INVITE sent a 200 from "+name)
+        end
+        
+        def on_ack(session)
+          session.request_with("bye")
+        end
+        
+        def on_success_res(session)
+          session.invalidate(true)
+          session.flow_completed_for("TestFreeze")
+        end
+        
+        def order
+          0
+        end
+        
+      end
+      
+      class UacFrController < SIP::SipTestDriverController
+      
+        transaction_usage :use_transactions=>true  
+        
+        def start
+          u = create_udp_session(SipperConfigurator[:LocalSipperIP], SipperConfigurator[:LocalTestPort])
+          r = u.create_initial_request("invite", "sip:nasir@sipper.com", :p_session_record=>"msg-info")
+          r.content_length = '10'
+          r.content_length.freeze
+          r.content_length = '20'
+          m = u.send(r)
+          u.do_record(m.content_length.to_s)
+          logd("Sent a new INVITE from "+name)
+        end
+     
+        
+        def on_success_res(session)
+          session.request_with('ACK')
+        end
+        
+        def on_bye(session)
+          session.respond_with(200)
+          session.invalidate(true)
+        end
+         
+      end
+    end
+    EOF
+    define_controller_from(str)
+    set_controller("SipInline::UacFrController")
+  end
+  
+  
+  def test_fr_controllers
+    self.expected_flow = ["> INVITE", "! 10", "< 100", "< 200", "> ACK", "< BYE", "> 200"]
+    start_controller
+    verify_call_flow(:out)
+    self.expected_flow = ["< INVITE", "> 100", "! 10", "> 200", "< ACK", "> BYE", "< 200"]
+    verify_call_flow(:in)
+  end
+
+  
+end

data/sipper_test/test_generated.rb

@@ -0,0 +1,90 @@
+require 'sip_test_case'
+require 'util/expectation_parser'
+require 'util/locator'
+require 'generators/gen_controller'
+require 'generators/gen_test'
+require 'test/unit/ui/console/testrunner'
+
+require 'fileutils'
+
+
+class TestGenerated < SipTestCase
+
+  def setup
+    super 
+    @orig_rp = SipperConfigurator[:DefaultRP]
+    SipperConfigurator[:DefaultRP] = SipperConfigurator[:LocalTestPort]
+    @orig_cp = SipperConfigurator[:ControllerPath]
+    SipperConfigurator[:ControllerPath] = File.join(SipperConfigurator[:SipperBasePath], "sipper_test", "tmp")
+    FileUtils.mkdir SipperConfigurator[:ControllerPath]
+    @orig_dir = FileUtils.pwd
+    FileUtils.cd SipperConfigurator[:ControllerPath]
+  end
+  
+  # Watch out for a minor kink in this. As we are using driven test case for the test code
+  # and we are signaling the completion of test from the test code itself, we need to have 
+  # the last message in the flow an incoming message for the test case. 
+  def test_info
+   @cflow = "< INFO, > 200"
+   @tflow = "> INFO, < 200"
+   _run
+  end
+  
+  def test_invite
+    @cflow = "< INVITE, > 100, > 200, < ACK, < BYE, > 200"
+    @tflow = "> INVITE, < 100, < 200, > ACK, > BYE, < 200"
+    _run
+  end
+  
+  def test_sleep
+    @cflow = "< INVITE, > 100, @sleep_ms 100, > 200, < ACK, < BYE, > 200"
+    @tflow = "> INVITE, < 100, < 200, > ACK, > BYE, < 200"
+    _run
+  end
+  
+  def test_timer
+    @cflow = "< INVITE, > 100, @set_timer 100, > 200, < ACK, < BYE, @set_timer 300, > 200"
+    @tflow = "> INVITE, < 100, < 200, > ACK, @set_timer 1000, > BYE, < 200"
+    _run
+  end
+  
+  def test_wildcard
+    @cflow = "< INVITE, > 180, > 212, < ACK, < BYE, > 200"
+    @tflow = "> INVITE, < 1xx, < 2x2, > ACK, > BYE, < 200"
+    _run
+  end
+  
+  def test_alteration_response
+    @cflow = "< INVITE, > 100, > 180, > 200, < ACK, < BYE, > 200"
+    @tflow = "> INVITE, < 1xx {2,2}, < 200, > ACK, > BYE, < 200"
+    _run
+  end
+  
+  def test_alteration_request
+    @cflow = "< INVITE|SUBSCRIBE,  > 200"
+    @tflow = "> SUBSCRIBE, < 20x|302"
+    _run
+  end
+  
+#  def test_repetition
+#    @cflow = "< INVITE, > 100, > 180, > 200, > 200, > 200,  < ACK, > INVITE, > INVITE, < 200, > ACK, < BYE, > 200"
+#    @tflow = "> INVITE, < 1xx {1,2}, < 200 {3,}, > ACK, < INVITE {2,2}, > 200, < ACK, > BYE, < 200"
+#    _run
+#  end
+  
+  def _run
+    SIP::Generators::GenController.new("UasController", @cflow).generate_controller(true)
+    SIP::Generators::GenTest.new("TestGeneratedUas", @tflow).generate_test(true)
+    load "testgenerateduas.rb"
+    Test::Unit::UI::Console::TestRunner.run(Testgenerateduas)
+  end
+  
+  def teardown
+    FileUtils.cd @orig_dir
+    FileUtils.rm_rf SipperConfigurator[:ControllerPath]  
+    SipperConfigurator[:DefaultRP] = @orig_rp
+    SipperConfigurator[:ControllerPath] = @orig_cp
+  end
+  
+  private :_run
+end

data/sipper_test/test_header_parameters.rb

@@ -0,0 +1,75 @@
+
+require 'driven_sip_test_case'
+
+class TestHeaderParameters < DrivenSipTestCase
+
+  def setup
+    super
+    str = <<-EOF
+    require 'sip_test_driver_controller'
+    module SipInline
+      class UasParamController < SIP::SipTestDriverController
+      
+        transaction_usage :use_transactions=>true
+        
+        def on_invite(session)
+          logd("Received INVITE in "+name)
+          r = session.create_response(200, "OK") 
+          r.test_header = "hello"
+          r.test_header.mytag = "123"
+          r.test_header.novalue = ""
+          r.test_header.delvalue = "blah"
+          r.test_header.delvalue = nil
+          session.send(r)
+        end
+        
+        def on_ack(session)
+          session.invalidate(true)
+          session.flow_completed_for("TestHeaderParameters")
+        end
+        
+        def order
+          0
+        end
+      end
+      
+      class UacParamController < SIP::SipTestDriverController
+      
+        transaction_usage :use_transactions=>true
+        
+        def start
+          r = Request.create_initial("invite", "sip:nasir@sipper.com", :p_session_record=>"msg-info")
+          u = create_udp_session(SipperConfigurator[:LocalSipperIP], SipperConfigurator[:LocalTestPort])
+          u.send(r)
+          logd("Sent a new INVITE from #{name}")
+        end
+     
+        def on_success_res(session)
+          logd("Received response in #{name}")
+          session.validate_presence_of_headers :test_header
+          session.validate_presence_of_header_params :test_header, :mytag
+          session.validate_presence_of_header_params :test_header, :novalue
+          session.do_record((session.iresponse.test_header.has_param?(:mytag)).to_s)
+          session.do_record(session.iresponse.test_header.novalue == "")
+          session.do_record(session.iresponse.test_header[:delvalue] == nil)
+          session.request_with('ack')
+          session.invalidate(true)
+        end
+        
+      end
+    end
+    EOF
+    define_controller_from(str)
+    set_controller("SipInline::UacParamController")
+  end
+  
+  
+  def test_header_params
+    self.expected_flow = ["> INVITE", "< 100", "< 200", "! true {6,6}", "> ACK"]
+    start_controller
+    verify_call_flow(:out)
+    self.expected_flow = ["< INVITE", "> 100", "> 200", "< ACK"]
+    verify_call_flow(:in)
+  end
+  
+end

data/sipper_test/test_header_parse.rb

@@ -0,0 +1,141 @@
+require 'base_test_case'
+require 'ruby_ext/string'
+require 'sip_headers/header'
+require 'util/sipper_util'
+
+class TestHeaderParse < BaseTestCase
+  
+  def setup
+    @method = "invite"
+    @uri = "sip:nasir@sipper.com"
+    @code = 200
+    @status = "OK"
+    @rq = Request.create_initial(@method, @uri, :p_asserted_identity => "sip:nina@home.com")                        
+    @rs = Response.create(@code, @status, :from=>"sip:nasir@codepresso.com")
+  end
+  
+  def test_header_object
+    assert(@rq.p_asserted_identity.class <= SipHeaders::Header)
+    assert(@rq.from.class <= SipHeaders::From)
+  end
+  
+  def test_header_string
+    assert_equal("<sip:nina@home.com>", @rq.p_asserted_identity.to_s)
+    assert_equal("<sip:nasir@codepresso.com>", @rs.from.to_s)
+  end
+  
+  def test_parse_via
+    via = "SIP/2.0/TLS 175.19.37.207:6062;branch=z9hG4bK-1-0"
+    pv = SipHeaders::Via.new.assign(via)
+    pv.name = SipperUtil.headerize("via") 
+    assert_equal("Via", pv.name)
+    assert_equal("SIP/2.0/TLS 175.19.37.207:6062;branch=z9hG4bK-1-0", pv.to_s)
+    assert_equal("SIP/2.0/TLS 175.19.37.207:6062", pv.header_value)
+    assert_equal({"branch"=>"z9hG4bK-1-0"}, pv.header_params)
+    assert_equal("z9hG4bK-1-0", pv.branch)
+    assert_equal("SIP", pv.protocol)
+    assert_equal("2.0", pv.version)
+    assert_equal("TLS", pv.transport)
+    assert_equal("175.19.37.207", pv.sent_by_ip)
+    assert_equal("6062", pv.sent_by_port)
+    pv.sent_by_port = "6063"
+    assert_equal("SIP/2.0/TLS 175.19.37.207:6063;branch=z9hG4bK-1-0", pv.to_s)
+  end
+  
+  # Via: SIP/2.0/UDP 10.17.205.49:5062
+  
+#  def test_parse_via_2543
+#    via = "SIP/2.0/UDP 10.17.205.49:5062"
+#    pv = SipHeaders::Via.new.assign(via)
+#    pv.name = SipperUtil.headerize("via") 
+#    assert_equal("Via", pv.name)
+#    assert_equal("SIP", pv.protocol)
+#    assert_equal("2.0", pv.version)
+#    assert_equal("UDP", pv.transport)
+#    assert_equal("SIP/2.0/UDP 10.17.205.49:5062", pv.to_s)
+#    assert_equal("SIP/2.0/UDP 10.17.205.49:5062", pv.header_value)
+#    assert_equal("10.17.205.49", pv.sent_by_ip)
+#    assert_equal("5062", pv.sent_by_port)
+#    pv.sent_by_port = "6063"
+#    assert_equal("SIP/2.0/UDP 10.17.205.49:6063", pv.to_s)
+#  end
+  
+  def test_parse_authenticate
+    auth = 'Digest realm="atlanta.com", domain="sip:ss1.carrier.com", qop="auth", nonce="f84f1cec41e6cbe5aea9c8e88d359", opaque="", stale=FALSE, algorithm=MD5'
+    pa = SipHeaders::WwwAuthenticate.new.assign(auth)
+    pa.name = SipperUtil.headerize("WWW_Authenticate")
+    assert_equal("WWW-Authenticate", pa.name)
+    assert_equal('"atlanta.com"', pa.realm)
+    assert_equal('"sip:ss1.carrier.com"', pa.domain)
+    assert_equal('"auth"', pa.qop)
+    assert_equal('""', pa.opaque)
+    assert_equal("FALSE", pa.stale)
+    assert_equal("MD5", pa.algorithm)
+  end
+  
+  def test_parse_authorization
+    auth = 'Digest username="bob", realm="biloxi.com", nonce="dcd98b7102dd2f0e8b11d0f600bfb0c093", uri="sip:bob@biloxi.com", qop=auth, nc=00000001, cnonce="0a4f113b", response="6629fae49393a05397450978507c4ef1", opaque="5ccc069c403ebaf9f0171e9517f40e41"'
+    pa = SipHeaders::Authorization.new.assign(auth)
+    pa.name = SipperUtil.headerize("Authorization")
+    assert_equal("Authorization", pa.name)
+    assert_equal('"biloxi.com"', pa.realm)
+    assert_equal('"sip:bob@biloxi.com"', pa.uri)
+    assert_equal('"dcd98b7102dd2f0e8b11d0f600bfb0c093"', pa.nonce)
+    assert_equal('auth', pa.qop)
+    assert_equal('00000001', pa.nc)
+    assert_equal('"0a4f113b"', pa.cnonce)
+    assert_equal('"6629fae49393a05397450978507c4ef1"', pa.response)
+    assert_equal('"5ccc069c403ebaf9f0171e9517f40e41"', pa.opaque)
+  end
+  
+    def test_parse_authinfo
+    auth = 'nextnonce="dcd98b7102dd2f0e8b11d0f600bfb0c093", qop=auth, nc=00000001, cnonce="0a4f113b", rspauth="6629fae49393a05397450978507c4ef1"'
+    pa = SipHeaders::AuthenticationInfo.new.assign(auth)
+    pa.name = SipperUtil.headerize("Authentication_Info")
+    assert_equal("Authentication-Info", pa.name)
+    assert_equal('"dcd98b7102dd2f0e8b11d0f600bfb0c093"', pa.nextnonce)
+    assert_equal('auth', pa.qop)
+    assert_equal('00000001', pa.nc)
+    assert_equal('"0a4f113b"', pa.cnonce)
+    assert_equal('"6629fae49393a05397450978507c4ef1"', pa.rspauth)
+  end
+  
+  
+  def test_header_parameter
+    assert_nil(@rq.to.tag)
+    @rq.to.tag = "xyz"
+    assert_equal("xyz", @rq.to.tag)
+    @rq.my_header = "test_header"
+    @rq.my_header.my_parameter = "test_parameter"
+    assert_equal("test_parameter", @rq.my_header.my_parameter)
+    assert_equal("test_header;my_parameter=test_parameter", @rq.my_header.to_s)
+  end
+  
+  def test_frozen_header
+    orig_via = @rq.via.to_s
+    @rq.via.freeze
+    assert_raise(TypeError){@rq.via.assign("SIP/2.0/TLS 175.19.37.207:6062;branch=z9hG4bK-1-0")}
+    assert_equal(orig_via, @rq.via.to_s)
+    assert_nothing_raised {@rq.via.new_tag="1"}
+    assert_equal(orig_via, @rq.via.to_s)
+  end
+  
+  def test_unparse_option
+    @rq.from.assign("Nasir Khan <sip:nasir@sipper.com>;tag=1", false)
+    assert_equal("Nasir Khan <sip:nasir@sipper.com>;tag=1", @rq.from.to_s)
+    assert_nil(@rq.from.display_name)
+    assert_nil(@rq.from.uri)
+    @rq.from.tag = "2"
+    assert_equal("Nasir Khan <sip:nasir@sipper.com>;tag=1", @rq.from.to_s)
+    @rq.from.assign("Nasir Khan <sip:nasir@goblet.com>;tag=3", true)
+    assert_equal("Nasir Khan <sip:nasir@goblet.com>;tag=3", @rq.from.to_s)
+  end
+  
+  def test_unparse_new
+    @rq.assign_unparsed(:foo, "bar")
+    assert_equal("bar", @rq.foo.to_s)
+    @rq.foo.x = "1"
+    assert_equal("bar", @rq.foo.to_s)
+  end
+  
+end