--- ray/src/rt/rview.c	1992/01/16 12:05:26	2.6
+++ ray/src/rt/rview.c	1993/09/07 16:11:12	2.12
@@ -1,4 +1,4 @@
-/* Copyright (c) 1987 Regents of the University of California */
+/* Copyright (c) 1992 Regents of the University of California */
 
 #ifndef lint
 static char SCCSid[] = "$SunId$ LBL";
@@ -26,26 +26,26 @@ int  ndims = 0;				/* number of sampling dimensions */
 int  samplendx = 0;			/* index for this sample */
 
 int  psample = 8;			/* pixel sample size */
-double  maxdiff = .15;			/* max. sample difference */
+double	maxdiff = .15;			/* max. sample difference */
 
-double  exposure = 1.0;			/* exposure for scene */
+double	exposure = 1.0;			/* exposure for scene */
 
-double  dstrsrc = 0.0;			/* square source distribution */
-double  shadthresh = .1;		/* shadow threshold */
-double  shadcert = .25;			/* shadow certainty */
+double	dstrsrc = 0.0;			/* square source distribution */
+double	shadthresh = .1;		/* shadow threshold */
+double	shadcert = .25;			/* shadow certainty */
 int  directrelay = 0;			/* number of source relays */
 int  vspretest = 128;			/* virtual source pretest density */
-int  directinvis = 0;			/* sources invisible? */
-double  srcsizerat = 0.;		/* maximum ratio source size/dist. */
+int  directvis = 1;			/* sources visible? */
+double	srcsizerat = 0.;		/* maximum ratio source size/dist. */
 
-double  specthresh = .3;		/* specular sampling threshold */
-double  specjitter = 1.;		/* specular sampling jitter */
+double	specthresh = .3;		/* specular sampling threshold */
+double	specjitter = 1.;		/* specular sampling jitter */
 
 int  maxdepth = 4;			/* maximum recursion depth */
-double  minweight = 1e-2;		/* minimum ray weight */
+double	minweight = 1e-2;		/* minimum ray weight */
 
 COLOR  ambval = BLKCOLOR;		/* ambient value */
-double  ambacc = 0.2;			/* ambient accuracy */
+double	ambacc = 0.2;			/* ambient accuracy */
 int  ambres = 8;			/* ambient resolution */
 int  ambdiv = 32;			/* ambient divisions */
 int  ambssamp = 0;			/* ambient super-samples */
@@ -58,6 +58,8 @@ char  *devname = dev_default;		/* output device name *
 
 struct driver  *dev = NULL;		/* driver functions */
 
+char  rifname[128];			/* rad input file name */
+
 VIEW  oldview;				/* previous view parameters */
 
 PNODE  ptrunk;				/* the base of our image */
@@ -68,12 +70,16 @@ static char  *reserve_mem = NULL;	/* pre-allocated res
 
 #define RESERVE_AMT	32768		/* amount of memory to reserve */
 
-#define  CTRL(c)	((c)-'@')
+#define	 CTRL(c)	((c)-'@')
 
 
 quit(code)			/* quit program */
 int  code;
 {
+#ifdef MSTATS
+	if (code == 2 && errno == ENOMEM)
+		printmemstats(stderr);
+#endif
 	devclose();
 	exit(code);
 }
@@ -95,11 +101,13 @@ char  *dname;
 				error(USER, errmsg);
 			} else
 				return;
+#ifndef NIX						   
 						/* not there, try exec */
 	if ((dev = comm_init(dname, id)) == NULL) {
 		sprintf(errmsg, "cannot start device \"%s\"", dname);
 		error(USER, errmsg);
 	}
+#endif
 }
 
 
@@ -172,7 +180,7 @@ freereserves()			/* free memory reserves */
 command(prompt)			/* get/execute command */
 char  *prompt;
 {
-#define  badcom(s)	strncmp(s, inpbuf, args-inpbuf-1)
+#define	 badcom(s)	strncmp(s, inpbuf, args-inpbuf-1)
 	char  inpbuf[256];
 	char  *args;
 again:
@@ -183,9 +191,13 @@ again:
 	else *++args = '\0';
 	
 	switch (inpbuf[0]) {
-	case 'f':				/* new frame */
-		if (badcom("frame"))
-			goto commerr;
+	case 'f':				/* new frame (or free mem.) */
+		if (badcom("frame")) {
+			if (badcom("free"))
+				goto commerr;
+			free_objmem();
+			break;
+		}
 		getframe(args);
 		break;
 	case 'v':				/* view */
@@ -198,6 +210,16 @@ again:
 			goto commerr;
 		lastview(args);
 		break;
+	case 'V':				/* save view */
+		if (badcom("V"))
+			goto commerr;
+		saveview(args);
+		break;
+	case 'L':				/* load view */
+		if (badcom("L"))
+			goto commerr;
+		loadview(args);
+		break;
 	case 'e':				/* exposure */
 		if (badcom("exposure"))
 			goto commerr;
@@ -223,9 +245,9 @@ again:
 			goto commerr;
 		getaim(args);
 		break;
-	case 'm':				/* move camera */
+	case 'm':				/* move camera (or memstats) */
 		if (badcom("move"))
-#ifdef  MSTATS
+#ifdef	MSTATS
 		{
 			if (badcom("memory"))
 				goto commerr;
@@ -265,7 +287,7 @@ again:
 		quit(0);
 	case CTRL('C'):				/* interrupt */
 		goto again;
-#ifdef  SIGTSTP
+#ifdef	SIGTSTP
 	case CTRL('Z'):				/* stop */
 		devclose();
 		kill(0, SIGTSTP);
@@ -286,7 +308,7 @@ commerr:
 		error(COMMAND, errmsg);
 		break;
 	}
-#undef  badcom
+#undef	badcom
 }
 
 
@@ -296,23 +318,25 @@ rsample()			/* sample the image */
 	RECT  r;
 	PNODE  *p;
 	register RECT  *rl;
-	register PNODE  **pl;
+	register PNODE	**pl;
 	register int  x;
 	/*
 	 *     We initialize the bottom row in the image at our current
-	 * resolution.  During sampling, we check super-pixels to the
+	 * resolution.	During sampling, we check super-pixels to the
 	 * right and above by calling bigdiff().  If there is a significant
 	 * difference, we subsample the super-pixels.  The testing process
 	 * includes initialization of the next row.
 	 */
-	xsiz = (((pframe.r-pframe.l)<<pdepth)+hresolu-1) / hresolu;
-	ysiz = (((pframe.u-pframe.d)<<pdepth)+vresolu-1) / vresolu;
+	xsiz = (((long)(pframe.r-pframe.l)<<pdepth)+hresolu-1) / hresolu;
+	ysiz = (((long)(pframe.u-pframe.d)<<pdepth)+vresolu-1) / vresolu;
 	rl = (RECT *)malloc(xsiz*sizeof(RECT));
 	if (rl == NULL)
 		return;
 	pl = (PNODE **)malloc(xsiz*sizeof(PNODE *));
-	if (pl == NULL)
+	if (pl == NULL) {
+		free((char *)rl);
 		return;
+	}
 	/*
 	 * Initialize the bottom row.
 	 */
@@ -378,7 +402,7 @@ escape:
 
 int
 refine(p, xmin, ymin, xmax, ymax, pd)		/* refine a node */
-register PNODE  *p;
+register PNODE	*p;
 int  xmin, ymin, xmax, ymax;
 int  pd;
 {
@@ -402,7 +426,7 @@ int  pd;
 			return(0);
 		/*
 		 *  The following paint order can leave a black pixel
-		 *  when redraw() is called in (*dev->paintr)().
+		 *  if redraw() is called in (*dev->paintr)().
 		 */
 		if (p->x >= mx && p->y >= my)
 			pcopy(p, p->kid+UR);