www.pudn.com > xiaobo.zip.zip > bcw3.c

#include  
#include  
#include  
#include  
 
#define SHIFT(x)		((x)>>15) 
 
static void do_tdec_line(int * to,int *from,int len) 
{ 
int x,*ptr,*low,*high,half,A; 
 
	if ( len <= 2 ) errexit("special-cased to len > 2 , scumbag"); 
	if ( len&1 ) errexit("len shouldn't be odd"); 
 
	half = len>>1; 
 
	ptr = from; 
	low = to;	high = to + half; 
	for(x=0;x>1; 
 
	low = from;	high = from + half; 
	for(x=0;x> l; 
			h = height >> l; 
       
			/* Rows */ 
	 
			do_tdec_line(temprow,rows[h-1],w); 
			for (y = h-2; y >=0; y--) { 
				do_tdec_line(rows[y+1],rows[y],w); 
			} 
	 
			/* Columns */ 
	 
			for (x = 0; x < w; x++) { 
					for (y = 1; y < h; y++) buffer[y-1] = rows[y][x]; 
					buffer[h-1] = temprow[x]; 
				do_tdec_line(tempbuf,buffer,h); 
					for (y = 0; y < h; y++) rows[y][x] = tempbuf[y]; 
			} 
		} 
 
    } else { 
 
		for (l = levels-1; l >= 0; l--) { /** backwards in scale **/ 
			w = width >> l; 
			h = height >> l; 
 
			/* Columns */ 
	 
			for (x = 0; x < w; x++) { 
					for (y = 0; y < h; y++) buffer[y] = rows[y][x]; 
				un_tdec_line(tempbuf,buffer,h); 
					for (y = 0; y < h-1; y++) rows[y+1][x] = tempbuf[y]; 
					temprow[x] = tempbuf[h-1]; 
			} 
 
			/* Rows */ 
			for (y = 0; y < h-1; y++) { 
				un_tdec_line(rows[y],rows[y+1],w); 
			}  
			un_tdec_line(rows[h-1],temprow,w); 
		} 
	} 
 
	free(buffer); 
} 
 
 
void bcwQuad(int *band,int w,int h,int fullw,bool inverse) 
{ 
int x, y; 
int *buffer,*tempbuf,*bptr,*temprow; 
 
   	if ( (buffer = newarray(int,h+h+max(w,h))) == NULL ) { 
		errputs("malloc failed"); exit(10); 
	} 
	temprow = buffer+h; 
	tempbuf = buffer+h+h; 
   
	if ( !inverse ) { /* forward transform. */ 
	 
		bptr = band + (h-1)*fullw; 
		do_tdec_line(temprow,bptr,w); 
		for (y = (h-1); y--;) { 
			bptr -= fullw; 
			do_tdec_line(bptr+fullw,bptr,w); 
		} 
     
		for (x = 0; x < w; x++) { 
			bptr = band + x + fullw; 
			for (y = 0; y < (h-1); y++) { buffer[y] = *bptr; bptr += fullw; } 
			buffer[h-1] = temprow[x]; 
			do_tdec_line(tempbuf,buffer,h); 
			bptr = band + x; 
			for (y = 0; y < h; y++) { *bptr = tempbuf[y]; bptr += fullw; } 
		} 
 
    } else { 
 
		for (x = 0; x < w; x++) { 
			bptr = band + x; 
			for (y = 0; y < h; y++) { buffer[y] = *bptr; bptr += fullw; } 
			un_tdec_line(tempbuf,buffer,h); 
			bptr = band + x + fullw; 
			for (y = 0; y < h-1; y++) { *bptr = tempbuf[y]; bptr += fullw; } 
			temprow[x] = tempbuf[h-1]; 
		} 
 
		bptr = band; 
		for (y = (h-1); y--; ){ 
			un_tdec_line(bptr,bptr+fullw,w); 
			bptr += fullw; 
		} 
		un_tdec_line(bptr,temprow,w); 
 
	} 
 
	free(buffer); 
}