易语言MASM置入代码实现MD5的 F(X,Y,Z) G(X,Y,Z) H(X,Y,Z) I(X,Y,Z) 函数(返回整数型)

EAX

1. 
   
2. .版本 2
   
3. 
   
4. .程序集 程序集1
   
5. 
   
6. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
7. 
   
8. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
   
9. 返回 (0)  ' 可以根据您的需要返回任意数值
   
10. 
    
11. .子程序 _临时子程序
    
12. 
    
13. ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
    
14. 
    
15. 检查 (MD5_F (1234567890, 777777777, 987654321) ＝ 979004017)
    
16. 检查 (MD5_G (1234567890, 777777777, 987654321) ＝ 211260112)
    
17. 检查 (MD5_H (1234567890, 777777777, 987654321) ＝ 1561565202)
    
18. 检查 (MD5_I (1234567890, 777777777, 987654321) ＝ -471046737)
    
19. 
    
20. .子程序 MD5_F, 整数型, , F(X,Y,Z) = ((X&Y)|(~X&Z))
    
21. .参数 X, 整数型
    
22. .参数 Y, 整数型
    
23. .参数 Z, 整数型
    
24. 
    
25. 置入代码 ({ 83, 139, 69, 8, 35, 69, 12, 139, 93, 8, 247, 211, 35, 93, 16, 11, 195, 91, 201, 194, 12, 0 })
    
26. ' push ebx
    
27. ' mov eax,[ebp+8]
    
28. ' and eax,[ebp+12]
    
29. ' mov ebx,[ebp+8]
    
30. ' not ebx
    
31. ' and ebx,[ebp+16]
    
32. ' or eax,ebx
    
33. ' pop ebx
    
34. ' leave
    
35. ' retn 12
    
36. 返回 (0)
    
37. ' 返回 (位或 (位与 (X, Y), 位与 (位取反 (X), Z)))
    
38. 
    
39. .子程序 MD5_G, 整数型, , G(X,Y,Z) = ((X&Z)|(Y&~Z))
    
40. .参数 X, 整数型
    
41. .参数 Y, 整数型
    
42. .参数 Z, 整数型
    
43. 
    
44. 置入代码 ({ 83, 139, 69, 8, 35, 69, 16, 139, 93, 16, 247, 211, 35, 93, 12, 11, 195, 91, 201, 194, 12, 0 })
    
45. ' push ebx
    
46. ' mov eax,[ebp+8]
    
47. ' and eax,[ebp+16]
    
48. ' mov ebx,[ebp+16]
    
49. ' not ebx
    
50. ' and ebx,[ebp+12]
    
51. ' or eax,ebx
    
52. ' pop ebx
    
53. ' leave
    
54. ' retn 12
    
55. 返回 (0)
    
56. ' 返回 (位或 (位与 (X, Z), 位与 (Y, 位取反 (Z))))
    
57. 
    
58. .子程序 MD5_H, 整数型, , H(X,Y,Z) = (X^Y^Z)
    
59. .参数 X, 整数型
    
60. .参数 Y, 整数型
    
61. .参数 Z, 整数型
    
62. 
    
63. 置入代码 ({ 139, 69, 8, 51, 69, 12, 51, 69, 16, 201, 194, 12, 0 })
    
64. ' mov eax,[ebp+8]
    
65. ' xor eax,[ebp+12]
    
66. ' xor eax,[ebp+16]
    
67. ' leave
    
68. ' retn 12
    
69. 返回 (0)
    
70. ' 返回 (位异或 (X, Y, Z))
    
71. 
    
72. .子程序 MD5_I, 整数型, , I(X,Y,Z) = (Y^(X|~Z))
    
73. .参数 X, 整数型
    
74. .参数 Y, 整数型
    
75. .参数 Z, 整数型
    
76. 
    
77. 置入代码 ({ 139, 69, 16, 247, 208, 11, 69, 8, 51, 69, 12, 201, 194, 12, 0 })
    
78. ' mov eax,[ebp+16]
    
79. ' not eax
    
80. ' or eax,[ebp+8]
    
81. ' xor eax,[ebp+12]
    
82. ' leave
    
83. ' retn 12
    
84. 返回 (0)
    
85. ' 返回 (位异或 (Y, 位或 (X, 位取反 (Z))))
    
86. 
    

复制代码