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