mhl and mhbuild ignore to long lines
[mmh] / uip / send.c
index 619ff62..1df2fa9 100644 (file)
@@ -39,8 +39,6 @@ char *distfile = NULL;
 static char body_file_name[MAXPATHLEN + 1];
 /* name of mhbuild composition temporary file */
 static char composition_file_name[MAXPATHLEN + 1]; 
-static int field_size;  /* size of header field buffer */
-static char *field;  /* header field buffer */
 static FILE *draft_file;  /* draft file pointer */
 static FILE *body_file;  /* body file pointer */
 static FILE *composition_file;  /* composition file pointer */
@@ -54,7 +52,6 @@ static int sendaux(char **, int, char *, struct stat *);
 static int attach(char *);
 static int signandenc(char *);
 static void clean_up_temporary_files(void);
-static int get_line(void);
 static void make_mime_composition_file_entry(char *);
 static char* strexit(int status);
 
@@ -73,6 +70,7 @@ static struct swit switches[] = {
        { NULL, 0 }
 };
 
+char *version=VERSION;
 
 int
 main(int argc, char **argv)
@@ -81,7 +79,7 @@ main(int argc, char **argv)
        int msgnum, status;
        int in, out;
        int n;
-       char *cp, *maildir = NULL;
+       char *cp, *maildir = NULL, *folder = NULL;
        char buf[BUFSIZ], **argp, **arguments;
        char *msgs[MAXARGS], *vec[MAXARGS];
        char *files[MAXARGS];
@@ -125,6 +123,12 @@ main(int argc, char **argv)
                                vec[vecp++] = --cp;
                                continue;
                        }
+               } else if (*cp == '+' || *cp == '@') {
+                       if (folder) {
+                               adios(EX_USAGE, NULL, "only one folder at a time!");
+                       } else {
+                               folder = mh_xstrdup(expandfol(cp));
+                       }
                } else {
                        if (*cp == '/') {
                                files[nfiles++] = cp;
@@ -139,17 +143,18 @@ main(int argc, char **argv)
        }
 
        if (nmsgs) {
-               maildir = toabsdir(draftfolder);
+               folder = folder ? folder : draftfolder;
+               maildir = toabsdir(folder);
                if (chdir(maildir) == NOTOK) {
                        adios(EX_OSERR, maildir, "unable to change directory to");
                }
-               if (!(mp = folder_read(draftfolder))) {
-                       adios(EX_IOERR, NULL, "unable to read draft folder %s",
-                                       draftfolder);
+               if (!(mp = folder_read(folder))) {
+                       adios(EX_IOERR, NULL, "unable to read folder %s",
+                                       folder);
                }
                if (mp->nummsg == 0) {
-                       adios(EX_DATAERR, NULL, "no messages in draft folder %s",
-                                       draftfolder);
+                       adios(EX_DATAERR, NULL, "no messages in folder %s",
+                                       folder);
                }
                /* parse all the msgranges/sequences and set SELECTED */
                for (msgnum = 0; msgnum < nmsgs; msgnum++) {
@@ -157,7 +162,6 @@ main(int argc, char **argv)
                                exit(EX_USAGE);
                        }
                }
-               seq_setprev(mp);
 
                for (nmsgs = 0, msgnum = mp->lowsel;
                                msgnum <= mp->hghsel; msgnum++) {
@@ -261,6 +265,7 @@ sendsbr(char **vec, int vecp, char *drft, struct stat *st)
        */
        switch (attach(drft)) {
        case OK:
+               /* successfully MIMEified: use generate draft */
                drft = composition_file_name;
                break;
 
@@ -268,6 +273,7 @@ sendsbr(char **vec, int vecp, char *drft, struct stat *st)
                return (NOTOK);
 
        case DONE:
+               /* already in MIME format: keep original draft */
                break;
        }
 
@@ -320,78 +326,26 @@ sendsbr(char **vec, int vecp, char *drft, struct stat *st)
 }
 
 static int
-contains_non_ascii(char *str)
-{
-       unsigned char *cp;
-
-       for (cp = str; *cp; cp++) {
-               if (*cp > 127) {
-                       return 1;
-               }
-       }
-       return 0;
-}
-
-static int
 attach(char *draft_file_name)
 {
+       enum state state;
+       struct field f = {{0}};
+       int compnum;
+       int finished_header = 0;
        char buf[MAXPATHLEN + 6];
-       int c;
-       int has_attachment;
-       int has_body = 0;
-       int non_ascii = 0; /* msg body or hdr contains non-ASCII chars */
-       int length;  /* length of attachment header field name */
+       size_t length = strlen(attach_hdr);
        char *p;
 
-       if (!(draft_file = fopen(draft_file_name, "r"))) {
-               adios(EX_IOERR, NULL, "can't open draft file `%s'.", draft_file_name);
-       }
-
-       /* We'll grow the buffer as needed. */
-       field = mh_xcalloc(field_size = 256, sizeof(char));
-
-       /*
-       ** Scan the draft file for an attachment header field name.
-       */
-       length = strlen(attach_hdr);
-       has_attachment = 0;
-       while (get_line() != EOF && *field != '\0' && *field != '-') {
-               if (strncasecmp(field, attach_hdr, length)==0 &&
-                               field[length] == ':') {
-                       has_attachment = 1;
-               }
-               if (contains_non_ascii(field)) {
-                       non_ascii = 1;
-               }
-       }
-
-       /*
-       ** Look for at least one non-blank line in the body of the
-       ** message which indicates content in the body.
-       ** Check if body contains at least one non-blank (= not empty)
-       ** and if it contains any non-ASCII chars (= need MIME).
-       */
-       while (get_line() != EOF) {
-               if (contains_non_ascii(field)) {
-                       non_ascii = 1;
-               }
-               for (p = field; *p; p++) {
-                       if (isgraph(*p)) {
-                               has_body = 1;
-                       }
-               }
-               if (has_body && non_ascii) {
-                       break;  /* that's been already enough information */
-               }
+       if(distfile) {
+               return DONE;
        }
 
-       if (!has_attachment && non_ascii==0) {
-               /* We don't need to convert it to MIME. */
-               return DONE;
+       if (!(draft_file = fopen(draft_file_name, "r"))) {
+               adios(EX_IOERR, NULL, "can't open draft file `%s'.", draft_file_name);
        }
 
        /*
-       ** Else: mimify
+       ** MIMEify
        */
 
        /* Make names for the temporary files.  */
@@ -402,37 +356,57 @@ attach(char *draft_file_name)
                        m_mktemp(toabsdir(invo_name), NULL, NULL),
                        sizeof (composition_file_name));
 
-       if (has_body) {
-               body_file = fopen(body_file_name, "w");
-       }
+       body_file = fopen(body_file_name, "w");
        composition_file = fopen(composition_file_name, "w");
 
-       if ((has_body && !body_file) || !composition_file) {
+       if (!body_file || !composition_file) {
                clean_up_temporary_files();
                adios(EX_IOERR, NULL, "unable to open all of the temporary files.");
        }
 
        /* Copy non-attachment header fields to the temp composition file. */
        rewind(draft_file);
-       while (get_line() != EOF && *field && *field != '-') {
-               if (strncasecmp(field, attach_hdr, length) != 0 ||
-                               field[length] != ':') {
-                       fprintf(composition_file, "%s\n", field);
+       for (compnum = 1, state = FLD2; state == FLD2 || state == BODY2;) {
+               switch (state = m_getfld2(state, &f, draft_file)) {
+               case LENERR2:
+                       state = FLD2;
+               case FLD2:
+                       compnum++;
+                       if (strncasecmp(f.name, VRSN_FIELD, sizeof(VRSN_FIELD) - 1)==0) {
+                               /*
+                               ** The draft is already in MIME format, thus
+                               ** back out and use the original draft file.
+                               */
+                               clean_up_temporary_files();
+                               return DONE;
+                       }
+                       if (strncasecmp(f.name, attach_hdr, length) != 0 ||
+                                       f.namelen != length) {
+                               fprintf(composition_file, "%s:%s", f.name, f.value);
+                       }
+                       break;
+               case BODY2:
+                       if (!finished_header) {
+                               fputs("--------\n", composition_file);
+                               finished_header++;
+                       }
+                       fputs(f.value, body_file);
+                       break;
+               case FILEEOF2:
+                       break;
+               case FMTERR2:
+                       adios(EX_DATAERR, NULL, "message format error in component #%d", compnum);
+               case IOERR2:
+                       adios(EX_IOERR, NULL, "error reading draft file: %s", draft_file_name);
+               default:
+                       adios(EX_SOFTWARE, NULL, "getfld() returned %d", state);
                }
        }
-       fputs("--------\n", composition_file);
+       fclose(body_file);
 
-       if (has_body) {
-               /* Copy the message body to the temporary file. */
-               while ((c = getc(draft_file)) != EOF) {
-                       putc(c, body_file);
-               }
-               fclose(body_file);
-
-               /* Add a mhbuild MIME composition file line for the body */
-               /* charset will be discovered/guessed by mhbuild */
-               fprintf(composition_file, "#text/plain %s\n", body_file_name);
-       }
+       /* Add a mhbuild MIME composition file line for the body */
+       /* charset will be discovered/guessed by mhbuild */
+       fprintf(composition_file, "#text/plain %s\n", body_file_name);
 
        /*
        ** Now, go back to the beginning of the draft file and look for
@@ -440,17 +414,33 @@ attach(char *draft_file_name)
        ** composition file for each.
        */
        rewind(draft_file);
-       while (get_line() != EOF && *field && *field != '-') {
-               if (strncasecmp(field, attach_hdr, length) == 0 &&
-                               field[length] == ':') {
-                       p = trim(field+length+1);
-                       if (*p == '+') {
-                               /* forwarded message */
-                               fprintf(composition_file, "#forw [forwarded message(s)] %s\n", p);
-                       } else {
-                               /* regular attachment */
-                               make_mime_composition_file_entry(p);
+       for (compnum = 1, state = FLD2; state == FLD2;) {
+               switch (state = m_getfld2(state, &f, draft_file)) {
+               case LENERR2:
+                       state = FLD2;
+               case FLD2:
+                       compnum++;
+                       if (strncasecmp(f.name, attach_hdr, length) == 0 &&
+                                       f.namelen == length) {
+                               p = trim(f.value);
+                               if (*p == '+') {
+                                       /* forwarded message */
+                                       fprintf(composition_file, "#forw [forwarded message(s)] %s\n", p);
+                               } else {
+                                       /* regular attachment */
+                                       make_mime_composition_file_entry(p);
+                               }
                        }
+                       break;
+               case BODY2:
+               case FILEEOF2:
+                       break;
+               case FMTERR2:
+                       adios(EX_DATAERR, NULL, "message format error in component #%d", compnum);
+               case IOERR2:
+                       adios(EX_IOERR, NULL, "error reading draft file: %s", draft_file_name);
+               default:
+                       adios(EX_SOFTWARE, NULL, "getfld() returned %d", state);
                }
        }
        fclose(composition_file);
@@ -474,29 +464,48 @@ attach(char *draft_file_name)
 static int
 signandenc(char *draft_file_name)
 {
+       enum state state;
+       int compnum;
+       struct field f = {{0}};
        char buf[BUFSIZ];
        int dosign = 0;
        int doenc = 0;
        int ret;
 
+       if(distfile) {
+               return DONE;
+       }
+
        if (!(draft_file = fopen(draft_file_name, "r"))) {
                adios(EX_IOERR, NULL, "can't open draft file `%s'.", draft_file_name);
        }
 
-       /* We'll grow the buffer as needed. */
-       field = mh_xcalloc(field_size = 256, sizeof(char));
-
        /* Scan the draft file for an attachment header field name. */
-       while (get_line() != EOF && *field != '\0' && *field != '-') {
-               if (strncasecmp(field, sign_hdr, strlen(sign_hdr))==0 &&
-                               field[strlen(sign_hdr)] == ':') {
-                       dosign = 1;
-               }
-               if (strncasecmp(field, enc_hdr, strlen(enc_hdr))==0 &&
-                               field[strlen(enc_hdr)] == ':') {
-                       doenc = 1;
+       for (compnum = 1, state = FLD2; state == FLD2;) {
+               switch (state = m_getfld2(state, &f, draft_file)) {
+               case LENERR2:
+                       state = FLD2;
+               case FLD2:
+                       compnum++;
+                       if (strcasecmp(f.name, sign_hdr)==0) {
+                               dosign = 1;
+                       }
+                       if (strcasecmp(f.name, enc_hdr)==0) {
+                               doenc = 1;
+                       }
+                       break;
+               case BODY2:
+               case FILEEOF2:
+                       break;
+               case FMTERR2:
+                       adios(EX_DATAERR, NULL, "message format error in component #%d", compnum);
+               case IOERR2:
+                       adios(EX_IOERR, NULL, "error reading draft file: %s", draft_file_name);
+               default:
+                       adios(EX_SOFTWARE, NULL, "getfld() returned %d", state);
                }
        }
+
        if (!dosign && !doenc) {
                return DONE;
        }
@@ -533,35 +542,6 @@ clean_up_temporary_files(void)
        return;
 }
 
-static int
-get_line(void)
-{
-       int c;  /* current character */
-       int n;  /* number of bytes in buffer */
-       char *p;
-
-       /*
-       ** Get a line from the input file, growing the field buffer as
-       ** needed.  We do this so that we can fit an entire line in the
-       ** buffer making it easy to do a string comparison on both the
-       ** field name and the field body which might be a long path name.
-       */
-       for (n = 0, p = field; (c = getc(draft_file)) != EOF; *p++ = c) {
-               if (c == '\n' && (c = getc(draft_file)) != ' ' && c != '\t') {
-                       ungetc(c, draft_file);
-                       c = '\n';
-                       break;
-               }
-               if (++n >= field_size - 1) {
-                       field = mh_xrealloc(field, field_size += 256);
-                       p = field + n - 1;
-               }
-       }
-       *p = '\0';
-
-       return (c);
-}
-
 static void
 make_mime_composition_file_entry(char *file_name)
 {
@@ -674,7 +654,6 @@ sendaux(char **vec, int vecp, char *drft, struct stat *st)
                }
        }
 
-
        return status ? NOTOK : status;
 }