Changeset 257 for IOIPSL/trunk/tools/rebuild

Timestamp:

02/21/08 11:44:35 (16 years ago)

Author:

bellier

Message:

JB :

rebuild

adding the verbosity level
some lifting

flio_rbld

new algorithm (should be faster)

File:

• IOIPSL/trunk/tools/rebuild (modified) (2 diffs)

IOIPSL/trunk/tools/rebuild

@@ -4 +4 @@
 # @(#)Rebuild IOIPSL domains
 #---------------------------------------------------------------------
+function rebuild_Usage
+{
+print - "
+\"${b_n}\"
+  rebuild a model_file from several input files.
+Each input file contains the model_data for a domain.
+
+Usage :
+  ${b_n} [-h]
+  ${b_n} [-v level] [-f] -o output_file_name input_file_names
+
+Options :
+  -h         : help
+  -v O/1/2/3 : verbose mode (verbosity increasing with level)
+  -f         : executing mode
+               (execute the program even if the number of input files
+                is not equal to the total number of domains)
+"
+}
 #-
 #set -xv
 #-
-# Extract the calling sequence for the script (d_n/b_n)
+# Extract the calling sequence of the script (d_n/b_n)
 #-
-d_n=$(dirname $0); b_n=$(basename $0);
+d_n=${0%/*}; b_n=${0##*/};
 #-
-# Retrieving and validation of the options
+# Retrieving the options
 #-
-r_v='silencious'; r_f='noforce'; r_o="";
-while getopts :hvfo: V
+r_v='0'; r_f='noforce'; r_o="";
+while getopts :hv:fo: V
  do
   case $V in
-   (h) echo '';
-       echo '"'${b_n}'"';
-       echo '  rebuild a model_file from several input files.';
-       echo 'Each input file contains the model_data for a domain.';
-       echo 'Usage :';
-       echo ${b_n} '[-h]';
-       echo ${b_n} '[-v] [-f] -o output_file_name input_file_names';
-       echo ' -h : this help';
-       echo ' -v : verbose mode';
-       echo ' -f : executing mode';
-       echo '  (execute the program even if the number of input files';
-       echo '   is not equal to the total number of domains)';
-       echo '';
-       exit 0;;
-   (v) r_v='verbose';;
+   (h) rebuild_Usage; exit 0;;
+   (v) r_v=${OPTARG};;
    (f) r_f='force';;
    (o) r_o=${OPTARG};;
-   (:)  echo ${b_n}" : option $OPTARG : missing value" 1>&2;
-        exit 2;;
-   (\?) echo ${b_n}" : option $OPTARG : not supported" 1>&2;
-        exit 2;;
+   (:) print -u2 "${b_n} : missing value for option $OPTARG"; exit 2;;
+   (\?) print -u2 "${b_n} : option $OPTARG not supported"; exit 2;;
   esac
  done
 shift $(($OPTIND-1));
 #-
+# Validate the -v option
+#-
+case ${r_v} in
+  ( 0 | 1 | 2 | 3 );;
+  ("") r_v='0';;
+  (*)
+    print -u2 "${b_n} :";
+    print -u2 "Invalid verbosity level requested : ${r_v}";
+    print -u2 "(must be 0, 1, 2 or 3)";
+    exit 1;;
+esac
+#-
 # Validate the number of arguments
 #-
-if   [ ${#} -lt 1 ]; then
-  echo ${b_n}' : Too few arguments have been specified. (Use -h)' 1>&2;
+[[ ${#} < 1 ]] && \
+ {
+  print -u2 "${b_n} : Too few arguments have been specified. (Use -h)";
   exit 3;
-fi
+ }
 #-
 # Check for the output file name
 #-
-if [ '\?'${r_o} = '\?' ]; then
-  echo ' ' 1>&2;
-  echo ${b_n}' : output_file_name not specified. (Use -h)' 1>&2;
-  echo '          "rebuilt_file.nc" should be created.' 1>&2;
-  echo ' ' 1>&2;
-  r_o='rebuilt_file.nc'
-fi;
+[[ -z ${r_o} ]] && \
+ {
+  r_o='rebuilt_file.nc';
+  print -u2 - "
+   ${b_n} : output_file_name not specified. (Use -h)
+            rebuilt_file.nc should be created."
+ }
 #-
 # Validate the names of the input files
 #-
-qi=0;
 for i in $*;
- do ((qi=qi+1));
-  [ ${qi} -le ${#} ] && [ ! -f ${i} ] && \
-    { echo "${i} unreachable ..."; exit 3;}
+ do
+  [[ ! -f ${i} ]] && { echo "${i} unreachable ..."; exit 3;}
  done
 #-
@@ -72 +87 @@
 echo ${r_v} > tmp.$$;
 echo ${r_f} >> tmp.$$;
-((qi=$#+1));
-echo ${qi} >> tmp.$$;
+echo $((${#}+1)) >> tmp.$$;
 for i in $*;
  do echo ${i} >> tmp.$$;