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
|
/* See LICENSE file for copyright and license details. */
#include "common.h"
USAGE("[-t title] (-L | contact-id ...)");
struct org_node {
char *name;
struct org_node *next;
struct org_node *prev;
};
static struct org_node head;
static struct org_node tail;
static void
list_orgs(const struct libcontacts_contact *contact, const char *title)
{
struct libcontacts_organisation **orgs, *org;
struct org_node *node, *new;
int cmp;
if ((orgs = contact->organisations)) {
for (; (org = *orgs); orgs++) {
if (!org->organisation)
continue;
if (title && strcmpnul(org->title, title))
continue;
for (node = head.next; node->next; node = node->next) {
cmp = strcmp(org->organisation, node->name);
if (cmp < 0)
continue;
if (cmp == 0)
goto next_org;
break;
}
printf("%s\n", org->organisation);
new = ecalloc(1, sizeof(*new));
(new->prev = node->prev)->next = new;
(new->next = node)->prev = new;
new->name = org->organisation;
org->organisation = NULL;
next_org:;
}
}
}
int
main(int argc, char *argv[])
{
int list = 0;
struct passwd *user;
struct libcontacts_contact **contacts, contact;
struct org_node *node, *next_node;
int ret = 0;
char *title = NULL;
size_t i;
ARGBEGIN {
case 't':
if (title)
usage();
title = ARG();
break;
case 'L':
list = 1;
break;
default:
usage();
} ARGEND;
if (list ? argc : !argc)
usage();
head.prev = NULL;
head.next = &tail;
tail.prev = &head;
tail.next = NULL;
errno = 0;
user = getpwuid(getuid());
if (!user)
eprintf("getpwuid: %s\n", errno ? strerror(errno) : "user does not exist");
if (list) {
if (libcontacts_load_contacts(&contacts, user))
eprintf("libcontacts_load_contacts:");
for (i = 0; contacts[i]; i++) {
list_orgs(contacts[i], title);
libcontacts_contact_destroy(contacts[i]);
free(contacts[i]);
}
free(contacts);
} else {
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;
} else {
list_orgs(&contact, title);
libcontacts_contact_destroy(&contact);
}
}
}
if (fflush(stdout) || ferror(stdout) || fclose(stdout))
eprintf("printf:");
for (node = head.next; node->next; node = next_node) {
next_node = node->next;
free(node->name);
free(node);
}
return ret;
}
|
