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 2.2 by greg, Thu Mar 19 09:34:02 1992 UTC vs.
Revision 2.9 by greg, Thu Jul 3 15:00:19 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 "copyright.h"
11 +
12 + #include  "platform.h"
13 +
14   #include "standard.h"
15  
16   #include "color.h"
# Line 22 | Line 23 | static char SCCSid[] = "$SunId$ LBL";
23   #define DEVPATH         getenv("PATH")  /* device search path */
24   #endif
25  
26 < #ifndef DELAY
27 < #define DELAY           20              /* seconds to wait for response */
28 < #endif
26 > static int      comm_getcur();
27 > static void     comm_close(), comm_clear(), comm_paintr(),
28 >                comm_comin(), comm_comout(), comm_flush();
29  
29 static int      comm_close(), comm_clear(), comm_paintr(), comm_errout(),
30                comm_getcur(), comm_comout(), comm_comin(), comm_flush();
31
30   struct driver   comm_driver = {
31          comm_close, comm_clear, comm_paintr, comm_getcur,
32          comm_comout, comm_comin, comm_flush
33   };
34  
35 + static void     mygets(), myputs(), reply_error(), getstate();
36 +
37   FILE    *devin, *devout;
38  
39   int     devchild;
40  
41  
42 + static struct driver *
43 + final_connect()                         /* verify and initialize connection */
44 + {
45 +        putw(COM_SENDM, devout);
46 +        fflush(devout);
47 +        if (getw(devin) != COM_RECVM)
48 +                return(NULL);
49 +                                                /* get driver parameters */
50 +        getstate();
51 +                                                /* set error vectors */
52 +        erract[COMMAND].pf = comm_comout;
53 +        if (erract[WARNING].pf != NULL)
54 +                erract[WARNING].pf = comm_comout;
55 +        return(&comm_driver);
56 + }
57 +
58 +
59   struct driver *
60 + slave_init(dname, id)                   /* run rview in slave mode */
61 + char    *dname, *id;
62 + {
63 +        devchild = -1;                          /* we're the slave here */
64 +        devout = stdout;                        /* use standard input */
65 +        devin = stdin;                          /* and standard output */
66 +        return(final_connect());                /* verify initialization */
67 + }
68 +
69 +
70 + struct driver *
71   comm_init(dname, id)                    /* set up and execute driver */
72   char    *dname, *id;
73   {
74 <        char    *devname;
74 >        char    *dvcname;
75          int     p1[2], p2[2];
76          char    pin[16], pout[16];
77                                                  /* find driver program */
78 <        if ((devname = getpath(dname, DEVPATH, X_OK)) == NULL) {
79 <                stderr_v(dname);
80 <                stderr_v(": not found\n");
78 >        if ((dvcname = getpath(dname, DEVPATH, X_OK)) == NULL) {
79 >                eputs(dname);
80 >                eputs(": not found\n");
81                  return(NULL);
82          }
83 + #ifdef RHAS_FORK_EXEC
84                                                  /* open communication pipes */
85          if (pipe(p1) == -1 || pipe(p2) == -1)
86                  goto syserr;
# Line 60 | Line 89 | char   *dname, *id;
89                  close(p2[0]);
90                  sprintf(pin, "%d", p1[0]);
91                  sprintf(pout, "%d", p2[1]);
92 <                execl(devname, dname, pin, pout, id, 0);
93 <                perror(devname);
92 >                execl(dvcname, dname, pin, pout, id, 0);
93 >                perror(dvcname);
94                  _exit(127);
95          }
96          if (devchild == -1)
# Line 72 | Line 101 | char   *dname, *id;
101                  goto syserr;
102          if ((devin = fdopen(p2[0], "r")) == NULL)
103                  goto syserr;
104 <                                                /* verify initialization */
76 <        putw(COM_SENDM, devout);
77 <        fflush(devout);
78 <        if (getw(devin) != COM_RECVM)
79 <                return(NULL);
80 <                                                /* get driver parameters */
81 <        getstate();
82 <                                                /* set error vectors */
83 <        cmdvec = comm_comout;
84 <        if (wrnvec != NULL)
85 <                wrnvec = comm_comout;
86 <        return(&comm_driver);
104 >        return(final_connect());                /* verify initialization */
105   syserr:
106          perror(dname);
107          return(NULL);
108 +
109 + #else   /* ! RHAS_FORK_EXEC */
110 +
111 +        eputs(dname);
112 +        eputs(": no fork/exec\n");
113 +        return(NULL);
114 +
115 + #endif  /* ! RHAS_FORK_EXEC */
116   }
117  
118  
119 < static
119 > static void
120   comm_close()                    /* done with driver */
121   {
122          int     pid;
123  
124 <        cmdvec = NULL;                          /* reset error vectors */
125 <        if (wrnvec != NULL)
126 <                wrnvec = stderr_v;
124 >        erract[COMMAND].pf = NULL;              /* reset error vectors */
125 >        if (erract[WARNING].pf != NULL)
126 >                erract[WARNING].pf = wputs;
127          fclose(devout);
128          fclose(devin);
129 +        if (devchild < 0)
130 +                return;
131          while ((pid = wait(0)) != -1 && pid != devchild)
132                  ;
133   }
134  
135  
136 < static
136 > static void
137   comm_clear(xres, yres)                          /* clear screen */
138   int     xres, yres;
139   {
# Line 116 | Line 144 | int    xres, yres;
144   }
145  
146  
147 < static
147 > static void
148   comm_paintr(col, xmin, ymin, xmax, ymax)        /* paint a rectangle */
149   COLOR   col;
150   int     xmin, ymin, xmax, ymax;
# Line 130 | Line 158 | int    xmin, ymin, xmax, ymax;
158   }
159  
160  
161 < static
161 > static void
162   comm_flush()                            /* flush output to driver */
163   {
164          putc(COM_FLUSH, devout);
# Line 158 | Line 186 | int    *xp, *yp;
186   }
187  
188  
189 < static
189 > static void
190   comm_comout(str)                        /* print string to command line */
191   char    *str;
192   {
# Line 169 | Line 197 | char   *str;
197   }
198  
199  
200 < static
200 > static void
201   comm_comin(buf, prompt)                 /* read string from command line */
202   char    *buf;
203   char    *prompt;
# Line 189 | Line 217 | char   *prompt;
217   }
218  
219  
220 < static
193 < comm_errout(str)                        /* display an error message */
194 < char    *str;
195 < {
196 <        comm_comout(str);
197 <        stderr_v(str);                  /* send to standard error also */
198 < }
199 <
200 <
201 < static
220 > static void
221   mygets(s, fp)                           /* get string from file (with nul) */
222   register char   *s;
223   register FILE   *fp;
# Line 212 | Line 231 | register FILE  *fp;
231   }
232  
233  
234 < static
234 > static void
235   myputs(s, fp)                           /* put string to file (with nul) */
236   register char   *s;
237   register FILE   *fp;
# Line 223 | Line 242 | register FILE  *fp;
242   }
243  
244  
245 < static
245 > static void
246   reply_error(routine)                    /* what should we do here? */
247   char    *routine;
248   {
249 <        stderr_v(routine);
250 <        stderr_v(": driver reply error\n");
249 >        eputs(routine);
250 >        eputs(": driver reply error\n");
251          quit(1);
252   }
253  
254  
255 < static
255 > static void
256   getstate()                              /* get driver state variables */
257   {
258          fread((char *)&comm_driver.pixaspect,

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines