1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677 |
- /*
- * This file is part of the UCB release of Plan 9. It is subject to the license
- * terms in the LICENSE file found in the top-level directory of this
- * distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No
- * part of the UCB release of Plan 9, including this file, may be copied,
- * modified, propagated, or distributed except according to the terms contained
- * in the LICENSE file.
- */
- #include <u.h>
- #include <libc.h>
- #include <draw.h>
- #include <memdraw.h>
- int
- cloadmemimage(Memimage *i, Rectangle r, uint8_t *data, int ndata)
- {
- int y, bpl, c, cnt, offs;
- uint8_t mem[NMEM], *memp, *omemp, *emem, *linep, *elinep, *u, *eu;
- if(!rectinrect(r, i->r))
- return -1;
- bpl = bytesperline(r, i->depth);
- u = data;
- eu = data+ndata;
- memp = mem;
- emem = mem+NMEM;
- y = r.min.y;
- linep = byteaddr(i, Pt(r.min.x, y));
- elinep = linep+bpl;
- for(;;){
- if(linep == elinep){
- if(++y == r.max.y)
- break;
- linep = byteaddr(i, Pt(r.min.x, y));
- elinep = linep+bpl;
- }
- if(u == eu){ /* buffer too small */
- return -1;
- }
- c = *u++;
- if(c >= 128){
- for(cnt=c-128+1; cnt!=0 ;--cnt){
- if(u == eu){ /* buffer too small */
- return -1;
- }
- if(linep == elinep){ /* phase error */
- return -1;
- }
- *linep++ = *u;
- *memp++ = *u++;
- if(memp == emem)
- memp = mem;
- }
- }
- else{
- if(u == eu) /* short buffer */
- return -1;
- offs = *u++ + ((c&3)<<8)+1;
- if(memp-mem < offs)
- omemp = memp+(NMEM-offs);
- else
- omemp = memp-offs;
- for(cnt=(c>>2)+NMATCH; cnt!=0; --cnt){
- if(linep == elinep) /* phase error */
- return -1;
- *linep++ = *omemp;
- *memp++ = *omemp++;
- if(omemp == emem)
- omemp = mem;
- if(memp == emem)
- memp = mem;
- }
- }
- }
- return u-data;
- }
|