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
|
#include <unistd.h>
#include <sys/stat.h>
#include "buffer.h"
#include "logmsg.h"
#include "stralloc.h"
#include "getln.h"
#include "open.h"
#include "byte.h"
#define WHO "setmaillist"
int rename(const char *,const char *); // stdio.h
void usage()
{
logmsg(WHO,100,USAGE,"setmaillist list.bin list.tmp");
}
stralloc line = {0};
int match;
char *fnbin;
char *fntmp;
int fd;
char buf[1024];
buffer bo;
void writeerr()
{
logmsg(WHO,111,FATAL,B("unable to write to: ",fntmp));
}
static void out(char *s,int len)
{
if (buffer_put(&bo,s,len) == -1) writeerr();
}
int main(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)
logmsg(WHO,111,FATAL,B("unable to create: ",fntmp));
buffer_init(&bo,write,fd,buf,sizeof(buf));
do {
if (getln(buffer_0small,&line,&match,'\n') == -1)
logmsg(WHO,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)
logmsg(WHO,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)
logmsg(WHO,111,FATAL,"addresses must be under 800 bytes");
if (line.s[0] != '&')
out("&",1);
out(line.s,line.len);
out("",1);
}
}
} while (match);
if (buffer_flush(&bo) == -1) writeerr();
if (fsync(fd) == -1) writeerr();
if (close(fd) == -1) writeerr(); /* NFS stupidity */
if (rename(fntmp,fnbin) == -1)
logmsg(WHO,111,FATAL,B("unable to move ",fntmp," to: ",fnbin));
_exit(0);
}
|
