chiark / gitweb /
compute Sentence_Break as well
[disorder] / 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 */