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