Removed event overflow handling
[akaros.git] / tests / mhello.c
1 #include <parlib.h>
2 #include <ros/mman.h>
3 #include <ros/resource.h>
4 #include <ros/procdata.h>
5 #include <ros/event.h>
6 #include <ros/bcq.h>
7 #include <arch/arch.h>
8 #include <stdio.h>
9 #include <vcore.h>
10 #include <mcs.h>
11 #include <timing.h>
12 #include <rassert.h>
13 #include <event.h>
14 #include <uthread.h>
15
16 #ifdef __sparc_v8__
17 # define udelay(x) udelay((x)/2000)
18 #endif
19
20 mcs_barrier_t b;
21
22 __thread int temp;
23 void *core0_tls = 0;
24
25 struct event_queue *indirect_q;
26 static void handle_generic(struct event_msg *ev_msg, unsigned int ev_type);
27
28 void ghetto_vcore_entry(void);
29 struct uthread *ghetto_init(void)
30 {
31         struct uthread *uthread = malloc(sizeof(struct uthread));
32         memset(uthread, 0, sizeof(struct uthread));
33         return uthread;
34 }
35
36 struct uthread *ghetto_create(void (*func)(void), void *data)
37 {
38         return ghetto_init();
39 }
40
41 struct schedule_ops ghetto_sched_ops = {
42         .sched_init = ghetto_init,
43         .sched_entry = ghetto_vcore_entry,
44         .thread_create = ghetto_create,
45 };
46 struct schedule_ops *sched_ops = &ghetto_sched_ops;
47
48 /* to trick uthread_create() */
49 void dummy(void)
50 {
51 }
52
53 int main(int argc, char** argv)
54 {
55         uint32_t vcoreid;
56         int retval;
57
58         mcs_barrier_init(&b, max_vcores());
59
60         /* vcore_context test */
61         assert(!in_vcore_context());
62         
63         /* prep indirect ev_q.  Note we grab a big one */
64         indirect_q = get_big_event_q();
65         indirect_q->ev_flags = EVENT_IPI;
66         indirect_q->ev_vcore = 1;                       /* IPI core 1 */
67         indirect_q->ev_handler = 0;
68         printf("Registering %08p for event type %d\n", indirect_q,
69                EV_FREE_APPLE_PIE);
70         register_kevent_q(indirect_q, EV_FREE_APPLE_PIE);
71
72         /* handle events: just want to print out what we get.  This is just a
73          * quick set of handlers, not a registration for a kevent. */
74         for (int i = 0; i < MAX_NR_EVENT; i++)
75                 ev_handlers[i] = handle_generic;
76         /* Want to use the default ev_ev (which we just overwrote) */
77         ev_handlers[EV_EVENT] = handle_ev_ev;
78         /* vcore_init() done in vcore_request() now. */
79         /* Set up event reception.  For example, this will allow us to receive an
80          * event and IPI for USER_IPIs on vcore 0.  Check event.c for more stuff.
81          * Note you don't have to register for USER_IPIs to receive ones you send
82          * yourself with sys_self_notify(). */
83         enable_kevent(EV_USER_IPI, 0, EVENT_IPI);
84         /* Receive pending preemption events.  Can also get a MSG if you want. */
85         struct event_queue *ev_q = get_event_q();
86         ev_q->ev_flags = EVENT_IPI | EVENT_NOMSG | EVENT_VCORE_APPRO;
87         register_kevent_q(ev_q, EV_PREEMPT_PENDING);
88
89         /* Makes a thread for us, though we won't use it.  Just a hack to get into
90          * _M mode.  Note this requests one vcore for us */
91         uthread_create(dummy, 0);
92
93         if ((vcoreid = vcore_id())) {
94                 printf("Should never see me! (from vcore %d)\n", vcoreid);
95         } else { // core 0
96                 temp = 0xdeadbeef;
97                 printf("Hello from vcore %d with temp addr = %p and temp = %p\n",
98                        vcoreid, &temp, temp);
99                 printf("Multi-Goodbye, world, from PID: %d!\n", sys_getpid());
100                 //retval = sys_resource_req(RES_CORES, 2, 0);
101                 printf("Requesting %d vcores\n", max_vcores() - 1);
102                 retval = vcore_request(max_vcores() - 1); /* since we already have 1 */
103                 //retval = vcore_request(5);
104                 printf("This is vcore0, right after vcore_request, retval=%d\n", retval);
105                 /* vcore_context test */
106                 assert(!in_vcore_context());
107         }
108
109         /* test notifying my vcore2 */
110         udelay(5000000);
111         printf("Vcore 0 self-notifying vcore 2 with notif 4!\n");
112         struct event_msg msg;
113         msg.ev_type = 4;
114         sys_self_notify(2, 4, &msg);
115         udelay(5000000);
116         printf("Vcore 0 notifying itself with notif 3!\n");
117         msg.ev_type = 3;
118         sys_notify(sys_getpid(), 3, &msg);
119         udelay(1000000);
120
121         /* test loop for restarting a notif_tf */
122         if (vcoreid == 0) {
123                 int ctr = 0;
124                 while(1) {
125                         printf("Vcore %d Spinning (%d), temp = %08x!\n", vcoreid, ctr++, temp);
126                         udelay(5000000);
127                         //exit(0);
128                 }
129         }
130
131         printf("Vcore %d Done!\n", vcoreid);
132         //mcs_barrier_wait(&b,vcore_id());
133
134         printf("All Cores Done!\n", vcoreid);
135         while(1); // manually kill from the monitor
136         return 0;
137 }
138
139 static void handle_generic(struct event_msg *ev_msg, unsigned int ev_type)
140 {
141         printf("Got event type %d on vcore %d\n", ev_type, vcore_id());
142 }
143
144 void ghetto_vcore_entry(void)
145 {
146         uint32_t vcoreid = vcore_id();
147         static bool first_time = TRUE;
148
149         temp = 0xcafebabe;
150         /* vcore_context test (don't need to do this anywhere) */
151         assert(in_vcore_context());
152
153         /* old logic was moved to parlib code */
154         if (current_uthread) {
155                 assert(vcoreid == 0);
156                 run_current_uthread();
157         }
158         /* unmask notifications once you can let go of the notif_tf and it is okay
159          * to clobber the transition stack.
160          * Check Documentation/processes.txt: 4.2.4.  In real code, you should be
161          * popping the tf of whatever user process you want (get off the x-stack) */
162         enable_notifs(vcoreid);
163
164 /* end: stuff userspace needs to do to handle notifications */
165
166         printf("Hello from vcore_entry in vcore %d with temp addr %p and temp %p\n",
167                vcoreid, &temp, temp);
168         vcore_request(1);
169         //mcs_barrier_wait(&b,vcore_id());
170         udelay(vcoreid * 10000000);
171         //exit(0);
172         while(1);
173 }