trema 0.1.3

data/ruby/trema/match.h

@@ -0,0 +1,36 @@
+/*
+ * 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.
+ */
+
+
+#include "ruby.h"
+#include "trema.h"
+
+
+extern VALUE cMatch;
+
+
+void Init_match( void );
+
+
+/*
+ * Local variables:
+ * c-basic-offset: 2
+ * indent-tabs-mode: nil
+ * End:
+ */

data/ruby/trema/monkey-patch/integer.rb

@@ -0,0 +1,35 @@
+#
+# 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/monkey-patch/integer/base-conversions"
+require "trema/monkey-patch/integer/ranges"
+
+
+class Integer
+  include MonkeyPatch::Integer::BaseConversions
+  include MonkeyPatch::Integer::Ranges
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/monkey-patch/integer/base-conversions.rb

@@ -0,0 +1,36 @@
+#
+# 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 MonkeyPatch
+  module Integer
+    module BaseConversions
+      def to_hex
+        "%#x" % self
+      end
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/monkey-patch/integer/ranges.rb

@@ -0,0 +1,51 @@
+#
+# 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 MonkeyPatch
+  module Integer
+    module Ranges
+      def unsigned_8bit?
+        within_range? 8
+      end
+
+
+      def unsigned_16bit?
+        within_range? 16
+      end
+
+
+      def unsigned_32bit?
+        within_range? 32
+      end
+
+
+      def within_range? nbit
+        ( 0 <= self ) and ( self < 2 ** nbit )
+      end
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/monkey-patch/module.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.
+#
+
+
+require "trema/monkey-patch/module/deprecation"
+
+
+class Module
+  include MonkeyPatch::Module::Deprecation
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/monkey-patch/module/deprecation.rb

@@ -0,0 +1,41 @@
+#
+# 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 MonkeyPatch
+  module Module
+    module Deprecation
+      def deprecate method_pairs
+        method_pairs.each do | old_method, new_method |
+          define_method old_method do | *args, &block |
+            $stderr.puts "Warning: #{ old_method }() is deprecated. Use #{ new_method }()."
+            __send__ new_method, *args, &block
+          end
+        end
+      end
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/monkey-patch/string.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.
+#
+
+
+require "trema/monkey-patch/string/inflectors"
+
+
+class String
+  include MonkeyPatch::String::Inflectors
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/monkey-patch/string/inflectors.rb

@@ -0,0 +1,54 @@
+#
+# 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 MonkeyPatch
+  module String
+    module Inflectors
+      def camelize
+        self.split( /[^a-z0-9]/i ).map do | each |
+          each.capitalize
+        end.join
+      end
+
+
+      def demodulize
+        self.gsub /^.*::/, ''
+      end
+
+
+      def underscore
+        word = self.dup
+        word.gsub! /::/, '/'
+        word.gsub! /([A-Z]+)([A-Z][a-z])/,'\1_\2'
+        word.gsub! /([a-z\d])([A-Z])/,'\1_\2'
+        word.tr! "-", "_"
+        word.downcase!
+        word
+      end
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8-unix
+### indent-tabs-mode: nil
+### End:

data/ruby/trema/network-component.rb

@@ -0,0 +1,153 @@
+#
+# 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/ordered-hash"
+
+
+module Trema
+  #
+  # The base class of objects appears in the Trema DSL. e.g., host,
+  # switch, link etc.
+  #
+  class NetworkComponent
+    class << self
+      #
+      # Returns the `name' => object hash DB of instances
+      #
+      # @example
+      #   p App.instances
+      #   #=> {"trema tetris"=>#<App:0xb73c9328>, ...}
+      #
+      # @return [Array] the {OrderedHash} of instances
+      #
+      # @api public
+      #
+      attr_accessor :instances
+    end
+
+
+    #
+    # Called implicitly when inherited
+    #
+    # @example
+    #   #
+    #   # The following calls inherited() implicitly
+    #   # then creates an instance DB of App object.
+    #   #
+    #   class App < Trmea::NetworkComponent
+    #     attr_accessor :name
+    #   end
+    #
+    # @return [undefined]
+    #
+    # @api public
+    #
+    def self.inherited subclass
+      subclass.instances ||= OrderedHash.new
+    end
+
+
+
+    def self.clear
+      instances.clear
+    end
+
+
+    #
+    # Iterates over the list of instances
+    #
+    # @example
+    #   App.each do | each |
+    #     p each.name
+    #   end
+    #
+    # @return [Array] the list of instances
+    #
+    # @api public
+    #
+    def self.each &block
+      instances.values.each do | each |
+        block.call each
+      end
+    end
+
+
+    #
+    # Looks up a instance DB by its name
+    #
+    # @example
+    #   ttetris = TremaTetris.new
+    #   ttetris.name = "trema tetris"
+    #
+    #   App.add ttetris
+    #
+    #   App[ "trema tetris" ] => ttetris
+    #
+    # @return [Object] the associated object
+    #
+    # @api public
+    #
+    def self.[] name
+      instances[ name ]
+    end
+
+
+    #
+    # Returns the number of instances.
+    #
+    # @example
+    #   App.size  #=> 3
+    #
+    # @return [Number] the number of instances
+    #
+    # @api public
+    #
+    def self.size
+      instances.values.size
+    end
+
+
+    #
+    # Inserts a object to instance DB
+    #
+    # @example
+    #   ttetris = TremaTetris.new
+    #   ttetris.name = "trema tetris"
+    #
+    #   App.add ttetris
+    #
+    # @param [Object, #name] an object that responds to #name
+    #
+    # @return [Object] the added object
+    #
+    # @api public
+    #
+    def self.add object
+      instances[ object.name ] = object
+    end
+  end
+end
+
+
+### Local variables:
+### mode: Ruby
+### coding: utf-8
+### indent-tabs-mode: nil
+### End: