1 files changed, 62 insertions, 0 deletions
diff --git a/find-contact-by-email.c b/find-contact-by-email.c
new file mode 100644
index 0000000..cff71db
--- /dev/null
+++ b/find-contact-by-email.c
@@ -0,0 +1,62 @@
+/* See LICENSE file for copyright and license details. */
+#include "common.h"
+
+USAGE("[-c context] (-L | address)");
+
+
+int
+main(int argc, char *argv[])
+{
+	int list = 0;
+	struct passwd *user;
+	struct libcontacts_contact **contacts;
+	struct libcontacts_email **emails, *email;
+	char *context = NULL;
+	size_t i;
+
+	ARGBEGIN {
+	case 'c':
+		if (context)
+			usage();
+		context = ARG();
+		break;
+	case 'L':
+		list = 1;
+		break;
+	default:
+		usage();
+	} ARGEND;
+
+	if (argc != 1 - list)
+		usage();
+
+	errno = 0;
+	user = getpwuid(getuid());
+	if (!user)
+		eprintf("getpwuid: %s\n", errno ? strerror(errno) : "user does not exist");
+
+	if (libcontacts_load_contacts(&contacts, user))
+		eprintf("libcontacts_load_contacts:");
+	for (i = 0; contacts[i]; i++) {
+		if ((emails = contacts[i]->emails)) {
+			for (; (email = *emails); emails++) {
+				if (!email->address)
+					continue;
+				if (context && (!email->context || strcmp(email->context, context)))
+					continue;
+				if (list)
+					printf("%s (%s)\n", contacts[i]->id, email->address);
+				else if (!strcmp(email->address, argv[0]))
+					printf("%s\n", contacts[i]->id);
+			}
+		}
+		libcontacts_contact_destroy(contacts[i]);
+		free(contacts[i]);
+	}
+	free(contacts);
+
+	if (fflush(stdout) || ferror(stdout) || fclose(stdout))
+		eprintf("printf:");
+
+	return 0;
+}