1 /*@ S-nail - a mail user agent derived from Berkeley Mail.
2 *@ Perform message editing functions.
4 * Copyright (c) 2000-2004 Gunnar Ritter, Freiburg i. Br., Germany.
5 * Copyright (c) 2012 - 2018 Steffen (Daode) Nurpmeso <steffen@sdaoden.eu>.
6 * SPDX-License-Identifier: BSD-3-Clause
9 * Copyright (c) 1980, 1993
10 * The Regents of the University of California. All rights reserved.
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
39 #ifndef HAVE_AMALGAMATION
43 /* Edit a message by writing the message into a funnily-named file (which
44 * should not exist) and forking an editor on it */
45 static int edit1(int *msgvec
, int viored
);
48 edit1(int *msgvec
, int viored
)
57 wb
= ok_blook(writebackedited
);
59 /* Deal with each message to be edited... */
60 for (i
= 0; msgvec
[i
] != 0 && i
< msgCount
; ++i
) {
61 sighandler_type sigint
;
66 snprintf(prompt
, sizeof prompt
, _("Edit message %d"), msgvec
[i
]);
67 if(!getapproval(prompt
, TRU1
))
71 mp
= message
+ msgvec
[i
] - 1;
73 n_pstate
|= n_PS_DID_PRINT_DOT
;
76 sigint
= safe_signal(SIGINT
, SIG_IGN
);
78 --mp
->m_size
; /* Strip final NL.. TODO MAILVFS->MESSAGE->length() */
79 fp
= n_run_editor(fp
, -1/*mp->m_size TODO */, viored
,
80 ((mb
.mb_perm
& MB_EDIT
) == 0 || !wb
), NULL
, mp
,
81 (wb
? SEND_MBOX
: SEND_TODISP_ALL
), sigint
, NULL
);
82 ++mp
->m_size
; /* And readd it TODO */
85 fseek(mb
.mb_otf
, 0L, SEEK_END
);
86 size
= ftell(mb
.mb_otf
);
87 mp
->m_block
= mailx_blockof(size
);
88 mp
->m_offset
= mailx_offsetof(size
);
94 while ((c
= getc(fp
)) != EOF
) {
95 if ((lastnl
= (c
== '\n')))
97 if (putc(c
, mb
.mb_otf
) == EOF
)
101 if (!lastnl
&& putc('\n', mb
.mb_otf
) != EOF
)
103 if (putc('\n', mb
.mb_otf
) != EOF
)
105 mp
->m_size
= (size_t)size
;
106 if (ferror(mb
.mb_otf
))
107 n_perr(_("/tmp"), 0);
111 safe_signal(SIGINT
, sigint
);
123 rv
= edit1(msgvec
, 'e');
134 rv
= edit1(msgvec
, 'v');
140 n_run_editor(FILE *fp
, off_t size
, int viored
, bool_t readonly
,
141 struct header
*hp
, struct message
*mp
, enum sendaction action
,
142 sighandler_type oldint
, char const *pipecmd
)
150 FILE *nf
, *nf_pipetmp
, *nf_tmp
;
153 nf
= nf_pipetmp
= NULL
;
155 modtime
= 0, modsize
= 0;
157 if((nf_tmp
= Ftmp(&tmp_name
, "runed",
158 ((viored
== '|' ? OF_RDWR
: OF_WRONLY
) | OF_REGISTER
|
159 OF_REGISTER_UNLINK
| OF_FN_AUTOREC
))) == NULL
){
161 n_perr(_("temporary mail edit file"), 0);
167 if(!n_header_put4compose(nf_tmp
, hp
))
173 if(sendmp(mp
, nf_tmp
, NULL
, NULL
, action
, NULL
) < 0){
174 n_err(_("Failed to prepare editable message\n"));
179 while(--size
>= 0 && (t
= getc(fp
)) != EOF
)
180 if(putc(t
, nf_tmp
) == EOF
)
183 while((t
= getc(fp
)) != EOF
)
184 if(putc(t
, nf_tmp
) == EOF
)
191 if((t
= (fp
!= NULL
&& ferror(fp
))) == 0 && (t
= ferror(nf_tmp
)) == 0){
193 if(!fstat(fileno(nf_tmp
), &statb
))
194 modtime
= statb
.st_mtime
, modsize
= statb
.st_size
;
197 t
= (fchmod(fileno(nf_tmp
), S_IRUSR
) != 0);
207 assert(pipecmd
!= NULL
);
209 if((nf_pipetmp
= Ftmp(&tmp_name
, "runed", OF_WRONLY
| OF_REGISTER
|
210 OF_REGISTER_UNLINK
| OF_FN_AUTOREC
)) == NULL
)
212 really_rewind(nf
= nf_tmp
);
216 if(n_child_run(ok_vlook(SHELL
), 0, fileno(nf_pipetmp
), fileno(nf_tmp
),
217 "-c", pipecmd
, NULL
, NULL
, &ws
) < 0 || WEXITSTATUS(ws
) != 0)
221 if(n_child_run((viored
== 'e' ? ok_vlook(EDITOR
) : ok_vlook(VISUAL
)),
222 (oldint
!= SIG_IGN
? &cset
: NULL
),
223 n_CHILD_FD_PASS
, n_CHILD_FD_PASS
, tmp_name
, NULL
, NULL
, NULL
,
224 &ws
) < 0 || WEXITSTATUS(ws
) != 0)
228 /* If in read only mode or file unchanged, just remove the editor temporary
229 * and return. Otherwise switch to new file */
233 if(stat(tmp_name
, &statb
) == -1){
237 if(modtime
== statb
.st_mtime
&& modsize
== statb
.st_size
)
241 if((nf
= Fopen(tmp_name
, "r+")) == NULL
)
245 if(nf_pipetmp
!= NULL
)
247 if(nf_tmp
!= NULL
&& Fclose(nf_tmp
) < 0){