rb-wartslib 0.9.10

data/ext/sctrace.h

@@ -0,0 +1,35 @@
+/*
+** Ruby bindings to scamper_trace_t and its nested structures (e.g.,
+** scamper_list_t, scamper_cycle_t, and scamper_trace_hop_t).
+**
+** --------------------------------------------------------------------------
+** Copyright (C) 2007 The Regents of the University of California.
+**
+** This program 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 2 of the License, or
+** (at your option) any later version.
+** 
+** 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+**
+** $Id: sctrace.h,v 1.3 2007/11/29 01:33:42 youngh Exp $
+**/
+
+#ifndef __SCFILE_H
+#define __SCFILE_H
+
+#include "scamper_list.h"
+#include "scamper_addr.h"
+#include "scamper_trace.h"
+
+VALUE sctrace_create(scamper_trace_t *trace);
+void Init_sctrace(void);
+
+#endif  # __SCFILE_H

data/lib/wartslib.rb

@@ -0,0 +1,27 @@
+#############################################################################
+## Pulls in all wartslib files, including the compiled extension and
+## Ruby-based augmentation of extension classes.
+##
+## --------------------------------------------------------------------------
+## Copyright (C) 2007 The Regents of the University of California.
+##
+## This program 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 2 of the License, or
+## (at your option) any later version.
+## 
+## 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+## 
+## $Id: wartslib.rb,v 1.3 2007/11/29 01:22:53 youngh Exp $
+#############################################################################
+
+require "wartslibext"
+require "wartslib/wl-file.rb"
+require "wartslib/wl-trace.rb"

data/lib/wartslib/wl-file.rb

@@ -0,0 +1,85 @@
+#############################################################################
+## Some additional methods of wartslib classes.
+##
+## --------------------------------------------------------------------------
+## Copyright (C) 2007 The Regents of the University of California.
+##
+## This program 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 2 of the License, or
+## (at your option) any later version.
+## 
+## 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+##
+## $Id: wl-file.rb,v 1.8 2007/11/29 01:25:42 youngh Exp $
+#############################################################################
+
+module Warts
+
+class File
+
+  class <<self
+    alias_method :__raw_open, :open
+  end
+
+  def self.open(path_or_fd, mode="r", type=nil, &block)
+    if path_or_fd == nil
+      raise ArgumentError, "missing path or fd"
+    elsif path_or_fd.kind_of?(Integer) || path_or_fd.kind_of?(IO)
+      __raw_open path_or_fd, mode, type, &block
+    else
+      path = path_or_fd.to_s
+      return nil if mode == "r" && !::File.exists?(path)
+
+      if path =~ /\.(warts|arts)(\.gz|\.bz2|\.lzo)?$/
+        type = $1 unless type
+      end
+
+      command = nil
+      case path
+      when /\.gz$/: command = "gzip -dc"
+      when /\.bz2$/: command = "bzip2 -dc"
+      when /\.lzo$/: command = "lzop -dc"
+      end
+
+      if mode == "r" && command
+        io = IO.popen "#{command} #{path}"
+        begin
+          retval = __raw_open io, mode, type, &block
+          unless block
+            retval.instance_variable_set :@___popen_io, io
+            retval
+          end
+        rescue
+          io.close rescue nil
+          raise
+        ensure
+          io.close rescue nil if block
+        end
+      else
+        __raw_open path, mode, type, &block
+      end
+    end
+  end
+
+  alias_method :__raw_close, :close
+
+  def close
+    __raw_close
+    io = instance_variable_get :@___popen_io
+    if io
+      io.close rescue nil
+      instance_variable_set :@___popen_io, nil
+    end
+  end
+
+end
+
+end

data/lib/wartslib/wl-trace.rb

@@ -0,0 +1,111 @@
+#############################################################################
+## Some additional methods of wartslib classes.
+##
+## --------------------------------------------------------------------------
+## Copyright (C) 2007 The Regents of the University of California.
+##
+## This program 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 2 of the License, or
+## (at your option) any later version.
+## 
+## 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+##
+## $Id: wl-trace.rb,v 1.5 2007/11/29 01:26:43 youngh Exp $
+#############################################################################
+
+module Warts
+
+class Trace
+
+  private
+
+  HALT_REASON = []
+  HALT_REASON[Warts::Trace::STOP_COMPLETED] = "S"
+  HALT_REASON[Warts::Trace::STOP_NONE] = "S"
+  HALT_REASON[Warts::Trace::STOP_UNREACH] = "U"
+  HALT_REASON[Warts::Trace::STOP_LOOP] = "L"
+  HALT_REASON[Warts::Trace::STOP_DEAD] = "G"
+
+  public
+
+  # The length of the path (in hops), taking any responding destination into
+  # account.
+  #
+  # The hop_count attribute doesn't provide this value because hop_count
+  # gives the number of hops probed (that is, attempted) and not the number
+  # of hops with responses (or, alternatively, the highest TTL of responding
+  # hops).
+  def path_length
+    dest_response = find_dest_response
+    if dest_response
+      dest_response[0] + 1
+    else
+      return 0 if hop_count == 0
+      (hop_count-1).downto(0) do |hop|
+        return hop + 1 if hop_exists? hop
+      end
+      return 0
+    end
+  end
+
+  def dump
+    fields = ["T"]
+
+    fields.push src, dst, list_id, cycle_id, start
+
+    dest_response = find_dest_response
+    if dest_response
+      fields.push "R", hop_rtt_str(*dest_response),
+	hop_probe_ttl(*dest_response),
+	hop_reply_ttl(*dest_response)
+    else
+      fields.push "N", 0, 0, 0
+    end
+
+    fields.push(HALT_REASON[stop_reason] || "?")
+    fields.push stop_data
+
+    fields.push(complete? ? "C" : "I")
+
+    # For compatibility with sc_analysis_dump, we don't print missing hops
+    # at the end of the trace.
+    unresponsive = 0
+    each_hop do |hop, exists|
+      if exists
+	hop_str = ""
+	each_attempt(hop) do |attempt|
+	  # sc_analysis_dump compatibility
+	  next if dest_response &&
+	    hop == dest_response[0] && attempt == dest_response[1]
+
+	  hop_str << ";" unless hop_str.empty?
+	  hop_str << hop_addr(hop, attempt)
+	  hop_str << "," << hop_rtt_str(hop, attempt)
+	  hop_str << "," << hop_probe_id(hop, attempt).to_s
+	end
+
+	unless hop_str.empty?
+	  unresponsive.times { fields.push "q" }
+	  unresponsive = 0
+
+	  fields.push hop_str
+	end
+      else
+	unresponsive += 1
+      end
+    end
+
+    fields.join("\t")
+  end
+
+end
+
+end

metadata

@@ -0,0 +1,67 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.9.2
+specification_version: 1
+name: rb-wartslib
+version: !ruby/object:Gem::Version 
+  version: 0.9.10
+date: 2007-11-29 00:00:00 -08:00
+summary: Ruby extension for reading/writing warts files
+require_paths: 
+- lib
+email: youngh@rubyforge.org
+homepage: http://rb-wartslib.rubyforge.org/
+rubyforge_project: 
+description: 
+autorequire: wartslib
+default_executable: 
+bindir: bin
+has_rdoc: false
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+post_install_message: 
+authors: 
+- Young Hyun
+files: 
+- bin/analyze-order
+- bin/scdump
+- bin/wdump
+- lib/wartslib
+- lib/wartslib.rb
+- lib/wartslib/wl-file.rb
+- lib/wartslib/wl-trace.rb
+- ext/extconf.rb
+- ext/scaddr.c
+- ext/scaddr.h
+- ext/scext.c
+- ext/scfile.c
+- ext/scfile.h
+- ext/sclist.c
+- ext/sclist.h
+- ext/sctrace.c
+- ext/sctrace.h
+- COPYING
+- README
+- CHANGES
+test_files: []
+
+rdoc_options: []
+
+extra_rdoc_files: 
+- COPYING
+- README
+- CHANGES
+executables: []
+
+extensions: 
+- ext/extconf.rb
+requirements: []
+
+dependencies: []
+