设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › [榨干芯片性能]STC15F104E/W 8脚单片机 MD5算法移植+软 ...
返回列表 发新帖
查看: 4645|回复: 4
收起左侧

[榨干芯片性能]STC15F104E/W 8脚单片机 MD5算法移植+软串口发送源程序

  [复制链接]
ID:57657 发表于 2020-7-12 10:16 | 显示全部楼层 |阅读模式
本帖最后由 npn 于 2020-7-23 22:43 编辑

STC15F104E/STC15F104W 单片机芯片,字符串写入EEPROM的第1个扇区 (限511字节,最后1字节为空字符0)。
由于该型号芯片的RAM容量有限，使用EEPROM的第2个扇区扩展RAM空间。
晶振频率:11.0592Mhz 波特率:9600，如有问题请在楼下跟帖回复。
(2020-07-23) V1.1 删改部分函数变量，优化RAM占用。
EEPROM.png
计算结果V1.1.png

单片机源程序如下:

  2. #include "stc15f104e.h"
  3. #include "intrins.h"
  4. #define ReverseIntBytes(l) l<<24|l>>24|(l&0xFF0000)>>8|(l&0xFF00)<<8;
  5. #define XchgVar(A,B) A=A^B;B=A^B;A=A^B;
  6. #define U8 unsigned char
  7. #define U16 unsigned int
  8. #define U32 unsigned long
  9. U8 code  *eeprom = 0x1000;
  10. U32 code *eeprom32 = 0x1000;
  11. U32 code ti[]={
  12.         0xd76aa478,0xe8c7b756,0x242070db,0xc1bdceee,
  13.         0xf57c0faf,0x4787c62a,0xa8304613,0xfd469501,0x698098d8,
  14.         0x8b44f7af,0xffff5bb1,0x895cd7be,0x6b901122,0xfd987193,
  15.         0xa679438e,0x49b40821,0xf61e2562,0xc040b340,0x265e5a51,
  16.         0xe9b6c7aa,0xd62f105d,0x02441453,0xd8a1e681,0xe7d3fbc8,
  17.         0x21e1cde6,0xc33707d6,0xf4d50d87,0x455a14ed,0xa9e3e905,
  18.         0xfcefa3f8,0x676f02d9,0x8d2a4c8a,0xfffa3942,0x8771f681,
  19.         0x6d9d6122,0xfde5380c,0xa4beea44,0x4bdecfa9,0xf6bb4b60,
  20.         0xbebfbc70,0x289b7ec6,0xeaa127fa,0xd4ef3085,0x04881d05,
  21.         0xd9d4d039,0xe6db99e5,0x1fa27cf8,0xc4ac5665,0xf4292244,
  22.         0x432aff97,0xab9423a7,0xfc93a039,0x655b59c3,0x8f0ccc92,
  23.         0xffeff47d,0x85845dd1,0x6fa87e4f,0xfe2ce6e0,0xa3014314,
  24.         0x4e0811a1,0xf7537e82,0xbd3af235,0x2ad7d2bb,0xeb86d391
  25.         };

  27. U8 code ss[4][4]={
  28.         {7,12,17,22},{5,9,14,20},{4,11,16,23},{6,10,15,21}
  29. };

  31. union md5_key {
  32.         U32 l[4];
  33.         U8 c[16];
  34. };

  36. union udata {
  37.         U32 l;
  38.         U8 c[4];
  39. };

  41. union udata2 {
  42.         U32 l[2];
  43.         U8 c[8];
  44. };

  46.         sbit txd = P3^1;
  47.         void delay_uart(){
  48.             U8 data a,b;
  49.             for(b=3;b>0;b--)
  50.                 for(a=94;a>0;a--);
  51.         }

  53.         void txd_data(U8 i) {
  54.                 U8 j = 1;
  55.                 delay_uart();
  56.                 txd = 0;
  57.                 do {
  58.                         delay_uart();
  59.                         txd = i & j;
  60.                         j <<= 1;
  61.                 } while (j);
  62.                 delay_uart();
  63.                 txd = 1;
  64.         }

  66.         void send_text(U8 *text){
  67.                 for(;*text;text++){
  68.                         txd_data(*text);
  69.             }
  70.         }

  72. void eeprom_open(){
  73.         IAP_CONTR = 0x83;
  74.         IAP_CMD = 0;
  75.         IAP_ADDRH        = 0x00;
  76.         IAP_ADDRL        = 0x00;
  77. }

  79. void eeprom_close(){
  80.         IAP_CONTR = 0;
  81.         IAP_CMD = 0;
  82.         IAP_TRIG = 0;
  83.         IAP_ADDRH = 0;
  84.         IAP_ADDRL = 0;
  85. }

  87. void eeprom_write(U16 addr,U8 dat){
  88.         IAP_CONTR = 0x83;
  89.         IAP_CMD = 2;
  90.         IAP_ADDRL = addr;
  91.         IAP_ADDRH = addr >> 8;
  92.         IAP_DATA = dat;
  93.         IAP_TRIG = 0x5a;
  94.         IAP_TRIG = 0xa5;
  95.         _nop_();_nop_();_nop_();
  96. }

  98. void eeprom_erase(U16 addr){
  99.     IAP_CONTR = 0x83;
  100.     IAP_CMD = 3;
  101.     IAP_ADDRL = addr;
  102.     IAP_ADDRH = addr >> 8;
  103.     IAP_TRIG = 0x5a;
  104.     IAP_TRIG = 0xa5;
  105.     _nop_(); _nop_();_nop_();
  106. }

  108. U8 block = 0;

  110. void witre_md5_data(U8 address,U8 byte){
  111.         eeprom_write(0x200|((block<<6)|address),byte);
  112. }

  114. U8* md5(U8 *i){
  115.         union md5_key md5_key;
  116.         union udata2 md;
  117.         U32 A,B,C,D,g;
  118.         U16 z,pc=0,len=0,gn;
  119.         U8 a,c,r,m;
  120.         bit f,s128=0;
  121.         md5_key.l[0] = 0x67452301;
  122.         md5_key.l[1] = 0xefcdab89;   
  123.         md5_key.l[2] = 0x98badcfe;
  124.         md5_key.l[3] = 0x10325476;
  125.         for(;*i;i++) len++;
  126.         gn=((len+8)>>6)+1;
  127.         i -= len;
  128.                 for(z=1;z<=gn;z++){
  129.                         for(c = 0;c < (z == gn ? 56 : 64); c++){
  130.                         f = pc >= len;
  131.                         a = pc & 63 ^ 3;
  132.                         if(f && !s128){
  133.                                  s128=1;
  134.                                 witre_md5_data(a,128);
  135.                         } else {
  136.                                 witre_md5_data(a,f ? 0 : *i++);
  137.                         }
  138.                         pc++;
  139.                 }
  140.         if(z == gn) {
  141.                 md.l[0]=len;md.l[1]=0;
  142.                 for(a=0;a<3;a++){
  143.                         f = 0;
  144.                         for(c=0;c<8;c++){
  145.                                 m=md.c[c^3];
  146.                                 r= m<<1|f;
  147.                                 f= m>>7;
  148.                                 md.c[c^3]=r;
  149.                         }
  150.                 }
  151.                 for(c=0;c<8;c++){
  152.                         witre_md5_data(56|c,md.c[c]);
  153.                 }
  154.         }

  156.         A=md5_key.l[0];B=md5_key.l[1];
  157.         C=md5_key.l[2];D=md5_key.l[3];
  158.         for(a=0;a<64;a++){
  159.                 switch(a>>4){
  160.                         case 0:{g=(B&C)|((~B)&D);c=a;break;}
  161.                         case 1:{g=(D&B)|((~D)&C);c=5*a+1;break;}
  162.                         case 2:{g=B^C^D;c=3*a+5;break;}
  163.                         case 3:{g=C^(B|(~D));c=7*a;break;}
  164.                 }

  166.         A=B+_lrol_(A+g + eeprom32[0x80 | (block << 4) | (c & 15)] + ti[a],ss[a>>4][a&3]);
  167.         XchgVar(A, D); XchgVar(B, D); XchgVar(C, D);
  168.         }
  169.                 if(++block > 7){
  170.                         eeprom_erase(0x200);
  171.                         block = 0;
  172.                 }

  174.         md5_key.l[0]+=A;md5_key.l[1]+=B;
  175.         md5_key.l[2]+=C;md5_key.l[3]+=D;
  176.                 }

  178.                 for(c=0;c<4;c++){
  179.                         md5_key.l[c]=ReverseIntBytes(md5_key.l[c]);
  180.                 }
  181.         return md5_key.c;
  182. }

  184. void main(){
  185. U8 z;
  186. U8* md5_answer;
  187. eeprom_open();
  188. eeprom_erase(0x200);
  189. send_text("STC15F104E MD5 V1.1\r\n");
  190. send_text("md5(\"");
  191. send_text(eeprom);
  192. send_text("\")=");
  193. md5_answer = md5(eeprom);
  194. for (z = 0; z < 16; z++) {
  195.         txd_data(((md5_answer[z] >> 4) < 10 ? 48 : 87) + (md5_answer[z] >> 4));
  196.         txd_data(((md5_answer[z] & 15) < 10 ? 48 : 87) + (md5_answer[z] & 0xF));
  197. }

  199. send_text("\r\n");
  200. eeprom_close();
  201. while (1) {
  202.         WDT_CONTR = 0x37;
  203. }


  206. }

复制代码

51hei.png
所有资料51hei提供下载:

MD5-STC15F104E V1.1.zip (13.15 KB, 下载次数: 39)
MD5, 单片机, 算法

评分

参与人数 1黑币 +100 收起 理由
admin + 100 共享资料的黑币奖励！

查看全部评分

相关帖子
回复

使用道具 举报

ID:328014 发表于 2020-7-12 16:43 | 显示全部楼层
这个牛逼啊,单片机居然能干这么高端的事情
回复

使用道具 举报

ID:17647 发表于 2020-7-13 15:45 | 显示全部楼层
正在找STC15F104E/W 软串口发送源程序，谢谢了！
回复

使用道具 举报

ID:807591 发表于 2020-7-24 15:32 | 显示全部楼层
EEPROM 当RAM用会不会很慢
回复

使用道具 举报

ID:57657 发表于 2020-7-24 22:47 | 显示全部楼层
szb314 发表于 2020-7-24 15:32
EEPROM 当RAM用会不会很慢

添加IO口赋值语句，然后用逻辑分析仪测量即可。
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表