#include "stdio.h"
#include "conio.h"
int cnt_bit(int num) /* 计算二进制位数 */
{
if(num<0) return 16;
else
{
int i;
for(i=14;i>=0;i--)
if(num>=1<<i)
return (i+1);
}
}
int CRC_4(int msgcode) /* CRC编码，生成包含信息码部分和冗余部分的CRC冗余码 */
{
int msg_len=0; /* 信息码长度 */
int gencode=(1<<4)+(1<<1)+1; /* G（x）=x4+x+1 */
int gen_len=4; /* 产生码长度 */
int n=0; /* 信息码长度与产生码长度之和 */
int trancode=0; /* CRC最终冗余码 */
msg_len=cnt_bit(msgcode);
n=msg_len+gen_len;
if(n>16) return -1; /* 信息码长度与产生码长度之和大于16位，则产生溢出信号 */
else
{
int msgtemp=msgcode<<gen_len;
int result=msgtemp;
int gentemp=gencode<<(msg_len-1);
int i=msg_len;
while(i>0) /* 用异或实现模2除法 */
{
if(cnt_bit(result)==n)
result=result^gentemp;
result=result<<1;
i--;
}
if(cnt_bit(result)==n) /* 将余数最高位保留在最终冗余码中 */
trancode=msgtemp+(1<<(gen_len-1));
else
trancode=msgtemp;
result=result&((1<<(n-1))-1); /* 去掉余数最高位 */
result=result>>msg_len; /* 余数右移 */
trancode=trancode+result;
}
return trancode;
}
int CRC_4Test(int msgcode) /* CRC检验，如果接收到的信息码可以被产生码整除则返回1，否则返回0 */
{
int msg_len=0;
int gencode=(1<<4)+(1<<1)+1;
int gen_len=4;
int n=0;
int trancode=0;
int flag=1 ;
msg_len=cnt_bit(msgcode);
n=msg_len;
if(n>16) return -1;
else
{
int msgtemp=msgcode;
int result=msgtemp;
int gentemp=gencode<<(msg_len-gen_len-1);
int i=(msg_len-gen_len);
while(i>0)
{
if(cnt_bit(result)==n)
result=result^gentemp;
result=result<<1;
i--;
}
if(cnt_bit(result)==n)
trancode=(1<<(gen_len-1));
else
trancode=0;
result=result&((1<<(n-1))-1);
result=result>>(msg_len-gen_len);
trancode=trancode+result;
}
if(trancode!=0) flag=0;
return flag;
}
main()
{
int a=CRC_4(89);
int b=CRC_4Test(a);
printf("\n%d",b);
getch();
}
