1*37da2899SCharles.Forsyth #include "lib9.h"
2*37da2899SCharles.Forsyth #include "draw.h"
3*37da2899SCharles.Forsyth #include "kernel.h"
4*37da2899SCharles.Forsyth
5*37da2899SCharles.Forsyth int
cloadimage(Image * i,Rectangle r,uchar * data,int ndata)6*37da2899SCharles.Forsyth cloadimage(Image *i, Rectangle r, uchar *data, int ndata)
7*37da2899SCharles.Forsyth {
8*37da2899SCharles.Forsyth int m, nb, miny, maxy, ncblock;
9*37da2899SCharles.Forsyth uchar *a;
10*37da2899SCharles.Forsyth
11*37da2899SCharles.Forsyth if(!rectinrect(r, i->r)){
12*37da2899SCharles.Forsyth werrstr("cloadimage: bad rectangle");
13*37da2899SCharles.Forsyth return -1;
14*37da2899SCharles.Forsyth }
15*37da2899SCharles.Forsyth
16*37da2899SCharles.Forsyth miny = r.min.y;
17*37da2899SCharles.Forsyth m = 0;
18*37da2899SCharles.Forsyth ncblock = _compblocksize(r, i->depth);
19*37da2899SCharles.Forsyth while(miny != r.max.y){
20*37da2899SCharles.Forsyth maxy = atoi((char*)data+0*12);
21*37da2899SCharles.Forsyth nb = atoi((char*)data+1*12);
22*37da2899SCharles.Forsyth if(maxy<=miny || r.max.y<maxy){
23*37da2899SCharles.Forsyth werrstr("creadimage: bad maxy %d", maxy);
24*37da2899SCharles.Forsyth return -1;
25*37da2899SCharles.Forsyth }
26*37da2899SCharles.Forsyth data += 2*12;
27*37da2899SCharles.Forsyth ndata -= 2*12;
28*37da2899SCharles.Forsyth m += 2*12;
29*37da2899SCharles.Forsyth if(nb<=0 || ncblock<nb || nb>ndata){
30*37da2899SCharles.Forsyth werrstr("creadimage: bad count %d", nb);
31*37da2899SCharles.Forsyth return -1;
32*37da2899SCharles.Forsyth }
33*37da2899SCharles.Forsyth a = bufimage(i->display, 21+nb);
34*37da2899SCharles.Forsyth if(a == nil)
35*37da2899SCharles.Forsyth return -1;
36*37da2899SCharles.Forsyth a[0] = 'Y';
37*37da2899SCharles.Forsyth BPLONG(a+1, i->id);
38*37da2899SCharles.Forsyth BPLONG(a+5, r.min.x);
39*37da2899SCharles.Forsyth BPLONG(a+9, miny);
40*37da2899SCharles.Forsyth BPLONG(a+13, r.max.x);
41*37da2899SCharles.Forsyth BPLONG(a+17, maxy);
42*37da2899SCharles.Forsyth memmove(a+21, data, nb);
43*37da2899SCharles.Forsyth miny = maxy;
44*37da2899SCharles.Forsyth data += nb;
45*37da2899SCharles.Forsyth ndata += nb;
46*37da2899SCharles.Forsyth m += nb;
47*37da2899SCharles.Forsyth }
48*37da2899SCharles.Forsyth return m;
49*37da2899SCharles.Forsyth }
50