require 5.004;

###############################################################################
#
# Loadleveler on AIX
#
# UNTESTED
#
# Based on V3.0 version developed for Idris
#
###############################################################################

# If you are using Perl 5.004 or later, then use the FindBin lines. Otherwise
# you will need to pass the TSI installation directory on the command line
# using "-I" or modify the line below
#use lib "<install directory>";

use FindBin qw($Bin)
  ;    # determines dynamically the directory containing this script
   # and from there the module files (which are installed in the same directory)
use lib $FindBin::Bin;
use strict;

use SharedConfiguration qw(configure_common startup);
$main::tsi_props = shift || "./tsi.properties";
configure_common();

# The TSI code is split into a number of Perl modules to
# allow for easier maintenance. This file contains batch system or
# operating system specific options, while the SharedConfiguration.pm
# the common settings. You should review both files.

# BSS/OS SPECIFIC CONFIGURATION <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

# Where to find the LL commands used by the TSI

my $ll_dir = "/usr/lpp/LoadL/full/bin/";

# for Karlsruhe: my $ll_dir = "/usr/local/unicore/LoadLeveler";

$main::submit_cmd = "$ll_dir/llsubmit";

# for Karlsruhe: $main::submit_cmd = "$ll_dir/qsub";

$main::abort_cmd =
  "$ll_dir/llcancel";    # delete a job from LL, returning stdout/stderr
$main::cancel_cmd =
  "$ll_dir/llcancel";    # delete a job from LL, deleting stdout/stderr

# for Karlsruhe: $main::abort_cmd =  "$ll_dir/qcancel";          # delete a job from LL, returning stdout/stderr
# for Karlsruhe: $main::cancel_cmd = "$ll_dir/qcancel";          # delete a job from LL, deleting stdout/stderr

# Do we do anything in response to a hold?
$main::site_sez_no_holds = 1;    # 0 => holding allowed

$main::hold_cmd   = "$ll_dir/llhold";    # suspend execution of a batch job
$main::freeze_cmd = "$ll_dir/llhold"
  ;    # suspend, release all respurces, execution of a batch job (optional)
$main::resume_cmd = "$ll_dir/llhold -r";    # resume execution of a batch job

$main::qstat_cmd =
  "$ll_dir/llq -r %id %st";    # show _all_ jobs on LL submitted by TSI
                               # in a format assumed by GetStatusListing

# for Karlsruhe: $main::qstat_cmd = "/usr/lpp/LoadL/full/bin/llq -r %id %st

# The path from a setuid script is not the correct user path and
# this line should be enabled with a suitable path for user level
# scripts. This line is a minimal set and should be extended with
# any site specific values, particularly those needed for LL to
# work correctly (note that "interesting" scripts are run in batch mode
# and so LL should ensure that a proper environment is set for these.
# This line just needs to get the scripts into a batch subsystem.)
#
# Disabling this line passes the TSI user's PATH to the user.
$ENV{PATH} =
":/usr/local/bin:/usr/machine/bin:/usr/bin:/usr/ibmcxx/bin:/usr/ucb:/usr/app/bin:/usr/segment/bin";

$main::my_os = "aix_ll";

# END OF CONFIGURATION <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

startup();

#
#                   Copyright (c) Fujitsu Ltd 2000 - 2004
#
#                Use and distribution is subject a License.
# A copy was supplied with the distribution (see documentation or the jar file).
#
# This product includes software developed by Fujitsu Limited (http://www.fujitsu.com).
