--- ray/src/rt/devcomm.c	1989/02/02 10:41:19	1.1
+++ ray/src/rt/devcomm.c	1990/01/19 00:00:08	1.10
@@ -10,7 +10,7 @@ static char SCCSid[] = "$SunId$ LBL";
  *	10/5/88
  */
 
-#include <stdio.h>
+#include "standard.h"
 
 #include <signal.h>
 
@@ -39,8 +39,7 @@ int	comm_close(), comm_clear(), comm_paintr(), comm_er
 
 struct driver	comm_driver, comm_default = {
 	comm_close, comm_clear, comm_paintr, comm_getcur,
-	comm_comout, comm_comin,
-	MAXRES, MAXRES, 0
+	comm_comout, comm_comin
 };
 
 FILE	*devin, *devout;
@@ -49,33 +48,28 @@ int	devchild;
 
 
 struct driver *
-comm_init(argv)			/* set up and execute driver */
-char	*argv[];
+comm_init(dname, id)			/* set up and execute driver */
+char	*dname, *id;
 {
 	char	*devname;
 	int	p1[2], p2[2];
-
-	if ((devname = getpath(argv[0], DEVPATH)) == NULL) {
-		stderr_v(argv[0]);
+	char	pin[16], pout[16];
+						/* find driver program */
+	if ((devname = getpath(dname, DEVPATH, 1)) == NULL) {
+		stderr_v(dname);
 		stderr_v(": not found\n");
 		return(NULL);
 	}
+						/* open communication pipes */
 	if (pipe(p1) == -1 || pipe(p2) == -1)
 		goto syserr;
-	if ((devchild = vfork()) == 0) {
+	if ((devchild = vfork()) == 0) {	/* fork driver process */
 		close(p1[1]);
 		close(p2[0]);
-		if (p1[0] != 0) {
-			dup2(p1[0], 0);
-			close(p1[0]);
-		}
-		if (p2[1] != 1) {
-			dup2(p2[1], 1);
-			close(p2[1]);
-		}
-		execv(devname, argv);
-		stderr_v(devname);
-		stderr_v(": cannot execute\n");
+		sprintf(pin, "%d", p1[0]);
+		sprintf(pout, "%d", p2[1]);
+		execl(devname, dname, pin, pout, id, 0);
+		perror(devname);
 		_exit(127);
 	}
 	if (devchild == -1)
@@ -86,15 +80,25 @@ char	*argv[];
 		goto syserr;
 	if ((devin = fdopen(p2[0], "r")) == NULL)
 		goto syserr;
-	bcopy(&comm_default, &comm_driver, sizeof(comm_driver));
+	copystruct(&comm_driver, &comm_default);
+						/* verify & get resolution */
+	putw(COM_SENDM, devout);
+	fflush(devout);
+	if (getw(devin) != COM_RECVM)
+		return(NULL);
+	fread((char *)&comm_driver.pixaspect,
+			sizeof(comm_driver.pixaspect), 1, devin);
+	comm_driver.xsiz = getw(devin);
+	comm_driver.ysiz = getw(devin);
+						/* input handling */
 	signal(SIGIO, onsigio);
-	errvec = comm_errout;			/* set error vector */
+						/* set error vectors */
 	cmdvec = comm_comout;
 	if (wrnvec != NULL)
 		wrnvec = comm_comout;
 	return(&comm_driver);
 syserr:
-	perror(argv[0]);
+	perror(dname);
 	return(NULL);
 }
 
@@ -104,8 +108,7 @@ comm_close()			/* done with driver */
 {
 	int	pid;
 
-	errvec = stderr_v;			/* reset error vector */
-	cmdvec = NULL;
+	cmdvec = NULL;				/* reset error vectors */
 	if (wrnvec != NULL)
 		wrnvec = stderr_v;
 	signal(SIGIO, SIG_DFL);
@@ -121,8 +124,8 @@ comm_clear(xres, yres)				/* clear screen */
 int	xres, yres;
 {
 	putc(COM_CLEAR, devout);
-	fwrite(&xres, sizeof(xres), 1, devout);
-	fwrite(&yres, sizeof(yres), 1, devout);
+	putw(xres, devout);
+	putw(yres, devout);
 	fflush(devout);
 }
 
@@ -136,11 +139,11 @@ int	xmin, ymin, xmax, ymax;
 	static long	lastflush = 0;	/* ray count at last flush */
 
 	putc(COM_PAINTR, devout);
-	fwrite(col, sizeof(COLOR), 1, devout);
-	fwrite(&xmin, sizeof(xmin), 1, devout);
-	fwrite(&ymin, sizeof(ymin), 1, devout);
-	fwrite(&xmax, sizeof(xmax), 1, devout);
-	fwrite(&ymax, sizeof(ymax), 1, devout);
+	fwrite((char *)col, sizeof(COLOR), 1, devout);
+	putw(xmin, devout);
+	putw(ymin, devout);
+	putw(xmax, devout);
+	putw(ymax, devout);
 	if (nrays - lastflush >= WFLUSH) {
 		fflush(devout);
 		lastflush = nrays;
@@ -159,8 +162,8 @@ int	*xp, *yp;
 	if (getc(devin) != COM_GETCUR)
 		reply_error("getcur");
 	c = getc(devin);
-	fread(xp, sizeof(*xp), 1, devin);
-	fread(yp, sizeof(*yp), 1, devin);
+	*xp = getw(devin);
+	*yp = getw(devin);
 	return(c);
 }
 
@@ -184,7 +187,8 @@ char	*buf;
 	if (getc(devin) != COM_COMIN)
 		reply_error("comin");
 	mygets(buf, devin);
-	comm_driver.inpready = 0;
+	if (comm_driver.inpready > 0)
+		comm_driver.inpready--;
 }