123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127 |
- #include <u.h>
- #include <libc.h>
- #include <libg.h>
- #include <bio.h>
- static void usage(void);
- static void snarf(char *, int);
- static void choose(Fontchar *, Bitmap *, int, int, int);
- struct {
- char *name;
- Bitmap *bm;
- Subfont *sf;
- } ft[1024];
- int nf;
- void
- main(int argc, char **argv)
- {
- int i, errs;
- Fontchar *fc;
- Bitmap *b;
- int nc, ht, as;
- Subfont *f;
- binit(0, 0, "font merge");
- if(argc < 1)
- usage();
- nf = argc-1;
- for(i = 0; i < nf; i++)
- snarf(argv[i+1], i);
- nc = ft[0].sf->n;
- ht = ft[0].sf->height;
- as = ft[0].sf->ascent;
- errs = 0;
- for(i = 0; i < nf; i++){
- if(nc < ft[i].sf->n) nc = ft[i].sf->n;
- if(ht != ft[1].sf->height){
- fprint(2, "%s: %s.height=%d (!= %s.height=%d)\n", argv[0],
- ft[i].name, ft[i].sf->height, ft[0].name, ht);
- errs = 1;
- }
- if(as != ft[1].sf->ascent){
- fprint(2, "%s: %s.ascent=%d (!= %s.ascent=%d)\n", argv[0],
- ft[i].name, ft[i].sf->ascent, ft[0].name, ht);
- errs = 1;
- }
- }
- if(errs)
- exits("param mismatch");
- fc = (Fontchar *)malloc(nc*sizeof(Fontchar));
- b = balloc(Rect(0, 0, nc*64, ht), ft[0].bm->ldepth);
- if(b == 0 || fc == 0){
- fprint(2, "%s: couldn't malloc %d chars\n", argv0, nc);
- exits("out of memory");
- }
- bitblt(b, b->r.min, b, b->r, Zero);
- choose(fc, b, nc, ht, as);
- wrbitmapfile(1, b);
- bitblt(&screen, screen.r.min, b, b->r, S); bflush();sleep(5000);
- f = subfalloc(nc, ht, as, fc, b, ~0, ~0);
- wrsubfontfile(1, f);
- exits(0);
- }
- static void
- usage(void)
- {
- fprint(2, "Usage: %s file ...\n", argv0);
- exits("usage");
- }
- static void
- snarf(char *name, int i)
- {
- int fd;
- Bitmap *b;
- ft[i].name = name;
- if((fd = open(name, OREAD)) < 0){
- perror(name);
- exits("font read");
- }
- if((b = rdbitmapfile(fd)) == 0){
- fprint(2, "rdbitmapfile failed\n");
- exits("font read");
- }
- if((ft[i].bm = balloc(b->r, b->ldepth)) == 0){
- fprint(2, "ballocsnarf failed\n");
- exits("font read");
- }
- bitblt(ft[i].bm, b->r.min, b, b->r, S);
- if((ft[i].sf = rdsubfontfile(fd, b)) == 0){
- fprint(2, "rdsubfontfile failed\n");
- exits("font read");
- }
- close(fd);
- }
- static void
- choose(Fontchar *f, Bitmap *b, int nc, int ht, int as)
- {
- int j;
- Fontchar *info;
- int lastx = 0;
- int w, n;
- for(n = 0; n < nc; n++, f++){
- f->x = lastx;
- for(j = 0; j < nf; j++){
- if(n >= ft[j].sf->n)
- continue;
- info = ft[j].sf->info;
- if(info[n+1].x != info[n].x)
- goto found;
- }
- continue;
- found:
- f->left = info[n].left;
- f->top = info[n].top;
- f->bottom = info[n].bottom;
- f->width = info[n].width;
- w = info[n+1].x - info[n].x;
- bitblt(b, Pt(0, lastx), ft[j].bm, Rect(0, info[n].x, ht, info[n+1].x), S);
- lastx += w;
- }
- f->x = lastx;
- }
|