improved tecs driver M.Z.
This commit is contained in:
15
tecs/didi
15
tecs/didi
@@ -1,10 +1,15 @@
|
||||
#!/bin/tcsh
|
||||
|
||||
set what="$1"
|
||||
set where="$2"
|
||||
|
||||
set destlist=( type@osf1 \
|
||||
AMOR@lnsa14:bin/ DMC@lnsa05:bin/ FOCUS@lnsa16:bin/ \
|
||||
HRPT@lnsa11:bin/ TASP@lnsa12:bin/ TRICS@lnsa18:bin/ \
|
||||
HRPT@lnsa11:bin/ TRICS@lnsa18:bin/ \
|
||||
lnslib@lnsa15:bin/ \
|
||||
type@linux \
|
||||
zolliker@llc3:/afs/psi.ch/project/sinq/linux/bin/ \
|
||||
TASP@pc4478:tasp_sics/ \
|
||||
TOPSI@pc4120:topsi_sics/ SANS@pc3965:sans_sics/ SANS2@sans2:sans2_sics/ \
|
||||
)
|
||||
|
||||
@@ -33,7 +38,9 @@ set items=(TecsServer TecsClient six keep_running cfg)
|
||||
echo ""
|
||||
echo " all $items"
|
||||
echo -n "distribute what: "
|
||||
set what=$<
|
||||
if ("$what" == "") then
|
||||
set what=$<
|
||||
endif
|
||||
if ($what == all) then
|
||||
set what=($items)
|
||||
endif
|
||||
@@ -41,7 +48,9 @@ endif
|
||||
echo ""
|
||||
echo " all $dests"
|
||||
echo "distribute where: "
|
||||
set where=$<
|
||||
if ("$where" == "") then
|
||||
set where=$<
|
||||
endif
|
||||
if ($where == all) then
|
||||
set where=($dests)
|
||||
endif
|
||||
|
||||
Reference in New Issue
Block a user