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