wping 0.1.0-mswin32

data/bin/ping.rb

@@ -0,0 +1,51 @@
+$: << File.join( File.dirname( __FILE__ ), '../lib' )
+require 'win32/ping'
+require 'resolv'
+
+include Win32
+
+size = 32
+count = 4
+forever = false
+
+while arg = ARGV.shift
+  case arg
+  when /-t/
+    forever = true
+  else
+    host = arg
+  end
+end
+
+pinger = Win32::PingICMP.new
+
+real_host = Resolv.new.getaddress( host )
+host = "#{host} [#{real_host}]" unless host == real_host
+puts "\nPinging #{host} with #{size} bytes of data:\n\n"
+i = count
+total = max = received = lost = 0
+min = nil
+
+while forever == true or i > 0
+  i -= 1
+  r = pinger.ping( real_host, 1, size ).first
+  if r.successful
+    puts "Reply from #{real_host}: bytes=#{size} time=#{r.round_trip_time} TTL=#{r.ttl}"
+    received += 1
+    min ||= r.round_trip_time
+    min = [min, r.round_trip_time].min
+    max = [max, r.round_trip_time].max
+    total += r.round_trip_time
+  else
+    puts "Ping failed"
+    lost += 1
+  end
+  sleep 1
+end
+  
+avg = total.to_f / count
+puts "\nPing statistics for #{real_host}:"
+puts "    Packets: Sent = #{count}, Received = #{received}, Lost = #{lost} (#{'%d'%[lost/count*100]}% loss),"
+puts "Approximate round trip times in milli-seconds:"
+puts "    Minimum = #{min}ms, Maximum = #{max}ms, Average = #{avg}ms\n"
+

data/lib/win32/ping.rb

@@ -0,0 +1,149 @@
+require 'Win32API'
+require 'ipaddr'
+require 'resolv'
+require 'enumerator'
+require 'ostruct'
+
+class Integer
+	def to_ip
+    ip = []
+		self.to_s( 2 ).rjust( 32, "0" ).split(//).each_slice( 8 ) do |p|
+      ip << p.join.to_i( 2 )
+    end
+    ip.join '.'
+	end
+
+  def to_w32ip
+    [self].pack( 'N' ).unpack( 'L' ).first
+  end
+end
+
+class IPAddr
+  def to_w32ip
+    self.to_i.to_w32ip
+  end
+end
+
+module Win32; end
+class Win32::PingICMP
+	@@icmp_create_file  = Win32API.new( 'icmp', 'IcmpCreateFile', '', 'N' )
+	@@icmp_send_echo    = Win32API.new( 'icmp', 'IcmpSendEcho', 'NNPIPPNN', 'N' )
+	@@icmp_close_handle = Win32API.new( 'icmp', 'IcmpCloseHandle', 'N', 'I' )
+	@@resolv = Resolv.new
+
+	IPFLAG_DONT_FRAGMENT = 0x02
+	REPLY_BUFFER_SIZE = 1024
+  ICMP_ECHO_REPLY_SIZE = 28
+
+	# Low level, you probably shouldn't be using it
+	def self.icmp_create_file
+		handle = @@icmp_create_file.call
+		if block_given?
+			begin
+				yield handle
+			ensure
+				icmp_close_handle handle
+				handle = nil
+			end
+		end
+		handle
+	end
+
+	# This is pretty low level and probably shouldn't be used, but since
+	# I believe in freedom, I have left it public just in case.
+	# I left out the data size and buffer size args because ruby can
+	# figure that out.  int_ip is the int form of the ip address.
+	def self.icmp_send_echo handle, int_ip, request_data, request_options, 
+													reply_buffer, timeout
+		@@icmp_send_echo.call( handle, int_ip, request_data, request_data.size,
+													request_options, reply_buffer, reply_buffer.size,
+													timeout )
+	end
+
+	# Low level.  Are you sure you need this?
+	def self.icmp_close_handle handle
+		@@icmp_close_handle.call( handle )
+	end
+
+	# Low level.
+	def self.resolv hostname
+		@@resolv.getaddress hostname
+	end
+
+	# Some algorythm I found on line.
+	# This generates the buffer to ping with
+	def self.create_buffer size
+		b = []
+		1.upto size do |i|
+			# readable characters
+			b << i % 94 + 32
+		end
+
+		("%c"*size)%b
+	end
+
+	# heres what you want
+	def ping host, count = 1, size = 32, no_frag = false, ttl = 64, timeout = 4000
+		ip = nil
+		nresolv = false
+		begin
+			if nresolv
+				host = self.class.resolv host
+			end
+			ip = IPAddr.new( host )
+		rescue 
+			unless nresolv
+				nresolv = true
+				retry
+			end
+			raise $!
+		end
+
+		reply_buffer = "0" * ( size + ICMP_ECHO_REPLY_SIZE )
+    req_data = self.class.create_buffer size
+    replies = []
+    no_frag = no_frag ? IPFLAG_DONT_FRAGMENT : 0
+    # struct options
+    #   u_char ttl
+    #   u_char tos
+    #   u_char flags
+    #   u_char options_size
+    options = ("%c"*4)%[ttl,0,no_frag,0]
+		self.class.icmp_create_file do |handle|
+      count.times do
+        reply = OpenStruct.new
+        reply.reply_count = self.class.icmp_send_echo( handle, ip.to_w32ip, 
+                                                       req_data, options, 
+                                                       reply_buffer, timeout ) 
+        reply.request_data = req_data
+        reply.reply_data = reply_buffer[28..-1]
+        header = reply_buffer.unpack( 'NLLSSLCCCCL' )
+        reply.ip = header[0].to_ip
+        reply.status, reply.round_trip_time = header[1..2]
+        reply.data_size, reply.reserved = header[3..4]
+        # this is a pointer to the actual reply data.  We assume
+        # that it is a 28 so we don't need it, maybe future versions
+        # will
+        #reply.pdata = header[5]
+        reply.time_to_live = reply.ttl = header[6]
+        reply.type_of_service = reply.tos = header[7]
+        reply.flags = header[8]
+        reply.options_size = header[9]
+        # this is a pointer to the optiondata, we don't need it
+        # but maybe future versions will
+        #reply.poptions_data = header[10]
+        # I was using this one for testing
+        #reply.reply_buffer = reply_buffer
+        reply.successful = ( reply.status == 0 )
+        replies << reply
+      end
+		end
+    def replies.all_successful?
+      self.find {|r| !r.successful }.nil?
+    end
+    def replies.one_successful?
+      !self.find {|r| r.successful}.nil?
+    end
+    replies
+	end
+end

metadata

@@ -0,0 +1,47 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.8.11
+specification_version: 1
+name: wping
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+date: 2006-11-20 00:00:00 -05:00
+summary: ruby wrapper for win32api icmp.dll
+require_paths: 
+- lib
+email: rcorsaro@gmail.com
+homepage: 
+rubyforge_project: 
+description: ruby wrapper for win32api icmp.dll
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: mswin32
+signing_key: 
+cert_chain: 
+authors: 
+- rcorsaro
+files: 
+- bin/ping.rb
+- lib/win32
+- lib/win32/ping.rb
+test_files: []
+
+rdoc_options: []
+
+extra_rdoc_files: []
+
+executables: 
+- ping.rb
+extensions: []
+
+requirements: 
+- none
+dependencies: []
+