Update libc

libc/include/stdio.h

@@ -9,6 +9,13 @@
 #define SEEK_CUR 1
 #define SEEK_END 2
 
+/**
+ * @brief EOF - End of file
+ *
+ * The value returned by several functions to indicate the end of file.
+ */
+#define EOF (-1)
+
 struct _IO_FILE
 {
     size_t offset;
@@ -26,9 +33,9 @@ extern "C"
     extern FILE *stdin;
     extern FILE *stdout;
     extern FILE *stderr;
-    #define stdin stdin
-    #define stdout stdout
-    #define stderr stderr
+#define stdin stdin
+#define stdout stdout
+#define stderr stderr
 
     FILE *fopen(const char *filename, const char *mode);
     size_t fread(void *ptr, size_t size, size_t nmemb, FILE *stream);

libc/include/string.h

@@ -19,8 +19,9 @@ extern "C"
     char *strchr(char const *s, int c);
     char *strrchr(char const *s, int c);
 
+    void *memcpy(void *dest, const void *src, size_t n);
+    void *memset(void *dest, int c, size_t n);
     void *memmove(void *dest, const void *src, size_t n);
-
 #ifdef __cplusplus
 }
 #endif

libc/src/std/io/file.c

@@ -2,10 +2,11 @@
 #include <stdlib.h>
 #include <stdarg.h>
 #include <sys/syscalls.h>
+#include <errno.h>
 
-FILE *stdin;
-FILE *stdout;
-FILE *stderr;
+FILE *stdin = NULL;
+FILE *stdout = NULL;
+FILE *stderr = NULL;
 
 FILE *fopen(const char *filename, const char *mode)
 {
@@ -20,16 +21,34 @@ FILE *fopen(const char *filename, const char *mode)
 
 size_t fread(void *ptr, size_t size, size_t nmemb, FILE *stream)
 {
+    if (ptr == NULL || stream == NULL || size == 0 || nmemb == 0)
+    {
+        errno = EINVAL;
+        return 0;
+    }
+
     return syscall4(_FileRead, (uint64_t)stream->KernelPrivate, stream->offset, (uint64_t)ptr, size * nmemb);
 }
 
 size_t fwrite(const void *ptr, size_t size, size_t nmemb, FILE *stream)
 {
+    if (ptr == NULL || stream == NULL || size == 0 || nmemb == 0)
+    {
+        errno = EINVAL;
+        return 0;
+    }
+
     return syscall4(_FileWrite, (uint64_t)stream->KernelPrivate, stream->offset, (uint64_t)ptr, size * nmemb);
 }
 
 int fclose(FILE *fp)
 {
+    if (fp == NULL)
+    {
+        errno = EINVAL;
+        return EOF;
+    }
+
     void *KP = fp->KernelPrivate;
     free(fp);
     return syscall1(_FileClose, (uint64_t)KP);
@@ -37,6 +56,12 @@ int fclose(FILE *fp)
 
 off_t fseek(FILE *stream, long offset, int whence)
 {
+    if (stream == NULL)
+    {
+        errno = EINVAL;
+        return -1;
+    }
+
     off_t new_offset = syscall3(_FileSeek, stream->KernelPrivate, offset, whence);
     if (IsSyscallError(new_offset))
         return -1;

libc/src/std/io/put.c

@@ -4,12 +4,12 @@
 
 int fputc(int c, FILE *stream)
 {
-    return syscall1(_Print, c);
+    return syscall2(_Print, c, 0);
 }
 
 int putc(int c, FILE *stream)
 {
-    return syscall1(_Print, c);
+    return syscall2(_Print, c, 0);
 }
 
 int fputs(const char *s, FILE *stream)

libc/src/std/string/memop.c

@@ -0,0 +1,344 @@
+#include <stddef.h>
+
+/* Some of the functions are from musl library */
+/* https://www.musl-libc.org/ */
+/*
+Copyright © 2005-2020 Rich Felker, et al.
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+*/
+
+void *memcpy(void *dest, const void *src, size_t n)
+{
+    unsigned char *d = dest;
+    const unsigned char *s = src;
+
+#ifdef __GNUC__
+
+#if __BYTE_ORDER == __LITTLE_ENDIAN
+#define LS >>
+#define RS <<
+#else
+#define LS <<
+#define RS >>
+#endif
+
+    typedef uint32_t __attribute__((__may_alias__)) u32;
+    uint32_t w, x;
+
+    for (; (uintptr_t)s % 4 && n; n--)
+        *d++ = *s++;
+
+    if ((uintptr_t)d % 4 == 0)
+    {
+        for (; n >= 16; s += 16, d += 16, n -= 16)
+        {
+            *(u32 *)(d + 0) = *(u32 *)(s + 0);
+            *(u32 *)(d + 4) = *(u32 *)(s + 4);
+            *(u32 *)(d + 8) = *(u32 *)(s + 8);
+            *(u32 *)(d + 12) = *(u32 *)(s + 12);
+        }
+        if (n & 8)
+        {
+            *(u32 *)(d + 0) = *(u32 *)(s + 0);
+            *(u32 *)(d + 4) = *(u32 *)(s + 4);
+            d += 8;
+            s += 8;
+        }
+        if (n & 4)
+        {
+            *(u32 *)(d + 0) = *(u32 *)(s + 0);
+            d += 4;
+            s += 4;
+        }
+        if (n & 2)
+        {
+            *d++ = *s++;
+            *d++ = *s++;
+        }
+        if (n & 1)
+        {
+            *d = *s;
+        }
+        return dest;
+    }
+
+    if (n >= 32)
+    {
+        switch ((uintptr_t)d % 4)
+        {
+        case 1:
+        {
+            w = *(u32 *)s;
+            *d++ = *s++;
+            *d++ = *s++;
+            *d++ = *s++;
+            n -= 3;
+            for (; n >= 17; s += 16, d += 16, n -= 16)
+            {
+                x = *(u32 *)(s + 1);
+                *(u32 *)(d + 0) = (w LS 24) | (x RS 8);
+                w = *(u32 *)(s + 5);
+                *(u32 *)(d + 4) = (x LS 24) | (w RS 8);
+                x = *(u32 *)(s + 9);
+                *(u32 *)(d + 8) = (w LS 24) | (x RS 8);
+                w = *(u32 *)(s + 13);
+                *(u32 *)(d + 12) = (x LS 24) | (w RS 8);
+            }
+            break;
+        }
+        case 2:
+        {
+            w = *(u32 *)s;
+            *d++ = *s++;
+            *d++ = *s++;
+            n -= 2;
+            for (; n >= 18; s += 16, d += 16, n -= 16)
+            {
+                x = *(u32 *)(s + 2);
+                *(u32 *)(d + 0) = (w LS 16) | (x RS 16);
+                w = *(u32 *)(s + 6);
+                *(u32 *)(d + 4) = (x LS 16) | (w RS 16);
+                x = *(u32 *)(s + 10);
+                *(u32 *)(d + 8) = (w LS 16) | (x RS 16);
+                w = *(u32 *)(s + 14);
+                *(u32 *)(d + 12) = (x LS 16) | (w RS 16);
+            }
+            break;
+        }
+        case 3:
+        {
+            w = *(u32 *)s;
+            *d++ = *s++;
+            n -= 1;
+            for (; n >= 19; s += 16, d += 16, n -= 16)
+            {
+                x = *(u32 *)(s + 3);
+                *(u32 *)(d + 0) = (w LS 8) | (x RS 24);
+                w = *(u32 *)(s + 7);
+                *(u32 *)(d + 4) = (x LS 8) | (w RS 24);
+                x = *(u32 *)(s + 11);
+                *(u32 *)(d + 8) = (w LS 8) | (x RS 24);
+                w = *(u32 *)(s + 15);
+                *(u32 *)(d + 12) = (x LS 8) | (w RS 24);
+            }
+            break;
+        }
+        default:
+            break;
+        }
+    }
+
+    if (n & 16)
+    {
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+    }
+
+    if (n & 8)
+    {
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+    }
+
+    if (n & 4)
+    {
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+        *d++ = *s++;
+    }
+
+    if (n & 2)
+    {
+        *d++ = *s++;
+        *d++ = *s++;
+    }
+
+    if (n & 1)
+    {
+        *d = *s;
+    }
+    return dest;
+#endif
+
+    for (; n; n--)
+        *d++ = *s++;
+    return dest;
+}
+
+void *memset(void *dest, int c, size_t n)
+{
+    unsigned char *s = dest;
+    size_t k;
+
+    if (!n)
+        return dest;
+
+    s[0] = c;
+    s[n - 1] = c;
+
+    if (n <= 2)
+        return dest;
+
+    s[1] = c;
+    s[2] = c;
+    s[n - 2] = c;
+    s[n - 3] = c;
+
+    if (n <= 6)
+        return dest;
+
+    s[3] = c;
+    s[n - 4] = c;
+
+    if (n <= 8)
+        return dest;
+
+    k = -(uintptr_t)s & 3;
+    s += k;
+    n -= k;
+    n &= -4;
+
+#ifdef __GNUC__
+    typedef uint32_t __attribute__((__may_alias__)) u32;
+    typedef uint64_t __attribute__((__may_alias__)) u64;
+
+    u32 c32 = ((u32)-1) / 255 * (unsigned char)c;
+    *(u32 *)(s + 0) = c32;
+    *(u32 *)(s + n - 4) = c32;
+
+    if (n <= 8)
+        return dest;
+
+    *(u32 *)(s + 4) = c32;
+    *(u32 *)(s + 8) = c32;
+    *(u32 *)(s + n - 12) = c32;
+    *(u32 *)(s + n - 8) = c32;
+
+    if (n <= 24)
+        return dest;
+
+    *(u32 *)(s + 12) = c32;
+    *(u32 *)(s + 16) = c32;
+    *(u32 *)(s + 20) = c32;
+    *(u32 *)(s + 24) = c32;
+    *(u32 *)(s + n - 28) = c32;
+    *(u32 *)(s + n - 24) = c32;
+    *(u32 *)(s + n - 20) = c32;
+    *(u32 *)(s + n - 16) = c32;
+
+    k = 24 + ((uintptr_t)s & 4);
+    s += k;
+    n -= k;
+
+    u64 c64 = c32 | ((u64)c32 << 32);
+    for (; n >= 32; n -= 32, s += 32)
+    {
+        *(u64 *)(s + 0) = c64;
+        *(u64 *)(s + 8) = c64;
+        *(u64 *)(s + 16) = c64;
+        *(u64 *)(s + 24) = c64;
+    }
+#else
+    for (; n; n--, s++)
+        *s = c;
+#endif
+
+    return dest;
+}
+
+void *memmove(void *dest, const void *src, size_t n)
+{
+#ifdef __GNUC__
+    typedef __attribute__((__may_alias__)) size_t WT;
+#define WS (sizeof(WT))
+#endif
+
+    char *d = dest;
+    const char *s = src;
+
+    if (d == s)
+        return d;
+
+    if ((uintptr_t)s - (uintptr_t)d - n <= -2 * n)
+        return memcpy(d, s, n);
+
+    if (d < s)
+    {
+#ifdef __GNUC__
+        if ((uintptr_t)s % WS == (uintptr_t)d % WS)
+        {
+            while ((uintptr_t)d % WS)
+            {
+                if (!n--)
+                    return dest;
+
+                *d++ = *s++;
+            }
+            for (; n >= WS; n -= WS, d += WS, s += WS)
+                *(WT *)d = *(WT *)s;
+        }
+#endif
+        for (; n; n--)
+            *d++ = *s++;
+    }
+    else
+    {
+#ifdef __GNUC__
+        if ((uintptr_t)s % WS == (uintptr_t)d % WS)
+        {
+            while ((uintptr_t)(d + n) % WS)
+            {
+                if (!n--)
+                    return dest;
+
+                d[n] = s[n];
+            }
+            while (n >= WS)
+                n -= WS, *(WT *)(d + n) = *(WT *)(s + n);
+        }
+#endif
+        while (n)
+            n--, d[n] = s[n];
+    }
+
+    return dest;
+}

libc/src/std/string/string.c

@@ -1,6 +1,6 @@
 #include <string.h>
 
-#include "../mem/liballoc_1_1.h"
+#include "../../mem/liballoc_1_1.h"
 
 size_t strlen(const char *str)
 {
@@ -123,20 +123,3 @@ char *strrchr(char const *s, int c)
 
     return (char *)s + pos;
 }
-
-void *memmove(void *dest, const void *src, size_t n)
-{
-    char *d = dest;
-    const char *s = src;
-    if (d < s)
-        while (n--)
-            *d++ = *s++;
-    else
-    {
-        const char *lasts = s + (n - 1);
-        char *lastd = d + (n - 1);
-        while (n--)
-            *lastd-- = *lasts--;
-    }
-    return dest;
-}