mescc: Mes C Library: Explode linux/gnu.c.
authorJan Nieuwenhuizen <janneke@gnu.org>
Sat, 11 May 2019 22:33:33 +0000 (00:33 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Sat, 11 May 2019 22:33:33 +0000 (00:33 +0200)
* lib/linux/chdir.c: New file.
* lib/linux/fcntl.c: New file.
* lib/linux/fstat.c: New file.
* lib/linux/getdents.c: New file.
* lib/linux/getegid.c: New file.
* lib/linux/geteuid.c: New file.
* lib/linux/getgid.c: New file.
* lib/linux/getpid.c: New file.
* lib/linux/getppid.c: New file.
* lib/linux/getrusage.c: New file.
* lib/linux/getuid.c: New file.
* lib/linux/kill.c: New file.
* lib/linux/link.c: New file.
* lib/linux/lstat.c: New file.
* lib/linux/mkdir.c: New file.
* lib/linux/nanosleep.c: New file.
* lib/linux/pipe.c: New file.
* lib/linux/rename.c: New file.
* lib/linux/setgid.c: New file.
* lib/linux/settimer.c: New file.
* lib/linux/setuid.c: New file.
* lib/linux/signal.c: New file.
* lib/linux/sigprogmask.c: New file.
* lib/linux/gnu.c: Include them.
(chdir, fcntl, fstat, getdents, getegid, geteuid, getgid, getpid,
getppid, getrusage, getuid, kill, link, lstat, mkdir, munmap,
nanosleep, pipe, rename, setgid, settimer, setuid, signal,
sigprogmask): Remove.

25 files changed:
lib/libc+gnu.c
lib/linux/chdir.c [new file with mode: 0644]
lib/linux/fcntl.c [new file with mode: 0644]
lib/linux/fstat.c [new file with mode: 0644]
lib/linux/getdents.c [new file with mode: 0644]
lib/linux/getegid.c [new file with mode: 0644]
lib/linux/geteuid.c [new file with mode: 0644]
lib/linux/getgid.c [new file with mode: 0644]
lib/linux/getpid.c [new file with mode: 0644]
lib/linux/getppid.c [new file with mode: 0644]
lib/linux/getrusage.c [new file with mode: 0644]
lib/linux/getuid.c [new file with mode: 0644]
lib/linux/gnu.c
lib/linux/kill.c [new file with mode: 0644]
lib/linux/link.c [new file with mode: 0644]
lib/linux/lstat.c [new file with mode: 0644]
lib/linux/mkdir.c [new file with mode: 0644]
lib/linux/nanosleep.c [new file with mode: 0644]
lib/linux/pipe.c [new file with mode: 0644]
lib/linux/rename.c [new file with mode: 0644]
lib/linux/setgid.c [new file with mode: 0644]
lib/linux/settimer.c [new file with mode: 0644]
lib/linux/setuid.c [new file with mode: 0644]
lib/linux/signal.c [new file with mode: 0644]
lib/linux/sigprogmask.c [new file with mode: 0644]

index e9095a19a685c7a09383a10fe6cbd1c347a51109..9f533e17b5e7c97ce5cbf320848743a42012305f 100644 (file)
@@ -21,7 +21,7 @@
 #include <libc+tcc.c>
 
 #if __GNU__
-#include <linux/gnu.c>
+#error TODO, see wip-hurd
 #elif __linux__
 #include <linux/gnu.c>
 #else
diff --git a/lib/linux/chdir.c b/lib/linux/chdir.c
new file mode 100644 (file)
index 0000000..43d522c
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+chdir (char const *file_name)
+{
+  return _sys_call1 (SYS_chdir, (long)file_name);
+}
diff --git a/lib/linux/fcntl.c b/lib/linux/fcntl.c
new file mode 100644 (file)
index 0000000..3fb291b
--- /dev/null
@@ -0,0 +1,30 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+fcntl (int filedes, int command, ...)
+{
+  va_list ap;
+  va_start (ap, command);
+  int data = va_arg (ap, int);
+  int r = _sys_call3 (SYS_fcntl, (int)filedes, (int)command, (int)data);
+  va_end (ap);
+  return r;
+}
diff --git a/lib/linux/fstat.c b/lib/linux/fstat.c
new file mode 100644 (file)
index 0000000..48aabca
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+fstat (int filedes, struct stat *statbuf)
+{
+  return _sys_call2 (SYS_fstat, (int)filedes, (long)statbuf);
+}
diff --git a/lib/linux/getdents.c b/lib/linux/getdents.c
new file mode 100644 (file)
index 0000000..e4b1dda
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+getdents (int filedes, char *buffer, size_t nbytes)
+{
+  return _sys_call3 (SYS_getdents, (int)filedes, (long)buffer, (long)nbytes);
+}
diff --git a/lib/linux/getegid.c b/lib/linux/getegid.c
new file mode 100644 (file)
index 0000000..a813c0a
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+gid_t
+getegid ()
+{
+  return _sys_call (SYS_getegid);
+}
diff --git a/lib/linux/geteuid.c b/lib/linux/geteuid.c
new file mode 100644 (file)
index 0000000..e4d198b
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+uid_t
+geteuid ()
+{
+  return _sys_call (SYS_geteuid);
+}
diff --git a/lib/linux/getgid.c b/lib/linux/getgid.c
new file mode 100644 (file)
index 0000000..c8b6183
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+gid_t
+getgid ()
+{
+  return _sys_call (SYS_getgid);
+}
diff --git a/lib/linux/getpid.c b/lib/linux/getpid.c
new file mode 100644 (file)
index 0000000..3b30a4e
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+pid_t
+getpid ()
+{
+  return _sys_call (SYS_getpid);
+}
diff --git a/lib/linux/getppid.c b/lib/linux/getppid.c
new file mode 100644 (file)
index 0000000..82b0feb
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+pid_t
+getppid ()
+{
+  return _sys_call (SYS_getppid);
+}
diff --git a/lib/linux/getrusage.c b/lib/linux/getrusage.c
new file mode 100644 (file)
index 0000000..56aaf20
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+getrusage (int processes, struct rusage *rusage)
+{
+  return _sys_call2 (SYS_getrusage, (int)processes, (long)rusage);
+}
diff --git a/lib/linux/getuid.c b/lib/linux/getuid.c
new file mode 100644 (file)
index 0000000..5bbe5ed
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+uid_t
+getuid ()
+{
+  return _sys_call (SYS_getuid);
+}
index 325eb247cc4f9a4fb6d3ea9371654f726dfecaaa..9cd01695dc2f9d2cf07f3aecc6fb8d2a2e08859c 100644 (file)
  * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
  */
 
-#include <sys/resource.h>
-#include <time.h>
-
-int
-link (char const *old_name, char const *new_name)
-{
-  return _sys_call2 (SYS_link, (long)old_name, (long)new_name);
-}
-
-pid_t
-getpid ()
-{
-  return _sys_call (SYS_getpid);
-}
-
-uid_t
-getuid ()
-{
-  return _sys_call (SYS_getuid);
-}
-
-int
-kill (pid_t pid, int signum)
-{
-  return _sys_call2 (SYS_kill, (long)pid, (long)signum);
-}
-
-int
-rename (char const *old_name, char const *new_name)
-{
-  return _sys_call2 (SYS_rename, (long)old_name, (long)new_name);
-}
-
-int
-mkdir (char const *file_name, mode_t mode)
-{
-  return _sys_call2 (SYS_mkdir, (long)file_name, (long)mode);
-}
-
-gid_t
-getgid ()
-{
-  return _sys_call (SYS_getgid);
-}
-
-#if __x86_64__
-void
-_restorer (void)
-{
-  _sys_call (SYS_rt_sigreturn);
-}
-#endif
-
-# define __sigmask(sig) \
-  (((unsigned long int) 1) << (((sig) - 1) % (8 * sizeof (unsigned long int))))
-
-sighandler_t
-signal (int signum, sighandler_t action)
-{
-#if __i386__
-  return _sys_call2 (SYS_signal, signum, action);
-#else
-  static struct sigaction setup_action = {-1};
-  static struct sigaction old = {0};
-
-  setup_action.sa_handler = action;
-  setup_action.sa_restorer = _restorer;
-  setup_action.sa_mask = __sigmask (signum);
-  old.sa_handler = SIG_DFL;
-  setup_action.sa_flags = SA_RESTORER | SA_RESTART;
-  int r = _sys_call4 (SYS_rt_sigaction, signum, &setup_action, &old, sizeof (sigset_t));
-  if (r)
-    return 0;
-  return old.sa_handler;
-#endif
-}
-
-int
-fcntl (int filedes, int command, ...)
-{
-  va_list ap;
-  va_start (ap, command);
-  int data = va_arg (ap, int);
-  int r = _sys_call3 (SYS_fcntl, (int)filedes, (int)command, (int)data);
-  va_end (ap);
-  return r;
-}
-
-int
-pipe (int filedes[2])
-{
-  return _sys_call1 (SYS_pipe, (long)filedes);
-}
-
-int
-getrusage (int processes, struct rusage *rusage)
-{
-  return _sys_call2 (SYS_getrusage, (int)processes, (long)rusage);
-}
-
-int
-lstat (char const *file_name, struct stat *statbuf)
-{
-  return _sys_call2 (SYS_lstat, (long)file_name, (long)statbuf);
-}
-
-int
-nanosleep (const struct timespec *requested_time,
-           struct timespec *remaining)
-{
-  return _sys_call2 (SYS_nanosleep, (long)requested_time, (long)remaining);
-}
-
-int
-setitimer (int which, struct itimerval const *new,
-          struct itimerval *old)
-{
-  return _sys_call3 (SYS_setitimer, (long)which, (long)new, (long)old);
-}
-
-int
-fstat (int filedes, struct stat *statbuf)
-{
-  return _sys_call2 (SYS_fstat, (int)filedes, (long)statbuf);
-}
-
-int
-getdents (int filedes, char *buffer, size_t nbytes)
-{
-  return _sys_call3 (SYS_getdents, (int)filedes, (long)buffer, (long)nbytes);
-}
-
-int
-chdir (char const *file_name)
-{
-  return _sys_call1 (SYS_chdir, (long)file_name);
-}
-
-// bash
-uid_t
-geteuid ()
-{
-  return _sys_call (SYS_geteuid);
-}
-
-gid_t
-getegid ()
-{
-  return _sys_call (SYS_getegid);
-}
-
-pid_t
-getppid ()
-{
-  return _sys_call (SYS_getppid);
-}
-
-int
-setuid (uid_t newuid)
-{
-  return _sys_call1 (SYS_setuid, (long)newuid);
-}
-
-int
-setgid (gid_t newgid)
-{
-  return _sys_call1 (SYS_setgid, (long)newgid);
-}
-
-// make+POSIX
-int
-sigprocmask (int how, sigset_t const *set, sigset_t *oldset)
-{
-#if __i386__
-  return _sys_call3 (SYS_sigprocmask, (long)how, (long)set, (long)oldset);
-#else
-  return _sys_call3 (SYS_rt_sigprocmask, (long)how, (long)set, (long)oldset);
-#endif
-}
+#include <linux/chdir.c>
+#include <linux/fcntl.c>
+#include <linux/fstat.c>
+#include <linux/getdents.c>
+#include <linux/getegid.c>
+#include <linux/geteuid.c>
+#include <linux/getgid.c>
+#include <linux/getpid.c>
+#include <linux/getppid.c>
+#include <linux/getrusage.c>
+#include <linux/getuid.c>
+#include <linux/kill.c>
+#include <linux/link.c>
+#include <linux/lstat.c>
+#include <linux/mkdir.c>
+#include <linux/nanosleep.c>
+#include <linux/pipe.c>
+#include <linux/rename.c>
+#include <linux/setgid.c>
+#include <linux/settimer.c>
+#include <linux/setuid.c>
+#include <linux/signal.c>
+#include <linux/sigprogmask.c>
diff --git a/lib/linux/kill.c b/lib/linux/kill.c
new file mode 100644 (file)
index 0000000..4aeeeeb
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+kill (pid_t pid, int signum)
+{
+  return _sys_call2 (SYS_kill, (long)pid, (long)signum);
+}
diff --git a/lib/linux/link.c b/lib/linux/link.c
new file mode 100644 (file)
index 0000000..7d9893b
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+link (char const *old_name, char const *new_name)
+{
+  return _sys_call2 (SYS_link, (long)old_name, (long)new_name);
+}
diff --git a/lib/linux/lstat.c b/lib/linux/lstat.c
new file mode 100644 (file)
index 0000000..c3ca9cb
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+lstat (char const *file_name, struct stat *statbuf)
+{
+  return _sys_call2 (SYS_lstat, (long)file_name, (long)statbuf);
+}
diff --git a/lib/linux/mkdir.c b/lib/linux/mkdir.c
new file mode 100644 (file)
index 0000000..1f5a1af
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+mkdir (char const *file_name, mode_t mode)
+{
+  return _sys_call2 (SYS_mkdir, (long)file_name, (long)mode);
+}
diff --git a/lib/linux/nanosleep.c b/lib/linux/nanosleep.c
new file mode 100644 (file)
index 0000000..f5c02b4
--- /dev/null
@@ -0,0 +1,26 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+nanosleep (const struct timespec *requested_time,
+           struct timespec *remaining)
+{
+  return _sys_call2 (SYS_nanosleep, (long)requested_time, (long)remaining);
+}
diff --git a/lib/linux/pipe.c b/lib/linux/pipe.c
new file mode 100644 (file)
index 0000000..ba51066
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+pipe (int filedes[2])
+{
+  return _sys_call1 (SYS_pipe, (long)filedes);
+}
diff --git a/lib/linux/rename.c b/lib/linux/rename.c
new file mode 100644 (file)
index 0000000..56a8a5b
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+rename (char const *old_name, char const *new_name)
+{
+  return _sys_call2 (SYS_rename, (long)old_name, (long)new_name);
+}
diff --git a/lib/linux/setgid.c b/lib/linux/setgid.c
new file mode 100644 (file)
index 0000000..9b11e0a
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+setgid (gid_t newgid)
+{
+  return _sys_call1 (SYS_setgid, (long)newgid);
+}
diff --git a/lib/linux/settimer.c b/lib/linux/settimer.c
new file mode 100644 (file)
index 0000000..28fd3c9
--- /dev/null
@@ -0,0 +1,26 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+setitimer (int which, struct itimerval const *new,
+          struct itimerval *old)
+{
+  return _sys_call3 (SYS_setitimer, (long)which, (long)new, (long)old);
+}
diff --git a/lib/linux/setuid.c b/lib/linux/setuid.c
new file mode 100644 (file)
index 0000000..33a7330
--- /dev/null
@@ -0,0 +1,25 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+setuid (uid_t newuid)
+{
+  return _sys_call1 (SYS_setuid, (long)newuid);
+}
diff --git a/lib/linux/signal.c b/lib/linux/signal.c
new file mode 100644 (file)
index 0000000..72b6651
--- /dev/null
@@ -0,0 +1,51 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+#if __x86_64__
+void
+_restorer (void)
+{
+  _sys_call (SYS_rt_sigreturn);
+}
+#endif
+
+# define __sigmask(sig) \
+  (((unsigned long int) 1) << (((sig) - 1) % (8 * sizeof (unsigned long int))))
+
+sighandler_t
+signal (int signum, sighandler_t action)
+{
+#if __i386__
+  return _sys_call2 (SYS_signal, signum, action);
+#else
+  static struct sigaction setup_action = {-1};
+  static struct sigaction old = {0};
+
+  setup_action.sa_handler = action;
+  setup_action.sa_restorer = _restorer;
+  setup_action.sa_mask = __sigmask (signum);
+  old.sa_handler = SIG_DFL;
+  setup_action.sa_flags = SA_RESTORER | SA_RESTART;
+  int r = _sys_call4 (SYS_rt_sigaction, signum, &setup_action, &old, sizeof (sigset_t));
+  if (r)
+    return 0;
+  return old.sa_handler;
+#endif
+}
diff --git a/lib/linux/sigprogmask.c b/lib/linux/sigprogmask.c
new file mode 100644 (file)
index 0000000..13ae60c
--- /dev/null
@@ -0,0 +1,29 @@
+/* -*-comment-start: "//";comment-end:""-*-
+ * GNU Mes --- Maxwell Equations of Software
+ * Copyright © 2018,2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
+ *
+ * This file is part of GNU Mes.
+ *
+ * GNU Mes is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU Mes is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+int
+sigprocmask (int how, sigset_t const *set, sigset_t *oldset)
+{
+#if __i386__
+  return _sys_call3 (SYS_sigprocmask, (long)how, (long)set, (long)oldset);
+#else
+  return _sys_call3 (SYS_rt_sigprocmask, (long)how, (long)set, (long)oldset);
+#endif
+}