ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/rt/devcomm.c
(Generate patch)

Comparing ray/src/rt/devcomm.c (file contents):
Revision 1.9 by greg, Mon Jan 8 15:07:31 1990 UTC vs.
Revision 2.7 by greg, Tue Feb 25 02:47:22 2003 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1988 Regents of the University of California */
2 –
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6 –
4   /*
5   *  devcomm.c - communication routines for separate drivers.
6   *
7 < *      10/5/88
7 > *  External symbols declared in driver.h
8   */
9  
10 < #include <stdio.h>
10 > #include "copyright.h"
11  
12 < #include <signal.h>
12 > #include "standard.h"
13  
14   #include "color.h"
15  
16   #include "driver.h"
17  
18 + #include "vfork.h"
19 +
20   #ifndef DEVPATH
21   #define DEVPATH         getenv("PATH")  /* device search path */
22   #endif
23  
24 < #ifndef BSD
25 < #define vfork           fork
26 < #endif
24 > static int      comm_getcur();
25 > static void     comm_close(), comm_clear(), comm_paintr(),
26 >                comm_comin(), comm_comout(), comm_flush();
27  
28 < #ifndef WFLUSH
30 < #define WFLUSH          30              /* flush after this many rays */
31 < #endif
32 <
33 < extern char     *getpath(), *getenv();
34 <
35 < int     onsigio();
36 <
37 < int     comm_close(), comm_clear(), comm_paintr(), comm_errout(),
38 <                comm_getcur(), comm_comout(), comm_comin();
39 <
40 < struct driver   comm_driver, comm_default = {
28 > struct driver   comm_driver = {
29          comm_close, comm_clear, comm_paintr, comm_getcur,
30 <        comm_comout, comm_comin
30 >        comm_comout, comm_comin, comm_flush
31   };
32  
33 + static void     mygets(), myputs(), reply_error(), getstate();
34 +
35   FILE    *devin, *devout;
36  
37   int     devchild;
38  
39  
40 + static struct driver *
41 + final_connect()                         /* verify and initialize connection */
42 + {
43 +        putw(COM_SENDM, devout);
44 +        fflush(devout);
45 +        if (getw(devin) != COM_RECVM)
46 +                return(NULL);
47 +                                                /* get driver parameters */
48 +        getstate();
49 +                                                /* set error vectors */
50 +        erract[COMMAND].pf = comm_comout;
51 +        if (erract[WARNING].pf != NULL)
52 +                erract[WARNING].pf = comm_comout;
53 +        return(&comm_driver);
54 + }
55 +
56 +
57   struct driver *
58 + slave_init(dname, id)                   /* run rview in slave mode */
59 + char    *dname, *id;
60 + {
61 +        devchild = -1;                          /* we're the slave here */
62 +        devout = stdout;                        /* use standard input */
63 +        devin = stdin;                          /* and standard output */
64 +        return(final_connect());                /* verify initialization */
65 + }
66 +
67 +
68 + struct driver *
69   comm_init(dname, id)                    /* set up and execute driver */
70   char    *dname, *id;
71   {
72 <        char    *devname;
72 >        char    *dvcname;
73          int     p1[2], p2[2];
74          char    pin[16], pout[16];
75                                                  /* find driver program */
76 <        if ((devname = getpath(dname, DEVPATH, 1)) == NULL) {
77 <                stderr_v(dname);
78 <                stderr_v(": not found\n");
76 >        if ((dvcname = getpath(dname, DEVPATH, X_OK)) == NULL) {
77 >                eputs(dname);
78 >                eputs(": not found\n");
79                  return(NULL);
80          }
81                                                  /* open communication pipes */
# Line 68 | Line 86 | char   *dname, *id;
86                  close(p2[0]);
87                  sprintf(pin, "%d", p1[0]);
88                  sprintf(pout, "%d", p2[1]);
89 <                execl(devname, dname, pin, pout, id, 0);
90 <                perror(devname);
89 >                execl(dvcname, dname, pin, pout, id, 0);
90 >                perror(dvcname);
91                  _exit(127);
92          }
93          if (devchild == -1)
# Line 80 | Line 98 | char   *dname, *id;
98                  goto syserr;
99          if ((devin = fdopen(p2[0], "r")) == NULL)
100                  goto syserr;
101 <        bcopy(&comm_default, &comm_driver, sizeof(comm_driver));
84 <                                                /* verify & get resolution */
85 <        putw(COM_SENDM, devout);
86 <        fflush(devout);
87 <        if (getw(devin) != COM_RECVM)
88 <                return(NULL);
89 <        fread(&comm_driver.pixaspect, sizeof(comm_driver.pixaspect), 1, devin);
90 <        comm_driver.xsiz = getw(devin);
91 <        comm_driver.ysiz = getw(devin);
92 <                                                /* input handling */
93 <        signal(SIGIO, onsigio);
94 <                                                /* set error vectors */
95 <        cmdvec = comm_comout;
96 <        if (wrnvec != NULL)
97 <                wrnvec = comm_comout;
98 <        return(&comm_driver);
101 >        return(final_connect());                /* verify initialization */
102   syserr:
103          perror(dname);
104          return(NULL);
105   }
106  
107  
108 < static
108 > static void
109   comm_close()                    /* done with driver */
110   {
111          int     pid;
112  
113 <        cmdvec = NULL;                          /* reset error vectors */
114 <        if (wrnvec != NULL)
115 <                wrnvec = stderr_v;
113 <        signal(SIGIO, SIG_DFL);
113 >        erract[COMMAND].pf = NULL;              /* reset error vectors */
114 >        if (erract[WARNING].pf != NULL)
115 >                erract[WARNING].pf = wputs;
116          fclose(devout);
117          fclose(devin);
118 +        if (devchild < 0)
119 +                return;
120          while ((pid = wait(0)) != -1 && pid != devchild)
121                  ;
122   }
123  
124  
125 < static
125 > static void
126   comm_clear(xres, yres)                          /* clear screen */
127   int     xres, yres;
128   {
# Line 129 | Line 133 | int    xres, yres;
133   }
134  
135  
136 < static
136 > static void
137   comm_paintr(col, xmin, ymin, xmax, ymax)        /* paint a rectangle */
138   COLOR   col;
139   int     xmin, ymin, xmax, ymax;
140   {
137 –        extern long     nrays;          /* number of rays traced */
138 –        static long     lastflush = 0;  /* ray count at last flush */
139 –
141          putc(COM_PAINTR, devout);
142 <        fwrite(col, sizeof(COLOR), 1, devout);
142 >        fwrite((char *)col, sizeof(COLOR), 1, devout);
143          putw(xmin, devout);
144          putw(ymin, devout);
145          putw(xmax, devout);
146          putw(ymax, devout);
146 –        if (nrays - lastflush >= WFLUSH) {
147 –                fflush(devout);
148 –                lastflush = nrays;
149 –        }
147   }
148  
149  
150 + static void
151 + comm_flush()                            /* flush output to driver */
152 + {
153 +        putc(COM_FLUSH, devout);
154 +        fflush(devout);
155 +        if (getc(devin) != COM_FLUSH)
156 +                reply_error("flush");
157 +        getstate();
158 + }
159 +
160 +
161   static int
162   comm_getcur(xp, yp)                     /* get and return cursor position */
163   int     *xp, *yp;
# Line 167 | Line 175 | int    *xp, *yp;
175   }
176  
177  
178 < static
178 > static void
179   comm_comout(str)                        /* print string to command line */
180   char    *str;
181   {
182          putc(COM_COMOUT, devout);
183          myputs(str, devout);
184 <        fflush(devout);
184 >        if (str[strlen(str)-1] == '\n')
185 >                fflush(devout);
186   }
187  
188  
189 < static
190 < comm_comin(buf)                         /* read string from command line */
189 > static void
190 > comm_comin(buf, prompt)                 /* read string from command line */
191   char    *buf;
192 + char    *prompt;
193   {
194          putc(COM_COMIN, devout);
195 +        if (prompt == NULL)
196 +                putc(0, devout);
197 +        else {
198 +                putc(1, devout);
199 +                myputs(prompt, devout);
200 +        }
201          fflush(devout);
202          if (getc(devin) != COM_COMIN)
203                  reply_error("comin");
204          mygets(buf, devin);
205 <        if (comm_driver.inpready > 0)
190 <                comm_driver.inpready--;
205 >        getstate();
206   }
207  
208  
209 < static
195 < comm_errout(str)                        /* display an error message */
196 < char    *str;
197 < {
198 <        comm_comout(str);
199 <        stderr_v(str);                  /* send to standard error also */
200 < }
201 <
202 <
203 < static
209 > static void
210   mygets(s, fp)                           /* get string from file (with nul) */
211   register char   *s;
212   register FILE   *fp;
# Line 214 | Line 220 | register FILE  *fp;
220   }
221  
222  
223 < static
223 > static void
224   myputs(s, fp)                           /* put string to file (with nul) */
225   register char   *s;
226   register FILE   *fp;
# Line 225 | Line 231 | register FILE  *fp;
231   }
232  
233  
234 < static
234 > static void
235   reply_error(routine)                    /* what should we do here? */
236   char    *routine;
237   {
238 <        stderr_v(routine);
239 <        stderr_v(": driver reply error\n");
238 >        eputs(routine);
239 >        eputs(": driver reply error\n");
240          quit(1);
241   }
242  
243  
244 < static
245 < onsigio()                               /* input ready */
244 > static void
245 > getstate()                              /* get driver state variables */
246   {
247 <        comm_driver.inpready++;
247 >        fread((char *)&comm_driver.pixaspect,
248 >                        sizeof(comm_driver.pixaspect), 1, devin);
249 >        comm_driver.xsiz = getw(devin);
250 >        comm_driver.ysiz = getw(devin);
251 >        comm_driver.inpready = getw(devin);
252   }

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines