<?php
/**
 *@desc 飞信短信发送类(Encoded:UTF-8)
 *使用方法：
 * * $myNewFetion = new myFetion('1381111111', 'password','SELF', '测试消息' ); // 给自己发
 * $myNewFetion = new myFetion('1381111111', 'password','1382222222', '测试消息' ); // 给一个人发
 * $myNewFetion = new myFetion('1381111111', 'password','1382222222,13833333333,13844444444', '测试消息' ); // 给很多人发
 * $myNewFetion = new myFetion('1381111111', 'password','ALL', '测试消息' ); // 给所有飞信好友发
 
 *非常感谢CSDN论坛ycTIN在MD5加密部分的帮助!
 *本程序未做容错处理,为防止诈骗短信乱发，程序不提供添加好友功能
 *测试URL:http://i.isclab.org/tools/fetion.php
 *
 *程序运行条件：
 *1.服务器能够访问飞信服务器nav.fetion.com.cn的443端口（https）
 *2.服务器端PHP程序能够创建socket访问221.176.31.4的8080端口
 *
 *关键技术：
 *1.CURL + SSL通讯
 *2.PHP Socket编程
 *3.PHP MD5函数的深入理解
 *4.PHP DOM处理XML
 *
 *@author shadu AT foxmail DOT com /CNOS(http://bbs.ouropen.org)
 *@version 2010-03-04
 *@copyright 任意拷贝和修改！
 *@update 修正了只能给自己发短信的bug，感谢jjchibin的提醒
 *@update 增加了群发功能
 **/
class myFetion{
    private $mobile_no   = '1381111111'; // 发送者手机号
    private $fetion_no   = '738713940' ; // 发送者飞信号，程序自动获取
    private $fetion_uri  = 'sip:123456789@fetion.com.cn;p=1234'; // 发送者的sip
    private $fetion_pwd  = 'mypassword' ; // 发送者飞信登录密码
    private $cookie_file = 'cookie.txt' ; // 临时存放的cookie文件
 
    public $SMS_RECEIVER = '1382222222' ; //  短信接收者手机号码 
    public $SMS_TEXT      = 'sms test' ; // 短信内容，支持中文
 
    private $fetion_ContactList = "" ;
    private $fetion_ContactMapping = array();
 
    private $NONCE       = 'AAB3238922BCC25A6F606EB525FFDC56' ; // SIPC服务器返回,每次不同
    private $C_NONCE     = 'AAB3238922BCC25A6F606EB525FFDC56' ; // 是随机的，但是固定值也没关系
    private $SSIC        = '' ; // cookie中提取的变量
    private $RESPONSE   = '' ; // 加密后的密钥串
 
 
    private $url_nav            = 'https://nav.fetion.com.cn/nav/getsystemconfig.aspx' ; // 443端口获取导航信息
    private $domain_fetion      = 'fetion.com.cn' ; // 飞信服务器的域名
 
    private $SIPC_PROXY         = '221.176.31.4:8080';  //  8080端口飞信通讯使用 
    private $SSI_PROXY_SIGN_IN  = 'https://uid.fetion.com.cn/ssiportal/SSIAppSignIn.aspx' ; // 登录URL
    private $SSI_PROXY_SIGH_OUT = 'http://ssi.fetion.com.cn/ssiportal/SSIAppSignOut.aspx' ; // 登出URL
 
    private $curl = NULL ;
    private $socket = NULL ;
 
    /**
     *从导航网站获取信息
     **/
    private $REQUEST_CONFIG = "<config><user mobile-no=\"%s\" /><client type=\"PC\" version=\"2.3.0230\" platform=\"W5.1\" /><servers version=\"0\" /><service-no version=\"12\" /><parameters version=\"15\" /><hints version=\"13\" /><http-applications version=\"14\" /><client-config version=\"17\" /></config>";
 
    /**
     *使用手机号码和密码向服务器获取对应的飞信号码信息
     **/
    private $REQUEST_SSI_SIGN  = "mobileno=%s&pwd=%s" ;
 
    /**
     *使用飞信号码向SIPC服务器注册，获取临时变量NONCE和SSIC的值
     **/
    private $REQUEST_SIPC_SIGN_NONCE      = "R %s SIP-C/2.0\r\nF: %s\r\nI: 1\r\nQ: 1 R\r\nL: %d\r\n\r\n%s" ;
    private $REQUEST_SIPC_SIGN_NONCE_BODY = "<args><device type=\"PC\" version=\"6\" client-version=\"2.3.0230\" /><caps value=\"simple-im;im-session;temp-group\" /><events value=\"contact;permission;system-message\" /><user-info attributes=\"all\" /><presence><basic value=\"400\" desc=\"\" /></presence></args>";
 
    /**
     *使用飞信号码和加密的密码登录飞信SIPC服务器
     **/
    private $REQUEST_SIPC_LOGIN           = "R %s SIP-C/2.0\r\nF: %s\r\nI: 1\r\nQ: 2 R\r\nA: Digest response=\"%s\",cnonce=\"%s\"\r\nL: %d\r\n\r\n%s";
    private $REQUEST_SIPC_LOGIN_BODY      = "<args><device type=\"PC\" version=\"6\" client-version=\"2.3.0230\" /><caps value=\"simple-im;im-session;temp-group\" /><events value=\"contact;permission;system-message\" /><user-info attributes=\"all\" /><presence><basic value=\"400\" desc=\"\" /></presence></args>";
 
 
    /**
     * 发短信
     */
    private $REQUEST_SIPC_SENDSMS         = "M %s SIP-C/2.0\r\nF: %s\r\nI: 2\r\nQ: 1 M\r\nT: %s\r\nN: SendSMS\r\nL: %d\r\n\r\n%s";
	/**
	 * 退出
	 **/
    private $REQUEST_SIPC_LOGOUT          = "R %s SIP-C/2.0\r\nF: %s\r\nI: 1 \r\nQ: 3 R\r\nX: 0\r\n\r\n";
 
    /**
	 * 获取好友列表
	 **/
    private $REQUEST_SIPC_GetContactList      = "S %s SIP-C/2.0\r\nF: %s\r\nI: 3\r\nQ: 1 S\r\nN: GetContactList\r\nL: %d\r\n\r\n%s" ;
    private $REQUEST_SIPC_GetContactListBody = "<args><contacts><buddy-lists /><buddies attributes=\"all\" /><mobile-buddies attributes=\"all\" /><chat-friends /><blacklist /></contacts></args>";
 
    /**
     * 获取好友信息
     **/
    private $REQUESR_SIPC_GetContactsInfo        = "S %s SIP-C/2.0\r\nF: %s\r\nI: 9\r\nQ: 1 S\r\nN: GetContactsInfo\r\nL: %d\r\n\r\n%s";
    private $REQUESR_SIPC_GetContactsInfo_body  = "<args><contacts attributes=\"provisioning;impresa;mobile-no;nickname;name;gender;portrait-crc;ivr-enabled\" extended-attributes=\"score-level\">%s</contacts></args>" ;
 
    /**
     *@param $sender 短信发送者手机号
     *@param $passwd 短信发送者密码
     *@param $receiver 短信接收者手机号
     *@param $msg 短信内容
     **/
    public function __construct($sender, $passwd, $receiver, $msg){
        $this->mobile_no    = $sender ;
        $this->fetion_pwd   = $passwd;
        $this->SMS_RECEIVER = $receiver;
        $this->SMS_TEXT     = $msg;
        $this->cookie_file  = $this->mobile_no . $this->cookie_file ;
 
		$this->FetionStart();
    }
 
 
	/**
	 * 开始Fetion短信发送处理流程
	 *
	 */
	private function FetionStart(){
		$this->FetionGetConfig(); // 从导航网站443端口获取登录信息
		if($this->FetionSocektInit()) // 初始化到SIPC的8080端口socket连接
		{
			$this->FetionGetSIPCNonce(); // 向服务器注册飞信号，获取关键变量值
			if($this->FetionLogin()){    // 发送登录认证命令
				if(!$this->FetionGetContactLists()){ // 取飞信用户列表
					$this->SMS_RECEIVER == "SELF";
				}; 
				$this->FetionGetContactsInfo(); // 建立电话号码到飞信号码的映射
				//$this->FetionSendSMS(); // 发短信!
				if("ALL" == $this->SMS_RECEIVER){  // 给飞信上所有好友发
					foreach($this->fetion_ContactMapping as $sip){
						$this->FetionSendSMS($sip);
					}
				}
				elseif("SELF" == $this->SMS_RECEIVER){ // 给自己发
					$this->FetionSendSMS($this->fetion_uri);
				}
				else{ // 发给指定的手机号集合"13811111111,13822222222,13833333333"
					$mobile_array = split("," , $this->SMS_RECEIVER);
					foreach($mobile_array as $mobile){
						$this->FetionSendSMS($this->fetion_ContactMapping["$mobile"]);
					}
				}
				$this->FetionLogout();
			}
			else
			{
				echo "登录失败\n";
			}
		}
		else
		{
			echo "Socket 初始化失败\n";
		}
	}
 
    /**
     *从导航地址获取配置信息
     **/
    private function FetionGetConfig(){
        $this->REQUEST_CONFIG = sprintf($this->REQUEST_CONFIG,
                                        $this->mobile_no);
        $this->curl = curl_init();
        curl_setopt($this->curl, CURLOPT_URL, $this->url_nav);
        curl_setopt($this->curl, CURLOPT_SSL_VERIFYHOST, false);
        curl_setopt($this->curl, CURLOPT_SSL_VERIFYPEER, false);
        curl_setopt($this->curl, CURLOPT_COOKIEJAR, $this->cookie_file);
        curl_setopt($this->curl, CURLOPT_RETURNTRANSFER, 1);
        curl_setopt($this->curl, CURLOPT_POST, 1);
        curl_setopt($this->curl, CURLOPT_POSTFIELDS, $this->REQUEST_CONFIG);
        $xml_config = curl_exec($this->curl);
 
        // 以下是从导航页面返回的XML里取相关信息
        file_put_contents("test3.xml", $xml_config) ;
        $xmlDom = new DOMDocument() ;
        $xmlDom->loadXML($xml_config);
        $fetion_server = $xmlDom->getElementsByTagName('servers');
        $fetion_server->item(0)->getElementsByTagName('sipc-proxy')->item(0)->nodeValue;
        $this->SSI_PROXY_SIGN_IN  = $fetion_server->item(0)->getElementsByTagName('ssi-app-sign-in')->item(0)->nodeValue;
        $this->SSI_PROXY_SIGH_OUT = $fetion_server->item(0)->getElementsByTagName('ssi-app-sign-out')->item(0)->nodeValue;
        $this->SSI_PROXY_SIGN_IN;
 
        // 以下获取手机号对应的飞信号
        sprintf($this->REQUEST_SSI_SIGN, $this->mobile_no, $this->fetion_pwd) ;
        curl_setopt($this->curl, CURLOPT_URL, $this->SSI_PROXY_SIGN_IN);
        curl_setopt($this->curl, CURLOPT_POSTFIELDS, sprintf($this->REQUEST_SSI_SIGN, $this->mobile_no, $this->fetion_pwd));
        $Result = curl_exec($this->curl);
        curl_close($this->curl);
        file_put_contents("test4.xml", $Result) ;
        $xmlDom->loadXML($Result);
        $uri = $xmlDom->getElementsByTagName("user")->item(0)->getAttribute("uri");
        //"sip:738713940@fetion.com.cn;p=5914"
		$this->fetion_uri = $uri ; // 发送者自己的sip
        if(preg_match('/^sip:(\d+)@(\S+);.*$/', $uri, $matches)){
            $this->fetion_no = $matches[1] ;
            $this->domain_fetion = $matches[2] ;
        }
    }
 
    /**
     *初始化Fetion通讯Socket
     **/
    private function FetionSocektInit(){
		$this->SIPC_PROXY;
        $this->socket = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
        list($ip_fetion, $port_fetion) = split(':', $this->SIPC_PROXY) ; // "221.176.31.4:8080"
        return socket_connect($this->socket, $ip_fetion, $port_fetion) ;
    }
 
    /**
     *注册飞信号码并获取临时变量NONCE和SSIC
     **/
    private function FetionGetSIPCNonce(){
        $REQUEST_SIPC_SIGN_NONCE = sprintf($this->REQUEST_SIPC_SIGN_NONCE, $this->domain_fetion,
                                           $this->fetion_no, strlen($this->REQUEST_SIPC_SIGN_NONCE_BODY),
                                           $this->REQUEST_SIPC_SIGN_NONCE_BODY) ;
        $sock_data = socket_write($this->socket, $REQUEST_SIPC_SIGN_NONCE);
        $buf = '' ;
        if (false == ($buf = socket_read($this->socket, 10000))) {
            echo "Line:" . __LINE__ . "socket_read() failed; reason: " . socket_strerror(socket_last_error($this->socket)) . "\n";
        }
        $regex_ssic = '/.*nonce=\"(\\w+)\".*/s' ;
        if(!preg_match($regex_ssic, $buf, $matches)){
            echo "Fetion Error: No nonce found in socket\n";
        }
        $this->NONCE = strtoupper(trim($matches[1]));
 
        $regex_ssic = '/ssic\s+(.*)/s';
        if (!preg_match($regex_ssic, file_get_contents($this->cookie_file), $matches)) {
            echo "Fetion Error: No ssic found in cookie\n";
        }
        echo $this->SSIC = trim($matches[1]);
    }
 
    /**
     *登录飞信服务器
     **/
    private function FetionLogin(){
        $this->RESPONSE = $this->FetionEncryptPassWD() ;
        $REQUEST_SIPC_LOGIN = sprintf($this->REQUEST_SIPC_LOGIN,
                                      $this->domain_fetion, $this->fetion_no,
                                      $this->RESPONSE, $this->C_NONCE,
                                      strlen($this->REQUEST_SIPC_LOGIN_BODY),
                                      $this->REQUEST_SIPC_LOGIN_BODY);
        $buf = '' ;
        $sock_data = socket_write($this->socket, $REQUEST_SIPC_LOGIN);
        if (false == ($buf = socket_read($this->socket, 10000))) {
            echo "Line:" . __LINE__ . "socket_read() failed; reason: " . socket_strerror(socket_last_error($this->socket)) . "\n";
        }
		//echo $buf,"\n";
        if(preg_match_all('/200/s', $buf, $matches)){
            return True;
        }else{
            return False;
        }
    }
 
 
	/**
	 * 获取飞信用户列表
	 * */
	private function FetionGetContactLists(){
		echo $REQUEST_GETCONTACTLISTS = sprintf($this->REQUEST_SIPC_GetContactList,
				$this->domain_fetion,
				$this->fetion_no,
				strlen($this->REQUEST_SIPC_GetContactListBody),
				$this->REQUEST_SIPC_GetContactListBody);
		$buf = '' ;
		$sock_data = socket_write($this->socket, $REQUEST_GETCONTACTLISTS);
		if (false == ($buf = socket_read($this->socket, 10000))) {
			echo "\nLine:" . __LINE__ . " socket_read() failed; reason: " . socket_strerror(socket_last_error($this->socket)) . "\n";
		}
		//echo $buf,"\n\n\n";
		file_put_contents("ContactList.txt",$buf);
		if(preg_match_all('/(sip:\\d+@fetion\.com\.cn;p=\\d+)/s',$buf,$matches)){
			$fetion_ContactList = $matches[1];
			foreach($fetion_ContactList as $sip){
				$this->fetion_ContactList .= "<contact uri=\"$sip\" />";
			}
			return true;
		}
		return false;
	}
 
 
	/**
	 * 获取用户信息，并建立手机号与SIP号映射关系
	 *
	 */
	private function FetionGetContactsInfo(){
		$this->REQUESR_SIPC_GetContactsInfo_body = sprintf($this->REQUESR_SIPC_GetContactsInfo_body, $this->fetion_ContactList);
		$REQUESR_SIPC_GetContactsInfo = sprintf($this->REQUESR_SIPC_GetContactsInfo,
				$this->domain_fetion,
				$this->fetion_no,
				strlen($this->REQUESR_SIPC_GetContactsInfo_body),
				$this->REQUESR_SIPC_GetContactsInfo_body
				);
		$sock_data = socket_write($this->socket, $REQUESR_SIPC_GetContactsInfo);
		if (false == ($buf = socket_read($this->socket, 1024*10))) {
			echo "\nLine:" . __LINE__ . " socket_read() failed; reason: " . socket_strerror(socket_last_error($this->socket)) . "\n";
		}
		//echo $buf,"\n\n";
		file_put_contents("GetContactsInfo.txt",$buf);
		if(preg_match_all('/<contact uri=\"(.*?)\".*?mobile\-no=\"(.*?)\".*?\/contact>/s',$buf,$matches)){
			$total = count($matches[1]);
			for($i=0; $i<$total; $i++){
				$uri = $matches[1][$i];
				$mobile = $matches[2][$i];
				$this->fetion_ContactMapping["$mobile"] = $uri ; // "13811111111" => "sip:912534014@fetion.com.cn;p=9272"
			}
			return true;
		}
		else{
			return false;
		}
	}
    /**
     *发短信
     **/
    public function FetionSendSMS($receiver_sip){
        //"M %s SIP-C/2.0\r\nF: %s\r\nI: 2\r\nQ: 1 M\r\nT: tel:%s\r\nN: SendSMS\r\nL: %d\r\n\r\n%s";
//		$receiver_mobile = $this->SMS_RECEIVER ;
//		if(!array_key_exists($receiver_mobile,$this->fetion_ContactMapping)) return false;
//		$receiver_sip = $this->fetion_ContactMapping[$receiver_mobile] ; // 转换手机号为"sip:1212@fetion.com.cn;p=1212"格式
        $REQUEST_SENDSMS = sprintf($this->REQUEST_SIPC_SENDSMS,
                                   $this->domain_fetion, $this->fetion_no,
                                   // "tel:" . $this->SMS_RECEIVER, // "tel:13822222222" 方式目前已经不支持
				                   $receiver_sip,  
                                   strlen($this->SMS_TEXT),
                                   $this->SMS_TEXT) ;
        $buf = '' ;
        $sock_data = socket_write($this->socket, $REQUEST_SENDSMS);
        if (false == ($buf = socket_read($this->socket, 1000))) {
            echo "\nLine:" . __LINE__ . " socket_read() failed; reason: " . socket_strerror(socket_last_error($this->socket)) . "\n";
        }
		//echo $buf,"\n";
        if(preg_match_all('/200/s', $buf, $matches)){
            return True;
        }else{
            return False;
        }
    }
 
    /**
     *登出飞信服务器
     **/
    private function FetionLogout(){
        //string Logout = String.Format(FETION_SIPC_LOGOUT, FETION_DOMAIN_URL, Fetion_Number);
        $FETION_SIPC_LOGOUT   = "R %s SIP-C/2.0\r\nF: %s\r\nI: 1 \r\nQ: 3 R\r\nX: 0\r\n\r\n";
        $REQUEST_SIPC_LOGOUT = sprintf($this->REQUEST_SIPC_LOGOUT,
                                       $this->domain_fetion,
                                       $this->fetion_no) ;
        @socket_write($this->socket, $REQUEST_SIPC_LOGOUT);
        socket_close($this->socket) ;
    }
 
    /**
     *生成加密串,感谢CSND ycTIN的帮助！
     *@return string 加密的密码串     *
     **/
 
    private function FetionEncryptPassWD() {
        $key = md5($this->fetion_no . ':' . $this->domain_fetion . ':' . $this->fetion_pwd, true);
        $h1 = strtoupper(md5($key . ':' . $this->NONCE . ':' . $this->C_NONCE));
 
        $h2 = "REGISTER:" . $this->fetion_no ;
        $h2 = strtoupper(md5($h2));
 
        $response = "$h1:" . $this->NONCE . ":" . $h2;
        $response = strtoupper(md5($response));
 
        return $response ;
    }
 
    /**
     *打印一下临时变量
     **/
    public function printVar(){
        print "\nCNONCE:" . $this->C_NONCE;
        print "\nDomain:" . $this->domain_fetion;
        print "\nNONCE:" . $this->NONCE;
        print "\nRESPONSE:" . $this->RESPONSE;
    }
    public function __destruct(){
        //$this->FetionLogout() ;
        @unlink($this->cookie_file); // 删除cookie文件
    }
}
 
$myNewFetion = new myFetion('13800000000', 'abcde12345', 'SELF', '给我自己发');
$myNewFetion = new myFetion('13800000000', 'abcde12345', '13811111111,13822222222,13833333333', '大家注意了：这是一条PHP飞信短信发送类测试短信。如果你能收到，说明我的群发功能已经实现！收到请回复，Thanks！');
$myNewFetion = new myFetion('13800000000', 'abcde12345', 'ALL', 'PHP短信拜年了！');
 
 
//$myNewFetion->printVar() ;
?>

<?php
/**
 *@desc 飞信短信发送类(Encoded:UTF-8)
 *使用方法：$myNewFetion = new myFetion('1381111111', 'password','1382222222', '测试消息' );
 *非常感谢CSDN论坛ycTIN在MD5加密部分的帮助!
 *本程序未做容错处理,为防止诈骗短信乱发，程序不提供添加好友功能
 *测试URL:http://i.isclab.org/tools/fetion.php
 *
 *程序运行条件：
 *1.服务器能够访问飞信服务器nav.fetion.com.cn的443端口（https）
 *2.服务器端PHP程序能够创建socket访问221.176.31.4的8080端口
 *
 *关键技术：
 *1.CURL + SSL通讯
 *2.PHP Socket编程
 *3.PHP MD5函数的深入理解
 *4.PHP DOM处理XML
 *
 *@author shadu AT foxmail DOT com /CNOS(http://bbs.ouropen.org)
 *@version 2010-02-17
 *@copyright 任意拷贝和修改！
 **/
class myFetion{
    private $mobile_no   = '1381111111'; // 发送者手机号
    private $fetion_no   = '738713940' ; // 发送者飞信号，程序自动获取
    private $fetion_pwd  = 'mypassword' ; // 发送者飞信登录密码
    private $cookie_file = 'cookie.txt' ; // 临时存放的cookie文件
 
    public $SMS_RECEIVER = '1382222222' ; //  短信接收者手机号码 
    public $SMS_TEXT     = 'sms test' ; // 短信内容，支持中文
 
    private $NONCE       = 'AAB3238922BCC25A6F606EB525FFDC56' ; // SIPC服务器返回,每次不同
    private $C_NONCE     = 'AAB3238922BCC25A6F606EB525FFDC56' ; // 是随机的，但是固定值也没关系
    private $SSIC        = '' ; // cookie中提取的变量
    private $RESPONSE    = '' ; // 加密后的密钥串
 
 
    private $url_nav            = 'https://nav.fetion.com.cn/nav/getsystemconfig.aspx' ; // 443端口获取导航信息
    private $domain_fetion      = 'fetion.com.cn' ; // 飞信服务器的域名
 
    private $SIPC_PROXY         = '221.176.31.4:8080';  //  8080端口飞信通讯占用 
    private $SSI_PROXY_SIGN_IN  = 'https://uid.fetion.com.cn/ssiportal/SSIAppSignIn.aspx' ; // 登录URL
    private $SSI_PROXY_SIGH_OUT = 'http://ssi.fetion.com.cn/ssiportal/SSIAppSignOut.aspx' ; // 登出URL
 
    private $proxy_http = 'proxy.example.com:8080' ; // HTTP代理服务器地址
    private $curl = NULL ;
    private $socket = NULL ;
 
    /**
     *从导航网站获取信息
     **/
    private $REQUEST_CONFIG = "<config><user mobile-no=\"%s\" /><client type=\"PC\" version=\"2.3.0230\" platform=\"W5.1\" /><servers version=\"0\" /><service-no version=\"12\" /><parameters version=\"15\" /><hints version=\"13\" /><http-applications version=\"14\" /><client-config version=\"17\" /></config>";
 
    /**
     *使用手机号码和密码向服务器获取对应的飞信号码信息
     **/
    private $REQUEST_SSI_SIGN  = "mobileno=%s&pwd=%s" ;
 
    /**
     *使用飞信号码向SIPC服务器注册，获取临时变量NONCE和SSIC的值
     **/
    private $REQUEST_SIPC_SIGN_NONCE      = "R %s SIP-C/2.0\r\nF: %s\r\nI: 1\r\nQ: 1 R\r\nL: %d\r\n\r\n%s" ;
    private $REQUEST_SIPC_SIGN_NONCE_BODY = "<args><device type=\"PC\" version=\"6\" client-version=\"2.3.0230\" /><caps value=\"simple-im;im-session;temp-group\" /><events value=\"contact;permission;system-message\" /><user-info attributes=\"all\" /><presence><basic value=\"400\" desc=\"\" /></presence></args>";
 
    /**
     *使用飞信号码和加密的密码登录飞信SIPC服务器
     **/
    private $REQUEST_SIPC_LOGIN           = "R %s SIP-C/2.0\r\nF: %s\r\nI: 1\r\nQ: 2 R\r\nA: Digest response=\"%s\",cnonce=\"%s\"\r\nL: %d\r\n\r\n%s";
    private $REQUEST_SIPC_LOGIN_BODY      = "<args><device type=\"PC\" version=\"6\" client-version=\"2.3.0230\" /><caps value=\"simple-im;im-session;temp-group\" /><events value=\"contact;permission;system-message\" /><user-info attributes=\"all\" /><presence><basic value=\"400\" desc=\"\" /></presence></args>";
 
    private $REQUEST_SIPC_SENDSMS         = "M %s SIP-C/2.0\r\nF: %s\r\nI: 2\r\nQ: 1 M\r\nT: tel:%s\r\nN: SendSMS\r\nL: %d\r\n\r\n%s";
 
    private $REQUEST_SIPC_LOGOUT          = "R %s SIP-C/2.0\r\nF: %s\r\nI: 1 \r\nQ: 3 R\r\nX: 0\r\n\r\n";
 
    /**
     *@param $sender 短信发送者手机号
     *@param $passwd 短信发送者密码
     *@param $receiver 短信接收者手机号
     *@param $msg 短信内容
     **/
    public function __construct($sender, $passwd, $receiver, $msg){
        $this->mobile_no    = $sender ;
        $this->fetion_pwd   = $passwd;
        $this->SMS_RECEIVER = $receiver;
        $this->SMS_TEXT     = $msg;
        $this->cookie_file  = $this->mobile_no . $this->cookie_file ;
        file_put_contents($this->cookie_file, '') ;
 
        $this->FetionGetConfig(); // 从导航网站443端口获取登录信息
        $this->FetionSocektInit(); // 初始化到SIPC的8080端口socket连接
        $this->FetionGetSIPCNonce(); // 向服务器注册飞信号，获取关键变量值
        if($this->FetionLogin()){    // 发送登录认证命令
            $this->FetionSendSMS(); // 发送短信发送命令
            $this->FetionLogout();
        }        
    }
 
 
    /**
     *从导航地址获取配置信息
     **/
    private function FetionGetConfig(){
        $this->REQUEST_CONFIG = sprintf($this->REQUEST_CONFIG,
                                        $this->mobile_no);
        $this->curl = curl_init();
        curl_setopt($this->curl, CURLOPT_URL, $this->url_nav);
        curl_setopt($this->curl, CURLOPT_SSL_VERIFYHOST, false);
        curl_setopt($this->curl, CURLOPT_SSL_VERIFYPEER, false);
        curl_setopt($this->curl, CURLOPT_COOKIEJAR, $this->cookie_file);
        curl_setopt($this->curl, CURLOPT_RETURNTRANSFER, 1);
        curl_setopt($this->curl, CURLOPT_POST, 1);
        curl_setopt($this->curl, CURLOPT_POSTFIELDS, $this->REQUEST_CONFIG);
        //curl_setopt($this->curl, CURLOPT_PROXY, $this->proxy_http); // 设置代理服务器
        $xml_config = curl_exec($this->curl);
 
        // 以下是从导航页面返回的XML里取相关信息
        file_put_contents("test3.xml", $xml_config) ;
        $xmlDom = new DOMDocument() ;
        $xmlDom->loadXML($xml_config);
        $fetion_server = $xmlDom->getElementsByTagName('servers');
        $fetion_server->item(0)->getElementsByTagName('sipc-proxy')->item(0)->nodeValue;
        $this->SSI_PROXY_SIGN_IN  = $fetion_server->item(0)->getElementsByTagName('ssi-app-sign-in')->item(0)->nodeValue;
        $this->SSI_PROXY_SIGH_OUT = $fetion_server->item(0)->getElementsByTagName('ssi-app-sign-out')->item(0)->nodeValue;
        $this->SSI_PROXY_SIGN_IN;
 
        // 以下获取手机号对应的飞信号
        sprintf($this->REQUEST_SSI_SIGN, $this->mobile_no, $this->fetion_pwd) ;
        curl_setopt($this->curl, CURLOPT_URL, $this->SSI_PROXY_SIGN_IN);
        curl_setopt($this->curl, CURLOPT_POSTFIELDS, sprintf($this->REQUEST_SSI_SIGN, $this->mobile_no, $this->fetion_pwd));
        $Result = curl_exec($this->curl);
        curl_close($this->curl);
        file_put_contents("test4.xml", $Result) ;
        $xmlDom->loadXML($Result);
        $uri = $xmlDom->getElementsByTagName("user")->item(0)->getAttribute("uri");
        //"sip:738713940@fetion.com.cn;p=5914"
        if(preg_match('/^sip:(\d+)@(\S+);.*$/', $uri, $matches)){
            $this->fetion_no = $matches[1] ;
            $this->domain_fetion = $matches[2] ;
        }        
    }
 
    /**
     *初始化Fetion通讯Socket
     **/
    private function FetionSocektInit(){
        $this->socket = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
        list($ip_fetion, $port_fetion) = split(':', $this->SIPC_PROXY) ; // "221.176.31.4:8080"
        socket_connect($this->socket, $ip_fetion, $port_fetion) ;
    }
 
    /**
     *注册飞信号码并获取临时变量NONCE和SSIC
     **/
    private function FetionGetSIPCNonce(){
        $REQUEST_SIPC_SIGN_NONCE = sprintf($this->REQUEST_SIPC_SIGN_NONCE, $this->domain_fetion,
                                           $this->fetion_no, strlen($this->REQUEST_SIPC_SIGN_NONCE_BODY),
                                           $this->REQUEST_SIPC_SIGN_NONCE_BODY) ;
        $sock_data = socket_write($this->socket, $REQUEST_SIPC_SIGN_NONCE);
        $buf = '' ;
        if (false == ($buf = socket_read($this->socket, 1000))) {
            echo "Line:" . __LINE__ . "socket_read() failed; reason: " . socket_strerror(socket_last_error($this->socket)) . "\n";
        }
        $regex_ssic = '/.*nonce=\"(\\w+)\".*/s' ;
        if(!preg_match($regex_ssic, $buf, $matches)){
            echo "Fetion Error: No nonce found in socket\n";
        }
        $this->NONCE = strtoupper(trim($matches[1]));
 
        $regex_ssic = '/ssic\s+(.*)/s';
        if (!preg_match($regex_ssic, file_get_contents($this->cookie_file), $matches)) {
            echo "Fetion Error: No ssic found in cookie\n";
        }
        $this->SSIC = trim($matches[1]);
    }
 
    /**
     *登录飞信服务器
     **/
    private function FetionLogin(){
        $this->RESPONSE = $this->FetionEncryptPassWD() ;
        $REQUEST_SIPC_LOGIN = sprintf($this->REQUEST_SIPC_LOGIN,
                                      $this->domain_fetion, $this->fetion_no,
                                      $this->RESPONSE, $this->C_NONCE,
                                      strlen($this->REQUEST_SIPC_LOGIN_BODY),
                                      $this->REQUEST_SIPC_LOGIN_BODY);
        $buf = '' ;
        $sock_data = socket_write($this->socket, $REQUEST_SIPC_LOGIN);
        if (false == ($buf = socket_read($this->socket, 1000))) {
            echo "Line:" . __LINE__ . "socket_read() failed; reason: " . socket_strerror(socket_last_error($this->socket)) . "\n";
        }
        if(preg_match_all('/200/s', $buf, $matches)){
            return True;
        }else{
            return False;
        }
    }
 
    /**
     *发短信
     **/
    public function FetionSendSMS(){
        //"M %s SIP-C/2.0\r\nF: %s\r\nI: 2\r\nQ: 1 M\r\nT: tel:%s\r\nN: SendSMS\r\nL: %d\r\n\r\n%s";
        $REQUEST_SENDSMS = sprintf($this->REQUEST_SIPC_SENDSMS,
                                   $this->domain_fetion, $this->fetion_no,
                                   $this->SMS_RECEIVER,
                                   strlen($this->SMS_TEXT),
                                   $this->SMS_TEXT) ;
        $buf = '' ;
        $sock_data = socket_write($this->socket, $REQUEST_SENDSMS);
        if (false == ($buf = socket_read($this->socket, 1000))) {
            echo "\nLine:" . __LINE__ . " socket_read() failed; reason: " . socket_strerror(socket_last_error($this->socket)) . "\n";
        }
        if(preg_match_all('/200/s', $buf, $matches)){
            return True;
        }else{
            return False;
        }
    }
 
    /**
     *登出飞信服务器
     **/
    private function FetionLogout(){
        //string Logout = String.Format(FETION_SIPC_LOGOUT, FETION_DOMAIN_URL, Fetion_Number);
        $FETION_SIPC_LOGOUT   = "R %s SIP-C/2.0\r\nF: %s\r\nI: 1 \r\nQ: 3 R\r\nX: 0\r\n\r\n";
        $REQUEST_SIPC_LOGOUT = sprintf($this->REQUEST_SIPC_LOGOUT,
                                       $this->domain_fetion,
                                       $this->fetion_no) ;
        socket_write($this->socket, $REQUEST_SIPC_LOGOUT);
        socket_close($this->socket) ;        
    }
 
    /**
     *生成加密串,感谢CSND ycTIN的帮助！
     *@return string 加密的密码串     *
     **/
 
    private function FetionEncryptPassWD() {
        $key = md5($this->fetion_no . ':' . $this->domain_fetion . ':' . $this->fetion_pwd, true);
        $h1 = strtoupper(md5($key . ':' . $this->NONCE . ':' . $this->C_NONCE));
 
        $h2 = "REGISTER:" . $this->fetion_no ;
        $h2 = strtoupper(md5($h2));
 
        $response = "$h1:" . $this->NONCE . ":" . $h2;
        $response = strtoupper(md5($response));
 
        return $response ;
    }
 
    /**
     *打印一下临时变量
     **/
    public function printVar(){
        print "\nCNONCE:" . $this->C_NONCE;
        print "\nDomain:" . $this->domain_fetion;
        print "\nNONCE:" . $this->NONCE;
        print "\nRESPONSE:" . $this->RESPONSE;
    }
    public function __destruct(){
        //$this->FetionLogout() ;
        @unlink($this->cookie_file); // 删除cookie文件
    }
}
 
$myNewFetion = new myFetion('13811111111', 'password', '13822222222', '飞信测试');
 
//$myNewFetion->printVar() ;
?>

<?
/**
 *@desc 将Email地址转换成图片，防止被机器人爬到。
 *关键技术：
 *1.PHP GD（Graphics Draw）的使用
 *2.CURL调用ISGD短网址API
 *3.如果图片生成失败，请确认同级目录是否有字体文件cambriab.ttf
 *@auth shadu###foxmail.com
 *@version 2010-01-24 16:19
 *
 **/
 
$example = base64_encode('user@example.com');
 
// POST数据，用户要生成图片
if(isset($_POST['tag']) && "1" == $_POST['tag']){
    if(isset($_POST['emailInput']) && 0 < strlen($_POST['emailInput'])){
        $example = base64_encode($_POST['emailInput']) ;
    }
    showInput($example) ;
    exit(0);
}
 
// GET数据，论坛在调用图片
if(isset($_GET['e'])){
    if(255 < strlen($_GET['e']) || 2 > strlen($_GET['e'])){ // 恶意提交
        showInput($example) ;
        exit(0);
    }
    $str = base64_decode($_GET['e']) ;
 
    if(255 < strlen($str) || 2 > strlen($str)){ // 恶意提交
        showInput($example) ;
        exit(0);
    }
    showImage($str) ;
    exit(0);
}else{
    showInput($example) ;
    exit(0);
}
 
function showInput($str = ''){
    $result = '' ;
    if('' != $str){
        $str = "http://" . $_SERVER["SERVER_NAME"] . $_SERVER["SCRIPT_NAME"] . "?e=$str" ;
        $result = "<div style=\"width:500px;\" align=\"left\">" ;
        $result .= "论坛博客贴图地址:<br/>" ;
        $result .= "<input name=\"secemail\" type=\"text\" readonly value=\"$str#e.png\" size=\"80\" />" ;
        $result .= "<br/><br/><a href=\"http://is.gd/\" target=\"_blank\" >ISGD</a>短网址:<br/>" ;
        $result .= "<input name=\"secemail\" type=\"text\" readonly value=\"" . isGod($str) . "\" size=\"40\" /><br/>" ;
        $result .= "部分网站（如百度）不支持此类URL，可以使用<br/><font color=\"red\">http://http://is.gd/6UzzI#.png</font><br/>的方式贴图:)" ;
 
        $result .= "<br/><br/>HTML插图代码：" ;
        $result .= htmlentities("<img src=\"" . isGod($str) . "\" />") ;
        $result .= "<div name=\"preview\" style=\"margin-top:30px;\">" ;
        $result .= "安全联系方式效果图（效果不理想的话请在字符前后多加几个空格）:<br/><img src=\"$str\" alt=\"反垃圾邮件，安全你的Email\" /></dvi>" ;
        $result .= "</div>" ;
    }
 
    $strHtml = <<<EOT
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>创建安全联系方式-图片Email</title>
<meta name="keywords" content="安全联系方式,图片Email,email防护,隐私保护,安全Email" />
<meta name="description" content="在网络上可以安全使用的联系方式" />
</head>
<body>
<div name="create" align="center" style="margin-top:20px;">
    <font color="blue" size="10"><b>Sec your email!</b></font><br /><br />
    <form name="createimge" method="post" action="e.php">请输入您的Email:
        <input name="emailInput" value="user@example.com" type="text" />&nbsp;&nbsp;&nbsp;&nbsp;
        <input name="creatButton" value="生成安全Email" type="submit" />
        <input name="tag" value="1" type="hidden" />
    </form>
</div>
 
<div name="result" align="center" style="margin-top:50px;">
    $result
</div>
</body>
</html>
EOT;
    echo $strHtml ;
}
 
function showImage($msg){
    // 声明生成PNG图片
    Header("Content-type: image/PNG");
    // 生成一个图片
    $img = new MSG2PNG($msg);
    //$img->strFontName = "simhei.ttf" ; // 设置中文字体
    $img->createImage();
}
/**
 *@desc 这是一个类：用于将指定字符串写入图片
 *@auth shadu###foxmail.com
 *@version 2010-01-24 10:25
 *@useage $img = new MSG2PNG("user@example.com") ;
 *        $img->createImage();
 */
class MSG2PNG{
    public  $strMessageBody = "user@example.com" ; // 要写入的字符串
    public  $strFontName = "cambriab.ttf" ;
    public  $intFontSize = 20 ;
    public  $intSize = array(260, 70) ;
    public  $rgbBackGroundColor = array(0xFF, 0xFF, 0xFF) ;
    public  $rgbFontColor = array(0x28, 0x00, 0x00) ;
    public  $rgbNoisePointColor = array(0x20, 0x20, 0x20) ;
    public  $rgbNoiseLinesColor = array(0xA0, 0xA0, 0xA0) ;
    public  $intNoiseNum = 3000 ;
    public  $intLinesNum = 50 ;
    public  $intAngle = 10 ;
    public  $intPosition = array(2, 60) ;
    private $imgImage = NULL ;
 
    public function __construct($strMessage = "user@example.com"){
        $this->strMessageBody = $strMessage ;
        //以下数行仅供参考，我是用来设置图片大小和噪音数量的，不是很准确。
        $this->intSize[0] = strlen($this->strMessageBody) * 15 ;
        $this->intSize[1] = strlen($this->strMessageBody) * 15 * 70 /260 ;
        $this->intPosition[1] = $this->intSize[1] * 60 / 70 ;
        $this->intNoiseNum = 3000 * $this->intSize[0] / 260 ;
        $this->intLinesNum = 50 * $this->intSize[0] / 260 ;
    }
 
    public function setColor(){
        if( NULL == $this->imgImage) return ; 
        imagecolorallocate($this->imgImage,
                           $this->rgbBackGroundColor[0],
                           $this->rgbBackGroundColor[1],
                           $this->rgbBackGroundColor[2]) ;
    }
 
    public function createNoise(){
        //Create noise points and lines
        if( NULL == $this->imgImage) return ;        
        $imgNoisePointColor = imagecolorallocate($this->imgImage,
                                                 $this->rgbNoisePointColor[0],
                                                 $this->rgbNoisePointColor[1],
                                                 $this->rgbNoisePointColor[2]) ;
        $imgNoiseLinesColor = imagecolorallocate($this->imgImage,
                                                 $this->rgbNoiseLinesColor[0],
                                                 $this->rgbNoiseLinesColor[1],
                                                 $this->rgbNoiseLinesColor[2]) ;
        for($i=0; $i<$this->intNoiseNum; $i++)
            imagesetpixel($this->imgImage,
                          mt_rand(0, $this->intSize[0]),
                          mt_rand(0,$this->intSize[1]),
                          $imgNoisePointColor);
 
        for($i=0; $i<$this->intLinesNum; $i++)
            imageline($this->imgImage,
                      mt_rand(0, $this->intSize[0]), mt_rand(0, $this->intSize[1]), 
                      mt_rand(0, $this->intSize[0]), mt_rand(0, $this->intSize[1]), 
                      $imgNoiseLinesColor);
    }
 
    public function createFont(){
        if( NULL == $this->imgImage) return ;
        $imgFontColor = imagecolorallocate($this->imgImage,
                                           $this->rgbFontColor[0],
                                           $this->rgbFontColor[1],
                                           $this->rgbFontColor[2]) ;
        ImageTTFText($this->imgImage, $this->intFontSize, $this->intAngle,
                     $this->intPosition[0], $this->intPosition[1],
                     $imgFontColor, $this->strFontName,
                     $this->strMessageBody) ;
    }
    public function createImage(){
        $this->imgImage = imagecreate($this->intSize[0], $this->intSize[1]) ;
        $this->setColor() ;
        $this->createNoise();
        $this->createFont() ;
        ImagePNG($this->imgImage) ;
    }
 
    public function __destruct(){
        if( NULL == $this->imgImage) return ;
        ImageDestroy($this->imgImage) ;
    }
}
 
/**
 *@desc 从isgod网站获取指定URL的短路径
 **/
function isGod($str){
    $content = '' ;
    $url = "http://is.gd/api.php?longurl=$str" ;
    $ch = curl_init() ;
    curl_setopt($ch, CURLOPT_URL, $url);
    curl_setopt($ch,  CURLOPT_RETURNTRANSFER, TRUE) ;
    $content = curl_exec($ch);
    curl_close($ch);
    return $content;
}
?>