--- mdap-server.pl 2007/04/24 10:01:22 28 +++ mdap-server.pl 2007/04/24 10:11:24 29 @@ -224,16 +224,21 @@ "\n"; $ant_flashing->{$ant} = 0; my $waiting = 0; + my $count = 0; map { $waiting++ if ($ant_flashing->{$_}); + $count++; } keys %$ant_flashing; - print "**** ALL ANTS FLASHED ****\n" if ($ant_flashing && $waiting == 0); + if ($ant_flashing && $waiting == 0) { + print "**** ALL $count ANTS FLASHED ****\n"; + $ant_flashing = {}; + } } } else { once "!! NO FIRMWARE for $board in $tftp_path for ant $ant, skipping update\n"; } } elsif ( $type eq 'REPLY-EXEC-CLI' && $h->{'SEQ-NR'} == 1 ) { - print "+ $ant bootp mode re-flash started\n"; + print "+ $ant bootp mode re-flash started\n" if ($verbose); mdap_send("EXEC-CLI MDAP/$mdap_ver\r\nSEQ-NR:2\r\nTO-ANT:$ant\r\nUSER-ID:$user_id\r\nUSER-PWD:$user_pwd\r\n"); forget_ant( $ant ); $ant_flashing->{$ant}++;