/* $Id: account.c,v 1.55 2012/01/07 00:27:06 khorben Exp $ */ /* Copyright (c) 2006-2012 Pierre Pronchery */ /* This file is part of DeforaOS Desktop Mailer */ /* This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation, version 3 of the License. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include #include #include #include #include #include #include #include "folder.h" #include "mailer.h" #include "message.h" #include "account.h" #include "../config.h" /* constants */ #ifndef PREFIX # define PREFIX "/usr/local" #endif #ifndef LIBDIR # define LIBDIR PREFIX "/lib" #endif #define ACCOUNT "account" /* Account */ /* private */ /* types */ struct _Account { Mailer * mailer; char * type; char * title; GtkTreeStore * store; GtkTreeRowReference * row; Plugin * plugin; AccountPluginDefinition * definition; AccountPlugin * account; int enabled; AccountIdentity * identity; AccountPluginHelper helper; }; /* prototypes */ /* accessors */ static gboolean _account_get_iter(Account * account, GtkTreeIter * iter); static SSL_CTX * _account_helper_get_ssl_context(Account * account); /* useful */ static int _account_helper_error(Account * account, char const * message, int ret); static void _account_helper_status(Account * account, char const * format, ...); static char * _account_helper_authenticate(Account * account, char const * message); static int _account_helper_confirm(Account * account, char const * message); static Folder * _account_helper_folder_new(Account * account, AccountFolder * folder, Folder * parent, FolderType type, char const * name); static void _account_helper_folder_delete(Folder * folder); static Message * _account_helper_message_new(Account * account, Folder * folder, AccountMessage * message); static void _account_helper_message_delete(Message * message); static int _account_helper_message_set_body(Message * message, char const * buf, size_t cnt, int append); /* constants */ static const AccountPluginHelper _account_plugin_helper = { NULL, _account_helper_get_ssl_context, _account_helper_error, _account_helper_status, _account_helper_authenticate, _account_helper_confirm, _account_helper_folder_new, _account_helper_folder_delete, _account_helper_message_new, _account_helper_message_delete, message_set_header, _account_helper_message_set_body }; /* public */ /* functions */ /* account_new */ Account * account_new(Mailer * mailer, char const * type, char const * title, GtkTreeStore * store) { Account * account; GtkTreeIter iter; GtkTreePath * path; GtkIconTheme * theme; GdkPixbuf * pixbuf; #ifdef DEBUG fprintf(stderr, "DEBUG: account_new(%p, \"%s\", \"%s\", %p)\n", (void *)mailer, type, title, (void *)store); #endif if(type == NULL) return NULL; if((account = object_new(sizeof(*account))) == NULL) return NULL; memset(account, 0, sizeof(*account)); account->mailer = mailer; account->type = string_new(type); if(title != NULL) account->title = string_new(title); account->store = store; account->plugin = plugin_new(LIBDIR, PACKAGE, "account", type); account->definition = (account->plugin != NULL) ? plugin_lookup(account->plugin, "account_plugin") : NULL; if(account->type == NULL || account->plugin == NULL || account->definition == NULL || account->definition->init == NULL || account->definition->destroy == NULL || account->definition->get_config == NULL) { account_delete(account); error_set_code(1, "%s%s", "Invalid plug-in ", type); return NULL; } if(store != NULL) { theme = gtk_icon_theme_get_default(); pixbuf = gtk_icon_theme_load_icon(theme, "mailer-accounts", 16, 0, NULL); gtk_tree_store_append(store, &iter, NULL); gtk_tree_store_set(store, &iter, MFC_ACCOUNT, account, MFC_ICON, pixbuf, MFC_NAME, title, -1); path = gtk_tree_model_get_path(GTK_TREE_MODEL(store), &iter); account->row = gtk_tree_row_reference_new(GTK_TREE_MODEL(store), path); gtk_tree_path_free(path); } memcpy(&account->helper, &_account_plugin_helper, sizeof(account->helper)); account->helper.account = account; account->enabled = 1; account->identity = NULL; return account; } /* account_delete */ void account_delete(Account * account) { if(account->row != NULL) gtk_tree_row_reference_free(account->row); if(account->definition != NULL) { if(account->definition->destroy != NULL && account->account != NULL) account->definition->destroy(account->account); } string_delete(account->title); string_delete(account->type); if(account->plugin != NULL) plugin_delete(account->plugin); object_delete(account); } /* accessors */ /* account_get_config */ AccountConfig * account_get_config(Account * account) { return account->definition->get_config(account->account); } /* account_get_enabled */ int account_get_enabled(Account * account) { return account->enabled; } /* account_get_folders */ GtkTreeStore * account_get_folders(Account * account) { return account->store; } /* account_get_name */ char const * account_get_name(Account * account) { return account->definition->name; } /* account_get_title */ char const * account_get_title(Account * account) { return account->title; } /* account_get_type */ char const * account_get_type(Account * account) { return account->type; } /* account_set_enabled */ void account_set_enabled(Account * account, int enabled) { account->enabled = enabled ? 1 : 0; } /* account_set_title */ int account_set_title(Account * account, char const * title) { if(account->title != NULL) free(account->title); if((account->title = strdup(title != NULL ? title : "")) == NULL) return mailer_error(NULL, "strdup", 1); return 0; } /* useful */ /* account_config_load */ int account_config_load(Account * account, Config * config) { AccountConfig * p = account_get_config(account); char const * value; char * q; long l; #ifdef DEBUG fprintf(stderr, "DEBUG: account_config_load(%p)\n", (void*)config); #endif if(p == NULL) return 0; for(; p->name != NULL; p++) { if((value = config_get(config, account->title, p->name)) == NULL) continue; switch(p->type) { case ACT_PASSWORD: /* FIXME unscramble */ case ACT_FILE: case ACT_STRING: free(p->value); p->value = strdup(value); break; case ACT_UINT16: l = strtol(value, &q, 0); if(value[0] != '\0' && *q == '\0') p->value = (void*)l; break; case ACT_BOOLEAN: p->value = (strcmp(value, "yes") == 0 || strcmp(value, "1") == 0) ? (void *)1 : NULL; break; case ACT_NONE: case ACT_SEPARATOR: break; } } return 0; } /* account_config_save */ int account_config_save(Account * account, Config * config) { AccountConfig * p = account_get_config(account); uint16_t u16; char buf[6]; #ifdef DEBUG fprintf(stderr, "DEBUG: account_config_save(%p)\n", (void*)config); #endif if(config_set(config, account->title, "type", account->type) != 0) return 1; if(p == NULL) return 0; for(; p->name != NULL; p++) { switch(p->type) { case ACT_PASSWORD: /* FIXME scramble */ case ACT_FILE: case ACT_STRING: if(config_set(config, account->title, p->name, p->value) != 0) return 1; break; case ACT_UINT16: u16 = (uint16_t)p->value; snprintf(buf, sizeof(buf), "%hu", u16); if(config_set(config, account->title, p->name, buf) != 0) return 1; break; case ACT_BOOLEAN: if(config_set(config, account->title, p->name, (p->value != NULL) ? "1" : "0") != 0) return 1; break; case ACT_NONE: case ACT_SEPARATOR: break; } } return 0; } /* account_init */ int account_init(Account * account) { #ifdef DEBUG fprintf(stderr, "DEBUG: %s(%p)\n", __func__, (void*)account); #endif return (account->account = account->definition->init(&account->helper)) != NULL ? 0 : -1; } /* account_select */ GtkTextBuffer * account_select(Account * account, Folder * folder, Message * message) { AccountFolder * af; AccountMessage * am = NULL; #ifdef DEBUG fprintf(stderr, "DEBUG: %s(\"%s\", \"%s\", %p)\n", __func__, account_get_name(account), folder_get_name(folder), (void *)message); #endif if((af = folder_get_data(folder)) == NULL) return NULL; if(message != NULL && (am = message_get_data(message)) == NULL) return NULL; if(account->definition->refresh != NULL && account->definition->refresh(account->account, af, am) != 0) return NULL; return (message != NULL) ? message_get_body(message) : NULL; } /* account_select_source */ GtkTextBuffer * account_select_source(Account * account, Folder * folder, Message * message) { GtkTextBuffer * ret; char * p; #ifdef DEBUG fprintf(stderr, "DEBUG: %s(\"%s\", %p)\n", __func__, folder_get_name(folder), (void*)message); #endif if(account->definition->get_source == NULL) return NULL; ret = gtk_text_buffer_new(NULL); if((p = account->definition->get_source(account->account, folder_get_data(folder), message_get_data(message))) != NULL) { gtk_text_buffer_set_text(ret, p, -1); free(p); } return ret; } /* private */ /* functions */ /* accessors */ /* account_get_iter */ static gboolean _account_get_iter(Account * account, GtkTreeIter * iter) { GtkTreePath * path; if((path = gtk_tree_row_reference_get_path(account->row)) == NULL) return FALSE; return gtk_tree_model_get_iter(GTK_TREE_MODEL(account->store), iter, path); } /* account_helper_get_ssl_context */ static SSL_CTX * _account_helper_get_ssl_context(Account * account) { return mailer_get_ssl_context(account->mailer); } /* useful */ /* account_helper_error */ static int _account_helper_error(Account * account, char const * message, int ret) { Mailer * mailer = (account != NULL) ? account->mailer : NULL; return mailer_error(mailer, message, ret); } /* account_helper_status */ static void _account_helper_status(Account * account, char const * format, ...) { va_list ap; int res; size_t size; char * p = NULL; va_start(ap, format); res = vsprintf(NULL, format, ap); va_end(ap); if(res >= 0) { va_start(ap, format); size = res; if((p = malloc(++size)) != NULL) vsnprintf(p, size, format, ap); va_end(ap); } if(p != NULL) mailer_set_status(account->mailer, p); free(p); } /* account_helper_authenticate */ static char * _account_helper_authenticate(Account * account, char const * message) { char * ret = NULL; GtkWidget * dialog; GtkWidget * vbox; GtkWidget * widget; dialog = gtk_dialog_new(); /* XXX translate this, enumerate the methods available */ gtk_window_set_title(GTK_WINDOW(dialog), "Authentication"); #if GTK_CHECK_VERSION(2, 14, 0) vbox = gtk_dialog_get_content_area(GTK_DIALOG(dialog)); #else vbox = GTK_DIALOG(dialog)->vbox; #endif widget = gtk_label_new(message); gtk_box_pack_start(GTK_BOX(vbox), widget, FALSE, TRUE, 0); widget = gtk_entry_new(); gtk_entry_set_visibility(GTK_ENTRY(widget), FALSE); gtk_box_pack_start(GTK_BOX(vbox), widget, FALSE, TRUE, 0); gtk_dialog_add_buttons(GTK_DIALOG(dialog), GTK_STOCK_OK, GTK_RESPONSE_OK, GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL, NULL); gtk_widget_show_all(vbox); if(gtk_dialog_run(GTK_DIALOG(dialog)) == GTK_RESPONSE_OK) ret = strdup(gtk_entry_get_text(GTK_ENTRY(widget))); gtk_widget_destroy(dialog); return ret; } /* account_helper_confirm */ static int _account_helper_confirm(Account * account, char const * message) { int ret; GtkWidget * dialog; /* XXX set mailer's main window as the parent? */ dialog = gtk_message_dialog_new(NULL, 0, GTK_MESSAGE_QUESTION, GTK_BUTTONS_YES_NO, #if GTK_CHECK_VERSION(2, 6, 0) "%s", "Confirm"); gtk_message_dialog_format_secondary_text(GTK_MESSAGE_DIALOG(dialog), #endif "%s", message); /* XXX translate this */ gtk_window_set_title(GTK_WINDOW(dialog), "Confirm"); ret = (gtk_dialog_run(GTK_DIALOG(dialog)) == GTK_RESPONSE_YES) ? 0 : 1; gtk_widget_destroy(dialog); return ret; } /* account_helper_folder_new */ static Folder * _account_helper_folder_new(Account * account, AccountFolder * folder, Folder * parent, FolderType type, char const * name) { Folder * ret = NULL; GtkTreeModel * model = GTK_TREE_MODEL(account->store); GtkTreeIter aiter; GtkTreeIter * paiter = NULL; GtkTreeIter piter; GtkTreeIter * ppiter = NULL; GtkTreeIter siter; GtkTreeIter * psiter = NULL; GtkTreeIter iter; gint i; #ifdef DEBUG fprintf(stderr, "DEBUG: %s(%p, %p, %p, %u, \"%s\")\n", __func__, (void *)account, (void *)folder, (void *)parent, type, name); #endif /* lookup the account */ if(_account_get_iter(account, &aiter) == TRUE) paiter = &aiter; /* lookup the parent folder */ if(parent != NULL && folder_get_iter(parent, &piter) == TRUE) ppiter = &piter; else ppiter = paiter; /* lookup the following folder in sort order */ if(ppiter != NULL) for(i = 0; gtk_tree_model_iter_nth_child(model, &siter, ppiter, i) != FALSE; i++) { psiter = &siter; gtk_tree_model_get(model, &siter, MFC_FOLDER, &ret, -1); if(type == FT_INBOX && folder_get_type(ret) != FT_INBOX) break; if(type < folder_get_type(ret)) break; if(folder_get_type(ret) == type && strcmp(name, folder_get_name(ret)) < 0) break; psiter = NULL; } /* insert the folder in the model */ gtk_tree_store_insert_before(account->store, &iter, ppiter, psiter); /* actually register the folder */ if((ret = folder_new(folder, type, name, account->store, &iter)) == NULL) gtk_tree_store_remove(account->store, &iter); else gtk_tree_store_set(account->store, &iter, MFC_ACCOUNT, account, -1); return ret; } /* account_helper_folder_delete */ static void _account_helper_folder_delete(Folder * folder) { /* FIXME remove from the account */ folder_delete(folder); } /* account_helper_message_new */ static Message * _account_helper_message_new(Account * account, Folder * folder, AccountMessage * message) { Message * ret; GtkListStore * store; GtkTreeIter iter; #ifdef DEBUG fprintf(stderr, "DEBUG: %s()\n", __func__); #endif store = folder_get_messages(folder); gtk_list_store_append(store, &iter); if((ret = message_new(message, store, &iter)) == NULL) gtk_list_store_remove(store, &iter); else { gtk_list_store_set(store, &iter, MHC_ACCOUNT, account, MHC_FOLDER, folder, -1); mailer_set_status(account->mailer, NULL); } return ret; } /* account_helper_message_delete */ static void _account_helper_message_delete(Message * message) { GtkListStore * store; GtkTreeIter iter; if((store = message_get_store(message)) != NULL && message_get_iter(message, &iter) != FALSE) gtk_list_store_remove(store, &iter); message_delete(message); } /* account_helper_message_set_body */ static int _account_helper_message_set_body(Message * message, char const * buf, size_t cnt, int append) { return message_set_body(message, buf, cnt, (append != 0) ? TRUE : FALSE); }