1 76193d7c 2003-09-30 devnull #include <u.h>
2 76193d7c 2003-09-30 devnull #include <libc.h>
3 76193d7c 2003-09-30 devnull #include <draw.h>
5 161060a4 2003-10-11 devnull extern vlong _drawflength(int);
6 9b4a2324 2009-07-09 rsc int _fontpipe(char*);
9 213fc4f6 2015-02-17 rsc parsefontscale(char *name, char **base)
16 213fc4f6 2015-02-17 rsc while('0' <= *p && *p <= '9') {
17 213fc4f6 2015-02-17 rsc scale = scale*10 + *p - '0';
20 213fc4f6 2015-02-17 rsc if(*p == '*' && scale > 0)
23 213fc4f6 2015-02-17 rsc *base = name;
26 213fc4f6 2015-02-17 rsc return scale;
30 213fc4f6 2015-02-17 rsc openfont1(Display *d, char *name)
32 76193d7c 2003-09-30 devnull Font *fnt;
33 77f23268 2015-02-17 rsc int fd, i, n, scale;
34 dc2a17b9 2018-03-27 0intro char *buf, *nambuf, *nambuf0, *fname, *freename;
36 e6f4b2e3 2003-10-13 devnull nambuf = 0;
37 213fc4f6 2015-02-17 rsc freename = nil;
38 213fc4f6 2015-02-17 rsc scale = parsefontscale(name, &fname);
40 213fc4f6 2015-02-17 rsc fd = open(fname, OREAD);
41 213fc4f6 2015-02-17 rsc if(fd < 0 && strncmp(fname, "/lib/font/bit/", 14) == 0){
42 213fc4f6 2015-02-17 rsc nambuf = smprint("#9/font/%s", fname+14);
43 e6f4b2e3 2003-10-13 devnull if(nambuf == nil)
44 e6f4b2e3 2003-10-13 devnull return 0;
45 03a8ec73 2018-03-27 0intro nambuf0 = unsharp(nambuf);
46 dc2a17b9 2018-03-27 0intro if(nambuf0 != nambuf)
47 dc2a17b9 2018-03-27 0intro free(nambuf);
48 dc2a17b9 2018-03-27 0intro nambuf = nambuf0;
49 8ad51794 2004-03-25 devnull if(nambuf == nil)
50 8ad51794 2004-03-25 devnull return 0;
51 e6f4b2e3 2003-10-13 devnull if((fd = open(nambuf, OREAD)) < 0){
52 e6f4b2e3 2003-10-13 devnull free(nambuf);
53 e6f4b2e3 2003-10-13 devnull return 0;
55 213fc4f6 2015-02-17 rsc if(scale > 1) {
56 dc2a17b9 2018-03-27 0intro name = smprint("%d*%s", scale, nambuf);
57 213fc4f6 2015-02-17 rsc freename = name;
59 dc2a17b9 2018-03-27 0intro name = nambuf;
63 9b4a2324 2009-07-09 rsc n = _drawflength(fd);
64 213fc4f6 2015-02-17 rsc if(fd < 0 && strncmp(fname, "/mnt/font/", 10) == 0) {
65 213fc4f6 2015-02-17 rsc fd = _fontpipe(fname+10);
66 775cb933 2015-08-27 rsc n = 128*1024;
68 dc2a17b9 2018-03-27 0intro if(fd < 0){
69 dc2a17b9 2018-03-27 0intro free(nambuf);
70 dc2a17b9 2018-03-27 0intro free(freename);
71 76193d7c 2003-09-30 devnull return 0;
74 76193d7c 2003-09-30 devnull buf = malloc(n+1);
75 76193d7c 2003-09-30 devnull if(buf == 0){
76 76193d7c 2003-09-30 devnull close(fd);
77 e6f4b2e3 2003-10-13 devnull free(nambuf);
78 dc2a17b9 2018-03-27 0intro free(freename);
79 76193d7c 2003-09-30 devnull return 0;
81 9b4a2324 2009-07-09 rsc i = readn(fd, buf, n);
82 76193d7c 2003-09-30 devnull close(fd);
84 76193d7c 2003-09-30 devnull free(buf);
85 e6f4b2e3 2003-10-13 devnull free(nambuf);
86 dc2a17b9 2018-03-27 0intro free(freename);
87 76193d7c 2003-09-30 devnull return 0;
90 76193d7c 2003-09-30 devnull fnt = buildfont(d, buf, name);
91 76193d7c 2003-09-30 devnull free(buf);
92 e6f4b2e3 2003-10-13 devnull free(nambuf);
93 213fc4f6 2015-02-17 rsc free(freename);
94 77f23268 2015-02-17 rsc if(scale != 1) {
95 77f23268 2015-02-17 rsc fnt->scale = scale;
96 77f23268 2015-02-17 rsc fnt->height *= scale;
97 77f23268 2015-02-17 rsc fnt->ascent *= scale;
98 77f23268 2015-02-17 rsc fnt->width *= scale;
100 76193d7c 2003-09-30 devnull return fnt;
104 213fc4f6 2015-02-17 rsc swapfont(Font *targ, Font **oldp, Font **newp)
106 213fc4f6 2015-02-17 rsc Font f, *old, *new;
108 213fc4f6 2015-02-17 rsc if(targ != *oldp)
109 213fc4f6 2015-02-17 rsc sysfatal("bad swapfont %p %p %p", targ, *oldp, *newp);
111 213fc4f6 2015-02-17 rsc old = *oldp;
112 213fc4f6 2015-02-17 rsc new = *newp;
114 213fc4f6 2015-02-17 rsc f.name = old->name;
115 213fc4f6 2015-02-17 rsc f.display = old->display;
116 213fc4f6 2015-02-17 rsc f.height = old->height;
117 213fc4f6 2015-02-17 rsc f.ascent = old->ascent;
118 213fc4f6 2015-02-17 rsc f.width = old->width;
119 213fc4f6 2015-02-17 rsc f.nsub = old->nsub;
120 213fc4f6 2015-02-17 rsc f.age = old->age;
121 213fc4f6 2015-02-17 rsc f.maxdepth = old->maxdepth;
122 213fc4f6 2015-02-17 rsc f.ncache = old->ncache;
123 213fc4f6 2015-02-17 rsc f.nsubf = old->nsubf;
124 213fc4f6 2015-02-17 rsc f.scale = old->scale;
125 213fc4f6 2015-02-17 rsc f.cache = old->cache;
126 213fc4f6 2015-02-17 rsc f.subf = old->subf;
127 213fc4f6 2015-02-17 rsc f.sub = old->sub;
128 213fc4f6 2015-02-17 rsc f.cacheimage = old->cacheimage;
130 213fc4f6 2015-02-17 rsc old->name = new->name;
131 213fc4f6 2015-02-17 rsc old->display = new->display;
132 213fc4f6 2015-02-17 rsc old->height = new->height;
133 213fc4f6 2015-02-17 rsc old->ascent = new->ascent;
134 213fc4f6 2015-02-17 rsc old->width = new->width;
135 213fc4f6 2015-02-17 rsc old->nsub = new->nsub;
136 213fc4f6 2015-02-17 rsc old->age = new->age;
137 213fc4f6 2015-02-17 rsc old->maxdepth = new->maxdepth;
138 213fc4f6 2015-02-17 rsc old->ncache = new->ncache;
139 213fc4f6 2015-02-17 rsc old->nsubf = new->nsubf;
140 213fc4f6 2015-02-17 rsc old->scale = new->scale;
141 213fc4f6 2015-02-17 rsc old->cache = new->cache;
142 213fc4f6 2015-02-17 rsc old->subf = new->subf;
143 213fc4f6 2015-02-17 rsc old->sub = new->sub;
144 213fc4f6 2015-02-17 rsc old->cacheimage = new->cacheimage;
146 213fc4f6 2015-02-17 rsc new->name = f.name;
147 213fc4f6 2015-02-17 rsc new->display = f.display;
148 213fc4f6 2015-02-17 rsc new->height = f.height;
149 213fc4f6 2015-02-17 rsc new->ascent = f.ascent;
150 213fc4f6 2015-02-17 rsc new->width = f.width;
151 213fc4f6 2015-02-17 rsc new->nsub = f.nsub;
152 213fc4f6 2015-02-17 rsc new->age = f.age;
153 213fc4f6 2015-02-17 rsc new->maxdepth = f.maxdepth;
154 213fc4f6 2015-02-17 rsc new->ncache = f.ncache;
155 213fc4f6 2015-02-17 rsc new->nsubf = f.nsubf;
156 213fc4f6 2015-02-17 rsc new->scale = f.scale;
157 213fc4f6 2015-02-17 rsc new->cache = f.cache;
158 213fc4f6 2015-02-17 rsc new->subf = f.subf;
159 213fc4f6 2015-02-17 rsc new->sub = f.sub;
160 213fc4f6 2015-02-17 rsc new->cacheimage = f.cacheimage;
162 213fc4f6 2015-02-17 rsc *oldp = new;
163 213fc4f6 2015-02-17 rsc *newp = old;
166 79555a99 2015-02-17 rsc static char*
167 79555a99 2015-02-17 rsc hidpiname(Font *f)
169 79555a99 2015-02-17 rsc char *p, *q;
172 79555a99 2015-02-17 rsc // If font name has form x,y return y.
173 79555a99 2015-02-17 rsc p = strchr(f->namespec, ',');
174 79555a99 2015-02-17 rsc if(p != nil)
175 79555a99 2015-02-17 rsc return strdup(p+1);
177 79555a99 2015-02-17 rsc // If font name is /mnt/font/Name/Size/font, scale Size.
178 79555a99 2015-02-17 rsc if(strncmp(f->name, "/mnt/font/", 10) == 0) {
179 79555a99 2015-02-17 rsc p = strchr(f->name+10, '/');
180 79555a99 2015-02-17 rsc if(p == nil || *++p < '0' || *p > '9')
184 79555a99 2015-02-17 rsc while('0' <= *q && *q <= '9')
185 79555a99 2015-02-17 rsc size = size*10 + *q++ - '0';
186 79555a99 2015-02-17 rsc return smprint("%.*s%d%s", utfnlen(f->name, p-f->name), f->name, size*2, q);
189 79555a99 2015-02-17 rsc // Otherwise use pixel doubling.
191 79555a99 2015-02-17 rsc return smprint("%d*%s", f->scale*2, f->name);
195 213fc4f6 2015-02-17 rsc loadhidpi(Font *f)
200 213fc4f6 2015-02-17 rsc if(f->hidpi == f)
202 213fc4f6 2015-02-17 rsc if(f->hidpi != nil) {
203 213fc4f6 2015-02-17 rsc swapfont(f, &f->lodpi, &f->hidpi);
207 79555a99 2015-02-17 rsc name = hidpiname(f);
208 213fc4f6 2015-02-17 rsc fnew = openfont1(f->display, name);
209 213fc4f6 2015-02-17 rsc if(fnew == nil)
211 213fc4f6 2015-02-17 rsc f->hidpi = fnew;
214 213fc4f6 2015-02-17 rsc swapfont(f, &f->lodpi, &f->hidpi);
218 213fc4f6 2015-02-17 rsc openfont(Display *d, char *name)
222 79555a99 2015-02-17 rsc char *namespec;
224 79555a99 2015-02-17 rsc // If font name has form x,y use x for lodpi, y for hidpi.
225 79555a99 2015-02-17 rsc name = strdup(name);
226 79555a99 2015-02-17 rsc namespec = strdup(name);
227 79555a99 2015-02-17 rsc if((p = strchr(name, ',')) != nil)
230 213fc4f6 2015-02-17 rsc f = openfont1(d, name);
233 213fc4f6 2015-02-17 rsc f->lodpi = f;
234 dc2a17b9 2018-03-27 0intro free(f->namespec);
235 79555a99 2015-02-17 rsc f->namespec = namespec;
237 213fc4f6 2015-02-17 rsc /* add to display list for when dpi changes */
238 213fc4f6 2015-02-17 rsc /* d can be nil when invoked from mc. */
239 213fc4f6 2015-02-17 rsc if(d != nil) {
240 213fc4f6 2015-02-17 rsc f->ondisplaylist = 1;
241 213fc4f6 2015-02-17 rsc f->prev = d->lastfont;
242 213fc4f6 2015-02-17 rsc f->next = nil;
244 213fc4f6 2015-02-17 rsc f->prev->next = f;
246 213fc4f6 2015-02-17 rsc d->firstfont = f;
247 213fc4f6 2015-02-17 rsc d->lastfont = f;
249 213fc4f6 2015-02-17 rsc /* if this is a hi-dpi display, find hi-dpi version and swap */
250 213fc4f6 2015-02-17 rsc if(d->dpi >= DefaultDPI*3/2)
251 213fc4f6 2015-02-17 rsc loadhidpi(f);
260 9b4a2324 2009-07-09 rsc _fontpipe(char *name)
264 9b4a2324 2009-07-09 rsc char buf[1024], *argv[10];
265 9b4a2324 2009-07-09 rsc int nbuf, pid;
267 9b4a2324 2009-07-09 rsc if(pipe(p) < 0)
269 9b4a2324 2009-07-09 rsc pid = rfork(RFNOWAIT|RFFDG|RFPROC);
270 9b4a2324 2009-07-09 rsc if(pid < 0) {
271 9b4a2324 2009-07-09 rsc close(p[0]);
272 9b4a2324 2009-07-09 rsc close(p[1]);
275 9b4a2324 2009-07-09 rsc if(pid == 0) {
276 9b4a2324 2009-07-09 rsc close(p[0]);
277 9b4a2324 2009-07-09 rsc dup(p[1], 1);
278 9b4a2324 2009-07-09 rsc dup(p[1], 2);
279 9b4a2324 2009-07-09 rsc if(p[1] > 2)
280 9b4a2324 2009-07-09 rsc close(p[1]);
281 9b4a2324 2009-07-09 rsc argv[0] = "fontsrv";
282 9b4a2324 2009-07-09 rsc argv[1] = "-pp";
283 9b4a2324 2009-07-09 rsc argv[2] = name;
284 9b4a2324 2009-07-09 rsc argv[3] = nil;
285 9b4a2324 2009-07-09 rsc execvp("fontsrv", argv);
286 9b4a2324 2009-07-09 rsc print("exec fontsrv: %r\n");
289 9b4a2324 2009-07-09 rsc close(p[1]);
291 9b4a2324 2009-07-09 rsc // success marked with leading \001.
292 9b4a2324 2009-07-09 rsc // otherwise an error happened.
293 9b4a2324 2009-07-09 rsc for(nbuf=0; nbuf<sizeof buf-1; nbuf++) {
294 9b4a2324 2009-07-09 rsc if(read(p[0], &c, 1) < 1 || c == '\n') {
295 9b4a2324 2009-07-09 rsc buf[nbuf] = '\0';
296 9b4a2324 2009-07-09 rsc werrstr(buf);
297 9b4a2324 2009-07-09 rsc close(p[0]);
300 9b4a2324 2009-07-09 rsc if(c == '\001')
303 9b4a2324 2009-07-09 rsc return p[0];
