Home

Context Navigation

batch_scp @ 1090

Last change on this file since 1090 was 1090, checked in by raasch, 12 years ago
script adjustments for Kyushu-University computing center (lckyut)
Property svn:keywords set to `Id`
File size: 23.6 KB

Rev	Line
[1]	1	#! /bin/ksh
	2
[1090]	3	# batch_scp - script for automatic file/directory transfer using scp
[1]	4
[1090]	5	#--------------------------------------------------------------------------------#
	6	# This file is part of PALM.
	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	#
	19	# Copyright 1997-2012 Leibniz University Hannover
	20	#--------------------------------------------------------------------------------#
	21	#
	22	# Current revisions:
	23	# ------------------
	24	# code put under GPL (PALM 3.9)
	25	# adjustments for Kyushu-University computing center (lckyut)
	26	# old changelog messages removed
	27	#
	28	# Former revisions:
	29	# -----------------
	30	# $Id: batch_scp 1090 2013-02-02 07:06:13Z raasch $
	31	#
	32	# 08/03/11 - Siggi - adjustments for ibmkisti: this machine allows
	33	# outgoing ssh/scp connections only from the
	34	# interactive nodes (gaiad). All ssh/scp traffic is
	35	# done via this interactive node.
	36	# 04/01/02 - Siggi - first version finished
	37	# 29/11/01 - Siggi - script development started
	38	#
	39	#--------------------------------------------------------------------------------#
	40	# batch_scp - script for automatic file/directory transfers using scp
	41	#
	42	# batch_scp has 4 arguments:
	43	# $1 = IP-addres of remote (target) machine
	44	# $2 = file to be transferred
	45	# $3 = directory of remote machine, where file should be copied to
	46	# $4 = filename that file should be given on remote machine
	47	#
	48	# ATTENTION: problems might occur if directories on remote machine include very
	49	# old files for which "ls -al" does give "year" as modification
	50	# time instead of "hh:mm". In such a case, batch_scp cannot check the
	51	# filename and may not find the file (e.g. if option -g is used).
	52	#--------------------------------------------------------------------------------#
[1]	53
	54
	55
	56	# VARIABLENVEREINBARUNGEN + DEFAULTWERTE
	57	random=$RANDOM
	58
	59	absolut=false
	60	append=false
	61	catalog_copy=false
	62	check=false
	63	delete=false
[1090]	64	errfile=batch_scp.errfile.$random
[1]	65	filelist=filelist.$random
	66	get=false
	67	local_host=`hostname`
[693]	68	local_user=$USER
	69	local_wdir=`pwd`
[1]	70	locat=normal
	71	make_catalog=false
	72	overwrite=false
	73	print_local_filename=false
	74	quote_wait=false
	75	remote_user=""
	76	silent=false
	77	transfermode=binary
	78	zyklusnr=""
	79	typeset -i iii icycle maxcycle=0 wait=0
	80
	81	# FEHLERBEHANDLUNG
	82	# BEI EXIT:
	83	trap 'if [[ $locat != normal ]]
	84	then
[1090]	85	[[ -f "$filelist" ]] && cat $filelist
	86	[[ -f "$errfile" ]] && cat $errfile
[1]	87	rm -rf $filelist $errfile
	88	printf " +++ BATCH_SCP terminated \n"
	89	printf " locat = $locat \n"
	90	printf " arguments = $1 $2 $3 $4 \n\n"
	91	exit 1
	92	fi' exit
	93
	94
	95	# BEI TERMINAL-BREAK:
	96	trap 'rm -rf $filelist $errfile
	97	printf " +++ BATCH_SCP terminated \n\n"
	98	exit 1
	99	' 2
	100
	101
	102	# SHELLSCRIPT-OPTIONEN EINLESEN
	103	while getopts :aAbcCdgmnoqsu:w: option
	104	do
	105	case $option in
	106	(a) absolut=true;;
	107	(A) append=true;;
	108	(b) transfermode=binary;;
	109	(c) catalog_copy=true;;
	110	(C) check=true;;
	111	(d) delete=true;;
	112	(g) get=true;;
	113	(m) make_catalog=true;;
	114	(n) print_local_filename=true;; # Option ist nicht dokumentiert !
	115	(o) overwrite=true;;
	116	(q) quote_wait=true;;
	117	(s) silent=true;;
	118	(u) remote_user=$OPTARG;;
	119	(w) wait=$OPTARG;;
	120	(\?) printf " +++ option $OPTARG unknown \n"
	121	printf " --> call: batch_scp [-aAbcCdgmnoqsuw] <IP-adress> <localfile> <remotepath> <remotefile>\n"
	122	locat=parameter;exit;;
	123	esac
	124	done
	125	shift OPTIND-1
	126
	127
	128
	129	# KURZE AUFRUFBESCHREIBUNG WIRD HIER AUSGEGEBEN
	130	if [ "$1" = "?" ]
	131	then
	132	(printf "\n *** batch_scp can be called as follows:\n"
	133	printf "\n batch_scp -a -b -d -g -o -q -s -u.. -w.. <param1> <param2> <param3> <param4>\n"
	134	printf "\n Description of available options:\n"
	135	printf "\n Option Description Default-Value"
	136	printf "\n -a Filenames are absolute. No cycle- ---"
	137	printf "\n numbers will be determined"
	138	printf "\n -A append to destination file ---"
	139	printf "\n -b use binary-modus for transfer ASCII-modus"
	140	printf "\n -c transfer of directory ---"
	141	printf "\n -C check-Modus, no transfer ---"
	142	printf "\n -d file to be transferred will be ---"
	143	printf "\n deleted after successful transfer"
	144	printf "\n -g change of transfer direction, i.e. ---"
	145	printf "\n file will be transferred from"
	146	printf "\n destination host"
	147	printf "\n -o any existing file will be overwritten ---"
	148	printf "\n -q switch on \"quote wait\" on ---"
	149	printf "\n estination host"
	150	printf "\n -s do not display informative messages ---"
	151	printf "\n -u username on remote machine <username>"
	152	printf "\n -w waiting time in seconds, before trans- 0"
	153	printf "\n fer will be initiated"
	154	printf "\n "
	155	printf "\n The positional parameters <param1> - <param4> must be provided at"
	156	printf "\n any time and have the following meaning:"
	157	printf "\n <param1> - IP-adress of destination host"
	158	printf "\n or \"?\" (creates this outline)"
	159	printf "\n <param2> - abs. or rel. path of file to be transferred"
	160	printf "\n <param3> - directory (abs.!) on destination host. Special cahracters"
	161	printf "\n like \~ are allowed but must be quoted by \"."
	162	printf "\n <param4> - filename (without path!) on destination host; must not"
	163	printf "\n be given, if option -c is used."
	164	printf "\n When using option -g, file will be copied from destination host to file"
	165	printf "\n <param2>. In this case, no overwriting is possible.") \| more
	166	exit
	167	fi
	168
	169
	170	# PRUEFEN, OB ALLE ARGUMENTE VORLIEGEN
	171	if [[ "$1" = "" ]]
	172	then
	173	printf " +++ 1. argument missing \n"
	174	locat=argument; exit
	175	elif [[ "$2" = "" ]]
	176	then
	177	printf " +++ 2. argument missing \n"
	178	locat=argument; exit
	179	elif [[ "$3" = "" ]]
	180	then
	181	printf " +++ 3. argument missing \n"
	182	locat=argument; exit
	183	elif [[ "$4" = "" ]]
	184	then
	185	printf " +++ 4. argument missing \n"
	186	locat=argument; exit
	187	fi
	188
	189
	190	# USER-NAME AUF ZIELRECHNER AUS .NETRC-DATEI ERMITTELN
	191	if [[ -z $remote_user ]]
	192	then
	193
	194	# PRUEFEN, OB NETRC-DATEI VORHANDEN
	195	if [[ ! -f ~/.netrc ]]
	196	then
	197	printf " +++ option -u not given; \n"
	198	printf " getting remote-username from password file failed \n"
	199	printf " because ~/.netrc does not exist \n"
	200	locat=netrc; exit
	201	fi
	202	grep $1 ~/.netrc \| read dum dum dum remote_user dum dum
	203	fi
	204
	205
	206	# APPEND IST NUR BEI TRANSFER EINZELNER DATEIEN OHNE UEBERSCHREIBEN
	207	# ERLAUBT. GET IST DABEI EBENFALLS NICHT ERLAUBT
	208	if [[ $append = true && ( $get = true \|\| $catalog_copy = true \|\| $overwrite = true ) ]]
	209	then
	210	printf " +++ options -g, -c and -o are not allowed, if -A is given \n"
	211	locat=parameter; exit
	212	fi
	213
	214
	215	# DATEINAME IM 4. ARGUMENT DARF NUR BEIM UEBERSCHREIBEN ODER IM ABSOLUT-
	216	# MODUS PUNKTE ENTHALTEN
	217	if [[ $overwrite = false && $absolut = false && $(echo $4 \| grep -c "\.") != 0 ]]
	218	then
	219	printf " +++ 4th argument may only contain dots (".") , if one of the \n"
	220	printf " options -a or -o are given \n"
	221	locat=argument; exit
	222	fi
	223
	224
	225	# QUOTE WAIT FUNKTIONIERT NICHT BEIM KOPIEREN GANZER VERZEICHNISSE
	226	if [[ $quote_wait = true && $catalog_copy = true ]]
	227	then
	228	printf " +++ options -c and -q must not be used simultaneously\n"
	229	locat=parameter; exit
	230	fi
	231
	232
	233	# IM CHECK-MODUS WIRD SCRIPT HIER BEENDET
	234	[[ $check = true ]] && exit
	235
	236
	237	# BESTIMMTE ZEIT WARTEN, BIS WEITERGEMACHT WIRD (NOETIG Z.B. BEI TRANSFER
	238	# VON JOBPROTOKOLLEN AUS JOBS HERAUS)
	239	sleep $wait
	240
	241
	242	# PRUEFEN, OB LOKALE DATEI/LOKALES VERZEICHNIS VORHANDEN BZW. NICHT VORHANDEN
	243	if [[ $get = false ]]
	244	then
	245	if [[ $catalog_copy = false ]]
	246	then
	247	if [[ ! -f $2 ]]
	248	then
	249	printf " +++ file \"$2\" to be transferred does not exist \n"
	250	locat=localfile; exit
	251	fi
	252	else
	253	if [[ ! -d $2 ]]
	254	then
	255	printf " +++ directory \"$2\" to be transferred does not exist\n"
	256	printf " or is not a directory \n"
	257	locat=localfile; exit
	258	fi
	259	fi
	260	else
	261	if [[ $catalog_copy = false ]]
	262	then
	263	if [[ -f $2 ]]
	264	then
	265	if [[ $overwrite = true ]]
	266	then
	267	rm $2
	268	else
	269	printf " +++ local file \"$2\" is already existing \n"
	270	locat=localfile; exit
	271	fi
	272	else
	273
	274	# PRUEFEN, OB SICH LOKALE DATEI ANLEGEN LAESST
	275	local_dirname=`dirname $2`
	276	if [[ ! -d $local_dirname ]]
	277	then
	278	printf " +++ local directory \"$local_dirname\" \n"
	279	printf " does not exist or is not a directory \n"
	280	printf " +++ cannot copy file \"$3/$4\" \n"
	281	printf " from \"$1\" to \"$local_host\" \n"
	282	locat=localfile; exit
	283	fi
	284	fi
	285	else
	286	if [[ -d $2 \|\| -f $2 ]]
	287	then
	288	printf " +++ local directory \"$2\" is already existing, \n"
	289	printf " or a file with the same name exists \n"
	290	locat=localfile; exit
	291	fi
	292	fi
	293	fi
	294
	295
	296	# VERZEICHNISLSTE DES ZIELRECHNERS ERSTELLEN
[693]	297	if [[ $(echo $local_host \| cut -c1-4) = gaia ]]
	298	then
	299	ssh $local_user@gaiad "ssh $1 -l $remote_user \"cd $3; ls -1; echo '*** list complete'\" " > $filelist 2>&1
	300	else
[1090]	301	ssh -p 22 $1 -l $remote_user "cd $3; ls -1; echo '*** list complete'" > $filelist 2>&1
[693]	302	fi
[1]	303	ssh_status=$?
	304
	305	if [[ $ssh_status != 0 ]]
	306	then
	307	if [[ ! -f $filelist ]]
	308	then
	309	echo " local_host = $local_host ssh_status = $ssh_status"
	310	locat=ssh_failed_1; exit
	311	else
	312	if [[ $(grep -c "*** list complete" $filelist) = 0 ]]
	313	then
	314	echo " local_host = $local_host ssh_status = $ssh_status"
	315	locat=ssh_failed_2; exit
	316	fi
	317	fi
	318	fi
	319
	320
	321	# PRUEFEN, OB VERZEICHNIS VORHANDEN IST. WENN GANZES VERZEICHNISS ZUM
	322	# ZIELRECHNER KOPIERT WERDEN SOLL, DARF DORT NOCH KEIN ENTSPRECHENDES
	323	# VERZEICHNIS VORHANDEN SEIN
	324	if [[ $(cat $filelist \| grep -c "not found") != 0 \|\| \
	325	$(cat $filelist \| grep -c "No such file or directory") != 0 ]]
	326	then
	327	if [[ ! ( $catalog_copy = true && $get = false ) ]]
	328	then
	329	if [[ $make_catalog = false ]]
	330	then
	331	printf " +++ directory \"$3\" does not exist on destination host (\"$1\") \n"
	332	locat=directory; exit
	333	else
	334	if [[ $silent = false ]]
	335	then
	336	printf " >>> directory \"$3\" does not exist on destination host (\"$1\")"
	337	printf "\n trying to create \"$3\" \n"
	338	fi
	339
	340	make_catalog=force
	341	fi
	342	fi
	343	fi
	344
	345
	346	# PRUEFEN, OB DATEI/VERZEICHNIS VORHANDEN, WENN JA, HOECHSTEN ZYKLUS
	347	# ERMITTELN (BZW. IM ABSOLUT-MODUS PRUEFEN, OB DATEI VORHANDEN IST)
	348	# DAS GANZE ABER NUR, WENN NICHT OVERWRITE-MODUS GEWAEHLT WURDE, DIE
	349	# EVENTUELL VORHANDENE DATEI ALSO UEBERSCHRIEBEN WERDEN SOLL
	350	found=false
	351	if [[ ( $overwrite = false && $get = false ) \|\| $get = true ]]
	352	then
	353	while read zeile
	354	do
	355	if [[ $absolut = false ]]
	356	then
	357	text=$(echo $zeile \| cut -f1 -d".")
	358	if [[ "$text" = "$4" ]]
	359	then
	360	found=true
	361	cycle=$(echo $zeile \| cut -f2 -d".")
	362	if [[ "$cycle" = "$text" ]]
	363	then
	364	(( icycle = 0 ))
	365	else
	366
	367	# PRUEFEN, OB CYCLE EINE ZAHL IST
	368	(( iii = 1 ))
	369	character=`echo $cycle \| cut -c$iii`
	370	character_found=false
	371	while [[ "$character" != "" && $character_found = false ]]
	372	do
	373	case $character in
	374	(0\|1\|2\|3\|4\|5\|6\|7\|8\|9) true;;
	375	(*) character_found=true
	376	esac
	377	(( iii = iii + 1 ))
	378	character=`echo $cycle \| cut -c$iii`
	379	done
	380
	381	if [[ $character_found = false ]]
	382	then
	383	(( icycle = $cycle ))
	384	fi
	385	fi >\|$errfile 2>&1 # AUSGABE FEHLER AUF ERRFILE WENN CYCLE NICHTNUMERISCH
	386
	387
	388	# INFORMATIVE AUSGABE, WENN DATEI NICHTNUMERISCHE EXTENSION HAT
	389	# if [[ $(cat $errfile \| grep -c "bad number") != 0 ]]
	390	if [[ $character_found = true ]]
	391	then
	392	if [[ $cycle != "$5" ]]
	393	then
	394	printf " +++ file \"$text\" has non-numerical extension \".$cycle\" \n"
	395	locat=file; exit
	396	else
	397	if [[ $silent = false ]]
	398	then
	399	printf " >>> file \"$text\" has non-numerical extension \".$cycle\" \n"
	400	fi
	401	fi
	402	fi
	403
	404	if (( icycle > maxcycle ))
	405	then
	406	(( maxcycle = icycle ))
	407	fi
	408	fi
	409
	410	else
	411
	412	# IM ABSOLUT-MODUS MUSS NUR GEPRUEFT WERDEN, OB DIE DATEI
	413	# VORHANDEN IST
	414	[[ $4 = $zeile ]] && found=true
	415	fi
	416
	417	done <$filelist
	418	fi
	419
	420	if [[ $found = true ]]
	421	then
	422	if [[ $get = false ]]
	423	then
	424	if [[ $absolut = false ]]
	425	then
	426	if [[ $append = false ]]
	427	then
	428	(( maxcycle = maxcycle + 1 ))
	429	zyklusnr=".$maxcycle"
	430	else
	431	if (( maxcycle == 0 ))
	432	then
	433	zyklusnr=""
	434	else
	435	zyklusnr=".$maxcycle"
	436	fi
	437	fi
	438	else
	439	if [[ $overwrite = false ]]
	440	then
	441	printf " +++ file \"$3/$4\" \n"
	442	printf " already exists on destination host (use -o, if necessary) \n"
	443	locat=file; exit
	444	fi
	445	fi
	446	else
	447	if [[ $absolut = false ]]
	448	then
	449	if (( maxcycle == 0 ))
	450	then
	451	zyklusnr=""
	452	else
	453	zyklusnr=".$maxcycle"
	454	(( maxcycle = 0 ))
	455	fi
	456	else
	457	zyklusnr=""
	458	fi
	459	fi
	460	else
	461	zyklusnr=""
	462
	463	# ABBRUCH, WENN DATEI VON ZIELRECHNER GEHOLT WERDEN SOLL, DORT ABER
	464	# NICHT VORHANDEN IST
	465	if [[ $get = true ]]
	466	then
	467	printf " +++ file \"$3/$4\" \n"
	468	printf " does not exist on destination host (\"$1\") \n"
	469	locat=remotefile; exit
	470	fi
	471	fi
	472
	473
	474	# FALLS KATALOG ERZEUGT WIRD, DARF DIE DATEI IN KEINEM FALL EINE
	475	# ZYKLUSNUMMER BESITZEN, DA SIE JA NOCh GARNICHT EXISTIEREN KANN
	476	if [[ $make_catalog = force ]]
	477	then
	478	zyklusnr=""
	479	(( maxcycle = 0 ))
	480	fi
	481
	482
	483	# FALLS NAMENSOPTION (-n) GEWAEHLT WURDE, NUR DEN ERMITTELTEN LOKALEN
	484	# DATEINAMEN DES ZIELRECHNERS AUSGEBEN UND SCRIPT BEENDEN
	485	if [[ $print_local_filename = true ]]
	486	then
	487	printf "$4$zyklusnr\n"
	488	rm -r $filelist
	489	exit
	490	fi
	491
	492
	493	# FALLS 5. ARGUMENT ANGEGEBEN WURDE, WIRD DIES ALS FILE-EXTENSION
	494	# HINTER DIE ZYKLUS-NUMMER GEHAENGT (FUNKTIONIERT NUR BEI KOPIEREN EINER
	495	# DATEI AUF ZIELRECHNER
	496	if [[ "$5" != "" && $get = false ]]
	497	then
	498	zyklusnr=${zyklusnr}.$5
	499	fi
	500
	501
	502	# BEI VERZEICHNISTRANSFER VON ZIELRECHNER AUF LOKALEN RECHNER PRUEFEN, OB
	503	# $3 AUF ZIELRECHNER WIRKLICH EIN VERZEICHNIS IST
	504	if [[ $catalog_copy = true && $get = true ]]
	505	then
	506	rm -rf $filelist
[693]	507	if [[ $(echo $local_host \| cut -c1-4) = gaia ]]
	508	then
	509	ssh $local_user@gaiad "ssh $1 -l $remote_user \"cd $3\" " > $filelist
	510	else
[1090]	511	ssh $1 -p 22 -l $remote_user "cd $3" > $filelist
[693]	512	fi
[1]	513	if [[ $? != 0 ]]
	514	then
	515	locat=ssh_failed_3; exit
	516	fi
	517
	518	if [[ $(cat $filelist \| grep -c "Not a directory") != 0 ]]
	519	then
	520	printf " +++ \"$3\" on destination host is not a directory \n"
	521	locat=directory; exit
	522	fi
	523	fi
	524
	525
	526	# BEI KATALOGTRANSFER AUF LOKALEN RECHNER ENTSPRECHENDES VERZEICHNIS
	527	# ANLEGEN
	528	if [[ $catalog_copy = true ]]
	529	then
	530	if [[ $get = true ]]
	531	then
	532	mkdir $2
	533	fi
	534	fi
	535
	536
	537	# Auf IBM-Rechnern (HLRN) Tilde aus Katalognamen entfernen, da scp
	538	# diese nicht versteht
	539	catalog_name=$3
	540	if [[ $(hostname \| cut -c1-4) = hreg \|\| $(hostname \| cut -c1-4) = breg ]]
	541	then
	542	catalog_name=${catalog_name#"~/"}
	543	catalog_name=${catalog_name#"~"}
	544	fi
	545	[[ "$catalog_name" != "" ]] && catalog_name=${catalog_name}/
	546
	547
	548	# DATEI/VERZEICHNIS PER SCP UEBERTRAGEN
	549	if [[ $get = false ]]
	550	then
	551	if [[ $make_catalog != force ]]
	552	then
	553	if [[ $append = false ]]
	554	then
	555	if [[ $(echo $local_host \| cut -c1-2) = cs ]]
	556	then
	557	if [[ $catalog_copy = false ]]
	558	then
[306]	559	scp -p -q -v $2 $remote_user@$1:$catalog_name$4$zyklusnr
[1]	560	else
[306]	561	scp -p -r -q -v $2 $remote_user@$1:$catalog_name$4$zyklusnr
[1]	562	fi
[693]	563	elif [[ $(echo $local_host \| cut -c1-4) = gaia ]]
	564	then
	565	if [[ $catalog_copy = false ]]
	566	then
	567	ssh $local_user@gaiad "cd $local_wdir; scp -p $2 $remote_user@$1:$catalog_name$4$zyklusnr" > /dev/null
	568	else
	569	ssh $local_user@gaiad "cd $local_wdir; scp -p -r $2 $remote_user@$1:$catalog_name$4$zyklusnr" > /dev/null
	570	fi
[1]	571	else
	572	if [[ $catalog_copy = false ]]
	573	then
[1090]	574	scp -P 22 -p $2 $remote_user@$1:$catalog_name$4$zyklusnr > /dev/null
[1]	575	else
[1090]	576	scp -P 22 -p -r $2 $remote_user@$1:$catalog_name$4$zyklusnr > /dev/null
[1]	577	fi
	578	fi
	579	scp_status=$?
	580
	581	if [[ $scp_status != 0 ]]
	582	then
	583	# CHECK, OB DATEIGROESSEN AUF LOKALEM UND REMOTERECHNER
	584	# UEBEREINSTIMMEN
	585	local_size=`ls -al $2`
	586	local_size=`echo $local_size \| cut -d" " -f5`
	587
[693]	588	if [[ $(echo $local_host \| cut -c1-4) = gaia ]]
	589	then
	590	remote_size=`ssh $local_user@gaiad "ssh $1 -l $remote_user \"ls -al $catalog_name$4$zyklusnr\" "`
	591	else
[1090]	592	remote_size=`ssh $1 -p 22 -l $remote_user "ls -al $catalog_name$4$zyklusnr"`
[693]	593	fi
[1]	594	remote_size=`echo $remote_size \| cut -d" " -f5`
	595
	596	if [[ "$remote_size" != "$local_size" ]]
	597	then
	598	echo " +++ scp failed on host \"$local_host\" with exit $scp_status"
	599	echo " local size = \"$local_size\" remote size = \"$remote_size\" "
	600	date
	601	locat=scp_failed; exit
	602	fi
	603	fi
	604	else
[693]	605	if [[ $(echo $local_host \| cut -c1-4) = gaia ]]
	606	then
	607	ssh $local_user@gaiad "cd $local_wdir; scp -p $2 $remote_user@$1:${catalog_name}batch_scp_append_file.$random" > /dev/null
	608	else
[1090]	609	scp -P 22 -p $2 $remote_user@$1:${catalog_name}batch_scp_append_file.$random > /dev/null
[693]	610	fi
[1]	611	if [[ $? != 0 ]]
	612	then
	613	# CHECK, OB DATEIGROESSEN AUF LOKALEM UND REMOTERECHNER
	614	# UEBEREINSTIMMEN
	615	local_size=`ls -al $2`
	616	local_size=`echo $local_size \| cut -d" " -f5`
	617
[693]	618	if [[ $(echo $local_host \| cut -c1-4) = gaia ]]
	619	then
	620	remote_size=`ssh $local_user@gaiad "ssh $1 -l $remote_user \"ls -al ${catalog_name}batch_scp_append_file.$random\" "`
	621	else
[1090]	622	remote_size=`ssh $1 -p 22 -l $remote_user "ls -al ${catalog_name}batch_scp_append_file.$random"`
[693]	623	fi
[1]	624	remote_size=`echo $remote_size \| cut -d" " -f5`
	625
	626	if [[ "$remote_size" != "$local_size" ]]
	627	then
	628	echo " +++ scp failed on host \"$local_host\" with exit $scp_status"
	629	echo " local size = \"$local_size\" remote size = \"$remote_size\" "
	630	date
	631	locat=scp_for_append_failed; exit
	632	fi
	633	fi
	634
	635	rm $filelist
	636
[693]	637	if [[ $(echo $local_host \| cut -c1-4) = gaia ]]
	638	then
	639	ssh $local_user@gaiad "ssh $1 -l $remote_user \"cd $3; cat batch_scp_append_file.$random >> $4$zyklusnr; rm batch_scp_append_file.$random; echo '*** append complete'\" " > $filelist
	640	else
[1090]	641	ssh $1 -p 22 -l $remote_user "cd $3; cat batch_scp_append_file.$random >> $4$zyklusnr; rm batch_scp_append_file.$random; echo '*** append complete'" > $filelist
[693]	642	fi
[1]	643	if [[ $? != 0 ]]
	644	then
	645	if [[ ! -f $filelist ]]
	646	then
	647	locat=append_via_ssh_failed; exit
	648	else
	649	if [[ $(grep -c "*** append complete" $filelist) = 0 ]]
	650	then
	651	locat=append_via_ssh_failed; exit
	652	fi
	653	fi
	654	fi
	655	fi
	656	else
[693]	657	if [[ $(echo $local_host \| cut -c1-4) = gaia ]]
	658	then
	659	ssh $local_user@gaiad "ssh $1 -l $remote_user \"mkdir -p $3\" "
	660	else
[1090]	661	ssh $1 -p 22 -l $remote_user "mkdir -p $3"
[693]	662	fi
[1]	663	if [[ $? != 0 ]]
	664	then
	665	locat=ssh_failed_4; exit
	666	fi
[693]	667	if [[ $(echo $local_host \| cut -c1-4) = gaia ]]
	668	then
	669	ssh $local_user@gaiad "cd $local_wdir; scp -p $2 $remote_user@$1:$catalog_name$4$zyklusnr" > /dev/null
	670	else
[1090]	671	scp -P 22 -p $2 $remote_user@$1:$catalog_name$4$zyklusnr > /dev/null
[693]	672	fi
[1]	673	if [[ $? != 0 ]]
	674	then
	675	locat=scp_failed; exit
	676	fi
	677	fi
	678
	679	else
	680
	681	if [[ $catalog_copy = false ]]
	682	then
	683	if [[ $quote_wait = true ]]
	684	then
	685
	686	printf " +++ quote wait not realized with BATCH_SCP"
	687	locat=unavailable_feature; exit
	688
	689	else
	690
[693]	691	if [[ $(echo $local_host \| cut -c1-4) = gaia ]]
	692	then
	693	ssh $local_user@gaiad "cd $local_wdir; scp -p $remote_user@$1:$catalog_name$4$zyklusnr $2" > /dev/null
	694	else
[1090]	695	scp -P 22 -p $remote_user@$1:$catalog_name$4$zyklusnr $2 > /dev/null
[693]	696	fi
[1]	697	if [[ $? != 0 ]]
	698	then
	699	locat=scp_failed; exit
	700	fi
	701
	702	fi
	703	else
	704
	705	printf " +++ get of whole cataloges not realized with BATCH_SCP so far"
	706	locat=unavailable_feature; exit
	707
	708	# ftp -i $1 << %END% > /dev/null
	709	#$transfermode
	710	#cd $3
	711	#mget *
	712	#quit
	713	#%END%
	714	fi
	715	fi
	716
	717
	718
	719	# EVTL. TRANSFERIERTE DATEI AUF LOKALEM RECHNER LOESCHEN
	720	if [[ $delete = true && $get = false ]]
	721	then
	722	rm -rf $2
	723	fi
	724
	725
	726
	727	# ABSCHLUSSMELDUNG
	728	if [[ $silent = false ]]
	729	then
	730	if (( maxcycle == 0 ))
	731	then
	732	if [[ $append = false ]]
	733	then
	734	printf " >>> transfer successful \n"
	735	else
	736	printf " >>> file was appended \n"
	737	fi
	738	else
	739	printf " >>> transfer successful \n"
	740	if [[ $append = false ]]
	741	then
	742	if [[ $catalog_copy = false ]]
	743	then
	744	printf " new file has cycle number $maxcycle \n"
	745	else
	746	printf " new catalog has cycle number $maxcycle \n"
	747	fi
	748	else
	749	printf " append to cycle number $maxcycle \n"
	750	fi
	751	fi
	752	fi
	753
	754	rm -rf $filelist $errfile

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

Download in other formats:

Original Format