Use ICQ network Guan Fa send mobile phone sms PHP source program

procedure.
//###########################################################
//
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 the order of this script to work
//###########################################################


//****************************************************************\\
Config:

$uin = ""; Your ICQ number
$PASSW = ""; Your Icqpassword

$prefix = "27"; SMS Prefix
$phonenumber = "0000000"; SMS Phone number
$message = "hello!"; SMS Message


//****************************************************************\\
En:calculate the content length

$contentlength = (37+
Strlen ($uin) +
Strlen ($PASSW)
);

//****************************************************************\\
Openen van de Inlogpagina
En:open LoginPage

$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 98; 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 ("\ n", $htmlreply);
$cookies = $splited [3];
$cookies = Str_replace ("set-cookie:karmalogin=", "", $cookies);
$cookies = Str_replace ("; path=/"," ", $cookies);
$cookies = Str_replace ("\ n", "", $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 cookies
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...0.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 98; 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 are send if send ' moved Permanently ' is returned

if (eregi (' Moved Permanently ', $htmlreply))
{
echo "Sms message successfully sent!";
} else {
echo "Sms not sent!";
}
?>