- if (rename (drft, strcpy (backup, m_backup (drft))) == NOTOK)
- adios (backup, "unable to rename %s to",drft);
- if ((ifp = fopen (backup, "r")) == NULL)
- adios (backup, "unable to read");
-
- if ((ofp = fopen (drft, "w")) == NULL)
- adios (drft, "unable to create temporary file");
- chmod (drft, m_gmprot ());
-
- ready_msg (msgnam);
- lseek (hdrfd, (off_t) 0, SEEK_SET); /* msgnam not accurate */
- cpydata (hdrfd, fileno (ofp), msgnam, drft);
-
- for (state = FLD, resent = NULL;;)
- switch (state =
- m_getfld (state, name, buffer, sizeof buffer, ifp)) {
- case FLD:
- case FLDPLUS:
- case FLDEOF:
- if (uprf (name, "distribute-"))
- snprintf (name, sizeof(name), "%s%s", "Resent", &name[10]);
- if (uprf (name, "distribution-"))
- snprintf (name, sizeof(name), "%s%s", "Resent", &name[12]);
- if (!uprf (name, "resent")) {
- advise (NULL, BADHDR, "draft", name);
- goto leave_bad;
- }
- if (state == FLD)
- resent = add (":", add (name, resent));
- resent = add (buffer, resent);
- fprintf (ofp, "%s: %s", name, buffer);
- while (state == FLDPLUS) {
- state = m_getfld (state, name,
- buffer, sizeof buffer, ifp);
- resent = add (buffer, resent);
- fputs (buffer, ofp);
- }
- if (state == FLDEOF)
- goto process;
- break;
-
- case BODY:
- case BODYEOF:
- for (dp = buffer; *dp; dp++)
- if (!isspace (*dp)) {
- advise (NULL, BADTXT, "draft");
- goto leave_bad;
- }
-
- case FILEEOF:
- goto process;
+ strcpy(backup, m_mktemp(toabsdir(invo_name), NULL, NULL));
+ if (rename(drft, backup) == NOTOK) {
+ advise(backup, "unable to rename %s to",drft);
+ return NOTOK;
+ }
+ if (!(ifp = fopen(backup, "r"))) {
+ advise(backup, "unable to read");
+ return NOTOK;
+ }