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.13 by greg, Thu Feb 22 12:45:27 1990 UTC vs.
Revision 2.11 by greg, Tue Nov 11 16:24:06 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 "standard.h"
10 > #include "copyright.h"
11  
12 < #include "color.h"
12 > #include "platform.h"
13  
14 + #include "standard.h"
15 +
16   #include "driver.h"
17  
18   #ifndef DEVPATH
19   #define DEVPATH         getenv("PATH")  /* device search path */
20   #endif
21  
22 < #ifndef BSD
23 < #define vfork           fork
24 < #endif
22 > static int      comm_getcur();
23 > static void     comm_close(), comm_clear(), comm_paintr(),
24 >                comm_comin(), comm_comout(), comm_flush();
25  
27 – extern char     *getpath(), *getenv();
28 –
29 – int     onsigio();
30 –
31 – int     comm_close(), comm_clear(), comm_paintr(), comm_errout(),
32 –                comm_getcur(), comm_comout(), comm_comin(), comm_flush();
33 –
26   struct driver   comm_driver = {
27          comm_close, comm_clear, comm_paintr, comm_getcur,
28          comm_comout, comm_comin, comm_flush
29   };
30  
31 + static void     mygets(), myputs(), reply_error(), getstate();
32 +
33   FILE    *devin, *devout;
34  
35   int     devchild;
36  
37  
38 + static struct driver *
39 + final_connect()                         /* verify and initialize connection */
40 + {
41 +        putw(COM_SENDM, devout);
42 +        fflush(devout);
43 +        if (getw(devin) != COM_RECVM)
44 +                return(NULL);
45 +                                                /* get driver parameters */
46 +        getstate();
47 +                                                /* set error vectors */
48 +        erract[COMMAND].pf = comm_comout;
49 +        if (erract[WARNING].pf != NULL)
50 +                erract[WARNING].pf = comm_comout;
51 +        return(&comm_driver);
52 + }
53 +
54 +
55   struct driver *
56 + slave_init(dname, id)                   /* run rview in slave mode */
57 + char    *dname, *id;
58 + {
59 +        devchild = -1;                          /* we're the slave here */
60 +        devout = stdout;                        /* use standard input */
61 +        devin = stdin;                          /* and standard output */
62 +        return(final_connect());                /* verify initialization */
63 + }
64 +
65 +
66 + struct driver *
67   comm_init(dname, id)                    /* set up and execute driver */
68   char    *dname, *id;
69   {
70 <        char    *devname;
70 >        char    *dvcname;
71          int     p1[2], p2[2];
72          char    pin[16], pout[16];
73                                                  /* find driver program */
74 <        if ((devname = getpath(dname, DEVPATH, 1)) == NULL) {
75 <                stderr_v(dname);
76 <                stderr_v(": not found\n");
74 >        if ((dvcname = getpath(dname, DEVPATH, X_OK)) == NULL) {
75 >                eputs(dname);
76 >                eputs(": not found\n");
77                  return(NULL);
78          }
79 + #ifdef RHAS_FORK_EXEC
80                                                  /* open communication pipes */
81          if (pipe(p1) == -1 || pipe(p2) == -1)
82                  goto syserr;
83 <        if ((devchild = vfork()) == 0) {        /* fork driver process */
83 >        if ((devchild = fork()) == 0) { /* fork driver process */
84                  close(p1[1]);
85                  close(p2[0]);
86                  sprintf(pin, "%d", p1[0]);
87                  sprintf(pout, "%d", p2[1]);
88 <                execl(devname, dname, pin, pout, id, 0);
89 <                perror(devname);
88 >                execl(dvcname, dname, pin, pout, id, 0);
89 >                perror(dvcname);
90                  _exit(127);
91          }
92          if (devchild == -1)
# Line 74 | Line 97 | char   *dname, *id;
97                  goto syserr;
98          if ((devin = fdopen(p2[0], "r")) == NULL)
99                  goto syserr;
100 <                                                /* verify & get resolution */
78 <        putw(COM_SENDM, devout);
79 <        fflush(devout);
80 <        if (getw(devin) != COM_RECVM)
81 <                return(NULL);
82 <        fread((char *)&comm_driver.pixaspect,
83 <                        sizeof(comm_driver.pixaspect), 1, devin);
84 <        comm_driver.xsiz = getw(devin);
85 <        comm_driver.ysiz = getw(devin);
86 <                                                /* set error vectors */
87 <        cmdvec = comm_comout;
88 <        if (wrnvec != NULL)
89 <                wrnvec = comm_comout;
90 <        return(&comm_driver);
100 >        return(final_connect());                /* verify initialization */
101   syserr:
102          perror(dname);
103          return(NULL);
104 +
105 + #else   /* ! RHAS_FORK_EXEC */
106 +
107 +        eputs(dname);
108 +        eputs(": no fork/exec\n");
109 +        return(NULL);
110 +
111 + #endif  /* ! RHAS_FORK_EXEC */
112   }
113  
114  
115 < static
115 > static void
116   comm_close()                    /* done with driver */
117   {
118          int     pid;
119  
120 <        cmdvec = NULL;                          /* reset error vectors */
121 <        if (wrnvec != NULL)
122 <                wrnvec = stderr_v;
120 >        erract[COMMAND].pf = NULL;              /* reset error vectors */
121 >        if (erract[WARNING].pf != NULL)
122 >                erract[WARNING].pf = wputs;
123          fclose(devout);
124          fclose(devin);
125 +        if (devchild < 0)
126 +                return;
127          while ((pid = wait(0)) != -1 && pid != devchild)
128                  ;
129   }
130  
131  
132 < static
132 > static void
133   comm_clear(xres, yres)                          /* clear screen */
134   int     xres, yres;
135   {
# Line 120 | Line 140 | int    xres, yres;
140   }
141  
142  
143 < static
143 > static void
144   comm_paintr(col, xmin, ymin, xmax, ymax)        /* paint a rectangle */
145   COLOR   col;
146   int     xmin, ymin, xmax, ymax;
# Line 134 | Line 154 | int    xmin, ymin, xmax, ymax;
154   }
155  
156  
157 < static
157 > static void
158   comm_flush()                            /* flush output to driver */
159   {
160          putc(COM_FLUSH, devout);
161          fflush(devout);
162          if (getc(devin) != COM_FLUSH)
163                  reply_error("flush");
164 <        comm_driver.inpready = getw(devin);
164 >        getstate();
165   }
166  
167  
# Line 162 | Line 182 | int    *xp, *yp;
182   }
183  
184  
185 < static
185 > static void
186   comm_comout(str)                        /* print string to command line */
187   char    *str;
188   {
189          putc(COM_COMOUT, devout);
190          myputs(str, devout);
191 <        fflush(devout);
191 >        if (str[strlen(str)-1] == '\n')
192 >                fflush(devout);
193   }
194  
195  
196 < static
196 > static void
197   comm_comin(buf, prompt)                 /* read string from command line */
198   char    *buf;
199   char    *prompt;
# Line 188 | Line 209 | char   *prompt;
209          if (getc(devin) != COM_COMIN)
210                  reply_error("comin");
211          mygets(buf, devin);
212 <        comm_driver.inpready = getw(devin);
212 >        getstate();
213   }
214  
215  
216 < static
196 < comm_errout(str)                        /* display an error message */
197 < char    *str;
198 < {
199 <        comm_comout(str);
200 <        stderr_v(str);                  /* send to standard error also */
201 < }
202 <
203 <
204 < static
216 > static void
217   mygets(s, fp)                           /* get string from file (with nul) */
218   register char   *s;
219   register FILE   *fp;
# Line 215 | Line 227 | register FILE  *fp;
227   }
228  
229  
230 < static
230 > static void
231   myputs(s, fp)                           /* put string to file (with nul) */
232   register char   *s;
233   register FILE   *fp;
# Line 226 | Line 238 | register FILE  *fp;
238   }
239  
240  
241 < static
241 > static void
242   reply_error(routine)                    /* what should we do here? */
243   char    *routine;
244   {
245 <        stderr_v(routine);
246 <        stderr_v(": driver reply error\n");
245 >        eputs(routine);
246 >        eputs(": driver reply error\n");
247          quit(1);
248 + }
249 +
250 +
251 + static void
252 + getstate()                              /* get driver state variables */
253 + {
254 +        fread((char *)&comm_driver.pixaspect,
255 +                        sizeof(comm_driver.pixaspect), 1, devin);
256 +        comm_driver.xsiz = getw(devin);
257 +        comm_driver.ysiz = getw(devin);
258 +        comm_driver.inpready = getw(devin);
259   }

Diff Legend

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