Pobieranie opisu z GaduGadu, Funkcja, PHP 4 i 5 Opcje

[Bakus]

Funkcja łączy się z serwerem GG, loguje się na nim, pobiera opis dla podanego numeru i kończy połączenie. W przypadku powodzenia całości operacji funkcja zwraca opis. W przypadku niepowodzenia funkcja zwróci wartość "(bool) false" i w zmiennej podanej jako ostatni, czwaty argument umieści komunikat o błędzie jaki zaistniał.

Szczegóły parametrów do przekazania jak i wyniku działania funkcji znajdują się w jej komentarzu.

Funkcja wymaga zdefiniowania stałych wartości używanych w protokole GaduGadu. Nie są one umieszczone w funkcji, by uniknąć komunikatu o błędzie ponownego deklarowania stałych w przypadku, gdy funkcja zostanie wywołana wielokrotnie w jednym skrypcie.

Dwie uwagi końcowe:
- ilość znaków jaka jest wycinana ze zwracanego opisu (ostatnia linijka funkcji) jest dobrana eksperymentalnie i jak narazie nie znalazłem innego lepszego) rozwiązania na pozbycie się znaków znajdujących się na początku zwracanego przez serwer wyniku.
- Funkcja nie jest przystosowana do odbioru wielu statusów w jednym połączeniu. By ją do tego przystosować należy odpowiednio zmienić wywołanie funkcji (np. przekazać tablicę z numerami, a nie wartość INT i w linii 126 zmienić format pakietu zgodnie ze specyfikacją dostępną na stronie projektu EKG ( http://dev.null.pl/ekg/docs/protocol.html#ch1.11 )

(Kod wydzielony z tematu Skrypty do generowania sygnaturek, na grafikach)

[PHP] pobierz, plaintext 
<?php
/* Skrypt napisany w oparciu o klasę www2gg (http://gg.wha.la/)
 * i opis protokołu GaduGadu z projektu EKG (http://dev.null.pl/ekg/docs/protocol.html)
 * Kod można dowolnie wykorzystać pod warunkiem pozostawienia niniejszego koment
rza
 * Kod jest udostępniony na zasadach OpenSource.
 *
 * @author: Krzysztof Andrzej Błachut vel Bakus <bakus@idn.net.pl>
 * @copyright: 2004-2005 by Krzysztof Andrzej Błachut vel Bakus
 * @package: OpisGG
 * @version: 1.0
 */
 
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
 
	function oblicz_hash ($haslo, $klucz)
	{
		$x0=0; $x1=0; $y0=0; $y1=0; $z=0; $tmp=0;
		$y0 = ($klucz << 16) >> 16; $y1 = $klucz >> 16 ;
		for ($i=0; $i<strlen($haslo); $i++)
		{
			$x0 = ($x0 & 0xFF00) | ord($haslo[$i]); $x1 &= 0xFFFF;
			$y0 ^= $x0; $y1 ^= $x1;
			$y0 += $x0; $y1 += $x1;
			$x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
			$y0 ^= $x0; $y1 ^= $x1;
			$x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
			$y0 -= $x0; $y1 -= $x1;
			$x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
			$y0 ^= $x0; $y1 ^= $x1;
			$z = $y0 & 0x1F;
			$y0 &= 0xFFFF; $y1 &= 0xFFFF;
			if ($z <= 16)
			{
				$tmp= ($y1 << $z) | ($y0 >> (16-$z));
				$y0 = ($y1 >> (16-$z)) | ($y0 << $z);
				$y1 = $tmp;	
			}else{
				$tmp= $y0 << ($z-16);
				$y0 = ($y0 >> (32-$z)) | ( (($y1 << $z) >> $z) << ($z-16) );
				$y1 = ($y1 >> (32-$z)) | $tmp;
			}
			$y0 &= 0xFFFF; $y1 &= 0xFFFF;
		}
		$hash = hexdec(sprintf(&#092;"%04x%04x\", $y1, $y0));
		settype($hash, 'integer');
		return $hash;
	}
 
	/* Funkcja pobiera z serwera GaduGadu opis dla podanego numeru.
	 *
	 * @param int Numer GG \"bramki\"
	 * @param string Hasło GG \"bramki\"
	 * @param int Numer GG, którego opis funkcja ma pobrać
	 * @param var Zmienna w której umieszczony będzie ewentualny komunikat błęd
 
	 * @return mixed Zawiera Opis numeru GG, lub false w przypadku błędu
	 */
	function get_gg_status($numer_gg, $haslo_gg, $szukany_numer, &$error)
	{
		// Ustawianie stałych na potrzeby protokołu
		define(&#092;"GG_LOGIN60\",		0x0015);
		define(&#092;"GG_STATUS_AVAIL\",   0x0002);
		define(&#092;"GG_LOGIN_OK\",		0x0003);
		define(&#092;"GG_NOTIFY\",		 0x0010);
		define(&#092;"GG_USER_NORMAL\",	0x0003);
 
		$fp = fsockopen( &#092;"appmsg.gadu-gadu.pl\", 80, $errno, $errmsg, 3 );
		if (!$fp)
		{
			$error = &#092;"BRAK POLACZENA Z APPMSG.GADU-GADU.PL, MOZE BYC PRZECIAZONY: \" . $errno . \" - \" . $errstr . \"n\";
			return false;
		}else{
			$get = &#092;"GET /appsvc/appmsg.asp?fmnumber=<$numer_gg> HTTP/1.0rn\";
			$get.= &#092;"Host: appmsg.gadu-gadu.plrn\";
			$get.= &#092;"User-Agent: Mozilla/4.7 [en] (Win98; I)rn\";
			$get.= &#092;"Pragma: no-cachernrn\";
			fputs($fp, $get);
			fgets($fp, 128);
			fgets($fp, 128);
			$buf = fgets($fp, 128);
			preg_match(&#092;"/s([d.]{8,16}):([d]{1,5})s/\", $buf, $adres);
			$host = $adres[1];
			$port = $adres[2];
			fclose($fp);
		}
 
		// Ustanawianie połączenia z serwerem GG
		$fp = fsockopen($host, $port, $errno, $errstr, 10);
		if (!$fp)
		{
			$error = &#092;"PROBLEM Z POLACZENIEM: $errno - $errstrnn\";
			return false;
		}
		if (!$data = fread($fp, 12))
		{
			$error = &#092;"Polaczenie nieoczekiwanie zamknietenn\";
			return false;
		}
 
		// Pobieranie danych z serwera - odbiór klucza do wygenerowania hasha hasła
		$tab = unpack(&#092;"Vtyp/Vrozmiar/Vklucz\", $data);
		// obliczanie hasha hasła
		$hash = oblicz_hash($haslo_gg, $tab['klucz']);
		$data = pack(&#092;"VVVVVVvVvVvCCa\".strlen(\"\"), GG_LOGIN60, 0x20 + strlen(\"\"),
		$numer_gg, $hash, GG_STATUS_AVAIL, 0x20, 0, 0, 0, 0, 0, 0x14, 0xbe , &#092;"\");
		// wysłanie hasha hasła
		fwrite($fp, $data);
		if (!$data1 = fread($fp, 8))
		{
			$error = &#092;"Nie rozpoznany bladn\";
			return false;
		}
		$tab = unpack(&#092;"Vlogin_status/Vrozmiar\", $data1);
		if($tab['login_status'] != GG_LOGIN_OK)
		{
			$error = &#092;"Nie prawidłowe hasło...nn\";
			return false;
		}
 
		// Wysłanie listy kontaktów z jednym numerem
		$data = pack (&#092;"VVVC\",GG_NOTIFY, 5, $szukany_numer, GG_USER_NORMAL);
		if(!fwrite($fp,$data))
		{
			$error = &#092;"Blad wysylania listy kontaktownn\";
			return false;
		}
		// Odebranie pakietu ze specyfikacją następnego pakietu
		$data = fread($fp, 8);
		$tab = unpack(&#092;"Vtyp/Vrozmiar\", $data);
		// Pobranie pakietu opisu
		$data = fread($fp, $tab['rozmiar']);
		// Zamknięcie połączenia z serwerem
		fclose($fp);
		$tablica = unpack(&#092;"Iuin/Cstatus/Iremoteip/Sremoteport/Cversion/Cimagesize/Cunknown/Cdescription_size/a*\", $data);
		return $tablica[1];
	}
?>
[PHP] pobierz, plaintext 

UpDated (07.10.2004 01:07):
Zmieniłem "return substr($status_kontaktu, 15);" na nieco bardziej zaawansowany i skuteczny sposób wycinania niechcianych znaków...
Dzięki temu opisy nie są ucinane i nie zawierają śmieci...

UpDated (08.02.2005 14:45):
Coraz częściej dostaje PW o sposób użycia, więc...
Sposób użycia - wyświetlenie opisu numeru 1234567 (nasz numer to 2358764, a haslo to: zxcdews):

[PHP] pobierz, plaintext 
<?php
	print get_gg_status(&#092;"2358764\", \"zxcdews\", \"1234567\", $error);
?>
[PHP] pobierz, plaintext 

UpDated (10.02.2005 04:31):
Status wyświetlany jest bez żadnych krzaków - zmianie uległ sposób wyciągania opisu z pakietu odbieranego z serwera...

UpDated (10.02.2005 05:16):
Zoptymalizowałem wyciąganie opisu z pakietu do 1 polecenia unpack...

[Tlenex]

Jeszcze zapytanie: czy da się wyciągnąć obrazek numeru, który ma włączoną opcję "Tylko dla znajomych"? Jeśli tak, to jak?

[aleksander]

numer, który używa ta funkcja musi być wpisany do listy konaktów numeru który sprawdzasz.

@Bakus:
1. Czemu dwa razy definiujesz stałe?
2. Ładniej byłoby to w klase ująć (IMG:http://forum.php.pl/style_emoticons/default/smile.gif)

pozdrawiam

[Chewolf]

1. Czemu dwa razy definiujesz stałe?

To chyba jest jakiś przypadek... pomyłka. Wystarczy jak się raz zdefiniuje ... ale moge się mylić (IMG:http://forum.php.pl/style_emoticons/default/tongue.gif) Wszystko jest możliwe.

[ikioloak]

Twoja funkcja to jest swietna sprawa ale ma jeden mankament. W momencie jej wywolania rozlacza mi sie GG. Korzystam dokladnie z Tlena i w momencie kiedy ktos wchodzi na strone to automatycznie staje sie niedostepny.. Jest jakas rada na to?

[Bakus]

HeHe... zarejestruj nowy numer GG
Jezeli serwer GG zostanie poproszony o autoryzacje nowej sesji na ten sam numer, to wszystkie otworzone sesje zostana zakonczone i zostanie nawiazane polaczenie z ostatnia sesja o jaka zostal poproszony... dlatego wlasnie Cie rozlacza...

[xantio]

Witam. Jestem tu nowy.
Chciałbym się dowiedzieć, czy można troszkę rozszerzyć funkcje o rozpoznawanie statusu (dostępny, niedostępny, zaraz wracam), np. funkcja zwraca wartość:
0 przy niedostępnym
1 przy dostępnym
2 przy zaraz wracam

[ikioloak]

http://gg.wha.la/ - tutaj masz dostepna klase do obslugi gg i tam ta funkcja o ktora prosisz jest.


---
Rozpoznawanie statusu w bardzo prosty sposob znalezione na http://www.strefaphp.net/artykul1.html

[PHP] pobierz, plaintext 
<?php
 
$plik = fopen ("http://www.gadu-gadu.pl/users/status.asp?id=numer_gg&styl=2", "r"); 
$status = fgets($plik, 2); 
switch ($status) 
{ 
   case 1: 
	  echo '<IMG src="niedostepny.jpg">'; 
	  break; 
   case 2: 
	  echo '<IMG src="dostepny.jpg">'; 
	  break; 
   case 3: 
	  echo '<IMG src="wracam.jpg">'; 
	  break; 
   default: 
	  // w razie błędu pokaże się obrazek error.jpg 
	  echo '<IMG src="error.jpg">'; 
	  break; 
} 
fclose($plik); 
 
?>
[PHP] pobierz, plaintext 

Ten post edytował ikioloak 12.11.2005, 15:05:49

[artee]

Rozumiem, ze paczka do sprawdzania statusu jednej osoby, to:

[PHP] pobierz, plaintext 
<?
$data = pack ("VVVC",GG_NOTIFY, 5, $szukany_numer, GG_USER_NORMAL);
?>
[PHP] pobierz, plaintext 

A jak sie to ma do pobrania kilku numerow? Trzeba powtarzac wysylanie takiej paczki, czy mozna to zrobic za jednym razem?

[Bakus]

Niestety nie znalazłem odpowiedzi na to pytanie. Mniewam, iż wieloktorne wysłanie zapytań o status w czasie 1 połączenia nie spowoduje błędu i będzie dobrym obejściem tego problemu, jednak to tylko przypuszczenie.

[dariusz_w]

wywala mi taki błąd z tego skryptu:

Warning: unpack(): Type C: not enough input, need 1, have 0 in c:\usr\krasnal\www\statusgg\ggstatus.php on line 134

czy ktoś mi pomoże będę wdzięczny gg 5377455

[ikioloak]

Tez mialem ten problem (moze w zwiazku z wejsciem GG 7?) i klecac troche od bakusa i bramki z http://gg.wha.la/ stworzylem, cos co dziala tak samo jak skrypt Bakusa.. Do sciagniecia razem z klasa do obslugi gg z ww adresu Tutaj.
Jak skorzystac:

[PHP] pobierz, plaintext 
<?php
 
$gg = new GaduEx();
$opis = $gg->getOpis($twoj_gg,$twoje_haslo,$szukany_nr);
 
?>
[PHP] pobierz, plaintext 

[GrayHat]

troche odswieze temat.
skrypt obecnie nie dziala :/
zwraca cos takiego:

Warning: unpack() [function.unpack]: Type V: not enough input, need 4, have 0 in /srv/www/htdocs/web792/html/blog/gg/gg.php on line 18

Warning: fread() [function.fread]: Length parameter must be greater than 0 in /srv/www/htdocs/web792/html/blog/gg/gg.php on line 20

[bim2]

Odswiezam i mowie ze dziala. teraz przetestowalem

[elem84]

Witam...

Wiem że jestem cienki ale nie moge poradzić sobje z pobieraniem większej ilości opisów gg, możecie mi powiedzieć jak należy zmodyfikować tę klasę żeby pobrała w jednej sesji wszystkie opisy numerów gg które jej przekaże w tablicy. Jeszcze raz sorry za prośbe o gotowca ale jakoś to mi nie wychodzi.

Pozdrawiam,
eLeM

[Balon]

[PHP] pobierz, plaintext 
<?php
$numery = array( '2222', '3333', '4444' );
foreach( $numery as $numer )
{
	echo 'Numer: '.$numer.', Opis: '.get_gg_status("2358764", "zxcdews", $numer, $error).'<br />';
}
?>
[PHP] pobierz, plaintext 

,.....

[bim2]

Witam...

Wiem że jestem cienki ale nie moge poradzić sobje z pobieraniem większej ilości opisów gg, możecie mi powiedzieć jak należy zmodyfikować tę klasę żeby pobrała w jednej sesji wszystkie opisy numerów gg które jej przekaże w tablicy. Jeszcze raz sorry za prośbe o gotowca ale jakoś to mi nie wychodzi.

Pozdrawiam,
eLeM

W jednej sesji (IMG:http://forum.php.pl/style_emoticons/default/tongue.gif) czyli nie ze zapętlisz skrypt. Tak sie raczej nie da ^^ Pytaj bakusa o to

[Bakus]

Nie próbowałem rozwiązać pobierania wielu podpisów. Moja rada: eksperymentuj (IMG:http://forum.php.pl/style_emoticons/default/smile.gif)

[Athlan]

[PHP] pobierz, plaintext 
<?php
$szukany_numer = array(12345, 23456, 34567, 45678);
foreach($szukany_numer as $hehe)
{
$data = pack ("VVVC",GG_NOTIFY, 5, $hehe, GG_USER_NORMAL);
}
?>
[PHP] pobierz, plaintext 

tak ?

Ten post edytował Athlan 26.06.2006, 11:37:10

[bim2]

A co to da? $data jest nadpisywana więc wezmie ostatni numer ;P

[Plikownik]

skrypt nie działa - pokazuje mi się taki błąd - "PROBLEM Z POLACZENIEM: 111 - Connection refused"

[Athlan]

bim2 to może tak:

[PHP] pobierz, plaintext 
<?php
$wyniki_dzialania = array();
$szukany_numer = array(12345, 23456, 34567, 45678);
foreach($szukany_numer as $hehe)
{
array_push($wyniki_dzialania, array($szukany_numer => pack("VVVC",GG_NOTIFY, 5, $hehe, GG_USER_NORMAL)));
}
?>
[PHP] pobierz, plaintext 

i potem opisy są zwranace w tablicy: numerek => opisik (IMG:http://forum.php.pl/style_emoticons/default/smile.gif)

masz problem ;p

[bim2]

No tak sie teraz da (IMG:http://forum.php.pl/style_emoticons/default/winksmiley.jpg) Tylko nie testowalem tego i nie wiem czy zadziala (IMG:http://forum.php.pl/style_emoticons/default/winksmiley.jpg) Napisz coś więcej czy działa (IMG:http://forum.php.pl/style_emoticons/default/smile.gif)

[Athlan]

@bim2 teraz musi działać... dla każdego numeru tworzona jest tablica numerek => opis, dzięki czemu mozna ponownie wykorzystać tablicę $szukany_numer w mnuiej wiecej taki sposób:

[PHP] pobierz, plaintext 
<?php
foreach($szukany_numer as $numer)
{
  echo $numer.' ma opis '.$wyniki_dzialania[$numer].'<br />';
}
?>
[PHP] pobierz, plaintext 

wylistuje nam cały wynik (IMG:http://forum.php.pl/style_emoticons/default/smile.gif)

pozdro (IMG:http://forum.php.pl/style_emoticons/default/smile.gif)

[bim2]

Ja rozumiem tlyko ja nie umiem wyciagac pisu i nieorumiem jak on dziala (ten skrypt) Wiec jesli do wyciagniecia opisu wystarczy 1 unpack to OK, powinno dzialać (IMG:http://forum.php.pl/style_emoticons/default/biggrin.gif)

[Athlan]

@bim2:

Funkcja łączy się z serwerem GG, loguje się na nim, pobiera opis dla podanego numeru i kończy połączenie. W przypadku powodzenia całości operacji funkcja zwraca opis. W przypadku niepowodzenia funkcja zwróci wartość "(bool) false" i w zmiennej podanej jako ostatni, czwaty argument umieści komunikat o błędzie jaki zaistniał.

Szczegóły parametrów do przekazania jak i wyniku działania funkcji znajdują się w jej komentarzu.

Ten post edytował Athlan 18.07.2006, 08:56:41

[DooBLER]

Witam

Mam problem ze skryptem
Jeśli podany do skryptu nr GG nie ma ustawionego opisu to dostaje błąd:
Warning: unpack() [function.unpack]: Type C: not enough input, need 1, have 0 in c:\usr\apache\httpd\html\gg\statusgg.php on line 133
Jeśli opis jest ustawiony to wszystko działa pięknie

Czy ktoś wie jak to obejść ?

Pozdrawiam

[bim2]

Wiem że to głupie ale daj @ przed unpack (@unpack()) I powinno zadziałac (IMG:http://forum.php.pl/style_emoticons/default/haha.gif) Ale to jest najprostrze wyjście z sytuacji i może jest baredzije profesjonalne

[DooBLER]

Wiem że to głupie ale daj @ przed unpack (@unpack()) I powinno zadziałac (IMG:http://forum.php.pl/style_emoticons/default/haha.gif) Ale to jest najprostrze wyjście z sytuacji i może jest baredzije profesjonalne

Hehe tak zrobiłem już wczesniej, ale pomyślałem, że nie zaszkodzi zapytać "tęgie głowy" o jakieś bardziej profesionalne rozwiązanie tego problemu.

Myślałem żeby wyciągnąć status przed opisem i wtedy (o ile status rozdziela np "dostepny" != "dostępny z opisem") dać tylko if czy ma rozpakowywać opis czy nie.

Ale jeszcze mam za małego skill'a na zabawe z tymi pakieami (IMG:http://forum.php.pl/style_emoticons/default/aarambo.gif)

Pozdrawiam

[bastek8989]

mi wyswietla

Parse error: syntax error, unexpected T_ENCAPSED_AND_WHITESPACE, expecting T_STRING or T_VARIABLE or T_NUM_STRING in /home/bastek/public_html/gg_test.php on line 102

102 linijka:
$hash = oblicz_hash($haslo_gg, $tab['klucz']);

:|

[kossa]

co masz linię wyżej?

a to może:

[PHP] pobierz, plaintext 
<?php
$hash = oblicz_hash($haslo_gg, $tab["klucz"]);
?>
[PHP] pobierz, plaintext 

Łukasz

[bastek8989]

to nie to ^^ przeciez niewyswietla ze jest blad w zapisie

nic sam niedopisywalem - wszystko mam tak jak podane w tym poscie

Ten post edytował bastek8989 20.12.2006, 16:51:25

[Sabistik]

Nie wiem czy zauważyliście ale kod z listingu z pierwszym poście, posypał się całkiem (pewnie podczas jakiegoś upgrade forum), są w nim pododawane błędne sleshe.

[ali3n]

[PHP] pobierz, plaintext 
<?php
/* Skrypt napisany w oparciu o klasę www2gg (http://gg.wha.la/)
 * i opis protokołu GaduGadu z projektu EKG (http://dev.null.pl/ekg/docs/protocol.html)
 * Kod można dowolnie wykorzystać pod warunkiem pozostawienia niniejszego koment
arza
 * Kod jest udostępniony na zasadach OpenSource.
 *
 * @author: Krzysztof Andrzej Błachut vel Bakus <bakus@idn.net.pl>
 * @copyright: 2004-2005 by Krzysztof Andrzej Błachut vel Bakus
 * @package: OpisGG
 * @version: 1.0
 */
 
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
 
	function oblicz_hash ($haslo, $klucz)
	{
		$x0=0; $x1=0; $y0=0; $y1=0; $z=0; $tmp=0;
		$y0 = ($klucz << 16) >> 16; $y1 = $klucz >> 16 ;
		for ($i=0; $i<strlen($haslo); $i++)
		{
			$x0 = ($x0 & 0xFF00) | ord($haslo[$i]); $x1 &= 0xFFFF;
			$y0 ^= $x0; $y1 ^= $x1;
			$y0 += $x0; $y1 += $x1;
			$x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
			$y0 ^= $x0; $y1 ^= $x1;
			$x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
			$y0 -= $x0; $y1 -= $x1;
			$x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
			$y0 ^= $x0; $y1 ^= $x1;
			$z = $y0 & 0x1F;
			$y0 &= 0xFFFF; $y1 &= 0xFFFF;
			if ($z <= 16)
			{
				$tmp= ($y1 << $z) | ($y0 >> (16-$z));
				$y0 = ($y1 >> (16-$z)) | ($y0 << $z);
				$y1 = $tmp;	
			}else{
				$tmp= $y0 << ($z-16);
				$y0 = ($y0 >> (32-$z)) | ( (($y1 << $z) >> $z) << ($z-16) );
				$y1 = ($y1 >> (32-$z)) | $tmp;
			}
			$y0 &= 0xFFFF; $y1 &= 0xFFFF;
		}
		$hash = hexdec(sprintf("%04x%04x", $y1, $y0));
		settype($hash, 'integer');
		return $hash;
	}
 
	/* Funkcja pobiera z serwera GaduGadu opis dla podanego numeru.
	 *
	 * @param int Numer GG "bramki"
	 * @param string Hasło GG "bramki"
	 * @param int Numer GG, którego opis funkcja ma pobrać
	 * @param var Zmienna w której umieszczony będzie ewentualny komunikat błędu
	 * @return mixed Zawiera Opis numeru GG, lub false w przypadku błędu
	 */
	function get_gg_status($numer_gg, $haslo_gg, $szukany_numer, &$error)
	{
		// Ustawianie stałych na potrzeby protokołu
		define("GG_LOGIN60",		0x0015);
		define("GG_STATUS_AVAIL",   0x0002);
		define("GG_LOGIN_OK",		0x0003);
		define("GG_NOTIFY",		 0x0010);
		define("GG_USER_NORMAL",	0x0003);
 
		$fp = fsockopen( "appmsg.gadu-gadu.pl", 80, $errno, $errmsg, 3 );
		if (!$fp)
		{
			$error = "BRAK POLACZENA Z APPMSG.GADU-GADU.PL, MOZE BYC PRZECIAZONY: " . $errno . " - " . $errstr . "n";
			return false;
		}else{
			$get = "GET /appsvc/appmsg.asp?fmnumber=<$numer_gg> HTTP/1.0rn";
			$get.= "Host: appmsg.gadu-gadu.plrn";
			$get.= "User-Agent: Mozilla/4.7 [en] (Win98; I)rn";
			$get.= "Pragma: no-cachernrn";
			fputs($fp, $get);
			fgets($fp, 128);
			fgets($fp, 128);
			$buf = fgets($fp, 128);
			preg_match("/s([d.]{8,16}):([d]{1,5})s/", $buf, $adres);
			$host = $adres[1];
			$port = $adres[2];
			fclose($fp);
		}
 
		// Ustanawianie połączenia z serwerem GG
		$fp = fsockopen($host, $port, $errno, $errstr, 10);
		if (!$fp)
		{
			$error = "PROBLEM Z POLACZENIEM: $errno - $errstrnn";
			return false;
		}
		if (!$data = fread($fp, 12))
		{
			$error = "Polaczenie nieoczekiwanie zamknietenn";
			return false;
		}
 
		// Pobieranie danych z serwera - odbiór klucza do wygenerowania hasha hasła
		$tab = unpack("Vtyp/Vrozmiar/Vklucz", $data);
		// obliczanie hasha hasła
		$hash = oblicz_hash($haslo_gg, $tab['klucz']);
		$data = pack("VVVVVVvVvVvCCa".strlen(""), GG_LOGIN60, 0x20 + strlen(""),
		$numer_gg, $hash, GG_STATUS_AVAIL, 0x20, 0, 0, 0, 0, 0, 0x14, 0xbe , "");
		// wysłanie hasha hasła
		fwrite($fp, $data);
		if (!$data1 = fread($fp, 8))
		{
			$error = "Nie rozpoznany bladn";
			return false;
		}
		$tab = unpack("Vlogin_status/Vrozmiar", $data1);
		if($tab['login_status'] != GG_LOGIN_OK)
		{
			$error = "Nie prawidłowe hasło...nn";
			return false;
		}
 
		// Wysłanie listy kontaktów z jednym numerem
		$data = pack ("VVVC",GG_NOTIFY, 5, $szukany_numer, GG_USER_NORMAL);
		if(!fwrite($fp,$data))
		{
			$error = "Blad wysylania listy kontaktownn";
			return false;
		}
		// Odebranie pakietu ze specyfikacją następnego pakietu
		$data = fread($fp, 8);
		$tab = unpack("Vtyp/Vrozmiar", $data);
		// Pobranie pakietu opisu
		$data = fread($fp, $tab['rozmiar']);
		// Zamknięcie połączenia z serwerem
		fclose($fp);
		$tablica = unpack("Iuin/Cstatus/Iremoteip/Sremoteport/Cversion/Cimagesize/Cunknown/Cdescription_size/a*", $data);
		return $tablica[1];
	}
?>
[PHP] pobierz, plaintext 

poprawiłem kod , ale nie sprawdzałem:P

[sagittariuspl]

użyłem tego skryptu, ale nie działa. może jakieś sugestie?

[Raynold]

Żeby skrypt działał poprawnie, trzeba włączyć dyrektywę allow_url_fopen. Niestety, nie można tego zrobić poprzez php_ini() i trzeba ustawić to w pliku konfiguracyjnym php.ini lub httpd.conf. Jeśli korzystacie z jakiegoś darmowego konta, to nici - trzeba pogadać z adminem.

Oczywiście, może to być jeden z powodów. Żeby w ogóle sprawdzić, czy na tym polega problem, można wywołać funkcję phpinfo() i sprawdzić wartość allow_url_fopen, ewentualnie skorzystać z ini_get()

PS. Dotyczy to z pewnością tego sposobu przy pobieraniu statusu i używaniu własnych grafik. Nie wiem co z tym na początku tematu - czy tam też jest ten sam problem czy nie; nie testowałem (IMG:http://forum.php.pl/style_emoticons/default/winksmiley.jpg)

Ten post edytował Raynold 9.01.2007, 05:25:33

[krl_b]

działało działało i przestało (IMG:http://forum.php.pl/style_emoticons/default/blink.gif)
Fatal error: Maximum execution time of 60 seconds exceeded in ... on line
w tej lini:

[PHP] pobierz, plaintext 
<?php
$data = fread($fp, 8);
?>
[PHP] pobierz, plaintext 

potem znów zadziałało pare razy (na localhoście) i po uploadzie padło na hoście w internecie (IMG:http://forum.php.pl/style_emoticons/default/blinksmiley.gif)
allow_url_fopen włączone na localu i w necie.

ktoś może coś poradzić?

[suda]

Nigdy nie byłem dobry z wyrażeń ale preg z linii 80 wygląda tak:

[PHP] pobierz, plaintext 
<?php
preg_match("/s([d.]{8,16}):([d]{1,5})s/", $buf, $adres);
?>
[PHP] pobierz, plaintext 

a powinien wyglądać tak:

Kod

preg_match("/\s([\d.]{8,16}):([\d]{1,5})\s/", $buf, $adres);

ten highlighter forum przy PHP się coś kiełbasi i backslashe usuwa

[mathewoosh]

a jak mi pisze ze

Nie rozpoznany blad

(IMG:http://forum.php.pl/style_emoticons/default/questionmark.gif) wszystkie dotychczasowe sprawy ujalem. na jednym serwerze wszystko chodzi ladnie i pieknie a na drugim niebardzo..

Ten post edytował mathewoosh 12.04.2007, 08:02:55

[soon]

Niestety poniższy kod nie zwraca mi żadnej wartości, nie wyświetla też żadnych błędów

[PHP] pobierz, plaintext 
<?php
/* Skrypt napisany w oparciu o klasę www2gg (http://gg.wha.la/)
 * i opis protokołu GaduGadu z projektu EKG (http://dev.null.pl/ekg/docs/protocol.html)
 * Kod można dowolnie wykorzystać pod warunkiem pozostawienia niniejszego koment
arza
 * Kod jest udostępniony na zasadach OpenSource.
 *
 * @author: Krzysztof Andrzej Błachut vel Bakus <bakus@idn.net.pl>
 * @copyright: 2004-2005 by Krzysztof Andrzej Błachut vel Bakus
 * @package: OpisGG
 * @version: 1.0
 */
 
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
 
	function oblicz_hash ($haslo, $klucz)
	{
		$x0=0; $x1=0; $y0=0; $y1=0; $z=0; $tmp=0;
		$y0 = ($klucz << 16) >> 16; $y1 = $klucz >> 16 ;
		for ($i=0; $i<strlen($haslo); $i++)
		{
			$x0 = ($x0 & 0xFF00) | ord($haslo[$i]); $x1 &= 0xFFFF;
			$y0 ^= $x0; $y1 ^= $x1;
			$y0 += $x0; $y1 += $x1;
			$x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
			$y0 ^= $x0; $y1 ^= $x1;
			$x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
			$y0 -= $x0; $y1 -= $x1;
			$x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
			$y0 ^= $x0; $y1 ^= $x1;
			$z = $y0 & 0x1F;
			$y0 &= 0xFFFF; $y1 &= 0xFFFF;
			if ($z <= 16)
			{
				$tmp= ($y1 << $z) | ($y0 >> (16-$z));
				$y0 = ($y1 >> (16-$z)) | ($y0 << $z);
				$y1 = $tmp;	
			}else{
				$tmp= $y0 << ($z-16);
				$y0 = ($y0 >> (32-$z)) | ( (($y1 << $z) >> $z) << ($z-16) );
				$y1 = ($y1 >> (32-$z)) | $tmp;
			}
			$y0 &= 0xFFFF; $y1 &= 0xFFFF;
		}
		$hash = hexdec(sprintf("%04x%04x", $y1, $y0));
		settype($hash, 'integer');
		return $hash;
	}
 
	/* Funkcja pobiera z serwera GaduGadu opis dla podanego numeru.
	 *
	 * @param int Numer GG "bramki"
	 * @param string Hasło GG "bramki"
	 * @param int Numer GG, którego opis funkcja ma pobrać
	 * @param var Zmienna w której umieszczony będzie ewentualny komunikat błędu
	 * @return mixed Zawiera Opis numeru GG, lub false w przypadku błędu
	 */
	function get_gg_status($numer_gg, $haslo_gg, $szukany_numer, &$error)
	{
		// Ustawianie stałych na potrzeby protokołu
		define("GG_LOGIN60",		0x0015);
		define("GG_STATUS_AVAIL",   0x0002);
		define("GG_LOGIN_OK",		0x0003);
		define("GG_NOTIFY",		 0x0010);
		define("GG_USER_NORMAL",	0x0003);
 
		$fp = fsockopen( "appmsg.gadu-gadu.pl", 80, $errno, $errmsg, 3 );
		if (!$fp)
		{
			$error = "BRAK POLACZENA Z APPMSG.GADU-GADU.PL, MOZE BYC PRZECIAZONY: " . $errno . " - " . $errstr . "n";
			return false;
		}else{
			$get = "GET /appsvc/appmsg.asp?fmnumber=<$numer_gg> HTTP/1.0rn";
			$get.= "Host: appmsg.gadu-gadu.plrn";
			$get.= "User-Agent: Mozilla/4.7 [en] (Win98; I)rn";
			$get.= "Pragma: no-cachernrn";
			fputs($fp, $get);
			fgets($fp, 128);
			fgets($fp, 128);
			$buf = fgets($fp, 128);
			preg_match("/s([d.]{8,16}):([d]{1,5})s/", $buf, $adres);
			$host = $adres[1];
			$port = $adres[2];
			fclose($fp);
		}
 
		// Ustanawianie połączenia z serwerem GG
		$fp = fsockopen($host, $port, $errno, $errstr, 10);
		if (!$fp)
		{
			$error = "PROBLEM Z POLACZENIEM: $errno - $errstrnn";
			return false;
		}
		if (!$data = fread($fp, 12))
		{
			$error = "Polaczenie nieoczekiwanie zamknietenn";
			return false;
		}
 
		// Pobieranie danych z serwera - odbiór klucza do wygenerowania hasha hasła
		$tab = unpack("Vtyp/Vrozmiar/Vklucz", $data);
		// obliczanie hasha hasła
		$hash = oblicz_hash($haslo_gg, $tab['klucz']);
		$data = pack("VVVVVVvVvVvCCa".strlen(""), GG_LOGIN60, 0x20 + strlen(""),
		$numer_gg, $hash, GG_STATUS_AVAIL, 0x20, 0, 0, 0, 0, 0, 0x14, 0xbe , "");
		// wysłanie hasha hasła
		fwrite($fp, $data);
		if (!$data1 = fread($fp, 8))
		{
			$error = "Nie rozpoznany bladn";
			return false;
		}
		$tab = unpack("Vlogin_status/Vrozmiar", $data1);
		if($tab['login_status'] != GG_LOGIN_OK)
		{
			$error = "Nie prawidłowe hasło...nn";
			return false;
		}
 
		// Wysłanie listy kontaktów z jednym numerem
		$data = pack ("VVVC",GG_NOTIFY, 5, $szukany_numer, GG_USER_NORMAL);
		if(!fwrite($fp,$data))
		{
			$error = "Blad wysylania listy kontaktownn";
			return false;
		}
		// Odebranie pakietu ze specyfikacją następnego pakietu
		$data = fread($fp, 8);
		$tab = unpack("Vtyp/Vrozmiar", $data);
		// Pobranie pakietu opisu
		$data = fread($fp, $tab['rozmiar']);
		// Zamknięcie połączenia z serwerem
		fclose($fp);
		$tablica = unpack("Iuin/Cstatus/Iremoteip/Sremoteport/Cversion/Cimagesize/Cunknown/Cdescription_size/a*", $data);
		return $tablica[1];
	}
 
echo 'Opis: '.get_gg_status("xxx", "xxx", "4437900", $error).'<br />';
?>
[PHP] pobierz, plaintext 

[mekeke2]

jesli ni pokazuje ci opisu sprobuj recznie wklepac numer serwera z ktorym ma sie laczyc. Umnie to zadzialalo mam jedynie klopot z kodowaniem polskich znaków

[Trojan]

U mnie pomogło:

Nigdy nie byłem dobry z wyrażeń ale preg z linii 80 wygląda tak:

[PHP] pobierz, plaintext 
<?php
preg_match(&#092;"/s([d.]{8,16}):([d]{1,5})s/\", $buf, $adres);
?>
[PHP] pobierz, plaintext 

a powinien wyglądać tak:

Kod

preg_match("/\s([\d.]{8,16}):([\d]{1,5})\s/", $buf, $adres);

ten highlighter forum przy PHP się coś kiełbasi i backslashe usuwa

[anty]

mam problem z wyświetlaniem polskich znaków, każdy jest wyświetlany jako znak zapytania w rombie (albo coś w tym stylu). może rozwiązał ktoś już ten problem? (IMG:http://forum.php.pl/style_emoticons/default/smile.gif)

[icetab]

a jak zrobic zeby pobrac pare opisow
bo jak tak zrobie pare razy z roznymi nr gg do sprawdenia to skrypt mysli albo nie pokazuje :/
echo ''.get_gg_status("***", "**", "**", $error).'<br>';
echo ''.get_gg_status("***", "**", "**", $error).'<br>';
echo ''.get_gg_status("***", "**", "**", $error).'<br>';

[chez]

Witam,
troszkę zmodyfikowałem źródło na takie które działa, o to co wyszło:

Kod

<?php
    function oblicz_hash ($haslo, $klucz)
    {
        $x0=0; $x1=0; $y0=0; $y1=0; $z=0; $tmp=0;
        $y0 = ($klucz << 16) >> 16; $y1 = $klucz >> 16;
        for ($i=0; $i<strlen($haslo); $i++)
        {
            $x0 = ($x0 & 0xFF00) | ord($haslo[$i]); $x1 &= 0xFFFF;
            $y0 ^= $x0; $y1 ^= $x1;
            $y0 += $x0; $y1 += $x1;
            $x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
            $y0 ^= $x0; $y1 ^= $x1;
            $x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
            $y0 -= $x0; $y1 -= $x1;
            $x1 <<= 8; $x1 |= ($x0 >> 8); $x0 <<= 8;
            $y0 ^= $x0; $y1 ^= $x1;
            $z = $y0 & 0x1F;
            $y0 &= 0xFFFF; $y1 &= 0xFFFF;
            if ($z <= 16)
            {
                $tmp= ($y1 << $z) | ($y0 >> (16-$z));
                $y0 = ($y1 >> (16-$z)) | ($y0 << $z);
                $y1 = $tmp;    
            }else{
                $tmp= $y0 << ($z-16);
                $y0 = ($y0 >> (32-$z)) | ( (($y1 << $z) >> $z) << ($z-16) );
                $y1 = ($y1 >> (32-$z)) | $tmp;
            }
            $y0 &= 0xFFFF; $y1 &= 0xFFFF;
        }
        $hash = hexdec(sprintf("%04x%04x", $y1, $y0));
        settype($hash, 'integer');
        return $hash;
    }
    function get_gg_status($numer_gg, $haslo_gg, $szukany_numer, &$error)
    {
        define("GG_LOGIN60",        0x0015);
        define("GG_STATUS_AVAIL",   0x0002);
        define("GG_LOGIN_OK",        0x0003);
        define("GG_NOTIFY",         0x0010);
        define("GG_USER_NORMAL",    0x0003);
        $fp = fsockopen("91.197.13.24", 8074, $errno, $errstr, 10);
        if (!$fp)
        {
            $error = "PROBLEM Z POLACZENIEM: $errno - $errstr\n\n";
            return false;
        }
        if (!$data = fread($fp, 12))
        {
            $error = "Polaczenie nieoczekiwanie zamkniete\n\n";
            return false;
        }
        $tab = unpack("Vtyp/Vrozmiar/Vklucz", $data);
        $hash = oblicz_hash($haslo_gg, $tab['klucz']);
        $data = pack("VVVVVVvVvVvCCa".strlen(""), GG_LOGIN60, 0x20 + strlen(""),
        $numer_gg, $hash, GG_STATUS_AVAIL, 0x20, 0, 0, 0, 0, 0, 0x14, 0xbe , "");
        fwrite($fp, $data);
        if (!$data1 = fread($fp, 8))
        {
            $error = "Nie rozpoznany blad\n";
            return false;
        }
        $tab = unpack("Vlogin_status/Vrozmiar", $data1);
        if($tab['login_status'] != GG_LOGIN_OK)
        {
            $error = "Nie prawidłowe hasło...\n\n";
            return false;
        }
        $data = pack ("VVVC",GG_NOTIFY, 5, $szukany_numer, GG_USER_NORMAL);
        if(!fwrite($fp,$data))
        {
            $error = "Blad wysylania listy kontaktow\n\n";
            return false;
        }
        $data = fread($fp, 8);
        $tab = unpack("Vtyp/Vrozmiar", $data);
        $data = fread($fp, $tab['rozmiar']);
        fclose($fp);
        $tablica = @unpack("Iuin/Cstatus/Iremoteip/Sremoteport/Cversion/Cimagesize/Cunknown/Cdescription_size/a*", $data);
        return $tablica[1];
    }
    
    function getOpis($numerBramki, $hasloBramki, $numerSpr){
            $dostepny = '<img src="http://www.gadu-gadu.pl/users/status.asp?id='.$numerSpr.'&styl=3">';
        if (get_gg_status($numerBramki, $hasloBramki, $numerSpr, $error) == '')
        {
            $getOpis = '';
        } else {
            $getOpis = 'Z opisem: '.get_gg_status($numerBramki, $hasloBramki, $numerSpr, $error);
        }
            $opis = 'W tej chwili jestem: '.$dostepny.' <br /> '.$getOpis.'<br />';
            return $opis;
        }


?>

Sposób użycia:

Kod

echo getOpis('numer_bramki', 'haslo_bramki', 'nr_gg_do_sprawdzenia');

Źródło dostępne również pod adresem:
http://chez.ovh.org/opis.phps

[dadexix]

Dobry, akurat czegoś takiego potrzebuje, ale wywala mi:

Warning: fsockopen() [function.fsockopen]: unable to connect to 91.197.13.24:8074 (Connection timed out) in /home/a3880550/public_html/index.php on line 42

jak już wyczytałem, pewnie nie działa bo pozmieniali coś w gg... ale pytam - działa czy ja coś źle robie?

A jak nie działa, istnieje coś co działa?

Z góry, dzięki:))

[sebxx4]

Witam Panowie,
Wybaczcie proszę offtopic, ale potrzebuję aktualnej (działającej) wersji tego skryptu. Prosiłbym o podesłanie (IMG:style_emoticons/default/smile.gif)

Pozdrawiam.

[Bakus]

Jak mogłeś zauważyć ostatnia wiadomość w temacie miała miejsce 11 lat temu i dotyczyła problemów z funkcjonowaniem przedstawionego rozwiązania.
Obawiam się, że przez te 16 lat od kiedy pierwotny kod powstał, mogło mieć miejsce wiele zmian w funkcjonowaniu GG i jego protokołu - zwłaszcza, że po drodze zmienił się nie tylko komunikator ale i jego właściciel (IMG:style_emoticons/default/wink.gif)

Z tego co na szybko poszukałem, to biblioteka libgadu jest aktualizowana, więc w niej możesz szukać pomocy (IMG:style_emoticons/default/smile.gif)
https://github.com/wojtekka/libgadu