xref: /onnv-gate/usr/src/cmd/mailx/edit.c (revision 0:68f95e015346)
1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate  * CDDL HEADER START
3*0Sstevel@tonic-gate  *
4*0Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*0Sstevel@tonic-gate  * with the License.
8*0Sstevel@tonic-gate  *
9*0Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate  * and limitations under the License.
13*0Sstevel@tonic-gate  *
14*0Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate  *
20*0Sstevel@tonic-gate  * CDDL HEADER END
21*0Sstevel@tonic-gate  */
22*0Sstevel@tonic-gate /*
23*0Sstevel@tonic-gate  * Copyright 1996 Sun Microsystems, Inc.  All rights reserved.
24*0Sstevel@tonic-gate  * Use is subject to license terms.
25*0Sstevel@tonic-gate  */
26*0Sstevel@tonic-gate 
27*0Sstevel@tonic-gate /*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
28*0Sstevel@tonic-gate /*	  All Rights Reserved  	*/
29*0Sstevel@tonic-gate 
30*0Sstevel@tonic-gate 
31*0Sstevel@tonic-gate /*
32*0Sstevel@tonic-gate  * University Copyright- Copyright (c) 1982, 1986, 1988
33*0Sstevel@tonic-gate  * The Regents of the University of California
34*0Sstevel@tonic-gate  * All Rights Reserved
35*0Sstevel@tonic-gate  *
36*0Sstevel@tonic-gate  * University Acknowledgment- Portions of this document are derived from
37*0Sstevel@tonic-gate  * software developed by the University of California, Berkeley, and its
38*0Sstevel@tonic-gate  * contributors.
39*0Sstevel@tonic-gate  */
40*0Sstevel@tonic-gate 
41*0Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
42*0Sstevel@tonic-gate 
43*0Sstevel@tonic-gate #include "rcv.h"
44*0Sstevel@tonic-gate #include <locale.h>
45*0Sstevel@tonic-gate 
46*0Sstevel@tonic-gate 
47*0Sstevel@tonic-gate /*
48*0Sstevel@tonic-gate  * mailx -- a modified version of a University of California at Berkeley
49*0Sstevel@tonic-gate  *	mail program
50*0Sstevel@tonic-gate  *
51*0Sstevel@tonic-gate  * Perform message editing functions.
52*0Sstevel@tonic-gate  */
53*0Sstevel@tonic-gate 
54*0Sstevel@tonic-gate static void edit1(int *msgvec, char *ed);
55*0Sstevel@tonic-gate 
56*0Sstevel@tonic-gate /*
57*0Sstevel@tonic-gate  * Edit a message list.
58*0Sstevel@tonic-gate  */
59*0Sstevel@tonic-gate 
60*0Sstevel@tonic-gate int
editor(int * msgvec)61*0Sstevel@tonic-gate editor(int *msgvec)
62*0Sstevel@tonic-gate {
63*0Sstevel@tonic-gate 	char *edname;
64*0Sstevel@tonic-gate 
65*0Sstevel@tonic-gate 	if ((edname = value("EDITOR")) == NOSTR || *edname == '\0')
66*0Sstevel@tonic-gate 		edname = EDITOR;
67*0Sstevel@tonic-gate 	edit1(msgvec, edname);
68*0Sstevel@tonic-gate 	return(0);
69*0Sstevel@tonic-gate }
70*0Sstevel@tonic-gate 
71*0Sstevel@tonic-gate /*
72*0Sstevel@tonic-gate  * Invoke the visual editor on a message list.
73*0Sstevel@tonic-gate  */
74*0Sstevel@tonic-gate 
75*0Sstevel@tonic-gate int
visual(int * msgvec)76*0Sstevel@tonic-gate visual(int *msgvec)
77*0Sstevel@tonic-gate {
78*0Sstevel@tonic-gate 	char *edname;
79*0Sstevel@tonic-gate 
80*0Sstevel@tonic-gate 	if ((edname = value("VISUAL")) == NOSTR || *edname == '\0')
81*0Sstevel@tonic-gate 		edname = VISUAL;
82*0Sstevel@tonic-gate 	edit1(msgvec, edname);
83*0Sstevel@tonic-gate 	return(0);
84*0Sstevel@tonic-gate }
85*0Sstevel@tonic-gate 
86*0Sstevel@tonic-gate /*
87*0Sstevel@tonic-gate  * Edit a message by writing the message into a funnily-named file
88*0Sstevel@tonic-gate  * (which should not exist) and forking an editor on it.
89*0Sstevel@tonic-gate  * We get the editor from the stuff above.
90*0Sstevel@tonic-gate  */
91*0Sstevel@tonic-gate 
92*0Sstevel@tonic-gate static void
edit1(int * msgvec,char * ed)93*0Sstevel@tonic-gate edit1(int *msgvec, char *ed)
94*0Sstevel@tonic-gate {
95*0Sstevel@tonic-gate 	register int c, lastc = '\n';
96*0Sstevel@tonic-gate 	pid_t pid;
97*0Sstevel@tonic-gate 	int *ip, mesg, blank = 1;
98*0Sstevel@tonic-gate 	long ms, lines;
99*0Sstevel@tonic-gate 	void (*sigint)(int), (*sigquit)(int);
100*0Sstevel@tonic-gate 	FILE *ibuf, *obuf;
101*0Sstevel@tonic-gate 	struct message *mp;
102*0Sstevel@tonic-gate 	off_t size;
103*0Sstevel@tonic-gate 	struct stat statb;
104*0Sstevel@tonic-gate 	long modtime;
105*0Sstevel@tonic-gate 	int fd = -1;
106*0Sstevel@tonic-gate 
107*0Sstevel@tonic-gate 	/*
108*0Sstevel@tonic-gate 	 * Set signals; locate editor.
109*0Sstevel@tonic-gate 	 */
110*0Sstevel@tonic-gate 
111*0Sstevel@tonic-gate 	sigint = sigset(SIGINT, SIG_IGN);
112*0Sstevel@tonic-gate 	sigquit = sigset(SIGQUIT, SIG_IGN);
113*0Sstevel@tonic-gate 	ed = safeexpand(ed);
114*0Sstevel@tonic-gate 
115*0Sstevel@tonic-gate 	/*
116*0Sstevel@tonic-gate 	 * Deal with each message to be edited . . .
117*0Sstevel@tonic-gate 	 */
118*0Sstevel@tonic-gate 
119*0Sstevel@tonic-gate 	for (ip = msgvec; *ip && ip-msgvec < msgCount; ip++) {
120*0Sstevel@tonic-gate 		mesg = *ip;
121*0Sstevel@tonic-gate 		touch(mesg);
122*0Sstevel@tonic-gate 		mp = &message[mesg-1];
123*0Sstevel@tonic-gate 		dot = mp;
124*0Sstevel@tonic-gate 		if (mp->m_text) {
125*0Sstevel@tonic-gate 			if (!access(tempZedit, 2)) {
126*0Sstevel@tonic-gate 				printf(gettext("%s: file exists\n"), tempZedit);
127*0Sstevel@tonic-gate 				goto out;
128*0Sstevel@tonic-gate 			}
129*0Sstevel@tonic-gate 
130*0Sstevel@tonic-gate 			/*
131*0Sstevel@tonic-gate 			 * Copy the message into the edit file.
132*0Sstevel@tonic-gate 			 */
133*0Sstevel@tonic-gate 
134*0Sstevel@tonic-gate 			if ((fd = open(tempZedit, O_RDWR|O_CREAT|
135*0Sstevel@tonic-gate 					O_EXCL, 0600)) < 0 ||
136*0Sstevel@tonic-gate 				(obuf = fdopen(fd, "w")) == NULL) {
137*0Sstevel@tonic-gate 				perror(tempZedit);
138*0Sstevel@tonic-gate 				goto out;
139*0Sstevel@tonic-gate 			}
140*0Sstevel@tonic-gate 			if (msend(mp, obuf, 0, fputs) < 0) {
141*0Sstevel@tonic-gate 				perror(tempZedit);
142*0Sstevel@tonic-gate 				fclose(obuf);
143*0Sstevel@tonic-gate 				removefile(tempZedit);
144*0Sstevel@tonic-gate 				goto out;
145*0Sstevel@tonic-gate 			}
146*0Sstevel@tonic-gate 			fflush(obuf);
147*0Sstevel@tonic-gate 			if (fferror(obuf)) {
148*0Sstevel@tonic-gate 				perror(tempZedit);
149*0Sstevel@tonic-gate 				fclose(obuf);
150*0Sstevel@tonic-gate 				removefile(tempZedit);
151*0Sstevel@tonic-gate 				goto out;
152*0Sstevel@tonic-gate 			}
153*0Sstevel@tonic-gate 			fclose(obuf);
154*0Sstevel@tonic-gate 
155*0Sstevel@tonic-gate 			/*
156*0Sstevel@tonic-gate 			 * If we are in read only mode, make the
157*0Sstevel@tonic-gate 			 * temporary message file readonly as well.
158*0Sstevel@tonic-gate 			 */
159*0Sstevel@tonic-gate 
160*0Sstevel@tonic-gate 			if (readonly)
161*0Sstevel@tonic-gate 				chmod(tempZedit, 0400);
162*0Sstevel@tonic-gate 
163*0Sstevel@tonic-gate 			/*
164*0Sstevel@tonic-gate 			 * Fork/execl the editor on the edit file.
165*0Sstevel@tonic-gate 			 */
166*0Sstevel@tonic-gate 
167*0Sstevel@tonic-gate 			if (stat(tempZedit, &statb) < 0)
168*0Sstevel@tonic-gate 				modtime = 0;
169*0Sstevel@tonic-gate 			else
170*0Sstevel@tonic-gate 				modtime = statb.st_mtime;
171*0Sstevel@tonic-gate 			pid = vfork();
172*0Sstevel@tonic-gate 			if (pid == (pid_t)-1) {
173*0Sstevel@tonic-gate 				perror("fork");
174*0Sstevel@tonic-gate 				removefile(tempZedit);
175*0Sstevel@tonic-gate 				goto out;
176*0Sstevel@tonic-gate 			}
177*0Sstevel@tonic-gate 			if (pid == 0) {
178*0Sstevel@tonic-gate 				sigchild();
179*0Sstevel@tonic-gate 				if (sigint != SIG_IGN)
180*0Sstevel@tonic-gate 					sigset(SIGINT, SIG_DFL);
181*0Sstevel@tonic-gate 				if (sigquit != SIG_IGN)
182*0Sstevel@tonic-gate 					sigset(SIGQUIT, SIG_DFL);
183*0Sstevel@tonic-gate 				execlp(ed, ed, tempZedit, (char *)0);
184*0Sstevel@tonic-gate 				perror(ed);
185*0Sstevel@tonic-gate 				_exit(1);
186*0Sstevel@tonic-gate 			}
187*0Sstevel@tonic-gate 			while (wait(&mesg) != pid)
188*0Sstevel@tonic-gate 				;
189*0Sstevel@tonic-gate 
190*0Sstevel@tonic-gate 			/*
191*0Sstevel@tonic-gate 			 * If in read only mode, just remove the editor
192*0Sstevel@tonic-gate 			 * temporary and return.
193*0Sstevel@tonic-gate 			 */
194*0Sstevel@tonic-gate 
195*0Sstevel@tonic-gate 			if (readonly) {
196*0Sstevel@tonic-gate 				removefile(tempZedit);
197*0Sstevel@tonic-gate 				continue;
198*0Sstevel@tonic-gate 			}
199*0Sstevel@tonic-gate 
200*0Sstevel@tonic-gate 			/*
201*0Sstevel@tonic-gate 			 * Now copy the message to the end of the
202*0Sstevel@tonic-gate 			 * temp file.
203*0Sstevel@tonic-gate 			 */
204*0Sstevel@tonic-gate 
205*0Sstevel@tonic-gate 			if (stat(tempZedit, &statb) < 0) {
206*0Sstevel@tonic-gate 				perror(tempZedit);
207*0Sstevel@tonic-gate 				continue;
208*0Sstevel@tonic-gate 			}
209*0Sstevel@tonic-gate 			if (modtime == statb.st_mtime) {
210*0Sstevel@tonic-gate 				removefile(tempZedit);
211*0Sstevel@tonic-gate 				continue;
212*0Sstevel@tonic-gate 			}
213*0Sstevel@tonic-gate 			if ((ibuf = fopen(tempZedit, "r")) == NULL) {
214*0Sstevel@tonic-gate 				perror(tempZedit);
215*0Sstevel@tonic-gate 				removefile(tempZedit);
216*0Sstevel@tonic-gate 				continue;
217*0Sstevel@tonic-gate 			}
218*0Sstevel@tonic-gate 			removefile(tempZedit);
219*0Sstevel@tonic-gate 			fseek(otf, (long) 0, 2);
220*0Sstevel@tonic-gate 			size = fsize(otf);
221*0Sstevel@tonic-gate 			mp->m_flag |= MODIFY;
222*0Sstevel@tonic-gate 			mp->m_offset = size;
223*0Sstevel@tonic-gate 			ms = 0L;
224*0Sstevel@tonic-gate 			lines = 0;
225*0Sstevel@tonic-gate 			while ((c = getc(ibuf)) != EOF) {
226*0Sstevel@tonic-gate 				if (c == '\n') {
227*0Sstevel@tonic-gate 					lines++;
228*0Sstevel@tonic-gate 					blank = lastc == '\n';
229*0Sstevel@tonic-gate 				}
230*0Sstevel@tonic-gate 				lastc = c;
231*0Sstevel@tonic-gate 				putc(c, otf);
232*0Sstevel@tonic-gate 				if (ferror(otf))
233*0Sstevel@tonic-gate 					break;
234*0Sstevel@tonic-gate 				ms++;
235*0Sstevel@tonic-gate 			}
236*0Sstevel@tonic-gate 			if (!blank) {
237*0Sstevel@tonic-gate 				putc('\n', otf);
238*0Sstevel@tonic-gate 				ms++;
239*0Sstevel@tonic-gate 				lines++;
240*0Sstevel@tonic-gate 			}
241*0Sstevel@tonic-gate 			mp->m_size = ms;
242*0Sstevel@tonic-gate 			mp->m_lines = lines;
243*0Sstevel@tonic-gate 			fflush(otf);
244*0Sstevel@tonic-gate 			if (fferror(otf))
245*0Sstevel@tonic-gate 				perror("/tmp");
246*0Sstevel@tonic-gate 			fclose(ibuf);
247*0Sstevel@tonic-gate 			setclen(mp);
248*0Sstevel@tonic-gate 		} else {
249*0Sstevel@tonic-gate 			printf("\n%s\n", gettext(
250*0Sstevel@tonic-gate "*** Message content is not printable: pipe to command or save to a file ***"));
251*0Sstevel@tonic-gate 		}
252*0Sstevel@tonic-gate 	}
253*0Sstevel@tonic-gate 
254*0Sstevel@tonic-gate 	/*
255*0Sstevel@tonic-gate 	 * Restore signals and return.
256*0Sstevel@tonic-gate 	 */
257*0Sstevel@tonic-gate 
258*0Sstevel@tonic-gate out:
259*0Sstevel@tonic-gate 	sigset(SIGINT, sigint);
260*0Sstevel@tonic-gate 	sigset(SIGQUIT, sigquit);
261*0Sstevel@tonic-gate }
262