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

Javascript
js 页面输出值
javascript实现的网页局布刷新效果
js+CSS 图片等比缩小并垂直居中实现代码
在IE,Firefox,Safari,Chrome,Opera浏览器上调试javascript
JavaScript获得选中文本内容的方法
asp 取文本框名称代码
JavaScript 基础问答二
JavaScript 基础问答三
支持多浏览器(IE、Firefox、Opera)剪切板复制函数_IT学习网修正版
js 深拷贝函数
Javascript 浅拷贝、深拷贝的实现代码
Javascript !!的作用
Javascript 表单之间的数据传递代码
JS 网页安全色调色板 DW风格
右下角弹出信息(自动关闭)
一个判断email合法性的函数[非正则]
javascript 回车替换成TAB的脚本
js 设置css的定位
JavaScript 拖拉缩放效果
javascript 公用拖拽类代码

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-12   浏览: 341 ::
收藏到网摘: 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 全选 提示:你可先修改部分代码,再按运行]