chiark - git - mdw - disorder/blob - lib/syscalls.c

   1 /*
   2  * This file is part of DisOrder.
   3  * Copyright (C) 2004, 2005 Richard Kettlewell
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  18  * USA
  19  */
  20
  21 #include <config.h>
  22
  23 #include <unistd.h>
  24 #include <errno.h>
  25 #include <fcntl.h>
  26 #include <sys/types.h>
  27 #include <sys/socket.h>
  28 #include <sys/time.h>
  29 #include <signal.h>
  30 #include <stdio.h>
  31 #include <stdlib.h>
  32
  33 #include "syscalls.h"
  34 #include "log.h"
  35 #include "printf.h"
  36
  37 int mustnotbeminus1(const char *what, int ret) {
  38   if(ret == -1)
  39     fatal(errno, "error calling %s", what);
  40   return ret;
  41 }
  42
  43 pid_t xfork(void) {
  44   pid_t pid;
  45
  46   if((pid = fork()) < 0) fatal(errno, "error calling fork");
  47   return pid;
  48 }
  49
  50 void xclose_guts(const char *path, int line, int fd) {
  51   if(close(fd) < 0)
  52     fatal(errno, "%s:%d: close %d", path, line, fd);
  53 }
  54
  55 void xdup2(int fd1, int fd2) {
  56   mustnotbeminus1("dup2", dup2(fd1, fd2));
  57 }
  58
  59 void xpipe(int *fdp) {
  60   mustnotbeminus1("pipe", pipe(fdp));
  61 }
  62
  63 void nonblock(int fd) {
  64   mustnotbeminus1("fcntl F_SETFL",
  65                   fcntl(fd, F_SETFL,
  66                         mustnotbeminus1("fcntl F_GETFL",
  67                                         fcntl(fd, F_GETFL)) | O_NONBLOCK));
  68 }
  69
  70 void blocking(int fd) {
  71   mustnotbeminus1("fcntl F_SETFL",
  72                   fcntl(fd, F_SETFL,
  73                         mustnotbeminus1("fcntl F_GETFL",
  74                                         fcntl(fd, F_GETFL)) & ~O_NONBLOCK));
  75 }
  76
  77 void cloexec(int fd) {
  78   mustnotbeminus1("fcntl F_SETFD",
  79                   fcntl(fd, F_SETFD,
  80                         mustnotbeminus1("fcntl F_GETFD",
  81                                         fcntl(fd, F_GETFD)) | FD_CLOEXEC));
  82 }
  83
  84 void xlisten(int fd, int q) {
  85   mustnotbeminus1("listen", listen(fd, q));
  86 }
  87
  88 void xshutdown(int fd, int how) {
  89   mustnotbeminus1("shutdown", shutdown(fd, how));
  90 }
  91
  92 void xsetsockopt(int fd, int l, int o, const void *v, socklen_t vl) {
  93   mustnotbeminus1("setsockopt", setsockopt(fd, l, o, v, vl));
  94 }
  95
  96 int xsocket(int d, int t, int p) {
  97   return mustnotbeminus1("socket", socket(d, t, p));
  98 }
  99
 100 void xconnect(int fd, const struct sockaddr *sa, socklen_t sl) {
 101   mustnotbeminus1("connect", connect(fd, sa, sl));
 102 }
 103
 104 void xsigprocmask(int how, const sigset_t *set, sigset_t *oldset) {
 105   mustnotbeminus1("sigprocmask", sigprocmask(how, set, oldset));
 106 }
 107
 108 void xsigaction(int sig, const struct sigaction *sa, struct sigaction *oldsa) {
 109   mustnotbeminus1("sigaction", sigaction(sig, sa, oldsa));
 110 }
 111
 112 int xprintf(const char *fmt, ...) {
 113   va_list ap;
 114   int n;
 115
 116   va_start(ap, fmt);
 117   n = mustnotbeminus1("byte_vfprintf", byte_vfprintf(stdout, fmt, ap));
 118   va_end(ap);
 119   return n;
 120 }
 121
 122 void xfclose(FILE *fp) {
 123   mustnotbeminus1("fclose", fclose(fp));
 124 }
 125
 126 int xstrtol(long *n, const char *s, char **ep, int base) {
 127   errno = 0;
 128   *n = strtol(s, ep, base);
 129   return errno;
 130 }
 131
 132 int xstrtoll(long_long *n, const char *s, char **ep, int base) {
 133   errno = 0;
 134   *n = strtoll(s, ep, base);
 135   return errno;
 136 }
 137
 138 int xnice(int inc) {
 139   int ret;
 140
 141   /* some versions of nice() return the new nice value which in principle could
 142    * be -1 */
 143   errno = 0;
 144   ret = nice(inc);
 145   if(errno) fatal(errno, "error calling nice");
 146   return ret;
 147 }
 148
 149 void xgettimeofday(struct timeval *tv, struct timezone *tz) {
 150   mustnotbeminus1("gettimeofday", gettimeofday(tv, tz));
 151 }
 152
 153 /*
 154 Local Variables:
 155 c-basic-offset:2
 156 comment-column:40
 157 End:
 158 */