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.3 by greg, Tue Jun 16 13:24:23 1992 UTC vs.
Revision 2.18 by gwlarson, Mon Aug 10 18:37:06 1998 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1991 Regents of the University of California */
1 > /* Copyright (c) 1998 Silicon Graphics, Inc. */
2  
3   #ifndef lint
4 < static char SCCSid[] = "$SunId$ LBL";
4 > static char SCCSid[] = "$SunId$ SGI";
5   #endif
6  
7   /*
8   *  text.c - functions for text patterns and mixtures.
9 – *
10 – *     11/12/86
9   */
10  
11   #include  "ray.h"
# Line 25 | Line 23 | static char SCCSid[] = "$SunId$ LBL";
23   *      modifier brighttext id
24   *      2 fontfile textfile
25   *      0
26 < *      11
26 > *      11+
27   *              Ax Ay Az
28   *              Rx Ry Rz
29   *              Dx Dy Dz
30   *              foreground background
31 + *              [spacing]
32   *
33   *  For a single line, we use:
34   *
35   *      modifier brighttext id
36   *      N+2 fontfile . This is a line with N words...
37   *      0
38 < *      11
38 > *      11+
39   *              Ax Ay Az
40   *              Rx Ry Rz
41   *              Dx Dy Dz
42   *              foreground background
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
53 < *      9
53 > *      9+
54   *              Ax Ay Az
55   *              Rx Ry Rz
56   *              Dx Dy Dz
57 + *              [spacing]
58   */
59  
60   #define  fndx(m)        ((m)->otype==MIX_TEXT ? 2 : 0)
61   #define  tndx(m)        ((m)->otype==MIX_TEXT ? 3 : 1)
62 + #define  sndx(m)        ((m)->otype==PAT_BTEXT ? 11 : \
63 +                                (m)->otype==PAT_CTEXT ? 15 : 9)
64  
65   typedef struct tline {
66          struct tline  *next;            /* pointer to next line */
67 +        short  *spc;                    /* character spacing */
68 +        int  width;                     /* total line width */
69                                          /* followed by the string */
70   }  TLINE;
71  
# Line 70 | 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 79 | 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 98 | Line 105 | RAY  *r;
105                  char  *modname = m->oargs.sarg[foreground ? 0 : 1];
106                  if (!strcmp(modname, VOIDID))
107                          omod = OVOID;
108 <                else if ((omod = modifier(modname)) == OVOID) {
108 >                else if ((omod = lastmod(objndx(m), modname)) == OVOID) {
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 120 | Line 131 | RAY  *r;
131                                          m->oargs.farg[14]);
132                  multcolor(r->pcol, cval);
133          }
134 +        return(0);
135   }
136  
137  
# Line 128 | Line 140 | tlalloc(s)                     /* allocate and assign text line */
140   char  *s;
141   {
142          extern char  *strcpy();
143 +        register int  siz;
144          register TLINE  *tl;
145  
146 <        tl = (TLINE *)malloc(sizeof(TLINE)+1+strlen(s));
147 <        if (tl == NULL)
146 >        siz = strlen(s) + 1;
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");
150          tl->next = NULL;
151          strcpy(TLSTR(tl), s);
# Line 145 | 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 158 | Line 172 | register OBJREC  *tm;
172          if ((t = (TEXT *)tm->os) != NULL)
173                  return(t);
174                                                  /* check arguments */
175 <        if (tm->oargs.nsargs - tndx(tm) < 1 ||
162 <                        tm->oargs.nfargs != (tm->otype == PAT_BTEXT ? 11 :
163 <                                        tm->otype == PAT_CTEXT ? 15 : 9))
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                  error(SYSTEM, "out of memory in gettext");
179                                                  /* compute vectors */
180          fcross(DxR, D, R);
181          fcross(t->right, DxR, D);
182 <        d = DOT(D,D)/DOT(t->right,t->right);
182 >        d = DOT(t->right,t->right);
183 >        if (d <= FTINY*FTINY)
184 >                objerror(tm, USER, "illegal motion vector");
185 >        d = DOT(D,D)/d;
186          for (i = 0; i < 3; i++)
187                  t->right[i] *= d;
188          fcross(t->down, R, DxR);
# Line 188 | Line 203 | register OBJREC  *tm;
203                  tlp = tlp->next;
204          } else {                                /* text file */
205                  if ((s = getpath(tm->oargs.sarg[tndx(tm)],
206 <                                libpath, R_OK)) == NULL) {
206 >                                getlibpath(), R_OK)) == NULL) {
207                          sprintf(errmsg, "cannot find text file \"%s\"",
208                                          tm->oargs.sarg[tndx(tm)]);
209                          error(USER, errmsg);
210                  }
211                  if ((fp = fopen(s, "r")) == NULL) {
212 <                        sprintf(errmsg, "cannot open text file \"%s\"",
198 <                                        s);
212 >                        sprintf(errmsg, "cannot open text file \"%s\"", s);
213                          error(SYSTEM, errmsg);
214                  }
215                  while (fgets(linbuf, sizeof(linbuf), fp) != NULL) {
# Line 210 | Line 224 | register OBJREC  *tm;
224          tlp->next = NULL;
225                                                  /* get the font */
226          t->f = getfont(tm->oargs.sarg[fndx(tm)]);
227 +                                                /* compute character spacing */
228 +        i = sndx(tm);
229 +        d = i < tm->oargs.nfargs ? tm->oargs.farg[i] : 0.0;
230 +        i = d * 255.0;
231 +        t->tl.width = 0;
232 +        for (tlp = t->tl.next; tlp != NULL; tlp = tlp->next) {
233 +                if (i < 0)
234 +                        tlp->width = squeeztext(tlp->spc, TLSTR(tlp), t->f, -i);
235 +                else if (i > 0)
236 +                        tlp->width = proptext(tlp->spc, TLSTR(tlp), t->f, i, 3);
237 +                else
238 +                        tlp->width = uniftext(tlp->spc, TLSTR(tlp), t->f);
239 +                if (tlp->width > t->tl.width)
240 +                        t->tl.width = tlp->width;
241 +        }
242                                                  /* we're done */
243          tm->os = (char *)t;
244          return(t);
# Line 227 | Line 256 | OBJREC  *m;
256          tp = (TEXT *)m->os;
257          if (tp == NULL)
258                  return;
259 <        for (tlp = tp->tl.next; tlp != NULL; tlp = tlp->next);
259 >        while ((tlp = tp->tl.next) != NULL) {
260 >                tp->tl.next = tlp->next;
261 >                free((char *)tlp->spc);
262                  free((char *)tlp);
263 +        }
264          free((char *)tp);
265          m->os = NULL;
266   }
# Line 242 | Line 274 | OBJREC  *m;
274          register TLINE  *tlp;
275          FVECT  v;
276          double  y, x;
277 <        int  col;
246 <        register int  lno;
277 >        register int  i, h;
278                                  /* first, compute position in text */
279          tp = gettext(m);
280          v[0] = p[0] - m->oargs.farg[0];
281          v[1] = p[1] - m->oargs.farg[1];
282          v[2] = p[2] - m->oargs.farg[2];
283 <        col = x = DOT(v, tp->right);
284 <        lno = y = DOT(v, tp->down);
283 >        x = DOT(v, tp->right);
284 >        i = sndx(m);
285 >        if (i < m->oargs.nfargs)
286 >                x *= tp->f->mwidth + 255.*fabs(m->oargs.farg[i]);
287 >        else
288 >                x *= 255.;
289 >        h = x;
290 >        i = y = DOT(v, tp->down);
291          if (x < 0.0 || y < 0.0)
292                  return(0);
293 <        x -= (double)col;
294 <        y = (lno+1) - y;
295 <                                /* get the font character */
293 >        x -= (double)h;
294 >        y = ((i+1) - y)*255.;
295 >                                /* find the line position */
296          for (tlp = tp->tl.next; tlp != NULL; tlp = tlp->next)
297 <                if (--lno < 0)
297 >                if (--i < 0)
298                          break;
299 <        if (tlp == NULL || col >= strlen(TLSTR(tlp)))
299 >        if (tlp == NULL || h >= tlp->width)
300                  return(0);
301 <        return(inglyph(x, y, tp->f->fg[TLSTR(tlp)[col]&0xff]));
301 >        for (i = 0; (h -= tlp->spc[i]) >= 0; i++)
302 >                if (h < 255 && inglyph(h+x, y,
303 >                                tp->f->fg[TLSTR(tlp)[i]&0xff]))
304 >                        return(1);
305 >        return(0);
306   }
307  
308  
309   inglyph(x, y, gl)               /* (x,y) within font glyph gl? */
310 < double  x, y;
310 > double  x, y;           /* real coordinates in range [0,255) */
311   register GLYPH  *gl;
312   {
313          int  n, ncross;
314          int  xlb, ylb;
315 +        int  tv;
316          register GORD  *p0, *p1;
317  
318          if (gl == NULL)
319                  return(0);
320 <        x *= 256.0;                     /* get glyph coordinates */
321 <        y *= 256.0;
322 <        xlb = x + 0.5;
281 <        ylb = y + 0.5;
282 <        if (gl->left > xlb || gl->right <= xlb ||
320 >        xlb = x;
321 >        ylb = y;
322 >        if (gl->left > xlb || gl->right <= xlb ||       /* check extent */
323                          gl->bottom > ylb || gl->top <= ylb)
324 <                return(0);      /* outside extent */
324 >                return(0);
325 >        xlb = xlb<<1 | 1;               /* add 1/2 to test points... */
326 >        ylb = ylb<<1 | 1;               /* ...so no equal comparisons */
327          n = gl->nverts;                 /* get # of vertices */
328          p0 = gvlist(gl) + 2*(n-1);      /* connect last to first */
329          p1 = gvlist(gl);
330          ncross = 0;
331                                          /* positive x axis cross test */
332          while (n--) {
333 <                if ((p0[1] > ylb) ^ (p1[1] > ylb))
334 <                        if (p0[0] > xlb && p1[0] > xlb)
333 >                if ((p0[1]<<1 > ylb) ^ (p1[1]<<1 > ylb)) {
334 >                        tv = p0[0]<<1 > xlb | (p1[0]<<1 > xlb) << 1;
335 >                        if (tv == 03)
336                                  ncross++;
337 <                        else if (p0[0] > xlb || p1[0] > xlb)
337 >                        else if (tv)
338                                  ncross += (p1[1] > p0[1]) ^
339                                                  ((p0[1]-y)*(p1[0]-x) >
340                                                  (p0[0]-x)*(p1[1]-y));
341 +                }
342                  p0 = p1;
343                  p1 += 2;
344          }

Diff Legend

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