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

Comparing ray/src/hd/rholo4.c (file contents):
Revision 3.7 by gregl, Thu Nov 20 18:07:00 1997 UTC vs.
Revision 3.27 by gwlarson, Thu Aug 5 13:51:21 1999 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1997 Silicon Graphics, Inc. */
1 > /* Copyright (c) 1999 Silicon Graphics, Inc. */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ SGI";
# Line 13 | Line 13 | static char SCCSid[] = "$SunId$ SGI";
13   #include <sys/uio.h>
14  
15   #ifndef HDSUF
16 < #define HDSUF   ".hdisp"
16 > #define HDSUF           ".hdi"
17   #endif
18 + #ifndef SLAVENAME
19 + #define SLAVENAME       "slave"
20 + #endif
21  
22 + #ifndef FNONBLK
23 + #define FNONBLK         O_NONBLOCK
24 + #endif
25 +
26   static int      inp_flags;
27   static int      dpd[3];
28   static FILE     *dpout;
# Line 24 | Line 31 | static FILE    *dpout;
31   disp_open(dname)                /* open the named display driver */
32   char    *dname;
33   {
34 <        char    dpath[128], *com[3];
35 <        int     i;
34 >        char    buf[sizeof(HDGRID)+512], fd0[8], fd1[8], *cmd[5], *sfn;
35 >        int     i, n, len;
36  
37 +        if (!strcmp(dname, SLAVENAME)) {
38 +                dpd[0] = 0;             /* read from stdin */
39 +                dpout = stdout;         /* write to stdout */
40 +                dpd[2] = -1;            /* we're the slave process */
41 +        } else {
42 +                                        /* get full display program name */
43   #ifdef DEVPATH
44 <        sprintf(dpath, "%s/%s%s", DEVPATH, dname, HDSUF);
44 >                sprintf(buf, "%s/%s%s", DEVPATH, dname, HDSUF);
45   #else
46 <        sprintf(dpath, "dev/%s%s", dname, HDSUF);
46 >                sprintf(buf, "dev/%s%s", dname, HDSUF);
47   #endif
48 <        com[0] = dpath; com[1] = froot; com[2] = NULL;
49 <        i = open_process(dpd, com);
50 <        if (i <= 0)
51 <                error(USER, "cannot start display process");
52 <        if ((dpout = fdopen(dup(dpd[1]), "w")) == NULL)
53 <                error(SYSTEM, "cannot associate FILE with display pipe");
48 >                                        /* dup stdin and stdout */
49 >                if (readinp)
50 >                        sprintf(fd0, "%d", dup(0));
51 >                else
52 >                        strcpy(fd0, "-1");
53 >                sprintf(fd1, "%d", dup(1));
54 >                                        /* start the display process */
55 >                cmd[0] = buf;
56 >                cmd[1] = froot; cmd[2] = fd1; cmd[3] = fd0;
57 >                cmd[4] = NULL;
58 >                i = open_process(dpd, cmd);
59 >                if (i <= 0)
60 >                        error(USER, "cannot start display process");
61 >                if ((dpout = fdopen(dpd[1], "w")) == NULL)
62 >                        error(SYSTEM, "problem opening display pipe");
63 >                                        /* close dup'ed stdin and stdout */
64 >                if (readinp)
65 >                        close(atoi(fd0));
66 >                close(atoi(fd1));
67 >        }
68 >        dpd[1] = -1;            /* causes ignored error in close_process() */
69          inp_flags = 0;
70 <                                /* write out hologram grids */
71 <        for (i = 0; hdlist[i] != NULL; i++)
72 <                disp_result(DS_ADDHOLO, sizeof(HDGRID), (char *)hdlist[i]);
70 >                                /* check if outside */
71 >        if (vdef(OBSTRUCTIONS) && vbool(OBSTRUCTIONS))
72 >                disp_result(DS_OUTSECT, 0, NULL);
73 >                                /* send eye separation if specified */
74 >        if (vdef(EYESEP)) {
75 >                sprintf(buf, "%.9e", vflt(EYESEP));
76 >                disp_result(DS_EYESEP, strlen(buf)+1, buf);
77 >        }
78 >                                /* write out hologram grids & octrees */
79 >        for (i = 0; hdlist[i] != NULL; i++) {
80 >                bcopy((char *)hdlist[i], buf, sizeof(HDGRID));
81 >                len = sizeof(HDGRID);
82 >                n = vdef(GEOMETRY);
83 >                sfn = i<n ? nvalue(GEOMETRY,i) :
84 >                                n ? nvalue(GEOMETRY,n-1) : vval(OCTREE);
85 >                strcpy(buf+len, sfn);
86 >                len += strlen(sfn) + 1;
87 >                n = vdef(PORTS);
88 >                sfn = i<n ? nvalue(PORTS,i) : n ? nvalue(PORTS,n-1) : "";
89 >                strcpy(buf+len, sfn);
90 >                len += strlen(sfn) + 1;
91 >                disp_result(DS_ADDHOLO, len, buf);
92 >        }
93          disp_flush();
94   }
95  
# Line 73 | Line 121 | int    block;
121                                          /* read message header */
122          n = read(dpd[0], (char *)&msg, sizeof(MSGHEAD));
123          if (n != sizeof(MSGHEAD)) {
124 <                if (n >= 0)
124 >                if (n >= 0) {
125 >                        dpout = NULL;
126                          error(USER, "display process died");
127 +                }
128                  if (errno != EAGAIN & errno != EINTR)
129                          goto readerr;
130                  return(2);              /* acceptable failure */
131          }
132          if (msg.nbytes) {               /* get the message body */
133 +                if (msg.nbytes < 0)
134 +                        error(INTERNAL, "anti-message from display process");
135                  buf = (char *)malloc(msg.nbytes);
136                  if (buf == NULL)
137                          error(SYSTEM, "out of memory in disp_check");
138 <                if (fcntl(dpd[0], F_SETFL, inp_flags=0) < 0)
138 >                if (inp_flags != 0 && fcntl(dpd[0], F_SETFL, inp_flags=0) < 0)
139                          goto fcntlerr;
140                  if (readbuf(dpd[0], buf, msg.nbytes) != msg.nbytes)
141                          goto readerr;
142          }
143          switch (msg.type) {             /* take appropriate action */
144 <        case DR_BUNDLE:
144 >        case DR_BUNDLE:         /* new bundle to calculate */
145                  if (msg.nbytes != sizeof(PACKHEAD))
146                          error(INTERNAL, "bad DR_BUNDLE from display process");
147                  bundle_set(BS_ADD, (PACKHEAD *)buf, 1);
148                  break;
149 <        case DR_NEWSET:
149 >        case DR_NEWSET:         /* new calculation set */
150                  if (msg.nbytes % sizeof(PACKHEAD))
151                          error(INTERNAL, "bad DR_NEWSET from display process");
152 <                disp_result(DS_STARTIMM, 0, NULL);
152 >                if (msg.nbytes)
153 >                        disp_result(DS_STARTIMM, 0, NULL);
154                  bundle_set(BS_NEW, (PACKHEAD *)buf, msg.nbytes/sizeof(PACKHEAD));
155 <                disp_result(DS_ENDIMM, 0, NULL);
156 <                disp_flush();
155 >                if (msg.nbytes) {
156 >                        disp_result(DS_ENDIMM, 0, NULL);
157 >                        disp_flush();
158 >                }
159                  break;
160 <        case DR_ADDSET:
160 >        case DR_ADDSET:         /* add to calculation set */
161 >                if (!msg.nbytes)
162 >                        break;
163                  if (msg.nbytes % sizeof(PACKHEAD))
164                          error(INTERNAL, "bad DR_ADDSET from display process");
165                  disp_result(DS_STARTIMM, 0, NULL);
# Line 110 | Line 167 | int    block;
167                  disp_result(DS_ENDIMM, 0, NULL);
168                  disp_flush();
169                  break;
170 <        case DR_DELSET:
170 >        case DR_ADJSET:         /* adjust calculation set members */
171 >                if (!msg.nbytes)
172 >                        break;
173                  if (msg.nbytes % sizeof(PACKHEAD))
174 +                        error(INTERNAL, "bad DR_ADJSET from display process");
175 +                disp_result(DS_STARTIMM, 0, NULL);
176 +                bundle_set(BS_ADJ, (PACKHEAD *)buf, msg.nbytes/sizeof(PACKHEAD));
177 +                disp_result(DS_ENDIMM, 0, NULL);
178 +                disp_flush();
179 +                break;
180 +        case DR_DELSET:         /* delete from calculation set */
181 +                if (!msg.nbytes)
182 +                        break;
183 +                if (msg.nbytes % sizeof(PACKHEAD))
184                          error(INTERNAL, "bad DR_DELSET from display process");
185                  bundle_set(BS_DEL, (PACKHEAD *)buf, msg.nbytes/sizeof(PACKHEAD));
186                  break;
187 <        case DR_ATTEN:
187 >        case DR_VIEWPOINT:      /* set target eye position */
188 >                if (msg.nbytes != sizeof(VIEWPOINT))
189 >                        error(INTERNAL, "bad DR_VIEWPOINT from display process");
190 >                copystruct(&myeye, (VIEWPOINT *)buf);
191 >                break;
192 >        case DR_ATTEN:          /* block for priority request */
193                  if (msg.nbytes)
194                          error(INTERNAL, "bad DR_ATTEN from display process");
195                                          /* send acknowledgement */
196                  disp_result(DS_ACKNOW, 0, NULL);
197                  return(disp_check(1));  /* block on following request */
198 <        case DR_SHUTDOWN:
198 >        case DR_KILL:           /* kill computation process(es) */
199                  if (msg.nbytes)
200 +                        error(INTERNAL, "bad DR_KILL from display process");
201 +                if (nprocs > 0)
202 +                        done_rtrace();
203 +                else
204 +                        error(WARNING, "no rtrace process to kill");
205 +                break;
206 +        case DR_RESTART:        /* restart computation process(es) */
207 +                if (msg.nbytes)
208 +                        error(INTERNAL, "bad DR_RESTART from display process");
209 +                if (ncprocs > nprocs)
210 +                        new_rtrace();
211 +                else if (nprocs > 0)
212 +                        error(WARNING, "rtrace already runnning");
213 +                else
214 +                        error(WARNING, "holodeck not open for writing");
215 +                break;
216 +        case DR_CLOBBER:        /* clobber holodeck */
217 +                if (msg.nbytes)
218 +                        error(INTERNAL, "bad DR_CLOBBER from display process");
219 +                if (force <= 0 | ncprocs <= 0)
220 +                        error(WARNING, "request to clobber holodeck denied");
221 +                else {
222 +                        error(WARNING, "clobbering holodeck contents");
223 +                        hdclobber(NULL);
224 +                }
225 +                break;
226 +        case DR_SHUTDOWN:       /* shut down program */
227 +                if (msg.nbytes)
228                          error(INTERNAL, "bad DR_SHUTDOWN from display process");
229                  return(0);              /* zero return signals shutdown */
230 <        case DR_NOOP:
230 >        case DR_NOOP:           /* do nothing */
231                  break;
232          default:
233                  error(INTERNAL, "unrecognized request from display process");
# Line 147 | Line 249 | disp_close()                   /* close our display process */
249  
250          if (dpout == NULL)
251                  return(-1);
252 +        myeye.rng = 0;
253          disp_result(DS_SHUTDOWN, 0, NULL);
254          fclose(dpout);
255          dpout = NULL;
256 <        return(close_process(dpd));
256 >        return(dpd[2]<0 ? 0 : close_process(dpd));
257   }
258  
259  
# Line 159 | Line 262 | int    type, nbytes;
262   char    *p;
263   {
264          MSGHEAD msg;
265 <
265 >                                        /* consistency checks */
266 > #ifdef DEBUG
267 >        if (nbytes < 0 || nbytes > 0 & p == NULL)
268 >                error(CONSISTENCY, "bad buffer handed to disp_result");
269 > #endif
270          if (dpout == NULL)
271                  return;
272          msg.type = type;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines