aboutsummaryrefslogblamecommitdiffstats
path: root/plugins/mailing-list-actions/mailing-list-actions.c
blob: f8ae698a80e2534cb14ec8c823607bed79a2f984 (plain) (tree)
1
2
3
4
5
6
7
8
9
10





                                                          



                    


























                                    
                           



























































                                                                                                           
                                              

                               

                                  
                          
 


                        































                                                                                                                                           
                                                            

                                                       
                                                               
                                                                        

                                                                                                                                         



                                                                             
                                                                                                         
                                                                                                                                


                                                                              
                                                                                                 



                                  
                                           




                                                                
                             















                                                                                     
                    






























                                                                   
/*
 * Copyright (C) 2004 Meilof Veeningen <meilof@wanadoo.nl>
 *
 * This file is licensed under the GNU GPL v2 or later
 */

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <glib/gi18n-lib.h>
#include <stdio.h>
#include <string.h>
#include <gconf/gconf-client.h>
#include <gtk/gtkcombobox.h>
#include <gtk/gtkliststore.h>
#include <gtk/gtkcellrenderertext.h>
#include <gtk/gtkcelllayout.h>
#include <gtk/gtktable.h>
#include <gtk/gtklabel.h>
#include <gtk/gtkmenuitem.h>
#include <gtk/gtkdialog.h>
#include <libgnome/gnome-url.h>

#include "camel/camel-multipart.h"
#include "camel/camel-mime-part.h"
#include "camel/camel-exception.h"
#include "camel/camel-folder.h"
#include "composer/e-msg-composer.h"
#include "mail/em-composer-utils.h"
#include "mail/em-format-hook.h"
#include "mail/em-format.h"
#include "mail/em-menu.h"
#include "mail/em-config.h"
#include "mail/mail-ops.h"
#include "mail/mail-mt.h"
#include "mail/mail-config.h"
#include "e-util/e-error.h"

typedef enum {
    EMLA_ACTION_HELP,
    EMLA_ACTION_UNSUBSCRIBE,
    EMLA_ACTION_SUBSCRIBE,
    EMLA_ACTION_POST,
    EMLA_ACTION_OWNER,
    EMLA_ACTION_ARCHIVE
} EmlaAction;

typedef struct {
    EmlaAction action;    /* action enumeration */
    gboolean interactive; /* whether the user needs to edit a mailto: message (e.g. for post action) */
    const char* header;   /* header representing the action */
} EmlaActionHeader;

const EmlaActionHeader emla_action_headers[] = {
    { EMLA_ACTION_HELP,        FALSE, "List-Help" },
    { EMLA_ACTION_UNSUBSCRIBE, TRUE,  "List-Unsubscribe" },
    { EMLA_ACTION_SUBSCRIBE,   FALSE, "List-Subscribe" },
    { EMLA_ACTION_POST,        TRUE,  "List-Post" },
    { EMLA_ACTION_OWNER,       TRUE,  "List-Owner" },
    { EMLA_ACTION_ARCHIVE,     FALSE, "List-Archive" },
};

const int emla_n_action_headers = sizeof(emla_action_headers) / sizeof(EmlaActionHeader);

void emla_list_action (EPlugin *item, EMMenuTargetSelect* sel, EmlaAction action);
void emla_list_help (EPlugin *item, EMMenuTargetSelect* sel);
void emla_list_unsubscribe (EPlugin *item, EMMenuTargetSelect* sel);
void emla_list_subscribe (EPlugin *item, EMMenuTargetSelect* sel);
void emla_list_post (EPlugin *item, EMMenuTargetSelect* sel);
void emla_list_owner (EPlugin *item, EMMenuTargetSelect* sel);
void emla_list_archive (EPlugin *item, EMMenuTargetSelect* sel);

void emla_list_action_do (CamelFolder *folder, const char *uid, CamelMimeMessage *msg, void *data);

typedef struct {
    EmlaAction action;
    char* uri;
} emla_action_data;

void emla_list_action (EPlugin *item, EMMenuTargetSelect* sel, EmlaAction action)
{
    emla_action_data *data;

    g_return_if_fail (sel->uids->len == 1);

    data = (emla_action_data *) malloc (sizeof (emla_action_data));
    data->action = action;
    data->uri = strdup (sel->uri);

    mail_get_message (sel->folder, (const char*) g_ptr_array_index (sel->uids, 0),
                      emla_list_action_do, data, mail_thread_new);
}
    
void emla_list_action_do (CamelFolder *folder, const char *uid, CamelMimeMessage *msg, void *data)
{
    emla_action_data *action_data = (emla_action_data *) data;
    EmlaAction action = action_data->action;
    const char* header = NULL, *headerpos;
    char *end, *url = NULL;
    int t;
    EMsgComposer *composer;
    int send_message_response;
    EAccount *account;

    if (msg == NULL)
        return;

    for (t = 0; t < emla_n_action_headers; t++) {
        if (emla_action_headers[t].action == action &&
            (header = camel_medium_get_header (CAMEL_MEDIUM (msg), emla_action_headers[t].header)) != NULL)
            break;
    }

    if (!header) {
        /* there was no header matching the action */
        e_error_run (NULL, "org.gnome.mailing-list-actions:no-header", NULL);
        goto exit;
    }

    headerpos = header;

    if (action == EMLA_ACTION_POST) {
        while (*headerpos == ' ') headerpos++;
        if (g_ascii_strcasecmp (headerpos, "NO") == 0) {
            e_error_run (NULL, "org.gnome.mailing-list-actions:posting-not-allowed", NULL);
            goto exit;
        }
    }
    
    /* parse the action value */
    while (*headerpos) {
        /* skip whitespace */
        while (*headerpos == ' ') headerpos++;
        if (*headerpos != '<' || (end = strchr (headerpos++, '>')) == NULL) {
            e_error_run (NULL, "org.gnome.mailing-list-actions:malformed-header", emla_action_headers[t].header, header, NULL);
            goto exit;
        }
        
        /* get URL portion */
        url = g_strndup(headerpos, end - headerpos);

        if (strncmp (url, "mailto:", 6) == 0) {
            if (emla_action_headers[t].interactive)
                send_message_response = GTK_RESPONSE_NO;
            else
                send_message_response = e_error_run (NULL, "org.gnome.mailing-list-actions:ask-send-message", url, NULL);

            if (send_message_response == GTK_RESPONSE_YES) {
                /* directly send message */
                composer = e_msg_composer_new_from_url (url);
                if ((account = mail_config_get_account_by_source_url (action_data->uri)))
                    e_msg_composer_hdrs_set_from_account (e_msg_composer_get_hdrs(composer), account->name);
                em_utils_composer_send_cb (composer, NULL);
            } else if (send_message_response == GTK_RESPONSE_NO) {
                /* show composer */
                em_utils_compose_new_message_with_mailto (url, action_data->uri);
            }

            goto exit;
        } else {
            GError *err = NULL;
            gnome_url_show (url, &err);
            if (!err)
                goto exit;
            g_error_free (err);         
        }
        g_free (url);
        url = NULL;
        headerpos = end++;
        
        /* ignore everything 'till next comma */
        headerpos = strchr (headerpos, ',');
        if (!headerpos)
            break;
        headerpos++;
    }
    
    /* if we got here, there's no valid action */
    e_error_run (NULL, "org.gnome.mailing-list-actions:no-action", header, NULL);
    
exit:
    free (action_data->uri);
    free (action_data);
    g_free(url);
}

void emla_list_help (EPlugin *item, EMMenuTargetSelect* sel)
{
    emla_list_action (item, sel, EMLA_ACTION_HELP);
}

void emla_list_unsubscribe (EPlugin *item, EMMenuTargetSelect* sel)
{
    emla_list_action (item, sel, EMLA_ACTION_UNSUBSCRIBE);
}

void emla_list_subscribe (EPlugin *item, EMMenuTargetSelect* sel)
{
    emla_list_action (item, sel, EMLA_ACTION_SUBSCRIBE);
}

void emla_list_post (EPlugin *item, EMMenuTargetSelect* sel)
{
    emla_list_action (item, sel, EMLA_ACTION_POST);
}

void emla_list_owner (EPlugin *item, EMMenuTargetSelect* sel)
{
    emla_list_action (item, sel, EMLA_ACTION_OWNER);
}

void emla_list_archive (EPlugin *item, EMMenuTargetSelect* sel)
{
    emla_list_action (item, sel, EMLA_ACTION_ARCHIVE);
}