--- ray/src/common/header.c	1995/10/15 14:07:58	2.5
+++ ray/src/common/header.c	1998/10/27 08:44:28	2.10
@@ -1,4 +1,4 @@
-/* Copyright (c) 1994 Regents of the University of California */
+/* Copyright (c) 1996 Regents of the University of California */
 
 #ifndef lint
 static char SCCSid[] = "$SunId$ LBL";
@@ -17,7 +17,7 @@ static char SCCSid[] = "$SunId$ LBL";
  *  formatval(r,s)	copy the format value in s to r
  *  fputformat(s,fp)	write "FORMAT=%s" to fp
  *  getheader(fp,f,p)	read header from fp, calling f(s,p) on each line
- *  copymatch(pat, str)	copy str into pat if glob match
+ *  globmatch(pat, str)	check for glob match of str against pat
  *  checkheader(i,p,o)	check header format from i against p and copy to o
  *
  *  To copy header from input to output, use getheader(fin, fputs, fout)
@@ -57,7 +57,7 @@ register char  *r, *s;
 
 	while (*cp) if (*cp++ != *s++) return(0);
 	if (r == NULL) return(1);
-	while (*s) *r++ = *s++;
+	while (*s && !isspace(*s)) *r++ = *s++;
 	*r = '\0';
 	return(1);
 }
@@ -89,9 +89,8 @@ register FILE  *fp;
 			putc(quote, fp);
 		} else
 			fputs(*av++, fp);
-		putc(' ', fp);
+		putc(ac ? ' ' : '\n', fp);
 	}
-	putc('\n', fp);
 }
 
 
@@ -154,8 +153,8 @@ char  *p;
 			ungetc(buf[MAXLINE-2], fp);	/* prevent false end */
 			buf[MAXLINE-2] = '\0';
 		}
-		if (f != NULL)
-			(*f)(buf, p);
+		if (f != NULL && (*f)(buf, p) < 0)
+			return(-1);
 	}
 }
 
@@ -176,16 +175,10 @@ register struct check  *cp;
 }
 
 
-/*
- * Copymatch(pat,str) checks pat for wildcards, and
- * copies str into pat if there is a match (returning true).
- */
-
 int
-copymatch(pat, str)
+globmatch(pat, str)		/* check for glob match of str against pat */
 char	*pat, *str;
 {
-	int	docopy = 0;
 	register char	*p = pat, *s = str;
 
 	do {
@@ -193,16 +186,13 @@ char	*pat, *str;
 		case '?':			/* match any character */
 			if (!*s++)
 				return(0);
-			docopy++;
 			break;
 		case '*':			/* match any string */
 			while (p[1] == '*') p++;
 			do
-				if ( (p[1]=='?' || p[1]==*s)
-						&& copymatch(p+1,s) ) {
-					strcpy(pat, str);
+				if ( (p[1]=='?' || p[1]==*s) &&
+						globmatch(p+1,s) )
 					return(1);
-				}
 			while (*s++);
 			return(0);
 		case '\\':			/* literal next */
@@ -215,8 +205,6 @@ char	*pat, *str;
 			break;
 		}
 	} while (*p++);
-	if (docopy)
-		strcpy(pat, str);
 	return(1);
 }
 
@@ -229,7 +217,8 @@ char	*pat, *str;
  * if any input format is found (or there is an error), and 0 otherwise.
  * If fmt contains any '*' or '?' characters, then checkheader
  * does wildcard expansion and copies a matching result into fmt.
- * Be sure that fmt is big enough to hold the match in such cases!
+ * Be sure that fmt is big enough to hold the match in such cases,
+ * and that it is not a static, read-only string!
  * The input header (minus any format lines) is copied to fout
  * if fout is not NULL.
  */
@@ -241,12 +230,20 @@ char  *fmt;
 FILE  *fout;
 {
 	struct check	cdat;
+	register char	*cp;
 
 	cdat.fp = fout;
 	cdat.fs[0] = '\0';
 	if (getheader(fin, mycheck, &cdat) < 0)
 		return(-1);
-	if (cdat.fs[0] != '\0')
-		return(copymatch(fmt, cdat.fs) ? 1 : -1);
-	return(0);
+	if (!cdat.fs[0])
+		return(0);
+	for (cp = fmt; *cp; cp++)		/* check for globbing */
+		if (*cp == '?' | *cp == '*')
+			if (globmatch(fmt, cdat.fs)) {
+				strcpy(fmt, cdat.fs);
+				return(1);
+			} else
+				return(-1);
+	return(strcmp(fmt, cdat.fs) ? -1 : 1);	/* literal match */
 }