#include <imap.h>
#include <sys/types.h>
#include <sys/stat.h>
-#if (defined (__NetBSD__) || defined (__FreeBSD__))
+#if (defined(__DragonFly__) || defined (__NetBSD__) || defined (__FreeBSD__) || defined (__CYGWIN__))
#include <sys/socket.h>
#endif
#include <fcntl.h>
#include <log.h>
#include "etpan-thread-manager.h"
#include "utils.h"
+#include "ssl_certificate.h"
#define DISABLE_LOG_DURING_LOGIN
return TRUE;
}
-void imap_logger(int direction, const char * str, size_t size)
+void imap_logger_cmd(int direction, const char * str, size_t size)
{
- gchar buf[512];
+ gchar *buf;
+ gchar **lines;
+ int i = 0;
+
+ buf = malloc(size+1);
+ memset(buf, 0, size+1);
+ strncpy(buf, str, size);
+ buf[size] = '\0';
- memset(buf, 0, 512);
- strncpy(buf, str, size > 510 ? 510:size);
- buf[511] = '\0';
- if (size < 511)
- buf[size] = '\0';
if (!strncmp(buf, "<<<<<<<", 7)
- || !strncmp(buf, ">>>>>>>", 7)
- || buf[0] == '\r' || buf[0] == '\n')
+ || !strncmp(buf, ">>>>>>>", 7)) {
+ free(buf);
return;
+ }
+ while (strstr(buf, "\r"))
+ *strstr(buf, "\r") = ' ';
+ while (strlen(buf) > 0 && buf[strlen(buf)-1] == '\n')
+ buf[strlen(buf)-1] = '\0';
+
+ lines = g_strsplit(buf, "\n", -1);
+
+ while (lines[i] && *lines[i]) {
+ log_print("IMAP4%c %s\n", direction?'>':'<', lines[i]);
+ i++;
+ }
+ g_strfreev(lines);
+ free(buf);
+}
+
+void imap_logger_fetch(int direction, const char * str, size_t size)
+{
+ gchar *buf;
+ gchar **lines;
+ int i = 0;
+ buf = malloc(size+1);
+ memset(buf, 0, size+1);
+ strncpy(buf, str, size);
+ buf[size] = '\0';
+ if (!strncmp(buf, "<<<<<<<", 7)
+ || !strncmp(buf, ">>>>>>>", 7)) {
+ free(buf);
+ return;
+ }
while (strstr(buf, "\r"))
*strstr(buf, "\r") = ' ';
- while (strstr(buf, "\n"))
- *strstr(buf, "\n") = ' ';
+ while (strlen(buf) > 0 && buf[strlen(buf)-1] == '\n')
+ buf[strlen(buf)-1] = '\0';
+
+ lines = g_strsplit(buf, "\n", -1);
- log_print("IMAP4%c %s\n", direction?'>':'<', buf);
+ if (direction != 0 || (buf[0] == '*' && buf[1] == ' ') || size < 32) {
+ while (lines[i] && *lines[i]) {
+ log_print("IMAP4%c %s\n", direction?'>':'<', lines[i]);
+ i++;
+ }
+ } else {
+ log_print("IMAP4%c [data - %zd bytes]\n", direction?'>':'<', size);
+ }
+ g_strfreev(lines);
+ free(buf);
}
#define ETPAN_DEFAULT_NETWORK_TIMEOUT 60
mailstream_network_delay.tv_usec = 0;
mailstream_debug = 1;
- mailstream_logger = imap_logger;
+ mailstream_logger = imap_logger_cmd;
imap_hash = chash_new(CHASH_COPYKEY, CHASH_DEFAULTSIZE);
session_hash = chash_new(CHASH_COPYKEY, CHASH_DEFAULTSIZE);
return result.error;
}
+static int etpan_certificate_check(const unsigned char *certificate, int len, void *data)
+{
+#ifdef USE_OPENSSL
+ struct connect_param *param = (struct connect_param *)data;
+ X509 *cert = NULL;
+
+ if (certificate == NULL || len < 0) {
+ g_warning("no cert presented.\n");
+ return 0;
+ }
+ cert = d2i_X509(NULL, (unsigned char **) &certificate, len);
+ if (cert == NULL) {
+ g_warning("can't get cert\n");
+ return 0;
+ } else if (ssl_certificate_check(cert,
+ (gchar *)param->server, param->port) == TRUE) {
+ return 0;
+ } else {
+ return -1;
+ }
+#else
+ return 0;
+#endif
+}
static void connect_ssl_run(struct etpan_thread_op * op)
{
r = mailimap_ssl_connect(param->imap,
param->server, param->port);
-
result->error = r;
}
chashdatum key;
chashdatum value;
mailimap * imap;
-
+ unsigned char *certificate = NULL;
+ int cert_len;
+
imap = mailimap_new(0, NULL);
key.data = &folder;
threaded_run(folder, ¶m, &result, connect_ssl_run);
+ if (result.error >= 0) {
+ cert_len = mailstream_ssl_get_certificate(imap->imap_stream, &certificate);
+ if (etpan_certificate_check(certificate, cert_len, ¶m) < 0)
+ return -1;
+ if (certificate)
+ free(certificate);
+ }
debug_print("connect %d\n", result.error);
return result.error;
}
-struct starttls_param {
- mailimap * imap;
-};
-
struct starttls_result {
int error;
};
static void starttls_run(struct etpan_thread_op * op)
{
- struct starttls_param * param;
+ struct connect_param * param;
struct starttls_result * result;
int r;
-
+
param = op->param;
r = mailimap_starttls(param->imap);
result->error = MAILIMAP_ERROR_STREAM;
return;
}
- tls_low = mailstream_low_ssl_open(fd);
+
+ tls_low = mailstream_low_tls_open(fd);
if (tls_low == NULL) {
- debug_print("imap starttls run - can't ssl_open\n");
+ debug_print("imap starttls run - can't tls_open\n");
result->error = MAILIMAP_ERROR_STREAM;
return;
}
}
}
-int imap_threaded_starttls(Folder * folder)
+int imap_threaded_starttls(Folder * folder, const gchar *host, int port)
{
- struct starttls_param param;
+ struct connect_param param;
struct starttls_result result;
+ int cert_len;
+ unsigned char *certificate;
debug_print("imap starttls - begin\n");
param.imap = get_imap(folder);
+ param.server = host;
+ param.port = port;
threaded_run(folder, ¶m, &result, starttls_run);
debug_print("imap starttls - end\n");
+ if (result.error == 0) {
+ cert_len = mailstream_ssl_get_certificate(param.imap->imap_stream, &certificate);
+ if (etpan_certificate_check(certificate, cert_len, ¶m) < 0)
+ result.error = MAILIMAP_ERROR_STREAM;
+ if (certificate)
+ free(certificate);
+ }
return result.error;
}
clist * search_result;
};
+static struct mailimap_set_item *sc_mailimap_set_item_copy(struct mailimap_set_item *orig)
+{
+ return mailimap_set_item_new(orig->set_first, orig->set_last);
+}
+
+static struct mailimap_set *sc_mailimap_set_copy(struct mailimap_set *orig)
+{
+ clist *list = orig ? orig->set_list : NULL;
+ clist *newlist = clist_new();
+ clistiter *cur;
+
+ if (!orig)
+ return NULL;
+ for (cur = clist_begin(list); cur; cur = clist_next(cur))
+ clist_append(newlist,
+ sc_mailimap_set_item_copy(
+ (struct mailimap_set_item *)clist_content(cur)));
+ return mailimap_set_new(newlist);
+}
+
static void search_run(struct etpan_thread_op * op)
{
struct search_param * param;
param = op->param;
- uid_key = mailimap_search_key_new_uid(param->set);
+ /* we copy the mailimap_set because freeing the key is recursive */
+ uid_key = mailimap_search_key_new_uid(sc_mailimap_set_copy(param->set));
search_type_key = NULL;
switch (param->type) {
r = mailimap_uid_search(param->imap, NULL, key, &search_result);
+ /* free the key (with the imapset) */
+ mailimap_search_key_free(key);
+
result = op->result;
result->error = r;
result->search_result = search_result;
goto free_fetch_att;
}
+ mailstream_logger = imap_logger_fetch;
+
r = mailimap_uid_fetch(imap, set,
fetch_type, &fetch_result);
+ mailstream_logger = imap_logger_cmd;
+
mailimap_fetch_type_free(fetch_type);
mailimap_set_free(set);
struct append_result {
int error;
+ int uid;
};
static void append_run(struct etpan_thread_op * op)
char * data;
size_t size;
struct stat stat_buf;
- int fd;
+ int fd, uid = 0;
param = op->param;
result = op->result;
r = mailimap_append(param->imap, param->mailbox,
param->flag_list, NULL,
- data, size);
+ data, size/*, &uid */);
munmap(data, size);
close(fd);
result->error = r;
-
- debug_print("imap append run - end %i\n", r);
+ result->uid = uid;
+ debug_print("imap append run - end %i uid %d\n", r, uid);
}
int imap_threaded_append(Folder * folder, const char * mailbox,
const char * filename,
- struct mailimap_flag_list * flag_list)
+ struct mailimap_flag_list * flag_list,
+ int *uid)
{
struct append_param param;
struct append_result result;
return result.error;
debug_print("imap append - end\n");
-
+ if (uid != NULL)
+ *uid = result.uid;
+
return result.error;
}
}
r = mailimap_connect(imap, s);
- if (r != MAILIMAP_NO_ERROR) {
+ if (r != MAILIMAP_NO_ERROR_AUTHENTICATED
+ && r != MAILIMAP_NO_ERROR_NON_AUTHENTICATED) {
mailstream_close(s);
return r;
}
- return MAILIMAP_NO_ERROR;
+ return r;
}
/* connect cmd */
projects / claws.git / blobdiff