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.2 by greg, Sat Jun 6 07:40:23 1992 UTC vs.
Revision 2.11 by greg, Fri Jun 4 17:03:11 1993 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1991 Regents of the University of California */
1 > /* Copyright (c) 1992 Regents of the University of California */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ LBL";
# Line 25 | Line 25 | static char SCCSid[] = "$SunId$ LBL";
25   *      modifier brighttext id
26   *      2 fontfile textfile
27   *      0
28 < *      11
28 > *      11+
29   *              Ax Ay Az
30   *              Rx Ry Rz
31   *              Dx Dy Dz
32   *              foreground background
33 + *              [spacing]
34   *
35   *  For a single line, we use:
36   *
37   *      modifier brighttext id
38   *      N+2 fontfile . This is a line with N words...
39   *      0
40 < *      11
40 > *      11+
41   *              Ax Ay Az
42   *              Rx Ry Rz
43   *              Dx Dy Dz
44   *              foreground background
45 + *              [spacing]
46   *
47   *  Colortext is identical, except colors are given rather than
48   *  brightnesses.  Mixtext has foreground and background modifiers:
# Line 48 | Line 50 | static char SCCSid[] = "$SunId$ LBL";
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;
81 +
82   extern char  *fgetword();
83  
84   TEXT  *gettext();
# Line 126 | Line 135 | tlalloc(s)                     /* allocate and assign text line */
135   char  *s;
136   {
137          extern char  *strcpy();
138 +        register int  siz;
139          register TLINE  *tl;
140  
141 <        tl = (TLINE *)malloc(sizeof(TLINE)+1+strlen(s));
142 <        if (tl == NULL)
141 >        siz = strlen(s) + 1;
142 >        if ((tl=(TLINE *)malloc(sizeof(TLINE)+siz)) == NULL ||
143 >                        (tl->spc=(short *)malloc(siz*sizeof(short))) == NULL)
144                  error(SYSTEM, "out of memory in tlalloc");
145          tl->next = NULL;
146          strcpy(TLSTR(tl), s);
# Line 143 | Line 154 | register OBJREC  *tm;
154   {
155   #define  R      (tm->oargs.farg+3)
156   #define  D      (tm->oargs.farg+6)
157 <        extern char  *strcpy(), *fgets();
157 >        extern char  *strcpy();
158          FVECT  DxR;
159          double  d;
160          FILE  *fp;
# Line 156 | Line 167 | register OBJREC  *tm;
167          if ((t = (TEXT *)tm->os) != NULL)
168                  return(t);
169                                                  /* check arguments */
170 <        if (tm->oargs.nsargs - tndx(tm) < 1 ||
160 <                        tm->oargs.nfargs != (tm->otype == PAT_BTEXT ? 11 :
161 <                                        tm->otype == PAT_CTEXT ? 15 : 9))
170 >        if (tm->oargs.nsargs - tndx(tm) < 1 || tm->oargs.nfargs < sndx(tm))
171                  objerror(tm, USER, "bad # arguments");
172          if ((t = (TEXT *)malloc(sizeof(TEXT))) == NULL)
173                  error(SYSTEM, "out of memory in gettext");
# Line 192 | Line 201 | register OBJREC  *tm;
201                          error(USER, errmsg);
202                  }
203                  if ((fp = fopen(s, "r")) == NULL) {
204 <                        sprintf(errmsg, "cannot open text file \"%s\"",
196 <                                        s);
204 >                        sprintf(errmsg, "cannot open text file \"%s\"", s);
205                          error(SYSTEM, errmsg);
206                  }
207                  while (fgets(linbuf, sizeof(linbuf), fp) != NULL) {
# Line 208 | Line 216 | register OBJREC  *tm;
216          tlp->next = NULL;
217                                                  /* get the font */
218          t->f = getfont(tm->oargs.sarg[fndx(tm)]);
219 +                                                /* compute character spacing */
220 +        i = sndx(tm);
221 +        d = i < tm->oargs.nfargs ? tm->oargs.farg[i] : 0.0;
222 +        i = d * 256.0;
223 +        t->tl.width = 0;
224 +        for (tlp = t->tl.next; tlp != NULL; tlp = tlp->next) {
225 +                if (i < 0)
226 +                        tlp->width = squeeztext(tlp->spc, TLSTR(tlp), t->f, -i);
227 +                else if (i > 0)
228 +                        tlp->width = proptext(tlp->spc, TLSTR(tlp), t->f, i, 3);
229 +                else
230 +                        tlp->width = uniftext(tlp->spc, TLSTR(tlp), t->f);
231 +                if (tlp->width > t->tl.width)
232 +                        t->tl.width = tlp->width;
233 +        }
234                                                  /* we're done */
235          tm->os = (char *)t;
236          return(t);
# Line 225 | Line 248 | OBJREC  *m;
248          tp = (TEXT *)m->os;
249          if (tp == NULL)
250                  return;
251 <        for (tlp = tp->tl.next; tlp != NULL; tlp = tlp->next);
251 >        while ((tlp = tp->tl.next) != NULL) {
252 >                tp->tl.next = tlp->next;
253 >                free((char *)tlp->spc);
254                  free((char *)tlp);
255 +        }
256          free((char *)tp);
257          m->os = NULL;
258   }
# Line 240 | Line 266 | OBJREC  *m;
266          register TLINE  *tlp;
267          FVECT  v;
268          double  y, x;
269 <        int  col;
244 <        register int  lno;
269 >        register int  i, h;
270                                  /* first, compute position in text */
271          tp = gettext(m);
272          v[0] = p[0] - m->oargs.farg[0];
273          v[1] = p[1] - m->oargs.farg[1];
274          v[2] = p[2] - m->oargs.farg[2];
275 <        col = x = DOT(v, tp->right);
276 <        lno = y = DOT(v, tp->down);
275 >        x = DOT(v, tp->right);
276 >        i = sndx(m);
277 >        if (i < m->oargs.nfargs)
278 >                x *= tp->f->mwidth + 256.*fabs(m->oargs.farg[i]);
279 >        else
280 >                x *= 256.;
281 >        h = x;
282 >        i = y = DOT(v, tp->down);
283          if (x < 0.0 || y < 0.0)
284                  return(0);
285 <        x -= (double)col;
286 <        y = (lno+1) - y;
287 <                                /* get the font character */
285 >        x -= (double)h;
286 >        y = ((i+1) - y)*256.;
287 >                                /* find the line position */
288          for (tlp = tp->tl.next; tlp != NULL; tlp = tlp->next)
289 <                if (--lno < 0)
289 >                if (--i < 0)
290                          break;
291 <        if (tlp == NULL || col >= strlen(TLSTR(tlp)))
291 >        if (tlp == NULL || h >= tlp->width)
292                  return(0);
293 <        return(inglyph(x, y, tp->f->fg[TLSTR(tlp)[col]&0xff]));
293 >        for (i = 0; (h -= tlp->spc[i]) >= 0; i++)
294 >                if (h < 256 && inglyph(h+x, y,
295 >                                tp->f->fg[TLSTR(tlp)[i]&0xff]))
296 >                        return(1);
297 >        return(0);
298   }
299  
300  
301   inglyph(x, y, gl)               /* (x,y) within font glyph gl? */
302 < double  x, y;
303 < GLYPH  *gl;
302 > double  x, y;           /* real coordinates in range [0,256) */
303 > register GLYPH  *gl;
304   {
305          int  n, ncross;
306          int  xlb, ylb;
307 +        int  tv;
308          register GORD  *p0, *p1;
309  
310          if (gl == NULL)
311                  return(0);
312 <        x *= 256.0;                     /* get glyph coordinates */
313 <        y *= 256.0;
314 <        xlb = x + 0.5;
315 <        ylb = y + 0.5;
312 >        xlb = x;
313 >        ylb = y;
314 >        if (gl->left > xlb || gl->right <= xlb ||       /* check extent */
315 >                        gl->bottom > ylb || gl->top <= ylb)
316 >                return(0);
317 >        xlb = xlb<<1 | 1;               /* add 1/2 to test points... */
318 >        ylb = ylb<<1 | 1;               /* ...so no equal comparisons */
319          n = gl->nverts;                 /* get # of vertices */
320          p0 = gvlist(gl) + 2*(n-1);      /* connect last to first */
321          p1 = gvlist(gl);
322          ncross = 0;
323                                          /* positive x axis cross test */
324          while (n--) {
325 <                if ((p0[1] > ylb) ^ (p1[1] > ylb))
326 <                        if (p0[0] > xlb && p1[0] > xlb)
325 >                if ((p0[1]<<1 > ylb) ^ (p1[1]<<1 > ylb)) {
326 >                        tv = p0[0]<<1 > xlb | (p1[0]<<1 > xlb) << 1;
327 >                        if (tv == 03)
328                                  ncross++;
329 <                        else if (p0[0] > xlb || p1[0] > xlb)
329 >                        else if (tv)
330                                  ncross += (p1[1] > p0[1]) ^
331                                                  ((p0[1]-y)*(p1[0]-x) >
332                                                  (p0[0]-x)*(p1[1]-y));
333 +                }
334                  p0 = p1;
335                  p1 += 2;
336          }

Diff Legend

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