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