gistfile1.c

#include <ruby.h>
#include <ruby/io.h>
#include <unistd.h>
#include <pthread.h>
#include <signal.h>

extern void *rb_thread_call_without_gvl(void *(*func)(void *), void *data1,
				 rb_unblock_function_t *ubf, void *data2);

volatile int halt = 1;

static void ubf_func(void *data)
{
    VALUE thread = (VALUE)data;

    if(rb_thread_interrupted(thread)){
	halt = 0;
    }
}

static void* halt_func(void *data)
{
    while(1==1) {
	if(!halt) {
	    return NULL;
	}
    }
    return NULL;
}

static VALUE
rb_test_halt(VALUE module)
{
    VALUE thread = rb_thread_current();
    rb_thread_call_without_gvl(halt_func, NULL, ubf_func, (void*)thread);
    return Qnil;
}


void Init_test( void )
{
  VALUE rb_mTest = rb_define_module("Test");
  rb_define_module_function(rb_mTest, "halt", rb_test_halt, 0);
}

gistfile2.txt

require 'mkmf'
create_header
create_makefile('test')

`ruby extconf.rb`
`make`

puts Process.pid


$:.unshift(".")
require "test"

Thread.new do
  sleep 1
  # this kills the process but should not ...
  `kill -s USR1 #{Process.pid}`
end

trap :USR1 do
  p "GOT USR1"
end

Test.halt