tmerge.c - plan9port - [fork] Plan 9 from user space
  HTML git clone git://src.adamsgaard.dk/plan9port
   DIR Log
   DIR Files
   DIR Refs
   DIR README
   DIR LICENSE
       ---
       tmerge.c (2622B)
       ---
            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
           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
           66 usage(void)
           67 {
           68         fprint(2, "Usage: %s file ...\n", argv0);
           69         exits("usage");
           70 }
           71 
           72 static void
           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
          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 }