/* This format is currently tuned for a git send-email --notmuch hook */
static int
notmuch_reply_format_headers_only(void *ctx,
notmuch_config_t *config,
notmuch_query_t *query,
unused (notmuch_show_params_t *params),
notmuch_bool_t reply_all,
unused (sprinter_t *sp))
{
GMimeMessage *reply;
notmuch_messages_t *messages;
notmuch_message_t *message;
const char *in_reply_to, *orig_references, *references;
char *reply_headers;
for (messages = notmuch_query_search_messages (query);
notmuch_messages_valid (messages);
notmuch_messages_move_to_next (messages))
{
message = notmuch_messages_get (messages);
/* The 0 means we do not want headers in a "pretty" order. */
reply = g_mime_message_new (0);
if (reply == NULL) {
fprintf (stderr, "Out of memory\n");
return 1;
}
in_reply_to = talloc_asprintf (ctx, "<%s>",
notmuch_message_get_message_id (message));
g_mime_object_set_header (GMIME_OBJECT (reply),
"In-Reply-To", in_reply_to);
orig_references = notmuch_message_get_header (message, "references");
/* We print In-Reply-To followed by References because git format-patch treats them
* specially. Git does not interpret the other headers specially
*/
references = talloc_asprintf (ctx, "%s%s%s",
orig_references ? orig_references : "",
orig_references ? " " : "",
in_reply_to);
g_mime_object_set_header (GMIME_OBJECT (reply),
"References", references);
(void)add_recipients_from_message (reply, config, message, reply_all);
reply_headers = g_mime_object_to_string (GMIME_OBJECT (reply));
printf ("%s", reply_headers);
free (reply_headers);
g_object_unref (G_OBJECT (reply));
reply = NULL;
notmuch_message_destroy (message);
}
return 0;
}
static GMimeMessage *
create_reply_message(void *ctx,
notmuch_config_t *config,
notmuch_message_t *message,
notmuch_bool_t reply_all)
{
const char *subject, *from_addr = NULL;
const char *in_reply_to, *orig_references, *references;
/* The 1 means we want headers in a "pretty" order. */
GMimeMessage *reply = g_mime_message_new (1);
if (reply == NULL) {
fprintf (stderr, "Out of memory\n");
return NULL;
}
subject = notmuch_message_get_header (message, "subject");
if (subject) {
if (strncasecmp (subject, "Re:", 3))
subject = talloc_asprintf (ctx, "Re: %s", subject);
g_mime_message_set_subject (reply, subject);
}
from_addr = add_recipients_from_message (reply, config,
message, reply_all);
if (from_addr == NULL)
from_addr = guess_from_received_header (config, message);
if (from_addr == NULL)
from_addr = notmuch_config_get_user_primary_email (config);
from_addr = talloc_asprintf (ctx, "%s <%s>",
notmuch_config_get_user_name (config),
from_addr);
g_mime_object_set_header (GMIME_OBJECT (reply),
"From", from_addr);
in_reply_to = talloc_asprintf (ctx, "<%s>",
notmuch_message_get_message_id (message));
g_mime_object_set_header (GMIME_OBJECT (reply),
"In-Reply-To", in_reply_to);
orig_references = notmuch_message_get_header (message, "references");
if (!orig_references)
/* Treat errors like missing References headers. */
orig_references = "";
references = talloc_asprintf (ctx, "%s%s%s",
*orig_references ? orig_references : "",
*orig_references ? " " : "",
in_reply_to);
g_mime_object_set_header (GMIME_OBJECT (reply),
"References", references);
return reply;
}
static void interpret_header(GSList** stack, gchar** args)
{
GMimeObject* o = GMIME_OBJECT((*stack)->data);
if ( 0 == g_strcmp0("Date", args[0]) && GMIME_IS_MESSAGE(o) ) {
g_mime_message_set_date_as_string(GMIME_MESSAGE(o), g_strchug(args[1]));
} else {
g_mime_object_set_header(o, args[0], g_strchug(args[1]));
}
}
static GMimeMessage *
create_reply_message(void *ctx,
notmuch_config_t *config,
notmuch_message_t *message,
notmuch_bool_t reply_all)
{
const char *subject, *from_addr = NULL;
const char *in_reply_to, *orig_references, *references;
/* The 1 means we want headers in a "pretty" order. */
GMimeMessage *reply = g_mime_message_new (1);
if (reply == NULL) {
fprintf (stderr, "Out of memory\n");
return NULL;
}
subject = notmuch_message_get_header (message, "subject");
if (subject) {
if (strncasecmp (subject, "Re:", 3))
subject = talloc_asprintf (ctx, "Re: %s", subject);
g_mime_message_set_subject (reply, subject);
}
from_addr = add_recipients_from_message (reply, config,
message, reply_all);
/*
* Sadly, there is no standard way to find out to which email
* address a mail was delivered - what is in the headers depends
* on the MTAs used along the way.
*
* If none of the user's email addresses are in the To: or Cc:
* headers, we try a number of heuristics which hopefully will
* answer this question.
*
* First, check for Envelope-To:, X-Original-To:, and
* Delivered-To: headers.
*/
if (from_addr == NULL)
from_addr = get_from_in_to_headers (config, message);
/*
* Check for a (for <*****@*****.**>) clause in Received: headers,
* and the domain part of known email addresses in the 'by' part
* of Received: headers
*/
if (from_addr == NULL)
from_addr = guess_from_in_received_headers (config, message);
/* Default to user's primary address. */
if (from_addr == NULL)
from_addr = notmuch_config_get_user_primary_email (config);
from_addr = talloc_asprintf (ctx, "%s <%s>",
notmuch_config_get_user_name (config),
from_addr);
g_mime_object_set_header (GMIME_OBJECT (reply),
"From", from_addr);
in_reply_to = talloc_asprintf (ctx, "<%s>",
notmuch_message_get_message_id (message));
g_mime_object_set_header (GMIME_OBJECT (reply),
"In-Reply-To", in_reply_to);
orig_references = notmuch_message_get_header (message, "references");
if (!orig_references)
/* Treat errors like missing References headers. */
orig_references = "";
references = talloc_asprintf (ctx, "%s%s%s",
*orig_references ? orig_references : "",
*orig_references ? " " : "",
in_reply_to);
g_mime_object_set_header (GMIME_OBJECT (reply),
"References", references);
return reply;
}
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 int
notmuch_reply_format_default(void *ctx,
notmuch_config_t *config,
notmuch_query_t *query,
notmuch_show_params_t *params)
{
GMimeMessage *reply;
notmuch_messages_t *messages;
notmuch_message_t *message;
const char *subject, *from_addr = NULL;
const char *in_reply_to, *orig_references, *references;
const notmuch_show_format_t *format = &format_reply;
for (messages = notmuch_query_search_messages (query);
notmuch_messages_valid (messages);
notmuch_messages_move_to_next (messages))
{
message = notmuch_messages_get (messages);
/* The 1 means we want headers in a "pretty" order. */
reply = g_mime_message_new (1);
if (reply == NULL) {
fprintf (stderr, "Out of memory\n");
return 1;
}
subject = notmuch_message_get_header (message, "subject");
if (subject) {
if (strncasecmp (subject, "Re:", 3))
subject = talloc_asprintf (ctx, "Re: %s", subject);
g_mime_message_set_subject (reply, subject);
}
from_addr = add_recipients_from_message (reply, config, message);
if (from_addr == NULL)
from_addr = guess_from_received_header (config, message);
if (from_addr == NULL)
from_addr = notmuch_config_get_user_primary_email (config);
from_addr = talloc_asprintf (ctx, "%s <%s>",
notmuch_config_get_user_name (config),
from_addr);
g_mime_object_set_header (GMIME_OBJECT (reply),
"From", from_addr);
in_reply_to = talloc_asprintf (ctx, "<%s>",
notmuch_message_get_message_id (message));
g_mime_object_set_header (GMIME_OBJECT (reply),
"In-Reply-To", in_reply_to);
orig_references = notmuch_message_get_header (message, "references");
references = talloc_asprintf (ctx, "%s%s%s",
orig_references ? orig_references : "",
orig_references ? " " : "",
in_reply_to);
g_mime_object_set_header (GMIME_OBJECT (reply),
"References", references);
show_reply_headers (reply);
g_object_unref (G_OBJECT (reply));
reply = NULL;
printf ("On %s, %s wrote:\n",
notmuch_message_get_header (message, "date"),
notmuch_message_get_header (message, "from"));
show_message_body (notmuch_message_get_filename (message),
format, params);
notmuch_message_destroy (message);
}
return 0;
}