php vbs加密还原
2015-10-23 09:58
489 查看
js加密还原
原过程
vbs加密还原
原过程
var pwd = theform.PassWord.value; var rndNum = 394058; rndNum = rndNum.toString(); var curPos = 0; var tmpStr,EnCryptStr = ""; for(Cnt=0;Cnt<pwd.length;Cnt++){ if(Cnt % rndNum.length == 0 ) curPos = 0; tmpStr = pwd.substring(Cnt,Cnt+1); EnCryptStr += String.fromCharCode(tmpStr.charCodeAt(0) - Cnt - rndNum.substring(curPos,curPos+1)); curPos +=1; } theform.PassWord.value = EnCryptStr;//Assigned the EncryptPassword value to the PassWord TextFiled theform.EnRndNum.value = rndNum;
用php还原 $pwd = ""; $rndNum = "394058"; $curPos = 0; $tmpStr = ""; $EnCryptStr = ""; for($Cnt=0;$Cnt<strlen($pwd);$Cnt++) { if($Cnt % strlen($rndNum) == 0 ) $curPos = 0; $tmpStr = substr($pwd,$Cnt,1); $EnCryptStr = $EnCryptStr. fromCharCode(charCodeAt($tmpStr) - $Cnt - substr($rndNum,$curPos,1)); $curPos +=1; } echo $EnCryptStr; echo ''<br>''; echo $rndNum; echo ''<br>''; echo EncryptString($EnCryptStr); function fromCharCode($codes) { if (is_scalar($codes)) $codes= func_get_args(); $str= ''''; foreach ($codes as $code) $str.= chr($code); return $str; } function charCodeAt($word) { if (is_array($word)) $arr = $word; else $arr = str_split($word); $bin_str = ''''; foreach ($arr as $value) $bin_str .= decbin(ord($value)); $bin_str = preg_replace(''/^.{4}(.{4}).{2}(.{6}).{2}(.{6})$/'',''$1$2$3'', $bin_str); return bindec($bin_str); }
vbs加密还原
原函数 Function EncryptString(InputText , ThePassword )''用户口令加密 Dim il_bit, il_x, il_y, il_z, il_len, i Dim is_out Password = InputText il_len = Len(Password) il_x = 0 il_y = 0 is_out = "" For i = 1 To il_len il_bit = AscW(Mid(Password, i, 1)) ''W系列支持unicode il_y = (il_bit * 13 Mod 256) + il_x is_out = is_out & ChrW(Fix(il_y)) ''取整 int和fix区别: fix修正负数 il_x = il_bit * 13 / 256 Next is_out = is_out & ChrW(Fix(il_x)) Password = is_out il_len = Len(Password) il_x = 0 il_y = 0 is_out = "" For i = 1 To il_len il_bit = AscW(Mid(Password, i, 1)) ''取前4位值 il_y = il_bit / 16 + 64 is_out = is_out & ChrW(Fix(il_y)) ''取后4位值 il_y = (il_bit Mod 16) + 64 is_out = is_out & ChrW(Fix(il_y)) Next EncryptString = is_out End Function }
用php还原 function EncryptString($Password){ //密码前端加密部分 $il_len = strlen($Password); $il_x = 0; $il_y = 0; $is_out = ""; for($i=0;$i< $il_len;$i++){ $il_bit = ord(substr($Password, $i, 1)); $il_y = ($il_bit * 13 % 256) + $il_x; $is_out = $is_out. Chr(fix($il_y)); $il_x = $il_bit * 13 / 256; } $is_out = $is_out. Chr(fix($il_x)); $Password = $is_out; $il_len = strlen($Password); $il_x = 0; $il_y = 0; $is_out = ""; for($i=0;$i<$il_len;$i++){ $il_bit = ord(substr($Password, $i, 1)); $il_y = $il_bit / 16 + 64; $is_out = $is_out. Chr(fix($il_y)); $il_y = ($il_bit % 16) + 64; $is_out = $is_out. Chr(fix($il_y)); } return $is_out; } function fix($il_y) { if(floor($il_y) < 0){ return floor($il_y)+1; }else{ return floor($il_y); } }
相关文章推荐
- php Mcrypt
- 浅谈php7的重大新特性
- PHP开发环境思考
- Laravel 5 系统架构:服务提供者、服务容器、Contracts、Facades
- php 类型(对象)提示
- PHP中获取当前页面的完整URL
- (php)session和cookie简单理解要点;
- 浅谈php7的重大新特性
- 解决更换PHP5.4以上版本后Dedecms后台登录空白问题的方法
- 10款实用的PHP开源工具
- 一个简单至极的PHP缓存类代码
- php中的引用传值
- phpcms整合Ucenter找回密码无效的解决方法
- phpcms黄页留言复制成在线报名系统
- 解决PHPCMS会员注册未对Ucenter中会员数据进行验证的问题
- yii2 layout
- php unexpected end of file错误处理
- yii2 目录结构
- php_strip_whitespace() 函数返回已删除 PHP 注释以及空白字符的源代码文件。
- yii2 添加表前缀