| rsc | 76193d7 | 2003-09-30 17:47:42 +0000 | [diff] [blame] | 1 | #include <u.h> |
| 2 | #include <libc.h> |
| 3 | #include <draw.h> |
| 4 | |
| 5 | static char* |
| 6 | skip(char *s) |
| 7 | { |
| 8 | while(*s==' ' || *s=='\n' || *s=='\t') |
| 9 | s++; |
| 10 | return s; |
| 11 | } |
| 12 | |
| 13 | Font* |
| 14 | buildfont(Display *d, char *buf, char *name) |
| 15 | { |
| 16 | Font *fnt; |
| 17 | Cachefont *c; |
| 18 | char *s, *t; |
| 19 | ulong min, max; |
| 20 | int offset; |
| 21 | char badform[] = "bad font format: number expected (char position %d)"; |
| 22 | |
| 23 | s = buf; |
| 24 | fnt = malloc(sizeof(Font)); |
| 25 | if(fnt == 0) |
| 26 | return 0; |
| 27 | memset(fnt, 0, sizeof(Font)); |
| 28 | fnt->display = d; |
| 29 | fnt->name = strdup(name); |
| 30 | fnt->ncache = NFCACHE+NFLOOK; |
| 31 | fnt->nsubf = NFSUBF; |
| 32 | fnt->cache = malloc(fnt->ncache * sizeof(fnt->cache[0])); |
| 33 | fnt->subf = malloc(fnt->nsubf * sizeof(fnt->subf[0])); |
| 34 | if(fnt->name==0 || fnt->cache==0 || fnt->subf==0){ |
| 35 | Err2: |
| 36 | free(fnt->name); |
| 37 | free(fnt->cache); |
| 38 | free(fnt->subf); |
| 39 | free(fnt->sub); |
| 40 | free(fnt); |
| 41 | return 0; |
| 42 | } |
| 43 | fnt->height = strtol(s, &s, 0); |
| 44 | s = skip(s); |
| 45 | fnt->ascent = strtol(s, &s, 0); |
| 46 | s = skip(s); |
| 47 | if(fnt->height<=0 || fnt->ascent<=0){ |
| 48 | werrstr("bad height or ascent in font file"); |
| 49 | goto Err2; |
| 50 | } |
| 51 | fnt->width = 0; |
| 52 | fnt->nsub = 0; |
| 53 | fnt->sub = 0; |
| 54 | |
| 55 | memset(fnt->subf, 0, fnt->nsubf * sizeof(fnt->subf[0])); |
| 56 | memset(fnt->cache, 0, fnt->ncache*sizeof(fnt->cache[0])); |
| 57 | fnt->age = 1; |
| 58 | do{ |
| 59 | /* must be looking at a number now */ |
| 60 | if(*s<'0' || '9'<*s){ |
| 61 | werrstr(badform, s-buf); |
| 62 | goto Err3; |
| 63 | } |
| 64 | min = strtol(s, &s, 0); |
| 65 | s = skip(s); |
| 66 | /* must be looking at a number now */ |
| 67 | if(*s<'0' || '9'<*s){ |
| 68 | werrstr(badform, s-buf); |
| 69 | goto Err3; |
| 70 | } |
| 71 | max = strtol(s, &s, 0); |
| 72 | s = skip(s); |
| 73 | if(*s==0 || min>=65536 || max>=65536 || min>max){ |
| 74 | werrstr("illegal subfont range"); |
| 75 | Err3: |
| 76 | freefont(fnt); |
| 77 | return 0; |
| 78 | } |
| 79 | t = s; |
| 80 | offset = strtol(s, &t, 0); |
| 81 | if(t>s && (*t==' ' || *t=='\t' || *t=='\n')) |
| 82 | s = skip(t); |
| 83 | else |
| 84 | offset = 0; |
| 85 | fnt->sub = realloc(fnt->sub, (fnt->nsub+1)*sizeof(Cachefont*)); |
| 86 | if(fnt->sub == 0){ |
| 87 | /* realloc manual says fnt->sub may have been destroyed */ |
| 88 | fnt->nsub = 0; |
| 89 | goto Err3; |
| 90 | } |
| 91 | c = malloc(sizeof(Cachefont)); |
| 92 | if(c == 0) |
| 93 | goto Err3; |
| 94 | fnt->sub[fnt->nsub] = c; |
| 95 | c->min = min; |
| 96 | c->max = max; |
| 97 | c->offset = offset; |
| 98 | t = s; |
| 99 | while(*s && *s!=' ' && *s!='\n' && *s!='\t') |
| 100 | s++; |
| 101 | *s++ = 0; |
| 102 | c->subfontname = 0; |
| 103 | c->name = strdup(t); |
| 104 | if(c->name == 0){ |
| 105 | free(c); |
| 106 | goto Err3; |
| 107 | } |
| 108 | s = skip(s); |
| 109 | fnt->nsub++; |
| 110 | }while(*s); |
| 111 | return fnt; |
| 112 | } |
| 113 | |
| 114 | void |
| 115 | freefont(Font *f) |
| 116 | { |
| 117 | int i; |
| 118 | Cachefont *c; |
| 119 | Subfont *s; |
| 120 | |
| 121 | if(f == 0) |
| 122 | return; |
| 123 | |
| 124 | for(i=0; i<f->nsub; i++){ |
| 125 | c = f->sub[i]; |
| 126 | free(c->subfontname); |
| 127 | free(c->name); |
| 128 | free(c); |
| 129 | } |
| 130 | for(i=0; i<f->nsubf; i++){ |
| 131 | s = f->subf[i].f; |
| 132 | if(s && s!=display->defaultsubfont) |
| 133 | freesubfont(s); |
| 134 | } |
| 135 | freeimage(f->cacheimage); |
| 136 | free(f->name); |
| 137 | free(f->cache); |
| 138 | free(f->subf); |
| 139 | free(f->sub); |
| 140 | free(f); |
| 141 | } |
