#include <stdlib.h>

#include "lx.h"

#include "proto.h"
#include "internal.h"

void lx_SetClipRectangles(LX_CONN *xc, LX_XID gc, int xo, int yo, int nrects, const LX_RECTANGLE *rects, LX_RECTORDER order)
{
 unsigned char *req;
 int reqlen;
 int po;
 int i;
 int o;
 const LX_RECTANGLE *r;

 if ( (xc->flags & XCF_FAIL) ||
      (xo < -32768) || (xo > 32767) ||
      (yo < -32768) || (yo > 32767) ||
      (nrects > ((65535-3)/2)) )
  { lx__bad_call(xc,"lx_SetClipRectangles");
    return;
  }
 lx__nochain(xc);
 po = lx__rectorder_to_proto(order);
 if (po < 0)
  { lx__bad_call(xc,"lx_SetClipRectangles");
    return;
  }
 reqlen = 3 + (2 * nrects);
 req = malloc(reqlen<<2);
 if (! req)
  { lx__nomem_fail(xc);
    return;
  }
 req[0] = XP_REQ_SetClipRectangles;
 req[1] = po;
 w_card16(&req[2],reqlen);
 w_card32(&req[4],gc);
 w_int16(&req[8],xo);
 w_int16(&req[10],yo);
 o = 12;
 for (i=0;i<nrects;i++)
  { r = &rects[i];
    if ( (r->x < -32768) || (r->x > 32767) ||
	 (r->y < -32768) || (r->y > 32767) ||
	 (r->w > 65535) || (r->h > 65535) )
     { free(req);
       lx__bad_call(xc,"lx_SetClipRectangles");
       return;
     }
    w_int16(&req[o],r->x);
    w_int16(&req[o+2],r->y);
    w_card16(&req[o+4],r->w);
    w_card16(&req[o+6],r->h);
    o += 8;
  }
 lx__send_req_free(xc,req,reqlen<<2);
}