--- ray/src/rt/rpict.c	1993/07/30 10:31:09	2.26
+++ ray/src/rt/rpict.c	1993/11/23 09:56:31	2.33
@@ -12,11 +12,21 @@ static char SCCSid[] = "$SunId$ LBL";
 
 #include  "ray.h"
 
+#include  <sys/types.h>
+
+#ifndef NIX
 #ifdef BSD
 #include  <sys/time.h>
 #include  <sys/resource.h>
+#else
+#include  <sys/times.h>
+#include  <sys/utsname.h>
+#include  <unistd.h>
 #endif
+#endif
 
+extern time_t	time();
+
 #include  <signal.h>
 
 #include  "view.h"
@@ -77,10 +87,9 @@ int  ralrm = 0;				/* seconds between reports */
 
 double	pctdone = 0.0;			/* percentage done */
 
-long  tlastrept = 0L;			/* time at last report */
+time_t  tlastrept = 0L;			/* time at last report */
 
-extern long  time();
-extern long  tstart;			/* starting time */
+extern time_t  tstart;			/* starting time */
 
 extern unsigned long  nrays;		/* number of rays traced */
 
@@ -94,7 +103,22 @@ extern char  *mktemp();
 
 double	pixvalue();
 
+#ifdef NIX
+#define  file_exists(f)	(access(f,F_OK)==0)
+#else
+#include  <sys/types.h>
+#include  <sys/stat.h>
+int
+file_exists(fname)				/* ordinary file exists? */
+char  *fname;
+{
+	struct stat  sbuf;
+	if (stat(fname, &sbuf) < 0) return(0);
+	return((sbuf.st_mode & S_IFREG) != 0);
+}
+#endif
 
+
 quit(code)			/* quit program */
 int  code;
 {
@@ -106,29 +130,49 @@ int  code;
 }
 
 
-#ifdef BSD
+#ifndef NIX
 report()		/* report progress */
 {
+	double  u, s;
+#ifdef BSD
+	char  hostname[257];
 	struct rusage  rubuf;
-	double	t;
+#else
+	struct tms  tbuf;
+	struct utsname  nambuf;
+	double  period;
+#define hostname  nambuf.sysname
+#endif
 
+	tlastrept = time((time_t *)NULL);
+#ifdef BSD
 	getrusage(RUSAGE_SELF, &rubuf);
-	t = (rubuf.ru_utime.tv_usec + rubuf.ru_stime.tv_usec) / 1e6;
-	t += rubuf.ru_utime.tv_sec + rubuf.ru_stime.tv_sec;
+	u = rubuf.ru_utime.tv_sec + rubuf.ru_utime.tv_usec/1e6;
+	s = rubuf.ru_stime.tv_sec + rubuf.ru_stime.tv_usec/1e6;
 	getrusage(RUSAGE_CHILDREN, &rubuf);
-	t += (rubuf.ru_utime.tv_usec + rubuf.ru_stime.tv_usec) / 1e6;
-	t += rubuf.ru_utime.tv_sec + rubuf.ru_stime.tv_sec;
+	u += rubuf.ru_utime.tv_sec + rubuf.ru_utime.tv_usec/1e6;
+	s += rubuf.ru_stime.tv_sec + rubuf.ru_stime.tv_usec/1e6;
+	gethostname(hostname, sizeof(hostname));
+#else
+	times(&tbuf);
+	period = 1.0 / sysconf(_SC_CLK_TCK);
+	u = ( tbuf.tms_utime + tbuf.tms_cutime ) * period;
+	s = ( tbuf.tms_stime + tbuf.tms_cstime ) * period;
+	uname(&nambuf);
+#endif
 
-	sprintf(errmsg, "%lu rays, %4.2f%% done after %5.4f CPU hours\n",
-			nrays, pctdone, t/3600.0);
+	sprintf(errmsg,
+		"%lu rays, %4.2f%% after %.3fu %.3fs %.3fr hours on %s\n",
+			nrays, pctdone, u/3600., s/3600.,
+			(tlastrept-tstart)/3600., hostname);
 	eputs(errmsg);
-	tlastrept = time((long *)0);
+#undef hostname
 }
 #else
 report()		/* report progress */
 {
-	tlastrept = time((long *)0);
-	sprintf(errmsg, "%lu rays, %4.2f%% done after %5.4f hours\n",
+	tlastrept = time((time_t *)NULL);
+	sprintf(errmsg, "%lu rays, %4.2f%% after %5.4f hours\n",
 			nrays, pctdone, (tlastrept-tstart)/3600.0);
 	eputs(errmsg);
 	signal(SIGCONT, report);
@@ -190,12 +234,19 @@ char  *pout, *zout, *prvr;
 				cp--;
 			strcpy(cp, RFTEMPLATE);
 			prvr = mktemp(fbuf2);
-			if (rename(fbuf, prvr) < 0 && errno != ENOENT) {
-				sprintf(errmsg,
+			if (rename(fbuf, prvr) < 0)
+				if (errno == ENOENT) {	/* ghost file */
+					sprintf(errmsg,
+						"new output file \"%s\"",
+						fbuf);
+					error(WARNING, errmsg);
+					prvr = NULL;
+				} else {		/* serious error */
+					sprintf(errmsg,
 					"cannot rename \"%s\" to \"%s\"",
 						fbuf, prvr);
-				error(SYSTEM, errmsg);
-			}
+					error(SYSTEM, errmsg);
+				}
 		}
 	}
 	npicts = 0;			/* render sequence */
@@ -205,8 +256,15 @@ char  *pout, *zout, *prvr;
 		pctdone = 0.0;
 		if (pout != NULL) {
 			sprintf(fbuf, pout, seq);
-			if (prvr == NULL && access(fbuf, F_OK) == 0)
+			if (file_exists(fbuf)) {
+				if (prvr != NULL || !strcmp(fbuf, pout)) {
+					sprintf(errmsg,
+						"output file \"%s\" exists",
+						fbuf);
+					error(USER, errmsg);
+				}
 				continue;		/* don't clobber */
+			}
 			if (freopen(fbuf, "w", stdout) == NULL) {
 				sprintf(errmsg,
 					"cannot open output file \"%s\"", fbuf);
@@ -373,7 +431,7 @@ char  *zfile, *oldfile;
 			goto writerr;
 							/* record progress */
 		pctdone = 100.0*(vres-1-ypos)/vres;
-		if (ralrm > 0 && time((long *)0) >= tlastrept+ralrm)
+		if (ralrm > 0 && time((time_t *)NULL) >= tlastrept+ralrm)
 			report();
 #ifndef	 BSD
 		else
@@ -578,7 +636,8 @@ char  *oldfile;
 	getheader(fp, NULL, NULL);
 				/* get picture size */
 	if (!fscnresolu(&x, &y, fp)) {
-		sprintf(errmsg, "bad recover file \"%s\"", oldfile);
+		sprintf(errmsg, "bad recover file \"%s\" - not removed",
+				oldfile);
 		error(WARNING, errmsg);
 		fclose(fp);
 		return(0);