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.2 by greg, Tue Jun 16 13:16:50 1992 UTC vs.
Revision 2.9 by greg, Thu Apr 14 04:44:43 1994 UTC

# Line 15 | Line 15 | static char SCCSid[] = "$SunId$ LBL";
15   #define galloc(nv)      (GLYPH *)malloc(sizeof(GLYPH)+2*sizeof(GORD)*(nv))
16  
17  
18 < extern char  *libpath;                  /* list of library directories */
18 > extern char  *fgetword(), *getlibpath();
19  
20   static FONT     *fontlist = NULL;       /* list of loaded fonts */
21  
# Line 27 | Line 27 | char  *fname;
27          char  buf[16];
28          FILE  *fp;
29          char  *pathname, *err;
30 +        unsigned  wsum, hsum, ngly;
31          int  gn, ngv;
32          register int  gv;
33 <        register GLYPH  *g;
33 >        register GLYPH  *g;
34          GORD  *gp;
35          register FONT  *f;
36  
# Line 37 | Line 38 | char  *fname;
38                  if (!strcmp(f->name, fname))
39                          return(f);
40                                                  /* load the font file */
41 <        if ((pathname = getpath(fname, libpath, R_OK)) == NULL) {
41 >        if ((pathname = getpath(fname, getlibpath(), R_OK)) == NULL) {
42                  sprintf(errmsg, "cannot find font file \"%s\"", fname);
43                  error(USER, errmsg);
44          }
# Line 50 | Line 51 | char  *fname;
51                                  pathname);
52                  error(SYSTEM, errmsg);
53          }
54 +        wsum = hsum = ngly = 0;
55          while (fgetword(buf,sizeof(buf),fp) != NULL) {  /* get each glyph */
56                  if (!isint(buf))
57                          goto nonint;
58                  gn = atoi(buf);
59 <                if (gn < 0 || gn > 255) {
59 >                if (gn < 1 || gn > 255) {
60                          err = "illegal";
61                          goto fonterr;
62                  }
# Line 94 | Line 96 | char  *fname;
96                                          g->top = gv;
97                          }
98                  }
99 +                if (g->right - g->left && g->top - g->bottom) {
100 +                        ngly++;
101 +                        wsum += g->right - g->left;
102 +                        hsum += g->top - g->bottom;
103 +                }
104                  f->fg[gn] = g;
105          }
106          fclose(fp);
107 +        if (ngly) {
108 +                f->mwidth = wsum / ngly;
109 +                f->mheight = hsum / ngly;
110 +        }
111          f->next = fontlist;
112          return(fontlist = f);
113   nonint:
# Line 111 | Line 122 | memerr:
122   }
123  
124  
125 + freefont(fname)                 /* free a font (free all if fname==NULL) */
126 + char  *fname;
127 + {
128 +        FONT  head;
129 +        register FONT  *fl, *f;
130 +        register int  i;
131 +
132 +        head.next = fontlist;
133 +        fl = &head;
134 +        while ((f = fl->next) != NULL)
135 +                if (fname == NULL || !strcmp(fname, f->name)) {
136 +                        fl->next = f->next;
137 +                        for (i = 0; i < 256; i++)
138 +                                if (f->fg[i] != NULL)
139 +                                        free((char *)f->fg[i]);
140 +                        freestr(f->name);
141 +                        free((char *)f);
142 +                } else
143 +                        fl = f;
144 +        fontlist = head.next;
145 + }
146 +
147 +
148   int
149 + uniftext(sp, tp, f)                     /* uniformly space text line */
150 + register short  *sp;            /* returned character spacing */
151 + register char  *tp;             /* text line */
152 + register FONT  *f;              /* font */
153 + {
154 +        int  linelen;
155 +
156 +        linelen = *sp++ = 0;
157 +        while (*tp)
158 +                if (f->fg[*tp++&0xff] == NULL)
159 +                        *sp++ = 0;
160 +                else
161 +                        linelen += *sp++ = 256;
162 +        return(linelen);
163 + }
164 +
165 +
166 + int
167   squeeztext(sp, tp, f, cis)              /* squeeze text line */
168   short  *sp;                     /* returned character spacing */
169   char  *tp;                      /* text line */
# Line 119 | Line 171 | FONT  *f;                      /* font */
171   int  cis;                       /* intercharacter spacing */
172   {
173          int  linelen;
174 <        register GLYPH  *gp;
174 >        register GLYPH  *gp;
175  
176 +        linelen = 0;
177          gp = NULL;
178          while (*tp && (gp = f->fg[*tp++&0xff]) == NULL)
179                  *sp++ = 0;
180          cis /= 2;
181 <        linelen = *sp = 0;
181 >        *sp = cis;
182          while (gp != NULL) {
183                  if (gp->nverts) {               /* regular character */
184                          linelen += *sp++ += cis - gp->left;
185                          *sp = gp->right + cis;
186                  } else {                        /* space */
187                          linelen += *sp++;
188 <                        *sp = 256;
188 >                        *sp = f->mwidth;
189                  }
190                  gp = NULL;
191                  while (*tp && (gp = f->fg[*tp++&0xff]) == NULL) {
# Line 140 | Line 193 | int  cis;                      /* intercharacter spacing */
193                          *sp = 0;
194                  }
195          }
196 <        linelen += *sp;
196 >        linelen += *sp += cis;
197          return(linelen);
198   }
199  
200  
201 + int
202   proptext(sp, tp, f, cis, nsi)           /* space line proportionally */
203   short  *sp;                     /* returned character spacing */
204   char  *tp;                      /* text line */
# Line 152 | Line 206 | FONT  *f;                      /* font */
206   int  cis;                       /* target intercharacter spacing */
207   int  nsi;                       /* minimum number of spaces for indent */
208   {
209 +        register char  *end, *tab;
210 +        GLYPH  *gp;
211 +        short  *nsp;
212 +        int  alen, len, width;
213 +                                        /* start by squeezing it */
214 +        squeeztext(sp, tp, f, cis);
215 +                                        /* now, realign spacing */
216 +        width = *sp++;
217 +        while (*tp) {
218 +                len = alen = 0;
219 +                nsp = sp;
220 +                for (end = tp; *end; end = tab) {
221 +                        tab = end + 1;
222 +                        alen += *nsp++;
223 +                        if (f->fg[*end&0xff]) {
224 +                                while ((gp = f->fg[*tab&0xff]) != NULL &&
225 +                                                gp->nverts == 0) { /* tab in */
226 +                                        alen += *nsp++;
227 +                                        tab++;
228 +                                }
229 +                                len += tab - end;
230 +                        }
231 +                        if (nsi && tab - end > nsi)
232 +                                break;
233 +                }
234 +                len *= f->mwidth + cis;         /* compute target length */
235 +                width += len;
236 +                len -= alen;                    /* necessary adjustment */
237 +                while (sp < nsp) {
238 +                        alen = len/(nsp-sp);
239 +                        *sp++ += alen;
240 +                        len -= alen;
241 +                }
242 +                tp = tab;
243 +        }
244 +        return(width);
245   }
156 –
157 –

Diff Legend

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