Home

Context Navigation

source: palm/trunk/SCRIPTS/palmrun @ 4631

Last change on this file since 4631 was 4536, checked in by raasch, 5 years ago
messages and debug output converted to PALM routines (restart_data_mpi_io_mod), binary version number set to 5.0, heeader output for restart data format added, restart data filesize and I/O transfer speed added in cpu_measures, handling of single restart files (created with MPI-I/O) added to palmrun, bugfix: preprocessor directive adjusted (virtual_measurement_mod), location message format changed
Property svn:executable set to ``* Property svn:keywords set to `Id Rev`
File size: 105.7 KB

Rev	Line
[2380]	1	#!/bin/bash
	2
	3	# palmrun - script for running PALM jobs
	4
	5	#--------------------------------------------------------------------------------#
[2696]	6	# This file is part of the PALM model system.
[2380]	7	#
	8	# PALM is free software: you can redistribute it and/or modify it under the terms
	9	# of the GNU General Public License as published by the Free Software Foundation,
	10	# either version 3 of the License, or (at your option) any later version.
	11	#
	12	# PALM is distributed in the hope that it will be useful, but WITHOUT ANY
	13	# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
	14	# A PARTICULAR PURPOSE. See the GNU General Public License for more details.
	15	#
	16	# You should have received a copy of the GNU General Public License along with
	17	# PALM. If not, see <http://www.gnu.org/licenses/>.
	18	#
[4481]	19	# Copyright 2017-2020 Leibniz Universitaet Hannover
[2380]	20	#--------------------------------------------------------------------------------#
	21	#
	22	# Current revisions:
	23	# ------------------
	24	#
[2410]	25	#
[2380]	26	# Former revisions:
	27	# -----------------
[3032]	28	# $Id: palmrun 4536 2020-05-17 17:24:13Z suehring $
[4536]	29	# handling of single restart files (created with MPI-I/O) added
	30	#
	31	# 4481 2020-03-31 18:55:54Z maronga
[4443]	32	# add cycle number to initial files too (000),
	33	# remove compatibility for cycle numbers which are less than three digits wide
	34	#
	35	# 4425 2020-02-26 15:35:00Z raasch
[4425]	36	# hard coded path to the fileconnection file replaced by a path that is based on
	37	# the source path which has been given in the configuration file
	38	#
	39	# 4303 2019-11-25 08:55:18Z raasch
[4303]	40	# Abort if temporary working catalog cannot be created
	41	#
	42	# 3982 2019-05-16 11:07:31Z raasch
[3982]	43	# bugfix: -b is not added in automatically generated batch jobs for remote hosts
	44	#
	45	# 3917 2019-04-18 11:46:37Z raasch
[3917]	46	# in case of batch jobs on remote machines, copying files from SOURCES_FOR_RUN folder has
	47	# been rearranged to avoid that input files with original names (e.g. ..._p3d) are copied
	48	# into the temporary working catalog
	49	#
	50	# 3860 2019-04-04 06:23:27Z raasch
[3860]	51	# check added, that it is not allowed to set option -b if the configuration file has been setup
	52	# for running batch jobs on remote hosts,
	53	# local time added to terminal output before and after saving output files
	54	#
	55	# 3725 2019-02-07 10:11:02Z raasch
[3725]	56	# error messages for failed restarts extended
	57	#
	58	# 3682 2019-01-18 17:01:54Z knoop
[3665]	59	# ssh-call for submitting batch jobs on remote systems modified again to avoid output
	60	# of login messages on specific systems
	61	#
	62	# 3574 2018-11-28 13:14:39Z raasch
[3574]	63	# syntax-error in last commit fixed
	64	#
	65	# 3573 2018-11-28 13:03:44Z raasch
[3573]	66	# bugfixes: don't check the .palm.iofiles in restart runs + wrong cd-command
	67	# removed,
	68	# r3570 reverted
	69	#
	70	# 3570 2018-11-27 17:44:21Z kanani
[3570]	71	# Rename job-id by run_id
	72	#
	73	# 3555 2018-11-22 13:50:37Z raasch
[3555]	74	# sed-command to remove repeated space-characters replaced by tr-command, to
	75	# guarantee mac compatible
	76	#
	77	# 3549 2018-11-21 15:44:44Z raasch
[3549]	78	# ssh-call for submitting batch jobs on remote systems modified to avoid output
	79	# of login messages on specific systems
	80	#
	81	# 3534 2018-11-19 15:35:16Z raasch
[3534]	82	# batch_scp for sending back the job protocol file is called via login-node if
	83	# a login-node has been set in the config-file
	84	# ssh-calls rearranged to avoid output of system/user-profile messages
	85	#
	86	# 3505 2018-11-08 09:14:30Z raasch
[3505]	87	# job folders are created in case that they do not exist
	88	#
	89	# 3455 2018-10-30 14:12:31Z raasch
[3455]	90	# options -h and -d renamed -c and -r, respectively
	91	#
	92	# 3402 2018-10-23 11:49:24Z knoop
[3346]	93	# job_id is set for compatibility reasons with older versions of config files
	94	#
	95	# 3313 2018-10-06 15:22:48Z knoop
[3294]	96	# more detailed error message for outdated fileconnection file
	97	#
	98	# 3236 2018-09-10 09:07:06Z raasch
[3236]	99	# warning issued in case of file connection file version mismatch,
	100	# host_configuration renamed configuration_identifier,
	101	# "host identifier" in header output renamed "config. identifier",
	102	# jobname renamed run_identifier,
	103	# run_id renamed run_id_number
	104	# job_id renamed run_id
	105	# option -r renamed -i
	106	#
	107	# 3151 2018-07-19 08:45:38Z raasch
[3151]	108	# removed additional listing of files to be compiled, print PALM code revision
	109	# in header
	110	#
	111	# 3132 2018-07-16 11:44:58Z raasch
[3132]	112	# create consistent error messages in case of failed restarts,
	113	# check existence of remote job catalog
	114	#
	115	# 3043 2018-05-25 10:47:54Z raasch
[3043]	116	# check for setting of fast_io_catalog
	117	#
	118	# 3033 2018-05-23 15:26:19Z raasch
[3025]	119	# -T option not required for interactive runs (tasks per node =
	120	# total number of cores is assumed as default, if option is not given),
	121	# reformatting of a few messages,
	122	# bugfix: destination output directory is created if attribute "pe" is set in
	123	# .palm.iofiles
	124	#
	125	# 2718 2018-01-02 08:49:38Z maronga
[2993]	126	# bugfix of r2990
	127	#
	128	# 2718 2018-01-02 08:49:38Z maronga
[2990]	129	# bugfix: temporary SOURCES_FOR_RUN_CATALOG now created in base_directory and
	130	# not in the working directory from where palmrun is called
	131	#
	132	# 2718 2018-01-02 08:49:38Z maronga
[2957]	133	# svfout in the activation string will be replaced now by svfin in case of
	134	# automatic restarts
	135	#
	136	# 2718 2018-01-02 08:49:38Z maronga
[2906]	137	# Introduction of new ENVIRONMENT variables read_svf and write_svf to consider
	138	# the possible output or input of sky view factors
	139	#
	140	# 2718 2018-01-02 08:49:38Z maronga
[2834]	141	# "fname" renamed to "jobname"
	142	#
	143	# 2718 2018-01-02 08:49:38Z maronga
[2799]	144	# parameters are allowed in output commands (OC:)
	145	#
	146	# 2718 2018-01-02 08:49:38Z maronga
[2789]	147	# bugfix: exit if no queue has been given neither with option -q nor in the
	148	# configuration file
	149	#
	150	# 2718 2018-01-02 08:49:38Z maronga
[2762]	151	# file connection file from trunk/SCRIPTS is taken by default
	152	#
	153	# 2718 2018-01-02 08:49:38Z maronga
[2716]	154	# Corrected "Former revisions" section
	155	#
	156	# 2696 2017-12-14 17:12:51Z kanani
	157	# Change in file header (GPL part)
	158	#
	159	# 2693 2017-12-13 12:33:49Z raasch
[2693]	160	# replacement of variables given by {{<variable>}} in configuration file is now
	161	# done in a more general way, variable names are written in small letters
	162	#
	163	# 2670 2017-12-06 16:32:19Z raasch
[2670]	164	# test printouts removed
	165	#
	166	# 2669 2017-12-06 16:03:27Z raasch
[2669]	167	# file attributes in .palm.iofiles restructured, "loc" attribute completely
	168	# removed,
	169	# wildcard (*) allowed in .palm.iofiles as file activation string for output
	170	# files,
	171	# informative messages in case of missing optional input files shortened
	172	# bugfix: variable cycle explicitly interpreted with 10 as the number base
	173	#
	174	# 2638 2017-11-23 12:44:23Z raasch
[2610]	175	# use of wildcards in file connection statements enabled
	176	#
	177	# 2605 2017-11-09 15:31:46Z raasch
[2605]	178	# in case of remote jobs, input files with "job" or "jobopt" (new) attribute
	179	# will not be sent with the job file any more, but copied into the
[2610]	180	# SOURCES_FOR_RUN... folder on the remote host, before the job is submitted
[2605]	181	#
	182	# 2600 2017-11-01 14:11:20Z raasch
[2600]	183	# cycle numbers are made three digits wide
	184	#
	185	# 2566 2017-10-20 08:50:47Z raasch
[2566]	186	# execute command for combine_plot_fields added
	187	# "TEMPDIR" renamed "tempdir"
	188	# temporary working directory for local batch jobs is created immediately within
	189	# the user's palmrun call, due to a requirement of the "grid engine" batch
	190	# system, where the working directory is given with batch directive -wd and must
	191	# already exist when the job is submitted,
	192	# informative messages in non-trace mode reduced and partly reformatted
	193	#
	194	# 2551 2017-10-18 07:25:11Z raasch
[2551]	195	# TEMPDIR added as replacement string to be used in batch directives
	196	#
	197	# 2512 2017-10-04 08:26:59Z raasch
[2507]	198	# bugfix for determining cycle numbers of NetCDF input files
	199	#
	200	# 2506 2017-09-29 08:30:37Z raasch
[2506]	201	# option -V added to check for an existing SOURCES_FOR_RUN_... folder
	202	# host configuration added to SOURCES_FOR_RUN_... folder name
	203	# host_identifier renamed host_configuration
	204	# option -W added to allow for job dependencies
	205	#
	206	# 2501 2017-09-26 11:41:55Z raasch
[2501]	207	# default value for number of cores (option -X) set to 1
	208	# bugfix for mechanism which overwrites configuration file settings with values
	209	# provided by palmrun options
	210	#
	211	# 2499 2017-09-22 16:47:58Z kanani
[2499]	212	# option -h named configuration identifier
	213	#
	214	# 2480 2017-09-19 06:24:14Z maronga
[2480]	215	# bugfix for last revision
	216	#
	217	# 2479 2017-09-19 06:12:16Z raasch
[2479]	218	# option -A (project account number) added
	219	#
	220	# 2422 2017-09-08 08:25:41Z raasch
[2410]	221	# initial revision
[2380]	222	#
	223	#--------------------------------------------------------------------------------#
	224	# palmrun - script for running PALM jobs on local and remote hosts
	225	#--------------------------------------------------------------------------------#
	226
	227
	228
	229	# DECLARATION OF VARIABLES AND THEIR DEFAULT VALUES
	230
	231	set +o allexport # SUPPRESS EXPORT OF ALL VARIABLES, SINCE IN THE PAST THIS
	232	# LEAD TO PROBLEMS IN ROUTINES CALLED BY PALMRUN
	233	# (TOO MANY ARGUMENTS - PROBLEM)
	234	set +o noclobber # EXISTING FILES ARE ALLOWED TO BE OVERWRITTEN
	235
[2610]	236	typeset -i ibd=0 ibdt=0 iec=0 iic=0 iin=0 ioc=0 iout=0 nr_of_input_files=0
	237	typeset -i nr_of_output_files=0
[2380]	238	typeset -x -i memory=0 # HAS TO BE EXPORTED HERE, OTHERWISE AN UNKNOWN SIDE
	239	# SIDE EFFECT MAY CAUSE DATA LOSS WHEN GETOPTS IS READING THE
	240	# SCRIPT-OPTION ARGUMENTS
	241	typeset -i cores cputime cpu_hours cpu_minutes cpu_seconds i ii iia iii iio
	242	typeset -i icycle inode ival maxcycle mpi_tasks
	243	typeset -i nodes remaining_cores run_number tasks_per_node threads_per_task
	244
	245	activation_string_list=""
	246	AddFilenames=""
	247	combine_plot_fields=true
	248	compiler_name=""
	249	compiler_name_ser=""
	250	compiler_options=""
[3236]	251	configuration_identifier="default"
[2501]	252	cores=1
[2380]	253	cores_atmos=0
	254	cores_ocean=0
	255	coupled_dist=""
	256	cpp_options=""
	257	cpumax=0
[2506]	258	create_batch_job=false
[2380]	259	create_jobfile_only=false
	260	create_remote_batch_job=false
	261	dashes=" ----------------------------------------------------------------------------"
	262	defaultqueue=""
[2506]	263	delete_temporary_catalog=true
[2380]	264	do_compile=true
	265	do_trace=false
	266	executable=""
	267	execute_command=""
	268	execution_error=false
[4425]	269	fileconnection_file=""
[2380]	270	global_revision=""
	271	hostfile=""
	272	hp=""
	273	keep_data_from_previous_run=false
	274	link_local_input=false
	275	link_local_output=false
[2388]	276	linker_options=""
[2385]	277	local_jobcatalog=""
[2380]	278	locat=normal
	279	makefile=""
	280	max_par_io_str=""
	281	prc=$0
	282	while [[ $(echo $prc \| grep -c "/") != 0 ]]
	283	do
	284	prc=`echo $prc \| cut -f2- -d"/"`
	285	done
	286	module_calls=""
[2506]	287	palmrun_memory=""
[2380]	288	palmrun_script_name=$prc
	289	openmp=false
[2506]	290	previous_job=""
[2479]	291	project_account=""
[2380]	292	queue=none
[2906]	293	read_svf=""
[2380]	294	restart_run=false
	295	return_address=""
[2385]	296	remote_jobcatalog=""
[2380]	297	remote_username=""
	298	running_in_batch_mode=false
[3313]	299	running_in_test_mode=false
[2380]	300	run_coupled_model=false
	301	run_id=""
[3236]	302	run_id_number=""
	303	run_identifier=test
[2380]	304	silent=false
	305	source_list=""
	306	source_path=""
[2501]	307	tasks_per_node=0
[2380]	308	threads_per_task=1
	309	transfer_problems=false
[2384]	310	user_source_path=""
[2506]	311	use_existing_sources_folder=""
[2380]	312	use_openmp=false
[3033]	313	version="palmrun 1.0 Rev$Rev: 4536 $"
[2380]	314	working_directory=`pwd`
	315	write_binary=""
[2906]	316	write_svf=""
[2380]	317
	318
	319	# ERROR HANDLING IN CASE OF EXIT
[2404]	320	trap 'if [[ $locat != normal && $locat != control_c ]]
[2380]	321	then
	322
	323	# CARRY OUT ERROR-COMMANDS GIVEN IN THE CONFIGURATION FILE (EC:)
	324	(( i = 0 ))
	325	while (( i < iec ))
	326	do
	327	(( i = i + 1 ))
	328	printf "\n *** Execution of ERROR-command:\n"
	329	printf " >>> ${err_command[$i]}\n"
	330	eval ${err_command[$i]}
	331	done
[2566]	332	[[ $delete_temporary_catalog = true ]] && (cd; rm -rf $tempdir)
[3312]	333	printf "\n\n+++ palmrun crashed \n\n"
	334	exit 1
	335	elif [[ $locat != normal ]]
[2380]	336	then
[3312]	337	[[ $delete_temporary_catalog = true ]] && (cd; rm -rf $tempdir)
	338	printf "\n+++ palmrun killed by \"^C\" \n\n"
	339	exit 2
	340	else
[2566]	341	printf "\n --> palmrun finished\n\n"
[3312]	342	exit 0
[2380]	343	fi' exit
	344
	345
	346	# ACTIONS IN CASE OF TERMINAL-BREAK (CONTROL-C):
[3312]	347	trap 'locat=control_c
	348	exit 1
[2380]	349	' 2
	350
	351
	352	# READ SHELLSCRIPT-OPTIONS AND REBUILD THE PALMRUN-COMMAND STRING (prc),
	353	# WHICH WILL BE USED TO START RESTART-JOBS
[3455]	354	while getopts :a:A:bBc:CFG:i:jkm:M:O:q:r:R:s:t:T:u:U:vVw:W:xX:yY:zZ option
[2380]	355	do
	356	case $option in
	357	(a) activation_string_list=$OPTARG; prc="$prc -a'$OPTARG'";;
[2479]	358	(A) project_account=$OPTARG; prc="$prc -A'$OPTARG'";;
[2380]	359	(b) create_batch_job=true; prc="$prc -b";;
	360	(B) delete_temporary_catalog=false; prc="$prc -B";;
[3455]	361	(c) configuration_identifier=$OPTARG; prc="$prc -c$OPTARG";;
[2380]	362	(C) restart_run=true; prc="$prc -C";;
	363	(F) create_jobfile_only=true;;
	364	(G) global_revision=$OPTARG; prc="$prc -G'$OPTARG'";;
[3236]	365	(i) run_id_number=$OPTARG;;
[2380]	366	(j) running_in_batch_mode=true;;
	367	(k) keep_data_from_previous_run=true; prc="$prc -k";;
[2501]	368	(m) palmrun_memory=$OPTARG; prc="$prc -m$OPTARG";;
[2380]	369	(M) makefile=$OPTARG; prc="$prc -M$OPTARG";;
	370	(O) use_openmp=true; threads_per_task=$OPTARG; prc="$prc -O$OPTARG";;
	371	(q) queue=$OPTARG; prc="$prc -q$OPTARG";;
[3455]	372	(r) run_identifier=$OPTARG; prc="$prc -r$OPTARG";;
[2380]	373	(R) return_address=$OPTARG;;
	374	(s) source_list=$OPTARG;;
[2501]	375	(t) palmrun_cpumax=$OPTARG; prc="$prc -t$OPTARG";;
[2380]	376	(T) palmrun_tasks_per_node=$OPTARG; prc="$prc -T$OPTARG";;
	377	(u) remote_username=$OPTARG; prc="$prc -u$OPTARG";;
	378	(U) return_username=$OPTARG; prc="$prc -U$OPTARG";;
	379	(v) silent=true; prc="$prc -v";;
[2506]	380	(V) use_existing_sources_folder="-V";;
[2380]	381	(w) max_par_io_str=$OPTARG; prc="$prc -w$OPTARG";;
[2506]	382	(W) previous_job=$OPTARG;;
[2380]	383	(x) do_trace=true;set -x; prc="$prc -x";;
[2501]	384	(X) palmrun_cores=$OPTARG; prc="$prc -X$OPTARG";;
[2380]	385	(y) ocean_file_appendix=true; prc="$prc -y";;
	386	(Y) run_coupled_model=true; coupled_dist=$OPTARG; prc="$prc -Y'$OPTARG'";;
[3313]	387	(z) running_in_test_mode=true;;
[2380]	388	(Z) combine_plot_fields=false; prc="$prc -Z";;
	389	(\?) printf "\n +++ unknown option $OPTARG \n"
	390	printf "\n --> type \"$0 ?\" for available options \n"
	391	locat=parameter;exit;;
	392	esac
	393	done
	394
	395
	396	# SKIP GIVEN OPTIONS TO READ POSITIONAL PARAMETER, IF GIVEN
	397	# CURRENTLY ONLY PARAMETER ? (TO OUTPUT A SHORT COMMAND INFO) IS ALLOWED
	398	(( to_shift = $OPTIND - 1 ))
	399	shift $to_shift
	400
	401	# PRINT SHORT DESCRIPTION OF PALMRUN OPTIONS
	402	if [[ "$1" = "?" ]]
	403	then
	404	(printf "\n *** Description of available palmrun options:\n"
	405	printf "\n Option Description Default-Value"
	406	printf "\n -a activation string list \"\" "
[2479]	407	printf "\n -A project account number ---"
[2380]	408	printf "\n -b batch-job on local machine ---"
	409	printf "\n -B do not delete temporary directory at end ---"
[3455]	410	printf "\n -c configuration identifier \"default\" "
[2380]	411	printf "\n -F create batch job file only ---"
	412	printf "\n -k keep data from previous run"
	413	printf "\n -m memory demand in MB (batch-jobs) 0 MB"
	414	printf "\n -M Makefile name Makefile"
	415	printf "\n -O threads per openMP task ---"
	416	printf "\n -q queue \"$queue\" "
[3455]	417	printf "\n -r run identifier test"
[2380]	418	printf "\n -s filenames of routines to be compiled \"\" "
	419	printf "\n must end with .f, .f90, .F, or .c !"
	420	printf "\n use \"..\" for more than one file and wildcards"
	421	printf "\n -s LM compiles all locally modified files"
	422	printf "\n -t allowed cpu-time in seconds (batch) 0"
[2384]	423	printf "\n -T tasks per node ---"
[2380]	424	printf "\n -u username on remote machine \"\" "
	425	printf "\n -v no prompt for confirmation ---"
[2506]	426	printf "\n -V check if SOURCES_FOR_RUN_... exists ---"
[2380]	427	printf "\n -w maximum parallel io streams as given by -X"
[2506]	428	printf "\n -W name of job to wait for ---"
[2380]	429	printf "\n -x tracing of palmrun for debug purposes ---"
	430	printf "\n -X # of processors (on parallel machines) 1"
	431	printf "\n -y add appendix \"_O\" to all local output"
	432	printf "\n files (ocean precursor runs followed by"
	433	printf "\n coupled atmosphere-ocean runs) ---"
	434	printf "\n -Y run coupled model, \"#1 #2\" with"
	435	printf "\n #1 atmosphere and #2 ocean processors \"#/2 #/2\" depending on -X"
	436	printf "\n -Z skip combine_plot_fields at the end of "
	437	printf "\n the simulation ---"
	438	printf "\n "
	439	printf "\n Possible values of positional parameter <modus>:"
	440	printf "\n \"?\" - this outline \n\n") \| more
	441	exit
	442	elif [[ "$1" != "" ]]
	443	then
	444	printf "\n +++ positional parameter $1 unknown \n"
	445	locat=parameter; exit
	446	fi
	447
	448
	449
	450	# SHORT STARTING MESSAGE
	451	printf "\n*** $version "
	452	printf "\n will be executed. Please wait ..."
	453
	454
[2506]	455	# BUILD THE CONFIGURATION-FILE NAME AND THE SOURCES_FOR_RUN-FOLDER NAME
[3236]	456	config_file=.palm.config.$configuration_identifier
	457	sources_for_run_catalog=SOURCES_FOR_RUN_${configuration_identifier}_$run_identifier
[2380]	458
	459
	460	# CHECK, IF CONFIGURATION FILE EXISTS
	461	if [[ ! -f $config_file ]]
	462	then
	463	printf "\n\n +++ configuration file: "
	464	printf "\n $config_file"
	465	printf "\n does not exist"
	466	locat=connect; exit
	467	fi
	468
	469
[2404]	470	# CHECK, IF THE ACTIVATION_STRING_LIST HAS BEEN GIVEN
	471	if [[ "$activation_string_list" = "" ]]
	472	then
	473	printf "\n\n +++ no activation string list given: "
	474	printf "\n please set palmrun option \"-a\" "
	475	locat=palmrun_option; exit
	476	fi
	477
	478
	479	# SET VARIABLE TO ACTIVATE PALM BINARY OUTPUT FOR RESTARTS
	480	if [[ $(echo $activation_string_list \| grep -c "restart") != 0 ]]
	481	then
	482	write_binary=true
	483	else
	484	write_binary=false
	485	fi
	486
[2906]	487	# SET VARIABLE TO ACTIVATE WRITING OF SVF DATA
	488	if [[ $(echo $activation_string_list \| grep -c "svfout") != 0 ]]
	489	then
	490	write_svf=true
	491	else
	492	write_svf=false
	493	fi
[2404]	494
[2906]	495	# SET VARIABLE TO ACTIVATE READING OF SVF DATA
	496	if [[ $(echo $activation_string_list \| grep -c "svfin") != 0 ]]
	497	then
	498	read_svf=true
	499	else
	500	read_svf=false
	501	fi
	502
	503
[2380]	504	# READ AND EVALUATE THE CONFIGURATION-FILE
	505	[[ $silent = false ]] && printf "\n\n Reading the configuration file... "
	506
	507	# READ VARIABLE SETTINGS FROM CONFIG FILE LINE BY LINE
	508	while read line
	509	do
	510
	511	# FIRST REPLACE ENVIRONMENT-VARIABLES BY THEIR RESPECTIVE VALUES
	512	eval line=\"$line\"
	513
	514
	515	# INTERPRET THE LINE
	516	if [[ "$(echo $line)" = "" ]]
	517	then
	518
	519	# EMPTY LINE, NO ACTION
	520	continue
	521
	522	elif [[ "$(echo $line \| cut -c1)" = "#" ]]
	523	then
	524
	525	# LINE IS A COMMENT LINE
	526	continue
	527
	528	elif [[ "$(echo $line \| cut -c1)" = "%" ]]
	529	then
	530
	531	# LINE DEFINES AN ENVIRONMENT-VARIABLE
	532	var=`echo $line \| cut -d" " -s -f1 \| cut -c2-`
	533	value=`echo $line \| cut -d" " -s -f2-`
	534
	535
	536	# VALUE FROM THE CONFIGURATION-FILE IS ASSIGNED TO THE
	537	# ENVIRONMENT-VARIABLE, BUT ONLY IF NO VALUE HAS BEEN ALREADY
	538	# ASSIGNED WITHIN THIS SCRIPT (E.G. BY SCRIPT-OPTIONS).
	539	# NON-ASSIGNED VARIABLES HAVE VALUE "" OR 0 (IN CASE OF INTEGER).
	540	# HENCE THE GENERAL RULE IS: SCRIPT-OPTION OVERWRITES THE
	541	# CONFIGURATION-FILE.
	542	if [[ "$(eval echo \$$var)" = "" \|\| "$(eval echo \$$var)" = "0" ]]
	543	then
	544	eval export $var="\$value"
	545
	546	# TERMINAL OUTPUT OF ENVIRONMENT-VARIABLES, IF TRACEBACK IS SWITCHED on
	547	if [[ $do_trace = true ]]
	548	then
	549	printf "\n*** ENVIRONMENT-VARIABLE $var = $value"
	550	fi
	551	fi
	552
	553	elif [[ "$(echo $line \| cut -c1-3)" = "BD:" ]]
	554	then
	555
	556	# LINE DEFINES BATCH-DIRECTIVE
	557	(( ibd = ibd + 1 ))
	558	line=$(echo $line \| cut -c4-)
	559	batch_directive[$ibd]="$line"
	560
	561	elif [[ "$(echo $line \| cut -c1-4)" = "BDT:" ]]
	562	then
	563
	564	# LINE DEFINES BATCH-DIRECTIVE FOR SENDING BACK THE JOBFILE FROM A
	565	# REMOTE TO A LOCAL HOST
	566	(( ibdt = ibdt + 1 ))
	567	line=$(echo $line \| cut -c5-)
	568	batch_directive_transfer[$ibdt]="$line"
	569
	570	elif [[ "$(echo $line \| cut -c1-3)" = "EC:" ]]
	571	then
	572
	573	# LINE DEFINES ERROR-COMMAND
	574	(( iec = iec + 1 ))
	575	line=$(echo $line \| cut -c4-)
	576	err_command[$iec]="$line"
	577
	578	elif [[ "$(echo $line \| cut -c1-3)" = "IC:" ]]
	579	then
	580
	581	# LINE DEFINES INPUT-COMMAND
	582	(( iic = iic + 1 ))
	583	line=$(echo $line \| cut -c4-)
	584	in_command[$iic]="$line"
	585
	586	elif [[ "$(echo $line \| cut -c1-3)" = "OC:" ]]
	587	then
	588
	589	# LINE DEFINES OUTPUT-COMMAND
	590	(( ioc = ioc + 1 ))
	591	line=$(echo $line \| cut -c4-)
	592	out_command[$ioc]="$line"
	593
	594	else
	595
	596	# SKIP ALL OTHER LINES
	597	continue
	598
	599	fi
	600
	601	done < $config_file
	602
	603
	604	# CHECK SETTING OF REQUIRED PARAMETERS
[3043]	605	if [[ "$fast_io_catalog" = "" ]]
	606	then
[3860]	607	printf "\n\n +++ no fast_io_catalog found in $config_file"
[3043]	608	printf "\n Please add line \"fast_io_catalog ...\" to that file."
	609	locat=config_file; exit
	610	fi
[2380]	611	if [[ "$compiler_name" = "" ]]
	612	then
[3860]	613	printf "\n\n +++ no compiler name found in $config_file"
[2380]	614	printf "\n Please add line \"compiler_name ...\" to that file."
	615	locat=config_file; exit
	616	fi
	617	if [[ "$compiler_name_ser" = "" ]]
	618	then
[3860]	619	printf "\n\n +++ no compiler name for non-paralle compilation found in $config_file"
[2380]	620	printf "\n Please add line \"compiler_name_ser ...\" to that file."
	621	locat=config_file; exit
	622	fi
	623	if [[ "$compiler_options" = "" ]]
	624	then
[3860]	625	printf "\n\n +++ no compiler options found in $config_file"
[2380]	626	printf "\n Please add line \"compiler_options ...\" to that file."
	627	locat=config_file; exit
	628	fi
	629	if [[ "$execute_command" = "" ]]
	630	then
[3860]	631	printf "\n\n +++ no execute command found in $config_file"
[2380]	632	printf "\n Please add line \"execute_command ...\" to that file."
	633	locat=config_file; exit
	634	fi
	635
	636	if [[ "$hostfile" != "" ]]
	637	then
	638	if [[ $hostfile != auto && ! -f $hostfile ]]
	639	then
[3860]	640	printf "\n\n +++ no hostfile \"$hostfile\" found"
[3151]	641	printf "\n Please check line \"hostfile ...\" in $config_file"
[2380]	642	locat=config_file; exit
	643	fi
	644	fi
	645
	646
	647	# DETERMINE THE CALL STATUS
	648	if [[ "$return_address" != "" ]]
	649	then
	650
	651	# I AM RUNNING ON A REMOTE HOST, WHICH ALSO MEANS THAT I AM RUNNING IN
	652	# BATCH MODE AND ...
	653	running_on_remote=true
	654
	655	else
	656
	657	# I HAVE BEEN CALLED INTERACTIVELY ON THIS HOST
	658	if [[ "$remote_ip" != "" ]]
	659	then
	660
	661	# I HAVE TO CREATE A BATCH JOB TO RUN PALM ON THE REMOTE HOST
	662	create_remote_batch_job=true
	663
[3132]	664	# CHECK THAT THE REMOTE JOBCATALOG HAS BEEN SET
	665	if [[ "$remote_jobcatalog" = "" ]]
	666	then
[3860]	667	printf "\n\n +++ no remote jobcatalog found in $config_file"
[3132]	668	printf "\n Please add line \"remote_jobcatalog ...\" to that file."
	669	locat=config_file; exit
	670	fi
	671
[3860]	672	# CHECK THAT OPTION -b (SUBMITTING BATCH JOB ON LOCAL HOST) HASN'T BEEN SET
	673	if [[ $create_batch_job = true ]]
	674	then
	675	printf "\n\n +++ option -b must not be set because configuration file has been setup"
	676	printf "\n for running jobs on a remote host"
	677	locat=config_file; exit
	678	fi
	679
[2380]	680	fi
	681	running_on_remote=false
	682	fi
	683
	684
[4425]	685	# SET THE DEFAULT FILE CONNECTION FILE (WHICH IS IN THE REPOSITORY)
	686	fileconnection_file=${source_path}/../SCRIPTS/.palm.iofiles
[2380]	687
[4425]	688	# CHECK, IF USER PROVIDES OWN FILE CONNECTION FILE
	689	if [[ -f .palm.iofiles ]]
	690	then
	691
	692	# CHECK VERSION MISMATCH
	693	# RESTART RUNS DON'T REQUIRE A CHECK, BECAUSE THEY USE A COPY OF THAT
	694	# FILE WHICH HAS ALREADY BEEN CHECKED WITHIN THE INITAL PALMRUN CALL
	695	if [[ $running_in_batch_mode != true && $restart_run != true ]]
	696	then
	697	if [[ $(head -n1 $fileconnection_file) != $(head -n1 .palm.iofiles) ]]
	698	then
	699	printf "\n\n +++ WARNING: A file connection file has been found in your"
	700	printf "\n working directory, but its revision does not match"
	701	printf "\n the revision of the default (trunk) version."
	702	printf "\n You may need to update your connection file"
	703	printf "\n \"${working_directory}/.palm.iofiles\" !"
	704	fi
	705	fi
	706
	707	fileconnection_file=.palm.iofiles
	708
	709	fi
	710
	711
	712	# CHECK, IF FILE CONNECTION FILE EXISTS
	713	if [[ ! -f $fileconnection_file ]]
	714	then
	715	printf "\n\n +++ file connection file: "
	716	printf "\n $fileconnection_file"
	717	printf "\n does not exist"
	718	locat=connect; exit
	719	fi
	720
	721
[2380]	722	# READ AND EVALUATE THE I/O-FILE LIST
	723	[[ $silent = false ]] && printf "\n Reading the I/O files... "
	724
	725	# READ THE FILE CONNECTION FILE LINE BY LINE
	726	while read line
	727	do
	728
[2669]	729	# REPLACE REPEATING SPACES BETWEEN THE COLUMNS BY A SINGLE SPACE
[3555]	730	# HERE, TR IS USED INSTEAD OF SED TO GUARANTEE MAC COMPATIBILITY
	731	line=`echo "$line" \| tr -s " "`
[2380]	732
	733	# INTERPRET THE LINE
	734	if [[ "$(echo $line)" = "" ]]
	735	then
	736	# EMPTY LINE, NO ACTION
	737	continue
	738
	739	elif [[ "$(echo $line \| cut -c1)" = "#" ]]
	740	then
	741
	742	# LINE IS A COMMENT LINE
	743	true
	744
	745	else
	746
	747	# LINE DEFINES FILE CONNECTION. READ THE FILE ATTRIBUTES.
	748	# s2a: in/out - field
[2669]	749	# s2b: action - field (optional)
	750	s1=`echo "$line" \| cut -d" " -f1`
	751	s2=`echo "$line" \| cut -d" " -s -f2`
[2380]	752	if [[ $(echo $s2 \| grep -c ":") = 0 ]]
	753	then
[2669]	754	s2a=$s2
[2380]	755	s2b=""
	756	else
[2669]	757	s2a=`echo $s2 \| cut -d":" -f1`
	758	s2b=`echo $s2 \| cut -d":" -f2`
[2380]	759	fi
[2669]	760	s3=`echo "$line" \| cut -d" " -f3 \| sed 's/*/wildcard /g'`
	761	s4=`echo "$line" \| cut -d" " -s -f4`
	762	eval s4=\"$s4\" # REPLACE ENVIRONMENT-VARIABLES IN PATH BY THEIR RESPECTIVE VALUES
	763	s5=`echo "$line" \| cut -d" " -s -f5`
	764	s6=`echo "$line" \| cut -d" " -s -f6`
[2380]	765
	766
	767	# STORE FILE CONNECTION, IF ACTIVATED BY ACTIVATION-STRING FROM
	768	# INPUT- OR OUTPUT-LIST.
	769	# VARIABLE S3 MAY CONTAIN A LIST OF ACTIVATION STRINGS (FIELD-SEPERATOR ":").
	770	# IF EXECUTION IS SCHEDULED FOR A REMOTE-MACHINE AND THE FILE IS ONLY
[2669]	771	# LOCALLY REQUIRED ON THAT MACHINE (I.E. s2b != tr), THE FILE CONNECTION
[2380]	772	# IS NOT CHECKED AND STORED.
[2610]	773	IFSALT="$IFS"; IFS="$IFS:" # ADD ":" AS FIELD SEPARATOR
[2669]	774	if [[ ( "$s2a" = in \|\| "$s2a" = inopt ) && ! ( $create_remote_batch_job = true && "$s2b" != tr ) ]]
[2380]	775	then
	776	found=false
	777	for actual in $activation_string_list
	778	do
	779	for formal in $s3
	780	do
	781	[[ $actual = $formal \|\| "$formal" = "-" ]] && found=true
	782	done
	783	done
	784	if [[ $found = true ]]
	785	then
	786	(( iin = iin + 1 ))
[2669]	787	localin_pre[$iin]=$s1; actionin_pre[$iin]=$s2b;
[2610]	788	pathin_pre[$iin]=$s4; endin_pre[$iin]=$s5; extin_pre[$iin]=$s6
[2669]	789	if [[ "$s2a" = inopt ]]
	790	then
	791	optin_pre[$iin]=yes
	792	else
	793	optin_pre[$iin]=no
	794	fi
[2605]	795
	796	# FILES WITH JOB-ATTRIBUTE ARE STORED IN THE SOURCES_FOR_RUN
	797	# FOLDER IF THE JOB IS RUNNING ON A REMOTE HOST
[2669]	798	if [[ $running_on_remote = true && "$s2b" = tr ]]
[2605]	799	then
[2610]	800	pathin_pre[$iin]=${fast_io_catalog}/${sources_for_run_catalog}
[2605]	801	fi
	802
[2610]	803	# CHECK FOR MULTIPLE FILES, SET A RESPECTIVE FLAG AND REMOVE
	804	# THE WILDCARD FROM THE ENDING
	805	if [[ "${s5: -1}" = "*" ]]
	806	then
[2669]	807	if [[ "$s2b" = "di" ]]
[2610]	808	then
	809	printf "\n +++ wildcards (*) not allowed with \"di\" file attribute."
	810	printf "\n see file \"$fileconnection_file\", line"
	811	printf "\n$line"
	812	locat=iofiles_file; exit
	813	fi
	814	multin[$iin]=true
	815	string=${endin_pre[$iin]}
	816	endin_pre[$iin]="${string%?}"
	817	else
	818	multin[$iin]=false
	819	fi
[2380]	820	fi
[2669]	821	elif [[ "$s2a" = out && ! ( $create_remote_batch_job = true ) ]]
[2380]	822	then
	823	found=false
	824	for actual in $activation_string_list
	825	do
	826	for formal in $s3
	827	do
[2670]	828	[[ $actual = $formal \|\| $formal = wildcard ]] && found=true
[2380]	829	done
	830	done
	831	if [[ $found = true ]]
	832	then
	833	(( iout = iout + 1 ))
[2669]	834	localout_pre[$iout]=$s1; actionout_pre[$iout]=$s2b
[2610]	835	pathout_pre[$iout]=$s4; endout_pre[$iout]=$s5; extout_pre[$iout]=$s6
	836
[2669]	837	# CHECK IF WILDCARD IS USED AS ACTIVATION STRING
	838	# IN SUCH CASES, NO WARNING WILL LATER BE OUTPUT IF LOCAL FILES DO NOT EXIST
	839	if [[ $formal = wildcard ]]
	840	then
	841	warnout_pre[$iout]=false
	842	else
	843	warnout_pre[$iout]=true
	844	fi
	845
[2610]	846	# CHECK FOR MULTIPLE FILES, SET A RESPECTIVE FLAG AND REMOVE
	847	# THE WILDCARD FROM THE LOCAL FILENAME
	848	if [[ "${s1: -1}" = "*" ]]
	849	then
[2669]	850	if [[ "$s2b" = "di" ]]
[2610]	851	then
	852	printf "\n +++ wildcards (*) not allowed with \"di\" file attribute."
	853	printf "\n see file \"$fileconnection_file\", line"
	854	printf "\n$line"
	855	locat=iofiles_file; exit
	856	fi
	857	multout[$iout]=true
	858	string=${localout_pre[$iout]}
	859	localout_pre[$iout]="${string%?}"
	860	else
	861	multout[$iout]=false
	862	fi
[2380]	863	fi
[2669]	864	elif [[ "$s2a" != in && "$s2a" != inopt && "$s2a" != out ]]
[2380]	865	then
[2669]	866	printf "\n +++ I/O-attribute in file $fileconnection_file has invalid"
	867	printf "\n value \"$s2\". Only \"in\", \"inopt\", and \"out\" are allowed!"
[2380]	868	locat=connect; exit
	869	fi
	870	IFS="$IFSALT"
	871	fi
	872
	873	done < $fileconnection_file
	874
	875
	876
[2501]	877	# VALUES OF PALMRUN-OPTIONS OVERWRITE THOSE FROM THE CONFIGURATION-FILE
[3025]	878	[[ "$palmrun_memory" != "" ]] && memory=$palmrun_memory
	879	[[ "$palmrun_cpumax" != "" ]] && cpumax=$palmrun_cpumax
	880	[[ "$palmrun_cores" != "" ]] && cores=$palmrun_cores
[2501]	881	[[ "$max_par_io_str" != "" ]] && maximum_parallel_io_streams=$max_par_io_str
	882	[[ "$palmrun_tasks_per_node" != "" ]] && tasks_per_node=$palmrun_tasks_per_node
	883
	884
	885
[2380]	886	# EVALUATE MODEL COUPLING FEATURES (OPTION -Y)
	887	if [[ $run_coupled_model = true ]]
	888	then
	889
	890	cores_atmos=`echo $coupled_dist \| cut -d" " -s -f1`
	891	cores_ocean=`echo $coupled_dist \| cut -d" " -s -f2`
	892
	893	if (( $cores_ocean + $cores_atmos != $cores ))
	894	then
	895
	896	printf "\n +++ number of processors does not fit to specification by \"-Y\"."
	897	printf "\n PEs (total) : $cores"
	898	printf "\n PEs (atmosphere): $cores_atmos"
	899	printf "\n PEs (ocean) : $cores_ocean"
	900	locat=coupling; exit
	901
	902	fi
	903
	904	fi
	905
	906
	907	# IF I AM IN BATCH MODE, CHECK IF EXECUTABLE AND OTHER REQUIRED FILES
	908	# HAVE BEEN GENERATED BY PALMBUILD AND STORED IN THE SOURCES_FOR_RUN_...
	909	# FOLDER
	910	if [[ $running_in_batch_mode = true ]]
	911	then
	912
[2506]	913	if [[ ! -d ${fast_io_catalog}/${sources_for_run_catalog} ]]
[2380]	914	then
[2506]	915	printf "\n +++ directory ${fast_io_catalog}/${sources_for_run_catalog} is missing"
[2380]	916	printf "\n Please check the output of the palmrun-call"
	917	printf "\n that you did on your local host."
	918	locat=SOURCES_FOR_RUN; exit
	919	fi
	920
	921	else
	922
	923	# CREATE THE SOURCES_FOR_RUN_... FOLDER, BUT NOT IF I AM PART OF AN
	924	# AUTOMATIC RESTART RUN
	925	# AUTOMATIC RESTART RUNS JUST ACCESS THE DIRECTORY CREATED BY THE INITIAL RUN
	926	if [[ $restart_run = false ]]
	927	then
	928
	929	# COLLECT FILES TO BE COMPILED IN THE SOURCES_FOR_RUN_... FOLDER ON
	930	# THE LOCAL HOST
	931	if [[ ! -d $source_path ]]
	932	then
	933	printf "\n\n +++ source path \"$source_path\" on local host"
	934	printf "\n \"$(hostname)\" does not exist"
	935	locat=source_path; exit
	936	fi
	937
[2990]	938	rm -rf ${base_directory}/${sources_for_run_catalog}
	939	mkdir -p ${base_directory}/${sources_for_run_catalog}
[2380]	940
	941	if [[ "$source_list" = LM ]]
	942	then
	943
	944	# DETERMINE MODIFIED FILES OF THE SVN WORKING COPY
	945	source_list=""
	946	cd $source_path
	947
	948
[2512]	949	# CHECK, IF TRUNK-DIRECTORY IS UNDER SVN CONTROL
	950	if [[ ! -d ../.svn ]]
[2380]	951	then
	952	printf "\n\n +++ source directory"
	953	printf "\n \"$source_path\" "
	954	printf "\n is not under control of \"subversion\"."
[2512]	955	printf "\n Please do not use palmrun-option \"-s LM\"\n"
[2380]	956	fi
	957
	958
	959	# LIST ALL MODIFIED SOURCE CODE FILES
	960	Filenames=""
[2404]	961	svn status > tmp_svnstatus
[2380]	962	while read line
	963	do
	964	firstc=`echo $line \| cut -c1`
	965	if [[ $firstc = M \|\| $firstc = "?" ]]
	966	then
	967	Name=`echo "$line" \| cut -c8-`
	968	extension=`echo $Name \| cut -d. -f2`
	969	if [[ "$extension" = f90 \|\| "$extension" = F90 \|\| "$extension" = f \|\| "$extension" = F \|\| "$extension" = c ]]
	970	then
	971	Filenames="$Filenames "$Name
	972	fi
	973	fi
[2404]	974	done < tmp_svnstatus
	975	rm -rf tmp_svnstatus
[2380]	976
	977
	978	# COPY FILES TO SOURCES_FOR_RUN_...
	979	for filename in $Filenames
	980	do
[2990]	981	cp $filename ${base_directory}/${sources_for_run_catalog}
[2380]	982	source_list=$source_list"$filename "
	983	done
	984
	985	cd - > /dev/null
	986
	987
	988	# COPY FILES GIVEN BY OPTION -s TO DIRECTORY SOURCES_FOR_RUN_...
	989	elif [[ "$source_list" != "" ]]
	990	then
	991
	992	cd $source_path
	993
	994	for filename in $source_list
	995	do
	996
	997	# SOURCE CODE FILE IS NOT ALLOWED TO INCLUDE PATH
	998	if [[ $(echo $filename \| grep -c "/") != 0 ]]
	999	then
	1000	printf "\n +++ source code file: $filename"
	1001	printf "\n must not contain (\"/\") "
	1002	locat=source; exit
	1003	fi
	1004
	1005	if [[ ! -f $filename ]]
	1006	then
	1007	printf "\n +++ source code file: $filename"
	1008	printf "\n does not exist"
	1009	locat=source; exit
	1010	else
[2990]	1011	cp $filename ${base_directory}/${sources_for_run_catalog}
[2380]	1012	fi
	1013
	1014	done
	1015
	1016	cd - > /dev/null
	1017
	1018	fi
	1019
	1020	# CHECK, IF MAKEFILE EXISTS AND COPY IT TO THE SOURCES_FOR_RUN... DIRECTORY
	1021	[[ "$makefile" = "" ]] && makefile=$source_path/Makefile
	1022	if [[ ! -f $makefile ]]
	1023	then
	1024	printf "\n +++ file \"$makefile\" does not exist"
	1025	locat=make; exit
	1026	else
[2990]	1027	cp $makefile ${base_directory}/${sources_for_run_catalog}/Makefile
[2380]	1028	fi
	1029
	1030
	1031	# COPY FILES FROM OPTIONAL SOURCE PATH GIVEN IN THE CONFIGURATION FILE
[2384]	1032	if [[ "$user_source_path" != "" ]]
[2380]	1033	then
	1034
	1035	# DOES THE DIRECTORY EXIST?
[2384]	1036	if [[ ! -d $user_source_path ]]
[2380]	1037	then
	1038
	1039	printf "\n\n *** INFORMATIVE: additional source code directory"
[2384]	1040	printf "\n \"$user_source_path\" "
[2380]	1041	printf "\n does not exist or is not a directory."
	1042	printf "\n No source code will be used from this directory!\n"
[2384]	1043	user_source_path=""
[2380]	1044	if [[ $silent == false ]]
	1045	then
	1046	sleep 2
	1047	fi
	1048
	1049	else
	1050
[2384]	1051	cd $user_source_path
[2380]	1052
	1053	Names=$(ls -1 *.f90 2>&1)
	1054	[[ $(echo $Names \| grep -c '*.f90') = 0 ]] && AddFilenames="$Names"
	1055	Names=$(ls -1 *.F90 2>&1)
	1056	[[ $(echo $Names \| grep -c '*.F90') = 0 ]] && AddFilenames="$AddFilenames $Names"
	1057	Names=$(ls -1 *.F 2>&1)
	1058	[[ $(echo $Names \| grep -c '*.F') = 0 ]] && AddFilenames="$AddFilenames $Names"
	1059	Names=$(ls -1 *.f 2>&1)
	1060	[[ $(echo $Names \| grep -c '*.f') = 0 ]] && AddFilenames="$AddFilenames $Names"
	1061	Names=$(ls -1 *.c 2>&1)
	1062	[[ $(echo $Names \| grep -c '*.c') = 0 ]] && AddFilenames="$AddFilenames $Names"
	1063
	1064	cd - > /dev/null
[2990]	1065	cd ${base_directory}/${sources_for_run_catalog}
[2380]	1066
	1067	# COPY MAKEFILE IF EXISTING
[2384]	1068	if [[ -f $user_source_path/Makefile ]]
[2380]	1069	then
	1070	printf "\n\n *** user Makefile from directory"
[2384]	1071	printf "\n \"$user_source_path\" is used \n"
[2380]	1072	if [[ $silent == false ]]
	1073	then
	1074	sleep 1
	1075	fi
[2384]	1076	cp $user_source_path/Makefile .
[2380]	1077	fi
	1078
	1079	for filename in $AddFilenames
	1080	do
	1081	if [[ -f $filename ]]
	1082	then
	1083	printf "\n +++ source code file \"$filename\" found in additional"
[2384]	1084	printf "\n source code directory \"$user_source_path\" "
[2380]	1085	printf "\n but was also given with option \"-s\" which means that it should be taken"
	1086	printf "\n from directory \"$source_path\"."
	1087	locat=source; exit
	1088	fi
	1089
[2384]	1090	cp $user_source_path/$filename .
[2380]	1091	source_list="$source_list $filename"
	1092
	1093	# CHECK IF FILE IS CONTAINED IN MAKEFILE
	1094	if [[ $(grep -c $filename Makefile) = 0 ]]
	1095	then
	1096	printf "\n\n +++ user file \"$filename\" "
	1097	printf "\n is not listed in Makefile \n"
	1098	locat=source; exit
	1099	fi
	1100	done
	1101	cd - > /dev/null
	1102	fi
	1103	fi
	1104
	1105	# COPY CONFIGURATION FILES
[2990]	1106	cp $config_file ${base_directory}/${sources_for_run_catalog}
	1107	cp $fileconnection_file ${base_directory}/${sources_for_run_catalog}
[2380]	1108
	1109	# COPY SHELLSCRIPTS
[2990]	1110	cp ${source_path}/../SCRIPTS/palmrun ${base_directory}/${sources_for_run_catalog}
	1111	cp ${source_path}/../SCRIPTS/batch_scp ${base_directory}/${sources_for_run_catalog}
[2380]	1112
	1113	fi
	1114
	1115	fi
	1116
[2605]	1117
[2380]	1118	# GET THE GLOBAL REVISION-NUMBER OF THE SVN-REPOSITORY
	1119	# (HANDED OVER TO RESTART-RUNS USING OPTION -G)
	1120	if [[ "$global_revision" = "" ]]
	1121	then
	1122	global_revision=`svnversion $source_path 2>/dev/null`
	1123	global_revision="Rev: $global_revision"
	1124	fi
	1125
	1126
	1127	# IN CASE OF PARALLEL EXECUTION, CHECK SOME SPECIFICATIONS CONCERNING PROCESSOR NUMBERS
	1128	if [[ -n $cores ]]
	1129	then
	1130
	1131	# CHECK, IF THE NUMBER OF CORES PER NODE HAS BEEN GIVEN UND IF IT IS AN
	1132	# INTEGRAL DIVISOR OF THE TOTAL NUMBER OF CORES GIVEN BY OPTION -X
[2501]	1133	if [[ $tasks_per_node = 0 ]]
[2380]	1134	then
[3025]	1135	if [[ $create_batch_job = true \|\| $create_remote_batch_job = true ]]
	1136	then
	1137	printf "\n"
	1138	printf "\n +++ option \"-T\" (tasks per node) is missing"
	1139	printf "\n set -T option or define tasks_per_node in the config file"
	1140	locat=tasks_per_node; (( iec = 0 )); exit
	1141	else
	1142	# DEFAULT FOR INTERACTIVE RUN
	1143	tasks_per_node=$cores
	1144	fi
[2380]	1145	fi
	1146
	1147	if (( cores < tasks_per_node ))
	1148	then
	1149	printf "\n"
	1150	printf "\n +++ tasks per node (-T) cannot exceed total number of cores (-X)"
	1151	printf "\n given values: -T $tasks_per_node -X $cores"
	1152	locat=tasks_per_node; (( iec = 0 )); exit
	1153	fi
	1154
	1155	(( nodes = cores / ( tasks_per_node * threads_per_task ) ))
	1156	(( mpi_tasks = cores / threads_per_task ))
	1157	[[ $mpi_tasks = 0 ]] && (( mpi_tasks = 1 ))
	1158	(( ii = cores / tasks_per_node ))
	1159	(( remaining_cores = cores - ii * tasks_per_node ))
	1160	if (( remaining_cores > 0 ))
	1161	then
	1162	printf "\n"
	1163	printf "\n +++ WARNING: tasks per node (option \"-T\") is not an integral"
	1164	printf "\n divisor of the total number of cores (option \"-X\")"
	1165	printf "\n values of this palmrun-call: \"-T $tasks_per_node\" \"-X $cores\""
	1166	printf "\n One of the nodes is filled with $remaining_cores instead of $tasks_per_node tasks"
	1167	(( nodes = nodes + 1 ))
	1168	fi
	1169
	1170	fi
	1171
	1172
	1173	# SET DEFAULT VALUE FOR THE MAXIMUM NUMBER OF PARALLEL IO STREAMS
	1174	if [[ "$maximum_parallel_io_streams" = "" ]]
	1175	then
	1176	maximum_parallel_io_streams=$cores
	1177	fi
	1178
	1179
	1180	# SET PORT NUMBER OPTION FOR CALLS OF SSH/SCP AND batch_scp SCRIPT
	1181	if [[ "$scp_port" != "" ]]
	1182	then
	1183	PORTOPT="-P $scp_port"
	1184	SSH_PORTOPT="-p $scp_port"
	1185	fi
	1186
	1187
	1188	# DETERMINE THE SSH-OPTION IN CASE THAT AN SSH-KEY IS EXPLICITLY GIVEN IN THE
	1189	# CONFIG-FILE
	1190	if [[ "$ssh_key" != "" ]]
	1191	then
	1192	ssh_key="-i $HOME/.ssh/$ssh_key"
	1193	fi
	1194
	1195
	1196	# SET QUEUE, IF NOT GIVEN
	1197	if [[ $create_batch_job = true \|\| $create_remote_batch_job = true ]]
	1198	then
	1199
	1200	if [[ $queue = none && "$defaultqueue" = "" ]]
	1201	then
	1202	printf "\n"
	1203	printf "\n +++ no default queue given in configuration file and no queue"
	1204	printf "\n given with option -q"
[2789]	1205	locat=queue; exit
[2380]	1206	fi
	1207	if [[ $queue = none ]]
	1208	then
	1209	queue=$defaultqueue
	1210	fi
	1211
	1212	fi
	1213
	1214
	1215	# GENERATE FULL FILENAMES OF INPUT-FILES, INCLUDING THEIR PATH
	1216	# CHECK, IF INPUT-FILES EXIST, AND DETERMINE HIGHEST CYCLE NUMBER (IF CYCLES EXIST)
	1217	(( i = 0 ))
[2610]	1218	(( nr_of_input_files = 0 ))
[2380]	1219	while (( i < iin ))
	1220	do
	1221	(( i = i + 1 ))
	1222
	1223	# GENERATE PATH AND FULL FILE NAME (then-BRANCH: FIXED FULL NAME IS GIVEN, I.E. THE
	1224	# FILE IDENTIFIER IS NOT PART OF THE FILENAME))
[2610]	1225	if [[ "${actionin_pre[$i]}" = di ]]
[2380]	1226	then
[2610]	1227	eval filename=${pathin_pre[$i]}/${endin_pre[$i]}
[2380]	1228	else
[3236]	1229	eval filename=${pathin_pre[$i]}/${run_identifier}${endin_pre[$i]}
[2380]	1230	fi
	1231
[2610]	1232
[2380]	1233	# CHECK IF FILE EXISTS
	1234	if ! ls $filename* 1>/dev/null 2>&1
	1235	then
	1236
[2669]	1237	# FILES WITH ATTRIBUTE opt ARE OPTIONAL. NO ABORT, IF THEY DO NOT EXIST.
	1238	if [[ "${optin_pre[$i]}" != "yes" ]]
[2380]	1239	then
	1240	printf "\n\n +++ INPUT-file: "
[2610]	1241	if [[ "${extin_pre[$i]}" = "" \|\| "${extin_pre[$i]}" = " " ]]
[2380]	1242	then
	1243	printf "\n $filename"
	1244	else
[2610]	1245	printf "\n $filename.${extin_pre[$i]}"
[2380]	1246	fi
	1247	printf "\n does not exist\n"
	1248	locat=input; exit
	1249	else
[2610]	1250	(( nr_of_input_files = nr_of_input_files + 1 ))
	1251	localin[$nr_of_input_files]="${localin_pre[$i]}"
[2669]	1252	optin[$nr_of_input_files]="${optin_pre[$i]}"
	1253	actionin[$nr_of_input_files]="unavailable"
[2610]	1254	pathin[$nr_of_input_files]="${pathin_pre[$i]}"
	1255	endin[$nr_of_input_files]="${endin_pre[$i]}"
	1256	extin[$nr_of_input_files]="${extin_pre[$i]}"
[2380]	1257	fi
[2605]	1258
[2380]	1259	else
	1260
[3236]	1261	# FIRST CHECK FOR MULTIPLE NAMES WITH THE SAME BASENAME
	1262	# ($run_identifier) AND CREATE A LIST FOR THE DETECTED BASENAME
	1263	# ENDINGS
[2610]	1264	if [[ "${multin[$i]}" = true ]]
	1265	then
	1266	# DETERMINE THE EXISTING EXTENSIONS FROM THE LIST OF FILES
	1267	ls -1 -d ${filename} > filelist 2>/dev/null
	1268	ls -1 -d ${filename}.* >> filelist 2>/dev/null
	1269	ls -1 -d ${filename}_* >> filelist 2>/dev/null
[2380]	1270
[2610]	1271	endings=""
	1272	while read line
	1273	do
	1274	# filename without path (i.e. after the last "/")
	1275	basefilename=$(basename ${line})
[2380]	1276
[2610]	1277	# check if there is an extension and remove it
	1278	ext=${basefilename##*.}
	1279	if [[ "$ext" = "${extin_pre[$i]}" ]]
	1280	then
	1281	basefilename=${basefilename%.*}
	1282	fi
[2380]	1283
[2610]	1284	# check for an existing cycle number and remove it
	1285	cycle=${basefilename##*.}
	1286	if [[ $cycle =~ ^-?[0-9]+$ ]]
	1287	then
	1288	basefilename=${basefilename%.*}
	1289	fi
[2600]	1290
[3236]	1291	# remove the run_identifier from the beginning
	1292	length_run_identifier=${#run_identifier}
	1293	ending=${basefilename:${length_run_identifier}}
[2610]	1294
	1295	# remove the ending given in the .iofiles from the beginning
	1296	endingstring="${endin_pre[$i]}"
	1297	length_ending=${#endingstring}
	1298	ending=${ending:${length_ending}}
	1299
	1300	if [[ "$ending" = "" ]]
[2600]	1301	then
[2610]	1302	# standard ending as given in the .iofiles
	1303	if [[ $(echo $endings \| grep -c DEFAULT) = 0 ]]
	1304	then
	1305	endings="$endings DEFAULT"
	1306	fi
[2600]	1307	else
[2610]	1308	# ending must start with "_", otherwise its a different file
	1309	if [[ "${ending:0:1}" = "_" ]]
	1310	then
	1311	if [[ $(echo $endings \| grep -c "$ending") = 0 ]]
	1312	then
	1313	endings="$endings $ending"
	1314	fi
	1315	fi
[2600]	1316	fi
[2610]	1317
	1318	done <filelist
[2380]	1319
[2610]	1320	rm filelist
[2380]	1321
[2600]	1322	else
[2610]	1323
	1324	# SINGLE NAME
	1325	endings=DEFAULT
	1326
[2600]	1327	fi
	1328
[2610]	1329	# FOR EACH BASENAME ENDING CREATE AN ENTRY IN THE FINAL INPUT FILE LIST
	1330	for ending in $endings
	1331	do
	1332
	1333	# DEFAULT MEANS THAT THE ENDING GIVEN IN .iofiles SHALL BE USED
	1334	if [[ $ending = DEFAULT ]]
[2380]	1335	then
[2610]	1336	ending=""
	1337	fi
	1338
	1339	# NEW ENTRY (ENDING IS ALSO ADDED TO LOCAL FILENAME READ BY PALM!)
	1340	(( nr_of_input_files = nr_of_input_files + 1 ))
	1341	localin[$nr_of_input_files]="${localin_pre[$i]}"$ending
[2669]	1342	optin[$nr_of_input_files]="${optin_pre[$i]}"
[2610]	1343	actionin[$nr_of_input_files]="${actionin_pre[$i]}"
	1344	pathin[$nr_of_input_files]="${pathin_pre[$i]}"
	1345	endin[$nr_of_input_files]="${endin_pre[$i]}"$ending
	1346	extin[$nr_of_input_files]="${extin_pre[$i]}"
	1347
	1348
	1349	# GENERATE PATH AND FULL FILE NAME (then-BRANCH: FIXED FULL NAME IS GIVEN, I.E. THE
	1350	# FILE IDENTIFIER IS NOT PART OF THE FILENAME))
	1351	if [[ "${actionin[$nr_of_input_files]}" = di ]]
	1352	then
	1353	eval filename=${pathin[$nr_of_input_files]}/${endin[$nr_of_input_files]}
[2380]	1354	else
[3236]	1355	eval filename=${pathin[$nr_of_input_files]}/${run_identifier}${endin[$nr_of_input_files]}
[2380]	1356	fi
[2610]	1357
	1358	# DETERMINE THE FILE'S CYCLE NUMBER
	1359	(( maxcycle = 0 ))
	1360	ls -1 -d $filename > filelist 2>/dev/null
	1361	ls -1 -d $filename.* >> filelist 2>/dev/null
	1362	while read line
	1363	do
[4443]	1364	# filename without path (i.e. after the last "/")
	1365	basefilename=$(basename ${line})
[2610]	1366
[4443]	1367	# check if there is an extension
	1368	extension=${basefilename##*.}
	1369	if [[ "$extension" = "${extin[$nr_of_input_files]}" ]]
	1370	then
	1371	basefilename=${basefilename%.*}
	1372	fi
[2610]	1373
[4443]	1374	# check for an existing cycle number
	1375	cycle=${basefilename##*.}
	1376	if [[ $cycle =~ ^-?[0-9]+$ ]]
	1377	then
	1378	# NUMBERS WITH LEADING ZEROS ARE INTERPRETED AS OCTAL NUMBERS
	1379	# 10# EXPLICITLY SPECIFIES THE NUMBER BASE AS 10
	1380	(( icycle = $((10#$cycle)) ))
	1381	explicit_cycle_number=true
	1382	else
	1383	(( icycle = 0 ))
	1384	explicit_cycle_number=false
	1385	fi
[2610]	1386
[4443]	1387	if (( icycle > maxcycle ))
	1388	then
	1389	(( maxcycle = icycle ))
	1390	fi
[2610]	1391
	1392	done <filelist
	1393	rm filelist
[4443]	1394
[2610]	1395
	1396	# MAKE CYCLE NUMBER THREE DIGITS WIDE
[4443]	1397	cyclestring=`printf "%03d" $maxcycle`
	1398
[2610]	1399
	1400	# APPEND CYCLE NUMBER TO FILENAME
[4443]	1401	if [[ $explicit_cycle_number = true ]]
[2380]	1402	then
[2610]	1403	if [[ "${extin[$nr_of_input_files]}" != " " && "${extin[$nr_of_input_files]}" != "" ]]
	1404	then
	1405	filename=${filename}.$cyclestring.${extin[$nr_of_input_files]}
	1406	else
	1407	filename=${filename}.$cyclestring
	1408	fi
[2380]	1409	else
[2610]	1410	if [[ "${extin[$nr_of_input_files]}" != " " && "${extin[$nr_of_input_files]}" != "" ]]
	1411	then
	1412	filename=${filename}.${extin[$nr_of_input_files]}
	1413	fi
[2380]	1414	fi
[2610]	1415
	1416	# STORE FILENAME WITHOUT PATH BUT WITH CYCLE NUMBER,
	1417	# IS LATER USED FOR TRANSFERRING FILES WIHIN THE JOB (SEE END OF FILE)
	1418	absnamein[$nr_of_input_files]=$filename
[4443]	1419	if [[ $explicit_cycle_number = true ]]
[2380]	1420	then
[2610]	1421	if [[ "${actionin[$nr_of_input_files]}" = di ]]
	1422	then
	1423	frelin[$nr_of_input_files]=${endin[$nr_of_input_files]}.$cyclestring
	1424	else
[3236]	1425	frelin[$nr_of_input_files]=${run_identifier}${endin[$nr_of_input_files]}.$cyclestring
[2610]	1426	fi
[2380]	1427	else
[2610]	1428	if [[ "${actionin[$nr_of_input_files]}" = di ]]
	1429	then
	1430	frelin[$nr_of_input_files]=${endin[$nr_of_input_files]}
	1431	else
[3236]	1432	frelin[$nr_of_input_files]=${run_identifier}${endin[$nr_of_input_files]}
[2610]	1433	fi
[2380]	1434	fi
	1435
[2610]	1436	done
	1437
[2380]	1438	fi
[2610]	1439
[2380]	1440	done
	1441
[2610]	1442
[2380]	1443	# GENERATE FULL FILENAMES OF OUTPUT-FILES (WITHOUT $ OR ~),
	1444	# CHECK, IF OUTPUT-FILES EXIST, AND DETERMINE HIGHEST CYCLE NUMBER (IF CYCLES EXIST),
	1445	# OR, IN CASE THAT FILE DOES NOT EXIST, CHECK, IF IT CAN BE CREATED
[2610]	1446	# THESE ACTIONS ARE NOT CARRIED OUT, IF FILES SHALL BE TRANSFERRED FROM THE REMOTE TO
[2380]	1447	# THE LOCAL HOST (BECAUSE THEIR IS NO DIRECT ACCESS TO THE LOCAL DIRECTORIES FROM THE
	1448	# REMOTE HOST)
	1449	(( i = 0 ))
	1450	while (( i < iout ))
	1451	do
	1452	(( i = i + 1 ))
[2610]	1453	if [[ ! ( $running_on_remote = true && ( "${actionout_pre[$i]}" = tr \|\| "${actionout_pre[$i]}" = tra \|\| "${actionout_pre[$i]}" = trpe ) ) ]]
[2380]	1454	then
[2610]	1455	if [[ "${actionout_pre[$i]}" = tr ]]
[2380]	1456	then
[2610]	1457	actionout_pre[$i]=""
	1458	elif [[ "${actionout_pre[$i]}" = trpe ]]
[2380]	1459	then
[2610]	1460	actionout_pre[$i]=pe
	1461	elif [[ "${actionout_pre[$i]}" = tra ]]
[2380]	1462	then
[2610]	1463	actionout_pre[$i]=a
[2380]	1464	fi
	1465	(( maxcycle = 0 ))
[3236]	1466	eval filename=${pathout_pre[$i]}/${run_identifier}${endout_pre[$i]}
[2610]	1467	eval catalogname=${pathout_pre[$i]}
[2380]	1468	if ! ls $filename* 1>/dev/null 2>&1
	1469	then
	1470
	1471	# IF OUTPUT-FILE DOES NOT EXIST CHECK, IF IT CAN BE CREATED
	1472	if cat /dev/null > $filename
	1473	then
	1474	rm $filename
	1475	else
	1476
	1477	# CHECK, IF THE DIRECTORY WHERE FILE SHALL BE COPIED TO EXISTS
	1478	# IF IT DOES NOT EXIST, TRY TO CREATE IT
	1479	if [[ ! -d $catalogname ]]
	1480	then
	1481	if mkdir -p $catalogname
	1482	then
	1483	printf "\n\n *** directory:"
	1484	printf "\n $catalogname"
	1485	printf "\n was created\n"
	1486	else
	1487	printf "\n\n +++ OUTPUT-file:"
	1488	printf "\n $filename"
	1489	printf "\n cannot be created, because directory does not exist"
	1490	printf "\n and cannot be created either"
	1491	printf "\n"
	1492	locat=output ; exit
	1493	fi 2>/dev/null
	1494	else
	1495	printf "\n\n +++ OUTPUT-file:"
	1496	printf "\n $filename"
	1497	printf "\n cannot be created, although directory exists"
	1498	printf "\n"
	1499	locat=output ; exit
	1500	fi
	1501	fi 2>/dev/null
	1502
	1503	fi
	1504
	1505	fi
	1506	done
	1507
	1508
	1509	# DETERMINE THE NAME OF PALMRUN'S TEMPORARY WORKING DIRECTORY
	1510	if [[ $running_in_batch_mode = false ]]
	1511	then
[3236]	1512	run_id_number=$RANDOM
	1513	run_id=${run_identifier}.$run_id_number
[2380]	1514
[3236]	1515	tempdir=$fast_io_catalog/$run_id
[3346]	1516
	1517	# FOR COMPATIBILITY REASONS WITH OLDER VERSIONS SET JOB_ID
	1518	export job_id=$run_id
	1519
[2380]	1520	fi
	1521
	1522
	1523	# CHECK SETTINGS REQUIRED FOR BATCH JOBS
	1524	if [[ $create_batch_job = true \|\| $create_remote_batch_job = true ]]
	1525	then
	1526
	1527	# CHECK, IF JOB DIRECTIVES HAVE BEEN GIVEN IN CONFIGURATION FILE
	1528	if [[ $ibd = 0 ]]
	1529	then
	1530	printf "\n"
	1531	printf "\n +++ no batch directives found in configuration file"
	1532	locat=config_file_batch_directives; (( iec = 0 )); exit
	1533	fi
	1534
	1535	# CHECK IF CPUTIME IS GIVEN FOR JOB
	1536	done=false
[2384]	1537	cputime=$cpumax
[2380]	1538	while [[ $done = false ]]
	1539	do
[2384]	1540	if (( cputime == 0 ))
[2380]	1541	then
	1542	printf "\n +++ cpu-time is undefined"
	1543	printf "\n >>> Please type CPU-time in seconds as INTEGER:"
	1544	printf "\n >>> "
[2384]	1545	read cputime 1>/dev/null 2>&1
[2380]	1546	else
	1547	done=true
	1548	fi
	1549	done
[2420]	1550	cpumax=$cputime
[2380]	1551
	1552	# CHECK THE MEMORY DEMAND
	1553	done=false
	1554	while [[ $done = false ]]
	1555	do
	1556	if (( memory == 0 ))
	1557	then
	1558	printf "\n +++ memory demand is undefined"
	1559	printf "\n >>> Please type memory in MByte per process as INTEGER:"
	1560	printf "\n >>> "
	1561	read memory 1>/dev/null 2>&1
	1562	else
	1563	done=true
	1564	fi
	1565	done
	1566
	1567	# IN CASE OF REMOTE-JOBS CHECK, IF A USERNAME FOR THE REMOTE HOST IS GIVEN
	1568	if [[ $create_remote_batch_job = true && -z $remote_username ]]
	1569	then
	1570	while [[ -z $remote_username ]]
	1571	do
[2420]	1572	printf "\n +++ username on remote host with IP \"$remote_ip\" is undefined"
[2380]	1573	printf "\n >>> Please type username:"
	1574	printf "\n >>> "
	1575	read remote_username
	1576	done
	1577	fi
	1578
	1579	else
	1580
[2420]	1581	if [[ $running_in_batch_mode = false ]]
	1582	then
	1583	cputime=10000000 # NO LIMT FOR INTERACTIVE RUNS
	1584	cpumax=$cputime
	1585	else
	1586	cputime=$cpumax
	1587	fi
[2380]	1588
	1589	fi
	1590
	1591
	1592	# CALCULATE HOURS/MINUTES/SECONDS, E.G. FOR BATCH-DIRECTIVES
	1593	(( cpu_hours = cputime / 3600 ))
	1594	(( resttime = cputime - cpu_hours * 3600 ))
	1595	(( cpu_minutes = resttime / 60 ))
	1596	(( cpu_seconds = resttime - cpu_minutes * 60 ))
	1597	timestring=${cpu_hours}:${cpu_minutes}:${cpu_seconds}
	1598
	1599
	1600	# OUTPUT OF THE PALMRUN-HEADER
	1601	calltime=$(date)
	1602	printf "\n"
	1603	printf "#------------------------------------------------------------------------# \n"
	1604	printf "\| %-35s%35s \| \n" "$version" "$calltime"
[3151]	1605	printf "\| %-35s%35s \| \n" "PALM code $global_revision" " "
[2380]	1606	printf "\| \| \n"
	1607	column1="called on:"; column2=$(hostname)
	1608	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1609	if [[ $create_remote_batch_job = true ]]
	1610	then
[3236]	1611	column1="execution on:"; column2="$configuration_identifier (username: $remote_username)"
[2380]	1612	else
	1613	if [[ $running_on_remote = true ]]
	1614	then
[3236]	1615	column1="config. identifier:"; column2="$configuration_identifier (execute on IP: $remote_ip)"
[2380]	1616	else
[3236]	1617	column1="config. identifier:"; column2="$configuration_identifier (execute on IP: $local_ip)"
[2380]	1618	fi
	1619	fi
	1620	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1621
	1622	column1="running in:"
	1623	if [[ $running_in_batch_mode = true ]]
	1624	then
	1625	column2="batch job mode"
	1626	else
	1627	if [[ $create_batch_job = true \|\| $create_remote_batch_job = true ]]
	1628	then
	1629	column2="job creation mode"
	1630	else
	1631	column2="interactive run mode"
	1632	fi
	1633	fi
	1634	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1635
[2479]	1636	if [[ $running_in_batch_mode = true \|\| $create_batch_job = true \|\| $create_remote_batch_job = true ]]
	1637	then
[2480]	1638	if [[ "$project_account" != "" ]]
[2479]	1639	then
	1640	column1="project account number:"
	1641	column2="$project_account"
	1642	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1643	fi
	1644	fi
	1645
[2380]	1646	if [[ -n $cores ]]
	1647	then
	1648	if [[ $run_coupled_model = false ]]
	1649	then
	1650	column1="number of cores:"; column2=$cores
	1651	else
	1652	column1="number of cores:"; column2="$cores (atmosphere: $cores_atmos, ocean: $cores_ocean)"
	1653	fi
	1654	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1655	fi
	1656	if [[ -n $tasks_per_node ]]
	1657	then
	1658	column1="tasks per node:"; column2="$tasks_per_node (number of nodes: $nodes)"
	1659	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1660	if (( remaining_cores > 0 ))
	1661	then
	1662	column1=" "; column2="one of the nodes only filled with $remaining_cores tasks"
	1663	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1664	fi
	1665	fi
	1666	if [[ $maximum_parallel_io_streams != $cores ]]
	1667	then
	1668	column1="max par io streams:"; column2="$maximum_parallel_io_streams"
	1669	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1670	fi
	1671	if [[ $use_openmp = true ]]
	1672	then
	1673	column1="threads per task:"; column2="$threads_per_task"
	1674	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1675	fi
[2384]	1676	if [[ $create_batch_job = true \|\| $create_remote_batch_job = true \|\| $running_in_batch_mode = true ]]
	1677	then
[2506]	1678	column1="memory demand / PE":; column2="$memory MB"
	1679	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
[2384]	1680	column1="job cpu time (h:m:s):"; column2="$timestring"
	1681	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1682	fi
[2380]	1683	printf "\| \| \n"
	1684	if [[ "$source_list" != "" ]]
	1685	then
	1686	if [[ "$make_options" != "" ]]
	1687	then
	1688	column1="make options:"; column2=$(echo "$make_options" \| cut -c-45)
	1689	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1690	line=$(echo "$make_options" \| cut -c46-)
	1691	while [[ "$line" != "" ]]
	1692	do
	1693	column1=""
	1694	column2=$(echo "$line" \| cut -c-45)
	1695	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1696	line=$(echo "$line" \| cut -c46-)
	1697	done
	1698	fi
	1699	fi
	1700
	1701	column1="cpp directives:"; column2=$(echo "$cpp_options" \| cut -c-45)
	1702	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1703	line=$(echo "$cpp_options" \| cut -c46-)
	1704	while [[ "$line" != "" ]]
	1705	do
	1706	column1=""
	1707	column2=$(echo "$line" \| cut -c-45)
	1708	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1709	line=$(echo "$line" \| cut -c46-)
	1710	done
	1711
	1712	column1="compiler options:"; column2=$(echo "$compiler_options" \| cut -c-45)
	1713	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1714	line=$(echo "$compiler_options" \| cut -c46-)
	1715	while [[ "$line" != "" ]]
	1716	do
	1717	column1=""
	1718	column2=$(echo "$line" \| cut -c-45)
	1719	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1720	line=$(echo "$line" \| cut -c46-)
	1721	done
	1722
[2388]	1723	column1="linker options:"; column2=$(echo "$linker_options" \| cut -c-45)
[2380]	1724	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
[2388]	1725	line=$(echo "$linker_options" \| cut -c46-)
[2380]	1726	while [[ "$line" != "" ]]
	1727	do
	1728	column1=""
	1729	column2=$(echo "$line" \| cut -c-45)
	1730	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1731	line=$(echo "$line" \| cut -c46-)
	1732	done
	1733
	1734	if [[ "$login_init_cmd" != "" ]]
	1735	then
	1736	column1="login init commands:"; column2=$(echo "$login_init_cmd" \| cut -c-45)
	1737	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1738	line=$(echo "$login_init_cmd" \| cut -c46-)
	1739	while [[ "$line" != "" ]]
	1740	do
	1741	column1=""
	1742	column2=$(echo "$line" \| cut -c-45)
	1743	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1744	line=$(echo "$line" \| cut -c46-)
	1745	done
	1746	fi
	1747
	1748	if [[ "$module_commands" != "" ]]
	1749	then
	1750	column1="module commands:"; column2=$(echo "$module_commands" \| cut -c-45)
	1751	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1752	line=$(echo "$module_commands" \| cut -c46-)
	1753	while [[ "$line" != "" ]]
	1754	do
	1755	column1=""
	1756	column2=$(echo "$line" \| cut -c-45)
	1757	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1758	line=$(echo "$line" \| cut -c46-)
	1759	done
	1760	fi
	1761	printf "\| \| \n"
[3236]	1762	column1="run identifier:"; column2=$run_identifier
[2380]	1763	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1764	column1="activation string list:"; column2=$(echo $activation_string_list)
	1765	printf "\| %-25s%-45s \| \n" "$column1" "$column2"
	1766
	1767	if [[ "$ocean_file_appendix" = true ]]
	1768	then
	1769	printf "\| %-35s%-35s \| \n" "suffix \"_O\" is added to local files" " "
	1770	fi
	1771
	1772	if [[ "$source_list" != "" ]]
	1773	then
	1774	printf "\| \| \n"
	1775	printf "\| Files to be compiled: \| \n"
	1776	line=$source_list
	1777	while [[ "$line" != "" ]]
	1778	do
	1779	linestart=$(echo $line \| cut -c-70)
	1780	printf "\| %-70s \| \n" "$linestart"
	1781	line=$(echo "$line" \| cut -c71-)
	1782	done
	1783	fi
	1784	printf "#------------------------------------------------------------------------#"
	1785
	1786
	1787
	1788	# OUTPUT OF FILE CONNECTIONS IN CASE OF TRACEBACK
	1789	if [[ $do_trace = true ]]
	1790	then
	1791	(( i = 0 ))
[2610]	1792	while (( i < nr_of_input_files ))
[2380]	1793	do
	1794	(( i = i + 1 ))
	1795	if (( i == 1 ))
	1796	then
	1797	printf "\n\n >>> INPUT-file assignments:\n"
	1798	fi
	1799	printf "\n ${localin[$i]} : ${absnamein[$i]}"
	1800	done
	1801	(( i = 0 ))
	1802	while (( i < iout ))
	1803	do
	1804	(( i = i + 1 ))
	1805	if (( i == 1 ))
	1806	then
	1807	printf "\n\n >>> OUTPUT-file assignments:\n"
	1808	fi
	1809	printf "\n ${localout[$i]} : ${pathout[$i]}"
	1810	done
	1811	(( i = 0 ))
	1812	while (( i < iic ))
	1813	do
	1814	(( i = i + 1 ))
	1815	if (( i == 1 ))
	1816	then
	1817	printf "\n\n >>> INPUT-commands:\n"
	1818	fi
	1819	printf "\n ${in_command[$i]}"
	1820	done
	1821	(( i = 0 ))
	1822	while (( i < ioc ))
	1823	do
	1824	(( i = i + 1 ))
	1825	if (( i == 1 ))
	1826	then
	1827	printf "\n\n >>> OUTPUT-commands:\n"
	1828	fi
	1829	printf "\n ${out_command[$i]}"
	1830	done
	1831	fi
	1832
	1833	# QUERY FOR CONTINUE
	1834	if [[ $silent = false && $running_in_batch_mode = false ]]
	1835	then
	1836	antwort=dummy
	1837	printf "\n\n"
	1838	printf " >>> everything o.k. (y/n) ? "
	1839	while read antwort
	1840	do
	1841	if [[ "$antwort" != y && "$antwort" != Y && "$antwort" != n && "$antwort" != N ]]
	1842	then
	1843	printf " >>> everything o.k. (y/n) ? "
	1844	else
	1845	break
	1846	fi
	1847	done
	1848	if [[ $antwort = n \|\| $antwort = N ]]
	1849	then
	1850	locat=user_abort; (( iec = 0 )); exit
	1851	fi
	1852	if [[ $create_batch_job = true \|\| $create_remote_batch_job = true ]]
	1853	then
[2566]	1854	printf "\n *** batch-job will be created and submitted"
[2380]	1855	else
[2566]	1856	printf "\n *** PALMRUN will now continue to execute on this machine"
[2380]	1857	fi
	1858	fi
	1859
	1860
	1861
	1862	# PROVIDE FILES TO EXECUTE PALM AND CREATE THE EXECUTABLE
	1863	if [[ $restart_run = false && $running_in_batch_mode = false ]]
	1864	then
	1865
	1866	if [[ $create_batch_job = true \|\| $create_remote_batch_job = true ]]
	1867	then
[2566]	1868	printf "\n\n *** creating executable and other sources for the remote host\n"
[2380]	1869	else
[2566]	1870	printf "\n\n *** creating executable and other sources for the local host\n"
[2380]	1871	fi
	1872
[2422]	1873	# FIRST CHECK, IF A MAKE DEPOSITORY EXISTS, AND IF NOT, ASK THE USER IF
	1874	# IT SHALL BE CREATED
	1875	ask_for_make_depository=false
	1876	if [[ $create_remote_batch_job = true ]]
	1877	then
	1878
	1879	line=`grep %base_directory $config_file`
[3236]	1880	make_depository=`echo $line \| cut -d" " -s -f2`/MAKE_DEPOSITORY_${configuration_identifier}
[3534]	1881	ssh -q $ssh_key ${remote_username}@${remote_ip} "[[ ! -d ${make_depository} ]] && echo depository not found" 2>&1 \| tee ${configuration_identifier}_last_make_protokoll
[2422]	1882
[3236]	1883	if [[ $(grep -c "depository not found" ${configuration_identifier}_last_make_protokoll) != 0 ]]
[2422]	1884	then
	1885	printf "\n\n +++ make depository \"${make_depository}\""
	1886	printf "\n on remote host not found!"
	1887	ask_for_make_depository=true
	1888	fi
[3236]	1889	rm ${configuration_identifier}_last_make_protokoll
[2422]	1890
	1891	else
	1892
	1893	# CHECK FOR MAKE_DEPOSITORY ON THE LOCAL HOST
[3236]	1894	make_depository=${base_directory}/MAKE_DEPOSITORY_${configuration_identifier}
[2422]	1895	if [[ ! -d ${make_depository} ]]
	1896	then
	1897	printf "\n\n +++ make depository \"${make_depository}\""
	1898	printf "\n on local host not found!"
	1899	ask_for_make_depository=true
	1900	fi
	1901
	1902	fi
	1903
	1904	if [[ $ask_for_make_depository = true ]]
	1905	then
	1906
	1907	antwort=dummy
	1908	printf "\n\n"
	1909	printf " >>> Create a new one (y/n) ? "
	1910	while read antwort
	1911	do
	1912	if [[ "$antwort" != y && "$antwort" != Y && "$antwort" != n && "$antwort" != N ]]
	1913	then
	1914	printf " >>> Create a new one (y/n) ? "
	1915	else
	1916	break
	1917	fi
	1918	done
	1919	if [[ $antwort = n \|\| $antwort = N ]]
	1920	then
	1921	locat=user_abort; (( iec = 0 )); exit
	1922	fi
	1923
[2566]	1924	if [[ $do_trace = true ]]
	1925	then
[3455]	1926	palmbuild -c $configuration_identifier
[2566]	1927	else
[3455]	1928	palmbuild -v -c $configuration_identifier
[2566]	1929	fi
[2422]	1930
[3312]	1931	if [[ ${PIPESTATUS[0]} != 0 ]]
[2422]	1932	then
	1933
	1934	# ABORT IN CASE OF COMPILATION PROBLEMS
	1935	printf "\n +++ error while compiling for the MAKE_DEPOSITORY"
	1936	locat=make_depository
	1937	exit
	1938	else
	1939	echo " *** now continue with creating executable and other sources"
	1940	fi
	1941
	1942	fi
	1943
[2566]	1944	# NOW CREATE THE SOURCES_FOR_RUN FOLDER
[3455]	1945	palmbuild -v $use_existing_sources_folder -c $configuration_identifier -r $run_identifier
[2380]	1946
[3312]	1947	if [[ ${PIPESTATUS[0]} != 0 ]]
[2380]	1948	then
	1949
	1950	# ABORT IN CASE OF COMPILATION PROBLEMS
	1951	printf "\n +++ error while creating executable and/or other sources"
	1952	locat=execution
[2990]	1953	rm -rf ${base_directory}/${sources_for_run_catalog}
[2380]	1954	exit
	1955
	1956	else
	1957
[2566]	1958	printf " *** executable and other sources created\n"
[2990]	1959	rm -rf ${base_directory}/${sources_for_run_catalog}
[2380]	1960
	1961	fi
	1962
	1963	fi
	1964
	1965
[2669]	1966	# WHEN CREATING A REMOTE BATCH JOB, THOSE INPUT FILES WITH TRANSFER-ATTRIBUT
	1967	# WILL BE COPIED TO THE REMOTE HOST
[2605]	1968	if [[ $create_remote_batch_job = true ]]
	1969	then
	1970	(( i = 0 ))
[2610]	1971	while (( i < nr_of_input_files ))
[2605]	1972	do
	1973	(( i = i + 1 ))
[2669]	1974	if [[ "${actionin[$i]}" = tr ]]
[2605]	1975	then
	1976	eval inputfile=${pathin[$i]}/${frelin[$i]}
	1977	scp -q $ssh_key $PORTOPT $inputfile ${remote_username}@${remote_ip}:${fast_io_catalog}/${sources_for_run_catalog}/${frelin[$i]}
	1978	fi
	1979	done
	1980	if (( i > 0 ))
	1981	then
[3025]	1982	printf "\n\n *** input files have been copied to the remote host\n"
[2605]	1983	fi
	1984	fi
	1985
	1986
[2380]	1987	# NOW PERFORM THOSE ACTIONS REQUIRED TO EXECUTE THE PROGRAM (PALM) ON THIS MACHINE
	1988	# (COMPILING/LINKING, EXECUTING, COPYING I/O FILES)
	1989	if [[ $create_batch_job = false && $create_remote_batch_job = false ]]
	1990	then
	1991
	1992	# CHANGE TO THE TEMPORARY WORKING DIRECTORY
	1993	if [[ $running_in_batch_mode = false ]]
	1994	then
[4443]	1995
[3917]	1996	# CREATE THE DIRECTORY
[2566]	1997	mkdir -p $tempdir
[4303]	1998	if [[ $? != 0 ]]
	1999	then
	2000	printf "\n +++ temporary working directory cannot be created."
	2001	printf "\n Check setting of variable fast_io_catalog in your config file."
	2002	locat=execution
	2003	exit
	2004	fi
[2566]	2005	chmod go+rx $tempdir
	2006	cd $tempdir
	2007	printf "\n *** changed to temporary directory: $tempdir"
[2380]	2008
	2009	else
	2010
	2011	# IN BATCH MODE PALMRUN IS CALLED FROM TEMPDIR
[2566]	2012	printf "\n *** running in temporary directory: $tempdir"
[2380]	2013
	2014	fi
	2015
	2016
	2017	# PROVIDE THE INPUT FILES
	2018	# LOOP OVER ALL ACTIVATED FILES (LISTED IN THE CONFIGURATION FILE)
[2669]	2019	optional_files_missing=false
[2380]	2020	(( i = 0 ))
[2610]	2021	while (( i < nr_of_input_files ))
[2380]	2022	do
	2023	(( i = i + 1 ))
	2024	if (( i == 1 ))
	2025	then
	2026	printf "\n\n *** providing INPUT-files:\n$dashes"
	2027	fi
	2028
	2029
	2030	# SKIP OPTIONAL FILES, IF THEY DO NOT EXIST
[2669]	2031	if [[ "${actionin[$i]}" = unavailable ]]
[2380]	2032	then
[2669]	2033	optional_files_missing=true
[2380]	2034	continue
	2035	fi
	2036
	2037	# CHECK FOR SINGLE FILE (SERIAL RUN) OR DIRECTORY (ONE FILE PER CORE FOR PARELLEL EXECUTION)
	2038	files_for_cores=false; filetype=file
	2039	if [[ "${actionin[$i]}" = pe && -n $cores ]]
	2040	then
	2041	files_for_cores=true; filetype=files
	2042	actionin[$i]=""
	2043	elif [[ "${actionin[$i]}" = pe && ! -n $cores ]]
	2044	then
	2045	actionin[$i]=""
	2046	elif [[ "${actionin[$i]}" = lnpe && -n $cores ]]
	2047	then
	2048	files_for_cores=true; filetype=files
	2049	actionin[$i]="ln"
[4536]	2050	# FILE HAS BEEN FOUND INSTEAD OF DIRECTORY
	2051	if [[ -f "${absnamein[$i]}" ]]
	2052	then
	2053	files_for_cores=false; filetype=file
	2054	fi
[2380]	2055	elif [[ "${actionin[$i]}" = lnpe && ! -n $cores ]]
	2056	then
	2057	actionin[$i]="ln"
	2058	fi
	2059
	2060	if [[ $files_for_cores = true ]]
	2061	then
	2062	printf "\n >>> INPUT: ${absnamein[$i]}/.... to ${localin[$i]}"
	2063	else
	2064	printf "\n >>> INPUT: ${absnamein[$i]} to ${localin[$i]}"
	2065	fi
	2066
	2067	# INPUT-FILES TO BE LINKED
	2068	if [[ "${actionin[$i]}" = ln ]]
	2069	then
	2070
	2071	printf "\n $filetype will be linked"
	2072	if [[ $files_for_cores = false ]]
	2073	then
	2074	if [[ -f "${absnamein[$i]}" ]]
	2075	then
	2076	ln ${absnamein[$i]} ${localin[$i]}
	2077	got_tmp[$i]=true
	2078	fi
	2079	else
	2080	if [[ -d "${absnamein[$i]}" ]]
	2081	then
[2396]	2082	mkdir -p ${localin[$i]}
[2380]	2083	cd ${absnamein[$i]}
	2084	for file in $(ls *)
	2085	do
[2566]	2086	ln $file $tempdir/${localin[$i]}
[2380]	2087	done >\|/dev/null 2>&1
[2566]	2088	cd $tempdir
[2380]	2089	fi
	2090
	2091	# IF "ln -f" HAS FAILED DO A NORMAL COPY "cp -r"
	2092	if [[ ! -f "${localin[$i]}/_000000" ]]
	2093	then
	2094	printf "\n --- WARNING: ln failed, using cp instead (might be time consuming...)"
	2095	cp -r ${absnamein[$i]}/* ${localin[$i]}
	2096	fi
	2097
	2098	got_tmp[$i]=true
	2099	fi
	2100	fi
	2101
	2102	# FILE IS STORED IN THE RESPECTIVE DIRECTORY GIVEN IN THE CONFIGURATION FILE
[2669]	2103	if [[ "${actionin[$i]}" = "" \|\| "${actionin[$i]}" = "di" \|\| "${actionin[$i]}" = "tr" \|\| "${actionin[$i]}" = "npe" ]]
[2380]	2104	then
	2105
	2106	if [[ "${actionin[$i]}" = "npe" && -n $cores ]]
	2107	then
	2108
	2109	# FILE COPIES ARE PROVIDED FOR ALL CORES
	2110	# EACH FILE GETS A UNIQUE FILENAME WITH A FOUR DIGIT NUMBER
	2111	printf "\n file will be provided for $cores processors"
[2396]	2112	mkdir -p ${localin[$i]}
[2380]	2113	ival=$cores
	2114	(( ii = 0 ))
	2115	while (( ii <= ival-1 ))
	2116	do
	2117	if (( ii < 10 ))
	2118	then
	2119	cp ${absnamein[$i]} ${localin[$i]}/_000$ii
	2120	elif (( ii < 100 ))
	2121	then
	2122	cp ${absnamein[$i]} ${localin[$i]}/_00$ii
	2123	elif (( ii < 1000 ))
	2124	then
	2125	cp ${absnamein[$i]} ${localin[$i]}/_0$ii
	2126	else
	2127	cp ${absnamein[$i]} ${localin[$i]}/_$ii
	2128	fi
	2129	(( ii = ii + 1 ))
	2130	done
	2131
	2132	else
	2133
	2134	if [[ $files_for_cores = true ]]
	2135	then
	2136
	2137	# PROVIDE FILES FOR EACH CORE
	2138	# FIRST CREATE THE LOCAL DIRECTORY, THEN COPY FILES
	2139	# FROM THE PERMANENT DIRECTORY BY LINKING THEM TO THE LOCAL ONE
	2140	printf "\n providing $cores files for the respective cores"
[2396]	2141	mkdir -p ${localin[$i]}
[2380]	2142	if [[ $link_local_input = true ]]
	2143	then
	2144	printf " files will be linked\n"
	2145	cd ${absnamein[$i]}
	2146	for file in $(ls *)
	2147	do
	2148	ln -f $file ${localin[$i]}
	2149	done
[2566]	2150	cd $tempdir
[2380]	2151	fi
	2152
	2153	# IF "ln -f" FAILED OR IF "$link_local_input = false" DO A NORMAL "cp -r"
	2154	if [[ ! -f "${localin[$i]}/_000000" ]]
	2155	then
	2156	if [[ $link_local_input = true ]]
	2157	then
	2158	printf "\n --- WARNING: ln failed, using cp instead (might be time consuming...)"
	2159	fi
	2160	cp -r ${absnamein[$i]}/* ${localin[$i]}
	2161	fi
	2162
	2163	else
	2164
	2165	# PROVIDE FILE FOR RUNS ON A SINGLE CORE
	2166	if [[ $link_local_input = true ]]
	2167	then
	2168	printf " file will be linked\n"
	2169	ln -f ${absnamein[$i]} ${localin[$i]}
	2170	fi
[4443]	2171	# IF "ln -f" FAILS OR IF "$link_local_input = false" DO A NORMAL "cp"
[2380]	2172	if [[ ! -f "${localin[$i]}" ]]
	2173	then
	2174	if [[ $link_local_input = true ]]
	2175	then
	2176	printf "\n --- WARNING: ln failed, using cp instead (might be time consuming...)"
	2177	fi
[2669]	2178	if [[ $running_on_remote = true && "${actionin[$i]}" = tr ]]
[2605]	2179	then
	2180	mv ${absnamein[$i]} ${localin[$i]}
	2181	else
	2182	cp ${absnamein[$i]} ${localin[$i]}
	2183	fi
[2380]	2184	fi
	2185	fi
	2186	fi
	2187	fi
	2188
	2189	done
	2190	if (( i != 0 ))
	2191	then
[2669]	2192	if [[ $optional_files_missing = true ]]
	2193	then
	2194	printf "\n *** INFORMATIVE: some optional INPUT-files are not present"
	2195	fi
[2380]	2196	printf "\n$dashes\n *** all INPUT-files provided \n"
	2197	fi
	2198
[3917]	2199	# NOW COPY FILES (.f90, .o, config files, etc.) FROM SOURCES_FOR_RUN_... TO THE TEMPORARY
	2200	# WORKING DIRECTORY
	2201	cp ${fast_io_catalog}/${sources_for_run_catalog}/{,.[!.]} $tempdir
[2380]	2202
[3917]	2203
[2380]	2204	# EXECUTE INPUT-COMMANDS GIVEN IN THE CONFIGURATION FILE
	2205	(( i = 0 ))
	2206	while (( i < iic ))
	2207	do
	2208	(( i = i + 1 ))
	2209	if (( i == 1 ))
	2210	then
	2211	printf "\n\n *** execution of INPUT-commands:\n$dashes"
	2212	fi
	2213	printf "\n >>> ${in_command[$i]}"
	2214	eval ${in_command[$i]}
	2215	if (( i == iic ))
	2216	then
	2217	printf "\n$dashes\n"
	2218	fi
	2219	done
	2220
	2221
[3313]	2222	# CHECK IF THE PROGRESS BAR NEEDS TO BE DISABLED
	2223	if [[ $running_in_batch_mode = true \|\| $running_in_test_mode = true ]]
	2224	then
	2225	progress_bar_disabled=true
	2226	else
	2227	progress_bar_disabled=false
	2228	fi
	2229
	2230
[2380]	2231	# CREATE THE NAMELIST-FILE WITH VALUES OF ENVIRONMENT-VARIABLES REQUIRED BY PALM
	2232	# (FILE ENVPAR WILL BE READ BY PALM)
	2233	cat > ENVPAR << EOF
[3236]	2234	&envpar run_identifier = '$run_identifier', host = '$configuration_identifier',
[2906]	2235	write_svf = .${write_svf}., write_binary = .${write_binary}.,
	2236	read_svf = .${read_svf}., tasks_per_node = $tasks_per_node,
[2380]	2237	maximum_parallel_io_streams = $maximum_parallel_io_streams,
	2238	maximum_cpu_time_allowed = ${cpumax}.,
	2239	revision = '$global_revision',
[3313]	2240	progress_bar_disabled = .${progress_bar_disabled}. /
[2380]	2241
	2242	EOF
	2243
	2244
	2245	# STARTING THE EXECUTABLE
	2246	printf "\n\n *** execution starts in directory\n \"`pwd`\"\n$dashes\n"
[2566]	2247	PATH=$PATH:$tempdir
[2380]	2248
	2249
	2250	# REPLACE PARAMETERS IN THE EXECUTION COMMAND WITH REAL VALUES
[2693]	2251	line=`echo "${execute_command}" \| sed 's/{{/$/g' \| sed 's/}}//g'`
	2252	line2=`echo "${execute_command}" \| sed 's/{{mpi_tasks}}/1/g' \| sed 's/{{tasks_per_node}}/1/g' \| sed 's/palm/combine_plot_fields.x/g'`
[2380]	2253	eval line=\"$line\"
	2254	execute_command="$line"
	2255
	2256
	2257	# EXECUTION COMMAND FOR COMBINE_PLOT_FIELDS
[2566]	2258	if [[ "$execute_command_for_combine" = "" ]]
	2259	then
	2260	eval line2=\"$line2\"
	2261	execute_command_for_combine="$line2"
	2262	fi
	2263
[2380]	2264
	2265
	2266	# PROVIDE A HOSTFILE, IF REQUIRED
	2267	if [[ "$hostfile" != "" ]]
	2268	then
	2269
	2270	if [[ $hostfile = auto ]]
	2271	then
	2272	# CREATE A NEW HOSTFILE
	2273	(( ii = 1 ))
	2274	while (( ii <= cores / threads_per_task ))
	2275	do
	2276	echo $(hostname) >> hostfile
	2277	(( ii = ii + 1 ))
	2278	done
	2279	if (( cores / threads_per_task == 0 ))
	2280	then
	2281	echo $(hostname) >> hostfile
	2282	fi
	2283
	2284	else
	2285	cp $hostfile hostfile
	2286	fi
	2287	eval line=\"`head -n $ii hostfile`\"
	2288	printf "\n *** running on: $line"
	2289	fi
	2290
	2291
	2292
	2293	# SET THE NUMBER OF OPENMP-THREADS
	2294	if [[ $use_openmp = true ]]
	2295	then
	2296	export OMP_NUM_THREADS=$threads_per_task
	2297	printf "\n *** number of OpenMP threads per MPI-task: $OMP_NUM_THREADS"
	2298	else
	2299	export OMP_NUM_THREADS=1
	2300	fi
	2301
	2302
[2610]	2303	# PROVIDE DATA FOR ATMOSPHERE OCEAN COUPLING
[2380]	2304	if [[ $run_coupled_model = false ]]
	2305	then
	2306	if [[ "$ocean_file_appendix" = true ]]
	2307	then
	2308	echo "precursor_ocean" > coupling_steering
	2309	else
	2310	echo "precursor_atmos" > coupling_steering
	2311	fi
	2312	else
	2313	(( iia = $cores_atmos / $threads_per_task ))
	2314	(( iio = $cores_ocean / $threads_per_task ))
	2315	printf "\n coupled run ($iia atmosphere, $iio ocean)"
	2316	printf "\n\n"
	2317	echo "coupled_run $iia $iio" > coupling_steering
	2318	fi
	2319
	2320	printf "\n *** execute command:"
	2321	printf "\n \"$execute_command\" \n\n"
	2322
	2323
[3393]	2324	if [[ $progress_bar_disabled = true ]]
[2380]	2325	then
[3402]	2326	$execute_command < coupling_steering &> >(grep -v --line-buffered -e '^STOP 1$' -e '^1$' &> >(tee STDOUT) )
[3393]	2327	exit_code=${PIPESTATUS[0]}
	2328	else
	2329	$execute_command < coupling_steering &> >(tee STDOUT)
	2330	exit_code=${PIPESTATUS[0]}
	2331	fi
[2380]	2332
[3393]	2333	if [[ ${exit_code} != 0 ]]
	2334	then
	2335
[2380]	2336	# ABORT IN CASE OF RUNTIME ERRORS
	2337	printf "\n +++ runtime error occured"
	2338	locat=execution
	2339	exit
	2340
	2341	else
	2342
	2343	printf "\n$dashes\n *** execution finished \n"
	2344
	2345	fi
	2346
	2347
	2348	# CALL OF combine_plot_fields IN ORDER TO MERGE SINGLE FILES WRITTEN
	2349	# BY EACH CORE INTO ONE FILE
	2350	if [[ ! -f combine_plot_fields.x ]]
	2351	then
	2352
	2353	printf "\n\n\n +++ WARNING: no combine_plot_fields found"
	2354	printf "\n 2d- and/or 3d-data may be incomplete!"
	2355	printf "\n Your previous palmbuild may have failed. Please check.\n"
	2356
	2357	elif [[ "$combine_plot_fields" == true ]]
	2358	then
	2359
	2360	printf "\n\n\n *** post-processing: now executing \"$execute_command_for_combine\" ..."
	2361	$execute_command_for_combine
	2362
	2363	else
	2364
	2365	# TEMPORARY SOLUTION TO SKIP combine_plot_fields. THIS IS REQUIRED IN CASE OF HUGE AMOUNT OF
[2605]	2366	# DATA OUTPUT
[2380]	2367	printf "\n\n\n *** post-processing: skipping combine_plot_fields (-Z option set) ..."
	2368	fi
	2369
	2370
	2371
	2372	# EXECUTE OUTPUT-COMMANDS GIVEN IN THE CONFIGURATION FILE
	2373	(( i = 0 ))
	2374	while (( i < ioc ))
	2375	do
	2376	(( i = i + 1 ))
	2377	if (( i == 1 ))
	2378	then
	2379	printf "\n\n *** execution of OUTPUT-commands:\n$dashes"
	2380	fi
[2799]	2381
	2382	# REPLACE PARAMETERS IN THE OUTPUT COMMAND WITH REAL VALUES
	2383	out_command[$i]=`echo "${out_command[$i]}" \| sed 's/{{/$/g' \| sed 's/}}//g'`
	2384
[2380]	2385	printf "\n >>> ${out_command[$i]}"
	2386	eval ${out_command[$i]}
	2387	if (( i == ioc ))
	2388	then
	2389	printf "\n$dashes\n"
	2390	fi
	2391	done
	2392
	2393
[2610]	2394	# IN A FIRST PASS, ADD ADDITIONAL OUTPUT FILE CONNECTIONS IN CASE OF
	2395	# WILDCARDS
[2380]	2396	(( i = 0 ))
[2610]	2397	(( nr_of_output_files = 0 ))
	2398
[2380]	2399	while (( i < iout ))
	2400	do
[2610]	2401
[2380]	2402	(( i = i + 1 ))
[2610]	2403
	2404	# FIRST CHECK FOR MULTIPLE NAMES WITH THE SAME LOCAL NAME AND
	2405	# CREATE A LIST FOR THE DETECTED ENDINGS
	2406	if [[ "${multout[$i]}" = true ]]
	2407	then
	2408	# DETERMINE THE EXISTING EXTENSIONS FROM THE LIST OF FILES
	2409	ls -1 -d ${localout_pre[$i]} > filelist 2>/dev/null
	2410	ls -1 -d ${localout_pre[$i]}_* >> filelist 2>/dev/null
	2411
	2412	endings="DEFAULT"
	2413	while read line
	2414	do
	2415	# remove the local name from the beginning
	2416	localnamestring="${localout_pre[$i]}"
	2417	length_localname=${#localnamestring}
	2418	ending=${line:${length_localname}}
	2419
	2420	if [[ "$ending" != "" ]]
	2421	then
	2422	endings="$endings $ending"
	2423	fi
	2424
	2425	done <filelist
	2426
	2427	rm filelist
	2428
	2429	else
	2430
	2431	# SINGLE NAME
	2432	endings=DEFAULT
	2433
	2434	fi
	2435
	2436	# FOR EACH BASENAME ENDING CREATE AN ENTRY IN THE FINAL OUTPUT FILE LIST
	2437	for ending in $endings
	2438	do
	2439
	2440	# DEFAULT MEANS THAT THE ENDING GIVEN IN .iofiles SHALL BE USED
	2441	if [[ $ending = DEFAULT ]]
	2442	then
	2443	ending=""
	2444	fi
	2445
	2446	# NEW ENTRY (ENDING IS ALSO ADDED TO LOCAL FILENAME READ BY PALM!)
	2447	(( nr_of_output_files = nr_of_output_files + 1 ))
	2448	localout[$nr_of_output_files]="${localout_pre[$i]}"$ending
	2449	transout[$nr_of_output_files]="${transout_pre[$i]}"
	2450	actionout[$nr_of_output_files]="${actionout_pre[$i]}"
	2451	pathout[$nr_of_output_files]="${pathout_pre[$i]}"
	2452	endout[$nr_of_output_files]="${endout_pre[$i]}"$ending
	2453	extout[$nr_of_output_files]="${extout_pre[$i]}"
[2669]	2454	warnout[$nr_of_output_files]="${warnout_pre[$i]}"
[2610]	2455
	2456	done
	2457
	2458	done
	2459
	2460
	2461
	2462
	2463	# COPY LOCAL OUTPUT-FILES TO THEIR PERMANENT DESTINATIONS
	2464	(( i = 0 ))
	2465	while (( i < nr_of_output_files ))
	2466	do
	2467	(( i = i + 1 ))
[2380]	2468	if (( i == 1 ))
	2469	then
[3860]	2470	timestring=`date +%H:%M:%S`
	2471	printf "\n\n *** saving OUTPUT-files: local time: $timestring"
[2380]	2472
	2473	# GET RUN NUMBER ASSIGNED BY PALM
	2474	if [[ -f RUN_NUMBER ]]
	2475	then
	2476	read run_number < RUN_NUMBER
	2477	printf "\n *** PALM generated run_number = "$run_number" will be used as unified cycle number for all output files"
	2478	usecycle_option="-U $run_number"
	2479	else
	2480	run_number=0
	2481	usecycle_option=""
	2482	fi
	2483	if [[ $running_on_remote = true && "$remote_loginnode" != "" ]]
	2484	then
[2404]	2485	printf "\n *** in case of SCP transfers to local host"
	2486	printf "\n they will be done via remote login-node \"$remote_loginnode\" "
[2380]	2487	fi
	2488	printf "\n$dashes"
	2489	fi
	2490
	2491	if [[ ! ( $running_on_remote = true && ( "${actionout[$i]}" = tr \|\| "${actionout[$i]}" = tra \|\| "${actionout[$i]}" = trpe ) ) ]]
	2492	then
	2493
[3236]	2494	eval filename=${pathout[$i]}/${run_identifier}${endout[$i]}
[2610]	2495
	2496	# DETERMINE THE CYCLE NUMBER
	2497	ls -1 -d $filename > filelist 2>/dev/null
	2498	ls -1 -d $filename.* >> filelist 2>/dev/null
[4443]	2499	(( maxcycle = 0 ))
[2610]	2500	while read line
	2501	do
	2502
	2503	# filename without path (i.e. after the last "/")
	2504	basefilename=$(basename ${line})
	2505
	2506	# check if there is an extension
	2507	extension=${basefilename##*.}
	2508	if [[ "$extension" = "${extout[$i]}" ]]
	2509	then
	2510	basefilename=${basefilename%.*}
	2511	fi
	2512
	2513	# check for an existing cycle number
	2514	cycle=${basefilename##*.}
	2515	if [[ $cycle =~ ^-?[0-9]+$ ]]
	2516	then
[2669]	2517	# NUMBERS WITH LEADING ZEROS ARE INTERPRETED AS OCTAL NUMBERS
	2518	# 10# EXPLICITLY SPECIFIES THE NUMBER BASE AS 10
	2519	(( icycle = $((10#$cycle)) + 1 ))
[2610]	2520	else
	2521	(( icycle = 1 ))
	2522	fi
	2523
	2524	if (( icycle > maxcycle ))
	2525	then
	2526	(( maxcycle = icycle ))
	2527	fi
	2528
	2529	done <filelist
	2530	rm filelist
	2531
	2532
	2533	# SET THE CYCLE NUMBER
	2534	# IN CASE OF FILE-APPEND, IT MUST BE THE HIGHEST EXISTING CYCLE NUMBER
	2535	if [[ "${actionout[$i]}" = a ]]
	2536	then
[4443]	2537	if (( maxcycle > 0 ))
	2538	then
	2539	(( maxcycle = maxcycle - 1 ))
	2540	fi
[2610]	2541	fi
	2542
	2543	(( cycnum[$i] = maxcycle ))
	2544	pathout[$i]=$filename
	2545
	2546
	2547	# ADD CYCLE NUMBER TO FILENAME
	2548	# IN APPEND MODE, FILES KEEP THEIR CURRENT CYCLE NUMBER
[2380]	2549	if [[ "${actionout[$i]}" != "a" ]]
	2550	then
	2551	# SET RUN NUMBER AS CYCLE NUMBER, IF THERE IS NOT A CONFLICT
	2552	# WITH AN EXISTING CYCLE NUMBER
	2553	if (( run_number >= cycnum[$i] ))
	2554	then
	2555	(( cycnum[$i] = run_number ))
	2556	else
	2557	if (( run_number > 0 ))
	2558	then
	2559	printf "\n --- INFORMATIVE: The following file cannot get a unified cycle number"
	2560	fi
	2561	fi
	2562	fi
[4443]	2563	cyclestring=`printf "%03d" ${cycnum[$i]}`
	2564	pathout[$i]=${pathout[$i]}.$cyclestring
	2565	fi
[2380]	2566
	2567	# CHECK FOR SINGLE FILE (SERIAL RUN) OR DIRECTORY (ONE FILE PER CORE FOR PARELLEL EXECUTION)
	2568	files_for_cores=false; filetype=file
	2569	link_local_output=false
	2570	if [[ "${actionout[$i]}" = pe && -n $cores ]]
	2571	then
	2572	files_for_cores=true; filetype=directory
	2573	actionout[$i]=""
	2574	elif [[ "${actionout[$i]}" = pe && ! -n $cores ]]
	2575	then
	2576	actionout[$i]=""
	2577	elif [[ "${actionout[$i]}" = lnpe && -n $cores ]]
	2578	then
	2579	files_for_cores=true; filetype=directory
	2580	link_local_output=true
	2581	actionout[$i]=""
[4536]	2582	# FILE HAS BEEN FOUND INSTEAD OF DIRECTORY
	2583	if [[ -f ${localout[$i]} ]]
	2584	then
	2585	files_for_cores=false; filetype=file
	2586	fi
[2380]	2587	elif [[ "${actionout[$i]}" = lnpe && ! -n $cores ]]
	2588	then
[4536]	2589	link_local_output=true
[2380]	2590	actionout[$i]=""
	2591	elif [[ "${actionout[$i]}" = trpe && -n $cores ]]
	2592	then
	2593	files_for_cores=true; filetype=directory
	2594	actionout[$i]="tr"
	2595	elif [[ "${actionout[$i]}" = trpe && ! -n $cores ]]
	2596	then
	2597	actionout[$i]="tr"
	2598	fi
	2599
	2600	if [[ ! -f ${localout[$i]} && $files_for_cores = false ]]
	2601	then
[2669]	2602	if [[ ${warnout[$i]} = true ]]
	2603	then
	2604	printf "\n +++ temporary OUTPUT-file ${localout[$i]} does not exist\n"
	2605	fi
[2380]	2606	elif [[ ! -d ${localout[$i]} && $files_for_cores = true ]]
	2607	then
[2669]	2608	if [[ ${warnout[$i]} = true ]]
	2609	then
	2610	printf "\n +++ temporary OUTPUT-file ${localout[$i]}/.... does not exist\n"
	2611	fi
[2380]	2612	else
	2613
	2614
	2615	# COPY VIA SCP TO LOCAL HOST (ALWAYS IN BINARY MODE USING batch_scp option -m)
	2616	# IF TARGET DIRECTORY DOES NOT EXISTS, TRY TO CREATE IT
	2617	if [[ "${actionout[$i]}" = tr \|\| "${actionout[$i]}" = tra ]]
	2618	then
	2619	if [[ $running_on_remote = true ]]
	2620	then
	2621
	2622	# SET OPTIONS FOR TRANSFER
	2623	if [[ "${actionout[$i]}" = tr ]]
	2624	then
	2625	if [[ $files_for_cores = false ]]
	2626	then
	2627	catalog_option=""
	2628	catalog_string=""
	2629	else
	2630	catalog_option="-c"
	2631	catalog_string="/"
	2632	fi
	2633	append_option=""
	2634	append_string=""
	2635	else
	2636	append_option="-A"
	2637	append_string="append"
	2638	fi
	2639
	2640	transfer_failed=false
	2641	printf "\n >>> OUTPUT: ${localout[$i]}$catalog_string $append_string by SCP to"
[3236]	2642	printf "\n ${pathout[$i]}/${configuration_identifier}_${run_identifier}${endout[$i]}$catalog_string\n"
[2380]	2643
	2644	# TRANSFER VIA SCP
	2645	if [[ "$remote_loginnode" != "" ]]
	2646	then
[3534]	2647	ssh -q $remote_username@$remote_loginnode "cd $tempdir; ${fast_io_catalog}/${sources_for_run_catalog}/batch_scp $PORTOPT $catalog_option $append_option -b -m $usecycle_option -u $local_username $return_address ${localout[$i]} \"${pathout[$i]}\" ${configuration_identifier}_${run_identifier}${endout[$i]} ${extout[$i]}"
[2380]	2648	else
[3236]	2649	batch_scp $PORTOPT $catalog_option $append_option -b -m $usecycle_option -u $local_username $return_address ${localout[$i]} "${pathout[$i]}" ${configuration_identifier}_${run_identifier}${endout[$i]} ${extout[$i]}
[2380]	2650	fi
[3312]	2651	[[ ${PIPESTATUS[0]} != 0 ]] && transfer_failed=true
[2380]	2652
	2653
	2654	# IF TRANSFER FAILED, CREATE BACKUP COPY ON THIS MACHINE
	2655	if [[ $transfer_failed = true ]]
	2656	then
	2657	printf " +++ transfer failed. Trying to save a copy on this host under:\n"
[3236]	2658	printf " ${pathout[$i]}/${configuration_identifier}_${run_identifier}${endout[$i]}_$run_id_number\n"
[2380]	2659
	2660	# FIRST CHECK, IF DIRECTORY EXISTS, AND CREATE IT, IF NECESSARY
	2661	eval local_catalog=${pathout[$i]}
	2662	if [[ ! -d $local_catalog ]]
	2663	then
	2664	printf " *** local directory does not exist. Trying to create:\n"
	2665	printf " $local_catalog \n"
	2666	mkdir -p $local_catalog
	2667	fi
[3236]	2668	eval cp ${localout[$i]} ${pathout[$i]}/${configuration_identifier}_${run_identifier}${endout[$i]}_$run_id_number
[2380]	2669	transfer_problems=true
	2670	fi
	2671
	2672	else
	2673
	2674	# UNSET actionout. DUE TO THIS SETTING, FILE WILL LATER JUST
	2675	# BE COPIED OR APPENDED ON THIS MACHINE
	2676	if [[ "${actionout[$i]}" = tr ]]
	2677	then
	2678	actionout[$i]=""
	2679	else
	2680	actionout[$i]="a"
	2681	fi
	2682	fi
	2683	fi
	2684
	2685
	2686	# APPEND ON THIS MACHINE
	2687	if [[ "${actionout[$i]}" = "a" ]]
	2688	then
	2689	if [[ "${extout[$i]}" != " " && "${extout[$i]}" != "" ]]
	2690	then
	2691	printf "\n >>> OUTPUT: ${localout[$i]} append to"
	2692	printf "\n ${pathout[$i]}.${extout[$i]}\n"
	2693	cat ${localout[$i]} >> ${pathout[$i]}.${extout[$i]}
	2694	else
	2695	printf "\n >>> OUTPUT: ${localout[$i]} append to"
	2696	printf "\n ${pathout[$i]}\n"
	2697	cat ${localout[$i]} >> ${pathout[$i]}
	2698	fi
	2699	fi
	2700
	2701	# COPY ON THIS MACHINE
	2702	# COPY HAS TO BE USED, BECAUSE MOVE DOES NOT WORK IF FILE-ORIGIN AND TARGET ARE
	2703	# ON DIFFERENT FILE-SYSTEMS
	2704	if [[ "${actionout[$i]}" = "" && $files_for_cores = false ]]
	2705	then
	2706
	2707	# COPY IN CASE OF RUNS ON SINGLE CORES
	2708	if [[ "${extout[$i]}" != " " && "${extout[$i]}" != "" ]]
	2709	then
	2710	printf "\n >>> OUTPUT: ${localout[$i]} to"
	2711	printf "\n ${pathout[$i]}.${extout[$i]}\n"
[4536]	2712	if [[ $link_local_output = true ]]
[2380]	2713	then
[4536]	2714	printf " file will be linked\n"
	2715	ln -f ${localout[$i]} ${pathout[$i]}.${extout[$i]}
	2716	fi
	2717	# If "ln -f" fails of if "$link_local_output = false" do a normal "cp"
	2718	if [[ ! -f "${pathout[$i]}.${extout[$i]}" ]]
	2719	then
	2720	if [[ $link_local_output = true ]]
	2721	then
[2380]	2722	printf " --- WARNING: ln failed, using cp instead (might be time consuming...)\n"
[4536]	2723	fi
	2724	cp ${localout[$i]} ${pathout[$i]}.${extout[$i]}
[2380]	2725	fi
	2726	else
	2727	printf "\n >>> OUTPUT: ${localout[$i]} to"
	2728	printf "\n ${pathout[$i]}\n"
[4536]	2729	if [[ $link_local_output = true ]]
[2380]	2730	then
[4536]	2731	printf " file will be linked\n"
	2732	ln -f ${localout[$i]} ${pathout[$i]}
	2733	fi
	2734	# If "ln -f" fails of if "$link_local_output = false" do a normal "cp"
	2735	if [[ ! -f "${pathout[$i]}" ]]
	2736	then
	2737	if [[ $link_local_output = true ]]
	2738	then
[2380]	2739	printf " --- WARNING: ln failed, using cp instead (might be time consuming...)\n"
[4536]	2740	fi
	2741	cp ${localout[$i]} ${pathout[$i]}
[2380]	2742	fi
	2743	fi
	2744
	2745	elif [[ "${actionout[$i]}" = "" && $files_for_cores = true ]]
	2746	then
	2747
	2748	# FILES FROM THE DIFFERENT CORES ARE MOVED WITH ln-COMMAND TO THE PERMANENT DIRECTORY
	2749	# AS A FIRST STEP, THE PERMANENT DIRECTORY IS CREATED
	2750	printf "\n >>> OUTPUT: ${localout[$i]}/_.... to"
	2751	printf "\n ${pathout[$i]}\n"
[4536]	2752	if [[ $link_local_output = true ]]
	2753	then
	2754	printf " files will be linked\n"
	2755	mkdir -p ${pathout[$i]}
	2756	cd ${localout[$i]}
	2757	for file in $(ls *)
	2758	do
	2759	ln -f $file ${pathout[$i]}
	2760	done >\|/dev/null 2>&1
	2761	cd $tempdir
	2762	fi
[2380]	2763
	2764	# IF "ln -f" HAS FAILED OR IF "$link_local_output = false" DO A NORMAL COPY "cp -r"
[4536]	2765	if [[ ! -f "${pathout[$i]}/_000000" ]]
[2380]	2766	then
[4536]	2767	if [[ $link_local_output = true ]]
	2768	then
[2380]	2769	printf " --- WARNING: ln failed, using cp instead (might be time consuming...)\n"
[4536]	2770	fi
	2771	[[ ! -d "${pathout[$i]}" ]] && mkdir ${pathout[$i]}
	2772	cp -r ${localout[$i]}/* ${pathout[$i]}
[2380]	2773	fi
	2774
	2775	fi
	2776	fi
	2777	done
	2778
	2779	if (( i != 0 ))
	2780	then
[3860]	2781	timestring=`date +%H:%M:%S`
[2380]	2782	if [[ $transfer_problems = true ]]
	2783	then
[3860]	2784	printf "\n$dashes\n *** OUTPUT-files saved local time: $timestring"
[2380]	2785	printf "\n +++ WARNING: some data transfers failed! \n"
	2786	else
[3860]	2787	printf "\n$dashes\n *** all OUTPUT-files saved local time: $timestring \n"
[2380]	2788	fi
	2789	fi
	2790
	2791
	2792	# IF REQUIRED, START A RESTART-JOB
	2793	# FILE CONTINUE_RUN MUST HAVE BEEN CREATED BY THE EXECUTABLE (PALM)
	2794	if [[ -f CONTINUE_RUN ]]
	2795	then
	2796
	2797	# ADD RESTART-OPTIONS TO THE PALMRUN-CALL (IF THEY ARE NOT USED ALREADY):
	2798	# -C TELLS PALMRUN THAT IT IS A RESTART-RUN
	2799	# -v SILENT MODE WITHOUT INTERACTIVE QUERIES
	2800	# -b START A BATCH JOB
	2801	[[ $(echo $prc \| grep -c "\-C") = 0 ]] && prc="$prc -C"
	2802	[[ $(echo $prc \| grep -c "\-v") = 0 ]] && prc="$prc -v"
[3982]	2803	[[ $(echo $prc \| grep -c "\-b") = 0 && $running_on_remote = false ]] && prc="$prc -b"
[2380]	2804
[2957]	2805	# REPLACE SVFOUT IN THE ACTIVATION STRINGS (GIVEN WITH OPTION -a)
	2806	# SO THAT RESTARTS USE SVF DATA CREATED BY THE INITIAL RUN
	2807	if [[ $(echo $prc \| grep -c "svfout") != 0 ]]
	2808	then
	2809	prc=`echo $prc \| sed 's/svfout/svfin/g'`
	2810	fi
[2380]	2811
	2812	# REPLACE THE HASH IN THE ACTIVATION STRINGS (GIVEN WITH OPTION -a)
	2813	# SO THAT RESTARTS ACCESS DIFFERENT FILES THAN THE INITIAL RUN
	2814	if [[ $(echo $prc \| grep -c "#") != 0 ]]
	2815	then
[2381]	2816	prc=`echo $prc \| sed 's/#/r/g'`
[2380]	2817	fi
	2818
	2819
	2820	# START THE RESTART-JOB
	2821	printf "\n\n *** initiating restart-run on \"$local_ip\" using command:\n"
	2822	echo " $prc"
	2823	printf "\n$dashes\n"
	2824	if [[ $running_on_remote = true ]]
	2825	then
	2826
	2827	echo "*** ssh will be used to initiate restart-runs!"
	2828	echo " return_address=\"$return_address\" "
	2829	echo " return_username=\"$local_username\" "
	2830
	2831	if [[ "$remote_loginnode" != "" ]]
	2832	then
[3534]	2833	ssh -q $remote_username@$remote_loginnode "ssh -q $SSH_PORTOPT $local_username@$return_address \" PATH=\\\$PATH:$LOCAL_PALMRUN_PATH; cd $LOCAL_PWD; $prc\" " \| tee palmrun_restart.log
[2380]	2834	else
[3534]	2835	ssh -q $SSH_PORTOPT $local_username@$return_address " PATH=\\\$PATH:$LOCAL_PALMRUN_PATH; cd $LOCAL_PWD; $prc" \| tee palmrun_restart.log
[2380]	2836	fi
	2837
	2838	# WAIT TO ALLOW THE RESTART-JOB TO BE QUEUED, BEFORE THE CURRENT JOB IS FINISHED
	2839	sleep 30
	2840
	2841	else
	2842
	2843	# START THE RESTART JOB ON THE LOCAL HOST
[3132]	2844	eval $prc \| tee palmrun_restart.log # THE ' MUST BE EVALUATED
[2380]	2845
	2846	fi
	2847
[3132]	2848	# CHECK, IF RESTART JOB HAS BEEN STARTED
[3725]	2849	if [[ $( grep -c "+++ palmrun crashed" palmrun_restart.log ) != 0 ]]
[3132]	2850	then
	2851	printf "\n$dashes\n +++ creating restart run failed \n"
	2852	locat=create_restart
[3455]	2853	rm palmrun_restart.log
[3132]	2854	exit
[3725]	2855	elif [[ $( grep -c "*** palmrun finished" palmrun_restart.log ) != 1 ]]
	2856	then
	2857	printf "\n$dashes\n +++ creating restart run failed, probably due to network problems\n"
	2858	locat=create_restart
	2859	rm palmrun_restart.log
	2860	exit
[3132]	2861	else
	2862	printf "\n$dashes\n *** restart run initiated \n"
	2863	rm palmrun_restart.log
	2864	fi
[2380]	2865
[3132]	2866
[2380]	2867	# DELETE INPUT-(RESTART)FILES, WHICH HAVE BEEN FETCHED FROM THE TEMPORARY DATA
	2868	# DIRECTORY, BACAUSE THEY ARE NOT REQUIRED BY THE RESTART-JOB.
	2869	# THIS IS DONE IN ORDER TO AVOID EXCEEDING DISC QUOTAS OR DISC SPACE (RESTART-FILES
	2870	# MAY BE VERY HUGE)
	2871	(( i = 0 ))
[2610]	2872	while (( i < nr_of_input_files ))
[2380]	2873	do
	2874	(( i = i + 1 ))
	2875	if [[ "${got_tmp[$i]}" = true && $keep_data_from_previous_run = false ]]
	2876	then
	2877	rm -r ${absnamein[$i]}
	2878	fi
	2879	done
	2880
	2881	fi
	2882
	2883
	2884	# ALL ACTIONS FINISHED, TEMPORARY WORKING-DIRECTORY CAN BE DELETED
	2885	cd $HOME
[2566]	2886	[[ $delete_temporary_catalog = true ]] && rm -rf $tempdir
[2380]	2887
	2888
	2889	else
	2890
	2891
	2892	# PREPARING ACTIONS,
	2893	# IF A BATCH-JOB IS TO BE GENERATED AND TO BE STARTED ON A LOCAL OR REMOTE-MACHINE
	2894
	2895	# BUILD THE PALMRUN-COMMAND TO BE CALLED IN THE BATCH-JOB
[3455]	2896	palmrun_com="$palmrun_script_name -r $run_identifier -c $configuration_identifier -m $memory -t $cpumax -q $queue -i $run_id_number -U $local_username"
[2380]	2897	[[ "$activation_string_list" != "" ]] && palmrun_com=${palmrun_com}" -a \"$activation_string_list\""
	2898	[[ "$global_revision" != "" ]] && palmrun_com=${palmrun_com}" -G \"$global_revision\""
	2899	[[ $keep_data_from_previous_run = true ]] && palmrun_com=${palmrun_com}" -k"
	2900	[[ $do_trace = true ]] && palmrun_com=${palmrun_com}" -x"
	2901	[[ "$cores" != "" ]] && palmrun_com=${palmrun_com}" -X $cores"
	2902	[[ $use_openmp = true ]] && palmrun_com=${palmrun_com}" -O $threads_per_task"
[2501]	2903	[[ $tasks_per_node != 0 ]] && palmrun_com=${palmrun_com}" -T $tasks_per_node"
[2380]	2904	[[ $delete_temporary_catalog = false ]] && palmrun_com=${palmrun_com}" -B"
	2905	[[ "$ocean_file_appendix" = true ]] && palmrun_com=${palmrun_com}" -y"
	2906	[[ $run_coupled_model = true ]] && palmrun_com=${palmrun_com}" -Y \"$coupled_dist\""
	2907	[[ "$combine_plot_fields" = false ]] && palmrun_com=${palmrun_com}" -Z"
	2908	[[ "$max_par_io_str" != "" ]] && palmrun_com=${palmrun_com}" -w $max_par_io_str"
[2479]	2909	[[ "$project_account" != "" ]] && palmrun_com=${palmrun_com}" -A $project_account"
[2380]	2910	if [[ $create_remote_batch_job = true ]]
	2911	then
	2912	palmrun_com=${palmrun_com}" -j -u $remote_username -R $local_ip"
[2420]	2913	if [[ $do_trace = true ]]
	2914	then
	2915	printf "\n *** PALMRUN-command on remote host:\n $palmrun_com \n"
	2916	fi
[2380]	2917	elif [[ $create_batch_job = true ]]
	2918	then
	2919	palmrun_com=${palmrun_com}" -j"
[2420]	2920	if [[ $do_trace = true ]]
	2921	then
	2922	printf "\n *** PALMRUN-command on local host:\n $palmrun_com \n"
	2923	fi
[2380]	2924	fi
	2925
	2926
	2927	# DETERMINE THE FULL PATHS FOR THE JOB PROTOCOL FILES ON THE LOCAL AND
	2928	# REMOTE HOST
[3236]	2929	job_protocol_file_local=${local_jobcatalog}/${configuration_identifier}_${run_id}
[2380]	2930	job_protocol_file=$job_protocol_file_local
	2931	if [[ $create_remote_batch_job = true ]]
	2932	then
[3236]	2933	job_protocol_file_remote=${remote_jobcatalog}/${configuration_identifier}_${run_id}
[2380]	2934	job_protocol_file=$job_protocol_file_remote
	2935	job_transfer_protocol_file=${remote_jobcatalog}/last_job_transfer_protocol
[3236]	2936	scpjob_file=${remote_jobcatalog}/scpjob.$run_id_number
[2380]	2937	fi
	2938
	2939
	2940	# BUILD THE JOB-SCRIPTS ON FILE jobfile
[3236]	2941	jobfile=jobfile.$run_id_number
[2380]	2942
	2943
	2944	# FIRST CREATE THE BATCH DIRECTIVES
	2945	(( i = 0 ))
	2946	while (( i < ibd ))
	2947	do
	2948	(( i = i + 1 ))
[2693]	2949	line=`echo "${batch_directive[$i]}" \| sed 's/{{/$/g' \| sed 's/}}//g'`
[2380]	2950	eval line=\"$line\"
	2951	echo "$line" >> $jobfile
	2952	done
	2953	echo " " >> $jobfile
	2954
	2955
	2956	# FOR BATCH JOBS ON REMOTE HOSTS, ADD THE JOBFILE TO SEND BACK THE JOB
	2957	# PROTOCOL
	2958	if [[ $create_remote_batch_job = true ]]
	2959	then
[3236]	2960	echo "set +vx" >> $jobfile
	2961	echo "trap '" >> $jobfile
	2962	echo "set +vx" >> $jobfile
	2963	echo "cd ${remote_jobcatalog}" >> $jobfile
	2964	echo "cat > scpjob.$run_id_number << %%END%%" >> $jobfile
[2380]	2965
	2966	# ADD THE BATCH DIRECTIVES
	2967	(( i = 0 ))
	2968	while (( i < ibdt ))
	2969	do
	2970	(( i = i + 1 ))
[2693]	2971	line=`echo "${batch_directive_transfer[$i]}" \| sed 's/{{/$/g' \| sed 's/}}//g'`
[2380]	2972	eval line=\"$line\"
	2973	echo "$line" >> $jobfile
	2974	done
	2975	echo " " >> $jobfile
	2976
	2977	echo "set -x" >> $jobfile
[3534]	2978	if [[ "$remote_loginnode" != "" ]]
	2979	then
	2980	echo "ssh -q $remote_username@$remote_loginnode \"cd ${remote_jobcatalog}; ${fast_io_catalog}/${sources_for_run_catalog}/batch_scp $PORTOPT -d -w 10 -u $local_username $local_ip $job_protocol_file_remote \\\"$local_jobcatalog\\\" ${configuration_identifier}_${run_identifier}\" " >> $jobfile
	2981	else
	2982	echo "${fast_io_catalog}/${sources_for_run_catalog}/batch_scp $PORTOPT -d -w 10 -u $local_username $local_ip $job_protocol_file_remote \"$local_jobcatalog\" ${configuration_identifier}_${run_identifier}" >> $jobfile
	2983	fi
[2380]	2984	echo "%%END%%" >> $jobfile
	2985	echo "echo \" *** submitting job for transfering the job protocol file to $local_ip\" " >> $jobfile
[3534]	2986	echo "$submit_command $scpjob_file" >> $jobfile
[2380]	2987	echo "rm $scpjob_file" >> $jobfile
[2404]	2988	echo "rm -rf $job_transfer_protocol_file" >> $jobfile
[2380]	2989	echo "set -x" >> $jobfile
	2990	echo " ' exit" >> $jobfile
	2991	fi
	2992
	2993
	2994	# ACTIVATE ERROR-TRACEBACK
	2995	if [[ $do_trace = true ]]
	2996	then
	2997	echo "set -x" >> $jobfile
	2998	else
	2999	echo "set +vx" >> $jobfile
	3000	fi
	3001
	3002
	3003	# INITIALIZE THE ENVIRONMENT AND LOAD MODULES
	3004	if [[ "$login_init_cmd" != "" ]]
	3005	then
	3006	echo "$login_init_cmd" >> $jobfile
	3007	fi
	3008	if [[ "$module_commands" != "" ]]
	3009	then
	3010	echo "$module_commands" >> $jobfile
	3011	fi
	3012
	3013
	3014	# CREATE TEMPORARY DIRECTORY AND SWITCH TO IT
[2566]	3015	if [[ $create_remote_batch_job = true ]]
	3016	then
	3017	echo "mkdir $tempdir" >> $jobfile
[4303]	3018	echo "if [[ \$? != 0 ]]" >> $jobfile
	3019	echo "then" >> $jobfile
	3020	echo " echo \"+++ temporary working directory cannot be created.\" " >> $jobfile
	3021	echo " echo \" Check setting of variable fast_io_catalog in your config file.\" " >> $jobfile
	3022	echo " exit" >> $jobfile
	3023	echo "fi" >> $jobfile
[2566]	3024	echo "chmod go+rx $tempdir" >> $jobfile
	3025	else
	3026	# DIRECTORY FOR LOCAL BATCH JOBS IS CREATED NOW, DUE TO A
	3027	# REQUIREMENT OF THE GRID ENGINE BATCH SYSTEM (WORKING DIR IS GIVEN IN
	3028	# BATCH DIRECTIVE -wd AND MUST ALREADY EXIST WHEN THE JOB IS SUBMITTED)
	3029	mkdir $tempdir
[4303]	3030	if [[ $? != 0 ]]
	3031	then
	3032	printf "\n +++ temporary working directory cannot be created."
	3033	printf "\n Check setting of variable fast_io_catalog in your config file."
	3034	locat=execution
	3035	exit
	3036	fi
[2566]	3037	chmod go+rx $tempdir
	3038	fi
	3039	echo "cd $tempdir" >> $jobfile
	3040	echo "export tempdir=$tempdir" >> $jobfile
[3917]	3041	echo "cp ${fast_io_catalog}/${sources_for_run_catalog}/.[!.]* ." >> $jobfile
	3042	echo "export PATH=.:${fast_io_catalog}/${sources_for_run_catalog}:\$PATH" >> $jobfile
[2380]	3043	echo "export execute_palmrun=true" >> $jobfile
	3044
	3045
	3046	# PROVIDE NAME OF THE CURRENT WORKING-DIRECTORY ON THE LOCAL MACHINE (FROM WHERE THE JOB IS
	3047	# STARTED) BY SETTING AN ENVIRONMENT-VARIABLE. THIS INFORMATION IS USED IN THE JOB BY PALMRUN
	3048	# IN CASE THAT RESTART-RUNS HAVE TO BE GENERATED
	3049	echo "LOCAL_PWD=$working_directory" >> $jobfile
	3050	echo "export LOCAL_PWD" >> $jobfile
	3051
	3052
	3053	# PROVIDE THE PATH OF THE LOCAL PALMRUN-SCRIPT FOR THE SAME REASON
[2420]	3054	echo "LOCAL_PALMRUN_PATH=${source_path}/../SCRIPTS" >> $jobfile
[2380]	3055	echo "export LOCAL_PALMRUN_PATH" >> $jobfile
	3056
	3057
	3058	# CALL PALMRUN WITHIN THE JOB
	3059	# AS FINAL ACTION, REMOVE THE TEMPORARY DIRECTORY CREATED AT THE BEGINNING OF THE JOB
	3060	echo "set -x" >> $jobfile
	3061	echo "[[ \$execute_palmrun = true ]] && $palmrun_com" >> $jobfile
	3062
	3063
	3064	# TRANSFER JOBFILE TO THE TARGET HOST
	3065	if [[ $create_jobfile_only = false ]]
	3066	then
	3067
[3505]	3068	# CREATE LOCAL JOB FOLDER
	3069	eval local_jobcatalog=$local_jobcatalog
	3070	if [[ ! -d $local_jobcatalog ]]
	3071	then
	3072	echo " "
	3073	echo " *** local jobcatalog \"$local_jobcatalog\" does not exist and will be created now"
	3074	mkdir $local_jobcatalog
	3075	fi
	3076
[2380]	3077	if [[ $create_remote_batch_job = true ]]
	3078	then
	3079
[2420]	3080	echo " "
[2566]	3081	echo " *** transfer of job to remote host via scp"
[3505]	3082
	3083	# CREATE REMOTE JOB FOLDER, IF IT DOES NOT EXIST
[3534]	3084	ssh -q $ssh_key $SSH_PORTOPT ${remote_username}@${remote_ip} "[[ ! -d $remote_jobcatalog ]] && mkdir $remote_jobcatalog" 2>&1
[3505]	3085
	3086	# COPY THE JOB FILE
[2420]	3087	if [[ $do_trace = true ]]
	3088	then
[3236]	3089	echo " scp $ssh_key $PORTOPT $jobfile ${remote_username}@${remote_ip}:${remote_jobcatalog}/${configuration_identifier}_${run_id}"
[2420]	3090	fi
[3236]	3091	scp $ssh_key $PORTOPT $jobfile ${remote_username}@${remote_ip}:${remote_jobcatalog}/${configuration_identifier}_${run_id} > /dev/null
[2380]	3092
[3505]	3093	# SUBMIT THE JOB
[3574]	3094	printf " *** submit the job (output of submit command, \n"
[3573]	3095	printf " e.g. the job-id given by the batch-system, may follow) \n"
[2420]	3096	if [[ $do_trace = true ]]
	3097	then
[3665]	3098	echo " ssh -q $ssh_key $SSH_PORTOPT ${remote_username}@${remote_ip} \"cd $remote_jobcatalog; $submit_command ${configuration_identifier}_${run_id}; rm ${configuration_identifier}_${run_id}\" "
[2420]	3099	fi
[3665]	3100	ssh -q $ssh_key $SSH_PORTOPT ${remote_username}@${remote_ip} "cd $remote_jobcatalog; $submit_command ${configuration_identifier}_${run_id}; rm ${configuration_identifier}_${run_id}"
[2380]	3101
	3102	elif [[ $create_batch_job = true ]]
	3103	then
	3104
[2385]	3105	eval local_jobcatalog=$local_jobcatalog
[3236]	3106	cp $jobfile ${local_jobcatalog}/${configuration_identifier}_${run_id}
[2385]	3107	cd $local_jobcatalog
[2380]	3108	echo " "
[2420]	3109	echo " *** submit the job"
	3110	if [[ $do_trace = true ]]
	3111	then
[3236]	3112	echo "$submit_command ${configuration_identifier}_${run_id}"
[2420]	3113	fi
[3236]	3114	$submit_command ${configuration_identifier}_${run_id}
	3115	rm ${configuration_identifier}_${run_id}
[2380]	3116	cd - > /dev/null
	3117
	3118	fi
	3119
	3120	rm -rf $jobfile
	3121
	3122	else
	3123
	3124	printf "\n *** jobfile created under name \"$jobfile\" "
	3125	printf "\n no batch-job has been sent!"
	3126
	3127	fi
	3128
	3129	fi # END OF REMOTE-PART

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

| Impressum | ©Leibniz Universität Hannover |