static void collect_addresses_into(InternetAddressList *ilist, AddressesList *addr_list, guint size) {
g_return_if_fail(ilist != NULL);
g_return_if_fail(addr_list != NULL);
g_return_if_fail(size != 0);
guint i;
for (i = 0; i < size; i++) {
InternetAddress *address = internet_address_list_get_address(ilist, i); // transfer none
if (INTERNET_ADDRESS_IS_GROUP(address)) {
InternetAddressGroup *group = INTERNET_ADDRESS_GROUP(address);
InternetAddressList *group_list = internet_address_group_get_members(group); // transer none
if (group_list) {
guint gsize = internet_address_list_length(group_list);
if (gsize)
collect_addresses_into(group_list, addr_list, gsize);
}
} else if (INTERNET_ADDRESS_IS_MAILBOX(address)) {
InternetAddressMailbox *mailbox = INTERNET_ADDRESS_MAILBOX(address);
const gchar *name = internet_address_get_name(address);
const gchar *address = internet_address_mailbox_get_addr(mailbox);
Address *addr = new_address(address, name);
addresses_list_add(addr_list, addr);
}
}
}
/* Does the address in the Reply-To header of 'message' already appear
* in either the 'To' or 'Cc' header of the message?
*/
static int
reply_to_header_is_redundant (notmuch_message_t *message)
{
const char *reply_to, *to, *cc, *addr;
InternetAddressList *list;
InternetAddress *address;
InternetAddressMailbox *mailbox;
reply_to = notmuch_message_get_header (message, "reply-to");
if (reply_to == NULL || *reply_to == '\0')
return 0;
list = internet_address_list_parse_string (reply_to);
if (internet_address_list_length (list) != 1)
return 0;
address = internet_address_list_get_address (list, 0);
if (INTERNET_ADDRESS_IS_GROUP (address))
return 0;
mailbox = INTERNET_ADDRESS_MAILBOX (address);
addr = internet_address_mailbox_get_addr (mailbox);
to = notmuch_message_get_header (message, "to");
cc = notmuch_message_get_header (message, "cc");
if ((to && strstr (to, addr) != 0) ||
(cc && strstr (cc, addr) != 0))
{
return 1;
}
return 0;
}
/* Extract just the email address from the contents of a From:
* header. */
static const char *
_extract_email_address (const void *ctx, const char *from)
{
InternetAddressList *addresses;
InternetAddress *address;
InternetAddressMailbox *mailbox;
const char *email = "MAILER-DAEMON";
addresses = internet_address_list_parse_string (from);
/* Bail if there is no address here. */
if (addresses == NULL || internet_address_list_length (addresses) < 1)
goto DONE;
/* Otherwise, just use the first address. */
address = internet_address_list_get_address (addresses, 0);
/* The From header should never contain an address group rather
* than a mailbox. So bail if it does. */
if (! INTERNET_ADDRESS_IS_MAILBOX (address))
goto DONE;
mailbox = INTERNET_ADDRESS_MAILBOX (address);
email = internet_address_mailbox_get_addr (mailbox);
email = talloc_strdup (ctx, email);
DONE:
if (addresses)
g_object_unref (addresses);
return email;
}
static AddressesList *collect_addresses(InternetAddressList *list) {
g_return_val_if_fail(list != NULL, NULL);
AddressesList* result = NULL;
guint size = internet_address_list_length(list);
if (size) {
result = new_addresses_list();
collect_addresses_into(list, result, size);
}
return result;
}
static void
json_add_address_list (JsonBuilder *builder, InternetAddressList* list)
{
int size;
int i;
if (list) {
size = internet_address_list_length(list);
for (i = 0; i < size; i++)
json_add_address(builder, internet_address_list_get_address(list, i));
}
}
void extract_addresses(InternetAddressList *address_list, GMimeStream *out_stream) {
int i;
for (i=0; i<internet_address_list_length(address_list); i++) {
if (i > 0) {
g_mime_stream_printf (out_stream, ", ");
}
InternetAddress *address;
char *address_string;
address = internet_address_list_get_address(address_list, i);
address_string = internet_address_to_string(address, TRUE);
address_string = str_replace(address_string, "\"", "\\\"");
g_mime_stream_printf (out_stream, "\"%s\"", address_string);
}
}
static AddressesList *collect_str_addresses(const gchar* addresses_list_str) {
g_return_val_if_fail(addresses_list_str != NULL, NULL);
AddressesList* result = NULL;
InternetAddressList *addresses = internet_address_list_parse_string(addresses_list_str); // transfer-FULL
if (addresses) {
guint addresses_length = internet_address_list_length(addresses);
if (addresses_length) {
result = new_addresses_list();
collect_addresses_into(addresses, result, addresses_length);
}
g_object_unref(addresses);
}
return result;
}
/* Scan addresses in 'list'.
*
* If 'message' is non-NULL, then for each address in 'list' that is
* not configured as one of the user's addresses in 'config', add that
* address to 'message' as an address of 'type'.
*
* If 'user_from' is non-NULL and *user_from is NULL, *user_from will
* be set to the first address encountered in 'list' that is the
* user's address.
*
* Return the number of addresses added to 'message'. (If 'message' is
* NULL, the function returns 0 by definition.)
*/
static unsigned int
scan_address_list (InternetAddressList *list,
notmuch_config_t *config,
GMimeMessage *message,
GMimeRecipientType type,
const char **user_from)
{
InternetAddress *address;
int i;
unsigned int n = 0;
for (i = 0; i < internet_address_list_length (list); i++) {
address = internet_address_list_get_address (list, i);
if (INTERNET_ADDRESS_IS_GROUP (address)) {
InternetAddressGroup *group;
InternetAddressList *group_list;
group = INTERNET_ADDRESS_GROUP (address);
group_list = internet_address_group_get_members (group);
if (group_list == NULL)
continue;
n += scan_address_list (group_list, config, message, type, user_from);
} else {
InternetAddressMailbox *mailbox;
const char *name;
const char *addr;
mailbox = INTERNET_ADDRESS_MAILBOX (address);
name = internet_address_get_name (address);
addr = internet_address_mailbox_get_addr (mailbox);
if (address_is_users (addr, config)) {
if (user_from && *user_from == NULL)
*user_from = addr;
} else if (message) {
g_mime_message_add_recipient (message, type, name, addr);
n++;
}
}
}
return n;
}
/* For each address in 'list' that is not configured as one of the
* user's addresses in 'config', add that address to 'message' as an
* address of 'type'.
*
* The first address encountered that *is* the user's address will be
* returned, (otherwise NULL is returned).
*/
static const char *
add_recipients_for_address_list (GMimeMessage *message,
notmuch_config_t *config,
GMimeRecipientType type,
InternetAddressList *list)
{
InternetAddress *address;
int i;
const char *ret = NULL;
for (i = 0; i < internet_address_list_length (list); i++) {
address = internet_address_list_get_address (list, i);
if (INTERNET_ADDRESS_IS_GROUP (address)) {
InternetAddressGroup *group;
InternetAddressList *group_list;
group = INTERNET_ADDRESS_GROUP (address);
group_list = internet_address_group_get_members (group);
if (group_list == NULL)
continue;
add_recipients_for_address_list (message, config,
type, group_list);
} else {
InternetAddressMailbox *mailbox;
const char *name;
const char *addr;
mailbox = INTERNET_ADDRESS_MAILBOX (address);
name = internet_address_get_name (address);
addr = internet_address_mailbox_get_addr (mailbox);
if (address_is_users (addr, config)) {
if (ret == NULL)
ret = addr;
} else {
g_mime_message_add_recipient (message, type, name, addr);
}
}
}
return ret;
}
static void
address_list_foreach (InternetAddressList *addrlist, MuMsgContactType ctype,
MuMsgContactForeachFunc func, gpointer user_data)
{
int i, len;
if (!addrlist)
return;
len = internet_address_list_length(addrlist);
for (i = 0; i != len; ++i) {
MuMsgContact contact;
if (!fill_contact(&contact,
internet_address_list_get_address (addrlist, i),
ctype))
continue;
if (!(func)(&contact, user_data))
break;
}
}
/* Print or prepare for printing addresses from InternetAddressList. */
static void
process_address_list (const search_context_t *ctx,
InternetAddressList *list)
{
InternetAddress *address;
int i;
for (i = 0; i < internet_address_list_length (list); i++) {
address = internet_address_list_get_address (list, i);
if (INTERNET_ADDRESS_IS_GROUP (address)) {
InternetAddressGroup *group;
InternetAddressList *group_list;
group = INTERNET_ADDRESS_GROUP (address);
group_list = internet_address_group_get_members (group);
if (group_list == NULL)
continue;
process_address_list (ctx, group_list);
} else {
InternetAddressMailbox *mailbox = INTERNET_ADDRESS_MAILBOX (address);
mailbox_t mbx = {
.name = internet_address_get_name (address),
.addr = internet_address_mailbox_get_addr (mailbox),
};
/* OUTPUT_COUNT only works with deduplication */
if (ctx->dedup != DEDUP_NONE &&
is_duplicate (ctx, mbx.name, mbx.addr))
continue;
/* OUTPUT_COUNT and DEDUP_ADDRESS require a full pass. */
if (ctx->output & OUTPUT_COUNT || ctx->dedup == DEDUP_ADDRESS)
continue;
print_mailbox (ctx, &mbx);
}
}
}
static void
test_address_sync (void)
{
const char *raw_value, *value;
InternetAddress *addr, *ia;
InternetAddressList *list;
GMimeHeaderList *headers;
GMimeMessage *message;
GMimeObject *object;
GMimeHeader *header;
message = g_mime_message_new (TRUE);
list = g_mime_message_get_addresses (message, GMIME_ADDRESS_TYPE_TO);
object = (GMimeObject *) message;
headers = object->headers;
testsuite_check ("address header synchronization");
try {
/* first, check that the To recipients are empty */
if (list == NULL || internet_address_list_length (list) != 0)
throw (exception_new ("unexpected initial internet address list"));
/* now check that the initial header value is null */
if ((value = g_mime_object_get_header (object, "To")) != NULL)
throw (exception_new ("unexpected initial value"));
header = g_mime_header_list_get_header (headers, "To");
if ((raw_value = g_mime_header_get_raw_value (header)) != NULL)
throw (exception_new ("unexpected initial raw_value"));
/* now try adding an address */
addr = internet_address_mailbox_new ("Tester", "*****@*****.**");
internet_address_list_add (list, addr);
if (!(value = g_mime_object_get_header (object, "To")))
throw (exception_new ("address list header unexpectedly null after adding recipient"));
if (strcmp ("Tester <*****@*****.**>", value) != 0)
throw (exception_new ("unexpected address list header after adding recipient"));
header = g_mime_header_list_get_header (headers, "To");
if (!(raw_value = g_mime_header_get_raw_value (header)))
throw (exception_new ("raw_value is null after adding recipient"));
if (strcmp (" Tester <*****@*****.**>\n", raw_value) != 0)
throw (exception_new ("unexpected raw_value after adding recipient: %s", raw_value));
/* now let's try changing the address name to make sure signals properly chain up */
internet_address_set_name (addr, "Eva Lucy-Ann Tester");
if (!(value = g_mime_object_get_header (object, "To")))
throw (exception_new ("address list header unexpectedly null after changing name"));
if (strcmp ("Eva Lucy-Ann Tester <*****@*****.**>", value) != 0)
throw (exception_new ("unexpected address list header after changing name: %s", value));
header = g_mime_header_list_get_header (headers, "To");
if (!(raw_value = g_mime_header_get_raw_value (header)))
throw (exception_new ("raw_value is null after changing name"));
if (strcmp (" Eva Lucy-Ann Tester <*****@*****.**>\n", raw_value) != 0)
throw (exception_new ("unexpected raw_value after changing name"));
/* now let's try changing the address mailbox... */
internet_address_mailbox_set_addr ((InternetAddressMailbox *) addr, "*****@*****.**");
if (!(value = g_mime_object_get_header (object, "To")))
throw (exception_new ("address list header unexpectedly null after changing mailbox"));
if (strcmp ("Eva Lucy-Ann Tester <*****@*****.**>", value) != 0)
throw (exception_new ("unexpected address list header after changing mailbox"));
header = g_mime_header_list_get_header (headers, "To");
if (!(raw_value = g_mime_header_get_raw_value (header)))
throw (exception_new ("raw_value is null after changing mailbox"));
if (strcmp (" Eva Lucy-Ann Tester <*****@*****.**>\n", raw_value) != 0)
throw (exception_new ("unexpected raw_value after changing mailbox"));
/* now let's try inserting a group address */
g_object_unref (addr);
addr = internet_address_group_new ("Group");
internet_address_list_insert (list, 0, addr);
if (!(value = g_mime_object_get_header (object, "To")))
throw (exception_new ("address list header unexpectedly null after inserting group"));
if (strcmp ("Group: ;, Eva Lucy-Ann Tester <*****@*****.**>", value) != 0)
throw (exception_new ("unexpected address list header after inserting group"));
header = g_mime_header_list_get_header (headers, "To");
if (!(raw_value = g_mime_header_get_raw_value (header)))
throw (exception_new ("raw_value is null after inserting group"));
if (strcmp (" Group: ;, Eva Lucy-Ann Tester <*****@*****.**>\n", raw_value) != 0)
throw (exception_new ("unexpected raw_value after inserting group"));
/* now let's try removing the original recipient */
internet_address_list_remove_at (list, 1);
if (!(value = g_mime_object_get_header (object, "To")))
throw (exception_new ("address list header unexpectedly null after removing recipient"));
if (strcmp ("Group: ;", value) != 0)
throw (exception_new ("unexpected address list header after removing recipient"));
header = g_mime_header_list_get_header (headers, "To");
if (!(raw_value = g_mime_header_get_raw_value (header)))
throw (exception_new ("raw_value is null after removing recipient"));
if (strcmp (" Group: ;\n", raw_value) != 0)
throw (exception_new ("unexpected raw_value after removing recipient"));
/* now let's try adding an address to the group... */
ia = internet_address_mailbox_new ("Tester", "*****@*****.**");
internet_address_list_add (((InternetAddressGroup *) addr)->members, ia);
if (!(value = g_mime_object_get_header (object, "To")))
throw (exception_new ("address list header unexpectedly null after adding addr to group"));
if (strcmp ("Group: Tester <*****@*****.**>;", value) != 0)
throw (exception_new ("unexpected address list header after adding addr to group"));
header = g_mime_header_list_get_header (headers, "To");
if (!(raw_value = g_mime_header_get_raw_value (header)))
throw (exception_new ("raw_value is null after adding addr to group"));
if (strcmp (" Group: Tester <*****@*****.**>;\n", raw_value) != 0)
throw (exception_new ("unexpected raw_value after adding addr to group"));
/* let's try this in reverse... set the header value and make sure InternetAddressList gets updated */
g_mime_object_set_header (object, "To", "[email protected] (=?iso-8859-1?q?Fran=E7ois?= Pons)", NULL);
if (internet_address_list_length (list) != 1)
throw (exception_new ("unexpected number of addresses in addrlist after setting header value"));
ia = internet_address_list_get_address (list, 0);
value = internet_address_get_name (ia);
if (strcmp ("Fran\xc3\xa7ois Pons", value) != 0)
throw (exception_new ("unexpected name after setting header value"));
value = internet_address_mailbox_get_addr ((InternetAddressMailbox *) ia);
if (strcmp ("*****@*****.**", value) != 0)
throw (exception_new ("unexpected addr after setting header value"));
header = g_mime_header_list_get_header (headers, "To");
if (!(raw_value = g_mime_header_get_raw_value (header)))
throw (exception_new ("raw_value is null after setting header value"));
if (strcmp (" =?iso-8859-1?q?Fran=E7ois?= Pons <*****@*****.**>\n", raw_value) != 0)
throw (exception_new ("unexpected raw_value after setting header value: %s", raw_value));
testsuite_check_passed ();
} catch (ex) {
testsuite_check_failed ("address header not synchronized: %s", ex->message);
} finally;
g_object_unref (message);
}
static void
test_parser (GMimeParser *parser, GMimeStream *mbox, GMimeStream *summary)
{
gint64 message_begin, message_end, headers_begin, headers_end;
GMimeFormatOptions *format = g_mime_format_options_get_default ();
InternetAddressList *list;
GMimeMessage *message;
char *marker, *buf;
const char *subject;
GMimeObject *body;
GDateTime *date;
int nmsg = 0;
while (!g_mime_parser_eos (parser)) {
message_begin = g_mime_parser_tell (parser);
if (!(message = g_mime_parser_construct_message (parser, NULL)))
throw (exception_new ("failed to parse message #%d", nmsg));
message_end = g_mime_parser_tell (parser);
headers_begin = g_mime_parser_get_headers_begin (parser);
headers_end = g_mime_parser_get_headers_end (parser);
g_mime_stream_printf (summary, "message offsets: %" G_GINT64_FORMAT ", %" G_GINT64_FORMAT "\n",
message_begin, message_end);
g_mime_stream_printf (summary, "header offsets: %" G_GINT64_FORMAT ", %" G_GINT64_FORMAT "\n",
headers_begin, headers_end);
marker = g_mime_parser_get_mbox_marker (parser);
g_mime_stream_printf (summary, "%s\n", marker);
if ((list = g_mime_message_get_from (message)) != NULL &&
internet_address_list_length (list) > 0) {
buf = internet_address_list_to_string (list, format, FALSE);
g_mime_stream_printf (summary, "From: %s\n", buf);
g_free (buf);
}
if ((list = g_mime_message_get_addresses (message, GMIME_ADDRESS_TYPE_TO)) != NULL &&
internet_address_list_length (list) > 0) {
buf = internet_address_list_to_string (list, format, FALSE);
g_mime_stream_printf (summary, "To: %s\n", buf);
g_free (buf);
}
if (!(subject = g_mime_message_get_subject (message)))
subject = "";
g_mime_stream_printf (summary, "Subject: %s\n", subject);
if (!(date = g_mime_message_get_date (message))) {
date = g_date_time_new_from_unix_utc (0);
} else {
g_date_time_ref (date);
}
buf = g_mime_utils_header_format_date (date);
g_mime_stream_printf (summary, "Date: %s\n", buf);
g_date_time_unref (date);
g_free (buf);
body = g_mime_message_get_mime_part (message);
print_mime_struct (summary, body, 0);
g_mime_stream_write (summary, "\n", 1);
if (mbox) {
if (nmsg > 0)
g_mime_stream_write (mbox, "\n", 1);
g_mime_stream_printf (mbox, "%s\n", marker);
g_mime_object_write_to_stream ((GMimeObject *) message, format, mbox);
}
g_object_unref (message);
g_free (marker);
nmsg++;
}
}
