summaryrefslogtreecommitdiff
path: root/code/fe310/eos/event.c
blob: 6953dcac9437ca2222cdb1a7302bf0eaccec6a05 (plain)
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
129
130
131
132
133
134
135
136
137
138
#include <stdlib.h>
#include <stdint.h>
#include <unistd.h>
#include <stdio.h>

#include "encoding.h"
#include "platform.h"

#include "msgq.h"
#include "event.h"

EOSMsgQ _eos_event_q;
static EOSMsgItem event_q_array[EOS_EVT_SIZE_Q];

static eos_evt_handler_t evt_handler[EOS_EVT_MAX_EVT + 1];

static void evtq_handler(unsigned char type, unsigned char *buffer, uint16_t len) {
    unsigned char idx = (type & EOS_EVT_MASK) >> 4;

    if (idx && (idx <= EOS_EVT_MAX_EVT)) {
        evt_handler[idx](type, buffer, len);
    } else {
        eos_evtq_bad_handler(type, buffer, len);
    }
}

void eos_evtq_init(void) {
    int i;

    evt_handler[0] = evtq_handler;
    for (i=0; i<EOS_EVT_MAX_EVT; i++) {
        evt_handler[i + 1] = 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;
}

int eos_evtq_push_isr(unsigned char type, unsigned char *buffer, uint16_t len) {
    return eos_msgq_push(&_eos_event_q, type, buffer, len);
}

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_pop_isr(unsigned char *type, unsigned char **buffer, uint16_t *len) {
    eos_msgq_pop(&_eos_event_q, type, buffer, len);
}

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) {
            unsigned char _type;
            unsigned char *_buffer;
            uint16_t _len;

            eos_msgq_pop(&_eos_event_q, &_type, &_buffer, &_len);
            if (_type) {
                set_csr(mstatus, MSTATUS_MIE);
                evt_handler[0](_type, _buffer, _len);
            } else {
                asm volatile ("wfi");
                set_csr(mstatus, MSTATUS_MIE);
            }
        } else {
            set_csr(mstatus, MSTATUS_MIE);
        }
    }
}

void eos_evtq_flush(void) {
    clear_csr(mstatus, MSTATUS_MIE);
    eos_evtq_flush_isr();
    set_csr(mstatus, MSTATUS_MIE);
}

void eos_evtq_flush_isr(void) {
    unsigned char type;
    unsigned char *buffer;
    uint16_t len;

    do {
        eos_msgq_pop(&_eos_event_q, &type, &buffer, &len);
        if (type) {
            set_csr(mstatus, MSTATUS_MIE);
            evt_handler[0](type, buffer, len);
            clear_csr(mstatus, MSTATUS_MIE);
        }
    } while (type);
}

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);
            evt_handler[0](type, buffer, len);
        } else {
            asm volatile ("wfi");
            set_csr(mstatus, MSTATUS_MIE);
        }
    }
}

void eos_evtq_bad_handler(unsigned char type, unsigned char *buffer, uint16_t len) {
    printf("evt bad handler:0x%x\n", type);
}

void eos_evtq_set_handler(unsigned char type, eos_evt_handler_t handler) {
    unsigned char idx = (type & EOS_EVT_MASK) >> 4;

    if (idx <= EOS_EVT_MAX_EVT) evt_handler[idx] = handler;
}

eos_evt_handler_t eos_evtq_get_handler(unsigned char type) {
    unsigned char idx = (type & EOS_EVT_MASK) >> 4;

    if (idx <= EOS_EVT_MAX_EVT) return evt_handler[idx];
    return NULL;
}