Subversion Repositories Kolibri OS

Rev

Rev 3081 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3081 Rev 3106
Line 32... Line 32...
32 
itoa(addr&0xFF) — это 10
 32 
itoa(addr&0xFF) — это 10
33 
*/
 33 
*/
Line 34... Line 34...
34 
 
 34 
 
35 
dword GetIPfromAdress(dword addr)
 35 
dword GetIPfromAdress(dword addr)
36 
{
 36 
{
37 
	dword lpointer;
 37 
	dword lpointer, IPa;
38 
	getaddrinfo stdcall (addr, 0, 0, #lpointer);
 38 
	getaddrinfo stdcall (addr, 0, 0, #lpointer);
39 
	if (EAX!=0) return 0; //если ошибка
 39 
	if (EAX!=0) IPa = 0; else IPa = DSDWORD[DSDWORD[lpointer+24]+4];
- 
 
 40 
	freeaddrinfo stdcall (lpointer);
40 
	return DSDWORD[DSDWORD[lpointer+24]+4];
 41 
	return IPa;
Line 41... Line -...
41 
}
 - 
 
42 
 
 - 
 
43 
/*dword GetIPfromAdressASM(dword addr)
 - 
 
44 
{
 - 
 
45 
	dword lpointer;
 - 
 
46 
 
 - 
 
47 
	ESP=#lpointer;
 - 
 
48 
	$push   esp     // lpointer
 - 
 
49 
	$push   esp     // fourth parameter
 - 
 
50 
	$push   0       // third parameter
 - 
 
51 
	$push   0       // second parameter
 - 
 
52 
	EAX = addr;
 - 
 
53 
	$push   eax     // first parameter
 - 
 
54 
	$call   getaddrinfo
 - 
 
55 
	if (EAX!=0) return 0; //ошибка
 - 
 
56 
	$pop    esi
 - 
 
57 
	$mov    ebx, DSDWORD[lpointer+24]
 - 
 
58 
	$mov    eax, DSDWORD[EBX+4]
 - 
 
59
- 
 
60 
	return EAX;
 - 
 
61 
}*/
 - 
 
62 
 
 42 
}
63 
 
 43 
 
64 
/*
 44 
/*
65 
//Convert the string from standard IPv4 dotted notation to integer IP addr.
 45 
//Convert the string from standard IPv4 dotted notation to integer IP addr.