VMRs that map page_maps are tracked
[akaros.git] / kern / src / syscall.c
index 3c63eef..40a29aa 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)
@@ -87,9 +88,9 @@ static void finish_sysc(struct syscall *sysc, struct proc *p)
 static void finish_current_sysc(int retval)
 {
        struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
-       assert(pcpui->cur_sysc);
-       pcpui->cur_sysc->retval = retval;
-       finish_sysc(pcpui->cur_sysc, pcpui->cur_proc);
+       assert(pcpui->cur_kthread->sysc);
+       pcpui->cur_kthread->sysc->retval = retval;
+       finish_sysc(pcpui->cur_kthread->sysc, pcpui->cur_proc);
 }
 
 /* Callable by any function while executing a syscall (or otherwise, actually).
@@ -97,8 +98,58 @@ static void finish_current_sysc(int retval)
 void set_errno(int errno)
 {
        struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
-       if (pcpui->cur_sysc)
-               pcpui->cur_sysc->err = errno;
+       if (pcpui->cur_kthread && pcpui->cur_kthread->sysc)
+               pcpui->cur_kthread->sysc->err = errno;
+}
+
+void unset_errno(void)
+{
+       struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
+       if (!pcpui->cur_kthread || !pcpui->cur_kthread->sysc)
+               return;
+       pcpui->cur_kthread->sysc->err = 0;
+       pcpui->cur_kthread->sysc->errstr[0] = '\0';
+}
+
+void set_errstr(char *fmt, ...)
+{
+       va_list ap;
+       int rc;
+       struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
+       if (!pcpui->cur_kthread || !pcpui->cur_kthread->sysc)
+               return;
+       va_start(ap, fmt);
+       rc = vsnprintf(pcpui->cur_kthread->sysc->errstr, MAX_ERRSTR_LEN, fmt, ap);
+       va_end(ap);
+       /* TODO: likely not needed */
+       pcpui->cur_kthread->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_kthread->sysc);
+       return pcpui->cur_kthread->sysc->errstr;
+}
+
+struct errbuf *get_cur_errbuf(void)
+{
+       struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
+       return (struct errbuf*)pcpui->cur_kthread->errbuf;
+}
+
+void set_cur_errbuf(struct errbuf *ebuf)
+{
+       struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
+       pcpui->cur_kthread->errbuf = ebuf;
+}
+
+char *get_cur_genbuf(void)
+{
+       struct per_cpu_info *pcpui = &per_cpu_info[core_id()];
+       assert(pcpui->cur_kthread);
+       return pcpui->cur_kthread->generic_buf;
 }
 
 /************** Utility Syscalls **************/
@@ -200,7 +251,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;
@@ -272,6 +323,7 @@ static int sys_proc_create(struct proc *p, char *path, size_t path_l,
        t_path = user_strdup_errno(p, path, path_l);
        if (!t_path)
                return -1;
+       /* TODO: 9ns support */
        program = do_file_open(t_path, 0, 0);
        user_memdup_free(p, t_path);
        if (!program)
@@ -372,8 +424,8 @@ static int sys_proc_yield(struct proc *p, bool being_nice)
        /* proc_yield() often doesn't return - we need to set the syscall retval
         * early.  If it doesn't return, it expects to eat our reference (for now).
         */
-       finish_sysc(pcpui->cur_sysc, pcpui->cur_proc);
-       pcpui->cur_sysc = 0;    /* don't touch sysc again */
+       finish_sysc(pcpui->cur_kthread->sysc, pcpui->cur_proc);
+       pcpui->cur_kthread->sysc = 0;   /* don't touch sysc again */
        proc_incref(p, 1);
        proc_yield(p, being_nice);
        proc_decref(p);
@@ -405,13 +457,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();
@@ -441,7 +493,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
@@ -489,24 +541,25 @@ 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: */
+       /* TODO: 9ns support */
        program = do_file_open(t_path, 0, 0);
        user_memdup_free(p, t_path);
        if (!program)
@@ -519,11 +572,13 @@ 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
-       destroy_vmrs(p);
+       /* When we destroy our memory regions, accessing cur_sysc would PF */
+       pcpui->cur_kthread->sysc = 0;
+       unmap_and_destroy_vmrs(p);
        close_all_files(&p->open_files, TRUE);
        env_user_mem_free(p, 0, UMAPTOP);
        if (load_elf(p, program)) {
@@ -579,8 +634,13 @@ static pid_t try_wait(struct proc *parent, struct proc *child, int *ret_status,
                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. */
-               *ret_status = child->exitcode;
+                * 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;
@@ -646,8 +706,8 @@ out_unlock:
 
 /* 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 0 if there are no children to wait on, or if we
- * needed to block but WNOHANG was set. */
+ * 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;
@@ -664,11 +724,8 @@ static pid_t wait_any(struct proc *parent, int *ret_status, int options)
                 * scan.  If we have a lot of children, we could optimize this. */
                retval = try_wait_any(parent, ret_status, options);
        }
-       if (retval == -1) {
-               /* unable to wait (no children) */
-               retval = 0;
+       if (retval == -1)
                assert(TAILQ_EMPTY(&parent->children));
-       }
        /* Fallthrough */
 out_unlock:
        cv_unlock(&parent->child_wait);
@@ -714,10 +771,10 @@ out_decref:
        proc_decref(child);
 out:
        /* ignoring / don't care about memcpy's retval here. */
-       if (retval > 0)
+       if (status)
                memcpy_to_user(parent, status, &ret_status, sizeof(ret_status));
-       printd("[PID %d] waited for PID %d, got retval %d (code %d)\n", parent->pid,
-              pid, retval, ret_status);
+       printd("[PID %d] waited for PID %d, got retval %d (status 0x%x)\n",
+              parent->pid, pid, retval, ret_status);
        return retval;
 }
 
@@ -753,6 +810,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,
@@ -785,15 +879,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))) {
@@ -803,12 +895,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
@@ -852,13 +959,41 @@ 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;
+}
+
+static int sys_abort_sysc(struct proc *p, struct syscall *sysc)
+{
+       return abort_sysc(p, sysc);
 }
 
 /************** Platform Specific Syscalls **************/
@@ -870,7 +1005,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;
@@ -890,7 +1025,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]);
@@ -900,7 +1035,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)
 {
@@ -1106,7 +1241,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);
@@ -1139,7 +1273,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);
@@ -1205,6 +1338,7 @@ static intreg_t sys_access(struct proc *p, const char *path, size_t path_l,
        char *t_path = user_strdup_errno(p, path, path_l);
        if (!t_path)
                return -1;
+       /* TODO: 9ns support */
        retval = do_access(t_path, mode);
        user_memdup_free(p, t_path);
        printd("Access for path: %s retval: %d\n", path, retval);
@@ -1228,6 +1362,7 @@ intreg_t sys_chmod(struct proc *p, const char *path, size_t path_l, int mode)
        char *t_path = user_strdup_errno(p, path, path_l);
        if (!t_path)
                return -1;
+       /* TODO: 9ns support */
        retval = do_chmod(t_path, mode);
        user_memdup_free(p, t_path);
        if (retval < 0) {
@@ -1237,17 +1372,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,
@@ -1274,6 +1422,7 @@ intreg_t sys_unlink(struct proc *p, const char *path, size_t path_l)
        char *t_path = user_strdup_errno(p, path, path_l);
        if (!t_path)
                return -1;
+       /* TODO: 9ns support */
        retval = do_unlink(t_path);
        user_memdup_free(p, t_path);
        return retval;
@@ -1291,7 +1440,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;
@@ -1306,6 +1455,7 @@ intreg_t sys_readlink(struct proc *p, char *path, size_t path_l,
        char *t_path = user_strdup_errno(p, path, path_l);
        if (t_path == NULL)
                return -1;
+       /* TODO: 9ns support */
        path_d = lookup_dentry(t_path, 0);
        user_memdup_free(p, t_path);
        if (!path_d)
@@ -1314,7 +1464,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);
@@ -1328,6 +1477,7 @@ intreg_t sys_chdir(struct proc *p, const char *path, size_t path_l)
        char *t_path = user_strdup_errno(p, path, path_l);
        if (!t_path)
                return -1;
+       /* TODO: 9ns support */
        retval = do_chdir(&p->fs_env, t_path);
        user_memdup_free(p, t_path);
        if (retval) {
@@ -1358,6 +1508,7 @@ intreg_t sys_mkdir(struct proc *p, const char *path, size_t path_l, int mode)
        if (!t_path)
                return -1;
        mode &= ~p->fs_env.umask;
+       /* TODO: 9ns support */
        retval = do_mkdir(t_path, mode);
        user_memdup_free(p, t_path);
        return retval;
@@ -1369,11 +1520,51 @@ intreg_t sys_rmdir(struct proc *p, const char *path, size_t path_l)
        char *t_path = user_strdup_errno(p, path, path_l);
        if (!t_path)
                return -1;
+       /* TODO: 9ns support */
        retval = do_rmdir(t_path);
        user_memdup_free(p, t_path);
        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;
@@ -1382,7 +1573,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!!
@@ -1392,7 +1583,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));
@@ -1497,24 +1688,28 @@ const static struct sys_table_entry syscall_table[] = {
        [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"},
+       [SYS_abort_sysc] = {(syscall_t)sys_abort_sysc, "abort_sysc"},
+
        [SYS_read] = {(syscall_t)sys_read, "read"},
        [SYS_write] = {(syscall_t)sys_write, "write"},
        [SYS_open] = {(syscall_t)sys_open, "open"},
@@ -1526,7 +1721,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"},
@@ -1535,6 +1730,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"},
@@ -1561,8 +1757,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 {
@@ -1600,16 +1796,22 @@ 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);
-       pcpui->cur_sysc = sysc;                 /* let the core know which sysc it is */
+       /* 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_kthread->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 */
+       pcpui->cur_kthread->sysc = 0;   /* no longer working on sysc */
 }
 
 /* A process can trap and call this function, which will set up the core to
@@ -1735,8 +1937,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,