2011-08-15 16:38:23 -07:00
|
|
|
import vec;
|
2011-08-15 16:54:02 -07:00
|
|
|
import uint;
|
|
|
|
|
2012-03-07 18:17:30 -08:00
|
|
|
#[doc = "An IP address"]
|
2012-01-19 15:20:57 -08:00
|
|
|
enum ip_addr {
|
2011-10-26 16:24:31 -07:00
|
|
|
/*
|
|
|
|
Variant: ipv4
|
|
|
|
|
|
|
|
An IPv4 address
|
|
|
|
*/
|
2012-01-19 17:55:34 -08:00
|
|
|
ipv4(u8, u8, u8, u8),
|
2011-10-26 16:24:31 -07:00
|
|
|
}
|
|
|
|
|
2012-03-07 18:17:30 -08:00
|
|
|
#[doc = "Convert an `ip_addr` to a str"]
|
2011-09-02 15:34:58 -07:00
|
|
|
fn format_addr(ip: ip_addr) -> str {
|
2011-08-19 15:16:48 -07:00
|
|
|
alt ip {
|
2011-08-15 16:54:02 -07:00
|
|
|
ipv4(a, b, c, d) {
|
2011-09-01 18:49:10 -07:00
|
|
|
#fmt["%u.%u.%u.%u", a as uint, b as uint, c as uint, d as uint]
|
2011-08-15 16:54:02 -07:00
|
|
|
}
|
|
|
|
_ { fail "Unsupported address type"; }
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2012-03-07 18:17:30 -08:00
|
|
|
#[doc = "
|
|
|
|
Convert a str to `ip_addr`
|
2011-10-26 16:24:31 -07:00
|
|
|
|
2012-03-07 18:17:30 -08:00
|
|
|
Converts a string of the format `x.x.x.x` into an ip_addr enum.
|
2011-10-26 16:24:31 -07:00
|
|
|
|
2012-03-07 18:17:30 -08:00
|
|
|
Fails if the string is not a valid IPv4 address
|
|
|
|
"]
|
2011-09-12 11:27:30 +02:00
|
|
|
fn parse_addr(ip: str) -> ip_addr {
|
2012-02-23 13:41:10 +01:00
|
|
|
let parts = vec::map(str::split_char(ip, '.'), {|s|
|
2012-02-22 13:18:15 +01:00
|
|
|
alt uint::from_str(s) {
|
|
|
|
some(n) if n <= 255u { n }
|
|
|
|
_ { fail "Invalid IP Address part." }
|
|
|
|
}
|
|
|
|
});
|
2011-08-15 16:38:23 -07:00
|
|
|
if vec::len(parts) != 4u { fail "Too many dots in IP address"; }
|
2011-08-19 15:16:48 -07:00
|
|
|
ipv4(parts[0] as u8, parts[1] as u8, parts[2] as u8, parts[3] as u8)
|
2011-08-15 16:54:02 -07:00
|
|
|
}
|
2012-01-17 19:05:07 -08:00
|
|
|
|
|
|
|
#[test]
|
|
|
|
fn test_format_ip() {
|
|
|
|
assert (net::format_addr(net::ipv4(127u8, 0u8, 0u8, 1u8)) == "127.0.0.1")
|
|
|
|
}
|
|
|
|
|
|
|
|
#[test]
|
|
|
|
fn test_parse_ip() {
|
|
|
|
assert (net::parse_addr("127.0.0.1") == net::ipv4(127u8, 0u8, 0u8, 1u8));
|
|
|
|
}
|