#!/bin/sh

#########################################################################
#
#   FILE    	: cvsversions
#   DATE    	: 4.7.2000
#   AUTHOR  	: Patrick Meier / patrick.meier@gmx.net
#   DESCRIPTION : Creates a list of all found files in the cvs with 
#                 their version
#
#   Copyrigth (C) 2000 by Patrick Meier, Switzerland
#
#########################################################################
PN=`basename "$0"`
COLUMN=50
HEADER="CVS - Repository / Overview"


#########################################################################
# Usage
#########################################################################
Usage()
{
    echo "$PN - creates a list of all found files in the cvs from current path with their version."
    echo "usage: $PN [-c column-with] [-p [text]]"
    exit 1
}


#########################################################################
#  print header
#########################################################################
drawLine()
{
    echo "" | awk '{ \
             len="'$COLUMN'"+10; \
             for( i=0; i<int(len); i++ ) text=text"="; \
             print text; \
             exit 0; \
         }';
}


#########################################################################
#  print header
#########################################################################
printHeader()
{
    drawLine
    echo "$HEADER"
    echo "`date '+%d.%m.%Y %H:%M:%S'` (`who am i | awk '{print $1}'`)"
    drawLine
}


#########################################################################
#  search files
#########################################################################
getFiles()
{
    find . -type f -print | grep -v "$(FILELIST)" | grep -v "CVS" | sed 's/.\///'
}


#########################################################################
#  filter cvs output
#########################################################################
filterCVS()
{
    for i in $@;
    do 
        testFile="`cvsstatus $i 2>&1 | grep \"status:\" | awk -F":" '{print $2}'`"; 
        if [ -z "$testFile" ]; 
        then 
            fileInfo="`cvslog -t $i \
                            | grep -v \"RCS file:\" \
                            | grep -v \"branch:\" \
                            | grep -v \"locks:\" \
                            | grep -v \"access list:\" \
                            | grep -v \"keyword substitution:\" \
                            | grep -v \"total revisions:\" \
                            | grep -v \"symbolic names:\" \
                            | grep -v \"=============\" `";

            filename="`echo \"$fileInfo\" \
                            | grep \"Working file: \" \
                            | sed 's/Working file: //'`"; 

            fileversion="`echo \"$fileInfo\" \
                            | grep \"head: \" \
                            | sed 's/head: //'`"; 
            echo "$filename  $fileversion" \
                            | awk '{ \
                                      text=$1; \
                                      len="'$COLUMN'"-length($1); \
                                      for( i=0; i<len; i++ ) text=text" "; \
                                      text=text$2; \
                                      print text; \
                                   }';
        fi; 
    done; 
}


#########################################################################
#  main
#########################################################################
# test parameter
while [ $# -gt 0 ]
do
    case "$1" in
	-c)	if [ $# -gt 1 ]; then COLUMN="$2"; shift; fi;;
	-p)	if [ $# -gt 1 ]; then HEADER="$2"; shift; fi; printHeader;;
	-h)	Usage;;
	-*)	Usage;;
	*)	break;;			# first file name
    esac
    shift
done

filterCVS `getFiles $@`


#########################################################################
# EOF
#########################################################################