7d59bba9816953e96a60b7b7cfd9facdd3d6533b
[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
26 int main(int argc, char** argv)
27 {
28         uint32_t vcoreid;
29         int retval;
30
31         mcs_barrier_init(&b, max_vcores());
32
33         /* prep indirect ev_q.  Note we grab a big one */
34         indirect_q = get_big_event_q();
35         indirect_q->ev_flags = EVENT_IPI;
36         indirect_q->ev_vcore = 1;                       /* IPI core 1 */
37         indirect_q->ev_handler = 0;
38         printf("Registering %08p for event type %d\n", indirect_q,
39                EV_FREE_APPLE_PIE);
40         register_kevent_q(indirect_q, EV_FREE_APPLE_PIE);
41
42 /* begin: stuff userspace needs to do before switching to multi-mode */
43         /* vcore_init() done in vcore_request() now. */
44         /* Set up event reception.  For example, this will allow us to receive an
45          * event and IPI for USER_IPIs on vcore 0.  Check event.c for more stuff. */
46         enable_kevent(EV_USER_IPI, 0, TRUE);
47
48         /* Need to save this somewhere that you can find it again when restarting
49          * core0 */
50         core0_tls = get_tls_desc(0);
51         /* Need to save our floating point state somewhere (like in the
52          * user_thread_tcb so it can be restarted too */
53
54         /* don't forget to enable notifs on vcore0 at some point */
55         struct preempt_data *vcpd;
56         vcpd = &__procdata.vcore_preempt_data[0];
57         vcpd->notif_enabled = TRUE;
58         
59 /* end: stuff userspace needs to do before switching to multi-mode */
60
61         if ((vcoreid = vcore_id())) {
62                 printf("Should never see me! (from vcore %d)\n", vcoreid);
63         } else { // core 0
64                 temp = 0xdeadbeef;
65                 printf("Hello from vcore %d with temp addr = %p and temp = %p\n",
66                        vcoreid, &temp, temp);
67                 printf("Multi-Goodbye, world, from PID: %d!\n", sys_getpid());
68                 //retval = sys_resource_req(RES_CORES, 2, 0);
69                 printf("Requesting %d vcores\n",max_vcores());
70                 retval = vcore_request(max_vcores());
71                 //retval = vcore_request(5);
72                 printf("This is vcore0, right after vcore_request, retval=%d\n", retval);
73         }
74
75         /* test notifying my vcore2 */
76         udelay(5000000);
77         printf("Vcore 0 self-notifying vcore 2 with notif 4!\n");
78         struct event_msg msg;
79         msg.ev_type = 4;
80         sys_self_notify(2, 4, &msg);
81         udelay(5000000);
82         printf("Vcore 0 notifying itself with notif 3!\n");
83         msg.ev_type = 3;
84         sys_notify(sys_getpid(), 3, &msg);
85         udelay(1000000);
86
87         /* test loop for restarting a notif_tf */
88         if (vcoreid == 0) {
89                 int ctr = 0;
90                 while(1) {
91                         printf("Vcore %d Spinning (%d), temp = %08x!\n", vcoreid, ctr++, temp);
92                         udelay(5000000);
93                         //exit(0);
94                 }
95         }
96
97         printf("Vcore %d Done!\n", vcoreid);
98         //mcs_barrier_wait(&b,vcore_id());
99
100         printf("All Cores Done!\n", vcoreid);
101         while(1); // manually kill from the monitor
102         return 0;
103 }
104
105 void vcore_entry(void)
106 {
107         uint32_t vcoreid = vcore_id();
108         static bool first_time = TRUE;
109
110         temp = 0xcafebabe;
111 /* begin: stuff userspace needs to do to handle notifications */
112
113         struct vcore *vc = &__procinfo.vcoremap[vcoreid];
114         struct preempt_data *vcpd;
115         vcpd = &__procdata.vcore_preempt_data[vcoreid];
116         
117         /* here is how you receive an event */
118         struct event_msg ev_msg = {0};
119         if (event_activity(&vcpd->ev_mbox, 0)) {
120                 /* Ought to while loop/dequeue, processing as they come in. */
121                 bcq_dequeue(&vcpd->ev_mbox.ev_msgs, &ev_msg, NR_BCQ_EVENTS);
122                 printf("the queue is on vcore %d and has a ne with type %d\n", vcoreid,
123                        ev_msg.ev_type);
124                 printf("Number of event overflows: %d\n", vcpd->ev_mbox.ev_overflows);
125         }
126         /* it might be in bitmask form too: */
127         //printf("and the bitmask looks like: ");
128         //PRINT_BITMASK(__procdata.vcore_preempt_data[vcoreid].notif_bmask, MAX_NR_NOTIF);
129
130         /* How we handle indirection events: */
131         struct event_queue_big *ev_q;
132         struct event_msg indir_msg = {0};
133         if (ev_msg.ev_type == EV_EVENT) {
134                 ev_q = ev_msg.ev_arg3;  /* convention */
135                 printf("Detected EV_EVENT, ev_q is %08p (%08p)\n", ev_q, indirect_q);
136                 /* Ought to loop/dequeue, processing as they come in. */
137                 bcq_dequeue(&ev_q->ev_mbox->ev_msgs, &indir_msg, NR_BCQ_EVENTS);
138                 printf("Message of type: %d (%d)\n", indir_msg.ev_type,
139                        EV_FREE_APPLE_PIE);
140         }
141         /* how we tell a preemption is pending (regardless of notif/events) */
142         if (vc->preempt_pending) {
143                 printf("Oh crap, vcore %d is being preempted!  Yielding\n", vcoreid);
144                 sys_yield(TRUE);
145                 printf("After yield on vcore %d. I wasn't being preempted.\n", vcoreid);
146         }
147                 
148         /* Lets try to restart vcore0's context.  Note this doesn't do anything to
149          * set the appropriate TLS.  On x86, this will involve changing the LDT
150          * entry for this vcore to point to the TCB of the new user-thread. */
151         if (vcoreid == 0) {
152                 /* // test for preempting a notif_handler.  do it from the monitor
153                 int ctr = 0;
154                 while(ctr < 3) {
155                         printf("Vcore %d Spinning (%d), temp = %08x!\n", vcoreid, ctr++, temp);
156                         udelay(5000000);
157                 } */
158                 printf("restarting vcore0 from userspace\n");
159                 vcpd->notif_pending = 0;
160                 /* Do one last check for notifs after clearing pending */
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         vcpd->notif_enabled = TRUE;
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 }