#! /bin/sh
 
#    Jun 24/91 - F.Majaess
 
#id  qo      - Used to display "output" subdirectory contents. 
 
#    AUTHOR  - F.Majaess
 
#hd  PURPOSE - "qo" script is used to display "ujn" occurences in $OUTPUTQ
#hd            or $PRNTQ subdirectories "ntimes" time(s) at "ri" seconds 
#hd            repeat interval.
 
#pr  PARAMETERS:
#pr
#pr    PRIMARY/SECONDARY
#pr
#pr      ppath  = path of subdirectory containing output (=$OUTPUTQ/$PRNTQ).
#pr
#pr    PRIMARY
#pr
#pr      ujn    = file to search for (default is *)
#pr      ntimes = number of times to display the queue (=1)
#pr      ri     = repeat interval time in seconds (=4)
 
#ex  EXAMPLE: 
#ex
#ex    qo ujn='A*.*' ntimes=10 ri=5
 
#   * code used to set switches and deal with parameter=value arguments 
#   * as well as setting parameters to their primary/secondary defaults.
#   * The list of other arguments (if any) is returned in "prmtrl" var...
 
. $SUBPROC/check_set_swtches_prmtrs
 
#   * make sure arguments list variable "prmtrl" is initialized...
 
prmtrl=${prmtrl=}
  
#   * code used to set hard coded primary defaults...
 
eval "ujn=${ujn=' '}"
eval "ntimes=${ntimes='1'}" 
eval "ri=${ri='4'}"
  
# if [ "$ujn" = '*' ] ; then
#  ujn="$ujn"" $ppath/.data"
# fi 
  
#   ****   Task of the script...   ****
 
#   * List "ujn" occurences in "ppath" subdirectory "ntimes" time 
#   * at "ri" sec. repeat interval.
 
while [ $ntimes -gt 0 ] 
do
  echo "\n";
  # eval "\\ls -aRxps $ppath/$ujn " | sed -n -e '/^.*\.queue\/\.crawork:/i\
#  
# ' -e '1,$p' ;
  eval "\\ls -aRxps $ppath/$ujn " 
  
  if [ $? -ne 0 ] ; then
    echo "\n no match! \n";
    if [ $ntimes -gt 1 ] ; then
      echo " enter (^C) - to quit \n";
    fi
  fi
  ntimes=`expr $ntimes - 1`;
  if [ $ntimes -ge 1 ] ; then
   echo "\n Remaining checks: $ntimes times at $ri sec. interval \n"
   sleep $ri
  else
   echo " "
  fi
done