Fixed experiment timing on SPARC
[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/notification.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
14 #ifdef __sparc_v8__
15 # define udelay(x) udelay((x)/500)
16 #endif
17
18 mcs_barrier_t b;
19
20 __thread int temp;
21 void *core0_tls = 0;
22
23 int main(int argc, char** argv)
24 {
25         uint32_t vcoreid;
26         int retval;
27
28         mcs_barrier_init(&b, max_vcores());
29
30 /* begin: stuff userspace needs to do before switching to multi-mode */
31         if (vcore_init())
32                 printf("vcore_init() failed, we're fucked!\n");
33
34         /* tell the kernel where and how we want to receive notifications */
35         struct notif_method *nm;
36         for (int i = 0; i < MAX_NR_NOTIF; i++) {
37                 nm = &__procdata.notif_methods[i];
38                 nm->flags |= NOTIF_WANTED | NOTIF_MSG | NOTIF_IPI;
39                 nm->vcoreid = i % 2; // vcore0 or 1, keepin' it fresh.
40         }
41
42         /* Need to save this somewhere that you can find it again when restarting
43          * core0 */
44         core0_tls = get_tls_desc(0);
45         /* Need to save our floating point state somewhere (like in the
46          * user_thread_tcb so it can be restarted too */
47
48         /* don't forget to enable notifs on vcore0 at some point */
49         struct preempt_data *vcpd;
50         vcpd = &__procdata.vcore_preempt_data[0];
51         vcpd->notif_enabled = TRUE;
52         
53 /* end: stuff userspace needs to do before switching to multi-mode */
54
55         if ((vcoreid = vcore_id())) {
56                 printf("Should never see me! (from vcore %d)\n", vcoreid);
57         } else { // core 0
58                 temp = 0xdeadbeef;
59                 printf("Hello from vcore %d with temp addr = %p and temp = %p\n",
60                        vcoreid, &temp, temp);
61                 printf("Multi-Goodbye, world, from PID: %d!\n", sys_getpid());
62                 //retval = sys_resource_req(RES_CORES, 2, 0);
63                 printf("Requesting %d vcores\n",max_vcores());
64                 retval = vcore_request(max_vcores());
65                 //retval = vcore_request(5);
66                 printf("This is vcore0, right after vcore_request, retval=%d\n", retval);
67         }
68
69 #if 0
70         /* test notifying my vcore2 */
71         udelay(5000000);
72         printf("Vcore 0 self-notifying vcore 2 with notif 4!\n");
73         struct notif_event ne;
74         ne.ne_type = 4;
75         sys_self_notify(2, 4, &ne);
76         udelay(5000000);
77         printf("Vcore 0 notifying itself with notif 3!\n");
78         ne.ne_type = 3;
79         sys_notify(sys_getpid(), 3, &ne);
80         udelay(1000000);
81 #endif
82
83         /* test loop for restarting a notif_tf */
84         if (vcoreid == 0) {
85                 int ctr = 0;
86                 while(1) {
87                         printf("Vcore %d Spinning (%d), temp = %08x!\n", vcoreid, ctr++, temp);
88                         udelay(5000000);
89                         //exit(0);
90                 }
91         }
92
93         printf("Vcore %d Done!\n", vcoreid);
94         //mcs_barrier_wait(&b,vcore_id());
95
96         printf("All Cores Done!\n", vcoreid);
97         while(1); // manually kill from the monitor
98         return 0;
99 }
100
101 void vcore_entry(void)
102 {
103         uint32_t vcoreid = vcore_id();
104         static bool first_time = TRUE;
105
106         temp = 0xcafebabe;
107 /* begin: stuff userspace needs to do to handle notifications */
108
109         struct vcore *vc = &__procinfo.vcoremap[vcoreid];
110         struct preempt_data *vcpd;
111         vcpd = &__procdata.vcore_preempt_data[vcoreid];
112         
113         /* here is how you receive a notif_event */
114         struct notif_event ne = {0};
115         bcq_dequeue(&vcpd->notif_evts, &ne, NR_PERCORE_EVENTS);
116         printf("the queue is on vcore %d and has a ne with type %d\n", vcoreid,
117                ne.ne_type);
118         /* it might be in bitmask form too: */
119         //printf("and the bitmask looks like: ");
120         //PRINT_BITMASK(__procdata.vcore_preempt_data[vcoreid].notif_bmask, MAX_NR_NOTIF);
121         /* can see how many messages had to be sent as bits */
122         printf("Number of event overflows: %d\n", vcpd->event_overflows);
123
124         if (vc->preempt_pending) {
125                 printf("Oh crap, vcore %d is being preempted!  Yielding\n", vcoreid);
126                 sys_yield(TRUE);
127                 printf("After yield on vcore %d. I wasn't being preempted.\n", vcoreid);
128         }
129                 
130         /* Lets try to restart vcore0's context.  Note this doesn't do anything to
131          * set the appropriate TLS.  On x86, this will involve changing the LDT
132          * entry for this vcore to point to the TCB of the new user-thread. */
133         if (vcoreid == 0) {
134                 /* // test for preempting a notif_handler.  do it from the monitor
135                 int ctr = 0;
136                 while(ctr < 3) {
137                         printf("Vcore %d Spinning (%d), temp = %08x!\n", vcoreid, ctr++, temp);
138                         udelay(5000000);
139                 } */
140                 printf("restarting vcore0 from userspace\n");
141                 vcpd->notif_pending = 0;
142                 /* Do one last check for notifs after clearing pending */
143                 /* // testing for missing a notif
144                 if (first_time) {
145                         first_time = FALSE;
146                         printf("setting pending, trying to renotify etc\n");
147                         vcpd->notif_pending = 1;
148                 } */
149                 set_tls_desc(core0_tls, 0);
150                 /* Load silly state (Floating point) too */
151                 pop_ros_tf(&vcpd->notif_tf, vcoreid);
152                 panic("should never see me!");
153         }       
154         /* unmask notifications once you can let go of the notif_tf and it is okay
155          * 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         vcpd->notif_enabled = TRUE;
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         vcore_request(1);
165         //mcs_barrier_wait(&b,vcore_id());
166         udelay(vcoreid * 10000000);
167         exit(0);
168         while(1);
169 }