d958dba95bd4f86df2fcabcd0125d69213cc51af
[akaros.git] / user / parlib / syscall.c
1 // System call stubs.
2
3 #include <parlib.h>
4 #include <vcore.h>
5
6 int sys_proc_destroy(int pid, int exitcode)
7 {
8         return ros_syscall(SYS_proc_destroy, pid, exitcode, 0, 0, 0, 0);
9 }
10
11 int sys_getpid(void)
12 {
13          return ros_syscall(SYS_getpid, 0, 0, 0, 0, 0, 0);
14 }
15
16 size_t sys_getpcoreid(void)
17 {
18          return ros_syscall(SYS_getpcoreid, 0, 0, 0, 0, 0, 0);
19 }
20
21 ssize_t sys_cputs(const uint8_t *s, size_t len)
22 {
23     return ros_syscall(SYS_cputs, s,  len, 0, 0, 0, 0);
24 }
25
26 uint16_t sys_cgetc(void)
27 {
28     return ros_syscall(SYS_cgetc, 0, 0, 0, 0, 0, 0);
29 }
30
31 int sys_null(void)
32 {
33     return ros_syscall(SYS_null, 0, 0, 0, 0, 0, 0);
34 }
35
36 ssize_t sys_shared_page_alloc(void** addr, pid_t p2, 
37                               int p1_flags, int p2_flags
38                              ) 
39 {
40         return ros_syscall(SYS_shared_page_alloc, addr, 
41                        p2, p1_flags, p2_flags, 0, 0);
42 }
43
44 ssize_t sys_shared_page_free(void* addr, pid_t p2) 
45 {
46         return ros_syscall(SYS_shared_page_free, addr, p2, 0, 0, 0, 0);
47 }
48
49 void sys_reboot(void)
50 {
51         ros_syscall(SYS_reboot, 0, 0, 0, 0, 0, 0);
52 }
53
54 void sys_yield(bool being_nice)
55 {
56         ros_syscall(SYS_yield, being_nice, 0, 0, 0, 0, 0);
57 }
58
59 int sys_proc_create(char *path, size_t path_l, char *argv[], char *envp[])
60 {
61         struct procinfo pi;
62         if (procinfo_pack_args(&pi, argv, envp)) {
63                 errno = ENOMEM;
64                 return -1;
65         }
66         return ros_syscall(SYS_proc_create, path, path_l, &pi, 0, 0, 0);
67 }
68
69 int sys_proc_run(int pid)
70 {
71         return ros_syscall(SYS_proc_run, pid, 0, 0, 0, 0, 0);
72 }
73
74 void *CT(length) sys_mmap(void *SNT addr, size_t length, int prot, int flags,
75                           int fd, size_t offset)
76 {
77         return (void*)ros_syscall(SYS_mmap, addr, length, prot, flags, fd, offset);
78 }
79
80 int sys_provision(int pid, unsigned int res_type, long res_val)
81 {
82         return ros_syscall(SYS_provision, pid, res_type, res_val, 0, 0, 0);
83 }
84
85 int sys_notify(int pid, unsigned int ev_type, struct event_msg *u_msg)
86 {
87         return ros_syscall(SYS_notify, pid, ev_type, u_msg, 0, 0, 0);
88 }
89
90 int sys_self_notify(uint32_t vcoreid, unsigned int ev_type,
91                     struct event_msg *u_msg, bool priv)
92 {
93         return ros_syscall(SYS_self_notify, vcoreid, ev_type, u_msg, priv, 0, 0);
94 }
95
96 int sys_halt_core(unsigned int usec)
97 {
98         return ros_syscall(SYS_halt_core, usec, 0, 0, 0, 0, 0);
99 }
100
101 void* sys_init_arsc()
102 {
103         return (void*)ros_syscall(SYS_init_arsc, 0, 0, 0, 0, 0, 0);
104 }
105
106 int sys_block(unsigned int usec)
107 {
108         return ros_syscall(SYS_block, usec, 0, 0, 0, 0, 0);
109 }
110
111 /* enable_my_notif tells the kernel whether or not it is okay to turn on notifs
112  * when our calling vcore 'yields'.  This controls whether or not the vcore will
113  * get started from vcore_entry() or not, and whether or not remote cores need
114  * to sys_change_vcore to preempt-recover the calling vcore.  Only set this to
115  * FALSE if you are unable to handle starting fresh at vcore_entry().  One
116  * example of this is in mcs_pdr_locks.
117  *
118  * Will return:
119  *              0 if we successfully changed to the target vcore.
120  *              -EBUSY if the target vcore is already mapped (a good kind of failure)
121  *              -EAGAIN if we failed for some other reason and need to try again.  For
122  *              example, the caller could be preempted, and we never even attempted to
123  *              change.
124  *              -EINVAL some userspace bug */
125 int sys_change_vcore(uint32_t vcoreid, bool enable_my_notif)
126 {
127         /* Since we might be asking to start up on a fresh stack (if
128          * enable_my_notif), we need to use some non-stack memory for the struct
129          * sysc.  Our vcore could get restarted before the syscall finishes (after
130          * unlocking the proc, before finish_sysc()), and the act of finishing would
131          * write onto our stack.  Thus we use the per-vcore struct. */
132         int flags;
133         /* Need to wait while a previous syscall is not done or locked.  Since this
134          * should only be called from VC ctx, we'll just spin.  Should be extremely
135          * rare.  Note flags is initialized to SC_DONE. */
136         do {
137                 cpu_relax();
138                 flags = atomic_read(&__vcore_one_sysc.flags);
139         } while (!(flags & SC_DONE) || flags & SC_K_LOCK);
140         __vcore_one_sysc.num = SYS_change_vcore;
141         __vcore_one_sysc.arg0 = vcoreid;
142         __vcore_one_sysc.arg1 = enable_my_notif;
143         /* keep in sync with glibc sysdeps/ros/syscall.c */
144         __ros_arch_syscall((long)&__vcore_one_sysc, 1);
145         /* If we returned, either we wanted to (!enable_my_notif) or we failed.
146          * Need to wait til the sysc is finished to find out why.  Again, its okay
147          * to just spin. */
148         do {
149                 cpu_relax();
150                 flags = atomic_read(&__vcore_one_sysc.flags);
151         } while (!(flags & SC_DONE) || flags & SC_K_LOCK);
152         return __vcore_one_sysc.retval;
153 }
154
155 int sys_change_to_m(void)
156 {
157         return ros_syscall(SYS_change_to_m, 0, 0, 0, 0, 0, 0);
158 }
159
160 int sys_poke_ksched(int pid, unsigned int res_type)
161 {
162         return ros_syscall(SYS_poke_ksched, pid, res_type, 0, 0, 0, 0);
163 }
164
165 int sys_abort_sysc(struct syscall *sysc)
166 {
167         return ros_syscall(SYS_abort_sysc, sysc, 0, 0, 0, 0, 0);
168 }
169
170 int sys_abort_sysc_fd(int fd)
171 {
172         return ros_syscall(SYS_abort_sysc_fd, fd, 0, 0, 0, 0, 0);
173 }
174
175 long syscall_async(struct syscall *sysc, unsigned long num, ...)
176 {
177         va_list args;
178
179         sysc->num = num;
180         sysc->flags = 0;
181         sysc->ev_q = 0;         /* not necessary, but good for debugging */
182         /* This is a little dangerous, since we'll usually pull more args than were
183          * passed in, ultimately reading gibberish off the stack. */
184         va_start(args, num);
185         sysc->arg0 = va_arg(args, long);
186         sysc->arg1 = va_arg(args, long);
187         sysc->arg2 = va_arg(args, long);
188         sysc->arg3 = va_arg(args, long);
189         sysc->arg4 = va_arg(args, long);
190         sysc->arg5 = va_arg(args, long);
191         va_end(args);
192         __ros_arch_syscall((long)sysc, 1);
193 }