2 This file is part of libquickmail.
4 libquickmail is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation, either version 3 of the License, or
7 (at your option) any later version.
9 libquickmail is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with libquickmail. If not, see <http://www.gnu.org/licenses/>.
18 #include "quickmail.h"
26 #include <curl/curl.h>
28 #define NEWLINE "\r\n"
29 #define NEWLINELENGTH 2
31 #define MIME_LINE_WIDTH 72
32 #define BODY_BUFFER_SIZE 256
34 //definitions of the differen stages of generating the message data
35 #define MAILPART_INITIALIZE 0
36 #define MAILPART_HEADER 1
37 #define MAILPART_BODY 2
38 #define MAILPART_BODY_DONE 3
39 #define MAILPART_ATTACHMENT 4
40 #define MAILPART_END 5
41 #define MAILPART_DONE 6
43 static const char* default_mime_type = "text/plain; charset=UTF-8";
45 ////////////////////////////////////////////////////////////////////////
47 #define DEBUG_ERROR(errmsg)
48 static const char* ERRMSG_MEMORY_ALLOCATION_ERROR = "Memory allocation error";
50 ////////////////////////////////////////////////////////////////////////
52 char* randomize_zeros (char* data)
54 //replace all 0s with random digits
58 *p = '0' + rand() % 10;
64 char* str_append (char** data, const char* newdata)
66 //append a string to the end of an existing string
68 int len = (*data ? strlen(*data) : 0);
69 if ((p = (char*)realloc(*data, len + strlen(newdata) + 1)) == NULL) {
71 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
75 strcpy(*data + len, newdata);
79 ////////////////////////////////////////////////////////////////////////
81 struct email_info_struct {
82 int current; //must be zet to 0
85 struct email_info_email_list_struct* to;
86 struct email_info_email_list_struct* cc;
87 struct email_info_email_list_struct* bcc;
90 struct email_info_attachment_list_struct* bodylist;
91 struct email_info_attachment_list_struct* attachmentlist;
94 char* mime_boundary_body;
95 char* mime_boundary_part;
96 struct email_info_attachment_list_struct* current_attachment;
101 ////////////////////////////////////////////////////////////////////////
103 struct email_info_email_list_struct {
105 struct email_info_email_list_struct* next;
108 void email_info_string_list_add (struct email_info_email_list_struct** list, const char* data)
110 struct email_info_email_list_struct** p = list;
113 if ((*p = (struct email_info_email_list_struct*)malloc(sizeof(struct email_info_email_list_struct))) == NULL) {
114 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
117 (*p)->data = (data ? strdup(data) : NULL);
121 void email_info_string_list_free (struct email_info_email_list_struct** list)
123 struct email_info_email_list_struct* p = *list;
124 struct email_info_email_list_struct* current;
134 char* email_info_string_list_concatenate (struct email_info_email_list_struct* list)
137 struct email_info_email_list_struct* listentry = list;
139 if (listentry->data && *listentry->data) {
141 str_append(&result, "," NEWLINE "\t");
142 str_append(&result, "<");
143 str_append(&result, listentry->data);
144 str_append(&result, ">");
146 listentry = listentry->next;
151 ////////////////////////////////////////////////////////////////////////
153 struct email_info_attachment_list_struct {
158 quickmail_attachment_open_fn email_info_attachment_open;
159 quickmail_attachment_read_fn email_info_attachment_read;
160 quickmail_attachment_close_fn email_info_attachment_close;
161 quickmail_attachment_free_filedata_fn email_info_attachment_filedata_free;
162 struct email_info_attachment_list_struct* next;
165 struct email_info_attachment_list_struct* email_info_attachment_list_add (struct email_info_attachment_list_struct** list, const char* filename, const char* mimetype, void* filedata, quickmail_attachment_open_fn email_info_attachment_open, quickmail_attachment_read_fn email_info_attachment_read, quickmail_attachment_close_fn email_info_attachment_close, quickmail_attachment_free_filedata_fn email_info_attachment_filedata_free)
167 struct email_info_attachment_list_struct** p = list;
170 if ((*p = (struct email_info_attachment_list_struct*)malloc(sizeof(struct email_info_attachment_list_struct))) == NULL) {
171 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
174 (*p)->filename = strdup(filename ? filename : "UNNAMED");
175 (*p)->mimetype = (mimetype ? strdup(mimetype) : NULL);
176 (*p)->filedata = filedata;
178 (*p)->email_info_attachment_open = email_info_attachment_open;
179 (*p)->email_info_attachment_read = email_info_attachment_read;
180 (*p)->email_info_attachment_close = email_info_attachment_close;
181 (*p)->email_info_attachment_filedata_free = email_info_attachment_filedata_free;
186 void email_info_attachment_list_free_entry (struct email_info_attachment_list_struct* current)
188 if (current->handle) {
189 if (current->email_info_attachment_close)
190 current->email_info_attachment_close(current->handle);
192 // free(current->handle);
193 current->handle = NULL;
195 if (current->filedata) {
196 if (current->email_info_attachment_filedata_free)
197 current->email_info_attachment_filedata_free(current->filedata);
199 free(current->filedata);
201 if (current->mimetype)
202 free(current->mimetype);
203 free(current->filename);
207 void email_info_attachment_list_free (struct email_info_attachment_list_struct** list)
209 struct email_info_attachment_list_struct* p = *list;
210 struct email_info_attachment_list_struct* current;
214 email_info_attachment_list_free_entry(current);
219 int email_info_attachment_list_delete (struct email_info_attachment_list_struct** list, const char* filename)
221 struct email_info_attachment_list_struct** p = list;
223 if (strcmp((*p)->filename, filename) == 0) {
224 struct email_info_attachment_list_struct* current = *p;
226 email_info_attachment_list_free_entry(current);
234 void email_info_attachment_list_close_handles (struct email_info_attachment_list_struct* list)
236 struct email_info_attachment_list_struct* p = list;
239 if (p->email_info_attachment_close)
240 p->email_info_attachment_close(p->handle);
249 //dummy attachment functions
251 void* email_info_attachment_open_dummy (void *)
253 return (void *) &email_info_attachment_open_dummy;
256 size_t email_info_attachment_read_dummy (void *, void *, size_t)
261 struct email_info_attachment_list_struct* email_info_attachment_list_add_dummy (struct email_info_attachment_list_struct** list, const char* filename, const char* mimetype)
263 return email_info_attachment_list_add(list, filename, mimetype, NULL, email_info_attachment_open_dummy, email_info_attachment_read_dummy, NULL, NULL);
266 //file attachment functions
268 void* email_info_attachment_open_file (void* filedata)
270 return (void*)fopen((char*)filedata, "rb");
273 size_t email_info_attachment_read_file (void* handle, void* buf, size_t len)
275 return fread(buf, 1, len, (FILE*)handle);
278 void email_info_attachment_close_file (void* handle)
281 fclose((FILE*)handle);
284 struct email_info_attachment_list_struct* email_info_attachment_list_add_file (struct email_info_attachment_list_struct** list, const char* path, const char* mimetype)
286 //determine base filename
287 const char* basename = path + strlen(path);
288 while (basename != path) {
292 || *basename == '\\' || *basename == ':'
299 return email_info_attachment_list_add(list, basename, mimetype, (void*)strdup(path), email_info_attachment_open_file, email_info_attachment_read_file, email_info_attachment_close_file, NULL);
302 //memory attachment functions
304 struct email_info_attachment_memory_filedata_struct {
310 struct email_info_attachment_memory_handle_struct {
316 void* email_info_attachment_open_memory (void* filedata)
318 struct email_info_attachment_memory_filedata_struct* data;
319 struct email_info_attachment_memory_handle_struct* result;
320 data = ((struct email_info_attachment_memory_filedata_struct*)filedata);
323 if ((result = (struct email_info_attachment_memory_handle_struct*)malloc(sizeof(struct email_info_attachment_memory_handle_struct))) == NULL) {
324 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
327 result->data = data->data;
328 result->datalen = data->datalen;
333 size_t email_info_attachment_read_memory (void* handle, void* buf, size_t len)
335 struct email_info_attachment_memory_handle_struct* h = (struct email_info_attachment_memory_handle_struct*)handle;
336 size_t n = (h->pos + len <= h->datalen ? len : h->datalen - h->pos);
337 memcpy(buf, h->data + h->pos, n);
342 void email_info_attachment_close_memory (void* handle)
348 void email_info_attachment_filedata_free_memory (void* filedata)
350 struct email_info_attachment_memory_filedata_struct* data = ((struct email_info_attachment_memory_filedata_struct*)filedata);
358 struct email_info_attachment_list_struct* email_info_attachment_list_add_memory (struct email_info_attachment_list_struct** list, const char* filename, const char* mimetype, char* data, size_t datalen, int mustfree)
360 struct email_info_attachment_memory_filedata_struct* filedata;
361 if ((filedata = (struct email_info_attachment_memory_filedata_struct*)malloc(sizeof(struct email_info_attachment_memory_filedata_struct))) == NULL) {
362 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
365 filedata->data = data;
366 filedata->datalen = datalen;
367 filedata->mustfree = mustfree;
368 return email_info_attachment_list_add(list, filename, mimetype, filedata, email_info_attachment_open_memory, email_info_attachment_read_memory, email_info_attachment_close_memory, email_info_attachment_filedata_free_memory);
371 ////////////////////////////////////////////////////////////////////////
373 int quickmail_initialize ()
378 quickmail quickmail_create (const char* from, const char* subject)
381 struct email_info_struct* mailobj;
382 if ((mailobj = (struct email_info_struct*)malloc(sizeof(struct email_info_struct))) == NULL) {
383 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
386 mailobj->current = 0;
387 mailobj->timestamp = time(NULL);
388 mailobj->from = (from ? strdup(from) : NULL);
392 mailobj->subject = (subject ? strdup(subject) : NULL);
393 mailobj->header = NULL;
394 mailobj->bodylist = NULL;
395 mailobj->attachmentlist = NULL;
398 mailobj->mime_boundary_body = NULL;
399 mailobj->mime_boundary_part = NULL;
400 mailobj->current_attachment = NULL;
401 mailobj->debuglog = NULL;
402 for (i = 0; i < 26; i++) {
403 mailobj->dtable[i] = (char)('A' + i);
404 mailobj->dtable[26 + i] = (char)('a' + i);
406 for (i = 0; i < 10; i++) {
407 mailobj->dtable[52 + i] = (char)('0' + i);
409 mailobj->dtable[62] = '+';
410 mailobj->dtable[63] = '/';
415 void quickmail_destroy (quickmail mailobj)
418 email_info_string_list_free(&mailobj->to);
419 email_info_string_list_free(&mailobj->cc);
420 email_info_string_list_free(&mailobj->bcc);
421 free(mailobj->subject);
422 free(mailobj->header);
423 email_info_attachment_list_free(&mailobj->bodylist);
424 email_info_attachment_list_free(&mailobj->attachmentlist);
426 free(mailobj->mime_boundary_body);
427 free(mailobj->mime_boundary_part);
431 void quickmail_set_from (quickmail mailobj, const char* from)
434 mailobj->from = strdup(from);
437 const char* quickmail_get_from (quickmail mailobj)
439 return mailobj->from;
442 void quickmail_add_to (quickmail mailobj, const char* email)
444 email_info_string_list_add(&mailobj->to, email);
447 void quickmail_add_cc (quickmail mailobj, const char* email)
449 email_info_string_list_add(&mailobj->cc, email);
452 void quickmail_add_bcc (quickmail mailobj, const char* email)
454 email_info_string_list_add(&mailobj->bcc, email);
457 void quickmail_set_subject (quickmail mailobj, const char* subject)
459 free(mailobj->subject);
460 mailobj->subject = (subject ? strdup(subject) : NULL);
463 const char* quickmail_get_subject (quickmail mailobj)
465 return mailobj->subject;
468 void quickmail_add_header (quickmail mailobj, const char* headerline)
470 str_append(&mailobj->header, headerline);
471 str_append(&mailobj->header, NEWLINE);
474 void quickmail_set_body (quickmail mailobj, const char* body)
476 email_info_attachment_list_free(&mailobj->bodylist);
478 email_info_attachment_list_add_memory(&mailobj->bodylist, default_mime_type, default_mime_type, strdup(body), strlen(body), 1);
481 char* quickmail_get_body (quickmail mailobj)
486 size_t resultlen = 0;
487 if (mailobj->bodylist && (mailobj->bodylist->handle = mailobj->bodylist->email_info_attachment_open(mailobj->bodylist->filedata)) != NULL) {
489 if ((p = (char*)realloc(result, resultlen + BODY_BUFFER_SIZE)) == NULL) {
492 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
496 if ((n = mailobj->bodylist->email_info_attachment_read(mailobj->bodylist->handle, result + resultlen, BODY_BUFFER_SIZE)) > 0)
499 if (mailobj->bodylist->email_info_attachment_close)
500 mailobj->bodylist->email_info_attachment_close(mailobj->bodylist->handle);
502 // free(mailobj->bodylist->handle);
503 mailobj->bodylist->handle = NULL;
508 void quickmail_add_body_file (quickmail mailobj, const char* mimetype, const char* path)
510 email_info_attachment_list_add(&mailobj->bodylist, (mimetype ? mimetype : default_mime_type), (mimetype ? mimetype : default_mime_type), (void*)strdup(path), email_info_attachment_open_file, email_info_attachment_read_file, email_info_attachment_close_file, NULL);
513 void quickmail_add_body_memory (quickmail mailobj, const char* mimetype, char* data, size_t datalen, int mustfree)
515 email_info_attachment_list_add_memory(&mailobj->bodylist, (mimetype ? mimetype : default_mime_type), (mimetype ? mimetype : default_mime_type), data, datalen, mustfree);
518 void quickmail_add_body_custom (quickmail mailobj, const char* mimetype, char* data, quickmail_attachment_open_fn attachment_data_open, quickmail_attachment_read_fn attachment_data_read, quickmail_attachment_close_fn attachment_data_close, quickmail_attachment_free_filedata_fn attachment_data_filedata_free)
520 email_info_attachment_list_add(&mailobj->bodylist, (mimetype ? mimetype : default_mime_type), (mimetype ? mimetype : default_mime_type), data, (attachment_data_open ? attachment_data_open : email_info_attachment_open_dummy), (attachment_data_read ? attachment_data_read : email_info_attachment_read_dummy), attachment_data_close, attachment_data_filedata_free);
523 int quickmail_remove_body (quickmail mailobj, const char* mimetype)
525 return email_info_attachment_list_delete(&mailobj->bodylist, mimetype);
528 void quickmail_list_bodies (quickmail mailobj, quickmail_list_attachment_callback_fn callback, void* callbackdata)
530 struct email_info_attachment_list_struct* p = mailobj->bodylist;
532 callback(mailobj, p->filename, p->mimetype, p->email_info_attachment_open, p->email_info_attachment_read, p->email_info_attachment_close, callbackdata);
537 void quickmail_add_attachment_file (quickmail mailobj, const char* path, const char* mimetype)
539 email_info_attachment_list_add_file(&mailobj->attachmentlist, path, mimetype);
542 void quickmail_add_attachment_memory (quickmail mailobj, const char* filename, const char* mimetype, char* data, size_t datalen, int mustfree)
544 email_info_attachment_list_add_memory(&mailobj->attachmentlist, filename, mimetype, data, datalen, mustfree);
547 void quickmail_add_attachment_custom (quickmail mailobj, const char* filename, const char* mimetype, char* data, quickmail_attachment_open_fn attachment_data_open, quickmail_attachment_read_fn attachment_data_read, quickmail_attachment_close_fn attachment_data_close, quickmail_attachment_free_filedata_fn attachment_data_filedata_free)
549 email_info_attachment_list_add(&mailobj->attachmentlist, filename, mimetype, data, (attachment_data_open ? attachment_data_open : email_info_attachment_open_dummy), (attachment_data_read ? attachment_data_read : email_info_attachment_read_dummy), attachment_data_close, attachment_data_filedata_free);
552 int quickmail_remove_attachment (quickmail mailobj, const char* filename)
554 return email_info_attachment_list_delete(&mailobj->attachmentlist, filename);
557 void quickmail_list_attachments (quickmail mailobj, quickmail_list_attachment_callback_fn callback, void* callbackdata)
559 struct email_info_attachment_list_struct* p = mailobj->attachmentlist;
561 callback(mailobj, p->filename, p->mimetype, p->email_info_attachment_open, p->email_info_attachment_read, p->email_info_attachment_close, callbackdata);
566 void quickmail_set_debug_log (quickmail mailobj, FILE* filehandle)
568 mailobj->debuglog = filehandle;
571 void quickmail_fsave (quickmail mailobj, FILE* filehandle)
575 while ((n = quickmail_get_data(buf, sizeof(buf), 1, mailobj)) > 0) {
576 for (size_t i = 0; i < n; i++)
577 fprintf(filehandle, "%c", buf[i]);
581 size_t quickmail_get_data (void* ptr, size_t size, size_t nmemb, void* userp)
583 struct email_info_struct* mailobj = (struct email_info_struct*)userp;
585 //abort if no data is requested
586 if (size * nmemb == 0)
589 //initialize on first run
590 if (mailobj->current == MAILPART_INITIALIZE) {
594 free(mailobj->mime_boundary_body);
595 mailobj->mime_boundary_body = NULL;
596 free(mailobj->mime_boundary_part);
597 mailobj->mime_boundary_part = NULL;
598 mailobj->current_attachment = mailobj->bodylist;
602 //process current part of mail if no partial data is pending
603 while (mailobj->buflen == 0) {
604 if (mailobj->buflen == 0 && mailobj->current == MAILPART_HEADER) {
606 //generate header part
607 char** p = &mailobj->buf;
609 str_append(p, "User-Agent: libquickmail\n");
610 if (mailobj->timestamp != 0) {
611 char timestamptext[32];
612 if (strftime(timestamptext, sizeof(timestamptext), "%a, %d %b %Y %H:%M:%S %z", localtime(&mailobj->timestamp))) {
\r
613 str_append(p, "Date: ");
614 str_append(p, timestamptext);
615 str_append(p, NEWLINE);
618 //fallback method for Windows when %z (time zone offset) fails
619 else if (strftime(timestamptext, sizeof(timestamptext), "%a, %d %b %Y %H:%M:%S", localtime(&mailobj->timestamp))) {
\r
620 TIME_ZONE_INFORMATION tzinfo;
\r
621 if (GetTimeZoneInformation(&tzinfo) != TIME_ZONE_ID_INVALID)
\r
622 sprintf(timestamptext + strlen(timestamptext), " %c%02i%02i", (tzinfo.Bias > 0 ? '-' : '+'), (int)-tzinfo.Bias / 60, (int)-tzinfo.Bias % 60);
\r
623 str_append(p, "Date: ");
624 str_append(p, timestamptext);
625 str_append(p, NEWLINE);
629 if (mailobj->from && *mailobj->from) {
630 str_append(p, "From: <");
631 str_append(p, mailobj->from);
632 str_append(p, ">" NEWLINE);
634 if ((s = email_info_string_list_concatenate(mailobj->to)) != NULL) {
635 str_append(p, "To: ");
637 str_append(p, NEWLINE);
640 if ((s = email_info_string_list_concatenate(mailobj->cc)) != NULL) {
641 str_append(p, "Cc: ");
643 str_append(p, NEWLINE);
646 if (mailobj->subject) {
647 str_append(p, "Subject: ");
648 str_append(p, mailobj->subject);
649 str_append(p, NEWLINE);
651 if (mailobj->header) {
652 str_append(p, mailobj->header);
654 if (mailobj->attachmentlist) {
655 str_append(p, "MIME-Version: 1.0" NEWLINE);
657 if (mailobj->attachmentlist) {
658 mailobj->mime_boundary_part = randomize_zeros(strdup("=PART=SEPARATOR=_0000_0000_0000_0000_0000_0000_="));
659 str_append(p, "Content-Type: multipart/mixed; boundary=\"");
660 str_append(p, mailobj->mime_boundary_part);
661 str_append(p, "\"" NEWLINE NEWLINE "This is a multipart message in MIME format." NEWLINE NEWLINE "--");
662 str_append(p, mailobj->mime_boundary_part);
663 str_append(p, NEWLINE);
665 if (mailobj->bodylist && mailobj->bodylist->next) {
666 mailobj->mime_boundary_body = randomize_zeros(strdup("=BODY=SEPARATOR=_0000_0000_0000_0000_0000_0000_="));
667 str_append(p, "Content-Type: multipart/alternative; boundary=\"");
668 str_append(p, mailobj->mime_boundary_body);
669 str_append(p, NEWLINE);
671 mailobj->buflen = strlen(mailobj->buf);
674 if (mailobj->buflen == 0 && mailobj->current == MAILPART_BODY) {
675 if (mailobj->current_attachment) {
676 if (!mailobj->current_attachment->handle) {
677 //open file with body data
678 while (mailobj->current_attachment) {
679 if ((mailobj->current_attachment->handle = mailobj->current_attachment->email_info_attachment_open(mailobj->current_attachment->filedata)) != NULL) {
682 mailobj->current_attachment = mailobj->current_attachment->next;
684 if (!mailobj->current_attachment) {
685 mailobj->current_attachment = mailobj->attachmentlist;
688 //generate attachment header
689 if (mailobj->current_attachment && mailobj->current_attachment->handle) {
691 if (mailobj->mime_boundary_body) {
692 mailobj->buf = str_append(&mailobj->buf, NEWLINE "--");
693 mailobj->buf = str_append(&mailobj->buf, mailobj->mime_boundary_body);
694 mailobj->buf = str_append(&mailobj->buf, NEWLINE);
696 mailobj->buf = str_append(&mailobj->buf, "Content-Type: ");
697 mailobj->buf = str_append(&mailobj->buf, (mailobj->bodylist && mailobj->current_attachment->filename ? mailobj->current_attachment->filename : default_mime_type));
698 mailobj->buf = str_append(&mailobj->buf, NEWLINE "Content-Transfer-Encoding: 8bit" NEWLINE "Content-Disposition: inline" NEWLINE NEWLINE);
699 mailobj->buflen = strlen(mailobj->buf);
702 if (mailobj->buflen == 0 && mailobj->current_attachment && mailobj->current_attachment->handle) {
704 if ((mailobj->buf = (char *) malloc(BODY_BUFFER_SIZE)) == NULL) {
705 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
707 if (mailobj->buf == NULL || (mailobj->buflen = mailobj->current_attachment->email_info_attachment_read(mailobj->current_attachment->handle, mailobj->buf, BODY_BUFFER_SIZE)) <= 0) {
711 if (mailobj->current_attachment->email_info_attachment_close)
712 mailobj->current_attachment->email_info_attachment_close(mailobj->current_attachment->handle);
714 // free(mailobj->current_attachment->handle);
715 mailobj->current_attachment->handle = NULL;
716 mailobj->current_attachment = mailobj->current_attachment->next;
720 mailobj->current_attachment = mailobj->attachmentlist;
724 if (mailobj->buflen == 0 && mailobj->current == MAILPART_BODY_DONE) {
726 if (mailobj->mime_boundary_body) {
727 mailobj->buf = str_append(&mailobj->buf, NEWLINE "--");
728 mailobj->buf = str_append(&mailobj->buf, mailobj->mime_boundary_body);
729 mailobj->buf = str_append(&mailobj->buf, "--" NEWLINE);
730 mailobj->buflen = strlen(mailobj->buf);
731 free(mailobj->mime_boundary_body);
732 mailobj->mime_boundary_body = NULL;
736 if (mailobj->buflen == 0 && mailobj->current == MAILPART_ATTACHMENT) {
737 if (mailobj->current_attachment) {
738 if (!mailobj->current_attachment->handle) {
739 //open file to attach
740 while (mailobj->current_attachment) {
741 if ((mailobj->current_attachment->handle = mailobj->current_attachment->email_info_attachment_open(mailobj->current_attachment->filedata)) != NULL) {
744 mailobj->current_attachment = mailobj->current_attachment->next;
746 //generate attachment header
747 if (mailobj->current_attachment && mailobj->current_attachment->handle) {
749 if (mailobj->mime_boundary_part) {
750 mailobj->buf = str_append(&mailobj->buf, NEWLINE "--");
751 mailobj->buf = str_append(&mailobj->buf, mailobj->mime_boundary_part);
752 mailobj->buf = str_append(&mailobj->buf, NEWLINE);
754 mailobj->buf = str_append(&mailobj->buf, "Content-Type: ");
755 mailobj->buf = str_append(&mailobj->buf, (mailobj->current_attachment->mimetype ? mailobj->current_attachment->mimetype : "application/octet-stream"));
756 mailobj->buf = str_append(&mailobj->buf, "; Name=\"");
757 mailobj->buf = str_append(&mailobj->buf, mailobj->current_attachment->filename);
758 mailobj->buf = str_append(&mailobj->buf, "\"" NEWLINE "Content-Transfer-Encoding: base64" NEWLINE NEWLINE);
759 mailobj->buflen = strlen(mailobj->buf);
762 //generate next line of attachment data
765 unsigned char igroup[3] = {0, 0, 0};
766 unsigned char ogroup[4];
768 if ((mailobj->buf = (char*)malloc(MIME_LINE_WIDTH + NEWLINELENGTH + 1)) == NULL) {
769 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
772 while (mimelinepos < MIME_LINE_WIDTH && (n = mailobj->current_attachment->email_info_attachment_read(mailobj->current_attachment->handle, igroup, 3)) > 0) {
774 ogroup[0] = mailobj->dtable[igroup[0] >> 2];
775 ogroup[1] = mailobj->dtable[((igroup[0] & 3) << 4) | (igroup[1] >> 4)];
776 ogroup[2] = mailobj->dtable[((igroup[1] & 0xF) << 2) | (igroup[2] >> 6)];
777 ogroup[3] = mailobj->dtable[igroup[2] & 0x3F];
778 //padd with "=" characters if less than 3 characters were read
784 memcpy(mailobj->buf + mimelinepos, ogroup, 4);
785 mailobj->buflen += 4;
788 if (mimelinepos > 0) {
789 memcpy(mailobj->buf + mimelinepos, NEWLINE, NEWLINELENGTH);
790 mailobj->buflen += NEWLINELENGTH;
795 if (mailobj->current_attachment->email_info_attachment_close)
796 mailobj->current_attachment->email_info_attachment_close(mailobj->current_attachment->handle);
798 free(mailobj->current_attachment->handle);
799 mailobj->current_attachment->handle = NULL;
800 mailobj->current_attachment = mailobj->current_attachment->next;
807 if (mailobj->buflen == 0 && mailobj->current == MAILPART_END) {
810 if (mailobj->mime_boundary_part) {
811 mailobj->buf = str_append(&mailobj->buf, NEWLINE "--");
812 mailobj->buf = str_append(&mailobj->buf, mailobj->mime_boundary_part);
813 mailobj->buf = str_append(&mailobj->buf, "--" NEWLINE);
814 mailobj->buflen = strlen(mailobj->buf);
815 free(mailobj->mime_boundary_part);
816 mailobj->mime_boundary_part = NULL;
818 //mailobj->buf = str_append(&mailobj->buf, NEWLINE "." NEWLINE);
819 //mailobj->buflen = strlen(mailobj->buf);
822 if (mailobj->buflen == 0 && mailobj->current == MAILPART_DONE) {
827 //flush pending data if any
828 if (mailobj->buflen > 0) {
829 int len = ((size_t) mailobj->buflen > size * nmemb ? size * nmemb : mailobj->buflen);
830 memcpy(ptr, mailobj->buf, len);
831 if (len < mailobj->buflen) {
832 mailobj->buf = (char *) memmove(mailobj->buf, mailobj->buf + len, mailobj->buflen - len);
833 mailobj->buflen -= len;
842 //if (mailobj->current != MAILPART_DONE)
843 // ;//this should never be reached
844 mailobj->current = 0;
848 char* add_angle_brackets (const char* data)
850 size_t datalen = strlen(data);
852 if ((result = (char*)malloc(datalen + 3)) == NULL) {
853 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
857 memcpy(result + 1, data, datalen);
858 result[datalen + 1] = '>';
859 result[datalen + 2] = 0;
863 const char* quickmail_send (quickmail mailobj, const char* smtpserver, unsigned int smtpport, const char* username, const char* password)
865 //libcurl based sending
867 CURLcode result = CURLE_FAILED_INIT;
868 //curl_global_init(CURL_GLOBAL_ALL);
869 if ((curl = curl_easy_init()) != NULL) {
870 struct curl_slist *recipients = NULL;
871 struct email_info_email_list_struct* listentry;
872 //set destination URL
874 size_t len = strlen(smtpserver) + 14;
875 if ((addr = (char*)malloc(len)) == NULL) {
876 DEBUG_ERROR(ERRMSG_MEMORY_ALLOCATION_ERROR)
877 return ERRMSG_MEMORY_ALLOCATION_ERROR;
879 snprintf(addr, len, "smtp://%s:%u", smtpserver, smtpport);
880 curl_easy_setopt(curl, CURLOPT_URL, addr);
882 //try Transport Layer Security (TLS), but continue anyway if it fails
883 curl_easy_setopt(curl, CURLOPT_USE_SSL, (long)CURLUSESSL_TRY);
884 //don't fail if the TLS/SSL a certificate could not be verified
885 //alternative: add the issuer certificate (or the host certificate if
886 //the certificate is self-signed) to the set of certificates that are
887 //known to libcurl using CURLOPT_CAINFO and/or CURLOPT_CAPATH
888 curl_easy_setopt(curl, CURLOPT_SSL_VERIFYPEER, 0L);
889 curl_easy_setopt(curl, CURLOPT_SSL_VERIFYHOST, 0L);
890 //set authentication credentials if provided
891 if (username && *username)
892 curl_easy_setopt(curl, CURLOPT_USERNAME, username);
894 curl_easy_setopt(curl, CURLOPT_PASSWORD, password);
895 //set from value for envelope reverse-path
896 if (mailobj->from && *mailobj->from) {
897 addr = add_angle_brackets(mailobj->from);
898 curl_easy_setopt(curl, CURLOPT_MAIL_FROM, addr);
902 listentry = mailobj->to;
904 if (listentry->data && *listentry->data) {
905 addr = add_angle_brackets(listentry->data);
906 recipients = curl_slist_append(recipients, addr);
909 listentry = listentry->next;
911 listentry = mailobj->cc;
913 if (listentry->data && *listentry->data) {
914 addr = add_angle_brackets(listentry->data);
915 recipients = curl_slist_append(recipients, addr);
918 listentry = listentry->next;
920 listentry = mailobj->bcc;
922 if (listentry->data && *listentry->data) {
923 addr = add_angle_brackets(listentry->data);
924 recipients = curl_slist_append(recipients, addr);
927 listentry = listentry->next;
929 curl_easy_setopt(curl, CURLOPT_MAIL_RCPT, recipients);
930 //set callback function for getting message body
931 curl_easy_setopt(curl, CURLOPT_READFUNCTION, quickmail_get_data);
932 curl_easy_setopt(curl, CURLOPT_READDATA, mailobj);
933 /* Without this curl sends VRFY, which exim errors on
934 (at least on main.carlh.net)
936 curl_easy_setopt(curl, CURLOPT_UPLOAD, 1L);
937 //enable debugging if requested
938 if (mailobj->debuglog) {
939 curl_easy_setopt(curl, CURLOPT_VERBOSE, 1L);
940 curl_easy_setopt(curl, CURLOPT_STDERR, mailobj->debuglog);
943 result = curl_easy_perform(curl);
944 //free the list of recipients and clean up
945 curl_slist_free_all(recipients);
946 curl_easy_cleanup(curl);
948 return (result == CURLE_OK ? NULL : curl_easy_strerror(result));