User code can tell if it is in vcore context (XCC)
[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 int main(int argc, char** argv)
29 {
30         uint32_t vcoreid;
31         int retval;
32
33         mcs_barrier_init(&b, max_vcores());
34
35         /* vcore_context test */
36         assert(!in_vcore_context());
37         
38         /* prep indirect ev_q.  Note we grab a big one */
39         indirect_q = get_big_event_q();
40         indirect_q->ev_flags = EVENT_IPI;
41         indirect_q->ev_vcore = 1;                       /* IPI core 1 */
42         indirect_q->ev_handler = 0;
43         printf("Registering %08p for event type %d\n", indirect_q,
44                EV_FREE_APPLE_PIE);
45         register_kevent_q(indirect_q, EV_FREE_APPLE_PIE);
46
47 /* begin: stuff userspace needs to do before switching to multi-mode */
48         /* handle events: just want to print out what we get.  This is just a
49          * quick set of handlers, not a registration for a kevent. */
50         for (int i = 0; i < MAX_NR_EVENT; i++)
51                 ev_handlers[i] = handle_generic;
52         /* Want to use the default ev_ev (which we just overwrote) */
53         ev_handlers[EV_EVENT] = handle_ev_ev;
54         /* vcore_init() done in vcore_request() now. */
55         /* Set up event reception.  For example, this will allow us to receive an
56          * event and IPI for USER_IPIs on vcore 0.  Check event.c for more stuff.
57          * Note you don't have to register for USER_IPIs to receive ones you send
58          * yourself with sys_self_notify(). */
59         enable_kevent(EV_USER_IPI, 0, EVENT_IPI);
60         /* Receive pending preemption events.  Can also get a MSG if you want. */
61         struct event_queue *ev_q = get_event_q();
62         ev_q->ev_flags = EVENT_IPI | EVENT_NOMSG | EVENT_VCORE_APPRO;
63         register_kevent_q(ev_q, EV_PREEMPT_PENDING);
64
65         /* Need to save this somewhere that you can find it again when restarting
66          * core0 */
67         core0_tls = get_tls_desc(0);
68         /* Need to save our floating point state somewhere (like in the
69          * user_thread_tcb so it can be restarted too */
70
71         /* don't forget to enable notifs on vcore0 at some point */
72         enable_notifs(0);
73
74 /* end: stuff userspace needs to do before switching to multi-mode */
75
76         if ((vcoreid = vcore_id())) {
77                 printf("Should never see me! (from vcore %d)\n", vcoreid);
78         } else { // core 0
79                 temp = 0xdeadbeef;
80                 printf("Hello from vcore %d with temp addr = %p and temp = %p\n",
81                        vcoreid, &temp, temp);
82                 printf("Multi-Goodbye, world, from PID: %d!\n", sys_getpid());
83                 //retval = sys_resource_req(RES_CORES, 2, 0);
84                 printf("Requesting %d vcores\n",max_vcores());
85                 retval = vcore_request(max_vcores());
86                 //retval = vcore_request(5);
87                 printf("This is vcore0, right after vcore_request, retval=%d\n", retval);
88                 /* vcore_context test */
89                 assert(!in_vcore_context());
90         }
91
92         /* test notifying my vcore2 */
93         udelay(5000000);
94         printf("Vcore 0 self-notifying vcore 2 with notif 4!\n");
95         struct event_msg msg;
96         msg.ev_type = 4;
97         sys_self_notify(2, 4, &msg);
98         udelay(5000000);
99         printf("Vcore 0 notifying itself with notif 3!\n");
100         msg.ev_type = 3;
101         sys_notify(sys_getpid(), 3, &msg);
102         udelay(1000000);
103
104         /* test loop for restarting a notif_tf */
105         if (vcoreid == 0) {
106                 int ctr = 0;
107                 while(1) {
108                         printf("Vcore %d Spinning (%d), temp = %08x!\n", vcoreid, ctr++, temp);
109                         udelay(5000000);
110                         //exit(0);
111                 }
112         }
113
114         printf("Vcore %d Done!\n", vcoreid);
115         //mcs_barrier_wait(&b,vcore_id());
116
117         printf("All Cores Done!\n", vcoreid);
118         while(1); // manually kill from the monitor
119         return 0;
120 }
121
122 static void handle_generic(struct event_msg *ev_msg, unsigned int ev_type,
123                            bool overflow)
124 {
125         printf("Got event type %d on vcore %d, with%s overflow\n",
126                ev_type, vcore_id(), overflow ? "" : "out");
127 }
128
129 void vcore_entry(void)
130 {
131         uint32_t vcoreid = vcore_id();
132         static bool first_time = TRUE;
133
134         temp = 0xcafebabe;
135         /* vcore_context test (don't need to do this anywhere) */
136         assert(in_vcore_context());
137
138 /* begin: stuff userspace needs to do to handle notifications */
139
140         struct preempt_data *vcpd;
141         vcpd = &__procdata.vcore_preempt_data[vcoreid];
142
143         /* checks if a preempt is pending, yields if so */
144         check_preempt_pending(vcoreid);
145
146         /* here is how you receive an event */
147         handle_events(vcoreid);
148
149         /* Lets try to restart vcore0's context.  Note this doesn't do anything to
150          * set the appropriate TLS.  On x86, this will involve changing the LDT
151          * entry for this vcore to point to the TCB of the new user-thread. */
152         if (vcoreid == 0) {
153                 /* // test for preempting a notif_handler.  do it from the monitor
154                 int ctr = 0;
155                 while(ctr < 3) {
156                         printf("Vcore %d Spinning (%d), temp = %08x!\n", vcoreid, ctr++, temp);
157                         udelay(5000000);
158                 } */
159                 printf("restarting vcore0 from userspace\n");
160                 clear_notif_pending(vcoreid);
161                 /* // testing for missing a notif
162                 if (first_time) {
163                         first_time = FALSE;
164                         printf("setting pending, trying to renotify etc\n");
165                         vcpd->notif_pending = 1;
166                 } */
167                 set_tls_desc(core0_tls, 0);
168                 /* Load silly state (Floating point) too */
169                 pop_ros_tf(&vcpd->notif_tf, vcoreid);
170                 panic("should never see me!");
171         }
172         /* unmask notifications once you can let go of the notif_tf and it is okay
173          * to clobber the transition stack.
174          * Check Documentation/processes.txt: 4.2.4.  In real code, you should be
175          * popping the tf of whatever user process you want (get off the x-stack) */
176         enable_notifs(vcoreid);
177
178 /* end: stuff userspace needs to do to handle notifications */
179
180         printf("Hello from vcore_entry in vcore %d with temp addr %p and temp %p\n",
181                vcoreid, &temp, temp);
182         vcore_request(1);
183         //mcs_barrier_wait(&b,vcore_id());
184         udelay(vcoreid * 10000000);
185         //exit(0);
186         while(1);
187 }