易语言MASM置入代码文本型字符串的URL编码解码 PHP的urldecode()函数算法(返回字节集)

QAQ

1. 
   
2. .版本 2
   
3. .支持库 spec
   
4. 
   
5. .程序集 程序集1
   
6. 
   
7. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
8. 
   
9. 
   
10. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
    
11. 返回 (0)  ' 可以根据您的需要返回任意数值
    
12. 
    
13. .子程序 _临时子程序
    
14. .局部变量 解码后, 字节集
    
15. 
    
16. ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
    
17. 解码后 ＝ URL解码 (“Hello+World%21%d6%D0%CE%C4%B2%E2%CA%D41234567890%2b%2B”)
    
18. 调试输出 (解码后, 到文本 (解码后))
    
19. 
    
20. 
    
21. .子程序 URL解码, 字节集, 公开, 与PHP的 urldecode() 函数功能相同
    
22. .参数 文本, 文本型
    
23. .局部变量 返回值, 字节集
    
24. 
    
25. 返回值 ＝ 取空白字节集 (取文本长度 (文本))
    
26. 置入代码 ({ 235, 113, 128, 249, 48, 114, 7, 128, 249, 57, 119, 2, 235, 26, 128, 249, 65, 114, 7, 128, 249, 70, 119, 2, 235, 14, 128, 249, 97, 114, 7, 128, 249, 102, 119, 2, 235, 2, 50, 201, 195, 128, 250, 48, 114, 10, 128, 250, 57, 119, 5, 128, 234, 48, 235, 32, 128, 250, 65, 114, 10, 128, 250, 70, 119, 5, 128, 234, 55, 235, 17, 128, 250, 97, 114, 10, 128, 250, 102, 119, 5, 128, 234, 87, 235, 2, 50, 210, 195, 102, 82, 138, 213, 232, 199, 255, 255, 255, 138, 218, 192, 227, 4, 138, 209, 232, 187, 255, 255, 255, 10, 218, 102, 90, 195, 80, 83, 81, 82, 86, 87, 139, 117, 252, 11, 246, 117, 2, 235, 110, 139, 126, 4, 11, 255, 117, 2, 235, 101, 131, 198, 8, 139, 69, 8, 11, 192, 117, 2, 235, 89, 139, 0, 11, 192, 117, 2, 235, 81, 51, 255, 50, 255, 138, 24, 10, 219, 117, 2, 235, 66, 128, 251, 37, 117, 33, 138, 72, 1, 232, 74, 255, 255, 255, 10, 201, 116, 21, 138, 233, 138, 72, 2, 232, 60, 255, 255, 255, 10, 201, 116, 7, 183, 1, 232, 136, 255, 255, 255, 128, 251, 43, 117, 6, 10, 255, 117, 2, 179, 32, 136, 28, 55, 71, 128, 255, 1, 117, 5, 131, 192, 3, 235, 1, 64, 235, 180, 137, 126, 252, 95, 94, 90, 89, 91, 88 })
    
27. ' jmp MAIN
    
28. ' IS_HEX_BYTE:
    
29. ' .if cl >= 48 && cl <= 57
    
30. ' .elseif cl >= 65 && cl <= 70
    
31. ' .elseif cl >= 97 && cl <= 102
    
32. ' .else
    
33. ' xor cl,cl
    
34. ' .endif
    
35. ' ret
    
36. ' HEX2DEC:
    
37. ' .if dl >= 48 && dl <= 57
    
38. ' sub dl,48
    
39. ' .elseif dl >= 65 && dl <=70
    
40. ' sub dl,55
    
41. ' .elseif dl >= 97 && dl <=102
    
42. ' sub dl,87
    
43. ' .else
    
44. ' xor dl,dl
    
45. ' .endif
    
46. ' ret
    
47. ' BYTE_HEX2DEC:
    
48. ' push dx
    
49. ' mov dl,ch
    
50. ' call HEX2DEC
    
51. ' mov bl,dl
    
52. ' shl bl,4
    
53. ' mov dl,cl
    
54. ' call HEX2DEC
    
55. ' or bl,dl
    
56. ' pop dx
    
57. ' ret
    
58. ' MAIN:
    
59. ' push eax
    
60. ' push ebx
    
61. ' push ecx
    
62. ' push edx
    
63. ' push esi
    
64. ' push edi
    
65. ' mov esi,[ebp-4]
    
66. ' .if esi == 0
    
67. ' jmp ASM_END
    
68. ' .endif
    
69. ' mov edi,[esi+4]
    
70. ' .if edi == 0
    
71. ' jmp ASM_END
    
72. ' .endif
    
73. ' add esi,8
    
74. ' mov eax,[ebp+8]
    
75. ' .if eax == 0
    
76. ' jmp ASM_END
    
77. ' .endif
    
78. ' mov eax,[eax]
    
79. ' .if eax == 0
    
80. ' jmp ASM_END
    
81. ' .endif
    
82. ' xor edi,edi
    
83. ' .while 1
    
84. ' xor bh,bh
    
85. ' mov bl,[eax]
    
86. ' .if !bl
    
87. ' .break
    
88. ' .endif
    
89. ' .if bl == 37
    
90. ' mov cl,[eax+1]
    
91. ' call IS_HEX_BYTE
    
92. ' .if cl
    
93. ' mov ch,cl
    
94. ' mov cl,[eax+2]
    
95. ' call IS_HEX_BYTE
    
96. ' .if cl
    
97. ' mov bh,1
    
98. ' call BYTE_HEX2DEC
    
99. ' .endif
    
100. ' .endif
     
101. ' .endif
     
102. ' .if bl == 43 && bh == 0
     
103. ' mov bl,32
     
104. ' .endif
     
105. ' mov [esi+edi],bl
     
106. ' inc edi
     
107. ' .if bh == 1
     
108. ' add eax,3
     
109. ' .elseif
     
110. ' inc eax
     
111. ' .endif
     
112. ' .endw
     
113. ' mov [esi-4],edi
     
114. ' ASM_END:
     
115. ' pop edi
     
116. ' pop esi
     
117. ' pop edx
     
118. ' pop ecx
     
119. ' pop ebx
     
120. ' pop eax
     
121. 
     
122. 返回 (返回值)
     

复制代码

1心1亿

66666666