Set errno when only errstr was called
[akaros.git] / kern / src / syscall.c
index 3bf53ef..e506d76 100644 (file)
@@ -9,7 +9,7 @@
 #include <arch/arch.h>
 #include <arch/mmu.h>
 #include <arch/console.h>
-#include <ros/time.h>
+#include <time.h>
 #include <error.h>
 
 #include <elf.h>
 #include <arsc_server.h>
 #include <event.h>
 #include <termios.h>
+#include <socket.h>
 
 
-#ifdef __CONFIG_NETWORKING__
-#include <arch/nic_common.h>
+#ifdef CONFIG_NETWORKING
+#include <net/nic_common.h>
 extern int (*send_frame)(const char *CT(len) data, size_t len);
 extern unsigned char device_mac[6];
 #endif
@@ -48,7 +49,7 @@ struct systrace_record *systrace_buffer = 0;
 uint32_t systrace_bufidx = 0;
 size_t systrace_bufsize = 0;
 struct proc *systrace_procs[MAX_NUM_TRACED] = {0};
-spinlock_t systrace_lock = SPINLOCK_INITIALIZER;
+spinlock_t systrace_lock = SPINLOCK_INITIALIZER_IRQSAVE;
 
 /* Not enforcing the packing of systrace_procs yet, but don't rely on that */
 static bool proc_is_traced(struct proc *p)
@@ -101,6 +102,36 @@ void set_errno(int errno)
                pcpui->cur_sysc->err = errno;
 }
 
+void set_errstr(char *errstr)
+{
+       struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
+       if (!pcpui->cur_sysc)
+               return;
+       strncpy(pcpui->cur_sysc->errstr, errstr, MAX_ERRSTR_LEN);
+       /* enforce null termination */
+       pcpui->cur_sysc->errstr[MAX_ERRSTR_LEN - 1] = '\0';
+}
+
+char *current_errstr(void)
+{
+       struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
+       /* no one should call this that doesn't have a sysc */
+       assert(!pcpui->cur_sysc);
+       return pcpui->cur_sysc->errstr;
+}
+
+struct errbuf *get_cur_errbuf(void)
+{
+       struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
+       return (struct errbuf*)pcpui->cur_errbuf;
+}
+
+void set_cur_errbuf(struct errbuf *ebuf)
+{
+       struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
+       pcpui->cur_errbuf = ebuf;
+}
+
 /************** Utility Syscalls **************/
 
 static int sys_null(void)
@@ -200,7 +231,7 @@ static int sys_cache_buster(struct proc *p, uint32_t num_writes,
 
 static int sys_cache_invalidate(void)
 {
-       #ifdef __i386__
+       #ifdef CONFIG_X86
                wbinvd();
        #endif
        return 0;
@@ -314,7 +345,7 @@ static error_t sys_proc_run(struct proc *p, unsigned pid)
        error_t retval = 0;
 
        if (!target) {
-               set_errno(EBADPROC);
+               set_errno(ESRCH);
                return -1;
        }
        /* make sure we have access and it's in the right state to be activated */
@@ -337,7 +368,7 @@ out_error:
 
 /* Destroy proc pid.  If this is called by the dying process, it will never
  * return.  o/w it will return 0 on success, or an error.  Errors include:
- * - EBADPROC: if there is no such process with pid
+ * - ESRCH: if there is no such process with pid
  * - EPERM: if caller does not control pid */
 static error_t sys_proc_destroy(struct proc *p, pid_t pid, int exitcode)
 {
@@ -363,7 +394,7 @@ static error_t sys_proc_destroy(struct proc *p, pid_t pid, int exitcode)
        proc_destroy(p_to_die);
        /* we only get here if we weren't the one to die */
        proc_decref(p_to_die);
-       return ESUCCESS;
+       return 0;
 }
 
 static int sys_proc_yield(struct proc *p, bool being_nice)
@@ -382,21 +413,12 @@ static int sys_proc_yield(struct proc *p, bool being_nice)
        assert(0);
 }
 
-static void sys_change_vcore(struct proc *p, uint32_t vcoreid,
+static int sys_change_vcore(struct proc *p, uint32_t vcoreid,
                              bool enable_my_notif)
 {
-       struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
-       /* Change to vcore may start the vcore up remotely before we can finish the
-        * async syscall, so we need to finish the sysc and not touch the struct.
-        * Note this sysc has no return value. */
-       finish_sysc(pcpui->cur_sysc, pcpui->cur_proc);
-       pcpui->cur_sysc = 0;    /* don't touch sysc again */
-       proc_change_to_vcore(p, vcoreid, enable_my_notif);
-       /* Shouldn't return, to prevent the chance of mucking with cur_sysc.
-        * smp_idle will make sure we run the appropriate cur_tf (which will be the
-        * new vcore for successful calls). */
-       smp_idle();
-       assert(0);
+       /* Note retvals can be negative, but we don't mess with errno in case
+        * callers use this in low-level code and want to extract the 'errno'. */
+       return proc_change_to_vcore(p, vcoreid, enable_my_notif);
 }
 
 static ssize_t sys_fork(env_t* e)
@@ -414,13 +436,13 @@ static ssize_t sys_fork(env_t* e)
 
        env->heap_top = e->heap_top;
        env->ppid = e->pid;
-       disable_irqsave(&state);        /* protect cur_tf */
-       /* Can't really fork if we don't have a current_tf to fork */
-       if (!current_tf) {
+       disable_irqsave(&state);        /* protect cur_ctx */
+       /* Can't really fork if we don't have a current_ctx to fork */
+       if (!current_ctx) {
                set_errno(EINVAL);
                return -1;
        }
-       env->env_tf = *current_tf;
+       env->scp_ctx = *current_ctx;
        enable_irqsave(&state);
 
        env->cache_colors_map = cache_colors_map_alloc();
@@ -450,7 +472,7 @@ static ssize_t sys_fork(env_t* e)
        memcpy(env->procinfo->argp, e->procinfo->argp, sizeof(e->procinfo->argp));
        memcpy(env->procinfo->argbuf, e->procinfo->argbuf,
               sizeof(e->procinfo->argbuf));
-       #ifdef __i386__
+       #ifdef CONFIG_X86
        /* new guy needs to know about ldt (everything else in procdata is fresh */
        env->procdata->ldt = e->procdata->ldt;
        #endif
@@ -465,7 +487,7 @@ static ssize_t sys_fork(env_t* e)
        // TODO: if the parent doesn't wait, we need to change the child's parent
        // when the parent dies, or at least decref it
 
-       printd("[PID %d] fork PID %d\n",e->pid,env->pid);
+       printd("[PID %d] fork PID %d\n", e->pid, env->pid);
        return env->pid;
 }
 
@@ -498,22 +520,22 @@ static int sys_exec(struct proc *p, char *path, size_t path_l,
        t_path = user_strdup_errno(p, path, path_l);
        if (!t_path)
                return -1;
-       disable_irqsave(&state);        /* protect cur_tf */
-       /* Can't exec if we don't have a current_tf to restart (if we fail).  This
+       disable_irqsave(&state);        /* protect cur_ctx */
+       /* Can't exec if we don't have a current_ctx to restart (if we fail).  This
         * isn't 100% true, but I'm okay with it. */
-       if (!pcpui->cur_tf) {
+       if (!pcpui->cur_ctx) {
                enable_irqsave(&state);
                set_errno(EINVAL);
                return -1;
        }
-       /* Preemptively copy out the cur_tf, in case we fail later (easier on cur_tf
-        * if we do this now) */
-       p->env_tf = *pcpui->cur_tf;
-       /* Clear the current_tf.  We won't be returning the 'normal' way.  Even if
+       /* Preemptively copy out the cur_ctx, in case we fail later (easier on
+        * cur_ctx if we do this now) */
+       p->scp_ctx = *pcpui->cur_ctx;
+       /* Clear the current_ctx.  We won't be returning the 'normal' way.  Even if
         * we want to return with an error, we need to go back differently in case
         * we succeed.  This needs to be done before we could possibly block, but
         * unfortunately happens before the point of no return. */
-       pcpui->cur_tf = 0;
+       pcpui->cur_ctx = 0;
        enable_irqsave(&state);
        /* This could block: */
        program = do_file_open(t_path, 0, 0);
@@ -528,7 +550,7 @@ static int sys_exec(struct proc *p, char *path, size_t path_l,
                                   sizeof(pi->argbuf)))
                goto mid_error;
        /* This is the point of no return for the process. */
-       #ifdef __i386__
+       #ifdef CONFIG_X86
        /* clear this, so the new program knows to get an LDT */
        p->procdata->ldt = 0;
        #endif
@@ -572,61 +594,164 @@ all_out:
        smp_idle();                             /* will reenable interrupts */
 }
 
-static ssize_t sys_trywait(env_t* e, pid_t pid, int* status)
-{
-       /* TODO:
-        * - WAIT should handle stop and start via signal too
-        *      - what semantics?  need a wait for every change to state?  etc.
-        * - should have an option for WNOHANG, and a bunch of other things.
-        * - think about what functions we want to work with MCPS
-        *   */
-       struct proc* p = pid2proc(pid);
+/* Helper, will attempt a particular wait on a proc.  Returns the pid of the
+ * process if we waited on it successfully, and the status will be passed back
+ * in ret_status (kernel memory).  Returns 0 if the wait failed and we should
+ * try again.  Returns -1 if we should abort.  Only handles DYING.  Callers
+ * need to lock to protect the children tailq and reaping bits. */
+static pid_t try_wait(struct proc *parent, struct proc *child, int *ret_status,
+                      int options)
+{
+       if (child->state == PROC_DYING) {
+               /* Disown returns -1 if it's already been disowned or we should o/w
+                * abort.  This can happen if we have concurrent waiters, both with
+                * pointers to the child (only one should reap).  Note that if we don't
+                * do this, we could go to sleep and never receive a cv_signal. */
+               if (__proc_disown_child(parent, child))
+                       return -1;
+               /* despite disowning, the child won't be freed til we drop this ref
+                * held by this function, so it is safe to access the memory.
+                *
+                * Note the exit code one byte in the 0xff00 spot.  Check out glibc's
+                * posix/sys/wait.h and bits/waitstatus.h for more info.  If we ever
+                * deal with signalling and stopping, we'll need to do some more work
+                * here.*/
+               *ret_status = (child->exitcode & 0xff) << 8;
+               return child->pid;
+       }
+       return 0;
+}
 
-       // TODO: this syscall is racy, so we only support for single-core procs
-       if(e->state != PROC_RUNNING_S)
+/* Helper, like try_wait, but attempts a wait on any of the children, returning
+ * the specific PID we waited on, 0 to try again (a waitable exists), and -1 to
+ * abort (no children/waitables exist).  Callers need to lock to protect the
+ * children tailq and reaping bits.*/
+static pid_t try_wait_any(struct proc *parent, int *ret_status, int options)
+{
+       struct proc *i, *temp;
+       pid_t retval;
+       if (TAILQ_EMPTY(&parent->children))
                return -1;
+       /* Could have concurrent waiters mucking with the tailq, caller must lock */
+       TAILQ_FOREACH_SAFE(i, &parent->children, sibling_link, temp) {
+               retval = try_wait(parent, i, ret_status, options);
+               /* This catches a thread causing a wait to fail but not taking the
+                * child off the list before unlocking.  Should never happen. */
+               assert(retval != -1);
+               /* Succeeded, return the pid of the child we waited on */
+               if (retval)
+                       return retval;
+       }
+       assert(retval == 0);
+       return 0;
+}
 
-       // TODO: need to use errno properly.  sadly, ROS error codes conflict..
-
-       if(p)
-       {
-               ssize_t ret;
-
-               if(current->pid == p->ppid)
-               {
-                       /* Block til there is some activity */
-                       if (!(p->state == PROC_DYING)) {
-                               sleep_on(&p->state_change);
-                       }
-                       if(p->state == PROC_DYING)
-                       {
-                               memcpy_to_user(e,status,&p->exitcode,sizeof(int));
-                               printd("[PID %d] waited for PID %d (code %d)\n",
-                                      e->pid,p->pid,p->exitcode);
-                               ret = 0;
-                       }
-                       else // not dead yet
-                       {
-                               warn("Should not have reached here.");
-                               set_errno(ESUCCESS);
-                               ret = -1;
-                       }
-               }
-               else // not a child of the calling process
-               {
-                       set_errno(EPERM);
-                       ret = -1;
-               }
+/* Waits on a particular child, returns the pid of the child waited on, and
+ * puts the ret status in *ret_status.  Returns the pid if we succeeded, 0 if
+ * the child was not waitable and WNOHANG, and -1 on error. */
+static pid_t wait_one(struct proc *parent, struct proc *child, int *ret_status,
+                      int options)
+{
+       pid_t retval;
+       cv_lock(&parent->child_wait);
+       /* retval == 0 means we should block */
+       retval = try_wait(parent, child, ret_status, options);
+       if ((retval == 0) && (options & WNOHANG))
+               goto out_unlock;
+       while (!retval) {
+               cpu_relax();
+               cv_wait(&parent->child_wait);
+               /* If we're dying, then we don't need to worry about waiting.  We don't
+                * do this yet, but we'll need this outlet when we deal with orphaned
+                * children and having init inherit them. */
+               if (parent->state == PROC_DYING)
+                       goto out_unlock;
+               /* Any child can wake us up, but we check for the particular child we
+                * care about */
+               retval = try_wait(parent, child, ret_status, options);
+       }
+       if (retval == -1) {
+               /* Child was already waited on by a concurrent syscall. */
+               set_errno(ECHILD);
+       }
+       /* Fallthrough */
+out_unlock:
+       cv_unlock(&parent->child_wait);
+       return retval;
+}
 
-               // if the wait succeeded, decref twice
-               if (ret == 0)
-                       proc_decref(p);
-               proc_decref(p);
-               return ret;
+/* Waits on any child, returns the pid of the child waited on, and puts the ret
+ * status in *ret_status.  Is basically a waitpid(-1, ... );  See wait_one for
+ * more details.  Returns -1 if there are no children to wait on, and returns 0
+ * if there are children and we need to block but WNOHANG was set. */
+static pid_t wait_any(struct proc *parent, int *ret_status, int options)
+{
+       pid_t retval;
+       cv_lock(&parent->child_wait);
+       retval = try_wait_any(parent, ret_status, options);
+       if ((retval == 0) && (options & WNOHANG))
+               goto out_unlock;
+       while (!retval) {
+               cpu_relax();
+               cv_wait(&parent->child_wait);
+               if (parent->state == PROC_DYING)
+                       goto out_unlock;
+               /* Any child can wake us up from the CV.  This is a linear try_wait
+                * scan.  If we have a lot of children, we could optimize this. */
+               retval = try_wait_any(parent, ret_status, options);
        }
+       if (retval == -1)
+               assert(TAILQ_EMPTY(&parent->children));
+       /* Fallthrough */
+out_unlock:
+       cv_unlock(&parent->child_wait);
+       return retval;
+}
 
-       set_errno(EPERM);
-       return -1;
+/* Note: we only allow waiting on children (no such thing as threads, for
+ * instance).  Right now we only allow waiting on termination (not signals),
+ * and we don't have a way for parents to disown their children (such as
+ * ignoring SIGCHLD, see man 2 waitpid's Notes).
+ *
+ * We don't bother with stop/start signals here, though we can probably build
+ * it in the helper above.
+ *
+ * Returns the pid of who we waited on, or -1 on error, or 0 if we couldn't
+ * wait (WNOHANG). */
+static pid_t sys_waitpid(struct proc *parent, pid_t pid, int *status,
+                         int options)
+{
+       struct proc *child;
+       pid_t retval = 0;
+       int ret_status = 0;
+
+       /* -1 is the signal for 'any child' */
+       if (pid == -1) {
+               retval = wait_any(parent, &ret_status, options);
+               goto out;
+       }
+       child = pid2proc(pid);
+       if (!child) {
+               set_errno(ECHILD);      /* ECHILD also used for no proc */
+               retval = -1;
+               goto out;
+       }
+       if (!(parent->pid == child->ppid)) {
+               set_errno(ECHILD);
+               retval = -1;
+               goto out_decref;
+       }
+       retval = wait_one(parent, child, &ret_status, options);
+       /* fall-through */
+out_decref:
+       proc_decref(child);
+out:
+       /* ignoring / don't care about memcpy's retval here. */
+       if (status)
+               memcpy_to_user(parent, status, &ret_status, sizeof(ret_status));
+       printd("[PID %d] waited for PID %d, got retval %d (status 0x%x)\n",
+              parent->pid, pid, retval, ret_status);
+       return retval;
 }
 
 /************** Memory Management Syscalls **************/
@@ -661,6 +786,43 @@ static int sys_shared_page_free(env_t* p1, void*DANGEROUS addr, pid_t p2)
        return -1;
 }
 
+/* Helper, to do the actual provisioning of a resource to a proc */
+static int prov_resource(struct proc *target, unsigned int res_type,
+                         long res_val)
+{
+       switch (res_type) {
+               case (RES_CORES):
+                       /* in the off chance we have a kernel scheduler that can't
+                        * provision, we'll need to change this. */
+                       return provision_core(target, res_val);
+               default:
+                       printk("[kernel] received provisioning for unknown resource %d\n",
+                              res_type);
+                       set_errno(ENOENT);      /* or EINVAL? */
+                       return -1;
+       }
+}
+
+/* Rough syscall to provision res_val of type res_type to target_pid */
+static int sys_provision(struct proc *p, int target_pid,
+                         unsigned int res_type, long res_val)
+{
+       struct proc *target = pid2proc(target_pid);
+       int retval;
+       if (!target) {
+               if (target_pid == 0)
+                       return prov_resource(0, res_type, res_val);
+               /* debugging interface */
+               if (target_pid == -1)
+                       print_prov_map();
+               set_errno(ESRCH);
+               return -1;
+       }
+       retval = prov_resource(target, res_type, res_val);
+       proc_decref(target);
+       return retval;
+}
+
 /* Untested.  Will notify the target on the given vcore, if the caller controls
  * the target.  Will honor the target's wanted/vcoreid.  u_ne can be NULL. */
 static int sys_notify(struct proc *p, int target_pid, unsigned int ev_type,
@@ -669,7 +831,7 @@ static int sys_notify(struct proc *p, int target_pid, unsigned int ev_type,
        struct event_msg local_msg = {0};
        struct proc *target = pid2proc(target_pid);
        if (!target) {
-               set_errno(EBADPROC);
+               set_errno(ESRCH);
                return -1;
        }
        if (!proc_controls(p, target)) {
@@ -684,6 +846,8 @@ static int sys_notify(struct proc *p, int target_pid, unsigned int ev_type,
                        set_errno(EINVAL);
                        return -1;
                }
+       } else {
+               local_msg.ev_type = ev_type;
        }
        send_kernel_event(target, &local_msg, 0);
        proc_decref(target);
@@ -691,15 +855,13 @@ static int sys_notify(struct proc *p, int target_pid, unsigned int ev_type,
 }
 
 /* Will notify the calling process on the given vcore, independently of WANTED
- * or advertised vcoreid.  If you change the parameters, change pop_ros_tf() */
+ * or advertised vcoreid.  If you change the parameters, change pop_user_ctx().
+ */
 static int sys_self_notify(struct proc *p, uint32_t vcoreid,
                            unsigned int ev_type, struct event_msg *u_msg,
                            bool priv)
 {
        struct event_msg local_msg = {0};
-
-       printd("[kernel] received self notify for vcoreid %d, type %d, msg %08p\n",
-              vcoreid, ev_type, u_msg);
        /* if the user provided an ev_msg, copy it in and use that */
        if (u_msg) {
                if (memcpy_from_user(p, &local_msg, u_msg, sizeof(struct event_msg))) {
@@ -709,12 +871,27 @@ static int sys_self_notify(struct proc *p, uint32_t vcoreid,
        } else {
                local_msg.ev_type = ev_type;
        }
+       if (local_msg.ev_type >= MAX_NR_EVENT) {
+               printk("[kernel] received self-notify for vcoreid %d, ev_type %d, "
+                      "u_msg %p, u_msg->type %d\n", vcoreid, ev_type, u_msg,
+                      u_msg ? u_msg->ev_type : 0);
+               return -1;
+       }
        /* this will post a message and IPI, regardless of wants/needs/debutantes.*/
        post_vcore_event(p, &local_msg, vcoreid, priv ? EVENT_VCORE_PRIVATE : 0);
        proc_notify(p, vcoreid);
        return 0;
 }
 
+/* Puts the calling core into vcore context, if it wasn't already, via a
+ * self-IPI / active notification.  Barring any weird unmappings, we just send
+ * ourselves a __notify. */
+static int sys_vc_entry(struct proc *p)
+{
+       send_kernel_message(core_id(), __notify, (long)p, 0, 0, KMSG_ROUTINE);
+       return 0;
+}
+
 /* This will set a local timer for usec, then shut down the core.  There's a
  * slight race between spinner and halt.  For now, the core will wake up for
  * other interrupts and service them, but will not process routine messages or
@@ -758,13 +935,36 @@ static int sys_change_to_m(struct proc *p)
        return retval;
 }
 
-/* Not sure what people will need.  For now, they can send in the resource they
- * want.  Up to the ksched to support this, and other things (like -1 for all
- * resources).  Might have this info go in via procdata instead. */
-static int sys_poke_ksched(struct proc *p, int res_type)
+/* Pokes the ksched for the given resource for target_pid.  If the target pid
+ * == 0, we just poke for the calling process.  The common case is poking for
+ * self, so we avoid the lookup. 
+ *
+ * Not sure if you could harm someone via asking the kernel to look at them, so
+ * we'll do a 'controls' check for now.  In the future, we might have something
+ * in the ksched that limits or penalizes excessive pokes. */
+static int sys_poke_ksched(struct proc *p, int target_pid,
+                           unsigned int res_type)
 {
-       poke_ksched(p, res_type);
-       return 0;
+       struct proc *target;
+       int retval = 0;
+       if (!target_pid) {
+               poke_ksched(p, res_type);
+               return 0;
+       }
+       target = pid2proc(target_pid);
+       if (!target) {
+               set_errno(ESRCH);
+               return -1;
+       }
+       if (!proc_controls(p, target)) {
+               set_errno(EPERM);
+               retval = -1;
+               goto out;
+       }
+       poke_ksched(target, res_type);
+out:
+       proc_decref(target);
+       return retval;
 }
 
 /************** Platform Specific Syscalls **************/
@@ -776,7 +976,7 @@ static ssize_t sys_serial_read(env_t* e, char *DANGEROUS _buf, size_t len)
        if (len == 0)
                return 0;
 
-       #ifdef __CONFIG_SERIAL_IO__
+       #ifdef CONFIG_SERIAL_IO
            char *COUNT(len) buf = user_mem_assert(e, _buf, len, 1, PTE_USER_RO);
                size_t bytes_read = 0;
                int c;
@@ -796,7 +996,7 @@ static ssize_t sys_serial_write(env_t* e, const char *DANGEROUS buf, size_t len)
        printk("[kernel] serial writing is deprecated.\n");
        if (len == 0)
                return 0;
-       #ifdef __CONFIG_SERIAL_IO__
+       #ifdef CONFIG_SERIAL_IO
                char *COUNT(len) _buf = user_mem_assert(e, buf, len, 1, PTE_USER_RO);
                for(int i =0; i<len; i++)
                        serial_send_byte(buf[i]);
@@ -806,7 +1006,7 @@ static ssize_t sys_serial_write(env_t* e, const char *DANGEROUS buf, size_t len)
        #endif
 }
 
-#ifdef __CONFIG_NETWORKING__
+#ifdef CONFIG_NETWORKING
 // This is not a syscall we want. Its hacky. Here just for syscall stuff until get a stack.
 static ssize_t sys_eth_read(env_t* e, char *DANGEROUS buf)
 {
@@ -1012,7 +1212,6 @@ static intreg_t sys_fstat(struct proc *p, int fd, struct kstat *u_stat)
        /* TODO: UMEM: pin the memory, copy directly, and skip the kernel buffer */
        if (memcpy_to_user_errno(p, u_stat, kbuf, sizeof(struct kstat))) {
                kfree(kbuf);
-               set_errno(EINVAL);
                return -1;
        }
        kfree(kbuf);
@@ -1045,7 +1244,6 @@ static intreg_t stat_helper(struct proc *p, const char *path, size_t path_l,
        /* TODO: UMEM: pin the memory, copy directly, and skip the kernel buffer */
        if (memcpy_to_user_errno(p, u_stat, kbuf, sizeof(struct kstat))) {
                kfree(kbuf);
-               set_errno(EINVAL);
                return -1;
        }
        kfree(kbuf);
@@ -1143,17 +1341,30 @@ intreg_t sys_chmod(struct proc *p, const char *path, size_t path_l, int mode)
        return retval;
 }
 
-static intreg_t sys_lseek(struct proc *p, int fd, off_t offset, int whence)
+/* 64 bit seek, with the off64_t passed in via two (potentially 32 bit) off_ts.
+ * We're supporting both 32 and 64 bit kernels/userspaces, but both use the
+ * llseek syscall with 64 bit parameters. */
+static intreg_t sys_llseek(struct proc *p, int fd, off_t offset_hi,
+                           off_t offset_lo, off64_t *result, int whence)
 {
-       off_t ret;
+       off64_t retoff = 0;
+       off64_t tempoff = 0;
+       int ret = 0;
        struct file *file = get_file_from_fd(&p->open_files, fd);
        if (!file) {
                set_errno(EBADF);
                return -1;
        }
-       ret = file->f_op->llseek(file, offset, whence);
+       tempoff = offset_hi;
+       tempoff <<= 32;
+       tempoff |= offset_lo;
+       ret = file->f_op->llseek(file, tempoff, &retoff, whence);
        kref_put(&file->f_kref);
-       return ret;
+       if (ret)
+               return -1;
+       if (memcpy_to_user_errno(p, result, &retoff, sizeof(off64_t)))
+               return -1;
+       return 0;
 }
 
 intreg_t sys_link(struct proc *p, char *old_path, size_t old_l,
@@ -1197,7 +1408,7 @@ intreg_t sys_symlink(struct proc *p, char *old_path, size_t old_l,
                user_memdup_free(p, t_oldpath);
                return -1;
        }
-       ret = do_symlink(new_path, old_path, S_IRWXU | S_IRWXG | S_IRWXO);
+       ret = do_symlink(t_newpath, t_oldpath, S_IRWXU | S_IRWXG | S_IRWXO);
        user_memdup_free(p, t_oldpath);
        user_memdup_free(p, t_newpath);
        return ret;
@@ -1220,7 +1431,6 @@ intreg_t sys_readlink(struct proc *p, char *path, size_t path_l,
        copy_amt = strnlen(symname, buf_l - 1) + 1;
        if (memcpy_to_user_errno(p, u_buf, symname, copy_amt)) {
                kref_put(&path_d->d_kref);
-               set_errno(EINVAL);
                return -1;
        }
        kref_put(&path_d->d_kref);
@@ -1280,6 +1490,45 @@ intreg_t sys_rmdir(struct proc *p, const char *path, size_t path_l)
        return retval;
 }
 
+intreg_t sys_pipe(struct proc *p, int *u_pipefd, int flags)
+{
+       int pipefd[2] = {0};
+       int fd;
+       int retval = 0;
+       struct file *pipe_files[2] = {0};
+
+       if (do_pipe(pipe_files, flags))
+               return -1;
+       fd = insert_file(&p->open_files, pipe_files[0], 0);
+       if (!fd) {
+               set_errno(ENFILE);
+               goto failed_first;
+       }
+       pipefd[0] = fd;
+       fd = insert_file(&p->open_files, pipe_files[1], 0);
+       if (!fd) {
+               set_errno(ENFILE);
+               goto failed_second;
+       }
+       pipefd[1] = fd;
+       if (memcpy_to_user_errno(p, u_pipefd, pipefd, sizeof(pipefd))) {
+               set_errno(EFAULT);
+               goto failed_memcpy;
+       }
+       goto all_out;
+
+failed_memcpy:
+       put_file_from_fd(&p->open_files, pipefd[1]);
+failed_second:
+       put_file_from_fd(&p->open_files, pipefd[0]);
+failed_first:
+       retval = -1;
+all_out:
+       kref_put(&pipe_files[0]->f_kref);
+       kref_put(&pipe_files[1]->f_kref);
+       return retval;
+}
+
 intreg_t sys_gettimeofday(struct proc *p, int *buf)
 {
        static spinlock_t gtod_lock = SPINLOCK_INITIALIZER;
@@ -1288,7 +1537,7 @@ intreg_t sys_gettimeofday(struct proc *p, int *buf)
        spin_lock(&gtod_lock);
        if(t0 == 0)
 
-#if (defined __CONFIG_APPSERVER__)
+#if (defined CONFIG_APPSERVER)
        t0 = ufe(time,0,0,0,0);
 #else
        // Nanwan's birthday, bitches!!
@@ -1298,7 +1547,7 @@ intreg_t sys_gettimeofday(struct proc *p, int *buf)
 
        long long dt = read_tsc();
        /* TODO: This probably wants its own function, using a struct timeval */
-       int kbuf[2] = {t0+dt/system_timing.tsc_freq,
+       long kbuf[2] = {t0+dt/system_timing.tsc_freq,
            (dt%system_timing.tsc_freq)*1000000/system_timing.tsc_freq};
 
        return memcpy_to_user_errno(p,buf,kbuf,sizeof(kbuf));
@@ -1397,30 +1646,46 @@ const static struct sys_table_entry syscall_table[] = {
        [SYS_change_vcore] = {(syscall_t)sys_change_vcore, "change_vcore"},
        [SYS_fork] = {(syscall_t)sys_fork, "fork"},
        [SYS_exec] = {(syscall_t)sys_exec, "exec"},
-       [SYS_trywait] = {(syscall_t)sys_trywait, "trywait"},
+       [SYS_waitpid] = {(syscall_t)sys_waitpid, "waitpid"},
        [SYS_mmap] = {(syscall_t)sys_mmap, "mmap"},
        [SYS_munmap] = {(syscall_t)sys_munmap, "munmap"},
        [SYS_mprotect] = {(syscall_t)sys_mprotect, "mprotect"},
        [SYS_shared_page_alloc] = {(syscall_t)sys_shared_page_alloc, "pa"},
        [SYS_shared_page_free] = {(syscall_t)sys_shared_page_free, "pf"},
+       [SYS_provision] = {(syscall_t)sys_provision, "provision"},
        [SYS_notify] = {(syscall_t)sys_notify, "notify"},
        [SYS_self_notify] = {(syscall_t)sys_self_notify, "self_notify"},
+       [SYS_vc_entry] = {(syscall_t)sys_vc_entry, "vc_entry"},
        [SYS_halt_core] = {(syscall_t)sys_halt_core, "halt_core"},
-#ifdef __CONFIG_SERIAL_IO__
+#ifdef CONFIG_SERIAL_IO
        [SYS_serial_read] = {(syscall_t)sys_serial_read, "ser_read"},
        [SYS_serial_write] = {(syscall_t)sys_serial_write, "ser_write"},
 #endif
-#ifdef __CONFIG_NETWORKING__
+#ifdef CONFIG_NETWORKING
        [SYS_eth_read] = {(syscall_t)sys_eth_read, "eth_read"},
        [SYS_eth_write] = {(syscall_t)sys_eth_write, "eth_write"},
        [SYS_eth_get_mac_addr] = {(syscall_t)sys_eth_get_mac_addr, "get_mac"},
        [SYS_eth_recv_check] = {(syscall_t)sys_eth_recv_check, "recv_check"},
 #endif
-#ifdef __CONFIG_ARSC_SERVER__
+#ifdef CONFIG_ARSC_SERVER
        [SYS_init_arsc] = {(syscall_t)sys_init_arsc, "init_arsc"},
 #endif
        [SYS_change_to_m] = {(syscall_t)sys_change_to_m, "change_to_m"},
        [SYS_poke_ksched] = {(syscall_t)sys_poke_ksched, "poke_ksched"},
+
+// socket related syscalls
+       [SYS_socket] ={(syscall_t)sys_socket, "socket"},
+       [SYS_sendto] ={(syscall_t)sys_sendto, "sendto"},
+       [SYS_recvfrom] ={(syscall_t)sys_recvfrom, "recvfrom"},
+       [SYS_select] ={(syscall_t)sys_select, "select"},
+       [SYS_connect] = {(syscall_t)sys_connect, "connect"},
+       [SYS_send] ={(syscall_t)sys_send, "send"},
+       [SYS_recv] ={(syscall_t)sys_recv, "recvfrom"},
+       [SYS_bind] ={(syscall_t)sys_bind, "bind"},
+       [SYS_accept] ={(syscall_t)sys_accept, "accept"},
+       [SYS_listen] ={(syscall_t)sys_listen, "listen"},
+
+
        [SYS_read] = {(syscall_t)sys_read, "read"},
        [SYS_write] = {(syscall_t)sys_write, "write"},
        [SYS_open] = {(syscall_t)sys_open, "open"},
@@ -1432,7 +1697,7 @@ const static struct sys_table_entry syscall_table[] = {
        [SYS_access] = {(syscall_t)sys_access, "access"},
        [SYS_umask] = {(syscall_t)sys_umask, "umask"},
        [SYS_chmod] = {(syscall_t)sys_chmod, "chmod"},
-       [SYS_lseek] = {(syscall_t)sys_lseek, "lseek"},
+       [SYS_llseek] = {(syscall_t)sys_llseek, "llseek"},
        [SYS_link] = {(syscall_t)sys_link, "link"},
        [SYS_unlink] = {(syscall_t)sys_unlink, "unlink"},
        [SYS_symlink] = {(syscall_t)sys_symlink, "symlink"},
@@ -1441,6 +1706,7 @@ const static struct sys_table_entry syscall_table[] = {
        [SYS_getcwd] = {(syscall_t)sys_getcwd, "getcwd"},
        [SYS_mkdir] = {(syscall_t)sys_mkdir, "mkdri"},
        [SYS_rmdir] = {(syscall_t)sys_rmdir, "rmdir"},
+       [SYS_pipe] = {(syscall_t)sys_pipe, "pipe"},
        [SYS_gettimeofday] = {(syscall_t)sys_gettimeofday, "gettime"},
        [SYS_tcgetattr] = {(syscall_t)sys_tcgetattr, "tcgetattr"},
        [SYS_tcsetattr] = {(syscall_t)sys_tcsetattr, "tcsetattr"},
@@ -1467,8 +1733,8 @@ intreg_t syscall(struct proc *p, uintreg_t sc_num, uintreg_t a0, uintreg_t a1,
                        coreid = core_id();
                        vcoreid = proc_get_vcoreid(p);
                        if (systrace_flags & SYSTRACE_LOUD) {
-                               printk("[%16llu] Syscall %3d (%12s):(%08p, %08p, %08p, %08p, "
-                                      "%08p, %08p) proc: %d core: %d vcore: %d\n", read_tsc(),
+                               printk("[%16llu] Syscall %3d (%12s):(%p, %p, %p, %p, "
+                                      "%p, %p) proc: %d core: %d vcore: %d\n", read_tsc(),
                                       sc_num, syscall_table[sc_num].name, a0, a1, a2, a3,
                                       a4, a5, p->pid, coreid, vcoreid);
                        } else {
@@ -1506,13 +1772,19 @@ void run_local_syscall(struct syscall *sysc)
 
        /* TODO: (UMEM) assert / pin the memory for the sysc */
        assert(irq_is_enabled());       /* in case we proc destroy */
-       user_mem_assert(pcpui->cur_proc, sysc, sizeof(struct syscall),
-                       sizeof(uintptr_t), PTE_USER_RW);
+       /* Abort on mem check failure, for now */
+       if (!user_mem_check(pcpui->cur_proc, sysc, sizeof(struct syscall),
+                           sizeof(uintptr_t), PTE_USER_RW))
+               return;
        pcpui->cur_sysc = sysc;                 /* let the core know which sysc it is */
        sysc->retval = syscall(pcpui->cur_proc, sysc->num, sysc->arg0, sysc->arg1,
                               sysc->arg2, sysc->arg3, sysc->arg4, sysc->arg5);
        /* Need to re-load pcpui, in case we migrated */
        pcpui = &per_cpu_info[core_id()];
+       /* Some 9ns paths set errstr, but not errno.  glibc will ignore errstr.
+        * this is somewhat hacky, since errno might get set unnecessarily */
+       if ((current_errstr()[0] != 0) && (!sysc->err))
+               sysc->err = EUNSPECIFIED;
        finish_sysc(sysc, pcpui->cur_proc);
        /* Can unpin (UMEM) at this point */
        pcpui->cur_sysc = 0;    /* no longer working on sysc */
@@ -1641,8 +1913,8 @@ void systrace_print(bool all, struct proc *p)
         * timestamp and loop around.  Careful of concurrent writes. */
        for (int i = 0; i < systrace_bufsize; i++)
                if (systrace_buffer[i].timestamp)
-                       printk("[%16llu] Syscall %3d (%12s):(%08p, %08p, %08p, %08p, %08p,"
-                              "%08p) proc: %d core: %d vcore: %d\n",
+                       printk("[%16llu] Syscall %3d (%12s):(%p, %p, %p, %p, %p,"
+                              "%p) proc: %d core: %d vcore: %d\n",
                               systrace_buffer[i].timestamp,
                               systrace_buffer[i].syscallno,
                               syscall_table[systrace_buffer[i].syscallno].name,