First commit

Signed-off-by: Mattias Andrée <maandree@kth.se>

1 files changed, 197 insertions, 0 deletions

diff --git a/libcontacts_format_contact.c b/libcontacts_format_contact.c
new file mode 100644
index 0000000..1752026
--- /dev/null
+++ b/libcontacts_format_contact.c
@@ -0,0 +1,197 @@
+/* See LICENSE file for copyright and license details. */
+#include "common.h"
+
+
+int
+libcontacts_format_contact(const struct libcontacts_contact *contact, char **datap)
+{
+	FILE *fp;
+	size_t siz = 0;
+	char **list, *p, *q;
+	const char *suffix;
+	struct libcontacts_organisation **organisations, *organisation;
+	struct libcontacts_email **emails, *email;
+	struct libcontacts_pgpkey **pgpkeys, *pgpkey;
+	struct libcontacts_number **numbers, *number;
+	struct libcontacts_address **addresses, *address;
+	struct libcontacts_site **sites, *site;
+	struct libcontacts_chat **chats, *chat;
+
+	*datap = NULL;
+	fp = open_memstream(datap, &siz);
+	if (!fp)
+		return -1;
+
+	if (contact->name)
+		fprintf(fp, "NAME %s\n", contact->name);
+
+	if (contact->first_name)
+		fprintf(fp, "FNAME %s\n", contact->first_name);
+
+	if (contact->last_name)
+		fprintf(fp, "LNAME %s\n", contact->last_name);
+
+	if (contact->nickname)
+		fprintf(fp, "NICK %s\n", contact->nickname);
+
+	if ((list = contact->photos))
+		for (; *list; list++)
+			fprintf(fp, "PHOTO %s\n", *list);
+
+	if ((list = contact->groups))
+		for (; *list; list++)
+			fprintf(fp, "GROUP %s\n", *list);
+
+	if ((p = contact->notes)) {
+		for (; *p; p = q) {
+			q = strchr(p, '\n');
+			suffix = q ? "" : "\n";
+			q = q ? &q[1] : strchr(p, '\0');
+			fprintf(fp, "NOTES %.*s%s", (int)(q - p), p, suffix);
+		}
+	}
+
+	if ((organisations = contact->organisations)) {
+		for (; (organisation = *organisations); organisations++) {
+			fprintf(fp, "ORG:\n");
+			if (organisation->organisation)
+				fprintf(fp, "\tORG %s\n", *organisation->organisation);
+			if (organisation->title)
+				fprintf(fp, "\tTITLE %s\n", organisation->title);
+			if ((list = organisation->unrecognised_data))
+				for (; *list; list++)
+					fprintf(fp, "\t%s\n", *list);
+		}
+	}
+
+	if ((emails = contact->emails)) {
+		for (; (email = *emails); emails++) {
+			fprintf(fp, "EMAIL:\n");
+			if (email->context)
+				fprintf(fp, "\tCTX %s\n", email->context);
+			if (email->address)
+				fprintf(fp, "\tADDR %s\n", email->address);
+			if ((list = email->unrecognised_data))
+				for (; *list; list++)
+					fprintf(fp, "\t%s\n", *list);
+		}
+	}
+
+	if ((pgpkeys = contact->pgpkeys)) {
+		for (; (pgpkey = *pgpkeys); pgpkeys++) {
+			fprintf(fp, "KEY:\n");
+			if (pgpkey->context)
+				fprintf(fp, "\tCTX %s\n", pgpkey->context);
+			if (pgpkey->id)
+				fprintf(fp, "\tID %s\n", pgpkey->id);
+			if ((list = pgpkey->unrecognised_data))
+				for (; *list; list++)
+					fprintf(fp, "\t%s\n", *list);
+		}
+	}
+
+	if ((numbers = contact->numbers)) {
+		for (; (number = *numbers); numbers++) {
+			fprintf(fp, "PHONE:\n");
+			if (number->context)
+				fprintf(fp, "\tCTX %s\n", number->context);
+			if (number->number)
+				fprintf(fp, "\tNUMBER %s\n", number->number);
+			if (number->is_mobile)
+				fprintf(fp, "\tMOBILE\n");
+			if (number->is_facsimile)
+				fprintf(fp, "\tFAX\n");
+			if ((list = number->unrecognised_data))
+				for (; *list; list++)
+					fprintf(fp, "\t%s\n", *list);
+		}
+	}
+
+	if ((addresses = contact->addresses)) {
+		for (; (address = *addresses); addresses++) {
+			fprintf(fp, "ADDR:\n");
+			if (address->context)
+				fprintf(fp, "\tCTX %s\n", address->context);
+			if (address->country)
+				fprintf(fp, "\tCOUNTRY %s\n", address->country);
+			if (address->care_of)
+				fprintf(fp, "\tC/O %s\n", address->care_of);
+			if (address->address)
+				fprintf(fp, "\tADDR %s\n", address->address);
+			if (address->postcode)
+				fprintf(fp, "\tCODE %s\n", address->postcode);
+			if (address->city)
+				fprintf(fp, "\tCITY %s\n", address->city);
+			if (address->have_coordinates)
+				fprintf(fp, "\tCOORD %.20lg %.20lg\n", address->latitude, address->longitude);
+			if ((list = address->unrecognised_data))
+				for (; *list; list++)
+					fprintf(fp, "\t%s\n", *list);
+		}
+	}
+
+	if ((sites = contact->sites)) {
+		for (; (site = *sites); sites++) {
+			fprintf(fp, "SITE:\n");
+			if (site->context)
+				fprintf(fp, "\tCTX %s\n", site->context);
+			if (site->address)
+				fprintf(fp, "\tADDR %s\n", site->address);
+			if ((list = site->unrecognised_data))
+				for (; *list; list++)
+					fprintf(fp, "\t%s\n", *list);
+		}
+	}
+
+	if ((chats = contact->chats)) {
+		for (; (chat = *chats); chats++) {
+			fprintf(fp, "CHAT:\n");
+			if (chat->context)
+				fprintf(fp, "\tCTX %s\n", chat->context);
+			if (chat->service)
+				fprintf(fp, "\tSRV %s\n", chat->service);
+			if (chat->address)
+				fprintf(fp, "\tADDR %s\n", chat->address);
+			if ((list = chat->unrecognised_data))
+				for (; *list; list++)
+					fprintf(fp, "\t%s\n", *list);
+		}
+	}
+
+	if (contact->birthday) {
+		if (contact->birthday->year && contact->birthday->day) {
+			fprintf(fp, "BIRTH %04i-%02i-%02i\n",
+				contact->birthday->year, contact->birthday->month, contact->birthday->day);
+		} else if (contact->birthday->year && contact->birthday->month) {
+			fprintf(fp, "BIRTH %04i-%02i\n", contact->birthday->year, contact->birthday->month);
+		} else if (contact->birthday->year) {
+			fprintf(fp, "BIRTH %04i\n", contact->birthday->year);
+		} else if (contact->birthday->day) {
+			fprintf(fp, "BIRTH %02i-%02\n", contact->birthday->month, contact->birthday->day);
+		} else if (contact->birthday->month) {
+			fprintf(fp, "BIRTH %02i\n", contact->birthday->month);
+		}
+	}
+
+	if (contact->in_case_of_emergency)
+		fprintf(fp, "ICE\n");
+
+	if (contact->gender == LIBCONTACTS_NOT_A_PERSON)
+		fprintf(fp, "NPERSON\n");
+	else if (contact->gender == LIBCONTACTS_MALE)
+		fprintf(fp, "MALE\n");
+	else if (contact->gender == LIBCONTACTS_FEMALE)
+		fprintf(fp, "FEMALE\n");
+
+	if ((list = contact->unrecognised_data))
+		for (; *list; list++)
+			fprintf(fp, "%s\n", *list);
+
+	if (fclose(fp)) {
+		free(*datap);
+		*datap = NULL;
+		return -1;
+	}
+
+	return 0;
+}