Home

Context Navigation

batch_scp @ 1094

Last change on this file since 1094 was 1094, checked in by raasch, 11 years ago
scp/ssh port can be set explicitly
Property svn:keywords set to `Id`
File size: 24.2 KB

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

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

Download in other formats:

Original Format