--- ray/src/px/pfilt.c	1993/09/21 10:55:54	2.11
+++ ray/src/px/pfilt.c	1996/04/01 17:24:44	2.17
@@ -1,4 +1,4 @@
-/* Copyright (c) 1992 Regents of the University of California */
+/* Copyright (c) 1996 Regents of the University of California */
 
 #ifndef lint
 static char SCCSid[] = "$SunId$ LBL";
@@ -17,6 +17,8 @@ static char SCCSid[] = "$SunId$ LBL";
 
 #include  "color.h"
 
+#include  "view.h"
+
 #include  "resolu.h"
 
 #include  "paths.h"
@@ -64,6 +66,10 @@ int  correctaspect = 0;		/* aspect ratio correction? *
 
 int  wrongformat = 0;
 
+VIEW  ourview = STDVIEW;
+int  gotview = 0;
+int  wrapfilt = 0;		/* wrap filter horizontally? */
+
 int  xrad;			/* x search radius */
 int  yrad;			/* y search radius */
 int  xbrad;			/* x box size */
@@ -219,9 +225,9 @@ char  **argv;
 			fprintf(stderr, "%s: unknown lamp type\n", lamptype);
 			quit(1);
 		}
-		for (i = 0; i < 3; i++)
-			if (lampcolor[i] > 1e-4)
-				colval(exposure,i) /= lampcolor[i];
+		for (j = 0; j < 3; j++)
+			if (lampcolor[j] > 1e-4)
+				colval(exposure,j) /= lampcolor[j];
 		freelamps();
 	}
 					/* open input file */
@@ -267,6 +273,9 @@ char  **argv;
 	}
 	if (!(order & YMAJOR))
 		inpaspect = 1.0/inpaspect;
+					/* wrap around for cylindrical view? */
+	wrapfilt = gotview && ourview.type == VT_CYL &&
+			ourview.horiz >= 360.-FTINY && order & YMAJOR;
 					/* compute output resolution */
 	if (ncols <= 0)
 		ncols = x_c*xres + .5;
@@ -302,6 +311,25 @@ char  **argv;
 }
 
 
+double
+rgb_bright(clr)
+COLOR  clr;
+{
+	return(bright(clr));
+}
+
+
+double
+xyz_bright(clr)
+COLOR  clr;
+{
+	return(clr[CIEY]);
+}
+
+
+double	(*ourbright)() = rgb_bright;
+
+
 headline(s)				/* process line from header */
 char  *s;
 {
@@ -310,12 +338,18 @@ char  *s;
 	fputs(s, stdout);		/* copy to output */
 	if (isaspect(s))		/* get aspect ratio */
 		inpaspect *= aspectval(s);
-	else if (isexpos(s))
+	else if (isexpos(s))		/* get exposure */
 		hotlvl *= exposval(s);
-	else if (isformat(s)) {
-		formatval(fmt, s);
-		wrongformat = strcmp(fmt, COLRFMT);
-	}
+	else if (formatval(fmt, s)) {	/* get format */
+		wrongformat = 0;
+		if (!strcmp(COLRFMT, fmt))
+			ourbright = rgb_bright;
+		else if (!strcmp(CIEFMT, fmt))
+			ourbright = xyz_bright;
+		else
+			wrongformat = !globmatch(PICFMT, fmt);
+	} else if (isview(s) && sscanview(&ourview, s) > 0)
+		gotview++;
 }
 
 
@@ -383,7 +417,7 @@ FILE  *in;
 				if (freadscan(scanin[yread%barsize],
 						xres, in) < 0) {
 					fprintf(stderr,
-						"%s: bad read (y=%d)\n",
+						"%s: truncated input (y=%d)\n",
 						progname, yres-1-yread);
 					quit(1);
 				}
@@ -430,9 +464,9 @@ scan2init()			/* prepare scanline arrays */
 			rad *= (y_r + x_c)/2.0;
 
 		if (thresh > FTINY) {
-			xrad = CHECKRAD*THRESHRAD*rad/x_c + xbrad;
-			yrad = CHECKRAD*THRESHRAD*rad/y_r + ybrad;
 			orad = CHECKRAD*THRESHRAD*rad + 1;
+			xrad = orad/x_c + xbrad;
+			yrad = orad/y_r + ybrad;
 			obarsize = 2*orad + 1;
 		} else {
 			xrad = CHECKRAD*rad/x_c + 1;
@@ -475,7 +509,7 @@ scan2init()			/* prepare scanline arrays */
 			fputaspect(d, stdout);
 	}
 					/* record exposure */
-	d = bright(exposure);
+	d = (*ourbright)(exposure);
 	if (!FEQ(d,1.0))
 		fputexpos(d, stdout);
 					/* record color correction */
@@ -502,11 +536,11 @@ int  r;
 	int  ybot;
 	register int  c;
 					/* average input scanlines */
-	while (nextrow < r+orad && nextrow < nrows) {
+	while (nextrow <= r+orad && nextrow < nrows) {
 		ybot = (long)nextrow*yres/nrows;
 		for (c = 0; c < ncols; c++) {
 			dobox(ctmp, (int)((long)c*xres/ncols),ybot, c,nextrow);
-			greybar[nextrow%obarsize][c] = bright(ctmp);
+			greybar[nextrow%obarsize][c] = (*ourbright)(ctmp);
 		}
 					/* and zero output scanline */
 		bzero((char *)scoutbar[nextrow%obarsize], ncols*sizeof(COLOR));