1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
#include <stdlib.h>
#include "runes.h"
struct runes_loop_data {
uv_work_t req;
RunesLoop *loop;
RunesTerm *t;
void (*work_cb)(RunesTerm*);
int (*after_work_cb)(RunesTerm*);
};
struct runes_loop_timer_data {
RunesTerm *t;
void (*cb)(RunesTerm*);
};
static void runes_loop_do_work(uv_work_t *req);
static void runes_loop_do_after_work(uv_work_t *req, int status);
static void runes_loop_timer_cb(uv_timer_t *handle);
static void runes_loop_free_handle(uv_handle_t *handle);
void runes_loop_init(RunesLoop *loop)
{
loop->loop = uv_default_loop();
}
void runes_loop_run(RunesLoop *loop)
{
uv_run(loop->loop, UV_RUN_DEFAULT);
}
void runes_loop_start_work(RunesLoop *loop, RunesTerm *t,
void (*work_cb)(RunesTerm*),
int (*after_work_cb)(RunesTerm*))
{
struct runes_loop_data *data;
data = malloc(sizeof(struct runes_loop_data));
data->req.data = data;
data->loop = loop;
data->t = t;
data->work_cb = work_cb;
data->after_work_cb = after_work_cb;
uv_queue_work(loop->loop, (void*)data, runes_loop_do_work,
runes_loop_do_after_work);
}
void runes_loop_timer_set(RunesLoop *loop, int timeout, int repeat,
RunesTerm *t, void (*cb)(RunesTerm*))
{
uv_timer_t *timer_req;
struct runes_loop_timer_data *timer_data;
timer_req = malloc(sizeof(uv_timer_t));
uv_timer_init(loop->loop, timer_req);
timer_data = malloc(sizeof(struct runes_loop_timer_data));
timer_data->t = t;
timer_data->cb = cb;
timer_req->data = (void *)timer_data;
uv_timer_start(timer_req, runes_loop_timer_cb, timeout, repeat);
}
void runes_loop_cleanup(RunesLoop *loop)
{
uv_loop_close(loop->loop);
}
static void runes_loop_do_work(uv_work_t *req)
{
struct runes_loop_data *data = req->data;
RunesTerm *t = data->t;
data->work_cb(t);
}
static void runes_loop_do_after_work(uv_work_t *req, int status)
{
struct runes_loop_data *data = req->data;
RunesLoop *loop = data->loop;
RunesTerm *t = data->t;
int should_loop = 0;
UNUSED(status);
should_loop = data->after_work_cb(t);
if (should_loop) {
uv_queue_work(loop->loop, req, runes_loop_do_work,
runes_loop_do_after_work);
}
else {
free(req);
}
}
static void runes_loop_timer_cb(uv_timer_t *handle)
{
struct runes_loop_timer_data *data = handle->data;
data->cb(data->t);
uv_close(
(uv_handle_t *)handle, runes_loop_free_handle);
}
static void runes_loop_free_handle(uv_handle_t *handle)
{
free(handle->data);
free(handle);
}
|