Simple mount command
[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 mcs_barrier_t b;
17
18 __thread int temp;
19 void *core0_tls = 0;
20
21 struct event_queue *indirect_q;
22 static void handle_generic(struct event_msg *ev_msg, unsigned int ev_type);
23
24 void ghetto_vcore_entry(void);
25
26 struct schedule_ops ghetto_sched_ops = {
27         .sched_entry = ghetto_vcore_entry,
28 };
29 struct schedule_ops *sched_ops = &ghetto_sched_ops;
30
31 /* Extreme ghetto */
32 static void __ros_syscall_spinon(struct syscall *sysc)
33 {
34         while (!(atomic_read(&sysc->flags) & (SC_DONE | SC_PROGRESS)))
35                 cpu_relax();
36 }
37
38 /* to trick uthread_create() */
39 int main(int argc, char** argv)
40 {
41         uint32_t vcoreid;
42         int retval;
43
44         mcs_barrier_init(&b, max_vcores());
45
46         /* vcore_context test */
47         assert(!in_vcore_context());
48         
49         /* prep indirect ev_q.  Note we grab a big one */
50         indirect_q = get_big_event_q();
51         indirect_q->ev_flags = EVENT_IPI;
52         indirect_q->ev_vcore = 1;                       /* IPI core 1 */
53         indirect_q->ev_handler = 0;
54         printf("Registering %08p for event type %d\n", indirect_q,
55                EV_FREE_APPLE_PIE);
56         register_kevent_q(indirect_q, EV_FREE_APPLE_PIE);
57
58         /* handle events: just want to print out what we get.  This is just a
59          * quick set of handlers, not a registration for a kevent. */
60         for (int i = 0; i < MAX_NR_EVENT; i++)
61                 ev_handlers[i] = handle_generic;
62         /* Want to use the default ev_ev (which we just overwrote) */
63         ev_handlers[EV_EVENT] = handle_ev_ev;
64         /* vcore_init() done in vcore_request() now. */
65         /* Set up event reception.  For example, this will allow us to receive an
66          * event and IPI for USER_IPIs on vcore 0.  Check event.c for more stuff.
67          * Note you don't have to register for USER_IPIs to receive ones you send
68          * yourself with sys_self_notify(). */
69         enable_kevent(EV_USER_IPI, 0, EVENT_IPI | EVENT_VCORE_PRIVATE);
70         /* Receive pending preemption events.  Can also get a MSG if you want. */
71         struct event_queue *ev_q = get_event_q();
72         ev_q->ev_flags = EVENT_IPI | EVENT_NOMSG | EVENT_VCORE_APPRO;
73         register_kevent_q(ev_q, EV_PREEMPT_PENDING);
74         /* We also receive preemption events, it is set up in uthread.c */
75
76         /* Inits a thread for us, though we won't use it.  Just a hack to get into
77          * _M mode.  Note this requests one vcore for us */
78         struct uthread dummy = {0};
79         uthread_lib_init(&dummy);
80         /* Reset the blockon to be the spinner...  This is really shitty.  Any
81          * blocking calls after we become an MCP and before this will fail.  This is
82          * just mhello showing its warts due to trying to work outside uthread.c */
83         ros_syscall_blockon = __ros_syscall_spinon;
84
85         if ((vcoreid = vcore_id())) {
86                 printf("Should never see me! (from vcore %d)\n", vcoreid);
87         } else { // core 0
88                 temp = 0xdeadbeef;
89                 printf("Hello from vcore %d with temp addr = %p and temp = %p\n",
90                        vcoreid, &temp, temp);
91                 printf("Multi-Goodbye, world, from PID: %d!\n", sys_getpid());
92                 printf("Requesting %d vcores\n", max_vcores() - 1);
93                 retval = vcore_request(max_vcores() - 1); /* since we already have 1 */
94                 //retval = vcore_request(5);
95                 printf("This is vcore0, right after vcore_request, retval=%d\n", retval);
96                 /* vcore_context test */
97                 assert(!in_vcore_context());
98         }
99
100         //#if 0
101         /* test notifying my vcore2 */
102         udelay(5000000);
103         printf("Vcore 0 self-notifying vcore 2 with notif 4!\n");
104         struct event_msg msg;
105         msg.ev_type = 4;
106         sys_self_notify(2, 4, &msg, TRUE);
107         udelay(5000000);
108         printf("Vcore 0 notifying itself with notif 6!\n");
109         msg.ev_type = 6;
110         sys_notify(sys_getpid(), 6, &msg);
111         udelay(1000000);
112         //#endif
113
114         /* test loop for restarting a uthread_ctx */
115         if (vcoreid == 0) {
116                 int ctr = 0;
117                 while(1) {
118                         printf("Vcore %d Spinning (%d), temp = %08x!\n", vcoreid, ctr++, temp);
119                         udelay(5000000);
120                         //exit(0);
121                 }
122         }
123
124         printf("Vcore %d Done!\n", vcoreid);
125         //mcs_barrier_wait(&b,vcore_id());
126
127         printf("All Cores Done!\n", vcoreid);
128         while(1); // manually kill from the monitor
129         /* since everyone should cleanup their uthreads, even if they don't plan on
130          * calling their code or want uthreads in the first place. <3 */
131         uthread_cleanup(&dummy);
132         return 0;
133 }
134
135 static void handle_generic(struct event_msg *ev_msg, unsigned int ev_type)
136 {
137         printf("Got event type %d on vcore %d\n", ev_type, vcore_id());
138 }
139
140 void ghetto_vcore_entry(void)
141 {
142         uint32_t vcoreid = vcore_id();
143         static bool first_time = TRUE;
144
145         temp = 0xcafebabe;
146         /* vcore_context test (don't need to do this anywhere) */
147         assert(in_vcore_context());
148
149         /* old logic was moved to parlib code */
150         if (current_uthread) {
151                 assert(vcoreid == 0);
152                 run_current_uthread();
153         }
154         /* unmask notifications once you can let go of the uthread_ctx and it is
155          * okay to clobber the transition stack.
156          * Check Documentation/processes.txt: 4.2.4.  In real code, you should be
157          * popping the tf of whatever user process you want (get off the x-stack) */
158         enable_notifs(vcoreid);
159
160 /* end: stuff userspace needs to do to handle notifications */
161
162         printf("Hello from vcore_entry in vcore %d with temp addr %p and temp %p\n",
163                vcoreid, &temp, temp);
164
165         #if 0
166         /* Test sys change vcore.  Need to manually preempt the pcore vcore4 is
167          * mapped to from the monitor */
168         udelay(20000000);
169         if (vcoreid == 1) {
170                 disable_notifs(vcoreid);
171                 printf("VC1 changing to VC4\n");
172                 sys_change_vcore(4, TRUE);              /* try both of these manually */
173                 //sys_change_vcore(4, FALSE);           /* try both of these manually */
174                 printf("VC1 returned\n");
175         }
176         udelay(10000000);
177         #endif
178
179         vcore_request(1);
180         //mcs_barrier_wait(&b,vcore_id());
181         udelay(vcoreid * 10000000);
182         //exit(0);
183         while(1);
184 }