SYS_abort_syscall (XCC)
[akaros.git] / user / parlib / uthread.c
index a0945d0..44093b9 100644 (file)
@@ -48,6 +48,8 @@ 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
@@ -362,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);
 }
 
@@ -404,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);