Through the ICQ network Guan Fa send mobile phone sms PHP source program

//###########################################################
//
//For questions and comments
// Roland (alias =: Vlieg: =-)
//ICQ #78354631
//mail:vlieg@atoomnet.net
//
//Nb:this script won ' t work On free hosting pages, because of the secure mode!
//Nb:you must have registered your icq# at http://web.icq.com/sms/login/in order of this script to work
//### ########################################################

$htmlreply = "";
$post = "Post http://web.icq.com/karma/dologin/1,,, 00.html http/1.0
Accept:image/gif, Image/x-xbitmap, Image/jpeg, Image/pjpeg, Application/vnd.ms-powerpoint, application/vnd.ms-excel , Application/msword, */*
REFERER:HTTP://WEB.ICQ.COM/SMS/LOGIN/1,,, 00.html
Accept-language:nl
content-type:application/x-www-form-urlencoded
Accept-encoding:gzip, deflate
user-agent:mozilla/4.0 (compatible; MSIE 5.0; windows; digext)
Host:web.icq.com
Content-length: ". $contentlength."
Proxy-connection:keep-alive
Pragma:no-cache
Cookie:uin= ". $uin."; Sms_country= ". $prefix."; Karmaservice1=yes; Uin= ". $uin."; Sms_country= ". $prefix."; Karmaservice1=yes

Uservice=1&ulogin= ". $uin." &upassword= ". $passw." &x=0&y=0 ";

$remote = Fsockopen ("web.icq.com", & $errno, & $errstr, 30);

Global $remote;
Global $post;
Fputs ($remote, $post);

while (!feof ($remote)) {$htmlreply. =fgets ($remote, 120);}
Uncomment for Output:echo "". Htmlspecialchars ($htmlreply). "";
Fclose ($remote);

Persoonlijke Cookie uit de Inlogpage Halen
En:fetch personal cookie from login page

$splited = Split ("", $htmlreply);
$cookies = $splited [3];
$cookies = Str_replace ("set-cookie:karmalogin=", "", $cookies);
$cookies = Str_replace ("; path=/"," ", $cookies);
$cookies = Str_replace ("", "", $cookies);
Uncomment voor Output:echo $cookies;

if (strlen ($prefix) = = 2) {$contentprefix = '. $prefix;} else {$contentprefix = $prefix;}
$charcount = (160-strlen ($message));
$contentlength = (1561+
Strlen ($message) +
Strlen ($charcount) +
Strlen ($phonenumber) +
Strlen ($prefix)
);

//****************************************************************//verzendpagina Openen met de Opgehaalde Cookie
//En:open send page with fetched cookie

$htmlreply = "";
$post = ' Post http://web.icq.com/sms/send_history/1,,, 00.html http/1.0
Accept:image/gif, Image/x-xbitmap, Image/jpeg, Image/pjpeg, Application/vnd.ms-powerpoint, application/vnd.ms-excel , Application/msword, */*
REFERER:HTTP://WEB.ICQ.COM/SMS/SEND_SESSION/1,,, 00.html?prefix=+ '. $prefix. &carrier=&tophone= '. $phonenumber. '
Accept-language:nl
Content-type:multipart/form-data; boundary=---------------------------7D12442EAB4
Accept-encoding:gzip, deflate
user-agent:mozilla/4.0 (compatible; MSIE 5.0; windows; digext)
Host:web.icq.com
Content-length: '. $contentlength. '
Proxy-connection:keep-alive
Pragma:no-cache
Cookie:uin= '. $uin. '; Sms_country= '. $prefix. '; Karmaservice1=yes; Karmalogin= '. $cookies. '; Uin= '. $uin. '; Sms_country= '. $prefix. '; Karmaservice1=yes; Karmalogin= '. $cookies. '

-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Carrier"

-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "prefix"

'. $contentprefix. '
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Tophone"

'. $phonenumber. '
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Usession"

1
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Ureply"

-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Ulastid"

-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Usend"

1
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Unextid"

-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Uhistorycounter"

1
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Count"

0
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Usubmitcount"

0
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Checknewmsg"

180000
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "CharCount"

'. $charcount. '
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "MSG"

'. $message. '
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "X"

30
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Y"

16
-----------------------------7d12442eab4--
';

$remote = Fsockopen ("web.icq.com", & $errno, & $errstr, 30);

Global $remote;
Global $post;
Fputs ($remote, $post);

while (!feof ($remote)) {$htmlreply. =fgets ($remote, 120);}
Uncomment for Output:echo "". Htmlspecialchars ($htmlreply). "";
Fclose ($remote);

Check if message is send if send ' moved Permanently ' is returned

if (eregi (' Moved Permanently ', $htmlreply))
{echo "SMS message successfully sent!";}
Else
{echo ' SMS not sent! ';}