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

Comparing ray/src/rt/x10.c (file contents):
Revision 1.21 by greg, Wed Jan 10 10:04:30 1990 UTC vs.
Revision 2.3 by greg, Fri Jun 4 14:48:35 1993 UTC

# Line 11 | Line 11 | static char SCCSid[] = "$SunId$ LBL";
11   */
12  
13   #include  <stdio.h>
14 <
14 > #include  <math.h>
15   #include  <sys/ioctl.h>
16  
17   #include  <X/Xlib.h>
# Line 29 | Line 29 | static char SCCSid[] = "$SunId$ LBL";
29   #define BORWIDTH        5               /* border width */
30   #define COMHEIGHT       (COMLH*COMCH)   /* command line height (pixels) */
31   #define MINWIDTH        (32*COMCW)      /* minimum graphics window width */
32 < #define MINHEIGHT       64              /* minimum graphics window height */
32 > #define MINHEIGHT       MINWIDTH                /* minimum graphics window height */
33  
34   #define COMFN           "8x13"          /* command line font name */
35   #define COMLH           3               /* number of command lines */
36   #define COMCW           8               /* approx. character width (pixels) */
37   #define COMCH           13              /* approx. character height (pixels) */
38  
39 – #ifndef WFLUSH
40 – #define WFLUSH          30              /* flush after this many rays */
41 – #endif
42 –
43 – #define  checkinp()     while (XPending() > 0) getevent()
44 –
39   #define  levptr(etype)  ((etype *)&thisevent)
40  
41   static XEvent  thisevent;               /* current event */
# Line 55 | Line 49 | static Window  gwind = 0;              /* our graphics window */
49  
50   static Cursor  pickcursor = 0;          /* cursor used for picking */
51  
52 < static int  gwidth = 0;                 /* graphics window width */
59 < static int  gheight = 0;                /* graphics window height */
52 > static int  gwidth, gheight;            /* graphics window size */
53  
54   static TEXTWIND  *comline = NULL;       /* our command line */
55  
# Line 68 | Line 61 | extern char  *malloc(), *getcombuf();
61  
62   extern char  *progname;
63  
64 < int  x_close(), x_clear(), x_paintr(), x_errout(),
65 <                x_getcur(), x_comout(), x_comin();
64 > static int  x_close(), x_clear(), x_paintr(), x_errout(),
65 >                x_getcur(), x_comout(), x_comin(), x_flush();
66  
67   static struct driver  x_driver = {
68          x_close, x_clear, x_paintr, x_getcur,
69 <        x_comout, x_comin, 1.0
69 >        x_comout, x_comin, x_flush, 1.0
70   };
71  
72  
# Line 81 | Line 74 | struct driver *
74   x_init(name, id)                /* initialize driver */
75   char  *name, *id;
76   {
77 +        extern char  *getenv();
78 +        char  *gv;
79          char  defgeom[32];
80          OpaqueFrame  mainframe;
81  
# Line 93 | Line 88 | char  *name, *id;
88                  stderr_v("not enough colors\n");
89                  return(NULL);
90          }
91 <        make_gmap(GAMMA);                       /* make color map */
91 >                                /* make color map */
92 >        if ((gv = getenv("GAMMA")) != NULL)
93 >                make_gmap(atof(gv));
94 >        else
95 >                make_gmap(GAMMA);
96  
97          pickcursor = XCreateCursor(bcross_width, bcross_height,
98                          bcross_bits, bcross_mask_bits,
# Line 111 | Line 110 | char  *name, *id;
110                  return(NULL);
111          }
112          XStoreName(gwind, id);
114 –        XMapWindow(gwind);
113          XSelectInput(gwind, KeyPressed|ButtonPressed|
114                          ExposeWindow|ExposeRegion|UnmapWindow);
115 <        x_driver.xsiz = mainframe.width;
116 <        x_driver.ysiz = mainframe.height-COMHEIGHT;
115 >        gwidth = mainframe.width;
116 >        gheight = mainframe.height-COMHEIGHT;
117 >        x_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
118 >        x_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
119          x_driver.inpready = 0;
120          cmdvec = x_comout;                      /* set error vectors */
121          if (wrnvec != NULL)
# Line 139 | Line 139 | x_close()                      /* close our display */
139          if (gwind != 0) {
140                  XDestroyWindow(gwind);
141                  gwind = 0;
142 –                gwidth = gheight = 0;
142          }
143          XFreeCursor(pickcursor);
144          freepixels();
# Line 152 | Line 151 | static
151   x_clear(xres, yres)                     /* clear our display */
152   int  xres, yres;
153   {
155 –        if (xres < MINWIDTH)
156 –                xres = MINWIDTH;
157 –        if (yres < MINHEIGHT)
158 –                yres = MINHEIGHT;
154          if (xres != gwidth || yres != gheight) {        /* new window */
160 –                if (comline != NULL)
161 –                        xt_close(comline);
155                  XChangeWindow(gwind, xres, yres+COMHEIGHT);
163 –                comline = xt_open(gwind, 0, yres, xres, COMHEIGHT, 0, COMFN);
164 –                if (comline == NULL) {
165 –                        stderr_v("Cannot open command line window\n");
166 –                        quit(1);
167 –                }
156                  gwidth = xres;
157                  gheight = yres;
158          } else                                          /* just clear */
159                  XClear(gwind);
160                                                  /* reinitialize color table */
161 <        if (ncolors == 0 && getpixels() == 0)
161 >        if (getpixels() == 0)
162                  stderr_v("cannot allocate colors\n");
163          else
164                  new_ctab(ncolors);
165 +                                                /* open new command line */
166 +        if (comline != NULL)
167 +                xt_close(comline);
168 +        comline = xt_open(gwind, 0, yres, xres, COMHEIGHT, 0, COMFN);
169 +        if (comline == NULL) {
170 +                stderr_v("Cannot open command line window\n");
171 +                quit(1);
172 +        }
173 +        XMapWindow(gwind);                      /* make sure it's mapped */
174          XSync(1);                               /* discard input */
175          return;
176   }
# Line 184 | Line 181 | x_paintr(col, xmin, ymin, xmax, ymax)          /* fill a recta
181   COLOR  col;
182   int  xmin, ymin, xmax, ymax;
183   {
187 –        extern long  nrays;             /* global ray count */
184          extern int  xnewcolr();         /* pixel assignment routine */
189 –        static long  lastflush = 0;     /* ray count at last flush */
185  
186          if (ncolors > 0) {
187                  XPixSet(gwind, xmin, gheight-ymax, xmax-xmin, ymax-ymin,
188                                  pixval[get_pixel(col, xnewcolr)]);
189          }
195 –        if (nrays - lastflush >= WFLUSH) {
196 –                if (ncolors <= 0)       /* output necessary for death */
197 –                        XPixSet(gwind,0,0,1,1,BlackPixel);
198 –                checkinp();
199 –                lastflush = nrays;
200 –        }
190   }
191  
192  
193   static
194 < x_comin(inp)                    /* read in a command line */
206 < char  *inp;
194 > x_flush()                       /* flush output */
195   {
196 <        int  x_getc(), x_comout();
196 >        if (ncolors <= 0)       /* output necessary for death */
197 >                XPixSet(gwind,0,0,1,1,BlackPixel);
198 >        while (XPending() > 0)
199 >                getevent();
200  
201 <        if (fromcombuf(inp, &x_driver))
202 <                return;
201 > }
202 >
203 >
204 > static
205 > x_comin(inp, prompt)            /* read in a command line */
206 > char  *inp, *prompt;
207 > {
208 >        extern int  x_getc();
209 >
210 >        if (prompt != NULL)
211 >                if (fromcombuf(inp, &x_driver))
212 >                        return;
213 >                else
214 >                        xt_puts(prompt, comline);
215          xt_cursor(comline, TBLKCURS);
216          editline(inp, x_getc, x_comout);
217          xt_cursor(comline, TNOCURS);
# Line 219 | Line 222 | static
222   x_comout(out)                   /* output a string to command line */
223   char  *out;
224   {
225 <        if (comline != NULL)
226 <                xt_puts(out, comline);
227 <        XFlush();
225 >        if (comline == NULL)
226 >                return;
227 >        xt_puts(out, comline);
228 >        if (out[strlen(out)-1] == '\n')
229 >                XFlush();
230   }
231  
232  
# Line 229 | Line 234 | static
234   x_errout(msg)                   /* output an error message */
235   char  *msg;
236   {
232 –        x_comout(msg);
237          stderr_v(msg);          /* send to stderr also! */
238 +        x_comout(msg);
239   }
240  
241  
# Line 285 | Line 290 | getpixels()                            /* get the color map */
290   {
291          int  planes;
292  
293 <        freepixels();
293 >        if (ncolors > 0)
294 >                return(ncolors);
295          for (ncolors=(1<<DisplayPlanes())-3; ncolors>12; ncolors=ncolors*.937){
296                  pixval = (int *)malloc(ncolors*sizeof(int));
297                  if (pixval == NULL)
# Line 355 | Line 361 | register XExposeEvent  *eexp;
361          }
362                                          /* check for change in size */
363          if (eexp->width != gwidth || eexp->height-COMHEIGHT != gheight) {
364 <                x_driver.xsiz = eexp->width;
365 <                x_driver.ysiz = eexp->height-COMHEIGHT;
364 >                gwidth = eexp->width;
365 >                gheight = eexp->height-COMHEIGHT;
366 >                x_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
367 >                x_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
368                  strcpy(getcombuf(&x_driver), "new\n");
369                  return;
370          }
371                                          /* remap colors */
372 <        if (ncolors == 0 && getpixels() == 0) {
372 >        if (getpixels() == 0) {
373                  stderr_v("cannot allocate colors\n");
374                  return;
375          }

Diff Legend

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