IBM BladeCenter HX5 User Manual

set arg5 "-o"
set arg6 "${local_copy}"
set run_command [list exec $command $arg1 $arg2 $arg3 $arg4 $arg5 $arg6]
if {[catch $run_command result]} {
ft_log "Curl: command crashed with result $result fetching $arg4"
ft_log "Curl: The command was: ($command $arg1 $arg2 $arg3 $arg4 $arg5 $arg6"
return 1
}
return 0
}
################################################################################
# #
# Delete a file from the AMM. #
# #
################################################################################
proc delete_file_from_amm { filename } {
global amm_id
send -i $amm_id "files -d ${filename}\r"
expect -i $amm_id "OK" {
return 0
}
return 1
}
################################################################################
# #
# Code from source : support/include/MultiNode.exp #
# #
################################################################################
set multinode_complex [ list ]
#############################################################################
# #
# Build a list of complexes. #
# #
#############################################################################
proc populate_complex_list{}{
global amm_id multinode_complex
set multinode_entry [ list ]
send -i $amm_id "scale\r\n"
expect {
#
# Find the complex ID.
#
-i $amm_id "Complex ID:" {
expect -i $amm_id "\n" {
set temp $expect_out(buffer)
set complex [ string trimright $temp ]
set complex [ string range ${complex}14]
set multinode_entry [ list ]
lappend multinode_entry ${complex}
} timeout {
ft_error "parse error"
}
exp_continue
}
#
# Find the slots.
#
-i $amm_id "Bay: " {
Chapter 4. Configuring the blade server 93

IBM BladeCenter HX5 Specifications

General

Brand	IBM
Model	BladeCenter HX5
Category	Server
Language	English