trema 0.1.3

data/spec/trema/dsl/syntax_spec.rb

@@ -0,0 +1,121 @@
+#
+# Author: Yasuhito Takamiya <yasuhito@gmail.com>
+#
+# Copyright (C) 2008-2012 NEC Corporation
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License, version 2, as
+# published by the Free Software Foundation.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License along
+# with this program; if not, write to the Free Software Foundation, Inc.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+#
+
+
+require File.join( File.dirname( __FILE__ ), "..", "..", "spec_helper" )
+require "trema/dsl/syntax"
+require "trema/packetin-filter"
+
+
+describe Trema::DSL::Syntax do
+  before( :each ) do
+    @context = mock( "context", :port => 6633, :dump_to => nil )
+    @syntax = Trema::DSL::Syntax.new( @context )
+  end
+
+
+  it "should recognize 'use_tremashark' directive" do
+    @context.should_receive( :tremashark= ).with( an_instance_of( Tremashark ) ).once
+
+    @syntax.instance_eval do
+      use_tremashark
+    end
+  end
+
+
+  it "should recognize 'port' directive" do
+    @context.should_receive( :port= ).with( 1234 ).once
+
+    @syntax.instance_eval do
+      port 1234
+    end
+  end
+
+
+  it "should recognize 'link' directive" do
+    @context.stub!( :links ).and_return( [ mock( "link" ) ] )
+    Trema::Link.should_receive( :add ).with( an_instance_of( Trema::Link ) ).once
+
+    @syntax.instance_eval do
+      link "PEER0", "PEER1"
+    end
+  end
+
+
+  it "should recognize 'switch' directive" do
+    Trema::Switch.should_receive( :add ).with( an_instance_of( OpenflowSwitch ) ).once
+
+    @syntax.instance_eval do
+      switch { dpid "0xabc" }
+    end
+  end
+
+
+  it "should recognize 'vswitch' directive" do
+    Trema::Switch.should_receive( :add ).with( an_instance_of( OpenVswitch ) ).once
+
+    @syntax.instance_eval do
+      vswitch { dpid "0xabc" }
+    end
+  end
+
+
+  it "should recognize 'vhost' directive" do
+    Trema::Host.should_receive( :add ).with( an_instance_of( Trema::Host ) ).once
+
+    @syntax.instance_eval do
+      vhost { }
+    end
+  end
+
+
+  it "should recognize 'filter' directive" do
+    Trema::PacketinFilter.should_receive( :add ).with( an_instance_of( Trema::PacketinFilter ) ).once
+
+    @syntax.instance_eval do
+      filter :lldp => "LLDP RULE", :packet_in => "PACKET-IN RULE"
+    end
+  end
+
+
+  it "should recognize 'event' directive" do
+    Trema::SwitchManager.should_receive( :add ).with( an_instance_of( Trema::SwitchManager ) ).once
+
+    @syntax.instance_eval do
+      event "RULE"
+    end
+  end
+
+
+  it "should recognize 'run' directive" do
+    Trema::App.should_receive( :add ).with( an_instance_of( Trema::App ) ).once
+
+    @syntax.instance_eval do
+      run( "My App" ) { }
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:
+

data/spec/trema/dsl/vhost_spec.rb

@@ -0,0 +1,148 @@
+#
+# Author: Yasuhito Takamiya <yasuhito@gmail.com>
+#
+# Copyright (C) 2008-2012 NEC Corporation
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License, version 2, as
+# published by the Free Software Foundation.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License along
+# with this program; if not, write to the Free Software Foundation, Inc.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+#
+
+
+require File.join( File.dirname( __FILE__ ), "..", "..", "spec_helper" )
+require "trema/dsl/vhost"
+
+
+module Trema
+  module DSL
+    describe Vhost do
+      describe :name do
+        context "when name empty" do
+          before { @vhost = Vhost.new }
+
+          subject { @vhost[ :name ] }
+          
+          context "and IP address empty" do
+            it { should be_nil }
+          end
+
+          context "and IP address is 192.168.100.100" do
+            before { @vhost.ip "192.168.100.100" }
+
+            specify { should == "192.168.100.100" }
+          end
+        end
+
+
+        context "when name is \"Yutaro's host\"" do
+          before { @vhost = Vhost.new( "Yutaro's host" ) }
+
+          subject { @vhost[ :name ] }
+
+          context "and ip address empty" do
+            it { should == "Yutaro's host" }
+          end
+
+          context "and ip address 192.168.100.100" do
+            before { @vhost.ip "192.168.100.100" }
+
+            it { should == "Yutaro's host" }
+          end
+        end
+      end
+
+
+      describe :promisc do
+        before { @vhost = Vhost.new( "Yutaro's host" ) }
+
+        subject { @vhost[ :promisc ] }
+        
+        context "when promisc off" do
+          before { @vhost.promisc "off" }
+
+          it { should be_false }
+        end
+
+
+        context "when promisc no" do
+          before { @vhost.promisc "no" }
+
+          it { should be_false }
+        end
+        
+
+        context "when promisc on" do
+          before { @vhost.promisc "on" }
+
+          it { should be_true }
+        end
+
+
+        context "when promisc yes" do
+          before { @vhost.promisc "yes" }
+
+          it { should be_true }
+        end
+
+
+        context "when promisc INVALID_VALUE" do
+          specify do
+            lambda do
+              @vhost.promisc "INVALID_VALUE"
+            end.should raise_error( Trema::DSL::SyntaxError )
+          end
+        end
+      end
+      
+      
+      describe :netmask do
+        before { @vhost = Vhost.new( "Yutaro's host" ) }
+
+        subject { @vhost[ :netmask ] }
+        
+        context "when netmask empty" do
+          it { should be_nil }
+        end
+
+        context "when netmask is 255.255.255.0" do
+          before { @vhost.netmask "255.255.255.0" }
+
+          it { should == "255.255.255.0" }
+        end
+      end
+      
+      
+      describe :mac do
+        before { @vhost = Vhost.new( "Yutaro's host" ) }
+
+        subject { @vhost[ :mac ] }
+
+        context "when mac empty" do
+          it { should be_nil }
+        end
+
+        context "when mac is 00:00:00:01:00:01" do
+          before { @vhost.mac "00:00:00:01:00:01" }
+
+          it { should == "00:00:00:01:00:01" }
+        end
+      end
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/spec/trema/dsl/vswitch_spec.rb

@@ -0,0 +1,90 @@
+#
+# Author: Yasuhito Takamiya <yasuhito@gmail.com>
+#
+# Copyright (C) 2008-2012 NEC Corporation
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License, version 2, as
+# published by the Free Software Foundation.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License along
+# with this program; if not, write to the Free Software Foundation, Inc.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+#
+
+
+require File.join( File.dirname( __FILE__ ), "..", "..", "spec_helper" )
+require "trema/dsl/vswitch"
+
+
+module Trema
+  module DSL
+    describe Vswitch do
+      before :each do
+        @vswitch = Vswitch.new
+      end
+
+
+      context %[when parsing "vswitch { ... }"] do
+        it %[recognizes "dpid DATAPATH_ID" directive] do
+          lambda do
+            @vswitch.dpid "0xabc"
+          end.should_not raise_error
+        end
+
+
+        it %[recognizes "datapath_id DATAPATH_ID" directive] do
+          lambda do
+            @vswitch.datapath_id "0xabc"
+          end.should_not raise_error
+        end
+
+
+        it %[recognizes "ports PORT_NUMBERS" directive] do
+          lambda do
+            @vswitch.ports "0-4"
+          end.should_not raise_error
+        end
+
+
+        it %[recognizes "ip IP_ADDRESS" directive] do
+          lambda do
+            @vswitch.ip "192.168.0.1"
+          end.should_not raise_error
+        end
+      end
+
+
+      context "when getting the attributes of a vswitch" do
+        it "returns its dpid in long format" do
+          @vswitch.dpid "0xabc"
+          @vswitch[ :dpid_long ].should == "0000000000000abc"
+        end
+
+
+        it "returns its dpid in short format" do
+          @vswitch.dpid "0xabc"
+          @vswitch[ :dpid_short ].should == "0xabc"
+        end
+
+
+        it "returns its ip address" do
+          @vswitch.ip "192.168.0.1"
+          @vswitch[ :ip ].should == "192.168.0.1"
+        end
+      end
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/spec/trema/echo-reply_spec.rb

@@ -0,0 +1,49 @@
+#
+# Author: Nick Karanatsios <nickkaranatsios@gmail.com>
+#
+# Copyright (C) 2008-2012 NEC Corporation
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License, version 2, as
+# published by the Free Software Foundation.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License along
+# with this program; if not, write to the Free Software Foundation, Inc.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+#
+
+
+require File.join( File.dirname( __FILE__ ), "..", "spec_helper" )
+require "trema"
+
+
+describe EchoReply, ".new( OPTIONAL OPTION MISSING )" do
+  it_should_behave_like "any Openflow message with default transaction ID"
+end
+
+
+describe EchoReply, ".new( VALID OPTION )" do
+  subject { EchoReply.new :transaction_id => transaction_id }
+  it_should_behave_like "any OpenFlow message with transaction_id option"
+end
+
+
+describe EchoReply, ".new( INVALID OPTION )" do
+  it "should raise TypeError" do
+    expect {
+      EchoReply.new "INVALID OPTION"
+    }.to raise_error( TypeError )
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/spec/trema/echo-request_spec.rb

@@ -0,0 +1,75 @@
+#
+# Author: Nick Karanatsios <nickkaranatsios@gmail.com>
+#
+# Copyright (C) 2008-2012 NEC Corporation
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License, version 2, as
+# published by the Free Software Foundation.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License along
+# with this program; if not, write to the Free Software Foundation, Inc.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+#
+
+
+require File.join( File.dirname( __FILE__ ), "..", "spec_helper" )
+require "trema"
+
+
+describe EchoRequest, ".new( OPTIONAL OPTION MISSING )" do
+  its( :user_data ) { should be_nil }
+  it_should_behave_like "any Openflow message with default transaction ID"
+end
+
+
+describe EchoRequest, ".new( INVALID OPTIONS ) - user_data numeric" do
+  subject { EchoRequest.new 1234, 456 }
+  it "should raise an ArgumentError" do
+    expect { subject }.to raise_error( ArgumentError )
+  end
+end
+
+
+describe EchoRequest, ".new( INVALID OPTIONS ) - arguments as an Array" do
+  subject { EchoRequest.new [ 1234, "this is a test" ] }
+  it "should raise a TypeError" do
+    expect { subject }.to raise_error( TypeError )
+  end
+end
+
+
+describe EchoRequest, ".new( VALID OPTIONS )" do
+  subject { EchoRequest.new :transaction_id => transaction_id, :user_data => 'this is a test' }
+  let( :transaction_id ) { 1234 }
+  its( :user_data ) { should eq( "this is a test" ) }
+  it_should_behave_like "any OpenFlow message with transaction_id option"
+
+
+  context "when #echo_request is sent" do
+    it "should #echo_reply" do
+      class EchoRequestController < Controller; end
+      network {
+        vswitch( "echo_request" ) { datapath_id 0xabc }
+      }.run( EchoRequestController ) {
+        echo_request = EchoRequest.new( :transaction_id => 1234, :user_data => 'this is a test' )
+        controller( "EchoRequestController" ).send_message( 0xabc, echo_request )
+        log_file = Trema.log_directory + "/openflowd.echo_request.log"
+        IO.read( log_file ).should include( "OFPT_ECHO_REPLY" )
+        sleep 1
+      }
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End: