9 # ------------------------------------------------------------------------------------------ 
   11 #                 Utility script to test JControlHost/JLigier through ssh tunnel. 
   13 # ------------------------------------------------------------------------------------------ 
   16 if [ -z $JPP_DIR ]; 
then 
   17     echo "Variable JPP_DIR undefined." 
   22 source $JPP_DIR/setenv.sh $JPP_DIR
 
   27 if ( do_usage $* ); 
then 
   28     usage "$script <host name>" 
   33     *) 
usage "$script <host name>" 
   42     JLigier.sh ${
SERVER} 
continue 
   44     echo "Create ssh tunnel." 
   46     ssh -
S ${SOCKET} -fN -
M 0 -L ${PORT}:${
SERVER}:${PORT}
 
   48     ./JControlHost -
H :${PORT} -
d3 
   50     echo "Delete ssh tunnel." 
void set_variable(const std::string &name, const std::string &value)
Set environment variable. 
 
static const double H
Planck constant [eV s]. 
 
do set_variable SIGMA_NS set_variable OUTLIERS set_variable OUTPUT_FILE matrix[${ALPHA_DEG}\deg\] root $JPP JMatrixNZ a $DETECTOR f $INPUT_FILE o $OUTPUT_FILE S
 
then echo Launching message logger in new window xterm geometry e JGetMessage H $HOST T $TAG d3
 
then fatal Wrong number of arguments fi set_variable DETECTOR $argv[1] set_variable INPUT_FILE $argv[2] eval JPrintDetector a $DETECTOR O IDENTIFIER eval JPrintDetector a $DETECTOR O SUMMARY source JAcoustics sh $DETECTOR_ID CHECK_EXIT_CODE typeset A TRIPODS get_tripods $WORKDIR tripod txt TRIPODS for EMITTER in
 
then usage $script fi SERVER
 
#define DEBUG(A)
Message macros.