为编程爱好者分享易语言教程源码的资源网
三叶资源网易语言免费公开课
三叶资源网官方③群:33301895 三叶资源网解压密码 C全站文字广告,诚邀与您合作 三叶资源网培训教程视频 花呗变现,花呗变现
三叶资源网官方③群:33301895 三叶资源网访问导航 B全站文字广告,诚邀与您合作 三叶资源网培训教程视频 花呗变现,花呗变现

网站首页 易语言相关 网络相关源码 正文

易语言PHP加密源码

三叶资源网 2012-05-27 网络相关源码 179 ℃ 0 评论
FreeYun网络验证

资源介绍:

例程程序置入汇编代码,调用API函数实现易语言与PHP通讯加密协议。

<?PHP
session_start();
ini_set("display_errors", 0);
$MsgKey = 'www.hyun8.com';//通讯秘钥

if(substr($_POST['Data'],0,12)=='GET_Temp_Key'){ // 获取临时的加密钥匙
	$_SESSION[Temp_Key]=Temp_Key();//生产随机钥匙 写到SESSION里面 SESSION不懂可以百度搜索下
	exit(ByteHex(ARSC($_SESSION[Temp_Key],$MsgKey))); //返回临时钥匙 将钥匙加密
}
$temp = ARSC(HEXByte($_POST['Data']),$_SESSION[Temp_Key]);//使用SESSION里面临时钥匙解密
$temp = explode('|',$temp);//吧已解密的数据分割成数组
$_SESSION[Temp_Key]=md5($_SESSION[Temp_Key]);//将临时钥匙md5一次防止抓包截获重复利用并写到SESSION里面
if ($temp[0] == "Login") { // 判断第一个数组
	if ($temp[1] == "Username" and $temp[2]=="Password") { //判断账号密码是否正确
	exit(ByteHex(ARSC("login,ok",$_SESSION[Temp_Key])));//使用md5以后的临时钥匙加密数据 且返回加密数据  
	}
	exit(ByteHex(ARSC("login,no",$_SESSION[Temp_Key])));//使用md5以后的临时钥匙加密数据 且返回加密数据

//因为正在重写中 部分代码未完善 敬请期待 后续更新 已实现动态加密 防止截获数据重复提交
}


function HEXByte($s){
	$r = "";
	for ( $i = 0; $i<strlen($s); $i += 2)
	{
		$x1 = ord($s{$i});
		$x1 = ($x1>=48 && $x1<58) ? $x1-48 : $x1-97+10;
		$x2 = ord($s{$i+1});
		$x2 = ($x2>=48 && $x2<58) ? $x2-48 : $x2-97+10;
		$r .= chr((($x1 << 4) & 0xf0) | ($x2 & 0x0f));
	}
	return $r;
}
function ByteHex($s) {
	$r = "";
	$hexes = array ("0","1","2","3","4","5","6","7","8","9","a","b","c","d","e","f");
	for ($i=0; $i<strlen($s); $i++) {$r .= ($hexes [(ord($s{$i}) >> 4)] . $hexes [(ord($s{$i}) & 0xf)]);}
	return $r;
}

function ARSC($data,$keys)
{  
	$key[] ="";
	$box[] ="";
	$pwd_length = strlen($keys);
	$data_length = strlen($data);
	for ($i = 0; $i < 256; $i++)
	{
		$key[$i] = ord($keys[$i % $pwd_length]);
		$box[$i] = $i;
	}
	for ($j = $i = 0; $i < 256; $i++)
	{
		$j = ($j + $box[$i] + $key[$i]) % 256;
		$tmp = $box[$i];
		$box[$i] = $box[$j];
		$box[$j] = $tmp;
	}
	for ($a = $j = $i = 0; $i < $data_length; $i++)
	{
		$a = ($a + 1) % 256;
		$j = ($j + $box[$a]) % 256;
		$tmp = $box[$a];
		$box[$a] = $box[$j];
		$box[$j] = $tmp;

		$k = $box[(($box[$a] + $box[$j]) % 256)];
		$cipher .= chr(ord($data[$i]) ^ $k);
	}
	return $cipher;
}

function Temp_Key(){
    if (function_exists('com_create_guid')){
        return com_create_guid();
    }else{
        mt_srand((double)microtime()*10000);//optional for php 4.2.0 and up.
        $charid = strtoupper(md5(uniqid(rand(), true)));
        $hyphen = chr(45);// "-"
        $uuid = chr(123)// "{"
                .substr($charid, 0, 8).$hyphen
                .substr($charid, 8, 4).$hyphen
                .substr($charid,12, 4).$hyphen
                .substr($charid,16, 4).$hyphen
                .substr($charid,20,12)
                .chr(125);// "}"
        return $uuid;
    }
}
?>

资源作者:

@三叶自学网

资源图片:

易语言PHP加密源码.png    

资源下载:


Tags:

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网官方③群:33301895

本文暂时没有评论,来添加一个吧(●'◡'●)

欢迎 发表评论:

百度站内搜索
交流QQ群:33301895
三叶资源网官方③群:33301895
加群全凭信仰,群里有的资源网站也会有。
群里只是能及时交流,群主会尽力解答一些会的问题。
设置付费入群,只是为了过滤一些小号无意义广告。
所以不必要为了1块钱加群又退出
群主在群内发的红包都够你抢回来还有的多,更何况还能交流学习。
网站分类
随机tag
识别算法易语言源码二值化WebSocket取色器EC反编译薅羊毛网络验证系统服务觅风易语言教程大漠插件OEM信息迅雷网站登录UDP源码dom支持库开源因特网服务支持库64位进程Ex_DirectUICURL
最新评论