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.13 by gregl, Fri Dec 12 11:13:17 1997 UTC vs.
Revision 3.32 by schorsch, Mon Jun 30 14:59:12 2003 UTC

# Line 1 | Line 1
1 /* Copyright (c) 1997 Silicon Graphics, Inc. */
2
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ SGI";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6
4   /*
5   * Holodeck display process communication
6   */
7  
8 + #include <sys/uio.h>
9 + #include <string.h>
10 +
11   #include "rholo.h"
12   #include "rhdisp.h"
13 < #include <sys/uio.h>
13 > #include "rtprocess.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];
27 > static SUBPROC  dpd;
28   static FILE     *dpout;
29  
30  
31   disp_open(dname)                /* open the named display driver */
32   char    *dname;
33   {
34 <        char    dpath[128], fd0[8], fd1[8], *cmd[5];
35 <        int     i;
36 <                                /* get full display program name */
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.r = 0;              /* read from stdin */
39 >                dpout = stdout;         /* write to stdout */
40 >                dpd.running = 0; /* we're the slave procees */
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 <                                /* 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] = dpath;
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, "cannot associate FILE with display pipe");
63 <        dpd[1] = -1;            /* causes ignored error in close_process() */
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.w, "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.w = -1;             /* causes ignored error in close_process() */
69          inp_flags = 0;
70 <                                /* close dup'ed stdin and stdout */
71 <        if (readinp)
72 <                close(atoi(fd0));
73 <        close(atoi(fd1));
74 <                                /* write out hologram grids */
75 <        for (i = 0; hdlist[i] != NULL; i++)
76 <                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 >                memcpy(buf, (void *)hdlist[i], 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 81 | Line 115 | int    block;
115                                          /* check read blocking */
116          if (block != (inp_flags == 0)) {
117                  inp_flags = block ? 0 : FNONBLK;
118 <                if (fcntl(dpd[0], F_SETFL, inp_flags) < 0)
118 >                if (fcntl(dpd.r, F_SETFL, inp_flags) < 0)
119                          goto fcntlerr;
120          }
121                                          /* read message header */
122 <        n = read(dpd[0], (char *)&msg, sizeof(MSGHEAD));
122 >        n = read(dpd.r, (char *)&msg, sizeof(MSGHEAD));
123          if (n != sizeof(MSGHEAD)) {
124                  if (n >= 0) {
125                          dpout = NULL;
# Line 96 | Line 130 | int    block;
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.r, F_SETFL, inp_flags=0) < 0)
139                          goto fcntlerr;
140 <                if (readbuf(dpd[0], buf, msg.nbytes) != msg.nbytes)
140 >                if (readbuf(dpd.r, buf, msg.nbytes) != msg.nbytes)
141                          goto readerr;
142          }
143          switch (msg.type) {             /* take appropriate action */
# Line 113 | Line 149 | int    block;
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:         /* 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);
166                  bundle_set(BS_ADD, (PACKHEAD *)buf, msg.nbytes/sizeof(PACKHEAD));
167                  disp_result(DS_ENDIMM, 0, NULL);
168 <                disp_check(0);          /* hack -- delete usu. follows add */
168 >                disp_flush();
169                  break;
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);
# Line 135 | Line 178 | int    block;
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_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");
# Line 148 | Line 198 | int    block;
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_packets(flush_queue());
203 <                        if (end_rtrace())
154 <                                error(WARNING, "bad status returned by rtrace");
155 <                } else
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 <                        checkrad();
211 <                        if (start_rtrace() < 1)
164 <                                error(WARNING, "cannot restart rtrace");
165 <                } else if (nprocs > 0)
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");
# Line 170 | Line 216 | int    block;
216          case DR_CLOBBER:        /* clobber holodeck */
217                  if (msg.nbytes)
218                          error(INTERNAL, "bad DR_CLOBBER from display process");
219 <                if (!force || !ncprocs)
219 >                if (force <= 0 | ncprocs <= 0)
220                          error(WARNING, "request to clobber holodeck denied");
221                  else {
222                          error(WARNING, "clobbering holodeck contents");
# Line 203 | 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.running ? close_process(&dpd) : 0);
257 >
258   }
259  
260  
# Line 215 | Line 263 | int    type, nbytes;
263   char    *p;
264   {
265          MSGHEAD msg;
266 <
266 >                                        /* consistency checks */
267 > #ifdef DEBUG
268 >        if (nbytes < 0 || nbytes > 0 & p == NULL)
269 >                error(CONSISTENCY, "bad buffer handed to disp_result");
270 > #endif
271          if (dpout == NULL)
272                  return;
273          msg.type = type;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines