1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
/* See LICENSE file for copyright and license details. */
#include "util.h"
#include <ctype.h>
#include <errno.h>
#include <limits.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <strings.h>
#include <unistd.h>
char *argv0;
void
weprintf(const char *fmt, ...)
{
va_list ap;
va_start(ap, fmt);
if (argv0 && strncmp(fmt, "usage", strlen("usage")))
fprintf(stderr, "%s: ", argv0);
vfprintf(stderr, fmt, ap);
if (fmt[0] && fmt[strlen(fmt)-1] == ':') {
fputc(' ', stderr);
perror(NULL);
}
va_end(ap);
}
int
tollu(const char *s, unsigned long long int min, unsigned long long int max, unsigned long long int *out)
{
char *end;
errno = 0;
if (*s == '-') {
errno = ERANGE;
return -1;
}
if (tolower(*s) == 'x' || *s == '#')
*out = strtoull(s + 1, &end, 16);
else if (*s == '0' && tolower(s[1]) == 'x')
*out = strtoull(s + 2, &end, 16);
else if (*s == '0' && tolower(s[1]) == 'o')
*out = strtoull(s + 2, &end, 8);
else if (*s == '0' && tolower(s[1]) == 'b')
*out = strtoull(s + 2, &end, 2);
else
*out = strtoull(s, &end, 10);
if (errno)
return -1;
if (*end) {
errno = EINVAL;
return -1;
}
if (*out < min || *out > max) {
errno = ERANGE;
return -1;
}
return 0;
}
int
tolli(const char *s, long long int min, long long int max, long long int *out)
{
int sign = 1;
unsigned long long int inter;
errno = 0;
if (*s == '-') {
s++;
sign = -1;
}
if (tollu(s, 0, ULLONG_MAX, &inter))
return -1;
if (sign > 0) {
if (max < 0 || inter > (unsigned long long int)max)
goto erange;
*out = (long long int)inter;
if (*out < min)
goto erange;
} else {
#if LLONG_MIN == -LLONG_MAX
if (inter > -LLONG_MIN)
goto erange;
#else
if (inter > (unsigned long long int)LLONG_MAX + 1ULL)
goto erange;
#endif
*out = -(long long int)inter;
if (*out < min || *out > max)
goto erange;
}
return 0;
erange:
errno = ERANGE;
return -1;
}
int
writeall(int fd, void *buf, size_t n)
{
char *buffer = buf;
size_t ptr = 0;
ssize_t r;
while (ptr < n) {
r = write(STDOUT_FILENO, buffer, n);
if (r < 0)
return -1;
buffer += (size_t)ptr;
n -= (size_t)ptr;
}
return 0;
}
|
