ossp-pkg/svs/svs.sh
1.3
#!/bin/sh
##
## OSSP svs -- Stupid/Silly/Simple Versioning System
## Copyright (c) 2003-2004 Ralf S. Engelschall <rse@engelschall.com>
## Copyright (c) 2003-2004 The OSSP Project <http://www.ossp.org/>
##
## This file is part of OSSP svs, a stupid/silly/simple versioning
## system which can found at http://www.ossp.org/pkg/tool/svs/
##
## Permission to use, copy, modify, and distribute this software for
## any purpose with or without fee is hereby granted, provided that
## the above copyright notice and this permission notice appear in all
## copies.
##
## THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
## WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
## MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
## IN NO EVENT SHALL THE AUTHORS AND COPYRIGHT HOLDERS AND THEIR
## CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
## SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
## LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
## USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
## ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
## OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
## OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
## SUCH DAMAGE.
##
## svs.sh: program (language: Bourne Shell)
##
# check command line
if [ $# -eq 0 ]; then
echo "Usage: svs vi <file> [...]"
echo "Usage: svs diff [<file>|<dir> [...]]"
echo "Usage: svs backout [<file>|<dir> [...]]"
exit 1
fi
# dispatch into commands
cmd="$1"
shift
case "$cmd" in
v|vi|vim | e|em|ema|emac|emacs )
##
## EDIT ONE OR MORE FILES
##
# iterate over all files
for file in "$@"; do
# preserve original file
if [ ! -f $file.orig ]; then
cp -p $file $file.orig
orig=new
else
orig=old
fi
# edit file
chmod u+w $file
if [ ".${EDITOR-vi}" = .vim -a -f $file.rej ]; then
${EDITOR-vi} -o2 $file $file.rej
else
${EDITOR-vi} $file
fi
# check for editing results
if cmp $file.orig $file >/dev/null 2>&1; then
if [ ".$orig" = .new ]; then
echo "svs: no changes made (keeping original)"
else
echo "svs: changes reversed (restoring original)"
fi
cp -p $file.orig $file
rm -f $file.orig
else
echo "svs: changes made (preserving original)"
fi
done
;;
d|di|dif|diff )
##
## GENERATE PATCHING DIFFERENCE
##
# determine file list
if [ $# -eq 0 ]; then
set -- .
fi
files=""
for file in "$@"; do
if [ -d $file ]; then
for f in `find $file -type f -name "*.orig" -print | sort`; do
files="$files $f"
done
elif [ -f $file ]; then
files="$files $file"
else
echo "svs:ERROR: \"$file\" neither regular file nor directory" 1>&2
exit 1
fi
done
# generate patch
for file in $files; do
file=`echo "$file" | sed -e 's;^\./;;' -e 's;/\./;/;g' -e 's;\([^/][^/]*\)/\.\.;;g' -e 's;//*;/;g'`
orig=`echo "$file" | sed -e 's;\.orig$;;' -e 's;$;.orig;'`
edit=`echo "$file" | sed -e 's;\.orig$;;'`
if [ ! -f $orig ]; then
echo "svs:WARNING: original file \"$orig\" not found" 1>&2
continue
fi
if [ ! -f $edit ]; then
# special case: removed file
echo "Index: $edit"
diff -u3 $orig /dev/null | sed -e "1s/^--- $orig/--- $edit/"
elif [ ! -r $orig ] && [ ! -s $orig ]; then
# special case: new file
echo "Index: $edit"
diff -u3 /dev/null $edit
else
# regular case: edited file
if ! cmp $orig $edit >/dev/null 2>&1; then
echo "Index: $edit"
diff -u3 $orig $edit
fi
fi
done
;;
b|ba|bac|back|backo|backou|backout )
##
## BACKOUT EDITING CHANGES
##
# determine file list
if [ $# -eq 0 ]; then
set -- .
fi
files=""
for file in "$@"; do
if [ -d $file ]; then
for f in `find $file -type f -name "*.orig" -print | sort`; do
files="$files $f"
done
elif [ -f $file ]; then
files="$files $file"
else
echo "svs:ERROR: \"$file\" neither regular file nor directory" 1>&2
exit 1
fi
done
# backout changes
for file in $files; do
file=`echo "$file" | sed -e 's;^\./;;' -e 's;/\./;/;g' -e 's;\([^/][^/]*\)/\.\.;;g' -e 's;//*;/;g'`
orig=`echo "$file" | sed -e 's;\.orig$;;' -e 's;$;.orig;'`
edit=`echo "$file" | sed -e 's;\.orig$;;'`
if [ ! -f $orig ]; then
echo "svs:WARNING: original file \"$orig\" not found" 1>&2
continue
fi
echo "svs: backing out changes to \"$edit\""
if [ ! -f $edit ]; then
# special case: removed file
cp -p $orig $edit
rm -f $orig
elif [ ! -r $orig ] && [ ! -s $orig ]; then
# special case: new file
chmod u+w $orig
rm -f $orig
rm -f $edit
else
# regular case: edited file
cp -p $orig $edit
rm -f $orig
fi
done
;;
* )
echo "svs:ERROR: invalid command \"$cmd\"" 1>&2
exit 1
;;
esac
