CRC 算法,从原理到实施
CRC,一种基于有限域GF(2)的多项式环的Hash算法。在GF(2)中,多项式系数只有0、1,加减运算等同于异或(XOR)运算,乘除运算与一般多项式运算一致(合并同类项时需要注意为XOR运算)
概述
在GF(2)中,多项式系数只有0、1,加减运算等同于异或(XOR)运算,乘除运算与一般多项式运算一致(合并同类项时需要注意为XOR运算)。在CRC-n算法中,有M(x)·xn=Q(x)·G(x)+R(x),M(x)为m位的数据,G(x)为一个GF(2)的n+1项的生成多项式(Poly),M(x)·xn 则是通过在数据M(x)后添加n个0形成的对应的m+n位多项式,而R(x)即为M(x)·xn 除以G(x)的n位余数——即CRC校验码,Q(x)为商,直接丢弃。通过比较两次计算产生的Signature是否一致判断故障的发生
基本原理
假定M(x)=11100110,G(x)=x3 + x + 1,其中n=3,则M(x)·xn=11100110000,将G(x)多项式中的各项系数取出,按降幂排列所对应的数据Poly=1011,然后对其进行除法运算:
所得n位余数即为CRC——100
根据定义可以建立一个简单的CRC实现算法,模型如下图所示:
1)建立一个长度为r的CRC Register,并初始化为0
2)在M(x)后添加r个0形成M(x)·xn
3)将CRC Register左移一位,将M(x)·xn的MSB移入CRC Register的Bit 0
4)第3步中的从CRC Register移出的数,如果是1,则计算,CRC Register=Poly XOR CRC Register
5)重复第3步,直到M(x)·xn全部移入CRC Register
6)CRC Register即为CRC校验值
算法实现
Table Driven Algorithm
根据定义所建立的算法模型存在明显缺陷,按位移动处理效率低下,为此我们探索如何实现更大处理单元的算法。这次我们以CRC-32为例,按照前面的算法思路构建的模型如下图所示:
设CRC Register中的Byte 3依次为:t7 t6 t5 t4 t3 t2 t1 t0,Poly中的Bit31-Bit24依次为:g7 g6 g5 g4 g3 g2 g1 g0,根据1.3.2可知,在第1次迭代中,CRC Register的MSB:t7将会决定Poly与CRC Register的异或,如果t7=1,这就会发生,反之就不会发生;在第2次迭代中,CRC Register的MSB:t6 XOR (t7*g7) 将会决定本次Poly与CRC Register的异或是否发生,即t7、t6控制第2XOR操作;同理,在第3次迭代中,CRC Register的MSB也是通过t7、t6、t5决定,即t7、t6、t5控制第3次XOR操作。故我们可以得出下述结论:k次以后的迭代的最高位的值,可以由寄存器的前k位计算得到。根据这个结论,我们可以一次性取出CRC Register的Byte 3,提前计算出8次迭代后的寄存器余式,因为高位终将会在迭代中被移出,我们只需要关心余式即可。同时XOR运算满足结合律:A XOR B XOR C = A XOR (B XOR C)
上图即为Byte 3全部迭代移出的示意图,根据结合律可以看出,我们可以依据Byte 3直接确定8次异或的与否及Poly的偏移量,从而提前计算出不同偏移量的Poly间XOR的值,令其为A,易知A的高8位和Byte 3一定相等,Reg向左移出btye3,从M(x)·xn读取一个byte放在byte 0,最后将A的低32位与Reg完成XOR操作。为避免与字节边界发生冲突,我们采用字节的整数倍——字节(1 byte)、字(2 byte)、双字(4 byte),故一般不采用4bit作为处理单元。由于一个字节的取值是有限的——256种,我们只要提前计算一个字节全部的A值保存到表中。运行时以byte值为索引,直接从表里取出即可
至此我们完成基于1 byte为处理单元的Table Driven,算法模型如下图所示:
1)建立一个长度为r的CRC Register,并初始化为0
2)在M(x)后添加r个0形成M(x)·xn
3)将CRC Register左移一个byte,从M(x)·xn读入一个byte至CRC Register的byte 0中
4)以第3步中的从CRC Register移出的byte为index,从表中取出对应的n位宽的值,将该值与CRC Register进行XOR
5)重复第3步,直到M(x)·xn全部移入CRC Register6) CRC Register即为CRC校验值
Direct Table Algorithm
在上述的两种算法中,我们每次都需要在M(x)后添加n个0,其并不参与运算,目的只是为了将M(x)的全部推入CRC Register而已,并且在有些情境下在M(x)后添0操作并不总是能够实现的,故通过改进计算步骤有了直接表法,避免了对原始数据的添0操作
算法流程,算法模型如下图所示:
1)建立一个长度为r的CRC Register,按照Init值对其初始化
2)将CRC Register左移一个byte,从M(x)左移一个byte,两者进行XOR
3)第2步中XOR后的值作为index,从表中取出对应的n位宽的值,将该值与CRC Register进行XOR
4)重复第2步,直到M(x)全部取出
5)CRC Register即为CRC校验值
Reflected Direct Table Algorithm
在Direct Table算法中,当RefIn、RefOut为True,每次都需要对数据做颠倒操作,很麻烦。为此产生了Reflected Direct Table算法,该算法改变了CRC Register的移动方向,而不需要对M(x)做任何处理,按字节顺序读取即可,算法模型如下图所示
算法流程如下:
1)建立一个长度为r的CRC Register,按照Init值对其初始化
2)将CRC Register右移一个byte,从M(x)左移一个byte,两者进行XOR
3)第2步中XOR后的值作为index,从表中取出对应的n位宽的值,将该值与CRC Register进行XOR
4)重复第2步,直到M(x)全部取出
5)CRC Register即为CRC校验值
CRC模型
Name: CRC标准
Width: 生成的CRC的位宽
Poly: 生成多项式,一般采用十六进制简记,长度为width+1,由于其最高位恒为1,故记法中不体现出来(例如:x16+x12+x5+1记为0x1021)
Init: 初始值,如果数据前添加了若干个前导零,在前述算法中,一般是检测不到的,故通过改变CRC Register中的预设值,以实现对该类型错误的检测。在Direct Table算法中用Init初始化CRC Register即可,在Table Driven算法中,不可以直接用Init初始化CRC Register,因为其等同于在原始数据前插入了Init,必须要先把CRC Register设为0,等M(x)·xn移动n/8次后,即CRC Register的预设值0全部移出时,再将Init值异或进CRC Register。完成Init操作
Xorout: 结果异或值,所有计算完成后将CRC Register与Xorout进行异或作,作为最后的校验值
RefIn: 输入反转,这是一个布尔值,如果为False,则每个字节内的位顺序保持不变,即Bit 7为MSB,Bit0为LSB。如果为True,则将需要每个字节内的位顺序颠倒,即Bit 7为LSB,Bit0为MSB。这个约定在硬件CRC中是合理的,因为在串口通讯中硬件一般默认先发送字节的Bit 0,最后发送Bit 7
RefOut: 输出反转,这是一个布尔值,如果为False,则在计算结束后,直接进入Xorout环节,如果为True,则在计算结束后,将CRC Register进行颠倒后,再进入Xorout环节。注意,和RefIn颠倒字节内的位顺序不同的是,这个是将CRC Register的值作为一个整体颠倒,即Bit n到Bit0进行颠倒
实现
针对常见常用的下述CRC给出了实现方法,以供参考
#include <stdio.h>
typedef unsigned char uint8_t;
typedef signed char int8_t;
typedef unsigned short int uint16_t;
typedef signed short int int16_t;
typedef unsigned int uint32_t;
typedef signed int int32_t;
typedef unsigned long long int uint64_t;
typedef signed long long int int64_t;
uint16_t Table16[256];
uint32_t Table32[256];
uint32_t Table32Ref[256];
/******************** CRC-16/CITI False Model ********************/
/*
Name : "CRC-16/CITT FALSE"
Width : 16
Poly : 1021
Init : FFFF
RefIn : False
RefOut : False
XorOut : 0000
*/
/***************************************************************************/
uint16_t CRC16_CITIFalse(uint8_t *ptr, uint32_t len);
uint8_t GenerateT16(void);
/******************** CRC-32 Model *******************************/
/*
Name : "CRC-32"
Width : 32
Poly : 04C11DB7
Init : FFFFFFFF
RefIn : True
RefOut : True
XorOut : FFFFFFFF
*/
/***************************************************************************/
uint32_t CRC32(const uint8_t* ptr, uint32_t len);
uint8_t GenerateT32(void);
uint32_t CRC32Ref(const uint8_t* ptr, uint32_t len);
uint8_t GenerateT32Ref(void);
uint32_t ExchBitOrder(uint32_t data, uint8_t bitnum);
uint8_t main(void)
{
uint8_t Table16Flag = 0;
uint8_t Table32Flag = 0;
uint8_t Table32RefFlag = 0;
if (0 == Table16Flag)
{
printf("Calc Table16 Start...\r\n");
GenerateT16();
printf("Calc Table16 Over!\r\n");
Table16Flag = 1;
}
if (0 == Table32Flag)
{
printf("\r\nCalc Table32 Start...\r\n");
GenerateT32();
printf("Calc Table32 Over!\r\n");
Table32Flag = 1;
}
if (0 == Table32RefFlag)
{
printf("\r\nCalc Table32Ref Start...\r\n");
GenerateT32Ref();
printf("Calc Table32Ref Over!\r\n");
Table32Flag = 1;
}
uint8_t test1[4] = { 0,0,0,0};
uint8_t test2[3] = { 0xF2,0x01,0x83};
uint8_t test3[9] = { 0x33,0x22,0x55,0xAA,0xBB,0xCC,0xDD,0xEE,0xFF};
uint8_t test4[4] = { 0xFF,0xFF,0xFF,0xFF};
uint8_t test5[4] = { 0x31,0x32,0x33,0x34 };
printf("\r\n CRC-16/CITT-FALSE Test\r\n");
printf("____________________________________________________\r\n");
printf(" TestData Expecte Actual\r\n");
printf("____________________________________________________\r\n");
printf("0x00000000 0x84C0 0x%X\r\n", CRC16_CITIFalse(test1,4));
printf("0xF20183 0xD374 0x%X\r\n", CRC16_CITIFalse(test2,3));
printf("0x332255AABBCCDDEEFF 0xF53F 0x%X\r\n", CRC16_CITIFalse(test3,9));
printf("0xFFFFFFFF 0x1D0F 0x%X\r\n", CRC16_CITIFalse(test4,4));
printf("0x31323334 0x5349 0x%X\r\n", CRC16_CITIFalse(test5,4));
printf("____________________________________________________\r\n");
printf("\r\n CRC-32 Test\r\n");
printf("Algorithm : Direct Table\r\n");
printf("__________________________________________________________\r\n");
printf(" TestData Expecte Actual\r\n");
printf("__________________________________________________________\r\n");
printf("0x00000000 0x2144DF1C 0x%X\r\n", CRC32(test1, 4));
printf("0xF20183 0x24AB9D77 0x%X\r\n", CRC32(test2, 3));
printf("0x332255AABBCCDDEEFF 0xB0AE863D 0x%X\r\n", CRC32(test3, 9));
printf("0xFFFFFFFF 0xFFFFFFFF 0x%X\r\n", CRC32(test4, 4));
printf("0x31323334 0x9BE3E0A3 0x%X\r\n", CRC32(test5, 4));
printf("__________________________________________________________\r\n");
printf("\r\n CRC-32 Test\r\n");
printf("Algorithm : Reflected Direct Table\r\n");
printf("__________________________________________________________\r\n");
printf(" TestData Expecte Actual\r\n");
printf("__________________________________________________________\r\n");
printf("0x00000000 0x2144DF1C 0x%X\r\n", CRC32Ref(test1, 4));
printf("0xF20183 0x24AB9D77 0x%X\r\n", CRC32Ref(test2, 3));
printf("0x332255AABBCCDDEEFF 0xB0AE863D 0x%X\r\n", CRC32Ref(test3, 9));
printf("0xFFFFFFFF 0xFFFFFFFF 0x%X\r\n", CRC32Ref(test4, 4));
printf("0x31323334 0x9BE3E0A3 0x%X\r\n", CRC32Ref(test5, 4));
printf("__________________________________________________________\r\n");
return 0;
}
uint16_t CRC16_CITIFalse(const uint8_t *ptr,uint32_t len) // Algorithm:Direct Table
{
uint16_t CrcReg = 0xFFFF;
uint8_t TopByte = 0;
uint8_t index = 0;
while (0!=len)
{
TopByte = (uint8_t)((CrcReg & 0xFF00) >> 8);
CrcReg = (uint16_t)((uint32_t)CrcReg << 8);
index = (uint8_t)(*ptr) ^ TopByte;
CrcReg = CrcReg^Table16[index];
ptr++;
len--;
}
return CrcReg;
}
uint8_t GenerateT16(void)
{
uint16_t i=0;
uint16_t pxp = 0;
for (i = 0; i < 256; i++)
{
pxp = 0;
for (int8_t nbit = 7; nbit > -1; nbit--)
{
if (((i >> nbit) ^ (pxp >> 15)) & 0x0001)
{
//待测数据位和pxp高位相异,poly进行XOR
pxp = (uint16_t)((uint32_t)pxp << 1) ^ 0X1021;
}
else
{
//待测数据位和pxp高位相同,poly不进行XOR
pxp = (uint16_t)((uint32_t)pxp << 1);
}
}
Table16[i] = pxp;
}
return 0;
}
uint32_t CRC32(const uint8_t* ptr,uint32_t len) // Algorithm : Direct Table
{
uint32_t CrcReg = 0xFFFFFFFF;
uint8_t TopByte = 0;
uint8_t index = 0;
uint8_t tmp = 0;
while (0!=len)
{
tmp = ExchBitOrder((uint8_t)(*ptr),8); // RefIn : True
TopByte = (uint8_t)((CrcReg & 0xFF000000) >> 24);
CrcReg = (uint32_t)(CrcReg << 8);
index = (uint8_t)tmp ^ TopByte;
CrcReg = CrcReg^Table32[index];
ptr++;
len--;
}
CrcReg = ExchBitOrder(CrcReg,32); // RefOut : True
CrcReg = CrcReg ^ 0xFFFFFFFF; // XorOut : FFFFFFFF
return CrcReg;
}
uint8_t GenerateT32(void)
{
uint16_t i = 0;
uint32_t pxp = 0;
for (i = 0; i < 256; i++)
{
pxp = 0;
for (int8_t nbit = 7; nbit > -1; nbit--)
{
if (((i >> nbit) ^ (pxp >> 31)) & 0x00000001)
{
pxp = (pxp << 1) ^ 0x04C11DB7; //待测数据位和pxp高位相异,poly进行XOR
}
else
{
pxp = pxp << 1; //待测数据位和pxp高位相同,poly不进行XOR
}
}
Table32[i] = pxp;
}
return 0;
}
// Algorithm : Reflected Direct Table
uint32_t CRC32Ref(const uint8_t* ptr, uint32_t len)
{
uint32_t CrcReg = 0xFFFFFFFF;
uint8_t TopByte = 0;
uint8_t index = 0;
uint8_t tmp = 0;
while (0 != len)
{
tmp = *ptr; // RefIn : True X
TopByte = (uint8_t)(CrcReg & 0x000000FF);
CrcReg = (uint32_t)(CrcReg >> 8);
index = (uint8_t)tmp ^ TopByte;
CrcReg = CrcReg^Table32Ref[index];
ptr++;
len--;
}
// CrcReg = ExchBitOrder(CrcReg, 32); // RefOut : True X
CrcReg = CrcReg ^ 0xFFFFFFFF; // XorOut : FFFFFFFF
return CrcReg;
}
uint8_t GenerateT32Ref(void)
{
uint16_t i = 0;
uint32_t pxp = 0;
uint8_t iRef = 0;
for (i = 0; i < 256; i++)
{
pxp = 0;
for (int8_t nbit = 7; nbit > -1; nbit--)
{
if (((i >> nbit) ^ (pxp >> 31)) & 0x0001)
{
pxp = (pxp << 1) ^ 0x04C11DB7; //待测数据位和pxp高位相异,poly进行XOR
}
else
{
pxp = pxp << 1; //待测数据位和pxp高位相同,poly不进行XOR
}
}
iRef = (uint8_t)ExchBitOrder(i, 8);
pxp = ExchBitOrder(pxp, 32);
Table32Ref[iRef] = pxp;
}
return 0;
}
uint32_t ExchBitOrder(uint32_t data, uint8_t bitnum)
{
uint32_t bar = 0;
for (uint8_t j = 0; j < bitnum; j++)
{
if ((data >> j) & 0x01)
{
bar = (1 << (bitnum - 1 - j)) | bar;
}
}
return bar;
}
推荐阅读
-
推荐系统从原理到策略从算法到架构产品[翻译]
-
从理解到深入虚拟 DOM 并实施差异算法
-
反传销网8月30日发布:视频区块链里的骗子,币里的韭菜,杜子建骂人了!金融大V周召说区块链!——“一小帮骗子玩一大帮小白,被割韭菜,小白还轮流被割,割的就是你!” 什么区块链,统统是骗子 作者:周召(知乎金融领域大V,毕业于上海财经大学,目前任职上海某股权投资基金合伙人) 有人问我,区块链现在这么火,到底是不是骗局? 我的回答是: 是骗局。而且我并不是说数字货币是骗局,而是说所有搞区块链的都是骗局。 -01- 区块链是一种鸡肋技术 人类社会任何技术的发明应用,本质都是为了提高社会的生产效率。而所谓区块链技术本质不过是几种早已成熟的技术的大杂烩,冗余且十分低效,除了提高了洗钱和诈骗的效率以外,对人类社会的进步毫无贡献。 真正意义上的区块链得包含三个要素:分布式系统(包括记账和存储),无法篡改的数据结构,以及共识算法,三者互为基础和因果,就像三体世界一样。看上去挺让人不明觉厉的,而经过几年的瞎折腾,稍微懂点区块链的碰了几次壁后都已经渐渐明白区块链其实并没有什么卵用,区块链技术已经名存实亡,沦为了营销工具和传销组织的画皮。 因为符合上述定义的、以比特币为代表的原教旨区块链技术,是反效率的,从经济学角度来说,不但不是一种帕累托改进,甚至还可以说是一种帕累托倒退。 原教旨区块链技术的效率十分低下,因为要遍历所有节点,只能做非常轻量级的数据应用,一旦涉及到大量的数据传输与更新,区块链就瞎了。 一方面整条链交易速度会极慢,另一方面数据库容量极速膨胀,考虑到人手一份的存储机制,区块链其实是对存储资源和能源的一种极大的浪费。 这里还没有加上为了取得所谓的共识和挖矿消耗的巨大的能源,如果说区块链技术是屎,那么这波区块链投机浪潮可谓人类历史上最大规模的搅屎运动。 区块链也验证不了任何东西。 所谓的智能合约,即不智能,也非合约。我看有人还说,如果有了智能合约,就可以跟老板签一份放区块链上,如果明年销售业绩提升30%,就加薪10%,由于区块链不能篡改,不能抵赖,所以老板必须得执行,说得有板有眼,不懂行的愣一看,好像还真是那么回事。 但仔细一想,问题就来了。首先,在区块链上如何证明你真的达到了30%业绩提升?即便真的达到老板耍赖如何执行? 也就是说,如果区块链真这么厉害,要法院和仲裁干什么。 人类社会真正的符合成本效益原则的是代理制度。之前有人说要用区块链改造注册会计师行业,我不知道他准备怎么设计,我猜想他思路大概是这样的,首先肯定搞去中心化,让所有会计师到链上来,然后一个新人要成为注册会计师就要所有会计师同意并记录在链上。 那我就请问了,我每天上班累死累活,为什么还要花时间去验证一个跟我无关的的人的专业能力?最优做法当然是组织一个委员会,让专门的人来负责,这不就是现在注册会师协会干的事儿吗?区块链的逻辑相当于什么事情都要拿出来公投,这个绝对是扯淡的。 当然这么说都有点抬举区块链了,区块链技术本身根本没有判断是非能力,如果这么高级的人工智能,靠一个无脑分布式记账就能实现的话,我们早就进入共产主义社会了。 虽然EOS等数字货币采用了超级节点,通过再中心化的方式提高效率,有点行业协会的意思,是对区块链原教旨主义的一种修正,但是依然无法突破区块链技术最本质的局限性。有人说,私有链和联盟链是区块链技术的未来,也是扯淡,因为区块链技术没有未来。如果有,说明他是包装成区块链的伪区块链技术。 区块链所涉及的所有底层技术,不管是分布式数据库技术,加密技术,还是点对点传输技术等,基本都是早已存在没什么秘密可言的技术。 比特币系统最重要的特性是封闭性和自洽性,他验证不了任何系统自身以外产生的信息的真实性。 所谓系统自身产生的信息,就是数据库数据的变动信息,有价值的基本上有且只有交易信息。所以说比特币最初不过是中本聪一种炫技的产物,来证明自己对几种技术的掌握,你看我多牛逼,设计出了一个像三体一样的系统。因此,数字货币很有可能是区块链从始至终唯一的杀手应用。 比特币和区块链概念从诞生到今天已经快10年了,很多人说区块链技术在爆发的前夜,但这个前夜好像是不是有点过长了啊朋友,跟三体里的长夜有一拼啊。都说区块链技术像是90年代初的互联网,可是90年代初的互联网在十年发展后,已经出现了一大批伟大的公司,阿里巴巴在99年都成立了,区块链怎么除了币还是币呢? 正规的数字货币未来发展的形式无外乎几种,要么就是论坛币形式,或者类似股票的权益凭证等。问题是论坛币和股票之前,本来也都电子化了,区块链来了到底改变了什么呢? 所有想把TOKEN和应用场景结合起来的人最后都很痛苦,最后他们会发现区块链技术就是脱裤子放屁,自己辛苦搞半天,干嘛不自己作为中心关心门来收钱?最后这些人都产生了价值的虚无感,最终精神崩溃,只能发币疯狂收割韭菜,一边嘴里还说着我是个好人之类的奇怪的话。 因此,之前币圈链圈还泾渭分明,互相瞧不起,但这两年链圈逐渐坐不住了,想着是不是趁着泡沫没彻底破灭之前赶快收割一波,不然可能什么都捞不着了。 前段时间和一个名校毕业的链圈朋友瞎聊天,他说他们“致力于用区块链技术解决数字版权保护问题”,我就问他一个问题,你们如何保证你链的版权所有权声明是真实的,万一盗版者抢先一步把数据放在链上怎么办。他说他们的解决方案是连入国家数字版权保护中心的数据库进行验证…… 所以说区块链技术就是个鸡肋,研究到最后都会落入效率与真实性的黑洞,很多人一头扎进链圈后才发现,真正意义上的区块链技术,其实什么都干不了。 -02- 不是蠢就是坏的区块链媒体 空气币和区块链的造富神话,让区块链自媒体也开始迎风乱扭。一群群根本不知道区块链为何物的妖魔鬼怪纷纷进驻区块链自媒体战场,开始大放厥词胡编乱造。 任何东西,但凡只要和区块,链,分,分布式,记账,加密,验证,可追溯等等这些个关键词沾到哪怕一点点,这些所谓的区块链媒体人就会像狗闻到了屎了一样疯狂地把区块链概念往上套。 这让我想起曾经一度也是热闹非凡的物联网,我曾经去看过江苏一家号称要改变世界的“物联网”企业,过去一看是生产路由器的,我黑人问号脸,对方解释说没有路由器万物怎么互联,我觉得他说得好有道理,竟无言以对。 好,下面让我们进入奇葩共赏析时间,来看看区城链媒体经常有哪些危言耸听的奇谈怪论 区块链(分布式记账)的典型应用是*?? 正如前面所说,真正意义上的区块链分布式记账,不光包括“记”这个动作,还包括分布式存储和共识机制等。而*诞生远远早于区块链这个词的出现,勉强算是“分布式编辑”吧,就被很多区块链媒体拿来强行充当区块链技术应用的典范。 其实事实恰恰相反,*恰恰是去中心化失败的典范,现在如果没有精英和专业人士的编辑和维护,*早就没法看了。 区块链会促进社会分工?? 罗振宇好像就说过类似的话,虽然罗振宇说过很多没有逻辑的话,但这句话绝对是最没逻辑思维的。很多区块链自媒体也常常用这句话来忽悠老百姓,说分工代表效率提高社会进步,而区块链“无疑”会促进分工,他们的理由仅仅是分工和分布式记账都共用一个“分”字,就强行把他们扯到一起。 实际情况恰恰相反,区块链是逆分工的,区块链精神是号召所有人积极地参与到他不擅长也不想掺合的事情里面去。 区块链不能像上帝一样许诺他的子民死后上天国,只能给他们许诺你们是六度人脉中的第一级,我可以赚后面五级人的钱,你处于金字塔的顶端。
-
CRC 算法,从原理到实施
-
从《暗杀者》到《原神》的抽卡程序算法