⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 truecolorto8bitview.cpp

📁 这个是基于混沌的DES加密算法应用与图象加密
💻 CPP
📖 第 1 页 / 共 3 页
字号:
	0x00400000L, 0x20004000L, 0x20000000L, 0x00004010L,
	0x20000010L, 0x20404010L, 0x00404000L, 0x20400000L,
	0x00404010L, 0x20404000L, 0x00000000L, 0x20400010L,
	0x00000010L, 0x00004000L, 0x20400000L, 0x00404010L,
	0x00004000L, 0x00400010L, 0x20004010L, 0x00000000L,
	0x20404000L, 0x20000000L, 0x00400010L, 0x20004010L };

static unsigned long SP7[64] = {
	0x00200000L, 0x04200002L, 0x04000802L, 0x00000000L,
	0x00000800L, 0x04000802L, 0x00200802L, 0x04200800L,
	0x04200802L, 0x00200000L, 0x00000000L, 0x04000002L,
	0x00000002L, 0x04000000L, 0x04200002L, 0x00000802L,
	0x04000800L, 0x00200802L, 0x00200002L, 0x04000800L,
	0x04000002L, 0x04200000L, 0x04200800L, 0x00200002L,
	0x04200000L, 0x00000800L, 0x00000802L, 0x04200802L,
	0x00200800L, 0x00000002L, 0x04000000L, 0x00200800L,
	0x04000000L, 0x00200800L, 0x00200000L, 0x04000802L,
	0x04000802L, 0x04200002L, 0x04200002L, 0x00000002L,
	0x00200002L, 0x04000000L, 0x04000800L, 0x00200000L,
	0x04200800L, 0x00000802L, 0x00200802L, 0x04200800L,
	0x00000802L, 0x04000002L, 0x04200802L, 0x04200000L,
	0x00200800L, 0x00000000L, 0x00000002L, 0x04200802L,
	0x00000000L, 0x00200802L, 0x04200000L, 0x00000800L,
	0x04000002L, 0x04000800L, 0x00000800L, 0x00200002L };

static unsigned long SP8[64] = {
	0x10001040L, 0x00001000L, 0x00040000L, 0x10041040L,
	0x10000000L, 0x10001040L, 0x00000040L, 0x10000000L,
	0x00040040L, 0x10040000L, 0x10041040L, 0x00041000L,
	0x10041000L, 0x00041040L, 0x00001000L, 0x00000040L,
	0x10040000L, 0x10000040L, 0x10001000L, 0x00001040L,
	0x00041000L, 0x00040040L, 0x10040040L, 0x10041000L,
	0x00001040L, 0x00000000L, 0x00000000L, 0x10040040L,
	0x10000040L, 0x10001000L, 0x00041040L, 0x00040000L,
	0x00041040L, 0x00040000L, 0x10041000L, 0x00001000L,
	0x00000040L, 0x10040040L, 0x00001000L, 0x00041040L,
	0x10001000L, 0x00000040L, 0x10000040L, 0x10040000L,
	0x10040040L, 0x10000000L, 0x00040000L, 0x10001040L,
	0x00000000L, 0x10041040L, 0x00040040L, 0x10000040L,
	0x10040000L, 0x10001000L, 0x10001040L, 0x00000000L,
	0x10041040L, 0x00041000L, 0x00041000L, 0x00001040L,
	0x00001040L, 0x00040040L, 0x10000000L, 0x10041000L };

static void desfunc(register unsigned long *block, register unsigned long *keys)
//register unsigned long *block, *keys;
{
	register unsigned long fval, work, right, leftt;
	register int round;

	leftt = block[0];
	right = block[1];
	work = ((leftt >> 4) ^ right) & 0x0f0f0f0fL;
	right ^= work;
	leftt ^= (work << 4);
	work = ((leftt >> 16) ^ right) & 0x0000ffffL;
	right ^= work;
	leftt ^= (work << 16);
	work = ((right >> 2) ^ leftt) & 0x33333333L;
	leftt ^= work;
	right ^= (work << 2);
	work = ((right >> 8) ^ leftt) & 0x00ff00ffL;
	leftt ^= work;
	right ^= (work << 8);
	right = ((right << 1) | ((right >> 31) & 1L)) & 0xffffffffL;
	work = (leftt ^ right) & 0xaaaaaaaaL;
	leftt ^= work;
	right ^= work;
	leftt = ((leftt << 1) | ((leftt >> 31) & 1L)) & 0xffffffffL;

	for( round = 0; round < 8; round++ ) {
		work  = (right << 28) | (right >> 4);
		work ^= *keys++;
		fval  = SP7[ work		 & 0x3fL];
		fval |= SP5[(work >>  8) & 0x3fL];
		fval |= SP3[(work >> 16) & 0x3fL];
		fval |= SP1[(work >> 24) & 0x3fL];
		work  = right ^ *keys++;
		fval |= SP8[ work		 & 0x3fL];
		fval |= SP6[(work >>  8) & 0x3fL];
		fval |= SP4[(work >> 16) & 0x3fL];
		fval |= SP2[(work >> 24) & 0x3fL];
		leftt ^= fval;
		work  = (leftt << 28) | (leftt >> 4);
		work ^= *keys++;
		fval  = SP7[ work		 & 0x3fL];
		fval |= SP5[(work >>  8) & 0x3fL];
		fval |= SP3[(work >> 16) & 0x3fL];
		fval |= SP1[(work >> 24) & 0x3fL];
		work  = leftt ^ *keys++;
		fval |= SP8[ work		 & 0x3fL];
		fval |= SP6[(work >>  8) & 0x3fL];
		fval |= SP4[(work >> 16) & 0x3fL];
		fval |= SP2[(work >> 24) & 0x3fL];
		right ^= fval;
		}

	right = (right << 31) | (right >> 1);
	work = (leftt ^ right) & 0xaaaaaaaaL;
	leftt ^= work;
	right ^= work;
	leftt = (leftt << 31) | (leftt >> 1);
	work = ((leftt >> 8) ^ right) & 0x00ff00ffL;
	right ^= work;
	leftt ^= (work << 8);
	work = ((leftt >> 2) ^ right) & 0x33333333L;
	right ^= work;
	leftt ^= (work << 2);
	work = ((right >> 16) ^ leftt) & 0x0000ffffL;
	leftt ^= work;
	right ^= (work << 16);
	work = ((right >> 4) ^ leftt) & 0x0f0f0f0fL;
	leftt ^= work;
	right ^= (work << 4);
	*block++ = right;
	*block = leftt;
	return;
	}



/* Validation sets:
 * Single-length key, single-length plaintext -
 * Key	  : 0123 4567 89ab cdef
 * Plain  : 0123 4567 89ab cde7
 * Cipher : c957 4425 6a5e d31d
 **********************************************************************/
void des_key(des_ctx *dc, unsigned char *key){
	    deskey(key,EN0);
		cpkey(dc->ek);
		deskey(key,DE1);
		cpkey(dc->dk);
}


void des_enc(des_ctx *dc, unsigned char *data, int blocks,unsigned char *key,double val[490][900],int time,int space,int *row,int *colomn){
	    unsigned long work[2];
		int i;
		unsigned char *cp;

		cp=data;
		for(i=0;i<blocks;i++){
			    chaos_key(key,val,time,space,row,colomn);
			    deskey(key,EN0);
		        cpkey(dc->ek);			    
			    scrunch(cp,work);
				desfunc(work,dc->ek);
				unscrun(work,cp);
				cp+=8;
                              
				 
			


			
		}
}

void des_dec(des_ctx *dc, unsigned char *data, int blocks,unsigned char *key,double val[490][900],int time,int space,int *row,int *colomn){
	    unsigned long work[2];
		int i;
		unsigned char *cp;

		cp=data;
		for(i=0;i<blocks;i++){
			    chaos_key(key,val,time,space,row,colomn);
			    deskey(key,DE1);
		        cpkey(dc->dk);
			    scrunch(cp,work);
				desfunc(work,dc->dk);
				unscrun(work,cp);
				cp+=8;
                
		}
}

//每迭代59次,取一个double型混沌数,转换成整型
//并对其进行位操作,取出其内存的32位比特
//等下一个混沌点再取32位,合成64位密钥
void chaos_key(unsigned char *key,double val[490][900],int time,int space,int *row,int *colomn){
	    int r=*row;
		int c=*colomn;  
		int i;
		unsigned char *keyy;
		unsigned char * bb;
        keyy=key;		
				
		int nnn= int (val[r][c]*1000000000);
		bb= (unsigned char *)&nnn;
		for(i=0;i<4;i++){
            *keyy =*bb;
			bb++;
			keyy++;
		}
		r++;
		if(r>=space-68){
			r=79;
			c++;
		}

		
		nnn= int (val[r][c]*1000000000);
		bb= (unsigned char *)&nnn;
        for(i=0;i<4;i++){
            *keyy =*bb;
			bb++;
			keyy++;
		}

        r++;
		if(r>=space-68){
			r=79;
			c++;
		}
		*row=r;
		*colomn=c;
		keyy=key;
}





//老胡作品
//akiy@eyou.com 
void CTruecolorto8bitView::OnM8bitcolor() 
{
	// TODO: Add your command handler code here
	//加载位图文件
	BITMAPFILEHEADER bf;
	BITMAPINFO *binfoin,*binfoout;
	//创建两个信息头
	CFile file;
	if(!file.Open(str,CFile::modeRead,NULL)) return;

	binfoin=(BITMAPINFO *)malloc(sizeof(BITMAPINFOHEADER)+256*sizeof(RGBQUAD)+10);
	binfoout=(BITMAPINFO *)malloc(sizeof(BITMAPINFOHEADER)+256*sizeof(RGBQUAD)+10);
	file.Read(&bf,sizeof(BITMAPFILEHEADER));
	file.Read(binfoin,sizeof(BITMAPINFOHEADER));
	int nline=((binfoin->bmiHeader.biWidth* binfoin->bmiHeader.biBitCount+31)/8) /4*4;
	int nsize=nline*(binfoin->bmiHeader.biHeight);
	int nline8=((binfoin->bmiHeader.biWidth* 8+31)/8) /4*4;
	int nsize8=nline8*(binfoin->bmiHeader.biHeight);
	unsigned char *pdata,*pdata8;
	//为源数据开辟缓冲区
	pdata=(unsigned char *)malloc(nsize+nline+10);//注意这里必须申请一块大一点的空间,不然会益处
	//为目标数据开辟缓冲区
	pdata8=(unsigned char *)malloc(nsize8+10);
	file.Read(pdata,nsize);
	file.Close();
	//调用dll库中的函数

	HINSTANCE hinstLib; 
    MYPROC ProcAdd; 
    hinstLib = LoadLibrary("demcolordll"); 
    if (hinstLib != NULL) 
    { 
        ProcAdd = (MYPROC) GetProcAddress(hinstLib, "RGB2256HiQuality"); 
        if(ProcAdd !=NULL) 
		{
			ProcAdd(binfoin,pdata,binfoout,pdata8);
			FreeLibrary(hinstLib); 
			//将得到的数据写进文件中
			if(file.Open("temp.bmp",CFile::modeCreate|CFile::modeWrite,NULL))
			{
				bf.bfOffBits=bf.bfOffBits+1024;
				bf.bfSize=bf.bfOffBits+nsize8;
				file.Write(&bf,sizeof(BITMAPFILEHEADER));
				file.Write(binfoout,sizeof(BITMAPINFOHEADER)+sizeof(RGBQUAD)*256);
				file.Write(pdata8,nsize8);
				file.Close();
			}
		}
	}
	free(binfoin);
	free(binfoout);
	free(pdata);
	free(pdata8);
	HBITMAP hBitmap=(HBITMAP)LoadImage(NULL,"temp.bmp", IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE|LR_CREATEDIBSECTION);
//	CDC tempDC;
	if(hBitmap==NULL) return;
	bitmap.DeleteObject();
	bitmap.Attach(hBitmap);
	bitmap.GetObject(sizeof(BITMAP),&bm);
	bShow=true;
	Invalidate();

	
}
//老胡作品
//akiy@eyou.com
void CTruecolorto8bitView::OnM2color() 
{
  
	//加载位图文件
	BITMAPFILEHEADER bf;
	BITMAPINFO *binfoin,*binfoout;
	//创建两个信息头
	CFile file;
	if(!file.Open(str,CFile::modeRead,NULL)) return;

	binfoin=(BITMAPINFO *)malloc(sizeof(BITMAPINFOHEADER)+256*sizeof(RGBQUAD)+10);
	binfoout=(BITMAPINFO *)malloc(sizeof(BITMAPINFOHEADER)+2*sizeof(RGBQUAD)+10);
	file.Read(&bf,sizeof(BITMAPFILEHEADER));
	file.Read(binfoin,sizeof(BITMAPINFOHEADER));
	int nline=((binfoin->bmiHeader.biWidth* binfoin->bmiHeader.biBitCount+31)/8) /4*4;
	int nsize=nline*(binfoin->bmiHeader.biHeight);
	int nline1=((binfoin->bmiHeader.biWidth+31)/8) /4*4;
	int nsize1=nline1*(binfoin->bmiHeader.biHeight);
	unsigned char *pdata,*pdata1;
	//为源数据开辟缓冲区
	pdata=(unsigned char *)malloc(nsize+nline+10);//注意这里必须申请一块大一点的空间,不然会益处
	//为目标数据开辟缓冲区
	pdata1=(unsigned char *)malloc(nsize1+10);
	file.Read(pdata,nsize);
	file.Close();
	//调用dll库中的函数

	HINSTANCE hinstLib; 
    MYPROC ProcAdd; 
    hinstLib = LoadLibrary("demcolordll"); 
    if (hinstLib != NULL) 
    { 
        ProcAdd = (MYPROC) GetProcAddress(hinstLib, "RGB21HiQuality"); 
        if(ProcAdd !=NULL) 
		{
			ProcAdd(binfoin,pdata,binfoout,pdata1);
			FreeLibrary(hinstLib); 
			//将得到的数据写进文件中
			if(file.Open("temp.bmp",CFile::modeCreate|CFile::modeWrite,NULL))
			{
				bf.bfOffBits=bf.bfOffBits+sizeof(RGBQUAD)*2;
				bf.bfSize=bf.bfOffBits+nsize1;
				file.Write(&bf,sizeof(BITMAPFILEHEADER));
				file.Write(binfoout,sizeof(BITMAPINFOHEADER)+sizeof(RGBQUAD)*2);
				file.Write(pdata1,nsize1);
				file.Close();
			}
		}
	}
	free(binfoin);
	free(binfoout);
	free(pdata);
	free(pdata1);
	HBITMAP hBitmap=(HBITMAP)LoadImage(NULL,"temp.bmp", IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE|LR_CREATEDIBSECTION);
//	CDC tempDC;
	if(hBitmap==NULL) return;
	bitmap.DeleteObject();
	bitmap.Attach(hBitmap);
	bitmap.GetObject(sizeof(BITMAP),&bm);
	bShow=true;
	Invalidate();
	
}


void CTruecolorto8bitView::OnFileSave() 
{
   	CFileDialog dlg(FALSE,NULL,NULL,NULL);
	if(dlg.DoModal()!=IDOK) return;
	CString szname,szextern;
	szname=dlg.GetPathName();
	szextern=szname.Right(4);
	char buf[5];
	memset(buf,0x00,5);
	strcpy(buf,szextern);
	strupr(buf);
	if(strcmp(".BMP",buf)!=0)
		szname=szname+".bmp";
	CopyFile("temp.bmp",szname,TRUE);
	
}
// encryption
void CTruecolorto8bitView::OnDESEncrypt() 
{
    des_ctx dc;
	// TODO: Add your command handler code here
		// TODO: Add your command handler code here
	//加载位图文件
	BITMAPFILEHEADER bf;
	BITMAPINFO *binfoin;//,*binfoout;
	//创建两个信息头
	CFile file;
	if(!file.Open(str,CFile::modeRead,NULL)) return;

	binfoin=(BITMAPINFO *)malloc(sizeof(BITMAPINFOHEADER)+256*sizeof(RGBQUAD)+10);
//	binfoout=(BITMAPINFO *)malloc(sizeof(BITMAPINFOHEADER)+256*sizeof(RGBQUAD)+10);
	file.Read(&bf,sizeof(BITMAPFILEHEADER));
	file.Read(binfoin,sizeof(BITMAPINFOHEADER));
	int nline=((binfoin->bmiHeader.biWidth* binfoin->bmiHeader.biBitCount+31)/8) /4*4;
	int nsize=nline*(binfoin->bmiHeader.biHeight);
//	int nline8=((binfoin->bmiHeader.biWidth* 8+31)/8) /4*4;
//	int nsize8=nline8*(binfoin->bmiHeader.biHeight);

    int space=binfoin->bmiHeader.biHeight;
	int time=nline;

	unsigned char *pdata;//,*pdata8;
	//为源数据开辟缓冲区
	pdata=(unsigned char *)malloc(nsize+nline+10);//注意这里必须申请一块大一点的空间,不然会益处
	//为目标数据开辟缓冲区
 //	pdata8=(unsigned char *)malloc(nsize8+10);
	file.Read(pdata,nsize);
	file.Close();
	int blocks=nsize/8;
		
	unsigned char key[8];

	//ocoml origin lattice
	int i, j, n;
	int lo=80;
	double ep=0.8;

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -