sbin/sccsReport

   1 #!/bin/sh
   2 #
   3 # sccsReport  1.1
   4 #
   5 # The latest update : 04/25/96 at 10:48:08
   6 #
   7 #@(#) A new SCCS file is reported.
   8 #@(#)
   9 #
  10 #@(#) Usage : sccsReport [SourceFileName]
  11 #
  12 #@(#) Attention
  13 #@(#)
  14 #@(#) Parameter:
  15 #@(#)    Essential:
  16 #@(#)       SourceFileName
  17 #@(#)    Optional:
  18 #@(#)
  19
  20 # Store Flags
  21 FlagsCharacter="-"
  22
  23 while [ `echo $1 | cut -c1` = "-" ]
  24 do
  25         parms="$ {parms} $1"
  26         shift
  27 done
  28
  29 case $# in
  30         0) # No filename
  31                 echo "Enter SourceFileName"
  32                 read filename
  33                 ;;
  34         1) #
  35                 filename=$1
  36                 ;;
  37         *) #
  38                 filename="$*"
  39                 ;;
  40 esac
  41 #
  42 EosSCCSHome=$EOS_HOME/sccs
  43 currentDir=`pwd`
  44
  45 for file in ${filename}
  46 do
  47         FullName=${currentDir}/${file}
  48         Name=`basename ${FullName}`
  49         Dir=`dirname ${FullName}`
  50         echo Full=${FullName} Name=${Name} EosHome=$EOS_HOME
  51
  52         currentSCCSDir=`echo $Dir | awk '{gsub(/\/[a-zA-Z0-9\/]*\/Eos\//, ""); print $0}'`
  53         sccsDir=${EosSCCSHome}/${currentSCCSDir}
  54         echo sccsDir=${sccsDir} currentSCCSDir=${currentSCCSDir}
  55
  56         if [ -x $file ]
  57         then
  58                 Executable="+x"
  59         else
  60                 Executable="-x"
  61         fi
  62
  63         cd ${Dir}
  64         if [ -f ${sccsDir}/s.${Name} ]
  65         then
  66                 prs ${sccsDir}/s.${Name}
  67         else
  68                 echo "No sccs files are found."
  69         fi
  70         chmod ${Executable} ${Name}
  71 done
  72