polyphony 0.46.1 → 0.47.0
Sign up to get free protection for your applications and to get access to all the features.
- checksums.yaml +4 -4
- data/CHANGELOG.md +8 -0
- data/Gemfile.lock +1 -1
- data/TODO.md +0 -14
- data/examples/core/enumerable.rb +64 -0
- data/examples/performance/fiber_resume.rb +43 -0
- data/examples/performance/thread-vs-fiber/compare.rb +59 -0
- data/examples/performance/thread-vs-fiber/em_server.rb +33 -0
- data/examples/performance/thread-vs-fiber/polyphony_server.rb +4 -3
- data/examples/performance/thread-vs-fiber/threaded_server.rb +22 -15
- data/examples/performance/thread_switch.rb +44 -0
- data/ext/polyphony/backend_common.h +9 -0
- data/ext/polyphony/backend_io_uring.c +81 -5
- data/ext/polyphony/backend_io_uring_context.c +1 -0
- data/ext/polyphony/backend_io_uring_context.h +1 -0
- data/ext/polyphony/backend_libev.c +67 -0
- data/ext/polyphony/fiber.c +10 -1
- data/ext/polyphony/polyphony.c +3 -0
- data/ext/polyphony/polyphony.h +3 -6
- data/ext/polyphony/queue.c +99 -34
- data/lib/polyphony/core/global_api.rb +40 -18
- data/lib/polyphony/extensions/fiber.rb +6 -2
- data/lib/polyphony/version.rb +1 -1
- data/test/test_backend.rb +48 -0
- data/test/test_fiber.rb +33 -4
- data/test/test_global_api.rb +61 -0
- data/test/test_queue.rb +117 -0
- metadata +7 -2
@@ -722,6 +722,72 @@ noreturn VALUE Backend_timer_loop(VALUE self, VALUE interval) {
|
|
722
722
|
}
|
723
723
|
}
|
724
724
|
|
725
|
+
VALUE Backend_timeout_safe(VALUE arg) {
|
726
|
+
return rb_yield(arg);
|
727
|
+
}
|
728
|
+
|
729
|
+
VALUE Backend_timeout_rescue(VALUE arg, VALUE exception) {
|
730
|
+
return exception;
|
731
|
+
}
|
732
|
+
|
733
|
+
VALUE Backend_timeout_ensure_safe(VALUE arg) {
|
734
|
+
return rb_rescue2(Backend_timeout_safe, Qnil, Backend_timeout_rescue, Qnil, rb_eException, (VALUE)0);
|
735
|
+
}
|
736
|
+
|
737
|
+
struct libev_timeout {
|
738
|
+
struct ev_timer timer;
|
739
|
+
VALUE fiber;
|
740
|
+
VALUE resume_value;
|
741
|
+
};
|
742
|
+
|
743
|
+
struct Backend_timeout_ctx {
|
744
|
+
Backend_t *backend;
|
745
|
+
struct libev_timeout *watcher;
|
746
|
+
};
|
747
|
+
|
748
|
+
VALUE Backend_timeout_ensure(VALUE arg) {
|
749
|
+
struct Backend_timeout_ctx *timeout_ctx = (struct Backend_timeout_ctx *)arg;
|
750
|
+
ev_timer_stop(timeout_ctx->backend->ev_loop, &(timeout_ctx->watcher->timer));
|
751
|
+
return Qnil;
|
752
|
+
}
|
753
|
+
|
754
|
+
void Backend_timeout_callback(EV_P_ ev_timer *w, int revents)
|
755
|
+
{
|
756
|
+
struct libev_timeout *watcher = (struct libev_timeout *)w;
|
757
|
+
Fiber_make_runnable(watcher->fiber, watcher->resume_value);
|
758
|
+
}
|
759
|
+
|
760
|
+
VALUE Backend_timeout(int argc,VALUE *argv, VALUE self) {
|
761
|
+
VALUE duration;
|
762
|
+
VALUE exception;
|
763
|
+
VALUE move_on_value = Qnil;
|
764
|
+
rb_scan_args(argc, argv, "21", &duration, &exception, &move_on_value);
|
765
|
+
|
766
|
+
Backend_t *backend;
|
767
|
+
struct libev_timeout watcher;
|
768
|
+
VALUE result = Qnil;
|
769
|
+
VALUE timeout = rb_funcall(cTimeoutException, ID_new, 0);
|
770
|
+
|
771
|
+
GetBackend(self, backend);
|
772
|
+
watcher.fiber = rb_fiber_current();
|
773
|
+
watcher.resume_value = timeout;
|
774
|
+
ev_timer_init(&watcher.timer, Backend_timeout_callback, NUM2DBL(duration), 0.);
|
775
|
+
ev_timer_start(backend->ev_loop, &watcher.timer);
|
776
|
+
|
777
|
+
struct Backend_timeout_ctx timeout_ctx = {backend, &watcher};
|
778
|
+
result = rb_ensure(Backend_timeout_ensure_safe, Qnil, Backend_timeout_ensure, (VALUE)&timeout_ctx);
|
779
|
+
|
780
|
+
if (result == timeout) {
|
781
|
+
if (exception == Qnil) return move_on_value;
|
782
|
+
RAISE_EXCEPTION(backend_timeout_exception(exception));
|
783
|
+
}
|
784
|
+
|
785
|
+
RAISE_IF_EXCEPTION(result);
|
786
|
+
RB_GC_GUARD(result);
|
787
|
+
RB_GC_GUARD(timeout);
|
788
|
+
return result;
|
789
|
+
}
|
790
|
+
|
725
791
|
struct libev_child {
|
726
792
|
struct ev_child child;
|
727
793
|
VALUE fiber;
|
@@ -812,6 +878,7 @@ void Init_Backend() {
|
|
812
878
|
rb_define_method(cBackend, "wait_io", Backend_wait_io, 2);
|
813
879
|
rb_define_method(cBackend, "sleep", Backend_sleep, 1);
|
814
880
|
rb_define_method(cBackend, "timer_loop", Backend_timer_loop, 1);
|
881
|
+
rb_define_method(cBackend, "timeout", Backend_timeout, -1);
|
815
882
|
rb_define_method(cBackend, "waitpid", Backend_waitpid, 1);
|
816
883
|
rb_define_method(cBackend, "wait_event", Backend_wait_event, 1);
|
817
884
|
|
data/ext/polyphony/fiber.c
CHANGED
@@ -128,6 +128,15 @@ VALUE Fiber_receive(VALUE self) {
|
|
128
128
|
return Queue_shift(mailbox);
|
129
129
|
}
|
130
130
|
|
131
|
+
VALUE Fiber_mailbox(VALUE self) {
|
132
|
+
VALUE mailbox = rb_ivar_get(self, ID_ivar_mailbox);
|
133
|
+
if (mailbox == Qnil) {
|
134
|
+
mailbox = rb_funcall(cQueue, ID_new, 0);
|
135
|
+
rb_ivar_set(self, ID_ivar_mailbox, mailbox);
|
136
|
+
}
|
137
|
+
return mailbox;
|
138
|
+
}
|
139
|
+
|
131
140
|
VALUE Fiber_receive_all_pending(VALUE self) {
|
132
141
|
VALUE mailbox = rb_ivar_get(self, ID_ivar_mailbox);
|
133
142
|
return (mailbox == Qnil) ? rb_ary_new() : Queue_shift_all(mailbox);
|
@@ -146,9 +155,9 @@ void Init_Fiber() {
|
|
146
155
|
|
147
156
|
rb_define_method(cFiber, "<<", Fiber_send, 1);
|
148
157
|
rb_define_method(cFiber, "send", Fiber_send, 1);
|
149
|
-
|
150
158
|
rb_define_method(cFiber, "receive", Fiber_receive, 0);
|
151
159
|
rb_define_method(cFiber, "receive_all_pending", Fiber_receive_all_pending, 0);
|
160
|
+
rb_define_method(cFiber, "mailbox", Fiber_mailbox, 0);
|
152
161
|
|
153
162
|
SYM_dead = ID2SYM(rb_intern("dead"));
|
154
163
|
SYM_running = ID2SYM(rb_intern("running"));
|
data/ext/polyphony/polyphony.c
CHANGED
@@ -1,6 +1,7 @@
|
|
1
1
|
#include "polyphony.h"
|
2
2
|
|
3
3
|
VALUE mPolyphony;
|
4
|
+
VALUE cTimeoutException;
|
4
5
|
|
5
6
|
ID ID_call;
|
6
7
|
ID ID_caller;
|
@@ -55,6 +56,8 @@ void Init_Polyphony() {
|
|
55
56
|
rb_define_global_function("snooze", Polyphony_snooze, 0);
|
56
57
|
rb_define_global_function("suspend", Polyphony_suspend, 0);
|
57
58
|
|
59
|
+
cTimeoutException = rb_define_class_under(mPolyphony, "TimeoutException", rb_eException);
|
60
|
+
|
58
61
|
ID_call = rb_intern("call");
|
59
62
|
ID_caller = rb_intern("caller");
|
60
63
|
ID_clear = rb_intern("clear");
|
data/ext/polyphony/polyphony.h
CHANGED
@@ -39,6 +39,7 @@ extern VALUE mPolyphony;
|
|
39
39
|
extern VALUE cQueue;
|
40
40
|
extern VALUE cEvent;
|
41
41
|
extern VALUE cRunqueue;
|
42
|
+
extern VALUE cTimeoutException;
|
42
43
|
|
43
44
|
extern ID ID_call;
|
44
45
|
extern ID ID_caller;
|
@@ -82,12 +83,6 @@ VALUE Queue_push(VALUE self, VALUE value);
|
|
82
83
|
VALUE Queue_unshift(VALUE self, VALUE value);
|
83
84
|
VALUE Queue_shift(VALUE self);
|
84
85
|
VALUE Queue_shift_all(VALUE self);
|
85
|
-
VALUE Queue_shift_no_wait(VALUE self);
|
86
|
-
VALUE Queue_clear(VALUE self);
|
87
|
-
VALUE Queue_delete(VALUE self, VALUE value);
|
88
|
-
long Queue_len(VALUE self);
|
89
|
-
void Queue_trace(VALUE self);
|
90
|
-
|
91
86
|
|
92
87
|
void Runqueue_push(VALUE self, VALUE fiber, VALUE value, int reschedule);
|
93
88
|
void Runqueue_unshift(VALUE self, VALUE fiber, VALUE value, int reschedule);
|
@@ -101,4 +96,6 @@ VALUE Thread_schedule_fiber(VALUE thread, VALUE fiber, VALUE value);
|
|
101
96
|
VALUE Thread_schedule_fiber_with_priority(VALUE thread, VALUE fiber, VALUE value);
|
102
97
|
VALUE Thread_switch_fiber(VALUE thread);
|
103
98
|
|
99
|
+
VALUE Polyphony_snooze(VALUE self);
|
100
|
+
|
104
101
|
#endif /* POLYPHONY_H */
|
data/ext/polyphony/queue.c
CHANGED
@@ -4,6 +4,8 @@
|
|
4
4
|
typedef struct queue {
|
5
5
|
ring_buffer values;
|
6
6
|
ring_buffer shift_queue;
|
7
|
+
ring_buffer push_queue;
|
8
|
+
unsigned int capacity;
|
7
9
|
} Queue_t;
|
8
10
|
|
9
11
|
VALUE cQueue = Qnil;
|
@@ -12,12 +14,14 @@ static void Queue_mark(void *ptr) {
|
|
12
14
|
Queue_t *queue = ptr;
|
13
15
|
ring_buffer_mark(&queue->values);
|
14
16
|
ring_buffer_mark(&queue->shift_queue);
|
17
|
+
ring_buffer_mark(&queue->push_queue);
|
15
18
|
}
|
16
19
|
|
17
20
|
static void Queue_free(void *ptr) {
|
18
21
|
Queue_t *queue = ptr;
|
19
22
|
ring_buffer_free(&queue->values);
|
20
23
|
ring_buffer_free(&queue->shift_queue);
|
24
|
+
ring_buffer_free(&queue->push_queue);
|
21
25
|
xfree(ptr);
|
22
26
|
}
|
23
27
|
|
@@ -41,36 +45,77 @@ static VALUE Queue_allocate(VALUE klass) {
|
|
41
45
|
#define GetQueue(obj, queue) \
|
42
46
|
TypedData_Get_Struct((obj), Queue_t, &Queue_type, (queue))
|
43
47
|
|
44
|
-
static VALUE Queue_initialize(VALUE self) {
|
48
|
+
static VALUE Queue_initialize(int argc, VALUE *argv, VALUE self) {
|
45
49
|
Queue_t *queue;
|
46
50
|
GetQueue(self, queue);
|
47
51
|
|
48
52
|
ring_buffer_init(&queue->values);
|
49
53
|
ring_buffer_init(&queue->shift_queue);
|
54
|
+
ring_buffer_init(&queue->push_queue);
|
55
|
+
queue->capacity = (argc == 1) ? NUM2UINT(argv[0]) : 0;
|
50
56
|
|
51
57
|
return self;
|
52
58
|
}
|
53
59
|
|
60
|
+
inline void queue_resume_first_blocked_fiber(ring_buffer *queue) {
|
61
|
+
if (queue->count) {
|
62
|
+
VALUE fiber = ring_buffer_shift(queue);
|
63
|
+
if (fiber != Qnil) Fiber_make_runnable(fiber, Qnil);
|
64
|
+
}
|
65
|
+
}
|
66
|
+
|
67
|
+
inline void queue_resume_all_blocked_fibers(ring_buffer *queue) {
|
68
|
+
while (queue->count) {
|
69
|
+
VALUE fiber = ring_buffer_shift(queue);
|
70
|
+
if (fiber != Qnil) Fiber_make_runnable(fiber, Qnil);
|
71
|
+
}
|
72
|
+
}
|
73
|
+
|
74
|
+
inline void queue_resume_blocked_fibers_to_capacity(Queue_t *queue) {
|
75
|
+
for (unsigned int i = queue->values.count; (i < queue->capacity) && queue->push_queue.count; i++) {
|
76
|
+
VALUE fiber = ring_buffer_shift(&queue->push_queue);
|
77
|
+
if (fiber != Qnil) Fiber_make_runnable(fiber, Qnil);
|
78
|
+
}
|
79
|
+
}
|
80
|
+
|
81
|
+
inline void capped_queue_block_push(Queue_t *queue) {
|
82
|
+
VALUE fiber = rb_fiber_current();
|
83
|
+
VALUE backend = rb_ivar_get(rb_thread_current(), ID_ivar_backend);
|
84
|
+
VALUE switchpoint_result;
|
85
|
+
while (1) {
|
86
|
+
if (queue->capacity > queue->values.count) Fiber_make_runnable(fiber, Qnil);
|
87
|
+
|
88
|
+
ring_buffer_push(&queue->push_queue, fiber);
|
89
|
+
switchpoint_result = __BACKEND__.wait_event(backend, Qnil);
|
90
|
+
ring_buffer_delete(&queue->push_queue, fiber);
|
91
|
+
|
92
|
+
RAISE_IF_EXCEPTION(switchpoint_result);
|
93
|
+
RB_GC_GUARD(switchpoint_result);
|
94
|
+
if (queue->capacity > queue->values.count) break;
|
95
|
+
}
|
96
|
+
}
|
97
|
+
|
54
98
|
VALUE Queue_push(VALUE self, VALUE value) {
|
55
99
|
Queue_t *queue;
|
56
100
|
GetQueue(self, queue);
|
57
101
|
|
58
|
-
if (queue->
|
59
|
-
|
60
|
-
|
61
|
-
}
|
102
|
+
if (queue->capacity) capped_queue_block_push(queue);
|
103
|
+
|
104
|
+
queue_resume_first_blocked_fiber(&queue->shift_queue);
|
62
105
|
ring_buffer_push(&queue->values, value);
|
106
|
+
|
63
107
|
return self;
|
64
108
|
}
|
65
109
|
|
66
110
|
VALUE Queue_unshift(VALUE self, VALUE value) {
|
67
111
|
Queue_t *queue;
|
68
112
|
GetQueue(self, queue);
|
69
|
-
|
70
|
-
|
71
|
-
|
72
|
-
|
113
|
+
|
114
|
+
if (queue->capacity) capped_queue_block_push(queue);
|
115
|
+
|
116
|
+
queue_resume_first_blocked_fiber(&queue->shift_queue);
|
73
117
|
ring_buffer_unshift(&queue->values, value);
|
118
|
+
|
74
119
|
return self;
|
75
120
|
}
|
76
121
|
|
@@ -83,42 +128,63 @@ VALUE Queue_shift(VALUE self) {
|
|
83
128
|
VALUE backend = rb_ivar_get(thread, ID_ivar_backend);
|
84
129
|
|
85
130
|
while (1) {
|
86
|
-
|
87
|
-
if (queue->values.count > 0) Fiber_make_runnable(fiber, Qnil);
|
131
|
+
if (queue->values.count) Fiber_make_runnable(fiber, Qnil);
|
88
132
|
|
133
|
+
ring_buffer_push(&queue->shift_queue, fiber);
|
89
134
|
VALUE switchpoint_result = __BACKEND__.wait_event(backend, Qnil);
|
90
135
|
ring_buffer_delete(&queue->shift_queue, fiber);
|
91
136
|
|
92
137
|
RAISE_IF_EXCEPTION(switchpoint_result);
|
93
138
|
RB_GC_GUARD(switchpoint_result);
|
94
|
-
|
95
|
-
if (queue->values.count > 0)
|
96
|
-
return ring_buffer_shift(&queue->values);
|
139
|
+
if (queue->values.count) break;
|
97
140
|
}
|
98
|
-
|
99
|
-
|
141
|
+
VALUE value = ring_buffer_shift(&queue->values);
|
142
|
+
if ((queue->capacity) && (queue->capacity > queue->values.count))
|
143
|
+
queue_resume_first_blocked_fiber(&queue->push_queue);
|
144
|
+
RB_GC_GUARD(value);
|
145
|
+
return value;
|
100
146
|
}
|
101
147
|
|
102
|
-
VALUE
|
103
|
-
|
148
|
+
VALUE Queue_delete(VALUE self, VALUE value) {
|
149
|
+
Queue_t *queue;
|
104
150
|
GetQueue(self, queue);
|
105
151
|
|
106
|
-
|
152
|
+
ring_buffer_delete(&queue->values, value);
|
153
|
+
|
154
|
+
if (queue->capacity && (queue->capacity > queue->values.count))
|
155
|
+
queue_resume_first_blocked_fiber(&queue->push_queue);
|
156
|
+
|
157
|
+
return self;
|
107
158
|
}
|
108
159
|
|
109
|
-
VALUE
|
160
|
+
VALUE Queue_cap(VALUE self, VALUE cap) {
|
161
|
+
unsigned int new_capacity = NUM2UINT(cap);
|
110
162
|
Queue_t *queue;
|
111
163
|
GetQueue(self, queue);
|
112
|
-
|
113
|
-
|
164
|
+
queue->capacity = new_capacity;
|
165
|
+
|
166
|
+
if (queue->capacity)
|
167
|
+
queue_resume_blocked_fibers_to_capacity(queue);
|
168
|
+
else
|
169
|
+
queue_resume_all_blocked_fibers(&queue->push_queue);
|
170
|
+
|
114
171
|
return self;
|
115
172
|
}
|
116
173
|
|
174
|
+
VALUE Queue_capped_p(VALUE self) {
|
175
|
+
Queue_t *queue;
|
176
|
+
GetQueue(self, queue);
|
177
|
+
|
178
|
+
return queue->capacity ? UINT2NUM(queue->capacity) : Qnil;
|
179
|
+
}
|
180
|
+
|
117
181
|
VALUE Queue_clear(VALUE self) {
|
118
182
|
Queue_t *queue;
|
119
183
|
GetQueue(self, queue);
|
120
184
|
|
121
185
|
ring_buffer_clear(&queue->values);
|
186
|
+
if (queue->capacity) queue_resume_blocked_fibers_to_capacity(queue);
|
187
|
+
|
122
188
|
return self;
|
123
189
|
}
|
124
190
|
|
@@ -134,6 +200,7 @@ VALUE Queue_shift_each(VALUE self) {
|
|
134
200
|
GetQueue(self, queue);
|
135
201
|
|
136
202
|
ring_buffer_shift_each(&queue->values);
|
203
|
+
if (queue->capacity) queue_resume_blocked_fibers_to_capacity(queue);
|
137
204
|
return self;
|
138
205
|
}
|
139
206
|
|
@@ -141,7 +208,9 @@ VALUE Queue_shift_all(VALUE self) {
|
|
141
208
|
Queue_t *queue;
|
142
209
|
GetQueue(self, queue);
|
143
210
|
|
144
|
-
|
211
|
+
VALUE result = ring_buffer_shift_all(&queue->values);
|
212
|
+
if (queue->capacity) queue_resume_blocked_fibers_to_capacity(queue);
|
213
|
+
return result;
|
145
214
|
}
|
146
215
|
|
147
216
|
VALUE Queue_flush_waiters(VALUE self, VALUE value) {
|
@@ -160,14 +229,14 @@ VALUE Queue_empty_p(VALUE self) {
|
|
160
229
|
Queue_t *queue;
|
161
230
|
GetQueue(self, queue);
|
162
231
|
|
163
|
-
return (queue->values.count
|
232
|
+
return (!queue->values.count) ? Qtrue : Qfalse;
|
164
233
|
}
|
165
234
|
|
166
235
|
VALUE Queue_pending_p(VALUE self) {
|
167
236
|
Queue_t *queue;
|
168
237
|
GetQueue(self, queue);
|
169
238
|
|
170
|
-
return (queue->shift_queue.count
|
239
|
+
return (queue->shift_queue.count) ? Qtrue : Qfalse;
|
171
240
|
}
|
172
241
|
|
173
242
|
VALUE Queue_size_m(VALUE self) {
|
@@ -177,26 +246,22 @@ VALUE Queue_size_m(VALUE self) {
|
|
177
246
|
return INT2NUM(queue->values.count);
|
178
247
|
}
|
179
248
|
|
180
|
-
void Queue_trace(VALUE self) {
|
181
|
-
Queue_t *queue;
|
182
|
-
GetQueue(self, queue);
|
183
|
-
|
184
|
-
printf("run queue size: %d count: %d\n", queue->values.size, queue->values.count);
|
185
|
-
}
|
186
|
-
|
187
249
|
void Init_Queue() {
|
188
250
|
cQueue = rb_define_class_under(mPolyphony, "Queue", rb_cData);
|
189
251
|
rb_define_alloc_func(cQueue, Queue_allocate);
|
190
252
|
|
191
|
-
rb_define_method(cQueue, "initialize", Queue_initialize,
|
253
|
+
rb_define_method(cQueue, "initialize", Queue_initialize, -1);
|
192
254
|
rb_define_method(cQueue, "push", Queue_push, 1);
|
193
255
|
rb_define_method(cQueue, "<<", Queue_push, 1);
|
194
256
|
rb_define_method(cQueue, "unshift", Queue_unshift, 1);
|
195
257
|
|
196
258
|
rb_define_method(cQueue, "shift", Queue_shift, 0);
|
197
259
|
rb_define_method(cQueue, "pop", Queue_shift, 0);
|
198
|
-
rb_define_method(cQueue, "shift_no_wait", Queue_shift_no_wait, 0);
|
199
260
|
rb_define_method(cQueue, "delete", Queue_delete, 1);
|
261
|
+
rb_define_method(cQueue, "clear", Queue_clear, 0);
|
262
|
+
|
263
|
+
rb_define_method(cQueue, "cap", Queue_cap, 1);
|
264
|
+
rb_define_method(cQueue, "capped?", Queue_capped_p, 0);
|
200
265
|
|
201
266
|
rb_define_method(cQueue, "shift_each", Queue_shift_each, 0);
|
202
267
|
rb_define_method(cQueue, "shift_all", Queue_shift_all, 0);
|
@@ -16,16 +16,29 @@ module Polyphony
|
|
16
16
|
end
|
17
17
|
|
18
18
|
def cancel_after(interval, with_exception: Polyphony::Cancel, &block)
|
19
|
-
|
20
|
-
|
19
|
+
if !block
|
20
|
+
cancel_after_blockless_canceller(Fiber.current, interval, with_exception)
|
21
|
+
elsif block.arity > 0
|
22
|
+
cancel_after_with_block(Fiber.current, interval, with_exception, &block)
|
23
|
+
else
|
24
|
+
Thread.current.backend.timeout(interval, with_exception, &block)
|
25
|
+
end
|
26
|
+
end
|
27
|
+
|
28
|
+
def cancel_after_blockless_canceller(fiber, interval, with_exception)
|
29
|
+
spin do
|
21
30
|
sleep interval
|
22
31
|
exception = cancel_exception(with_exception)
|
23
|
-
# we don't want the cancelling fiber caller location as part of the
|
24
|
-
# exception backtrace
|
25
32
|
exception.__raising_fiber__ = nil
|
26
33
|
fiber.schedule exception
|
27
34
|
end
|
28
|
-
|
35
|
+
end
|
36
|
+
|
37
|
+
def cancel_after_with_block(fiber, interval, with_exception, &block)
|
38
|
+
canceller = cancel_after_blockless_canceller(fiber, interval, with_exception)
|
39
|
+
block.call(canceller)
|
40
|
+
ensure
|
41
|
+
canceller.stop
|
29
42
|
end
|
30
43
|
|
31
44
|
def cancel_exception(exception)
|
@@ -36,12 +49,6 @@ module Polyphony
|
|
36
49
|
end
|
37
50
|
end
|
38
51
|
|
39
|
-
def cancel_after_wrap_block(canceller, &block)
|
40
|
-
block.call(canceller)
|
41
|
-
ensure
|
42
|
-
canceller.stop
|
43
|
-
end
|
44
|
-
|
45
52
|
def spin(tag = nil, &block)
|
46
53
|
Fiber.current.spin(tag, caller, &block)
|
47
54
|
end
|
@@ -56,6 +63,16 @@ module Polyphony
|
|
56
63
|
end
|
57
64
|
end
|
58
65
|
|
66
|
+
def spin_scope
|
67
|
+
raise unless block_given?
|
68
|
+
|
69
|
+
spin do
|
70
|
+
result = yield
|
71
|
+
Fiber.current.await_all_children
|
72
|
+
result
|
73
|
+
end.await
|
74
|
+
end
|
75
|
+
|
59
76
|
def every(interval)
|
60
77
|
next_time = ::Process.clock_gettime(::Process::CLOCK_MONOTONIC) + interval
|
61
78
|
loop do
|
@@ -70,15 +87,20 @@ module Polyphony
|
|
70
87
|
end
|
71
88
|
|
72
89
|
def move_on_after(interval, with_value: nil, &block)
|
73
|
-
|
74
|
-
|
75
|
-
|
76
|
-
|
77
|
-
|
78
|
-
|
90
|
+
if !block
|
91
|
+
move_on_blockless_canceller(Fiber.current, interval, with_value)
|
92
|
+
elsif block.arity > 0
|
93
|
+
move_on_after_with_block(Fiber.current, interval, with_value, &block)
|
94
|
+
else
|
95
|
+
Thread.current.backend.timeout(interval, nil, with_value, &block)
|
79
96
|
end
|
97
|
+
end
|
80
98
|
|
81
|
-
|
99
|
+
def move_on_blockless_canceller(fiber, interval, with_value)
|
100
|
+
spin do
|
101
|
+
sleep interval
|
102
|
+
fiber.schedule with_value
|
103
|
+
end
|
82
104
|
end
|
83
105
|
|
84
106
|
def move_on_after_with_block(fiber, interval, with_value, &block)
|