trema 0.1.3

data/ruby/trema/dsl/switch.rb

@@ -0,0 +1,78 @@
+#
+# The syntax definition of switch { ... } stanza in Trema DSL.
+#
+# 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 "trema/dsl/stanza"
+
+
+module Trema
+  module DSL
+    class Switch < Stanza
+      def dpid value
+        case value
+        when String
+          set_dpid value
+        when Integer
+          set_dpid sprintf( "%#x", value )
+        else
+          raise "Invalid datapath_id: #{ value }"
+        end
+      end
+      alias :datapath_id :dpid
+
+
+      def ports str
+        @ports = str
+      end
+
+
+      def validate
+        set_dpid name if /\A0x/=~ name
+        raise "Invalid dpid: #{ @name }" if @dpid_short.nil?
+      end
+
+
+      ##########################################################################
+      private
+      ##########################################################################
+
+
+      def set_dpid string
+        @dpid_long = dpid_long_from( string )
+        @dpid_short = string
+        @name = @dpid_short if @name.nil?
+      end
+
+
+      def dpid_long_from string
+        no_0x = string.gsub( /^0x/, "" )
+        "0" * ( 16 - no_0x.length ) + no_0x
+      end
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/dsl/syntax-error.rb

@@ -0,0 +1,33 @@
+#
+# 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.
+#
+
+
+module Trema
+  module DSL
+    class SyntaxError < StandardError
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/dsl/syntax.rb

@@ -0,0 +1,109 @@
+#
+# The top-level definition of Trema network DSL.
+#
+# 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 "trema/app"
+require "trema/dsl/link"
+require "trema/dsl/run"
+require "trema/dsl/switch"
+require "trema/dsl/vhost"
+require "trema/dsl/vswitch"
+require "trema/host"
+require "trema/link"
+require "trema/monkey-patch/module"
+require "trema/open-vswitch"
+require "trema/openflow-switch"
+require "trema/packetin-filter"
+require "trema/switch-manager"
+require "trema/tremashark"
+
+
+module Trema
+  module DSL
+    class Syntax
+      def initialize config
+        @config = config
+      end
+
+
+      def use_tremashark
+        @config.tremashark = Trema::Tremashark.new
+      end
+
+
+      def port number
+        @config.port = number
+      end
+
+
+      def link peer0, peer1
+        stanza = Trema::DSL::Link.new( peer0, peer1 )
+        Trema::Link.new( stanza )
+      end
+
+
+      def switch name = nil, &block
+        stanza = Trema::DSL::Switch.new( name )
+        stanza.instance_eval( &block )
+        Trema::OpenflowSwitch.new( stanza )
+      end
+
+
+      def vswitch name = nil, &block
+        stanza = Trema::DSL::Vswitch.new( name )
+        stanza.instance_eval( &block )
+        Trema::OpenVswitch.new stanza, @config.port
+      end
+
+
+      def vhost name = nil, &block
+        stanza = Trema::DSL::Vhost.new( name )
+        stanza.instance_eval( &block ) if block
+        Trema::Host.new( stanza )
+      end
+
+
+      def filter rule
+        Trema::PacketinFilter.new( rule )
+      end
+
+
+      def event rule
+        Trema::SwitchManager.new( rule, @config.port )
+      end
+
+
+      def run name = nil, &block
+        stanza = Trema::DSL::Run.new( name )
+        stanza.instance_eval( &block )
+        Trema::App.new( stanza )
+      end
+      deprecate :app => :run
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/dsl/vhost.rb

@@ -0,0 +1,108 @@
+#
+# 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 "trema/dsl/stanza"
+require "trema/dsl/syntax-error"
+
+
+module Trema
+  module DSL
+    #
+    # The syntax definition of vhost { ... } stanza in Trema DSL.
+    #
+    class Vhost < Stanza
+      #
+      # Set promisc mode on/off
+      #
+      # @example
+      #   stanza.promisc "on"
+      #
+      # @return [undefined]
+      #
+      # @api public
+      #
+      def promisc on_off
+        case on_off.to_s.downcase
+        when "on", "yes"
+          @promisc = true
+        when "off", "no"
+          @promisc = false
+        else
+          raise SyntaxError, "Unknown option: promisc #{ on_off }"
+        end
+      end
+
+
+      #
+      # Set IP address
+      #
+      # @example
+      #   stanza.ip "192.168.100.1"
+      #
+      # @return [undefined]
+      #
+      # @api public
+      #
+      def ip str
+        @ip = str
+        if @name.nil?
+          @name = @ip
+        end
+      end
+
+
+      #
+      # Set netmask
+      #
+      # @example
+      #   stanza.netmask "255.255.0.0"
+      #
+      # @return [undefined]
+      #
+      # @api public
+      #
+      def netmask str
+        @netmask = str
+      end
+
+
+      #
+      # Set MAC address
+      #
+      # @example
+      #   stanza.mac "00:00:00:01:00:01"
+      #
+      # @return [undefined]
+      #
+      # @api public
+      #
+      def mac str
+        @mac = str
+      end
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/dsl/vswitch.rb

@@ -0,0 +1,47 @@
+#
+# The syntax definition of vswitch { ... } stanza in Trema DSL.
+#
+# 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 "trema/dsl/switch"
+
+
+module Trema
+  module DSL
+    class Vswitch < Switch
+      def initialize name = nil
+        super name
+        @ip = "127.0.0.1"
+      end
+
+
+      def ip str
+        @ip = str
+      end
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/echo-reply.c

@@ -0,0 +1,107 @@
+/*
+ * 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.
+ */
+
+
+#include "trema.h"
+#include "ruby.h"
+
+
+extern VALUE mTrema;
+VALUE cEchoReply;
+
+
+static VALUE
+echo_reply_alloc( VALUE klass ) {
+  buffer *echo_reply = create_echo_reply( get_transaction_id(), NULL );
+  return Data_Wrap_Struct( klass, NULL, free_buffer, echo_reply );
+}
+
+
+/*
+ * Creates a {EchoReply} instance.
+ *
+ * @overload initialize(options={})
+ *
+ *   @example
+ *     EchoReply.new
+ *     EchoReply.new( :transaction_id => 123 )
+ *
+ *   @param [Hash] options
+ *     the options to create a message with.
+ *
+ *   @option options [Number] :transaction_id
+ *     An unsigned 32-bit integer auto-generated if not supplied.
+ *
+ *   @raise [ArgumentError] if transaction id is not an unsigned 32-bit integer.
+ *   @raise [TypeError] if options is not a hash.
+ *
+ *   @return [EchoReply] 
+ *     an object that encapsulates the +OFPT_ECHO_REPLY+ OpenFlow message.
+ */
+static VALUE
+echo_reply_init( int argc, VALUE *argv, VALUE self ) {
+  buffer *echo_reply;
+  Data_Get_Struct( self, buffer, echo_reply );
+  uint32_t xid = get_transaction_id();
+  VALUE options;
+
+  if ( rb_scan_args( argc, argv, "01", &options ) == 1 ) {
+    Check_Type( options, T_HASH );
+    VALUE xid_ruby;
+    if ( ( xid_ruby = rb_hash_aref( options, ID2SYM( rb_intern( "transaction_id" ) ) ) ) != Qnil ) {
+      if ( rb_funcall( xid_ruby, rb_intern( "unsigned_32bit?" ), 0 ) == Qfalse ) {
+        rb_raise( rb_eArgError, "Transaction ID must be an unsigned 32-bit integer" );
+      }
+      xid = ( uint32_t ) NUM2UINT( xid_ruby );
+    }
+  }
+  ( ( struct ofp_header * ) ( echo_reply->data ) )->xid = htonl( xid );
+  return self;
+}
+
+
+/*
+ * Transaction ids, message sequence numbers matching requests to replies.
+ *
+ * @return [Number] the value of transaction id.
+ */
+static VALUE
+echo_reply_transaction_id( VALUE self ) {
+  buffer *echo_reply;
+  Data_Get_Struct( self, buffer, echo_reply );
+  uint32_t xid = ntohl( ( ( struct ofp_header * ) ( echo_reply->data ) )->xid );
+  return UINT2NUM( xid );
+}
+
+
+void
+Init_echo_reply() {
+  cEchoReply = rb_define_class_under( mTrema, "EchoReply", rb_cObject );
+  rb_define_alloc_func( cEchoReply, echo_reply_alloc );
+  rb_define_method( cEchoReply, "initialize", echo_reply_init, -1 );
+  rb_define_method( cEchoReply, "transaction_id", echo_reply_transaction_id, 0 );
+}
+
+
+/*
+ * Local variables:
+ * c-basic-offset: 2
+ * indent-tabs-mode: nil
+ * End:
+ */