Ruby: Add test case for checking bounds of integral function parameters

Examples/test-suite/common.mk

@@ -336,6 +336,7 @@ CPP_TEST_CASES += \
 	newobject1 \
 	newobject3 \
 	null_pointer \
+	numeric_bounds_checking \
 	operator_overload \
 	operator_overload_break \
 	operator_pointer_ref \

Examples/test-suite/numeric_bounds_checking.i

@@ -0,0 +1,47 @@
+%module numeric_bounds_checking
+
+// Tests the bounds checking for integral parameters passed to wrapped functions.
+// Note that it needs an accompanying _runme file to perform the actual test.
+
+%inline %{
+#include <limits.h>
+struct Limits {
+  signed char schar_min() { return SCHAR_MIN; }
+  signed char schar_max() { return SCHAR_MAX; }
+  unsigned char uchar_min() { return 0U; }
+  unsigned char uchar_max() { return UCHAR_MAX; }
+  short shrt_min() { return SHRT_MIN; }
+  short shrt_max() { return SHRT_MAX; }
+  unsigned short ushrt_min() { return 0U; }
+  unsigned short ushrt_max() { return USHRT_MAX; }
+  int int_min() { return INT_MIN; }
+  int int_max() { return INT_MAX; }
+  unsigned int uint_min() { return 0U; }
+  unsigned int uint_max() { return UINT_MAX; }
+  long long_min() { return LONG_MIN; }
+  long long_max() { return LONG_MAX; }
+  unsigned long ulong_min() { return 0UL; }
+  unsigned long ulong_max() { return ULONG_MAX; }
+#ifdef LLONG_MIN
+  long long llong_min() { return LLONG_MIN; }
+  long long llong_max() { return LLONG_MAX; }
+  unsigned long long ullong_min() { return 0ULL; }
+  unsigned long long ullong_max() { return ULLONG_MAX; }
+#endif
+};
+
+struct Checker {
+  signed char pass_schar(signed char v) { return v; }
+  unsigned char pass_uchar(unsigned char v) { return v; }
+  short pass_shrt(short v) { return v; }
+  unsigned short pass_ushrt(unsigned short v) { return v; }
+  int pass_int(int v) { return v; }
+  unsigned int pass_uint(unsigned int v) { return v; }
+  long pass_long(long v) { return v; }
+  unsigned long pass_ulong(unsigned long v) { return v; }
+#ifdef LLONG_MIN
+  long long pass_long(long long v) { return v; }
+  unsigned long long pass_ulong(unsigned long long v) { return v; }
+#endif
+};
+%}

Examples/test-suite/ruby/numeric_bounds_checking_runme.rb

@@ -0,0 +1,42 @@
+#!/usr/bin/env ruby
+#
+# Tests the bounds checking for integral parameters passed to wrapped functions.
+#
+
+require 'swig_assert'
+require 'numeric_bounds_checking'
+
+limits = Numeric_bounds_checking::Limits.new
+checker = Numeric_bounds_checking::Checker.new
+
+all_ok = true
+
+types = %w(schar uchar
+           shrt  ushrt
+           int   uint
+           long  ulong)
+types += %w(llong ullong) if limits.respond_to?(:llong_min)
+
+types.each do |t|
+  min = limits.send("#{t}_min")
+  max = limits.send("#{t}_max")
+
+  meth = "pass_#{t}"
+
+  # check within bounds
+  swig_assert_equal("checker.#{meth}(#{min})", "#{min}", binding)
+  swig_assert_equal("checker.#{meth}(#{max})", "#{max}", binding)
+
+  # check outside bounds
+  [ min - 1, max + 1].each do |val|
+    ok = false
+    begin
+      ret = checker.send("#{meth}", val)
+    rescue RangeError, TypeError
+      ok = true
+    end
+    $stderr.puts "\n#{meth}(#{val}): Expected exception but got #{ret} for #{val} (type '#{t}')  " unless ok
+    all_ok = all_ok && ok
+  end
+  raise SwigRubyError.new("\nAt least one bounds check failed  ") unless all_ok
+end