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
121
122
123
124
125
126
|
/* See LICENSE file for copyright and license details. */
#include "common.h"
USAGE("[-a ask-at] [-s service] [-t type] [-u unblock-at] [-y style] contact-id ...");
int
main(int argc, char *argv[])
{
int explicit = 0;
enum libcontacts_block_type shadow_block = 0;
time_t soft_unblock = 0, hard_unblock = 0;
const char *srv = NULL, *type = NULL, *style = NULL, *ask = NULL, *ublk = NULL;
struct passwd *user;
struct libcontacts_contact contact;
struct libcontacts_block **r, **w;
char *p;
size_t i;
int ret = 0;
ARGBEGIN {
case 'a':
if (ask)
usage();
ask = ARG();
if (!isdigit(*ask))
usage();
soft_unblock = (time_t)strtoumax(ask, &p, 10);
if (errno || *p)
usage();
break;
case 's':
if (srv)
usage();
srv = ARG();
break;
case 't':
if (type)
usage();
type = ARG();
break;
case 'u':
if (ublk)
usage();
ublk = ARG();
if (!isdigit(*ublk))
usage();
hard_unblock = (time_t)strtoumax(ublk, &p, 10);
if (errno || *p)
usage();
break;
case 'y':
if (style)
usage();
style = ARG();
break;
default:
usage();
} ARGEND;
if (!argc)
usage();
for (i = 0; argv[i]; i++)
if (!*argv[i] || strchr(argv[i], '/'))
usage();
if (type) {
if (!strcmp(type, "explicit"))
explicit = 1;
else if (!strcmp(type, "shadow"))
explicit = 0;
else
eprintf("value of -t shall be either \"explicit\" or \"shadow\"\n");
}
if (style) {
if (!strcmp(style, "silent"))
shadow_block = LIBCONTACTS_SILENT;
else if (!strcmp(style, "as-off"))
shadow_block = LIBCONTACTS_BLOCK_OFF;
else if (!strcmp(style, "as-busy"))
shadow_block = LIBCONTACTS_BLOCK_BUSY;
else if (!strcmp(style, "ignore"))
shadow_block = LIBCONTACTS_BLOCK_IGNORE;
else
eprintf("value of -y shall be either \"silent\", \"as-off\", \"as-busy\", or \"ignore\"\n");
}
errno = 0;
user = getpwuid(getuid());
if (!user)
eprintf("getpwuid: %s\n", errno ? strerror(errno) : "user does not exist");
for (; *argv; argv++) {
if (libcontacts_load_contact(*argv, &contact, user)) {
weprintf("libcontacts_load_contact %s: %s\n", *argv,
errno ? strerror(errno) : "contact file is malformatted");
ret = 1;
continue;
}
if ((r = contact.blocks)) {
for (w = r; *r; w++) {
*w = *r++;
if (srv && strcmpnul((*w)->service, srv))
continue;
if (type && (*w)->explicit != explicit)
continue;
if (style && (*w)->shadow_block != shadow_block)
continue;
if (ask && (*w)->soft_unblock != soft_unblock)
continue;
if (ublk && (*w)->hard_unblock != hard_unblock)
continue;
libcontacts_block_destroy(*w);
free(*w--);
}
*w = NULL;
if (libcontacts_save_contact(&contact, user))
eprintf("libcontacts_save_contact %s:", *argv);
}
libcontacts_contact_destroy(&contact);
}
return ret;
}
|
