Sharp.Augeas/Sharp.Augeas.Test/lens/tests/test_rancid.aug

31 lines
706 B
Plaintext

module Test_rancid =
(* Examples from router.db(5) *)
let rancid = "dial1.paris;cisco;up
core1.paris;cisco;down;in testing until 5/5/2001.
core2.paris;cisco;ticketed;Ticket 6054234, 5/3/2001
border1.paris;juniper;up;
"
test Rancid.lns get rancid =
{ "device" = "dial1.paris"
{ "type" = "cisco" }
{ "state" = "up" }
}
{ "device" = "core1.paris"
{ "type" = "cisco" }
{ "state" = "down" }
{ "comment" = "in testing until 5/5/2001." }
}
{ "device" = "core2.paris"
{ "type" = "cisco" }
{ "state" = "ticketed" }
{ "comment" = "Ticket 6054234, 5/3/2001" }
}
{ "device" = "border1.paris"
{ "type" = "juniper" }
{ "state" = "up" }
{ "comment" = "" }
}