/*----------------------------------------------------------------------------*-
Function:
	aton
Params:
	ip[] - String representation of an IP.
Return:
	IP as a 32bit int.
Notes:
	-
-*----------------------------------------------------------------------------*/

stock aton(ip[])
{
	new
		ipv = strval(ip) << 24,
		pos = 0;
	while (pos < 15 && ip[pos] && ip[pos++] != '.') {}
	ipv += strval(ip[pos]) << 16;
	while (pos < 15 && ip[pos] && ip[pos++] != '.') {}
	ipv += strval(ip[pos]) << 8;
	while (pos < 15 && ip[pos] && ip[pos++] != '.') {}
	ipv += strval(ip[pos]);
	return ipv;
}