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

Comparing ray/src/common/font.c (file contents):
Revision 2.1 by greg, Sat Jun 6 07:38:40 1992 UTC vs.
Revision 2.5 by greg, Mon Sep 21 12:02:03 1992 UTC

# Line 17 | Line 17 | static char SCCSid[] = "$SunId$ LBL";
17  
18   extern char  *libpath;                  /* list of library directories */
19  
20 + extern char  *fgetword();
21 +
22   static FONT     *fontlist = NULL;       /* list of loaded fonts */
23  
24  
# Line 27 | Line 29 | char  *fname;
29          char  buf[16];
30          FILE  *fp;
31          char  *pathname, *err;
32 +        unsigned  wsum, hsum, ngly;
33          int  gn, ngv;
34          register int  gv;
35 <        register GLYPH  *g;
35 >        register GLYPH  *g;
36          GORD  *gp;
37          register FONT  *f;
38  
# Line 50 | Line 53 | char  *fname;
53                                  pathname);
54                  error(SYSTEM, errmsg);
55          }
56 +        wsum = hsum = ngly = 0;
57          while (fgetword(buf,sizeof(buf),fp) != NULL) {  /* get each glyph */
58                  if (!isint(buf))
59                          goto nonint;
60                  gn = atoi(buf);
61 <                if (gn < 0 || gn > 255) {
61 >                if (gn < 1 || gn > 255) {
62                          err = "illegal";
63                          goto fonterr;
64                  }
# Line 71 | Line 75 | char  *fname;
75                  if (g == NULL)
76                          goto memerr;
77                  g->nverts = ngv;
78 <                g->start = g->width = 128;
78 >                g->left = g->right = g->top = g->bottom = 128;
79                  ngv *= 2;
80                  gp = gvlist(g);
81                  while (ngv--) {
# Line 82 | Line 86 | char  *fname;
86                                  goto fonterr;
87                          }
88                          *gp++ = gv;
89 <                        if (ngv & 1)            /* follow x limits */
90 <                                if (gv < g->start)
91 <                                        g->start = gv;
92 <                                else if (gv > g->width)
93 <                                        g->width = gv;
89 >                        if (ngv & 1) {          /* follow x limits */
90 >                                if (gv < g->left)
91 >                                        g->left = gv;
92 >                                else if (gv > g->right)
93 >                                        g->right = gv;
94 >                        } else {                /* follow y limits */
95 >                                if (gv < g->bottom)
96 >                                        g->bottom = gv;
97 >                                else if (gv > g->top)
98 >                                        g->top = gv;
99 >                        }
100                  }
101 <                g->width -= g->start;
101 >                if (g->right - g->left && g->top - g->bottom) {
102 >                        ngly++;
103 >                        wsum += g->right - g->left;
104 >                        hsum += g->top - g->bottom;
105 >                }
106                  f->fg[gn] = g;
107          }
108          fclose(fp);
109 +        if (ngly) {
110 +                f->mwidth = wsum / ngly;
111 +                f->mheight = hsum / ngly;
112 +        }
113          f->next = fontlist;
114          return(fontlist = f);
115   nonint:
# Line 103 | Line 121 | fonterr:
121          error(USER, errmsg);
122   memerr:
123          error(SYSTEM, "out of memory in fontglyph");
124 + }
125 +
126 +
127 + int
128 + uniftext(sp, tp, f)                     /* uniformly space text line */
129 + register short  *sp;            /* returned character spacing */
130 + register char  *tp;             /* text line */
131 + register FONT  *f;              /* font */
132 + {
133 +        int  linelen;
134 +
135 +        linelen = *sp++ = 0;
136 +        while (*tp)
137 +                if (f->fg[*tp++&0xff] == NULL)
138 +                        *sp++ = 0;
139 +                else
140 +                        linelen += *sp++ = 256;
141 +        return(linelen);
142 + }
143 +
144 +
145 + int
146 + squeeztext(sp, tp, f, cis)              /* squeeze text line */
147 + short  *sp;                     /* returned character spacing */
148 + char  *tp;                      /* text line */
149 + FONT  *f;                       /* font */
150 + int  cis;                       /* intercharacter spacing */
151 + {
152 +        int  linelen;
153 +        register GLYPH  *gp;
154 +
155 +        gp = NULL;
156 +        while (*tp && (gp = f->fg[*tp++&0xff]) == NULL)
157 +                *sp++ = 0;
158 +        cis /= 2;
159 +        linelen = *sp = cis;
160 +        while (gp != NULL) {
161 +                if (gp->nverts) {               /* regular character */
162 +                        linelen += *sp++ += cis - gp->left;
163 +                        *sp = gp->right + cis;
164 +                } else {                        /* space */
165 +                        linelen += *sp++;
166 +                        *sp = f->mwidth;
167 +                }
168 +                gp = NULL;
169 +                while (*tp && (gp = f->fg[*tp++&0xff]) == NULL) {
170 +                        linelen += *sp++;
171 +                        *sp = 0;
172 +                }
173 +        }
174 +        linelen += *sp += cis;
175 +        return(linelen);
176 + }
177 +
178 +
179 + int
180 + proptext(sp, tp, f, cis, nsi)           /* space line proportionally */
181 + short  *sp;                     /* returned character spacing */
182 + char  *tp;                      /* text line */
183 + FONT  *f;                       /* font */
184 + int  cis;                       /* target intercharacter spacing */
185 + int  nsi;                       /* minimum number of spaces for indent */
186 + {
187 +        register char  *end, *tab;
188 +        GLYPH  *gp;
189 +        short  *nsp;
190 +        int  alen, len, width;
191 +                                        /* start by squeezing it */
192 +        squeeztext(sp, tp, f, cis);
193 +                                        /* now, realign spacing */
194 +        len = 0;
195 +        width = alen = *sp++;
196 +        while (*tp) {
197 +                nsp = sp;
198 +                for (end = tp; *end; end = tab) {
199 +                        tab = end + 1;
200 +                        alen += *nsp++;
201 +                        if (f->fg[*end&0xff]) {
202 +                                while ((gp = f->fg[*tab&0xff]) != NULL &&
203 +                                                gp->nverts == 0) { /* tab in */
204 +                                        alen += *nsp++;
205 +                                        tab++;
206 +                                }
207 +                                len += tab - end;
208 +                        }
209 +                        if (nsi && tab - end > nsi)
210 +                                break;
211 +                }
212 +                len *= f->mwidth + cis;         /* compute target length */
213 +                width += len;
214 +                len -= alen;                    /* necessary adjustment */
215 +                while (sp < nsp) {
216 +                        alen = len/(nsp-sp);
217 +                        *sp++ += alen;
218 +                        len -= alen;
219 +                }
220 +                len = 0;
221 +                alen = 0;
222 +                tp = tab;
223 +        }
224 +        return(width);
225   }

Diff Legend

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