timeout_ext 0.0.0

data/ext/timeout_ext/missing/stdbool/stdbool.h

@@ -0,0 +1,20 @@
+/*
+ * missing/stdbool.h: Quick alternative of C99 stdbool.h
+ */
+
+#ifndef _MISSING_STDBOOL_H_
+#define _MISSING_STDBOOL_H_
+
+#ifndef __cplusplus
+
+#define bool _Bool
+#define true 1
+#define false 0
+
+#ifndef HAVE__BOOL /* AC_HEADER_STDBOOL in configure.ac */
+typedef int _Bool;
+#endif /* HAVE__BOOL */
+
+#endif /* __cplusplus */
+
+#endif /* _MISSING_STDBOOL_H_ */

data/ext/timeout_ext/timeout_ext.c

@@ -0,0 +1,114 @@
+/*
+ * Copyright (C) 2018 Ruby hackers <ruby-core@ruby-lang.org>
+ * License: LGPL-2.1+ <https://www.gnu.org/licenses/lgpl-2.1.txt>
+ */
+#include <ruby/ruby.h>
+#include <ruby/intern.h>
+#include <ccan/timer/timer.h>
+
+static VALUE eUncaughtThrow;
+
+static void *
+rb_timers_create(void)
+{
+    struct timers *t = ALLOC(struct timers);
+
+    timers_init(t, time_mono());
+
+    return t;
+}
+
+static void
+rb_timer_add(struct timers *timers, struct timer *t, struct timespec *ts)
+{
+    struct timerel rel;
+    rel.ts = *ts;
+    timer_init(t);
+    timer_addrel(timers, t, rel);
+}
+
+static void *
+rb_timers_expire(struct timers *timers)
+{
+    return timers_expire(timers, time_mono());
+}
+
+static void *
+rb_timers_earliest(struct timers *timers, struct timespec *rel)
+{
+    struct timemono now;
+    struct timemono first;
+
+    if (!timer_earliest(timers, &first)) return 0;
+
+    now = time_mono();
+    if (time_greater_(first.ts, now.ts)) {
+        struct timerel ret = timemono_between(first, now);
+        *rel = ret.ts;
+    }
+    else {
+        rel->tv_sec = 0;
+        rel->tv_nsec = 0;
+    }
+    return rel;
+}
+
+void
+rb_timers_destroy(void *p)
+{
+    struct timers *timers = p;
+    timers_cleanup(timers);
+    xfree(timers);
+}
+
+static struct rb_timers_type0 ccan_timers = {
+    /* .create = */ rb_timers_create,
+    /* .add = */ rb_timer_add,
+    /* .expire = */ rb_timers_expire,
+    /* .earliest = */ rb_timers_earliest,
+    /* .destroy = */ rb_timers_destroy
+};
+
+static VALUE
+begin_throw(VALUE self)
+{
+    rb_throw_obj(self, self);
+    return self;
+}
+
+static VALUE
+rescue_throw(VALUE ignore, VALUE err)
+{
+    return Qfalse;
+}
+
+/*
+ * We don't want to generate a backtrace like the version
+ * in timeout.rb does.  We also want to raise the same
+ * exception object so rb_s_timeout (in core) can match
+ * against it without relying on an extra proc for:
+ *
+ *      proc { |exception| return yield(sec) }
+ */
+static VALUE
+rb_timeout_error_exception(int argc, VALUE *argv, VALUE self)
+{
+    if (rb_attr_get(self, rb_intern("@thread")) == rb_thread_current()) {
+        rb_rescue2(begin_throw, self, rescue_throw, Qfalse, eUncaughtThrow, 0);
+    }
+    return self;
+}
+
+void
+Init_timeout_ext(void)
+{
+#undef rb_intern
+    VALUE mTimeout = rb_const_get(rb_cObject, rb_intern("Timeout"));
+    VALUE cError = rb_const_get(mTimeout, rb_intern("Error"));
+    eUncaughtThrow = rb_const_get(rb_cObject, rb_intern("UncaughtThrowError"));
+    rb_timers = &ccan_timers;
+    rb_define_method(mTimeout, "timeout", rb_s_timeout, -1);
+    rb_define_singleton_method(mTimeout, "timeout", rb_s_timeout, -1);
+    rb_undef_method(cError, "exception");
+    rb_define_method(cError, "exception", rb_timeout_error_exception, -1);
+}

data/test/test_timeout_ext.rb

@@ -0,0 +1,44 @@
+require 'test/unit'
+require 'timeout'
+require 'timeout_ext'
+
+class TestTimeoutExt < Test::Unit::TestCase
+  class T
+    include Timeout
+  end
+
+  def test_override
+    res = Timeout.method(:timeout).source_location.inspect
+    assert_not_match %r{\.rb\b}, res, res
+    res = Timeout::Error.new.method(:exception).source_location.inspect
+    assert_not_match %r{\.rb\b}, res, res
+    T.new.method(:timeout).source_location.inspect
+    assert_not_match %r{\.rb\b}, res, res
+  end
+
+  def test_basic_timeout
+    Timeout.timeout(nil) { sleep 0.01 }
+    Timeout.timeout(1) { assert_equal 1, Thread.list.size }
+    assert_raise(Timeout::Error) do
+      Timeout.timeout(0.1) do
+        assert_equal 1, Thread.list.size
+        sleep
+      end
+    end
+    t0 = Process.clock_gettime(Process::CLOCK_MONOTONIC)
+    assert_raise(Timeout::Error) do
+      Timeout.timeout(0.1) do
+        assert_equal 1, Thread.list.size
+        sleep 2
+      end
+    end
+    t1 = Process.clock_gettime(Process::CLOCK_MONOTONIC)
+    assert_operator(t1 - t0, :<=, 1)
+  end
+
+  def test_different_exception
+    assert_raise(RuntimeError.new('hello world')) do
+      Timeout.timeout(10) { raise 'hello world' }
+    end
+  end
+end

data/timeout_ext.gemspec

@@ -0,0 +1,30 @@
+git_manifest = `git ls-files 2>/dev/null`.split("\n")
+manifest = File.exist?('MANIFEST') ?
+  File.readlines('MANIFEST').map!(&:chomp).delete_if(&:empty?) : git_manifest
+if git_manifest[0] && manifest != git_manifest
+  tmp = "MANIFEST.#$$.tmp"
+  File.open(tmp, 'w') { |fp| fp.puts(git_manifest.join("\n")) }
+  File.rename(tmp, 'MANIFEST')
+  system('git add MANIFEST')
+end
+
+Gem::Specification.new do |s|
+  s.name = 'timeout_ext'
+  s.version = '0.0.0'
+  s.homepage = 'https://80x24.org/timeout_ext.git'
+  s.authors = ["Ruby hackers"]
+  s.summary = 'enhancement to timeout.rb in the Ruby stdlib'
+  s.files = manifest
+  s.description = <<~EOF
+Uses the CCAN timer implementation and hooks in the main Ruby VM
+to speed up timeout.rb
+  EOF
+
+  s.email = %q{normal@ruby-lang.org}
+  s.test_files = Dir['test/test_*.rb']
+  s.extensions = %w(ext/timeout_ext/extconf.rb)
+
+  s.add_development_dependency('test-unit', '~> 3.0')
+  s.add_development_dependency('rake-compiler', '~> 1.0')
+  s.licenses = %w(LGPL-2.1+)
+end

metadata

@@ -0,0 +1,126 @@
+--- !ruby/object:Gem::Specification
+name: timeout_ext
+version: !ruby/object:Gem::Version
+  version: 0.0.0
+platform: ruby
+authors:
+- Ruby hackers
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2018-06-16 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: test-unit
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.0'
+- !ruby/object:Gem::Dependency
+  name: rake-compiler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.0'
+description: |
+  Uses the CCAN timer implementation and hooks in the main Ruby VM
+  to speed up timeout.rb
+email: normal@ruby-lang.org
+executables: []
+extensions:
+- ext/timeout_ext/extconf.rb
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- COPYING
+- MANIFEST
+- README
+- Rakefile
+- ext/timeout_ext/.gitignore
+- ext/timeout_ext/ccan-bits.c
+- ext/timeout_ext/ccan/array_size/LICENSE
+- ext/timeout_ext/ccan/array_size/_info
+- ext/timeout_ext/ccan/array_size/array_size.h
+- ext/timeout_ext/ccan/build_assert/LICENSE
+- ext/timeout_ext/ccan/build_assert/_info
+- ext/timeout_ext/ccan/build_assert/build_assert.h
+- ext/timeout_ext/ccan/check_type/LICENSE
+- ext/timeout_ext/ccan/check_type/_info
+- ext/timeout_ext/ccan/check_type/check_type.h
+- ext/timeout_ext/ccan/compiler/LICENSE
+- ext/timeout_ext/ccan/compiler/_info
+- ext/timeout_ext/ccan/compiler/compiler.h
+- ext/timeout_ext/ccan/container_of/LICENSE
+- ext/timeout_ext/ccan/container_of/_info
+- ext/timeout_ext/ccan/container_of/container_of.h
+- ext/timeout_ext/ccan/ilog/LICENSE
+- ext/timeout_ext/ccan/ilog/_info
+- ext/timeout_ext/ccan/ilog/ilog.c
+- ext/timeout_ext/ccan/ilog/ilog.h
+- ext/timeout_ext/ccan/list/LICENSE
+- ext/timeout_ext/ccan/list/_info
+- ext/timeout_ext/ccan/list/list.h
+- ext/timeout_ext/ccan/str/LICENSE
+- ext/timeout_ext/ccan/str/_info
+- ext/timeout_ext/ccan/str/str.h
+- ext/timeout_ext/ccan/str/str_debug.h
+- ext/timeout_ext/ccan/time/LICENSE
+- ext/timeout_ext/ccan/time/_info
+- ext/timeout_ext/ccan/time/time.c
+- ext/timeout_ext/ccan/time/time.h
+- ext/timeout_ext/ccan/timer/LICENSE
+- ext/timeout_ext/ccan/timer/_info
+- ext/timeout_ext/ccan/timer/design.txt
+- ext/timeout_ext/ccan/timer/timer.c
+- ext/timeout_ext/ccan/timer/timer.h
+- ext/timeout_ext/depend
+- ext/timeout_ext/extconf.rb
+- ext/timeout_ext/licenses/BSD-MIT
+- ext/timeout_ext/licenses/CC0
+- ext/timeout_ext/licenses/LGPL-2.1
+- ext/timeout_ext/missing/stdbool/stdbool.h
+- ext/timeout_ext/timeout_ext.c
+- test/test_timeout_ext.rb
+- timeout_ext.gemspec
+homepage: https://80x24.org/timeout_ext.git
+licenses:
+- LGPL-2.1+
+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: 3.0.0.beta1
+signing_key: 
+specification_version: 4
+summary: enhancement to timeout.rb in the Ruby stdlib
+test_files:
+- test/test_timeout_ext.rb