--- ray/src/px/pcomb.c	1991/08/14 15:00:34	1.21
+++ ray/src/px/pcomb.c	1992/09/21 12:13:48	2.7
@@ -1,4 +1,4 @@
-/* Copyright (c) 1991 Regents of the University of California */
+/* Copyright (c) 1992 Regents of the University of California */
 
 #ifndef lint
 static char SCCSid[] = "$SunId$ LBL";
@@ -12,10 +12,16 @@ static char SCCSid[] = "$SunId$ LBL";
 
 #include <stdio.h>
 
+#ifdef MSDOS
+#include <fcntl.h>
+#endif
+
 #include <errno.h>
 
 #include "color.h"
 
+#include  "resolu.h"
+
 #include "calcomp.h"
 
 #define MAXINP		32		/* maximum number of input files */
@@ -32,6 +38,7 @@ struct {
 
 int	nfiles;				/* number of input files */
 
+char	Command[] = "<Command>";
 char	vcolin[3][4] = {"ri", "gi", "bi"};
 char	vcolout[3][4] = {"ro", "go", "bo"};
 char	vbrtin[] = "li";
@@ -61,7 +68,9 @@ int	wrongformat = 0;
 
 FILE	*popen();
 
+extern char	*emalloc();
 
+
 main(argc, argv)
 int	argc;
 char	*argv[];
@@ -69,6 +78,12 @@ char	*argv[];
 	int	original;
 	double	f;
 	int	a, i;
+#ifdef MSDOS
+	extern int  _fmode;
+	_fmode = O_BINARY;
+	setmode(fileno(stdin), O_BINARY);
+	setmode(fileno(stdout), O_BINARY);
+#endif
 						/* scan options */
 	for (a = 1; a < argc; a++) {
 		if (argv[a][0] == '-')
@@ -108,7 +123,7 @@ char	*argv[];
 				break;
 			case 'o':
 				original++;
-				break;
+				continue;
 			case 's':
 				f = atof(argv[++a]);
 				scalecolor(input[nfiles].coef, f);
@@ -122,10 +137,13 @@ char	*argv[];
 				goto usage;
 			}
 		else {
-			input[nfiles].name = argv[a];
-			input[nfiles].fp = argv[a][0]=='!' ?
-					popen(argv[a]+1, "r") :
-					fopen(argv[a], "r");
+			if (argv[a][0] == '!') {
+				input[nfiles].name = Command;
+				input[nfiles].fp = popen(argv[a]+1, "r");
+			} else {
+				input[nfiles].name = argv[a];
+				input[nfiles].fp = fopen(argv[a], "r");
+			}
 			if (input[nfiles].fp == NULL) {
 				perror(argv[a]);
 				quit(1);
@@ -181,7 +199,7 @@ char	*argv[];
 	printargs(argc, argv, stdout);
 	fputformat(COLRFMT, stdout);
 	putchar('\n');
-	fputresolu(YMAJOR|YDECR, xres, yres, stdout);
+	fprtresolu(xres, yres, stdout);
 						/* combine pictures */
 	combine();
 	quit(0);
@@ -232,7 +250,7 @@ checkfile()			/* ready a file */
 		eputs(": not in Radiance picture format\n");
 		quit(1);
 	}
-	if (fgetresolu(&xinp, &yinp, input[nfiles].fp) != (YMAJOR|YDECR)) {
+	if (fgetresolu(&xinp, &yinp, input[nfiles].fp) < 0) {
 		eputs(input[nfiles].name);
 		eputs(": bad picture size\n");
 		quit(1);
@@ -329,6 +347,7 @@ combine()			/* combine pictures */
 
 advance()			/* read in data for next scanline */
 {
+	extern double  fabs();
 	int	ytarget;
 	register COLOR	*st;
 	register int	i, j;
@@ -341,13 +360,16 @@ advance()			/* read in data for next scanline */
 			input[i].scan[0] = st;
 			if (yscan <= MIDSCN)		/* hit bottom? */
 				continue;
-			if (freadscan(st, xmax, input[i].fp) < 0) {	/* read */
+			if (freadscan(st, xmax, input[i].fp) < 0) {  /* read */
 				eputs(input[i].name);
 				eputs(": read error\n");
 				quit(1);
 			}
-			for (j = 0; j < xmax; j++)	/* adjust color */
-				multcolor(st[j], input[i].coef);
+			if (fabs(colval(input[i].coef,RED)-1.0) > 1e-3 ||
+				fabs(colval(input[i].coef,GRN)-1.0) > 1e-3 ||
+				fabs(colval(input[i].coef,BLU)-1.0) > 1e-3)
+				for (j = 0; j < xmax; j++)  /* adjust color */
+					multcolor(st[j], input[i].coef);
 		}
 }
 
@@ -444,8 +466,15 @@ char	*msg;
 }
 
 
-quit(code)
-int	code;
+quit(code)		/* exit gracefully */
+int  code;
 {
+	register int  i;
+				/* close input files */
+	for (i = 0; i < nfiles; i++)
+		if (input[i].name == Command)
+			pclose(input[i].fp);
+		else
+			fclose(input[i].fp);
 	exit(code);
 }