#!/usr/bin/expect --

##
# $Id: mac.exp 500 2005-02-10 02:19:46Z dun $
#   by Chris Dunlap <cdunlap@llnl.gov>
##

set env(PATH) "/bin:/usr/bin:/usr/local/bin"
source /usr/share/conman/conman.exp
source /usr/share/conman/alpha.exp
log_user 0

proc print_mac_addrs {spawn_id output_id console} {
#
  set macs [alpha_get_mac_addrs $spawn_id $output_id $console err]
  if {[llength $macs] == 0} {
    exp_send -i $output_id "ERROR: $err.\n"
    return
  }
  foreach mac $macs {
    exp_send -i $output_id "[join $mac]\n"
  }
}

conman_run 256 $argv print_mac_addrs