]> code.citadel.org Git - citadel.git/blobdiff - citadel/mime_parser.c
Fixes for Cygwin (see ChangeLog)
[citadel.git] / citadel / mime_parser.c
index 3f886b8e5e8cf6ce77e5b5f9ed520de6a0c9922a..9b35dc0822588e1cbbdadeb59f3937ec09193134 100644 (file)
@@ -9,6 +9,7 @@
  *
  */
 
+#include "sysdep.h"
 #include <stdlib.h>
 #include <unistd.h>
 #include <stdio.h>
 #include <sys/types.h>
 #include <ctype.h>
 #include <string.h>
+#include <sys/stat.h>
+#ifdef HAVE_PTHREAD_H
+#include <pthread.h>
+#endif
+#include "citadel.h"
 #include "mime_parser.h"
+#include "sysdep_decls.h"
+#include "server.h"
 
 
 
@@ -72,25 +80,119 @@ char *memreadline(char *start, char *buf, int maxlen) {
 void mime_decode(char *partnum,
                char *part_start, size_t length,
                char *content_type, char *encoding,
+               char *disposition,
                char *name, char *filename,
                void (*CallBack)
                        (char *cbname,
                        char *cbfilename,
                        char *cbpartnum,
+                       char *cbdisp,
                        void *cbcontent,
                        char *cbtype,
                        size_t cblength)
                ) {
 
+       char *decoded;
+       struct stat statbuf;
+       int sendpipe[2];
+       int recvpipe[2];
+       int childpid;
+       size_t bytes_sent = 0;
+       size_t bytes_recv = 0;
+       size_t blocksize;
+       int write_error = 0;
+
+       lprintf(9, "mime_decode() called\n");
+
+       /* Some encodings aren't really encodings */
+       if (!strcasecmp(encoding, "7bit"))      strcpy(encoding, "");
+       if (!strcasecmp(encoding, "8bit"))      strcpy(encoding, "");
+       if (!strcasecmp(encoding, "binary"))    strcpy(encoding, "");
+
        /* If this part is not encoded, send as-is */
-       if (strlen(encoding)!=4323) {
-               CallBack(name, filename, partnum, part_start,
+       if (strlen(encoding)==0) {
+               CallBack(name, filename, partnum, disposition, part_start,
                        content_type, length);
                return;
                }
 
+       if ( (strcasecmp(encoding, "base64"))
+            && (strcasecmp(encoding, "quoted-printable"))  ) {
+               lprintf(5, "ERROR: unknown MIME encoding '%s'\n", encoding);
+               return;
+               }
+
+       /*
+        * Allocate a buffer for the decoded data.  The output buffer is the
+        * same size as the input buffer; this assumes that the decoded data
+        * will never be larger than the encoded data.  This is a safe
+        * assumption with base64, uuencode, and quoted-printable.  Just to
+        * be safe, we still pad the buffer a bit.
+        */
+       decoded = mallok(length + 1024);
+       if (decoded == NULL) {
+               lprintf(5, "ERROR: cannot allocate memory.\n");
+               return;
+               }
+       if (pipe(sendpipe) != 0) return;
+       if (pipe(recvpipe) != 0) return;
+
+       childpid = fork();
+       if (childpid < 0) {
+               phree(decoded);
+               return;
+               }
+
+       if (childpid == 0) {
+               close(2);
+               /* send stdio to the pipes */
+               if (dup2(sendpipe[0], 0)<0) lprintf(5, "ERROR dup2()\n");
+               if (dup2(recvpipe[1], 1)<0) lprintf(5, "ERROR dup2()\n");
+               close(sendpipe[1]);      /* Close the ends we're not using */
+               close(recvpipe[0]);
+               if (!strcasecmp(encoding, "base64"))
+                  execlp("./base64", "base64", "-d", NULL);
+               else if (!strcasecmp(encoding, "quoted-printable"))
+                  execlp("./qpdecode", "qpdecode", NULL);
+               lprintf(5, "ERROR: cannot exec decoder for %s\n", encoding);
+               exit(1);
+               }
+
+       close(sendpipe[0]);      /* Close the ends we're not using  */
+       close(recvpipe[1]);
+
+       while ( (bytes_sent < length) && (write_error == 0) ) {
+               /* Empty the input pipe FIRST */
+               while (fstat(recvpipe[0], &statbuf), (statbuf.st_size > 0) ) {
+                       blocksize = read(recvpipe[0], &decoded[bytes_recv],
+                               statbuf.st_size);
+                       if (blocksize < 0) 
+                               lprintf(5, "ERROR: cannot read from pipe\n");
+                       else
+                               bytes_recv = bytes_recv + blocksize;
+                       }
+               /* Then put some data into the output pipe */
+               blocksize = length - bytes_sent;
+               if (blocksize > 2048) blocksize = 2048;
+               if (write(sendpipe[1], &part_start[bytes_sent], blocksize) <0) {
+                       lprintf(5, "ERROR: cannot write to pipe: %s\n",
+                               strerror(errno));
+                       write_error = 1;
+                       }
+               bytes_sent = bytes_sent + blocksize;
+               }
+       close(sendpipe[1]);
+       /* Empty the input pipe */
+       while ( (blocksize = read(recvpipe[0], &decoded[bytes_recv], 1)),
+             (blocksize > 0) )  {
+               bytes_recv = bytes_recv + blocksize;
+               }
 
+       if (bytes_recv > 0)
+               CallBack(name, filename, partnum, disposition, decoded,
+                       content_type, bytes_recv);
 
+       phree(decoded);
        }
 
 /*
@@ -105,6 +207,7 @@ void the_mime_parser(char *partnum,
                        (char *cbname,
                        char *cbfilename,
                        char *cbpartnum,
+                       char *cbdisp,
                        void *cbcontent,
                        char *cbtype,
                        size_t cblength)
@@ -119,6 +222,7 @@ void the_mime_parser(char *partnum,
        char endary[256];
        char content_type[256];
        char encoding[256];
+       char disposition[256];
        char name[256];
        char filename[256];
        int is_multipart;
@@ -127,6 +231,7 @@ void the_mime_parser(char *partnum,
        size_t length;
        char nested_partnum[256];
 
+       lprintf(9, "the_mime_parser() called\n");
        ptr = content_start;
        memset(boundary, 0, sizeof boundary);
        memset(content_type, 0, sizeof content_type);
@@ -150,7 +255,8 @@ void the_mime_parser(char *partnum,
                                extract_key(name, content_type, "name");
                                }
                        if (!strncasecmp(header, "Content-Disposition: ", 21)) {
-                               extract_key(filename, header, "filename");
+                               strcpy(disposition, &header[21]);
+                               extract_key(filename, disposition, "filename");
                                }
                        if (!strncasecmp(header,
                                "Content-transfer-encoding: ", 27))
@@ -163,6 +269,8 @@ void the_mime_parser(char *partnum,
                        strcat(header, buf);
                } while ((strlen(buf) > 0) && (*ptr != 0));
 
+       for (i=0; i<strlen(disposition); ++i) 
+               if (disposition[i]==';') disposition[i] = 0;
        for (i=0; i<strlen(content_type); ++i) 
                if (content_type[i]==';') content_type[i] = 0;
 
@@ -208,7 +316,7 @@ void the_mime_parser(char *partnum,
                        }
                mime_decode(partnum,
                                part_start, length,
-                               content_type, encoding,
+                               content_type, encoding, disposition,
                                name, filename, CallBack);
                }
        
@@ -225,10 +333,12 @@ void mime_parser(char *content_start, char *content_end,
                        (char *cbname,
                        char *cbfilename,
                        char *cbpartnum,
+                       char *cbdisp,
                        void *cbcontent,
                        char *cbtype,
                        size_t cblength)
                ) {
 
+       lprintf(9, "mime_parser() called\n");
        the_mime_parser("1", content_start, content_end, CallBack);
        }