xref: /titanic_50/usr/src/cmd/mailx/head.c (revision 6c83d09f819e9de7126c8539546eca2e276df44a)
17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate  * CDDL HEADER START
37c478bd9Sstevel@tonic-gate  *
47c478bd9Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
57c478bd9Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
67c478bd9Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
77c478bd9Sstevel@tonic-gate  * with the License.
87c478bd9Sstevel@tonic-gate  *
97c478bd9Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
107c478bd9Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
117c478bd9Sstevel@tonic-gate  * See the License for the specific language governing permissions
127c478bd9Sstevel@tonic-gate  * and limitations under the License.
137c478bd9Sstevel@tonic-gate  *
147c478bd9Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
157c478bd9Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
167c478bd9Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
177c478bd9Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
187c478bd9Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
197c478bd9Sstevel@tonic-gate  *
207c478bd9Sstevel@tonic-gate  * CDDL HEADER END
217c478bd9Sstevel@tonic-gate  */
227c478bd9Sstevel@tonic-gate /*
237c478bd9Sstevel@tonic-gate  * Copyright 1995 Sun Microsystems, Inc.  All rights reserved.
247c478bd9Sstevel@tonic-gate  * Use is subject to license terms.
257c478bd9Sstevel@tonic-gate  */
267c478bd9Sstevel@tonic-gate 
277c478bd9Sstevel@tonic-gate /*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
287c478bd9Sstevel@tonic-gate /*	  All Rights Reserved  	*/
297c478bd9Sstevel@tonic-gate 
307c478bd9Sstevel@tonic-gate 
317c478bd9Sstevel@tonic-gate /*
327c478bd9Sstevel@tonic-gate  * University Copyright- Copyright (c) 1982, 1986, 1988
337c478bd9Sstevel@tonic-gate  * The Regents of the University of California
347c478bd9Sstevel@tonic-gate  * All Rights Reserved
357c478bd9Sstevel@tonic-gate  *
367c478bd9Sstevel@tonic-gate  * University Acknowledgment- Portions of this document are derived from
377c478bd9Sstevel@tonic-gate  * software developed by the University of California, Berkeley, and its
387c478bd9Sstevel@tonic-gate  * contributors.
397c478bd9Sstevel@tonic-gate  */
407c478bd9Sstevel@tonic-gate 
417c478bd9Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
427c478bd9Sstevel@tonic-gate 
437c478bd9Sstevel@tonic-gate #include "rcv.h"
447c478bd9Sstevel@tonic-gate 
457c478bd9Sstevel@tonic-gate /*
467c478bd9Sstevel@tonic-gate  * mailx -- a modified version of a University of California at Berkeley
477c478bd9Sstevel@tonic-gate  *	mail program
487c478bd9Sstevel@tonic-gate  *
497c478bd9Sstevel@tonic-gate  * Routines for processing and detecting headlines.
507c478bd9Sstevel@tonic-gate  */
517c478bd9Sstevel@tonic-gate 
527c478bd9Sstevel@tonic-gate static char	*copyin(char src[], char **space);
537c478bd9Sstevel@tonic-gate static char	*nextword(char wp[], char wbuf[]);
547c478bd9Sstevel@tonic-gate 
557c478bd9Sstevel@tonic-gate /*
567c478bd9Sstevel@tonic-gate  * See if the passed line buffer is a mail header.
577c478bd9Sstevel@tonic-gate  * Return true if yes.
587c478bd9Sstevel@tonic-gate  */
597c478bd9Sstevel@tonic-gate 
607c478bd9Sstevel@tonic-gate int
617c478bd9Sstevel@tonic-gate ishead(char linebuf[])
627c478bd9Sstevel@tonic-gate {
637c478bd9Sstevel@tonic-gate 	register char *cp;
647c478bd9Sstevel@tonic-gate 	struct headline hl;
657c478bd9Sstevel@tonic-gate 	char parbuf[BUFSIZ];
667c478bd9Sstevel@tonic-gate 
677c478bd9Sstevel@tonic-gate 	cp = linebuf;
687c478bd9Sstevel@tonic-gate 	if (strncmp("From ", cp, 5) != 0)
697c478bd9Sstevel@tonic-gate 		return(0);
707c478bd9Sstevel@tonic-gate 	parse(cp, &hl, parbuf);
717c478bd9Sstevel@tonic-gate 	if (hl.l_from == NOSTR) {
727c478bd9Sstevel@tonic-gate 		return(0);
737c478bd9Sstevel@tonic-gate 	}
747c478bd9Sstevel@tonic-gate 	return(1);
757c478bd9Sstevel@tonic-gate }
767c478bd9Sstevel@tonic-gate 
777c478bd9Sstevel@tonic-gate /*
787c478bd9Sstevel@tonic-gate  * Split a headline into its useful components.
797c478bd9Sstevel@tonic-gate  * Copy the line into dynamic string space, then set
807c478bd9Sstevel@tonic-gate  * pointers into the copied line in the passed headline
817c478bd9Sstevel@tonic-gate  * structure.  Actually, it scans.
827c478bd9Sstevel@tonic-gate  */
837c478bd9Sstevel@tonic-gate void
847c478bd9Sstevel@tonic-gate parse(char line[], struct headline *hl, char pbuf[])
857c478bd9Sstevel@tonic-gate {
867c478bd9Sstevel@tonic-gate 	register char *cp, *dp;
877c478bd9Sstevel@tonic-gate 	char *sp;
887c478bd9Sstevel@tonic-gate 	char word[LINESIZE];
897c478bd9Sstevel@tonic-gate 
907c478bd9Sstevel@tonic-gate 	hl->l_from = NOSTR;
917c478bd9Sstevel@tonic-gate 	hl->l_date = NOSTR;
927c478bd9Sstevel@tonic-gate 	cp = line;
937c478bd9Sstevel@tonic-gate 	sp = pbuf;
947c478bd9Sstevel@tonic-gate 
957c478bd9Sstevel@tonic-gate 	/*
967c478bd9Sstevel@tonic-gate 	 * Skip the first "word" of the line, which should be "From"
977c478bd9Sstevel@tonic-gate 	 * anyway.
987c478bd9Sstevel@tonic-gate 	 */
997c478bd9Sstevel@tonic-gate 
1007c478bd9Sstevel@tonic-gate 	cp = nextword(cp, word);
1017c478bd9Sstevel@tonic-gate 	dp = nextword(cp, word);
1027c478bd9Sstevel@tonic-gate 	if (!equal(word, ""))
1037c478bd9Sstevel@tonic-gate 		hl->l_from = copyin(word, &sp);
1047c478bd9Sstevel@tonic-gate 	if (dp != NOSTR)
1057c478bd9Sstevel@tonic-gate 		hl->l_date = copyin(dp, &sp);
1067c478bd9Sstevel@tonic-gate }
1077c478bd9Sstevel@tonic-gate 
1087c478bd9Sstevel@tonic-gate /*
1097c478bd9Sstevel@tonic-gate  * Copy the string on the left into the string on the right
1107c478bd9Sstevel@tonic-gate  * and bump the right (reference) string pointer by the length.
1117c478bd9Sstevel@tonic-gate  * Thus, dynamically allocate space in the right string, copying
1127c478bd9Sstevel@tonic-gate  * the left string into it.
1137c478bd9Sstevel@tonic-gate  */
1147c478bd9Sstevel@tonic-gate 
1157c478bd9Sstevel@tonic-gate static char *
1167c478bd9Sstevel@tonic-gate copyin(char src[], char **space)
1177c478bd9Sstevel@tonic-gate {
1187c478bd9Sstevel@tonic-gate 	register char *cp, *top;
1197c478bd9Sstevel@tonic-gate 	register int s;
1207c478bd9Sstevel@tonic-gate 
1217c478bd9Sstevel@tonic-gate 	s = strlen(src);
1227c478bd9Sstevel@tonic-gate 	cp = *space;
1237c478bd9Sstevel@tonic-gate 	top = cp;
1247c478bd9Sstevel@tonic-gate 	strcpy(cp, src);
1257c478bd9Sstevel@tonic-gate 	cp += s + 1;
1267c478bd9Sstevel@tonic-gate 	*space = cp;
1277c478bd9Sstevel@tonic-gate 	return(top);
1287c478bd9Sstevel@tonic-gate }
1297c478bd9Sstevel@tonic-gate 
1307c478bd9Sstevel@tonic-gate /*
1317c478bd9Sstevel@tonic-gate  * Collect a liberal (space, tab delimited) word into the word buffer
1327c478bd9Sstevel@tonic-gate  * passed.  Also, return a pointer to the next word following that,
1337c478bd9Sstevel@tonic-gate  * or NOSTR if none follow.
1347c478bd9Sstevel@tonic-gate  */
1357c478bd9Sstevel@tonic-gate 
1367c478bd9Sstevel@tonic-gate static char *
1377c478bd9Sstevel@tonic-gate nextword(char wp[], char wbuf[])
1387c478bd9Sstevel@tonic-gate {
1397c478bd9Sstevel@tonic-gate 	register char *cp, *cp2;
1407c478bd9Sstevel@tonic-gate 
1417c478bd9Sstevel@tonic-gate 	if ((cp = wp) == NOSTR) {
1427c478bd9Sstevel@tonic-gate 		copy("", wbuf);
1437c478bd9Sstevel@tonic-gate 		return(NOSTR);
1447c478bd9Sstevel@tonic-gate 	}
1457c478bd9Sstevel@tonic-gate 	cp2 = wbuf;
1467c478bd9Sstevel@tonic-gate 	while (!any(*cp, " \t") && *cp != '\0')
1477c478bd9Sstevel@tonic-gate 		if (*cp == '"') {
1487c478bd9Sstevel@tonic-gate 			*cp2++ = *cp++;
1497c478bd9Sstevel@tonic-gate 			while (*cp != '\0' && *cp != '"')
1507c478bd9Sstevel@tonic-gate 				*cp2++ = *cp++;
1517c478bd9Sstevel@tonic-gate 			if (*cp == '"')
1527c478bd9Sstevel@tonic-gate 				*cp2++ = *cp++;
1537c478bd9Sstevel@tonic-gate 		} else
1547c478bd9Sstevel@tonic-gate 			*cp2++ = *cp++;
1557c478bd9Sstevel@tonic-gate 	*cp2 = '\0';
1567c478bd9Sstevel@tonic-gate 	while (any(*cp, " \t"))
1577c478bd9Sstevel@tonic-gate 		cp++;
1587c478bd9Sstevel@tonic-gate 	if (*cp == '\0')
1597c478bd9Sstevel@tonic-gate 		return(NOSTR);
1607c478bd9Sstevel@tonic-gate 	return(cp);
1617c478bd9Sstevel@tonic-gate }
1627c478bd9Sstevel@tonic-gate 
1637c478bd9Sstevel@tonic-gate /*
1647c478bd9Sstevel@tonic-gate  * Copy str1 to str2, return pointer to null in str2.
1657c478bd9Sstevel@tonic-gate  */
1667c478bd9Sstevel@tonic-gate 
1677c478bd9Sstevel@tonic-gate char *
1687c478bd9Sstevel@tonic-gate copy(char *str1, char *str2)
1697c478bd9Sstevel@tonic-gate {
1707c478bd9Sstevel@tonic-gate 	register char *s1, *s2;
1717c478bd9Sstevel@tonic-gate 
1727c478bd9Sstevel@tonic-gate 	s1 = str1;
1737c478bd9Sstevel@tonic-gate 	s2 = str2;
1747c478bd9Sstevel@tonic-gate 	while (*s1)
1757c478bd9Sstevel@tonic-gate 		*s2++ = *s1++;
1767c478bd9Sstevel@tonic-gate 	*s2 = 0;
1777c478bd9Sstevel@tonic-gate 	return(s2);
1787c478bd9Sstevel@tonic-gate }
1797c478bd9Sstevel@tonic-gate 
1807c478bd9Sstevel@tonic-gate /*
1817c478bd9Sstevel@tonic-gate  * Is ch any of the characters in str?
1827c478bd9Sstevel@tonic-gate  */
1837c478bd9Sstevel@tonic-gate 
1847c478bd9Sstevel@tonic-gate int
1857c478bd9Sstevel@tonic-gate any(int ch, char *str)
1867c478bd9Sstevel@tonic-gate {
1877c478bd9Sstevel@tonic-gate 	register char *f;
188*6c83d09fSrobbin 	int c;
1897c478bd9Sstevel@tonic-gate 
1907c478bd9Sstevel@tonic-gate 	f = str;
1917c478bd9Sstevel@tonic-gate 	c = ch;
1927c478bd9Sstevel@tonic-gate 	while (*f)
1937c478bd9Sstevel@tonic-gate 		if (c == *f++)
1947c478bd9Sstevel@tonic-gate 			return(1);
1957c478bd9Sstevel@tonic-gate 	return(0);
1967c478bd9Sstevel@tonic-gate }
197