trema 0.4.7 → 0.4.8

data/ruby/trema/error.h

@@ -1,42 +0,0 @@
-/*
- * Ruby wrapper class for OFPT_ERROR message.
- *
- * Copyright (C) 2008-2013 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.
- */
-
-
-#ifndef ERROR_H
-#define ERROR_H
-
-
-#include "ruby.h"
-
-
-extern VALUE cError;
-
-
-void Init_error( void );
-
-
-#endif // ERROR_H
-
-
-/*
- * Local variables:
- * c-basic-offset: 2
- * indent-tabs-mode: nil
- * End:
- */

data/ruby/trema/exact-match.rb

@@ -1,34 +0,0 @@
-#
-# A syntax sugar class for creating an exact match object.
-#
-# Copyright (C) 2008-2013 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
-  class ExactMatch
-    def self.from(message)
-      Match.from message
-    end
-  end
-end
-
-
-### Local variables:
-### mode: Ruby
-### coding: utf-8-unix
-### indent-tabs-mode: nil
-### End:

data/ruby/trema/executables.rb

@@ -1,99 +0,0 @@
-#
-# Copyright (C) 2008-2013 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/monkey-patch/module'
-require 'trema/monkey-patch/string'
-require 'trema/path'
-
-
-#
-# Holds a list of executables found in Trema.objects directory.
-#
-class Trema::Executables
-  class << self
-    #
-    # Cycles through a list of file names testing if there are executable or
-    # not.
-    #
-    # @return [FalseClass, Array]
-    #   false if a file name is not an executable program or a list of all
-    #   file names that are.
-    #
-    def compiled?
-      @list.each do | each |
-        return false unless FileTest.executable?(__send__ each)
-      end
-    end
-
-
-    ############################################################################
-    private
-    ############################################################################
-
-
-    #
-    # Adds the name to a list.
-    #
-    def add(name)
-      @list ||= []
-      @list << name
-    end
-
-
-    #
-    # Defines a class method that returns the full path name of an executable
-    # program constructed from its relative path. It also adds the
-    # class method name to an array.
-    #
-    # @example
-    #   path "openvswitch/bin/ovs-ofctl"
-    #
-    # @param [String] path
-    #   the relative path to an executable program.
-    #
-    # @return [Array] a list of a class method to access each executable program.
-    #
-    def path(path)
-      name = File.basename(path).underscore
-      define_class_method(name) do
-        File.join Trema.objects, path
-      end
-      add name
-    end
-  end
-
-
-  path 'openvswitch/bin/ovs-ofctl'
-  path 'openvswitch/bin/ovs-openflowd'
-  path 'packetin_filter/packetin_filter'
-  path 'phost/cli'
-  path 'phost/phost'
-  path 'switch_manager/switch'
-  path 'switch_manager/switch_manager'
-  path 'tremashark/packet_capture'
-  path 'tremashark/stdin_relay'
-  path 'tremashark/syslog_relay'
-  path 'tremashark/tremashark'
-end
-
-
-### Local variables:
-### mode: Ruby
-### coding: utf-8
-### indent-tabs-mode: nil
-### End:

data/ruby/trema/features-reply.c

@@ -1,330 +0,0 @@
-/*
- * Copyright (C) 2008-2013 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 <string.h>
-#include "trema.h"
-#include "ruby.h"
-#include "port.h"
-
-
-extern VALUE mTrema;
-VALUE cFeaturesReply;
-
-
-static VALUE
-features_reply_alloc( VALUE klass ) {
-  buffer *features_reply = create_features_reply( 0, 0, 0, 0, 0, 0, NULL );
-  return Data_Wrap_Struct( klass, NULL, free_buffer, features_reply );
-}
-
-
-/*
- * Creates a FeaturesReply message. A user would not explicitly
- * instantiate a {FeaturesReply} object but would be created while
- * parsing the +OFPT_FEATURES_REPLY+ message.
- *
- * @overload initialize(options)
- *   @example
- *     FeaturesReply.new(
- *       :datapath_id => 0xabc,
- *       :transaction_id => 1,
- *       :n_buffers => 256,
- *       :n_tables => 1,
- *       :capabilities => 135,
- *       :actions => 2048,
- *       :ports => [ port1, port2, ... ]
- *     )
- *   @param [Hash] options
- *     the options to create a message with.
- *   @option options [Number] :datapath_id
- *     datapath unique id. Subsequent commands directed to switch should
- *     embed this id.
- *   @option options [Number] :transaction_id
- *     a positive number lower layers match this to ensure message integrity.
- *   @option options [Number] :n_buffers
- *     maximum number of packets that can be buffered at once.
- *   @option options [Number] :n_tables
- *     number of supported tables, number could vary according to
- *     switch's implementation.
- *   @option options [Number] :capabilities
- *     supported capabilities expressed as a 32-bit bitmap. Ability of a switch
- *     to respond or perform a certain function for example flow statistics,
- *     IP address lookup in APR packets.
- *   @option options [Number] :actions
- *     supported actions expressed as a 32-bit bitmap.
- *   @option options [Port] :ports
- *     an array of {Port} objects detailing port description and function.
- *   @return [FeaturesReply]
- */
-static VALUE
-features_reply_init( VALUE self, VALUE options ) {
-  buffer *buf = NULL;
-  Data_Get_Struct( self, buffer, buf );
-  struct ofp_switch_features *features_reply = buf->data;
-  VALUE tmp = Qnil;
-
-  tmp = rb_hash_aref( options, ID2SYM( rb_intern( "datapath_id" ) ) );
-  if ( tmp == Qnil ) {
-    rb_raise( rb_eArgError, ":datapath_id is a mandatory option" );
-  }
-  features_reply->datapath_id = htonll( NUM2ULL( tmp ) );
-
-  tmp = rb_hash_aref( options, ID2SYM( rb_intern( "transaction_id" ) ) );
-  if ( tmp == Qnil ) {
-    tmp = rb_hash_aref( options, ID2SYM( rb_intern( "xid" ) ) );
-    if ( tmp == Qnil ) {
-      rb_raise( rb_eArgError, ":transaction_id is a mandatory option" );
-    }
-  }
-  features_reply->header.xid = htonl( ( uint32_t ) NUM2UINT( tmp ) );
-
-  features_reply->n_buffers = 0;
-  tmp = rb_hash_aref( options, ID2SYM( rb_intern( "n_buffers" ) ) );
-  if ( tmp != Qnil ) {
-    features_reply->n_buffers = htonl( ( uint32_t ) NUM2UINT( tmp ) );
-  }
-
-  features_reply->n_tables = 1;
-  tmp = rb_hash_aref( options, ID2SYM( rb_intern( "n_tables" ) ) );
-  if ( tmp != Qnil ) {
-    features_reply->n_tables = ( uint8_t ) NUM2UINT( tmp );
-  }
-
-  features_reply->capabilities = 0;
-  tmp = rb_hash_aref( options, ID2SYM( rb_intern( "capabilities" ) ) );
-  if ( tmp != Qnil ) {
-    features_reply->capabilities = htonl( ( uint32_t ) NUM2UINT( tmp ) );
-  }
-
-  features_reply->actions = htonl( 1 << OFPAT_OUTPUT );
-  tmp = rb_hash_aref( options, ID2SYM( rb_intern( "actions" ) ) );
-  if ( tmp != Qnil ) {
-    features_reply->actions = htonl( ( uint32_t ) NUM2UINT( tmp ) );
-  }
-
-  rb_iv_set( self, "@attribute", options );
-
-  return self;
-}
-
-
-/*
- * Message originator identifier.
- *
- * @return [Number] the value of datapath_id
- */
-static VALUE
-features_reply_datapath_id( VALUE self ) {
-  return rb_hash_aref( rb_iv_get( self, "@attribute" ), ID2SYM( rb_intern( "datapath_id" ) ) );
-}
-
-
-/*
- * Transaction ids, message sequence numbers matching requests to replies.
- *
- * @return [Number] the value of transaction id.
- */
-static VALUE
-features_reply_transaction_id( VALUE self ) {
-  VALUE xid = Qnil;
-
-  xid = rb_hash_aref( rb_iv_get( self, "@attribute" ), ID2SYM( rb_intern( "transaction_id" ) ) );
-  if ( xid != Qnil ) {
-    return xid;
-  }
-  xid = rb_hash_aref( rb_iv_get( self, "@attribute" ), ID2SYM( rb_intern( "xid" ) ) );
-  if ( xid != Qnil ) {
-    return xid;
-  }
-
-  return Qnil;
-}
-
-
-/*
- * Maximum number of packets that can be buffered at once.
- *
- * @return [Number] the value of n_buffers.
- */
-static VALUE
-features_reply_n_buffers( VALUE self ) {
-  return rb_hash_aref( rb_iv_get( self, "@attribute" ), ID2SYM( rb_intern( "n_buffers" ) ) );
-}
-
-
-/*
- * Number of supported tables.
- *
- * @return [Number] the value of n_tables.
- */
-static VALUE
-features_reply_n_tables( VALUE self ) {
-  return rb_hash_aref( rb_iv_get( self, "@attribute" ), ID2SYM( rb_intern( "n_tables" ) ) );
-}
-
-
-/*
- * Supported capabilities expressed as a 32-bit bitmap.
- *
- * @return [Number] the value of capabilities.
- */
-static VALUE
-features_reply_capabilities( VALUE self ) {
-  return rb_hash_aref( rb_iv_get( self, "@attribute" ), ID2SYM( rb_intern( "capabilities" ) ) );
-}
-
-
-/*
- * Supported actions expressed as a 32-bit bitmap.
- *
- * @return [Number] the value of actions.
- */
-static VALUE
-features_reply_actions( VALUE self ) {
-  return rb_hash_aref( rb_iv_get( self, "@attribute" ), ID2SYM( rb_intern( "actions" ) ) );
-}
-
-
-/*
- * An array of {Port} objects detailing port description and function.
- *
- * @return [Array<Port>] the value of ports.
- */
-static VALUE
-features_reply_ports( VALUE self ) {
-  return rb_hash_aref( rb_iv_get( self, "@attribute" ), ID2SYM( rb_intern( "ports" ) ) );
-}
-
-
-/*
- * An array of {Port} objects detailing physical port description and function.
- *
- * @return [Array<Port>] the value of ports.
- */
-static VALUE
-features_reply_physical_ports( VALUE self ) {
-  return rb_hash_aref( rb_iv_get( self, "@attribute" ), ID2SYM( rb_intern( "physical_ports" ) ) );
-}
-
-
-/*
- * Document-class: Trema::FeaturesReply
- */
-void
-Init_features_reply() {
-  mTrema = rb_eval_string( "Trema" );
-  cFeaturesReply = rb_define_class_under( mTrema, "FeaturesReply", rb_cObject );
-  rb_define_alloc_func( cFeaturesReply, features_reply_alloc );
-  rb_define_method( cFeaturesReply, "initialize", features_reply_init, 1 );
-  rb_define_method( cFeaturesReply, "datapath_id", features_reply_datapath_id, 0 );
-  rb_define_method( cFeaturesReply, "transaction_id", features_reply_transaction_id, 0 );
-  rb_alias( cFeaturesReply, rb_intern( "xid" ), rb_intern( "transaction_id" ) );
-  rb_define_method( cFeaturesReply, "n_buffers", features_reply_n_buffers, 0 );
-  rb_define_method( cFeaturesReply, "n_tables", features_reply_n_tables, 0 );
-  rb_define_method( cFeaturesReply, "capabilities", features_reply_capabilities, 0 );
-  rb_define_method( cFeaturesReply, "actions", features_reply_actions, 0 );
-  rb_define_method( cFeaturesReply, "ports", features_reply_ports, 0 );
-  rb_define_method( cFeaturesReply, "physical_ports", features_reply_physical_ports, 0 );
-}
-
-
-void
-handle_switch_ready( uint64_t datapath_id, void *controller ) {
-  if ( rb_respond_to( ( VALUE ) controller, rb_intern( "switch_ready" ) ) ) {
-    rb_funcall( ( VALUE ) controller, rb_intern( "switch_ready" ), 1, ULL2NUM( datapath_id ) );
-  }
-}
-
-
-/*
- * Extract and map {Port} to +ofp_phy_port+ structure.
- */
-static VALUE
-ports_from( const list_element *c_ports, uint64_t datapath_id ) {
-  VALUE ports = rb_ary_new();
-
-  if ( c_ports == NULL ) {
-    return ports;
-  }
-
-  list_element *port_head = xmalloc( sizeof( list_element ) );
-  memcpy( port_head, c_ports, sizeof( list_element ) );
-  list_element *port = NULL;
-  for ( port = port_head; port != NULL; port = port->next ) {
-    rb_ary_push( ports, port_from( ( struct ofp_phy_port * ) port->data, datapath_id ) );
-  }
-  xfree( port_head );
-  return ports;
-}
-
-
-static void
-append_physical_port( void *port, void *physical_ports ) {
-  if ( ( ( struct ofp_phy_port * ) port )->port_no <= OFPP_MAX ) {
-    append_to_tail( ( list_element ** ) physical_ports, port );
-  }
-}
-
-
-void
-handle_features_reply(
-  uint64_t datapath_id,
-  uint32_t transaction_id,
-  uint32_t n_buffers,
-  uint8_t n_tables,
-  uint32_t capabilities,
-  uint32_t actions,
-  const list_element *ports,
-  void *controller
-) {
-  if ( rb_respond_to( ( VALUE ) controller, rb_intern( "features_reply" ) ) == Qfalse ) {
-    return;
-  }
-
-  VALUE attributes = rb_hash_new();
-  rb_hash_aset( attributes, ID2SYM( rb_intern( "datapath_id" ) ), ULL2NUM( datapath_id ) );
-  rb_hash_aset( attributes, ID2SYM( rb_intern( "transaction_id" ) ), UINT2NUM( transaction_id ) );
-  rb_hash_aset( attributes, ID2SYM( rb_intern( "n_buffers" ) ), UINT2NUM( n_buffers ) );
-  rb_hash_aset( attributes, ID2SYM( rb_intern( "n_tables" ) ), UINT2NUM( n_tables ) );
-  rb_hash_aset( attributes, ID2SYM( rb_intern( "capabilities" ) ), UINT2NUM( capabilities ) );
-  rb_hash_aset( attributes, ID2SYM( rb_intern( "actions" ) ), UINT2NUM( actions ) );
-  rb_hash_aset( attributes, ID2SYM( rb_intern( "ports" ) ), ports_from( ports, datapath_id ) );
-
-  list_element *physical_ports = xmalloc( sizeof( list_element ) );
-  create_list( &physical_ports );
-  if ( ports != NULL ) {
-    // use memcpy() to walk over the const qualifier
-    list_element *tmp_ports = xmalloc( sizeof( list_element ) );
-    memcpy( tmp_ports, ports, sizeof( list_element ) );
-    iterate_list( tmp_ports, append_physical_port, &physical_ports );
-    xfree( tmp_ports );
-  }
-  rb_hash_aset( attributes, ID2SYM( rb_intern( "physical_ports" ) ), ports_from( physical_ports, datapath_id ) );
-  xfree( physical_ports );
-
-  VALUE features_reply = rb_funcall( cFeaturesReply, rb_intern( "new" ), 1, attributes );
-  rb_funcall( ( VALUE ) controller, rb_intern( "features_reply" ), 2, ULL2NUM( datapath_id ), features_reply );
-}
-
-
-/*
- * Local variables:
- * c-basic-offset: 2
- * indent-tabs-mode: nil
- * End:
- */