1 files changed, 277 insertions, 0 deletions
diff --git a/src/libstddjb/error_str.c b/src/libstddjb/error_str.c
new file mode 100644
index 0000000..6aca43f
--- /dev/null
+++ b/src/libstddjb/error_str.c
@@ -0,0 +1,277 @@
+/* ISC license. */
+
+#include <skalibs/config.h>
+#include <skalibs/error.h>
+
+#ifndef SKALIBS_FLAG_REPLACE_LIBC
+
+#include <string.h>
+
+char const *error_str (register int i)
+{
+  return (char const *)strerror(i) ;
+}
+
+#else
+
+#include <errno.h>
+
+#define X(e, s) case e : return s ;
+#define Y(e, s) if (i == e) return s ;
+
+char const *error_str (register int i)
+{
+    Y(EWOULDBLOCK, "input/output would block")
+    Y(EAGAIN, "temporary failure")
+    Y(EINVAL, "invalid argument")
+
+  switch (i)
+  {
+    X(0, "no error")
+    X(EINTR, "interrupted system call")
+    X(ENOMEM, "out of memory")
+    X(ENOENT, "file does not exist")
+    X(ETXTBSY, "text busy")
+    X(EIO, "input/output error")
+    X(EEXIST, "file already exists")
+    X(ETIMEDOUT, "timed out")
+    X(EINPROGRESS, "operation in progress")
+    X(EPIPE, "broken pipe")
+    X(EPERM, "permission denied")
+    X(EACCES, "access denied")
+    X(ENODEV, "device not configured")
+    X(EPROTO, "protocol error")
+    X(EISDIR, "is a directory")
+    X(ECONNREFUSED, "connection refused")
+    X(ENOTDIR, "not a directory")
+    X(ENOTSOCK, "not a socket")
+    X(EDOM, "input out of range")
+    X(ENOBUFS, "out of buffer space")
+
+#ifdef ESRCH
+    X(ESRCH, "no such process")
+#endif
+#ifdef E2BIG
+    X(E2BIG, "argument list too long")
+#endif
+#ifdef ENOEXEC
+    X(ENOEXEC, "exec format error")
+#endif
+#ifdef EBADF
+    X(EBADF, "file descriptor not open")
+#endif
+#ifdef ECHILD
+    X(ECHILD, "no child processes")
+#endif
+#ifdef EDEADLK
+    X(EDEADLK, "operation would cause deadlock")
+#endif
+#ifdef EFAULT
+    X(EFAULT, "bad address")
+#endif
+#ifdef ENOTBLK
+    X(ENOTBLK, "not a block device")
+#endif
+#ifdef EBUSY
+    X(EBUSY, "device busy")
+#endif
+#ifdef EXDEV
+    X(EXDEV, "cross-device link")
+#endif
+#ifdef ENFILE
+    X(ENFILE, "system cannot open more files")
+#endif
+#ifdef EMFILE
+    X(EMFILE, "process cannot open more files")
+#endif
+#ifdef ENOTTY
+    X(ENOTTY, "not a tty")
+#endif
+#ifdef EFBIG
+    X(EFBIG, "file too big")
+#endif
+#ifdef ENOSPC
+    X(ENOSPC, "out of disk space")
+#endif
+#ifdef ESPIPE
+    X(ESPIPE, "unseekable descriptor")
+#endif
+#ifdef EROFS
+    X(EROFS, "read-only file system")
+#endif
+#ifdef EMLINK
+    X(EMLINK, "too many links")
+#endif
+#ifdef ERANGE
+    X(ERANGE, "output out of range")
+#endif
+#ifdef EALREADY
+    X(EALREADY, "operation already in progress")
+#endif
+#ifdef EDESTADDRREQ
+    X(EDESTADDRREQ, "destination address required")
+#endif
+#ifdef EMSGSIZE
+    X(EMSGSIZE, "message too long")
+#endif
+#ifdef EPROTOTYPE
+    X(EPROTOTYPE, "incorrect protocol type")
+#endif
+#ifdef ENOPROTOOPT
+    X(ENOPROTOOPT, "protocol not available")
+#endif
+#ifdef EPROTONOSUPPORT
+    X(EPROTONOSUPPORT, "protocol not supported")
+#endif
+#ifdef ESOCKTNOSUPPORT
+    X(ESOCKTNOSUPPORT, "socket type not supported")
+#endif
+#ifdef EOPNOTSUPP
+    X(EOPNOTSUPP, "operation not supported")
+#endif
+#ifdef EPFNOSUPPORT
+    X(EPFNOSUPPORT, "protocol family not supported")
+#endif
+#ifdef EAFNOSUPPORT
+    X(EAFNOSUPPORT, "address family not supported")
+#endif
+#ifdef EADDRINUSE
+    X(EADDRINUSE, "address already used")
+#endif
+#ifdef EADDRNOTAVAIL
+    X(EADDRNOTAVAIL, "address not available")
+#endif
+#ifdef ENETDOWN
+    X(ENETDOWN, "network down")
+#endif
+#ifdef ENETUNREACH
+    X(ENETUNREACH, "network unreachable")
+#endif
+#ifdef ENETRESET
+    X(ENETRESET, "network reset")
+#endif
+#ifdef ECONNABORTED
+    X(ECONNABORTED, "connection aborted")
+#endif
+#ifdef ECONNRESET
+    X(ECONNRESET, "connection reset")
+#endif
+#ifdef EISCONN
+    X(EISCONN, "already connected")
+#endif
+#ifdef ENOTCONN
+    X(ENOTCONN, "not connected")
+#endif
+#ifdef ESHUTDOWN
+    X(ESHUTDOWN, "socket shut down")
+#endif
+#ifdef ETOOMANYREFS
+    X(ETOOMANYREFS, "too many references")
+#endif
+#ifdef ELOOP
+    X(ELOOP, "symbolic link loop")
+#endif
+#ifdef ENAMETOOLONG
+    X(ENAMETOOLONG, "file name too long")
+#endif
+#ifdef EHOSTDOWN
+    X(EHOSTDOWN, "host down")
+#endif
+#ifdef EHOSTUNREACH
+    X(EHOSTUNREACH, "host unreachable")
+#endif
+#ifdef ENOTEMPTY
+    X(ENOTEMPTY, "directory not empty")
+#endif
+#ifdef EPROCLIM
+    X(EPROCLIM, "too many processes")
+#endif
+#ifdef EUSERS
+    X(EUSERS, "too many users")
+#endif
+#ifdef EDQUOT
+    X(EDQUOT, "disk quota exceeded")
+#endif
+#ifdef ESTALE
+    X(ESTALE, "stale NFS file handle")
+#endif
+#ifdef EREMOTE
+    X(EREMOTE, "too many levels of remote in path")
+#endif
+#ifdef EBADRPC
+    X(EBADRPC, "RPC structure is bad")
+#endif
+#ifdef ERPCMISMATCH
+    X(ERPCMISMATCH, "RPC version mismatch")
+#endif
+#ifdef EPROGUNAVAIL
+    X(EPROGUNAVAIL, "RPC program unavailable")
+#endif
+#ifdef EPROGMISMATCH
+    X(EPROGMISMATCH, "program version mismatch")
+#endif
+#ifdef EPROCUNAVAIL
+    X(EPROCUNAVAIL, "bad procedure for program")
+#endif
+#ifdef ENOLCK
+    X(ENOLCK, "no locks available")
+#endif
+#ifdef ENOSYS
+    X(ENOSYS, "system call not available")
+#endif
+#ifdef EFTYPE
+    X(EFTYPE, "bad file type")
+#endif
+#ifdef EAUTH
+    X(EAUTH, "authentication error")
+#endif
+#ifdef ENEEDAUTH
+    X(ENEEDAUTH, "not authenticated")
+#endif
+#ifdef ENOSTR
+    X(ENOSTR, "not a stream device")
+#endif
+#ifdef ETIME
+    X(ETIME, "timer expired")
+#endif
+#ifdef ENOSR
+    X(ENOSR, "out of stream resources")
+#endif
+#ifdef ENOMSG
+    X(ENOMSG, "no message of desired type")
+#endif
+#ifdef EBADMSG
+    X(EBADMSG, "bad message type")
+#endif
+#ifdef EIDRM
+    X(EIDRM, "identifier removed")
+#endif
+#ifdef ENONET
+    X(ENONET, "machine not on network")
+#endif
+#ifdef ERREMOTE
+    X(ERREMOTE, "object not local")
+#endif
+#ifdef ENOLINK
+    X(ENOLINK, "link severed")
+#endif
+#ifdef EADV
+    X(EADV, "advertise error")
+#endif
+#ifdef ESRMNT
+    X(ESRMNT, "srmount error")
+#endif
+#ifdef ECOMM
+    X(ECOMM, "communication error")
+#endif
+#ifdef EMULTIHOP
+    X(EMULTIHOP, "multihop attempted")
+#endif
+#ifdef EREMCHG
+    X(EREMCHG, "remote address changed")
+#endif
+    default : return "unknown error" ;
+  }
+}
+
+#endif