1use strict; 2use warnings; 3use Default qw($ospfd_ip $ospfd_rtrid); 4 5our %tst_args = ( 6 client => { 7 tasks => [ 8 { 9 name => "receive hello with dr 0.0.0.0 bdr 0.0.0.0, ". 10 "enter $ospfd_rtrid as our neighbor", 11 check => { 12 dr => "0.0.0.0", 13 bdr => "0.0.0.0", 14 nbrs => [], 15 }, 16 state => { 17 nbrs => [ $ospfd_rtrid ], 18 }, 19 }, 20 { 21 name => "neighbor asserting itself as master. " . 22 "We proclaim to be master, because of higher router id.", 23 wait => { 24 dd_bits => 7, # I|M|MS 25 }, 26 state => { 27 dd_bits => 7, 28 }, 29 timeout => 10, # not specified in rfc 30 }, 31 { 32 name => "check if neighbor is slave, initialization is done ". 33 "and neighbour has applied our dd sequence number.", 34 wait => { 35 dd_bits => 0x2, # M 36 dd_seq => 999, 37 }, 38 timeout => 10, # not specified in rfc 39 }, 40 ], 41 }, 42); 43 441; 45