Parašė Wiav· 2008 Lap. 17 20:11:49
#2
Netinka šits aparatas
php-fusion sistemai, pats katik išbandžiau, nebent kasnors būtų geras ir sutvarkytu šituos dalykus
php-fusion sistemai:
1. <?
2. //Apsauga nuo tiesioginio kreipimosi
3. if (basename($_SERVER['PHP_SELF']) == 'sms.php') { die("Apsauga nieko nepraleidzia!"); }
4.
5. $user = ""; //cia iveskite savo hostingas.in vartotojo varda
6. $pass = ""; //cia iveskite savo hostingas.in prisijungimo slaptazodi
7. $sms_tekst = '*** Nori parašyti čia žinutę? Siųsk SMS tekstu:<b> HOST 1 '.$user.' <i><u>tavo tekstas</u></i></b> numeriu <b>1398</b> (kaina 1lt)'; //zinute pagal nutylejima
8.
9. //pagrindinis varikliukas
10. class getsmsinfo {
11. var $user;
12. var $pass;
13. var $what = 'all';
14. function getsmsinfo () {}
15. function get () {
16. $url = 'http://www.hostingas.in/usersms.php?user=';
17. $url .= urlencode($this->user) . '&pwd=' . urlencode(sha1($this->pass));
18. $url .= '&what=' . urlencode($this->what);
19. $link = fopen($url, "rb");
20. $data = stream_get_contents($link);
21. fclose($link);
22. return unserialize($data);
23. }
24. }
25.
26. //Teksto apdorojimas
27. function trimlink($text, $length) {
28. $dec = array(""", "'", "\", '"', "'", "<", ">");
29. $enc = array(""", "'", "\", """, "'", "<", ">");
30. $text = str_replace($enc, $dec, $text);
31. if (strlen($text) > $length) $text = substr($text, 0, ($length-3))."...";
32. $text = str_replace($dec, $enc, $text);
33. return $text;
34. }
35.
36. //Klases iskvietimas
37. $obj = new getsmsinfo ();
38. $obj->user = $user;
39. $obj->pass = $pass;
40. $array = $obj->get();
41. $msg = eregi_replace('HOST [0-9] '.$user.'','',$array[0]['txt']);
42. $msg = str_replace(array('[',']'),'',$msg);
43.
44. //Isvalom kintamuosius, saugumo sumetimais
45. unset($user,$pass);
46.
47. //Patikrinam, jei zinuciu nera rasom nustatyta zinute
48. $msg = (($msg != '')?trimlink($msg,120):$sms_tekst);
49.
50. //Padarom paspaudziamas nuorodas
51. $msg = preg_replace( "`((http)+(s)?:(//)|(www.))((w|.|-|_)+)(/)?(S+)?`i", "<a href="http\3://\5\6\8\9" title="\0" target="_blank">\5\6</a>", $msg);
52.
53. //Atspauzdinam SMS teksta
54. echo "<marquee behavior='scroll' scrollamount='1' scrolldelay='1' onmouseover='this.stop()' onmouseout='this.start()' align='center'>nt<b>n".$msg."n</b>n</marquee><br/>".$sms_tekst;
55.
56. //Isvalom kintamuosius - saugumo sumetimais
57. unset($msg,$array,$obj);
58. ?>
Ir:
<?php include_once("sms.php"); ?>
Redagavo Wiav· 2008 Lap. 17 20:11:13