1 #include <u.h>
2 #include <libc.h>
3 #include <libg.h>
4 #include <bio.h>
5
6 static void usage(void);
7 static void snarf(char *, int);
8 static void choose(Fontchar *, Bitmap *, int, int, int);
9 struct {
10 char *name;
11 Bitmap *bm;
12 Subfont *sf;
13 } ft[1024];
14 int nf;
15
16 void
main(int argc,char ** argv)17 main(int argc, char **argv)
18 {
19 int i, errs;
20 Fontchar *fc;
21 Bitmap *b;
22 int nc, ht, as;
23 Subfont *f;
24
25 binit(0, 0, "font merge");
26 if(argc < 1)
27 usage();
28 nf = argc-1;
29 for(i = 0; i < nf; i++)
30 snarf(argv[i+1], i);
31 nc = ft[0].sf->n;
32 ht = ft[0].sf->height;
33 as = ft[0].sf->ascent;
34 errs = 0;
35 for(i = 0; i < nf; i++){
36 if(nc < ft[i].sf->n) nc = ft[i].sf->n;
37 if(ht != ft[1].sf->height){
38 fprint(2, "%s: %s.height=%d (!= %s.height=%d)\n", argv[0],
39 ft[i].name, ft[i].sf->height, ft[0].name, ht);
40 errs = 1;
41 }
42 if(as != ft[1].sf->ascent){
43 fprint(2, "%s: %s.ascent=%d (!= %s.ascent=%d)\n", argv[0],
44 ft[i].name, ft[i].sf->ascent, ft[0].name, ht);
45 errs = 1;
46 }
47 }
48 if(errs)
49 exits("param mismatch");
50 fc = (Fontchar *)malloc(nc*sizeof(Fontchar));
51 b = balloc(Rect(0, 0, nc*64, ht), ft[0].bm->ldepth);
52 if(b == 0 || fc == 0){
53 fprint(2, "%s: couldn't malloc %d chars\n", argv0, nc);
54 exits("out of memory");
55 }
56 bitblt(b, b->r.min, b, b->r, Zero);
57 choose(fc, b, nc, ht, as);
58 wrbitmapfile(1, b);
59 bitblt(&screen, screen.r.min, b, b->r, S); bflush();sleep(5000);
60 f = subfalloc(nc, ht, as, fc, b, ~0, ~0);
61 wrsubfontfile(1, f);
62 exits(0);
63 }
64
65 static void
usage(void)66 usage(void)
67 {
68 fprint(2, "Usage: %s file ...\n", argv0);
69 exits("usage");
70 }
71
72 static void
snarf(char * name,int i)73 snarf(char *name, int i)
74 {
75 int fd;
76 Bitmap *b;
77
78 ft[i].name = name;
79 if((fd = open(name, OREAD)) < 0){
80 perror(name);
81 exits("font read");
82 }
83 if((b = rdbitmapfile(fd)) == 0){
84 fprint(2, "rdbitmapfile failed\n");
85 exits("font read");
86 }
87 if((ft[i].bm = balloc(b->r, b->ldepth)) == 0){
88 fprint(2, "ballocsnarf failed\n");
89 exits("font read");
90 }
91 bitblt(ft[i].bm, b->r.min, b, b->r, S);
92 if((ft[i].sf = rdsubfontfile(fd, b)) == 0){
93 fprint(2, "rdsubfontfile failed\n");
94 exits("font read");
95 }
96 close(fd);
97 }
98
99 static void
choose(Fontchar * f,Bitmap * b,int nc,int ht,int as)100 choose(Fontchar *f, Bitmap *b, int nc, int ht, int as)
101 {
102 int j;
103 Fontchar *info;
104 int lastx = 0;
105 int w, n;
106
107 for(n = 0; n < nc; n++, f++){
108 f->x = lastx;
109 for(j = 0; j < nf; j++){
110 if(n >= ft[j].sf->n)
111 continue;
112 info = ft[j].sf->info;
113 if(info[n+1].x != info[n].x)
114 goto found;
115 }
116 continue;
117 found:
118 f->left = info[n].left;
119 f->top = info[n].top;
120 f->bottom = info[n].bottom;
121 f->width = info[n].width;
122 w = info[n+1].x - info[n].x;
123 bitblt(b, Pt(0, lastx), ft[j].bm, Rect(0, info[n].x, ht, info[n+1].x), S);
124 lastx += w;
125 }
126 f->x = lastx;
127 }
128