| #!/usr/bin/env expect |
| ############################################################################ |
| # Purpose: Test of Slurm functionality |
| # Validates that the scontrol show job option has the job |
| # array fields |
| ############################################################################ |
| # Copyright (C) SchedMD LLC. |
| # |
| # This file is part of Slurm, a resource management program. |
| # For details, see <https://slurm.schedmd.com/>. |
| # Please also read the included file: DISCLAIMER. |
| # |
| # Slurm is free software; you can redistribute it and/or modify it under |
| # the terms of the GNU General Public License as published by the Free |
| # Software Foundation; either version 2 of the License, or (at your option) |
| # any later version. |
| # |
| # Slurm is distributed in the hope that it will be useful, but WITHOUT ANY |
| # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS |
| # FOR A PARTICULAR PURPOSE. See the GNU General Public License for more |
| # details. |
| # |
| # You should have received a copy of the GNU General Public License along |
| # with Slurm; if not, write to the Free Software Foundation, Inc., |
| # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. |
| ############################################################################ |
| source ./globals |
| |
| set array_size 4 |
| set file_script "$test_dir/script" |
| set job_id 0 |
| |
| if {[get_config_param "MaxArraySize"] < [expr $array_size + 1]} { |
| skip "MaxArraySize is to small" |
| } |
| |
| proc cleanup {} { |
| global job_id |
| |
| cancel_job $job_id |
| } |
| |
| proc check_ids { job } { |
| global scontrol array_size number |
| |
| for {set index 0} {$index<$array_size} {incr index} { |
| set job_dict [dict get [get_jobs $job\_$index] $job] |
| subtest {[dict get $job_dict "ArrayJobId"] == $job} "Check ArrayJobId (=$job)" |
| subtest {[dict get $job_dict "ArrayTaskId"] == $index} "Check ArrayTaskId (=$index)" |
| } |
| } |
| |
| make_bash_script $file_script "sleep 10" |
| |
| set job_id [submit_job -fail "-N1 --array=0-[expr $array_size - 1] --begin=midnight --output=/dev/null $file_script"] |
| |
| check_ids $job_id |