#!@SHELL@
name='rvs repo commit'
ver=0.8r61
#   Copyright (C) 2009 Luke Shumaker
#   
#   This file is part of rvs.
#   
#   rvs is free software; you can redistribute it and/or modify it under the
#   terms of the GNU General Public License as published by the Free Software
#   Foundation; either version 2, or (at your option) any later version.
#   
#   rvs is distributed in the hope that it will be useful, but
#   WITHOUT ANY WARRANTY; without even the implied warranty of
#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
#   See the GNU General Public License for more details.
#   
#   You should have received a copy of the GNU General Public License
#   along with rvs; see the file COPYING.
#   If not, write to the Free Software Foundation,
#   59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
source "$libexecdir/@ID@/stdio"

# commit FILE
file=${1-.}

if [ ! -e $file ]; then error "file \`$file' does not exist";
# START file type list
elif [ -L $file ]; then type='l';	# symbolic link
elif [ -b $file ]; then type='b';	# block       (buffered) special
elif [ -c $file ]; then type='c';	# character (unbuffered) special
elif [ -d $file ]; then type='d';	# directory
elif [ -p $file ]; then type='p';	# named pipe (FIFO)
elif [ -f $file ]; then type='f';	# regular file
elif [ -s $file ]; then type='s';	# socket
#elif [ -D $file ]; then type='D';	# door (Solaris only)
# END   file type list
else error "could not identify file type of \`$file'"
fi

out "+$type `pwd`/$file"
ret=`"$RVS" commit.$type "$file"`

tmp=`mktemp`
cat << __EOF__ > "$tmp"
name:$file
hash:$ret
type:$type
author:$user
owner:$owner
license:$license
__EOF__

"$RVS" commit.f "$tmp"
rm "$tmp"