SYS_abort_syscall (XCC)
[akaros.git] / user / parlib / uthread.c
index 772f6ce..44093b9 100644 (file)
@@ -48,13 +48,14 @@ static void uthread_manage_thread0(struct uthread *uthread)
        uthread->state = UT_RUNNING;
        /* utf/as doesn't represent the state of the uthread (we are running) */
        uthread->flags &= ~(UTHREAD_SAVED | UTHREAD_FPSAVED);
+       /* need to track thread0 for TLS deallocation */
+       uthread->flags |= UTHREAD_IS_THREAD0;
        /* Change temporarily to vcore0s tls region so we can save the newly created
         * tcb into its current_uthread variable and then restore it.  One minor
         * issue is that vcore0's transition-TLS isn't TLS_INITed yet.  Until it is
         * (right before vcore_entry(), don't try and take the address of any of
         * its TLS vars. */
-       extern void** vcore_thread_control_blocks;
-       set_tls_desc(vcore_thread_control_blocks[0], 0);
+       set_tls_desc(get_vcpd_tls_desc(0), 0);
        /* We might have a basic uthread already installed (from slim_init), so
         * free it before installing the new one. */
        if (current_uthread)
@@ -114,6 +115,25 @@ static void scp_vcctx_ready(void)
                             old_flags & ~VC_SCP_NOVCCTX));
 }
 
+/* For both of these, VC ctx uses the usual TLS errno/errstr.  Uthreads use
+ * their own storage.  Since we're called after manage_thread0, we should always
+ * have current_uthread if we are not in vc ctx. */
+static int *__ros_errno_loc(void)
+{
+       if (in_vcore_context())
+               return __errno_location_tls();
+       else
+               return &current_uthread->err_no;
+}
+
+static char *__ros_errstr_loc(void)
+{
+       if (in_vcore_context())
+               return __errstr_location_tls();
+       else
+               return current_uthread->err_str;
+}
+
 /* Slim-init - sets up basic uthreading for when we are in _S mode and before
  * we set up the 2LS.  Some apps may not have a 2LS and thus never do the full
  * vcore/2LS/uthread init. */
@@ -134,6 +154,10 @@ void uthread_slim_init(void)
         * before blocking while an _M.  it's harmless (and probably saner) to do it
         * earlier, so we do it as early as possible. */
        ros_syscall_blockon = __ros_mcp_syscall_blockon;
+       /* Switch our errno/errstr functions to be uthread-aware.  See glibc's
+        * errno.c for more info. */
+       ros_errno_loc = __ros_errno_loc;
+       ros_errstr_loc = __ros_errstr_loc;
 }
 
 /* 2LSs shouldn't call uthread_vcore_entry directly */
@@ -314,8 +338,7 @@ void uthread_yield(bool save_state, void (*yield_func)(struct uthread*, void*),
        }
        /* Change to the transition context (both TLS (if applicable) and stack). */
        if (__uthread_has_tls(uthread)) {
-               extern void **vcore_thread_control_blocks;
-               set_tls_desc(vcore_thread_control_blocks[vcoreid], vcoreid);
+               set_tls_desc(get_vcpd_tls_desc(vcoreid), vcoreid);
                assert(current_uthread == uthread);
                assert(in_vcore_context());
        } else {
@@ -341,14 +364,24 @@ yield_return_path:
        printd("[U] Uthread %08p returning from a yield!\n", uthread);
 }
 
+/* We explicitly don't support sleep(), since old callers of it have
+ * expectations of being woken up by signal handlers.  If we need that, we can
+ * build it in to sleep() later.  If you just want to sleep for a while, call
+ * this helper. */
+void uthread_sleep(unsigned int seconds)
+{
+       sys_block(seconds * 1000000);   /* usec sleep */
+}
+
 /* Cleans up the uthread (the stuff we did in uthread_init()).  If you want to
  * destroy a currently running uthread, you'll want something like
  * pthread_exit(), which yields, and calls this from its sched_ops yield. */
 void uthread_cleanup(struct uthread *uthread)
 {
        printd("[U] thread %08p on vcore %d is DYING!\n", uthread, vcore_id());
-       /* we alloc and manage the TLS, so lets get rid of it */
-       if (__uthread_has_tls(uthread))
+       /* we alloc and manage the TLS, so lets get rid of it, except for thread0.
+        * glibc owns it.  might need to keep it around for a full exit() */
+       if (__uthread_has_tls(uthread) && !(uthread->flags & UTHREAD_IS_THREAD0))
                __uthread_free_tls(uthread);
 }
 
@@ -383,7 +416,7 @@ void __ros_mcp_syscall_blockon(struct syscall *sysc)
        /* double check before doing all this crap */
        if (atomic_read(&sysc->flags) & (SC_DONE | SC_PROGRESS))
                return;
-       /* Debugging: so we can match sysc when it tries to wake us up later */
+       /* for both debugging and syscall cancelling */
        current_uthread->sysc = sysc;
        /* yield, calling 2ls-blockon(cur_uth, sysc) on the other side */
        uthread_yield(TRUE, sched_ops->thread_blockon_sysc, sysc);
@@ -773,8 +806,8 @@ void handle_vc_preempt(struct event_msg *ev_msg, unsigned int ev_type)
        struct preempt_data *vcpd = vcpd_of(vcoreid);
        uint32_t rem_vcoreid = ev_msg->ev_arg2;
        struct preempt_data *rem_vcpd = vcpd_of(rem_vcoreid);
-       extern void **vcore_thread_control_blocks;
        struct uthread *uthread_to_steal = 0;
+       struct uthread **rem_cur_uth;
        bool cant_migrate = FALSE;
 
        assert(in_vcore_context());
@@ -831,39 +864,31 @@ void handle_vc_preempt(struct event_msg *ev_msg, unsigned int ev_type)
         * handler will bail when it fails to steal. */
        if (rem_vcpd->notif_disabled)
                goto out_stealing;
-       /* At this point, we're clear to try and steal the uthread.  Need to switch
-        * into their TLS to take their uthread */
-       vcoreid = vcore_id();   /* need to copy this out to our stack var */
-       /* We want to minimize the time we're in the remote vcore's TLS, so we peak
-        * and make the minimum changes we need, and deal with everything later. */
-       set_tls_desc(vcore_thread_control_blocks[rem_vcoreid], vcoreid);
-       if (current_uthread) {
-               if (current_uthread->flags & UTHREAD_DONT_MIGRATE) {
-                       cant_migrate = TRUE;
+       /* At this point, we're clear to try and steal the uthread.  We used to
+        * switch to their TLS to steal the uthread, but we can access their
+        * current_uthread directly. */
+       rem_cur_uth = get_cur_uth_addr(rem_vcoreid);
+       uthread_to_steal = *rem_cur_uth;
+       if (uthread_to_steal) {
+               /* Extremely rare: they have a uthread, but it can't migrate.  So we'll
+                * need to change to them. */
+               if (uthread_to_steal->flags & UTHREAD_DONT_MIGRATE) {
+                       printd("VC %d recovering %d, can't migrate uthread!\n", vcoreid,
+                              rem_vcoreid);
+                       stop_uth_stealing(rem_vcpd);
+                       change_to_vcore(vcpd, rem_vcoreid);
+                       return; /* in case it returns.  we've done our job recovering */
                } else {
-                       uthread_to_steal = current_uthread;
-                       current_uthread = 0;
+                       *rem_cur_uth = 0;
+                       /* we're clear to steal it */
+                       printd("VC %d recovering %d, uthread %08p stolen\n", vcoreid,
+                              rem_vcoreid, uthread_to_steal);
+                       __uthread_pause(rem_vcpd, uthread_to_steal, FALSE);
+                       /* can't let the cur_uth = 0 write and any writes from __uth_pause()
+                        * to pass stop_uth_stealing. */
+                       wmb();
                }
        }
-       set_tls_desc(vcore_thread_control_blocks[vcoreid], vcoreid);
-       /* Extremely rare: they have a uthread, but it can't migrate.  So we'll need
-        * to change to them. */
-       if (cant_migrate) {
-               printd("VC %d recovering %d, can't migrate uthread!\n", vcoreid,
-                      rem_vcoreid);
-               stop_uth_stealing(rem_vcpd);
-               change_to_vcore(vcpd, rem_vcoreid);
-               return; /* in case it returns.  we've done our job recovering */
-       }
-       if (!uthread_to_steal)
-               goto out_stealing;
-       /* we're clear to steal it */
-       printd("VC %d recovering %d, uthread %08p stolen\n", vcoreid, rem_vcoreid,
-              current_uthread);
-       __uthread_pause(rem_vcpd, uthread_to_steal, FALSE);
-       /* can't let the cur_uth = 0 write and any writes from __uth_pause() to
-        * pass stop_uth_stealing.  it's harmless in the cant_migrate case. */
-       wmb();
        /* Fallthrough */
 out_stealing:
        stop_uth_stealing(rem_vcpd);