1*37da2899SCharles.Forsyth #include "lib9.h"
2*37da2899SCharles.Forsyth #include "draw.h"
3*37da2899SCharles.Forsyth #include "memdraw.h"
4*37da2899SCharles.Forsyth
5*37da2899SCharles.Forsyth Memsubfont*
getmemdefont(void)6*37da2899SCharles.Forsyth getmemdefont(void)
7*37da2899SCharles.Forsyth {
8*37da2899SCharles.Forsyth char *hdr, *p;
9*37da2899SCharles.Forsyth int n;
10*37da2899SCharles.Forsyth Fontchar *fc;
11*37da2899SCharles.Forsyth Memsubfont *f;
12*37da2899SCharles.Forsyth int ld;
13*37da2899SCharles.Forsyth Rectangle r;
14*37da2899SCharles.Forsyth Memdata *md;
15*37da2899SCharles.Forsyth Memimage *i;
16*37da2899SCharles.Forsyth
17*37da2899SCharles.Forsyth /*
18*37da2899SCharles.Forsyth * make sure data is word-aligned. this is true with Plan 9 compilers
19*37da2899SCharles.Forsyth * but not in general. the byte order is right because the data is
20*37da2899SCharles.Forsyth * declared as char*, not ulong*.
21*37da2899SCharles.Forsyth */
22*37da2899SCharles.Forsyth p = (char*)defontdata;
23*37da2899SCharles.Forsyth n = (ulong)p & 3;
24*37da2899SCharles.Forsyth if(n != 0){
25*37da2899SCharles.Forsyth memmove(p+(4-n), p, sizeofdefont-n);
26*37da2899SCharles.Forsyth p += 4-n;
27*37da2899SCharles.Forsyth }
28*37da2899SCharles.Forsyth ld = atoi(p+0*12);
29*37da2899SCharles.Forsyth r.min.x = atoi(p+1*12);
30*37da2899SCharles.Forsyth r.min.y = atoi(p+2*12);
31*37da2899SCharles.Forsyth r.max.x = atoi(p+3*12);
32*37da2899SCharles.Forsyth r.max.y = atoi(p+4*12);
33*37da2899SCharles.Forsyth
34*37da2899SCharles.Forsyth md = mallocz(sizeof(Memdata), 1);
35*37da2899SCharles.Forsyth if(md == nil)
36*37da2899SCharles.Forsyth return nil;
37*37da2899SCharles.Forsyth
38*37da2899SCharles.Forsyth p += 5*12;
39*37da2899SCharles.Forsyth
40*37da2899SCharles.Forsyth md->base = nil; /* so freememimage doesn't free p */
41*37da2899SCharles.Forsyth md->bdata = (uchar*)p; /* ick */
42*37da2899SCharles.Forsyth md->ref = 1;
43*37da2899SCharles.Forsyth md->allocd = 1; /* so freememimage does free md */
44*37da2899SCharles.Forsyth
45*37da2899SCharles.Forsyth i = allocmemimaged(r, drawld2chan[ld], md);
46*37da2899SCharles.Forsyth if(i == nil){
47*37da2899SCharles.Forsyth free(md);
48*37da2899SCharles.Forsyth return nil;
49*37da2899SCharles.Forsyth }
50*37da2899SCharles.Forsyth
51*37da2899SCharles.Forsyth hdr = p+Dy(r)*i->width*sizeof(ulong);
52*37da2899SCharles.Forsyth n = atoi(hdr);
53*37da2899SCharles.Forsyth p = hdr+3*12;
54*37da2899SCharles.Forsyth fc = malloc(sizeof(Fontchar)*(n+1));
55*37da2899SCharles.Forsyth if(fc == 0){
56*37da2899SCharles.Forsyth freememimage(i);
57*37da2899SCharles.Forsyth return 0;
58*37da2899SCharles.Forsyth }
59*37da2899SCharles.Forsyth _unpackinfo(fc, (uchar*)p, n);
60*37da2899SCharles.Forsyth f = allocmemsubfont("*default*", n, atoi(hdr+12), atoi(hdr+24), fc, i);
61*37da2899SCharles.Forsyth if(f == 0){
62*37da2899SCharles.Forsyth freememimage(i);
63*37da2899SCharles.Forsyth free(fc);
64*37da2899SCharles.Forsyth return 0;
65*37da2899SCharles.Forsyth }
66*37da2899SCharles.Forsyth return f;
67*37da2899SCharles.Forsyth }
68