1*7dd7cddfSDavid du Colombier #include <u.h>
2*7dd7cddfSDavid du Colombier #include <libc.h>
3*7dd7cddfSDavid du Colombier #include <libg.h>
4*7dd7cddfSDavid du Colombier #include <bio.h>
5*7dd7cddfSDavid du Colombier #include "hdr.h"
6*7dd7cddfSDavid du Colombier
7*7dd7cddfSDavid du Colombier /* quwei encoding for gb */
8*7dd7cddfSDavid du Colombier
9*7dd7cddfSDavid du Colombier Bitmap *
qreadbits(char * file,int n,long * chars,int size,uchar * bits,int ** doneptr)10*7dd7cddfSDavid du Colombier qreadbits(char *file, int n, long *chars, int size, uchar *bits, int **doneptr)
11*7dd7cddfSDavid du Colombier {
12*7dd7cddfSDavid du Colombier Bitmap *bm;
13*7dd7cddfSDavid du Colombier Biobuf *bf;
14*7dd7cddfSDavid du Colombier char *p;
15*7dd7cddfSDavid du Colombier long kmin, kmax;
16*7dd7cddfSDavid du Colombier int i, j, byt;
17*7dd7cddfSDavid du Colombier int nch;
18*7dd7cddfSDavid du Colombier long c;
19*7dd7cddfSDavid du Colombier uchar *b;
20*7dd7cddfSDavid du Colombier int *done;
21*7dd7cddfSDavid du Colombier uchar *nbits;
22*7dd7cddfSDavid du Colombier static int dig[256] = {
23*7dd7cddfSDavid du Colombier ['0'] 0, ['1'] 1, ['2'] 2, ['3'] 3, ['4'] 4, ['5'] 5, ['6'] 6, ['7'] 7,
24*7dd7cddfSDavid du Colombier ['8'] 8, ['9'] 9, ['a'] 10, ['b'] 11, ['c'] 12, ['d'] 13, ['e'] 14, ['f'] 15,
25*7dd7cddfSDavid du Colombier };
26*7dd7cddfSDavid du Colombier
27*7dd7cddfSDavid du Colombier bf = Bopen(file, OREAD);
28*7dd7cddfSDavid du Colombier if(bf == 0){
29*7dd7cddfSDavid du Colombier fprint(2, "%s: %s: %r\n", argv0, file);
30*7dd7cddfSDavid du Colombier exits("bitfile open error");
31*7dd7cddfSDavid du Colombier }
32*7dd7cddfSDavid du Colombier done = (int *)malloc(n*sizeof(done[0]));
33*7dd7cddfSDavid du Colombier if(done == 0){
34*7dd7cddfSDavid du Colombier fprint(2, "%s: malloc error (%d bytes)\n", argv0, n);
35*7dd7cddfSDavid du Colombier exits("malloc error");
36*7dd7cddfSDavid du Colombier }
37*7dd7cddfSDavid du Colombier *doneptr = done;
38*7dd7cddfSDavid du Colombier memset(done, 0, n*sizeof(done[0]));
39*7dd7cddfSDavid du Colombier kmin = 65536;
40*7dd7cddfSDavid du Colombier kmax = 0;
41*7dd7cddfSDavid du Colombier for(i = 0; i < n; i++){
42*7dd7cddfSDavid du Colombier c = chars[i];
43*7dd7cddfSDavid du Colombier if(kmin > c)
44*7dd7cddfSDavid du Colombier kmin = c;
45*7dd7cddfSDavid du Colombier if(kmax < c)
46*7dd7cddfSDavid du Colombier kmax = c;
47*7dd7cddfSDavid du Colombier }
48*7dd7cddfSDavid du Colombier nch = 0;
49*7dd7cddfSDavid du Colombier byt = size/8;
50*7dd7cddfSDavid du Colombier while(p = (char *)Brdline(bf, '\n')){
51*7dd7cddfSDavid du Colombier c = (p[0]-'0')*1000 + (p[1]-'0')*100 + (p[2]-'0')*10 + (p[3]-'0');
52*7dd7cddfSDavid du Colombier if((c < kmin) || (c > kmax))
53*7dd7cddfSDavid du Colombier continue;
54*7dd7cddfSDavid du Colombier for(i = 0; i < n; i++)
55*7dd7cddfSDavid du Colombier if(c == chars[i]){
56*7dd7cddfSDavid du Colombier nch++;
57*7dd7cddfSDavid du Colombier done[i] = 1;
58*7dd7cddfSDavid du Colombier p += 5;
59*7dd7cddfSDavid du Colombier b = bits + i*byt;
60*7dd7cddfSDavid du Colombier for(i = 0; i < size; i++){ /* rows */
61*7dd7cddfSDavid du Colombier for(j = 0; j < byt; j++){
62*7dd7cddfSDavid du Colombier *b++ = (dig[*p]<<4) | dig[p[1]];
63*7dd7cddfSDavid du Colombier p += 2;
64*7dd7cddfSDavid du Colombier }
65*7dd7cddfSDavid du Colombier b += (n-1)*byt;
66*7dd7cddfSDavid du Colombier }
67*7dd7cddfSDavid du Colombier break;
68*7dd7cddfSDavid du Colombier }
69*7dd7cddfSDavid du Colombier }
70*7dd7cddfSDavid du Colombier nbits = (uchar *)malloc(nch*byt*size);
71*7dd7cddfSDavid du Colombier if(nbits == 0){
72*7dd7cddfSDavid du Colombier fprint(2, "%s: malloc error (%d bytes)\n", argv0, nch*byt);
73*7dd7cddfSDavid du Colombier exits("malloc error");
74*7dd7cddfSDavid du Colombier }
75*7dd7cddfSDavid du Colombier c = 0;
76*7dd7cddfSDavid du Colombier for(i = 0; i < n; i++)
77*7dd7cddfSDavid du Colombier if(done[i]){
78*7dd7cddfSDavid du Colombier for(j = 0; j < size; j++)
79*7dd7cddfSDavid du Colombier memmove(nbits+c*byt+j*nch*byt, bits+i*byt+j*n*byt, byt);
80*7dd7cddfSDavid du Colombier c++;
81*7dd7cddfSDavid du Colombier }
82*7dd7cddfSDavid du Colombier bm = balloc((Rectangle){(Point){0, 0}, (Point){nch*size, size}}, 0);
83*7dd7cddfSDavid du Colombier if(bm == 0){
84*7dd7cddfSDavid du Colombier fprint(2, "%s: balloc failure\n", argv0);
85*7dd7cddfSDavid du Colombier exits("balloc failure");
86*7dd7cddfSDavid du Colombier }
87*7dd7cddfSDavid du Colombier wrbitmap(bm, 0, size, nbits);
88*7dd7cddfSDavid du Colombier for(i = 0; i < n; i++)
89*7dd7cddfSDavid du Colombier if(done[i] == 0){
90*7dd7cddfSDavid du Colombier /*fprint(2, "char 0x%x (%d) not found\n", chars[i], chars[i]);/**/
91*7dd7cddfSDavid du Colombier }
92*7dd7cddfSDavid du Colombier return(bm);
93*7dd7cddfSDavid du Colombier }
94