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

Comparing ray/src/rt/text.c (file contents):
Revision 2.4 by greg, Fri Jun 19 13:07:48 1992 UTC vs.
Revision 2.16 by greg, Sat Jun 22 09:48:52 1996 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1991 Regents of the University of California */
1 > /* Copyright (c) 1995 Regents of the University of California */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ LBL";
# Line 6 | Line 6 | static char SCCSid[] = "$SunId$ LBL";
6  
7   /*
8   *  text.c - functions for text patterns and mixtures.
9 *
10 *     11/12/86
9   */
10  
11   #include  "ray.h"
# Line 45 | Line 43 | static char SCCSid[] = "$SunId$ LBL";
43   *              [spacing]
44   *
45   *  Colortext is identical, except colors are given rather than
46 < *  brightnesses.  Mixtext has foreground and background modifiers:
46 > *  brightnesses.
47   *
48 + *  Mixtext has foreground and background modifiers:
49 + *
50   *      modifier mixtext id
51   *      4+ foremod backmod fontfile text..
52   *      0
# Line 77 | Line 77 | typedef struct {
77          TLINE  tl;                      /* line list */
78   }  TEXT;
79  
80 < extern char  *libpath;
80 > extern char  *getlibpath();
81  
82   extern char  *fgetword();
83  
# Line 86 | Line 86 | TEXT  *gettext();
86   TLINE  *tlalloc();
87  
88  
89 < text(m, r)
89 > do_text(m, r)
90   register OBJREC  *m;
91   RAY  *r;
92   {
# Line 109 | Line 109 | RAY  *r;
109                          sprintf(errmsg, "undefined modifier \"%s\"", modname);
110                          objerror(m, USER, errmsg);
111                  }
112 <                raytexture(r, omod);
112 >                if (rayshade(r, omod)) {
113 >                        if (m->omod != OVOID)
114 >                                objerror(m, USER, "inappropriate modifier");
115 >                        return(1);
116 >                }
117          } else if (m->otype == PAT_BTEXT) {
118                  if (foreground)
119                          scalecolor(r->pcol, m->oargs.farg[9]);
# Line 127 | Line 131 | RAY  *r;
131                                          m->oargs.farg[14]);
132                  multcolor(r->pcol, cval);
133          }
134 +        return(0);
135   }
136  
137  
# Line 142 | Line 147 | char  *s;
147          if ((tl=(TLINE *)malloc(sizeof(TLINE)+siz)) == NULL ||
148                          (tl->spc=(short *)malloc(siz*sizeof(short))) == NULL)
149                  error(SYSTEM, "out of memory in tlalloc");
145        tl->spc = NULL;
150          tl->next = NULL;
151          strcpy(TLSTR(tl), s);
152          return(tl);
# Line 155 | Line 159 | register OBJREC  *tm;
159   {
160   #define  R      (tm->oargs.farg+3)
161   #define  D      (tm->oargs.farg+6)
162 <        extern char  *strcpy(), *fgets();
162 >        extern char  *strcpy();
163          FVECT  DxR;
164          double  d;
165          FILE  *fp;
# Line 171 | Line 175 | register OBJREC  *tm;
175          if (tm->oargs.nsargs - tndx(tm) < 1 || tm->oargs.nfargs < sndx(tm))
176                  objerror(tm, USER, "bad # arguments");
177          if ((t = (TEXT *)malloc(sizeof(TEXT))) == NULL)
178 <                goto memerr;
178 >                error(SYSTEM, "out of memory in gettext");
179                                                  /* compute vectors */
180          fcross(DxR, D, R);
181          fcross(t->right, DxR, D);
# Line 196 | Line 200 | register OBJREC  *tm;
200                  tlp = tlp->next;
201          } else {                                /* text file */
202                  if ((s = getpath(tm->oargs.sarg[tndx(tm)],
203 <                                libpath, R_OK)) == NULL) {
203 >                                getlibpath(), R_OK)) == NULL) {
204                          sprintf(errmsg, "cannot find text file \"%s\"",
205                                          tm->oargs.sarg[tndx(tm)]);
206                          error(USER, errmsg);
# Line 220 | Line 224 | register OBJREC  *tm;
224                                                  /* compute character spacing */
225          i = sndx(tm);
226          d = i < tm->oargs.nfargs ? tm->oargs.farg[i] : 0.0;
227 <        i = d * 256.0;
227 >        i = d * 255.0;
228 >        t->tl.width = 0;
229          for (tlp = t->tl.next; tlp != NULL; tlp = tlp->next) {
225                if ((tlp->spc = (short *)malloc(
226                                (strlen(TLSTR(tlp))+1)*sizeof(short))) == NULL)
227                        goto memerr;
230                  if (i < 0)
231                          tlp->width = squeeztext(tlp->spc, TLSTR(tlp), t->f, -i);
232                  else if (i > 0)
233                          tlp->width = proptext(tlp->spc, TLSTR(tlp), t->f, i, 3);
234                  else
235                          tlp->width = uniftext(tlp->spc, TLSTR(tlp), t->f);
236 +                if (tlp->width > t->tl.width)
237 +                        t->tl.width = tlp->width;
238          }
239                                                  /* we're done */
240          tm->os = (char *)t;
241          return(t);
238 memerr:
239        error(SYSTEM, "out of memory in gettext");
242   #undef  R
243   #undef  D
244   }
# Line 251 | Line 253 | OBJREC  *m;
253          tp = (TEXT *)m->os;
254          if (tp == NULL)
255                  return;
256 <        for (tlp = tp->tl.next; tlp != NULL; tlp = tlp->next) {
256 >        while ((tlp = tp->tl.next) != NULL) {
257 >                tp->tl.next = tlp->next;
258                  free((char *)tlp->spc);
259                  free((char *)tlp);
260          }
# Line 274 | Line 277 | OBJREC  *m;
277          v[0] = p[0] - m->oargs.farg[0];
278          v[1] = p[1] - m->oargs.farg[1];
279          v[2] = p[2] - m->oargs.farg[2];
280 <        h = x = DOT(v, tp->right)*256.;
280 >        x = DOT(v, tp->right);
281 >        i = sndx(m);
282 >        if (i < m->oargs.nfargs)
283 >                x *= tp->f->mwidth + 255.*fabs(m->oargs.farg[i]);
284 >        else
285 >                x *= 255.;
286 >        h = x;
287          i = y = DOT(v, tp->down);
288          if (x < 0.0 || y < 0.0)
289                  return(0);
290          x -= (double)h;
291 <        y = ((i+1) - y)*256.;
291 >        y = ((i+1) - y)*255.;
292                                  /* find the line position */
293          for (tlp = tp->tl.next; tlp != NULL; tlp = tlp->next)
294                  if (--i < 0)
# Line 287 | Line 296 | OBJREC  *m;
296          if (tlp == NULL || h >= tlp->width)
297                  return(0);
298          for (i = 0; (h -= tlp->spc[i]) >= 0; i++)
299 <                if (h < 256 && inglyph(h+x, y,
299 >                if (h < 255 && inglyph(h+x, y,
300                                  tp->f->fg[TLSTR(tlp)[i]&0xff]))
301                          return(1);
302          return(0);
# Line 295 | Line 304 | OBJREC  *m;
304  
305  
306   inglyph(x, y, gl)               /* (x,y) within font glyph gl? */
307 < double  x, y;
307 > double  x, y;           /* real coordinates in range [0,255) */
308   register GLYPH  *gl;
309   {
310          int  n, ncross;
311 <        int  xtc, ytc;
311 >        int  xlb, ylb;
312 >        int  tv;
313          register GORD  *p0, *p1;
314  
315          if (gl == NULL)
316                  return(0);
317 <        xtc = x + 0.5;                  /* compute test coordinates */
318 <        ytc = y + 0.5;
319 <        if (gl->left > xtc || gl->right < xtc ||
320 <                        gl->bottom > ytc || gl->top < ytc)
321 <                return(0);      /* outside extent */
317 >        xlb = x;
318 >        ylb = y;
319 >        if (gl->left > xlb || gl->right <= xlb ||       /* check extent */
320 >                        gl->bottom > ylb || gl->top <= ylb)
321 >                return(0);
322 >        xlb = xlb<<1 | 1;               /* add 1/2 to test points... */
323 >        ylb = ylb<<1 | 1;               /* ...so no equal comparisons */
324          n = gl->nverts;                 /* get # of vertices */
325          p0 = gvlist(gl) + 2*(n-1);      /* connect last to first */
326          p1 = gvlist(gl);
327          ncross = 0;
328                                          /* positive x axis cross test */
329          while (n--) {
330 <                if ((p0[1] > ytc) ^ (p1[1] > ytc))
331 <                        if (p0[0] > xtc && p1[0] > xtc)
330 >                if ((p0[1]<<1 > ylb) ^ (p1[1]<<1 > ylb)) {
331 >                        tv = p0[0]<<1 > xlb | (p1[0]<<1 > xlb) << 1;
332 >                        if (tv == 03)
333                                  ncross++;
334 <                        else if (p0[0] > xtc || p1[0] > xtc)
334 >                        else if (tv)
335                                  ncross += (p1[1] > p0[1]) ^
336                                                  ((p0[1]-y)*(p1[0]-x) >
337                                                  (p0[0]-x)*(p1[1]-y));
338 +                }
339                  p0 = p1;
340                  p1 += 2;
341          }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines