static ULONG8 constkey[33]= "0CC*DAEghijkl124pqrl,.-=+|^%$sc"; /* 常量密钥 */
/* 常量加密 */
int const_encode(char *in,char *out)
{
int len,outlen=0;
int i=0,j;
char buf[8+1],en_buf[8+1];
char tmp[1024*2+1];
len = strlen(in);
memset(buf,0x00,sizeof(buf));
for(i=0,j=0;i<len;i++) {
buf[j] = in[i];
j++;
if (j == 8) {
gost_enc(buf,constkey);
memcpy(out+outlen,buf,8);
memset(buf,0x00,sizeof(buf));
outlen += 8;
j =0;
}
}
if (j != 0) {
gost_enc(buf,constkey);
memcpy(out+outlen,buf,8);
outlen += 8;
}
memset(tmp,0x00,sizeof(tmp));
bin_exc_str(out,tmp,outlen,BIN_TO_STR);
strcpy(out,tmp);
return 0;
}
/*常量解密*/
int const_decode(char *in,char *out)
{
int i,j,len,k;
char tmp[1024+1],buf[8+1];
ULONG8 ch;
char bin_in[1024+1];
len = strlen(in)/2;
memset(bin_in,0x00,sizeof(bin_in));
bin_exc_str(in,bin_in,strlen(in),STR_TO_BIN);
memset(buf,0x00,sizeof(buf));
for(i=0,j=0; i< len; i+=8)
{
memcpy(buf,bin_in+i,8);
gost_dec(buf,constkey);
memcpy(out+i,buf,8);
memset(buf,0x00,sizeof(buf));
j=0;
}
return 0;
}
/* 功 能:二进制与ASCII码 相互转换 */
int bin_exc_str(unsigned char *in,unsigned char *out,int len,int flag)
{
int i,j;
unsigned char ch;
if (flag == BIN_TO_STR) {
for (i =0,j=0; i<len;i++) {
ch = ((in[i] >> 4) & 0x0F);
if ((ch >= 0) && (ch<=9))
out[j++] = ch + '0';
else
out[j++] = ch - 10 + 'A';
ch = in[i] & 0x0F ;
if ((ch >= 0) && (ch<=9))
out[j++] = ch + '0';
else
out[j++] = ch- 10 + 'A';
}
}
else if (flag == STR_TO_BIN) {
for (i=0,j=0;i<len;i+=2,j++) {
/* 高位 */
if ((in[i]>='0') && (in[i]<='9'))
ch = ((in[i] - '0') & 0x0F) <<4 ;
else if ((in[i]>='A') && (in[i]<='F'))
ch = ((in[i] - 'A' + 10) & 0x0F) <<4 ;
else if ((in[i]>='a') && (in[i]<='f'))
ch = ((in[i] - 'a' + 10) & 0x0F) <<4 ;
else
return -1;
/* 低位 */
if ((in[i+1]>='0') && (in[i+1]<='9'))
ch |= in[i+1] - '0';
else if ((in[i+1]>='A') && (in[i+1]<='F'))
ch |= in[i+1] - 'A' + 10;
else if ((in[i+1]>='a') && (in[i+1]<='f'))
ch |= in[i+1] - 'a' +10;
else
return -1;
out[j] = ch;
}
}
return 0;
}