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
|
#include <stdio.h>
#include <sys/stat.h>
#include "substdio.h"
#include "subfd.h"
#include "strerr.h"
#include "stralloc.h"
#include "getln.h"
#include "open.h"
#include "readwrite.h"
#include "byte.h"
#define FATAL "setmaillist: fatal: "
void usage()
{
strerr_die1x(100,"setmaillist: usage: setmaillist list.bin list.tmp");
}
stralloc line = {0};
int match;
char *fnbin;
char *fntmp;
int fd;
substdio ss;
char buf[1024];
void writeerr()
{
strerr_die4sys(111,FATAL,"unable to write to ",fntmp,": ");
}
void out(s,len)
char *s;
int len;
{
if (substdio_put(&ss,s,len) == -1) writeerr();
}
void main(argc,argv)
int argc;
char **argv;
{
umask(033);
fnbin = argv[1]; if (!fnbin) usage();
fntmp = argv[2]; if (!fntmp) usage();
fd = open_trunc(fntmp);
if (fd == -1)
strerr_die4sys(111,FATAL,"unable to create ",fntmp,": ");
substdio_fdbuf(&ss,write,fd,buf,sizeof buf);
do {
if (getln(subfdinsmall,&line,&match,'\n') == -1)
strerr_die2sys(111,FATAL,"unable to read input: ");
while (line.len) {
if (line.s[line.len - 1] != '\n')
if (line.s[line.len - 1] != ' ')
if (line.s[line.len - 1] != '\t')
break;
--line.len;
}
if (byte_chr(line.s,line.len,'\0') != line.len)
strerr_die2x(111,FATAL,"NUL in input");
if (line.len)
if (line.s[0] != '#') {
if ((line.s[0] == '.') || (line.s[0] == '/')) {
out(line.s,line.len);
out("",1);
}
else {
if (line.len > 800)
strerr_die2x(111,FATAL,"addresses must be under 800 bytes");
if (line.s[0] != '&')
out("&",1);
out(line.s,line.len);
out("",1);
}
}
}
while (match);
if (substdio_flush(&ss) == -1) writeerr();
if (fsync(fd) == -1) writeerr();
if (close(fd) == -1) writeerr(); /* NFS stupidity */
if (rename(fntmp,fnbin) == -1)
strerr_die6sys(111,FATAL,"unable to move ",fntmp," to ",fnbin,": ");
_exit(0);
}
|
