jesnault-bgp4r 0.0.2 → 0.0.3

data/bgp/iana.rb

@@ -0,0 +1,269 @@
+#--
+# Copyright 2008, 2009 Jean-Michel Esnault.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#
+#
+# This file is part of BGP4R.
+# 
+# BGP4R is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# BGP4R 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 BGP4R.  If not, see <http://www.gnu.org/licenses/>.
+#++
+
+
+module IANA
+  def self.afi(afi)
+    case afi
+    when AFI::IP   ; 'IPv4'
+    when AFI::IP6  ; 'IPv6'
+    else
+      ''
+    end
+  end
+  def self.safi(safi)
+    case safi
+    when SAFI::UNICAST_NLRI       ; 'Unicast'
+    when SAFI::MULTICAST_NLRI     ; 'Multicast'
+    when SAFI::LABEL_NLRI         ; 'Labeled NLRI'
+    when SAFI::MCAST_VPN          ; 'Multicast VPN'
+    when SAFI::MPLS_VPN_UNICAST   ; 'Labeled VPN Unicast'
+    when SAFI::MPLS_VPN_Multicast ; 'Labeled VPN Multicast'
+    else
+      ''
+    end
+  end
+  module AFI
+    IP = 1
+    IP6 = 2 
+    NSAP = 3
+    HDLC = 4
+    BBN = 5
+    IEEE_802 = 6
+    E163 = 7
+    E164 = 8
+    F69 = 9
+    X121 = 10
+    IPX = 11
+    Appletalk = 12
+    Decnet_IV = 13
+    Banyan_Vines = 14
+    E164_NSAP = 15
+    DNS = 16
+    Distinguished_Name = 17
+    AS_Number = 18
+    XTPv4 = 19
+    XTPv6 = 20
+    XTP = 21
+    FCWWPN = 22
+    FCWWNN = 23
+    GWID = 24
+    L2VPN = 25
+  end  
+  module SAFI
+    UNICAST_NLRI = 1
+    MULTICAST_NLRI = 2
+    LABEL_NLRI = 4
+    MCAST_VPN = 5
+    MULTI_SEGMENT_PW_NLRI = 6
+    ENCASPSULATION_SAFI = 7
+    TUNNEL = 64
+    VPLS = 65
+    BGP_MDT = 66
+    BGP4over6 = 67
+    BGP6over4 = 68
+    L1_VPN_AUTO_DISCOVERY = 69
+    MPLS_VPN_UNICAST = 128
+    MPLS_VPN_Multicast = 129
+    ROUTE_TARGET_CONSTRAINTS = 132
+    FLOW_SPEC_RULES_1 = 133
+    FLOW_SPEC_RULES_2 = 134
+    VPN_AUTO_DISCOVERY = 140
+  end
+end
+
+__END__
+
+http://www.iana.org/assignments/address-family-numbers/
+
+
+
+Registry:
+Number       Description                                                       Reference
+----------   ----------------------------------------------------------------  -----------------
+0            Reserved
+1            IP (IP version 4)
+2            IP6 (IP version 6)
+3            NSAP
+4            HDLC (8-bit multidrop)
+5            BBN 1822
+6            802 (includes all 802 media plus Ethernet "canonical format")
+7            E.163
+8            E.164 (SMDS, Frame Relay, ATM)
+9            F.69 (Telex)
+10           X.121 (X.25, Frame Relay)
+11           IPX
+12           Appletalk
+13           Decnet IV
+14           Banyan Vines
+15           E.164 with NSAP format subaddress                                 [UNI-3.1][Malis]
+16           DNS (Domain Name System)
+17           Distinguished Name                                                [Lynn]
+18           AS Number                                                         [Lynn]
+19           XTP over IP version 4                                             [Saul] 
+20           XTP over IP version 6                                             [Saul]
+21           XTP native mode XTP                                               [Saul]
+22           Fibre Channel World-Wide Port Name                                [Bakke]
+23           Fibre Channel World-Wide Node Name                                [Bakke]
+24           GWID                                                              [Hegde]
+25           AFI for L2VPN information                                         [RFC4761]
+26-16383     Unassigned
+16384        EIGRP Common Service Family                                       [Savage]
+16385        EIGRP IPv4 Service Family                                         [Savage]
+16386        EIGRP IPv6 Service Family                                         [Savage]
+16387-32767  Unassigned
+32768-65534  Unassigned
+65535        Reserved
+
+
+http://www.iana.org/assignments/safi-namespace
+
+
+Registries included below
+- SAFI Values
+
+
+Registry Name: SAFI Values
+Reference: [RFC4760]
+Range      Registration Procedures                              Note
+---------  ---------------------------------------------------  --------------------
+1-63       Standards Action or Early Allocation policy
+64-127     First Come First Served
+128-240    Some recognized assignments below, others Reserved 
+241-254    Reserved for Private Use                             Not to be assigned
+
+Registry:
+Value    Description                                     Reference
+-------  ----------------------------------------------  ---------
+0        Reserved                                        [RFC4760]
+
+1        Network Layer Reachability Information used     [RFC4760]
+         for unicast forwarding	
+
+2        Network Layer Reachability Information used     [RFC4760] 
+         for multicast forwarding
+	
+3        Reserved                                        [RFC4760]
+
+4        Network Layer Reachability Information (NLRI)   [RFC3107]
+         with MPLS Labels
+
+5        MCAST-VPN                                       [draft-ietf-l3vpn-2547bis-mcast-bgp]
+         (TEMPORARY - Expires 2009-06-19)
+
+6        Network Layer Reachability Information used     [draft-ietf-pwe3-dynamic-ms-pw]
+         for Dynamic Placement of Multi-Segment
+         Pseudowires
+         (TEMPORARY - Expires 2009-08-23)
+
+7        Encapsulation SAFI                              [RFC-ietf-softwire-encaps-safi-05.txt]
+
+8-63     Unassigned
+
+64       Tunnel SAFI                                     [Nalawade]
+
+65       Virtual Private LAN Service (VPLS)              [RFC4761]
+
+66       BGP MDT SAFI                                    [Nalawade]
+
+67       BGP 4over6 SAFI                                 [Cui]
+
+68       BGP 6over4 SAFI                                 [Cui]
+
+69       Layer-1 VPN auto-discovery information          [RFC-ietf-l1vpn-bgp-auto-discovery-05.txt]
+
+70-127   Unassigned 
+
+128      MPLS-labeled VPN address                        [RFC4364]
+
+129      Multicast for BGP/MPLS IP Virtual Private       [RFC2547]
+         Networks (VPNs)
+
+130-131  Reserved                                        [RFC4760]
+
+132      Route Target constrains                         [RFC4684]
+
+133      Dissemination of flow specification rules       [draft-marques-idr-flow-spec]
+
+134      Dissemination of flow specification rules       [draft-marques-idr-flow-spec]
+
+135-139  Reserved                                        [RFC4760]
+
+140      VPN auto-discovery                              [draft-ietf-l3vpn-bgpvpn-auto]
+
+141-240  Reserved                                        [RFC4760]
+
+241-254  Private Use                                     [RFC4760]
+
+255      Reserved                                        [RFC4760]
+
+
+References
+----------
+[RFC2547]  E. Rosen and Y. Rekhter, "BGP/MPLS VPNs", RFC 2547, March 1999.
+
+[RFC3107]  Y. Rekhter and E. Rosen, "Carrying Label Information in 
+           BGP-4", RFC 3107, May 2001.
+
+[RFC4364]  E. Rosen and Y. Rekhter, "BGP/MPLS IP VPNs", RFC 4364, February 2006.
+
+[RFC4684]  P. Marques, R. Bonica, L. Fang, L. Martini, R. Raszuk, K. Patel
+           and J. Guichard, "Constrained VPN Route Distribution", RFC 4684,
+           November 2006.
+
+[RFC4760]  T. Bates, R. Chandra, D. Katz and Y. Rekhter, "Multiprotocol 
+           Extensions for BGP-4", RFC 4760, January 2007.
+
+[RFC4761]  K. Kompella and Y. Rekhter, "Virtual Private LAN Service 
+           (VPLS) Using BGP for Auto-discovery and Signaling", RFC 4761,
+           January 2007.
+
+[RFC-ietf-l1vpn-bgp-auto-discovery-05.txt] 
+           H. Brahim, D. Fedyk, Y. Rekhter, "BGP-based Auto-Discovery for 
+           Layer-1 VPNs", RFC XXXX, Month Year.
+           
+[draft-ietf-l3vpn-bgpvpn-auto]  Work in progress
+
+[draft-ietf-pwe3-dynamic-ms-pw] Work in progress
+
+[draft-marques-idr-flow-spec]   Work in progress
+
+[draft-ietf-l3vpn-2547bis-mcast-bgp] Work in progress
+
+[RFC-ietf-softwire-encaps-safi-05.txt]
+           P. Mohapatra, E. Rosen, "BGP Encapsulation SAFI and BGP Tunnel 
+           Encapsulation Attribute", RFC XXXX, Month Year.
+
+People
+------
+[Bates] Tony Bates, <tbates&cisco.com>, July 2000. 
+
+[Cui]  Yong Cui, <cuiyong&tsinghua.edu.cn>, 15 August 2006, 20 September 2006.
+
+[Nalawade]  Gargi Nalawade, <gargi&cisco.com>, January 2004. 
+           (draft-nalawade-kapoor-tunnel-safi-01.txt)  
+           (draft-nalawade-idr-mdt-safi-00.txt), February 2004.
+
+(created 2000-07)
+
+[] 
+

data/bgp/io.rb

@@ -0,0 +1,116 @@
+#--
+# Copyright 2008, 2009 Jean-Michel Esnault.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#
+#
+# This file is part of BGP4R.
+# 
+# BGP4R is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# BGP4R 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 BGP4R.  If not, see <http://www.gnu.org/licenses/>.
+#++
+
+
+require 'observer'
+require 'thread'
+require 'bgp/common'
+require 'bgp/message'
+
+module BGP
+  module IO
+
+    class Output < Queue
+      include Observable
+      def initialize(session, holdtime, *obs)
+        @session, @holdtime = session, holdtime
+        obs.each { |o| add_observer(o) }
+        @continue = true
+        super()
+      end
+      attr_reader :thread
+      attr_writer :holdtime
+      def start
+        @thread = Thread.new(@session, @holdtime) do |s, h|
+          Thread.current['name']='BGP IO Ouput'
+          Log.debug "#{self} #{Thread.current} started" 
+          begin
+            while @continue
+              obj = deq
+              break unless @continue
+              s.write obj.respond_to?(:encode) ? obj.encode : obj
+            end
+          rescue IOError, Errno::ECONNRESET, Errno::EBADF => e
+            puts "ECONNRESET"
+            changed and notify_observers(:ev_conn_reset, e)
+          ensure
+            Log.debug "Exiting #{Thread.current['name']}"
+          end
+        end
+      end
+      def exit
+        @continue = false
+        enq('you\'re done dude!')
+      end
+    end
+
+    class Input
+      include Observable
+      def initialize(session, holdtime, *obs)
+        @session, @holdtime = session, holdtime
+        obs.each { |o| add_observer(o) }
+      end
+      attr_reader :thread
+      attr_writer :holdtime
+      def recv_msg(s)
+        loop do
+          if @buf.size<18 or @buf.size <@len
+            recv = s.recv(4100) 
+            @buf += recv unless recv.nil?
+            break unless @continue
+          end
+          if @buf.size>18
+            @len, @type=@buf[16,3].unpack('nC')
+            return @buf.slice!(0,@len) if @len<=@buf.size
+          end
+        end
+      end
+      
+      def start
+        @thread = Thread.new(@session, @holdtime) do |s, h|
+          Thread.current['name']='BGP IO Input'
+          Log.debug "#{self} #{Thread.current} started"
+          @buf = ''
+          @continue = true
+          @len=0
+          begin
+            while @continue
+              begin
+                Timeout::timeout(h) do |h| 
+                  message, type = recv_msg(s)
+                  break unless @continue
+                  changed and notify_observers(:ev_msg, @type, message)
+                end
+              rescue Timeout::Error => e
+                changed and notify_observers(:ev_holdtime_expire, e)
+                @continue = false
+              end
+            end
+          rescue IOError, Errno::ECONNRESET, Errno::EBADF => e
+            changed and notify_observers(:ev_conn_reset, e)
+          end
+          Log.debug "Exiting #{Thread.current['name']}"
+        end 
+      end
+    end
+  end
+end

data/bgp/label.rb

@@ -0,0 +1,94 @@
+#--
+# Copyright 2008, 2009 Jean-Michel Esnault.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#
+#
+# This file is part of BGP4R.
+# 
+# BGP4R is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# BGP4R 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 BGP4R.  If not, see <http://www.gnu.org/licenses/>.
+#++
+
+require 'bgp/common'
+
+module BGP
+  class Label
+    attr_reader :label
+    def initialize(*args)
+      @label, @exp = [0]*3
+      if args.size==1 and args[0].is_a?(Hash)
+        @label=args[0][:label] if args[0][:label]
+        @exp=args[0][:exp] if args[0][:exp]
+      elsif args.size==1 and args[0].is_a?(String) and args[0].is_packed?
+        parse(args[0])
+      else args[0].is_a?(Fixnum)
+        @label, @exp = args + [0]
+      end
+    end
+    def encode(bottom=1)
+      n = (@label <<4) | (@exp & 0x7)<<1 |(bottom &0x1)
+      o1 = (n & 0xff0000) >> 16
+      o2 = (n & 0x00ff00) >> 8
+      o3 = (n & 0x0000ff)
+      [o1,o2,o3].pack('CCC')
+    end
+    def parse(s)
+      octets = s.slice!(0,3).unpack('CCC')
+      n = (octets[0] << 16) + (octets[1] << 8) + octets[2]
+      @exp = (n >> 1) & 0x7
+      @label = (n >> 4)
+    end
+    def to_hash
+      {:label=>@label, :exp=>@exp}
+    end
+  end
+  class Label_stack
+    def initialize(*args)
+      @label_stack=[]
+      if args.size==1 and args[0].is_a?(String) and args[0].is_packed?
+        parse(args[0])
+      else
+        args.each { |arg| @label_stack << (arg.is_a?(Label) ? arg : Label.new(arg)) }
+      end
+    end
+    def size
+      @label_stack.size
+    end
+    def encode
+      enc = @label_stack[0..-2].collect { |l| l.encode(0) }
+      enc << @label_stack[-1].encode
+      enc.join
+    end
+    def parse(s)
+      while s.size>0
+        bottom = s[2,1].unpack('C')[0]
+        @label_stack << label = Label.new(s)
+        break if bottom & 1 > 0
+      end
+    end
+    def to_s
+      if @label_stack.empty?
+        "Label stack:(empty)"
+      else
+        "Label Stack=#{@label_stack.collect{ |l| l.label }.join(',')} (bottom)"
+      end
+    end
+    def bit_length
+      @label_stack.compact.size*24
+    end
+  end
+end
+
+load "../test/#{ File.basename($0.gsub(/.rb/,'_test.rb'))}" if __FILE__ == $0
+

data/bgp/local_pref.rb

@@ -0,0 +1,75 @@
+#--
+# Copyright 2008, 2009 Jean-Michel Esnault.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#
+#
+# This file is part of BGP4R.
+# 
+# BGP4R is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# BGP4R 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 BGP4R.  If not, see <http://www.gnu.org/licenses/>.
+#++
+
+
+require 'bgp/attribute'
+
+module BGP
+
+  class Local_pref < Attr
+
+    def initialize(arg=100)
+      @flags, @type = WELL_KNOWN_MANDATORY, LOCAL_PREF
+      if arg.is_a?(String) and arg.is_packed?
+        parse(arg)
+      elsif arg.is_a?(self.class)
+        parse(arg.encode)
+      elsif arg.is_a?(Fixnum) or arg.is_a?(Bignum)
+        self.local_pref = arg
+      elsif arg.is_a?(Hash) and arg[:local_pref]
+        self.local_pref = arg[:local_pref]
+      else
+        raise ArgumentError, "invalid argument, #{arg.inspect}"
+      end
+    end
+
+    def local_pref=(val)
+      raise ArgumentError, "invalid argument" unless val.is_a?(Integer)
+      @local_pref=val
+    end
+
+    def to_i
+      @local_pref
+    end
+
+    def encode
+      super([to_i].pack('N'))
+    end
+
+    def local_pref
+      format("(0x%4.4x) %d", to_i, to_i)
+    end
+
+    def to_s(method=:default)
+      super(local_pref, method)
+    end
+
+    private
+
+    def parse(s)
+      @flags, @type, len, @local_pref = super(s,'N')
+    end
+
+  end
+
+end
+load "../test/#{ File.basename($0.gsub(/.rb/,'_test.rb'))}" if __FILE__ == $0