#! /usr/bin/awk -f

function ip2n(nladdr, nloctets , r, i)
{
	split(nladdr, nloctets, ".")

	for(i = 1; i <= 4; ++i)
		r += nloctets[5 - i] * (2 ** (24 - ((4 - i) * 8)))

	return r
}

function cidr2n(nladdr, nlbits)
{
	return ip2n(nladdr) * (2 ** 8) + (nlbits == "" ? 32 : nlbits)
}