ref: 6dce09cec3bf6a689fa9a3f838df67d7d48d9d1a
dir: /libdraw/readimage.c/
#include "lib9.h" #include "kernel.h" #include "draw.h" Image* readimage(Display *d, int fd, int dolock) { char hdr[5*12+1]; int dy; int new; uint l, n; int m, j, chunk; int miny, maxy; Rectangle r; int ldepth; u32 chan; uchar *tmp; Image *i; if(libreadn(fd, hdr, 11) != 11) { kwerrstr("readimage: short header"); return nil; } if(memcmp(hdr, "compressed\n", 11) == 0) return creadimage(d, fd, dolock); dolock &= 1; if(libreadn(fd, hdr+11, 5*12-11) != 5*12-11) { kwerrstr("readimage: short header"); return nil; } chunk = d->bufsize - 32; /* a little room for header */ /* * distinguish new channel descriptor from old ldepth. * channel descriptors have letters as well as numbers, * while ldepths are a single digit formatted as %-11d. */ new = 0; for(m=0; m<10; m++){ if(hdr[m] != ' '){ new = 1; break; } } if(hdr[11] != ' '){ kwerrstr("readimage: bad format"); return nil; } if(new){ hdr[11] = '\0'; if((chan = strtochan(hdr)) == 0){ kwerrstr("readimage: bad channel string %s", hdr); return nil; } }else{ ldepth = ((int)hdr[10])-'0'; if(ldepth<0 || ldepth>3){ kwerrstr("readimage: bad ldepth %d", ldepth); return nil; } chan = drawld2chan[ldepth]; } r.min.x = atoi(hdr+1*12); r.min.y = atoi(hdr+2*12); r.max.x = atoi(hdr+3*12); r.max.y = atoi(hdr+4*12); if(r.min.x>r.max.x || r.min.y>r.max.y){ kwerrstr("readimage: bad rectangle"); return nil; } miny = r.min.y; maxy = r.max.y; l = bytesperline(r, chantodepth(chan)); if(dolock) dolock = lockdisplay(d); i = allocimage(d, r, chan, 0, -1); if(dolock) unlockdisplay(d); if(i == nil) return nil; tmp = malloc(chunk); if(tmp == nil) goto Err; while(maxy > miny){ dy = maxy - miny; if(dy*l > chunk) dy = chunk/l; if(dy <= 0){ kwerrstr("readimage: image too wide for buffer"); goto Err; } n = dy*l; m = libreadn(fd, tmp, n); if(m != n){ kwerrstr("readimage: read count %d not %d: %r", m, n); Err: if(dolock) lockdisplay(d); Err1: freeimage(i); if(dolock) unlockdisplay(d); free(tmp); return nil; } if(!new) /* an old image: must flip all the bits */ for(j=0; j<chunk; j++) tmp[j] ^= 0xFF; if(dolock) lockdisplay(d); if(loadimage(i, Rect(r.min.x, miny, r.max.x, miny+dy), tmp, chunk) <= 0) goto Err1; if(dolock) unlockdisplay(d); miny += dy; } free(tmp); return i; }