Expose scheduler as public interface & bug fixes. (#3945)

* Rename `rb_scheduler` to `rb_fiber_scheduler`.

* Use public interface if available.

* Use `rb_check_funcall` where possible.

* Don't use `unblock` unless the fiber was non-blocking.

1 files changed, 40 insertions, 0 deletions

diff --git a/include/ruby/fiber/scheduler.h b/include/ruby/fiber/scheduler.h
new file mode 100644
index 0000000000..741cc249a1
--- /dev/null
+++ b/include/ruby/fiber/scheduler.h
@@ -0,0 +1,40 @@
+#ifndef RUBY_FIBER_SCHEDULER_H                                 /*-*-C-*-vi:se ft=c:*/
+#define RUBY_FIBER_SCHEDULER_H
+/**
+ * @file
+ * @author     Ruby developers <[email protected]>
+ * @copyright  This  file  is   a  part  of  the   programming  language  Ruby.
+ *             Permission  is hereby  granted,  to  either redistribute  and/or
+ *             modify this file, provided that  the conditions mentioned in the
+ *             file COPYING are met.  Consult the file for details.
+ * @brief      Internal header for Scheduler.
+ */
+#include "ruby/ruby.h"
+#include "ruby/intern.h"
+
+VALUE rb_fiber_scheduler_get();
+VALUE rb_fiber_scheduler_set(VALUE scheduler);
+
+VALUE rb_fiber_scheduler_current();
+VALUE rb_fiber_scheduler_current_for_thread(VALUE thread);
+
+VALUE rb_fiber_scheduler_make_timeout(struct timeval *timeout);
+
+VALUE rb_fiber_scheduler_close(VALUE scheduler);
+
+VALUE rb_fiber_scheduler_kernel_sleep(VALUE scheduler, VALUE duration);
+VALUE rb_fiber_scheduler_kernel_sleepv(VALUE scheduler, int argc, VALUE * argv);
+
+int rb_fiber_scheduler_supports_process_wait(VALUE scheduler);
+VALUE rb_fiber_scheduler_process_wait(VALUE scheduler, rb_pid_t pid, int flags);
+
+VALUE rb_fiber_scheduler_block(VALUE scheduler, VALUE blocker, VALUE timeout);
+VALUE rb_fiber_scheduler_unblock(VALUE scheduler, VALUE blocker, VALUE fiber);
+
+VALUE rb_fiber_scheduler_io_wait(VALUE scheduler, VALUE io, VALUE events, VALUE timeout);
+VALUE rb_fiber_scheduler_io_wait_readable(VALUE scheduler, VALUE io);
+VALUE rb_fiber_scheduler_io_wait_writable(VALUE scheduler, VALUE io);
+VALUE rb_fiber_scheduler_io_read(VALUE scheduler, VALUE io, VALUE buffer, size_t offset, size_t length);
+VALUE rb_fiber_scheduler_io_write(VALUE scheduler, VALUE io, VALUE buffer, size_t offset, size_t length);
+
+#endif /* RUBY_FIBER_SCHEDULER_H */