Changes in uspace/lib/c/generic/stdlib.c [c718bda:7d7bc09] in mainline

File:

• uspace/lib/c/generic/stdlib.c (modified) (3 diffs)

uspace/lib/c/generic/stdlib.c

@@ -1 +1 @@
 /*
  * Copyright (c) 2006 Ondrej Palkovsky
+ * Copyright (c) 2018 Jiri Svoboda
  * All rights reserved.
  *
@@ -33 +34 @@
  */
 
+#include <adt/list.h>
+#include <fibril_synch.h>
 #include <stdlib.h>
+#include "private/libc.h"
+#include "private/stdlib.h"
 
 static int glbl_seed = 1;
 
+static LIST_INITIALIZE(exit_handlers);
+static FIBRIL_MUTEX_INITIALIZE(exit_handlers_lock);
+
+static LIST_INITIALIZE(quick_exit_handlers);
+static FIBRIL_MUTEX_INITIALIZE(quick_exit_handlers_lock);
+
+
 int rand(void)
 {
@@ -47 +59 @@
 }
 
+/** Register exit handler.
+ *
+ * @param func Function to be called during program terimnation
+ * @return Zero on success, nonzero on failure
+ */
+int atexit(void (*func)(void))
+{
+        __exit_handler_t *entry;
+
+        entry = malloc(sizeof(__exit_handler_t));
+        if (entry == NULL)
+                return -1;
+
+        entry->func = func;
+
+        fibril_mutex_lock(&exit_handlers_lock);
+        list_prepend(&entry->llist, &exit_handlers);
+        fibril_mutex_unlock(&exit_handlers_lock);
+        return 0;
+}
+
+/** Terminate program with exit status.
+ *
+ * @param status Exit status
+ */
+void exit(int status)
+{
+        link_t *link;
+        __exit_handler_t *eh;
+
+        /* Call exit handlers */
+        fibril_mutex_lock(&exit_handlers_lock);
+        while (!list_empty(&exit_handlers)) {
+                link = list_first(&exit_handlers);
+                list_remove(link);
+                fibril_mutex_unlock(&exit_handlers_lock);
+
+                eh = list_get_instance(link, __exit_handler_t, llist);
+                eh->func();
+                free(eh);
+                fibril_mutex_lock(&exit_handlers_lock);
+        }
+
+        fibril_mutex_unlock(&exit_handlers_lock);
+
+        _Exit(status);
+}
+
+/** Register quick exit handler.
+ *
+ * @param func Function to be called during quick program terimnation
+ * @return Zero on success, nonzero on failure
+ */
+int at_quick_exit(void (*func)(void))
+{
+        __exit_handler_t *entry;
+
+        entry = malloc(sizeof(__exit_handler_t));
+        if (entry == NULL)
+                return -1;
+
+        entry->func = func;
+
+        fibril_mutex_lock(&exit_handlers_lock);
+        list_prepend(&entry->llist, &exit_handlers);
+        fibril_mutex_unlock(&exit_handlers_lock);
+        return 0;
+}
+
+/** Quickly terminate program with exit status.
+ *
+ * @param status Exit status
+ */
+void quick_exit(int status)
+{
+        link_t *link;
+        __exit_handler_t *eh;
+
+        /* Call quick exit handlers */
+        fibril_mutex_lock(&quick_exit_handlers_lock);
+        while (!list_empty(&quick_exit_handlers)) {
+                link = list_first(&quick_exit_handlers);
+                list_remove(link);
+                fibril_mutex_unlock(&quick_exit_handlers_lock);
+
+                eh = list_get_instance(link, __exit_handler_t, llist);
+                eh->func();
+                free(eh);
+                fibril_mutex_lock(&quick_exit_handlers_lock);
+        }
+
+        fibril_mutex_unlock(&quick_exit_handlers_lock);
+
+        _Exit(status);
+}
+
+void _Exit(int status)
+{
+        __libc_exit(status);
+}
+
+/** Abnormal program termination */
+void abort(void)
+{
+        __libc_abort();
+}
+
+/** Get environment list entry.
+ *
+ * Note that this function is not reentrant. The returned string is only
+ * guaranteed to be valid until the next call to @c getenv.
+ *
+ * @param name Entry name
+ * @return Pointer to string or @c NULL if not found
+ */
+char *getenv(const char *name)
+{
+        (void) name;
+        return NULL;
+}
+
+/** Execute command.
+ *
+ * @param string Command to execute or @c NULL
+ *
+ * @return If @a string is @c NULL, return zero (no command processor
+ *         available). If @a string is not @c NULL, return 1 (failure).
+ */
+int system(const char *string)
+{
+        if (string == NULL)
+                return 0;
+
+        return 1;
+}
+
+/** Compute the absolute value of an integer.
+ *
+ * If the result cannot be represented, the behavior is undefined.
+ *
+ * @param j Integer
+ * @return The absolute value of @a j
+ */
+int abs(int j)
+{
+        int aj;
+
+        if (j < 0) {
+                aj = -j;
+                assert(aj >= 0);
+        } else {
+                aj = j;
+        }
+
+        return aj;
+}
+
+/** Compute the absolute value of a long integer.
+ *
+ * If the result cannot be represented, the behavior is undefined.
+ *
+ * @param j Long integer
+ * @return The absolute value of @a j
+ */
+long labs(long j)
+{
+        long aj;
+
+        if (j < 0) {
+                aj = -j;
+                assert(aj >= 0);
+        } else {
+                aj = j;
+        }
+
+        return aj;
+}
+
+/** Compute the absolute value of a long long integer.
+ *
+ * If the result cannot be represented, the behavior is undefined.
+ *
+ * @param j Long long integer
+ * @return The absolute value of @a j
+ */
+long long llabs(long long j)
+{
+        long long aj;
+
+        if (j < 0) {
+                aj = -j;
+                assert(aj >= 0);
+        } else {
+                aj = j;
+        }
+
+        return aj;
+}
+
+/** Compute quotient and remainder of int division.
+ *
+ * @param numer Numerator
+ * @param denom Denominator
+ * @return Structure containing quotient and remainder
+ */
+div_t div(int numer, int denom)
+{
+        div_t d;
+
+        d.quot = numer / denom;
+        d.rem = numer % denom;
+
+        return d;
+}
+
+/** Compute quotient and remainder of long division.
+ *
+ * @param numer Numerator
+ * @param denom Denominator
+ * @return Structure containing quotient and remainder
+ */
+ldiv_t ldiv(long numer, long denom)
+{
+        ldiv_t d;
+
+        d.quot = numer / denom;
+        d.rem = numer % denom;
+
+        return d;
+}
+
+/** Compute quotient and remainder of long long division.
+ *
+ * @param numer Numerator
+ * @param denom Denominator
+ * @return Structure containing quotient and remainder
+ */
+lldiv_t lldiv(long long numer, long long denom)
+{
+        lldiv_t d;
+
+        d.quot = numer / denom;
+        d.rem = numer % denom;
+
+        return d;
+}
+
 /** @}
  */