当前位置: 首页 > 图文教程 > 网络编程 > Javascript > eval(function(p,a,c,k,e,d)系列解密javascript程序

Javascript
推荐:极酷右键菜单
跟随鼠标旋转的文字
拖动层效果,兼容IE和FF!
由 element.appendChild(newNode) ,谈开去
发个自己写的表格操作类(添加,删除,排序,上移,下移)
小议Function.apply() 之一------(函数的劫持与对象的复制)
小议Function.apply()之二------利用Apply的参数数组化来提高 JavaScript程序性能
JavaScript中令你抓狂的魔术变量
[原创]网络复制内容时常用的正则+editplus
createElement和onclick
很有趣的一段textarea
用 JavaScript 给站外链接的 cursor 进行改造
一段好玩的JavaScript代码
IE中实现全屏广告代码,霸道无比.
phpwind放自动注册方法
线路分流自动跳转代码;希望对大家有用!
鼠标放在放在输入框上面提示效果
常用js脚本
硬盘浏览程序,保存成网页格式便可使用
Js的MessageBox

Javascript 中的 eval(function(p,a,c,k,e,d)系列解密javascript程序


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-12   浏览: 179 ::
收藏到网摘: n/a

<script>
a=62;
function encode() {
var code = document.getElementById('code').value;
code = code.replace(/[\r\n]+/g, '');
code = code.replace(/'/g, "\\'");
var tmp = code.match(/\b(\w+)\b/g);
tmp.sort();
var dict = [];
var i, t = '';
for(var i=0; i<tmp.length; i++) {
if(tmp[i] != t) dict.push(t = tmp[i]);
}
var len = dict.length;
var ch;
for(i=0; i<len; i++) {
ch = num(i);
code = code.replace(new RegExp('\\b'+dict[i]+'\\b','g'), ch);
if(ch == dict[i]) dict[i] = '';
}
document.getElementById('code').value = "eval(function(p,a,c,k,e,d){e=function(c){return(c<a?'':e(parseInt(c/a)))+((c=c%a)>35?String.fromCharCode(c+29):c.toString(36))};if(!''.replace(/^/,String)){while(c--)d[e(c)]=k[c]||e(c);k=[function(e){return d[e]}];e=function(){return'\\\\w+'};c=1};while(c--)if(k[c])p=p.replace(new RegExp('\\\\b'+e(c)+'\\\\b','g'),k[c]);return p}("
+ "'"+code+"',"+a+","+len+",'"+ dict.join('|')+"'.split('|'),0,{}))";
}
function num(c) {
return(c<a?'':num(parseInt(c/a)))+((c=c%a)>35?String.fromCharCode(c+29):c.toString(36));
}
function run() {
eval(document.getElementById('code').value);
}
function decode() {
var code = document.getElementById('code').value;
code = code.replace(/^eval/, '');
document.getElementById('code').value = eval(code);
}
</script>

<textarea id=code cols=80 rows=20>
</textarea><br>
<input type=button onclick=encode() value=编码>
<input type=button onclick=run() value=执行>
<input type=button onclick=decode() value=解码>
点击运行可以看到效果:
[Ctrl+A 全选 提示:你可先修改部分代码,再按运行]