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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
#include <stdlib.h>
#include <stdint.h>
#include <unistd.h>
#include "encoding.h"
#include "platform.h"
#include "net.h"
#include "msgq.h"
#include "event.h"
EOSMsgQ _eos_event_q;
static EOSMsgItem event_q_array[EOS_EVT_SIZE_Q];
static eos_evt_fptr_t evt_handler[EOS_EVT_MAX_EVT];
static uint16_t evt_handler_wrapper_acq[EOS_EVT_MAX_EVT];
static uint16_t evt_handler_flags_buf_acq[EOS_EVT_MAX_EVT];
static volatile char evt_busy = 0;
void eos_evtq_init(void) {
int i;
for (i=0; i<EOS_EVT_MAX_EVT; i++) {
evt_handler[i] = eos_evtq_bad_handler;
}
eos_msgq_init(&_eos_event_q, event_q_array, EOS_EVT_SIZE_Q);
}
int eos_evtq_push(unsigned char type, unsigned char *buffer, uint16_t len) {
clear_csr(mstatus, MSTATUS_MIE);
int ret = eos_msgq_push(&_eos_event_q, type, buffer, len);
set_csr(mstatus, MSTATUS_MIE);
return ret;
}
void eos_evtq_pop(unsigned char *type, unsigned char **buffer, uint16_t *len) {
clear_csr(mstatus, MSTATUS_MIE);
eos_msgq_pop(&_eos_event_q, type, buffer, len);
set_csr(mstatus, MSTATUS_MIE);
}
void eos_evtq_bad_handler(unsigned char type, unsigned char *buffer, uint16_t len) {
write(1, "error\n", 6);
}
static void evtq_handler_wrapper(unsigned char type, unsigned char *buffer, uint16_t len) {
unsigned char idx = ((type & EOS_EVT_MASK) >> 4) - 1;
uint16_t flag = (uint16_t)1 << ((type & ~EOS_EVT_MASK) - 1);
int ok;
ok = eos_net_acquire(evt_handler_wrapper_acq[idx] & flag);
if (ok) {
evt_handler[idx](type, buffer, len);
eos_net_release();
evt_handler_wrapper_acq[idx] &= ~flag;
} else {
evt_handler_wrapper_acq[idx] |= flag;
eos_evtq_push(type, buffer, len);
}
}
static void evtq_handler(unsigned char type, unsigned char *buffer, uint16_t len) {
unsigned char idx = ((type & EOS_EVT_MASK) >> 4) - 1;
uint16_t flag = (uint16_t)1 << ((type & ~EOS_EVT_MASK) - 1);
if (idx >= EOS_EVT_MAX_EVT) {
eos_evtq_bad_handler(type, buffer, len);
return;
}
if (flag & evt_handler_flags_buf_acq[idx]) {
evtq_handler_wrapper(type, buffer, len);
} else {
evt_handler[idx](type, buffer, len);
}
}
void eos_evtq_set_handler(unsigned char type, eos_evt_fptr_t handler) {
unsigned char idx = ((type & EOS_EVT_MASK) >> 4) - 1;
if (idx < EOS_EVT_MAX_EVT) evt_handler[idx] = handler;
}
void eos_evtq_set_flags(unsigned char type, uint8_t flags) {
unsigned char idx = ((type & EOS_EVT_MASK) >> 4) - 1;
uint16_t flag = type & ~EOS_EVT_MASK ? (uint16_t)1 << ((type & ~EOS_EVT_MASK) - 1) : 0xFFFF;
if ((idx < EOS_EVT_MAX_EVT) && (flags & EOS_EVT_FLAG_NET_BUF_ACQ)) evt_handler_flags_buf_acq[idx] |= flag;
}
void eos_evtq_set_busy(char busy) {
evt_busy = busy;
}
void eos_evtq_wait(unsigned char type, unsigned char *selector, uint16_t sel_len, unsigned char **buffer, uint16_t *len) {
int rv = 0;
while(!rv) {
clear_csr(mstatus, MSTATUS_MIE);
rv = eos_msgq_get(&_eos_event_q, type, selector, sel_len, buffer, len);
if (!rv) {
asm volatile ("wfi");
}
set_csr(mstatus, MSTATUS_MIE);
}
}
void eos_evtq_loop(void) {
unsigned char type;
unsigned char *buffer;
uint16_t len;
int foo = 1;
while(foo) {
clear_csr(mstatus, MSTATUS_MIE);
eos_msgq_pop(&_eos_event_q, &type, &buffer, &len);
if (type) {
set_csr(mstatus, MSTATUS_MIE);
evtq_handler(type, buffer, len);
clear_csr(mstatus, MSTATUS_MIE);
} else {
if (!evt_busy) asm volatile ("wfi");
}
set_csr(mstatus, MSTATUS_MIE);
}
}
|
