银联通信MAC算法

void DATE_XOR1(U08 *source, U08 *dest,long size)
{
   int i;
   for(i=0; i<size; i++)
	   dest[i] ^= source[i];

   return;
}
/*
*************************************************************************************************
*  异或		   
*************************************************************************************************
*/
void DataXOR( U08 *source, U08 *dest, U32 size, U08 *out )
{
   int i;
   for( i = 0; i < size; i++ )
   { out[i] = dest[i] ^ source[i]; }
}
/*******************************************************
* 名称:获取报文MAC值		    
* 功能:报文MAC算法				 
* 入口:
*      *buf     ,要计算的数据缓冲区;buf_size,计算数据的长度
*      *key     ,密钥(8B)
* 出口:mac_buf,计算出来的MAC值(8B)
********************************************************/
void UP_Get_MAC( U08 *buf, U32 buf_size, U08 *key, U08 *mac_buf )
{														     
	U08 val[8],Abuf[8],str1[8],str2[8];	
	U08 Bbuf[16];						     //中间变量
    U08 block[512],mac[8];	
	U16 x,n;
	U16 i,j=0;
	//准备工作
	memcpy( block, buf, buf_size );                          //将输入数据赋值给临时变量block
	x = buf_size / 8; 								         //计算有多少个完整的块
	n = buf_size % 8;                                        //计算最后一个块有几个字节
	if( n != 0 )											 //y非0,则在其后补上0x00...
	{
		memset( &block[x*8+n], 0x00, 8-n );							
		x += 1;                                              //将补上的这一块加上去 
	}
	//开始运算
	memset( val, 0x00, 8 );
	for( i = 0; i < x; i++ )						         //有多少块循环多少次
	{
		DATE_XOR1(&block[j], val,8);

	    j += 8;												 //用于取下一块的数据
	}

	 sprintf( (char *)Bbuf, "%02X%02X%02X%02X%02X%02X%02X%02X", val[0],val[1],val[2],val[3],val[4],val[5],val[6],val[7]);
	 memcpy( str1, Bbuf, 8 );
	 memcpy( str2, &Bbuf[8], 8 );
	 CurCalc_DES_Encrypt(key,str1,mac);

	 DataXOR( mac, str2, 8, Abuf );	
	 CurCalc_DES_Encrypt(key,Abuf,mac);
	 memcpy(Abuf,mac,8);
	 sprintf( (char *)Bbuf, "%02X%02X%02X%02X%02X%02X%02X%02X", Abuf[0],Abuf[1],Abuf[2],Abuf[3],Abuf[4],Abuf[5],Abuf[6],Abuf[7]);
	 memcpy( mac_buf, Bbuf, 8 );		//前8位密钥结果放入mac_buf	 
}

/*******************************************************
* 名称:获取报文MAC值
* 功能:报文MAC算法
* 入口:
* *buf ,要计算的数据缓冲区;buf_size,计算数据的长度
* *key ,密钥(8B)
* 出口:mac_buf,计算出来的MAC值(8B)
ansi x9.9 MAC算法

********************************************************/
void Ansi99X_Get_MAC( U08 *buf, U32 buf_size, U08 *key, U08 *mac_buf )
{
    U08 val[8],xor[8];
    U08 block[512];
    U16 x,n;
    U16 i,j=0;
    //准备工作
	memcpy( block, buf, buf_size ); //将输入数据赋值给临时变量block
	x = buf_size / 8; //计算有多少个完整的块
	n = buf_size % 8; //计算最后一个块有几个字节
	if( n != 0 )	 //y非0,则在其后补上0x00...
	{
	    memset( &block[x*8+n], 0x00, 8-n );
	    x += 1; //将补上的这一块加上去
	}
	//开始运算
	memset( val, 0x00, 8 );
	for( i = 0; i < x; i++ )	 //有多少块循环多少次
	{
	    DataXOR(val,&block[j], 8,xor);
	    CurCalc_DES_Encrypt(key,xor,val);//DES加密
	    j += 8;	 //用于取下一块的数据
	}
	memcpy(mac_buf,val, 8 );
}