openflow-controller 0.0.2

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: d03f70b6b79ae5f78ceea79beb46a1c0231c66b5
+  data.tar.gz: 175302796e704286f52912508d8e8c3bedbd947f
+SHA512:
+  metadata.gz: 2c327dc1711de1ffaa374458189dc7999c9c8db40035be47adf2c3d37add1470df5a514bcfb86f938c256c9f9fad4fd7a9e6925d042e851ccd3e31b3f5bf9bdf
+  data.tar.gz: 34465269b491f1ad763d1811624968c9edb9548a77bbcedffdbd9cd77c17705949ef583ef3d1548960ee1aa17376788338cf9536ad0db76b68ee4e62ac93aeb2

data/lib/controller.rb

@@ -0,0 +1,138 @@
+require 'socket'
+require 'logger'
+require_relative 'switch'
+
+class Numeric
+  def sec; self end
+end
+
+class OFController
+  DEFAULT_IP_ADDRESS = '0.0.0.0'
+  DEFAULT_TCP_PORT   = 6633
+
+  def self.inherited(subclass)
+    @controller_class = subclass
+  end
+
+  def self.create(*args)
+    @controller_class.new(*args)
+  end
+
+  def self.timer_event(handler, options)
+    @timer_handlers ||= {}
+    @timer_handlers[handler] = options.fetch(:interval)
+  end
+
+  def self.timer_handlers
+    @timer_handlers || {}
+  end
+
+  attr_reader :logger
+
+  def initialize(level = Logger::INFO)
+    @switches = {}
+    @logger = Logger.new($stdout).tap do |logger|
+      logger.formatter = proc do |severity, datetime, _progname, msg|
+        "#{datetime} (#{severity}) -- #{msg}\n"
+      end
+      logger.level = level
+    end
+  end
+
+  def run(ip, port, *args)
+    maybe_send_handler :start, *args
+    socket = TCPServer.open(ip, port)
+    logger.info "Controller running on #{ip}:#{port}."
+    start_timers
+    loop { start_switch_thread socket.accept }
+  end
+
+  def send_message(datapath_id, msg)
+    @switches.fetch(datapath_id).send(msg)
+  end
+
+  def start(*_args) end
+  def switch_ready(_datapath_id) end
+  def echo_request(datapath_id, msg)
+    send_message datapath_id, OFEchoReply.new(xid: msg.xid)
+  end
+  def packet_in(_datapath_id, _msg) end
+  def port_add(_datapath_id, _msg) end
+  def port_delete(_datapath_id, _msg) end
+  def port_modify(_datapath_id, _msg) end
+  def flow_removed(_datapath_id, _msg) end
+
+  private
+
+  def maybe_send_handler(handler, *args)
+    @handler_mutex ||= Mutex.new
+    @handler_mutex.synchronize do
+      __send__(handler, *args) if respond_to?(handler)
+    end
+  end
+
+  def start_timers
+    self.class.timer_handlers.each do |handler, interval|
+      Thread.new do
+        loop do
+          maybe_send_handler handler
+          sleep interval
+        end
+      end
+    end
+  end
+
+  def start_switch_thread(socket)
+    logger.debug 'Socket accepted.'
+    Thread.new do
+      switch = create_and_register_new_switch(socket)
+      start_switch_main(switch.datapath_id)
+    end
+  end
+
+  def create_and_register_new_switch(socket)
+    switch = OFSwitch.new(self, socket)
+    @switches[switch.datapath_id] = switch
+  end
+
+  def start_switch_main(datapath_id)
+    logger.info "Switch #{datapath_id} is ready."
+    maybe_send_handler :switch_ready, datapath_id
+    loop { handle_openflow_message(datapath_id) }
+  rescue => exception
+    logger.debug "Switch #{datapath_id} error: #{exception}."
+    unregister_switch(datapath_id)
+  end
+
+  def unregister_switch(datapath_id)
+    @switches.delete(datapath_id)
+    logger.info "Switch #{datapath_id} is disconnected."
+    maybe_send_handler :switch_disconnected, datapath_id
+  end
+
+  def handle_openflow_message(datapath_id)
+    msg = @switches.fetch(datapath_id).receive
+
+    case msg
+    when OFEchoRequest
+      maybe_send_handler :echo_request, datapath_id, msg
+    when OFFeaturesReply
+      maybe_send_handler :features_reply, datapath_id, msg
+    when OFPacketIn
+      maybe_send_handler :packet_in, datapath_id, msg
+    when OFPortStatus
+      case msg.reason
+      when :add
+        maybe_send_handler :port_add, datapath_id, msg
+      when :delete
+        maybe_send_handler :port_delete, datapath_id, msg
+      when :modify
+        maybe_send_handler :port_modify, datapath_id, msg
+      # else
+      end
+    when OFFlowRemoved
+      maybe_send_handler :flow_removed, datapath_id, msg
+    # else
+    end
+  end
+end

data/lib/openflow-controller.rb

@@ -0,0 +1 @@
+require_relative 'controller'

data/lib/switch.rb

@@ -0,0 +1,52 @@
+require 'openflow-protocol'
+
+class OFSwitch
+  attr_reader :controller
+
+  def initialize(controller, socket)
+    @controller = controller
+    @socket     = socket
+    begin
+      exchange_hello_messages
+      exchange_echo_messages
+      exchange_features_messages
+    rescue => exception
+      controller.logger.debug "Switch error: #{exception}."
+      raise exception
+    end
+  end
+
+  def send(msg)
+    @socket.write msg.to_binary_s
+  end
+
+  def receive
+    OFParser.read @socket
+  end
+
+  def datapath_id
+    @features_reply.datapath_id
+  end
+
+  private
+
+  def exchange_hello_messages
+    controller.logger.debug 'Wait OFPT_HELLO.'
+    fail unless receive.is_a?(OFHello)
+    send OFHello.new
+  end
+
+  def exchange_echo_messages
+    send OFEchoRequest.new
+    controller.logger.debug 'Wait OFPT_ECHO_REPLY.'
+    fail unless receive.is_a?(OFEchoReply)
+  end
+
+  def exchange_features_messages
+    send OFFeaturesRequest.new
+    controller.logger.debug 'Wait OFPT_FEATURES_REPLY.'
+    @features_reply = receive
+    controller.logger.debug "OFPT_FEATURES_REPLY.datapath_id: #{datapath_id}."
+    fail unless @features_reply.is_a?(OFFeaturesReply)
+  end
+end

metadata

@@ -0,0 +1,47 @@
+--- !ruby/object:Gem::Specification
+name: openflow-controller
+version: !ruby/object:Gem::Version
+  version: 0.0.2
+platform: ruby
+authors:
+- Jérémy Pagé
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2015-07-21 00:00:00.000000000 Z
+dependencies: []
+description: An OpenFlow Controller.
+email:
+- contact@jeremypage.me
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/controller.rb
+- lib/openflow-controller.rb
+- lib/switch.rb
+homepage: https://github.com/jejepage/openflow-controller
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.4.8
+signing_key: 
+specification_version: 4
+summary: OpenFlow Controller
+test_files: []