_lwrite(fh_out,databuf,len);
	}
	// 設置解密文件長度
	_llseek(fh_out,deshead.TLen,SEEK_SET);
	SetEndOfFile((HANDLE)fh_out);

	// 結束等待光標
	wnd.EndWaitCursor();
	return true;
}
/******************************************************************************/
//	名稱：Encrypt
//	功能：加密
//  參數：len—數據長度，必須是8的倍數；KeyStr為0結尾的密鑰串，長度<=16，可為任意字符
//        KeyStr默認值為0，如果你在調用前設置過子密鑰，則可省略該參數。例:
//        SetSubKey(KeyStr);Encrypt(data,data,len);或:Encrypt(data,data,len,KeyStr);
//	返回：加密成功返回true，否則返回false
//  備注：當密鑰長度>8時，系統自動使用3次DES加密
//	更新：2002/12/25
//	作者：0200980胡德華
/******************************************************************************/
bool CDes::Encrypt(char *Out,char *In,UINT len,const char *KeyStr)
{
    CHECK( Out && In && !(len&0x7) )

	if( KeyStr )
		CHECK( SetSubKey(KeyStr) )

	if( !Is3DES )
	{   // 1次DES
		for(int i=0,j=len>>3; i<j; ++i)
		{
			DES(Out,In,&SubKey[0],ENCRYPT);
			Out += 8; In += 8;
		}
	}
	else
	{   // 3次DES E-D-E
		for(int i=0,j=len>>3; i<j; ++i)
		{
			DES(Out,In, &SubKey[0],ENCRYPT);
			DES(Out,Out,&SubKey[1],DECRYPT);
			DES(Out,Out,&SubKey[0],ENCRYPT);
			Out += 8; In += 8;
		}
	}

	return true;
}
/******************************************************************************/
//	名稱：Decrypt
//	功能：解密
//  參數：len—數據長度，必須是8的倍數；KeyStr為0結尾的密鑰串，長度<=16，可為任意字符
//        KeyStr默認值為0，如果你在調用前設置過子密鑰，則可省略該參數。例:
//        SetSubKey(KeyStr);Decrypt(data,data,len);或:Decrypt(data,data,len,KeyStr);
//	返回：解密成功返回true，否則返回false
//  備注：當密鑰長度>8時，系統自動使用3次DES解密
//	更新：2002/12/25
//	作者：0200980胡德華
/******************************************************************************/
bool CDes::Decrypt(char *Out,char *In,UINT len,const char *KeyStr)
{
    CHECK( Out && In && !(len&0x7) )

	if( KeyStr )
		CHECK( SetSubKey(KeyStr) )
    if( !Is3DES )
	{   // 1次DES
		for(int i=0,j=len>>3; i<j; ++i)
		{
			DES(Out,In,&SubKey[0],DECRYPT);
			Out += 8; In += 8;
		}
	}
	else
	{   // 3次DES D-E-D
		for(int i=0,j=len>>3; i<j; ++i)
		{
			DES(Out,In, &SubKey[0],DECRYPT);
			DES(Out,Out,&SubKey[1],ENCRYPT);
			DES(Out,Out,&SubKey[0],DECRYPT);
			Out += 8; In += 8;
		}
	}

	return true;
}
/******************************************************************************/
//	名稱：SetSubKey
//	功能：由輸入密鑰串設置子密鑰
//  參數：KeyStr為0結尾的密鑰串，長度<=16，可為任意字符
//	返回：設置成功返回true，否則返回false
//  備注：當密鑰長度>8時，將設置第2密鑰，且置3次DES標志
//	更新：2002/12/25
//	作者：0200980胡德華
/******************************************************************************/
bool CDes::SetSubKey(const char *KeyStr)
{
    int		len;

	CHECK_MSG( KeyStr && (len=strlen(KeyStr))<=16 && len>0, 
		       "設置DES密鑰出錯：空密鑰，或密鑰太長!" )
	memset(deskey,0,16);
	memcpy(deskey,KeyStr,len);
	// 設置第1密鑰
	SetSubKey(&SubKey[0],deskey);
	Is3DES = false;
	if( len>8 )
	{   // 置3次DES標志
		Is3DES = true;
		// 設置第2密鑰
		SetSubKey(&SubKey[1],&deskey[8]);
	}
	return true;
}
/******************************************************************************/
//	名稱：RandKeyStr
//	功能：產生隨機密鑰串
//  參數：
//	返回：KeyStr地址
//  備注：
//	更新：2002/12/25
//	作者：0200980胡德華
/******************************************************************************/
char* CDes::RandKeyStr(char KeyStr[9])
{
    CHECK( KeyStr )

	srand(GetTickCount());
    for(int i=0; i<8; ++i)
	{
        KeyStr[i] = rand()%256;
	}
	while( !( KeyStr[7] && 0xf0 ) )
        KeyStr[7] = rand()%256;
	KeyStr[8] = '\0';
    // 這樣可以進行連接操作
	return KeyStr;
}
/******************************************************************************/
//	名稱：DES
//	功能：加/解密
//  參數：Type—ENCRYPT:加密,DECRYPT:解密
//	返回：
//  備注：私有函數，不用檢查指針是否為空
//	更新：2002/12/25
//	作者：0200935王俊川
/******************************************************************************/
void CDes::DES(char Out[8],char In[8],const PSubKey pSubKey,bool Type)
{
    static bool M[64],Tmp[32],*Li,*Ri;

    // 將輸入字節組分解成位組
   	CGfL::ByteToBit(M,In,8);
    // 初始變換
    CGfL::Transform(M,M,IP_Table,64);

	if( Type == ENCRYPT )
		Li=&M[0],Ri=&M[32];
	else
		Li=&M[32],Ri=&M[0];

    for(int i=0; i<16; ++i)
    {
        memcpy(Tmp,Ri,32);
		if( Type == ENCRYPT )
			F_func(Ri,(*pSubKey)[i]);
		else
			F_func(Ri,(*pSubKey)[15-i]);
        CGfL::Xor(Ri,Li,32);
        memcpy(Li,Tmp,32);
    }
    // 逆初始變換
    CGfL::Transform(M,M,IPR_Table,64);
	// 將位組合并成輸出字節組
	CGfL::BitToByte(Out,M,64);
}
/******************************************************************************/
//	名稱：SetSubKey
//	功能：由輸入密鑰設置16圈子密鑰
//  參數：
//	返回：
//  備注：私有函數，不用檢查指針是否為空
//	更新：2002/12/25
//	作者：0200980胡德華
/******************************************************************************/
void CDes::SetSubKey(PSubKey pSubKey,const char Key[8])
{
    static  bool K[64],*KL=&K[0],*KR=&K[28];

    // 將密鑰字節組分解成密鑰位組
	CGfL::ByteToBit(K,Key,8);
	// 密鑰變換
    CGfL::Transform(K,K,PC1_Table,56);
    for(int i=0; i<16; ++i)
    {	// 循環左移
        CGfL::RotateL((char*)KL,28,LOOP_Table[i]);
        CGfL::RotateL((char*)KR,28,LOOP_Table[i]);
		// 壓縮變換
        CGfL::Transform((*pSubKey)[i],K,PC2_Table,48);
    }
}
/******************************************************************************/
//	名稱：F_func
//	功能：f 函數
//  參數：
//	返回：
//  備注：私有函數，不用檢查指針是否為空
//	更新：2002/12/25
//	作者：0200980胡德華
/******************************************************************************/
void CDes::F_func(bool In[32],const bool Ki[48])
{
    static bool MR[48];

	// 擴展變換
    CGfL::Transform(MR,In,E_Table,48);
    CGfL::Xor(MR,Ki,48);
    S_func(In,MR);
	// P 變換
    CGfL::Transform(In,In,P_Table,32);
}
/******************************************************************************/
//	名稱：S_func
//	功能：S 盒代替
//  參數：
//	返回：
//  備注：私有函數，不用檢查指針是否為空
//	更新：2002/12/25
//	作者：0200980胡德華
/******************************************************************************/
void CDes::S_func(bool Out[32],const bool In[48])
{
    for(char i=0,j,k; i<8; ++i)
    {
        j = (In[0]<<1) + In[5];
        k = (In[1]<<3) + (In[2]<<2) + (In[3]<<1) + In[4];
		CGfL::ByteToBit(Out,&S_Box[i][j][k],1,4);
		Out +=4; In += 6;
    }
}

///////////////////////////////////////////////////////////////////////////////
// End of Files
///////////////////////////////////////////////////////////////////////////////