summaryrefslogtreecommitdiff
path: root/src/rvs-core
diff options
context:
space:
mode:
Diffstat (limited to 'src/rvs-core')
-rw-r--r--src/rvs-core/commit.d.sh29
-rw-r--r--src/rvs-core/commit.f.sh26
-rw-r--r--src/rvs-core/commit.sh53
-rw-r--r--src/rvs-core/get.d.sh32
-rw-r--r--src/rvs-core/get.f.sh22
-rw-r--r--src/rvs-core/get.sh34
-rw-r--r--src/rvs-core/init.sh18
-rw-r--r--src/rvs-core/lib/rvsdb.sh84
-rw-r--r--src/rvs-core/lib/stdio.sh60
-rw-r--r--src/rvs-core/repo.sh29
10 files changed, 0 insertions, 387 deletions
diff --git a/src/rvs-core/commit.d.sh b/src/rvs-core/commit.d.sh
deleted file mode 100644
index 7a0cc9a..0000000
--- a/src/rvs-core/commit.d.sh
+++ /dev/null
@@ -1,29 +0,0 @@
-#!$$SHELL$$
-# abomination module:rvs:commit:d
-name='rvs commit.d'
-ver='0.6.3'
-usage='[OPTIONS] DIRECTORY'
-# Copyright (C) 2009 Luke Shumaker
-# This program 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.
-#
-# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-
-source "$RVSDIR/lib/stdio"
-source "$RVSDIR/lib/rvsdb"
-
-# commit.d DIRNAME
-dir="$1"
-
-tmp=`tempfile`
-loginit "$tmp"
-for file in $dir/*; do
- hash=`rvs commit "$file"`
- echo "$file:$hash" >> "$tmp"
-done
-
-rvs commit.f "$tmp"
-rm "$tmp"
-
diff --git a/src/rvs-core/commit.f.sh b/src/rvs-core/commit.f.sh
deleted file mode 100644
index a9be426..0000000
--- a/src/rvs-core/commit.f.sh
+++ /dev/null
@@ -1,26 +0,0 @@
-#!$$SHELL$$
-# abomination module:rvs:commit:f
-name='rvs commit.f'
-ver='0.6.3'
-usage='[OPTIONS] FILE'
-# Copyright (C) 2009 Luke Shumaker
-# This program 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.
-#
-# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-
-source "$RVSDIR/lib/stdio"
-source "$RVSDIR/lib/rvsdb"
-
-# commit.f FILENAME
-file="$1"
-
-hash=`getid $file`
-if [ ! -f "`rvs repo`/files/$hash" ]; then
- #cp "$file" "`rvs repo`/files/$hash"
- install -m 644 -o $USER -g $USER -T "$file" "`rvs repo`/files/$hash"
-fi
-echo "$hash"
-
diff --git a/src/rvs-core/commit.sh b/src/rvs-core/commit.sh
deleted file mode 100644
index 9fb44fc..0000000
--- a/src/rvs-core/commit.sh
+++ /dev/null
@@ -1,53 +0,0 @@
-#!$$SHELL$$
-# abomination module:rvs:commit
-name='rvs commit'
-ver='0.6.3'
-usage='[OPTIONS] [FILE]'
-# Copyright (C) 2009 Luke Shumaker
-# This program 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.
-#
-# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-
-source "$RVSDIR/lib/stdio"
-source "$RVSDIR/lib/rvsdb"
-
-# commit FILE
-if [ $# -gt 0 ]; then
- file="$1"
-else
- file='.'
-fi
-
-warn "$file"
-
-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 ]; type='D'; # door (Solaris only)
-# END file type list
-else error "could not identify file type of \`$file'"
-fi
-
-ret=`rvs "commit.$type" "$file"`
-
-tmp=`tempfile`
-loginit "$tmp"
-logwrite "$tmp" 'name' "$file"
-logwrite "$tmp" 'hash' "$ret"
-logwrite "$tmp" 'type' "$type"
-logwrite "$tmp" 'author' "$user"
-logwrite "$tmp" 'owner' "$owner"
-logwrite "$tmp" 'owner' "$license"
-
-rvs commit.f "$tmp"
-rm "$tmp"
-
diff --git a/src/rvs-core/get.d.sh b/src/rvs-core/get.d.sh
deleted file mode 100644
index a58a7c0..0000000
--- a/src/rvs-core/get.d.sh
+++ /dev/null
@@ -1,32 +0,0 @@
-#!$$SHELL$$
-# abomination module:rvs:get:d
-name='rvs get.d'
-ver='0.6.3'
-usage='[OPTIONS] ID FILENAME'
-# Copyright (C) 2009 Luke Shumaker
-# This program 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.
-#
-# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-
-source "$RVSDIR/lib/stdio"
-source "$RVSDIR/lib/rvsdb"
-
-# get.d ID DIRNAME
-id="$1"
-dir="$2"
-
-tmp=`tempfile`
-rvs get.f `logread "$db" 'hash'` "$tmp"
-
-mkdir "$dir"
-while read line; do
- hash=`echo "$line" | sed 's/^.*://'`
- name=`echo "$line" | sed "s/:$hash$//"`
- rvs get "$dir/$file"
-done < "$tmp"
-
-rm "$tmp"
-
diff --git a/src/rvs-core/get.f.sh b/src/rvs-core/get.f.sh
deleted file mode 100644
index 3c17df5..0000000
--- a/src/rvs-core/get.f.sh
+++ /dev/null
@@ -1,22 +0,0 @@
-#!$$SHELL$$
-# abomination module:rvs:get:f
-name='rvs get.f'
-ver='0.6.3'
-usage='[OPTIONS] ID FILENAME'
-# Copyright (C) 2009 Luke Shumaker
-# This program 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.
-#
-# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-
-source "$RVSDIR/lib/stdio"
-source "$RVSDIR/lib/rvsdb"
-
-# get.f ID FILENAME
-id="$1"
-file="$2"
-
-cp "`rvs repo`/files/$id" "$file"
-
diff --git a/src/rvs-core/get.sh b/src/rvs-core/get.sh
deleted file mode 100644
index 1d3eb76..0000000
--- a/src/rvs-core/get.sh
+++ /dev/null
@@ -1,34 +0,0 @@
-#!$$SHELL$$
-# abomination module:rvs:get
-name='rvs commit'
-ver='0.6.3'
-usage='[OPTIONS] ID [FILENAME]'
-# Copyright (C) 2009 Luke Shumaker
-# This program 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.
-#
-# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-
-source "$RVSDIR/lib/stdio"
-source "$RVSDIR/lib/rvsdb"
-
-# get ID [FILE]
-id="$1"
-
-if [ $# -gt 1 ]; then
- file="$2"
-fi
-
-tmp=`tempfile`
-rvs get.f "$id" "$tmp"
-type=`logread "$tmp" 'type'`
-if [ $# -gt 1 ]; then
- file="$2"
-else
- file=`logread "$tmp" 'name'`
-fi
-
-rvs "get.$type" "$id" "$file"
-
diff --git a/src/rvs-core/init.sh b/src/rvs-core/init.sh
deleted file mode 100644
index ff650a5..0000000
--- a/src/rvs-core/init.sh
+++ /dev/null
@@ -1,18 +0,0 @@
-#!$$SHELL$$
-# abomination rvs init
-name='rvs init'
-ver='0.6.3'
-usage='[OPTIONS]'
-# Copyright (C) 2009 Luke Shumaker
-# This program 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.
-#
-# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-
-source "$RVSDIR/lib/stdio"
-source "$RVSDIR/lib/rvsdb"
-
-mkdir -p .rvs/{,files}
-
diff --git a/src/rvs-core/lib/rvsdb.sh b/src/rvs-core/lib/rvsdb.sh
deleted file mode 100644
index 41f0e03..0000000
--- a/src/rvs-core/lib/rvsdb.sh
+++ /dev/null
@@ -1,84 +0,0 @@
-#!$$SHELL$$
-# abomination module:rvs:lib:rvsdb
-#name='rvs db'
-#ver='0.6.3'
-logver='0.6.0'
-# Copyright (C) 2009 Luke Shumaker
-# This program 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.
-#
-# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-
-source "$RVSDIR/lib/stdio"
-
-# getid file
-getid() {
- #md5sum $file | sed "s/ .*$//"
- sha1sum $file | sed "s/ .*$//"
-}
-
-# loginit LOG
-loginit() {
- log="$1"
- echo "#!rvsdb $logver" > "$log";
-}
-
-# lograw LOG
-lograw() {
- log="$1"
- sed '1s/#!rvsdb .*//' "$log"
-}
-
-# _find LOG FIELD VAL
-_find() {
- log="$1"
- field="$2"
- val="$3"
- lograw $log | \
- cut -d : -f field | \
- sed -n "/^$val$/=" | \
- tr "\n" , | \
- sed 's/,$//'
-}
-
-# logread LOG VAR
-logread() {
- log="$1"
- var="$2"
- lograw "$log" | sed -n "s/^$var://p"
- #lograw "$log" | sed -n `_find "$log" '1' "$var"`p | cut -d : -f 2-
-}
-
-# logwrite LOG VAR VAL
-logwrite() {
- log="$1"
- var="$2"
- val="$3"
-
-# #lines=`_find "$log" '1' "$var"`
-# #if [ "$lines" = '' ]; then
-# if [ "`lograw "$log" | grep "^$var:"`" == '' ]; then
-# # no exiswhereting occurances
-# echo "$var:$val" >> "$log"
-# else
-# # found others
-# # escape slashes
-# var=`echo "$var" | sed 's:/:\\\\/:g'`
-# val=`echo "$val" | sed 's:/:\\\\/:g'`
-# sed -i "s/^$var:.*$/$var:$val/" "$log"
-# #lograw "$log" | ??????
-# fi
- echo "$var:$val" >> $log
-}
-
-# logfind LOG VAL
-logfind() {
- log="$1"
- val="$2"
- # make a comma-delimeted list of the lines with our values
- lines=`_find "$log" '2-' "$val"`
- lograw "$log" | sed -n ${lines}p | cut -d : -f 1
-}
-
diff --git a/src/rvs-core/lib/stdio.sh b/src/rvs-core/lib/stdio.sh
deleted file mode 100644
index 8facc79..0000000
--- a/src/rvs-core/lib/stdio.sh
+++ /dev/null
@@ -1,60 +0,0 @@
-#!$$SHELL$$
-# abomination module:rvs:lib:stdio
-#name='rvs stdio'
-#ver='0.6.2'
-#usage=''
-# Copyright (C) 2009 Luke Shumaker
-# This program 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.
-#
-# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-
-verbose() {
- if [ "$volume" == '-v' ]; then
- echo $@
- fi
-}
-
-out() {
- if [ "$volume" != '-q' ]; then
- echo $@
- fi
-}
-
-warn () {
- echo "$name: $1" >> /dev/stderr
-}
-
-error() {
- warn "$1"
- cat << __error__ >> /dev/stderr
-Usage: $name $usage
-
-Try \`$name --help\' for more options.
-__error__
- exit 1
-}
-
-fatal () {
- warn "$1"
- exit 1
-}
-
-version() {
- echo "$name $ver"
- if [ "$volume" != '-q' ]; then
- cat << __disclaimer__
-$name is copyright (C) 2009 Luke Shumaker
-This program 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.
-
-Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-__disclaimer__
- fi
- exit 0
-}
-
diff --git a/src/rvs-core/repo.sh b/src/rvs-core/repo.sh
deleted file mode 100644
index 1db22c9..0000000
--- a/src/rvs-core/repo.sh
+++ /dev/null
@@ -1,29 +0,0 @@
-#!$$SHELL$$
-# abomination rvs init
-name='rvs repo'
-ver='0.6.3'
-usage='[OPTIONS]'
-# Copyright (C) 2009 Luke Shumaker
-# This program 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.
-#
-# Originally written by Luke Shumaker <lukeshu@sbcglobal.net>.
-
-source "$RVSDIR/lib/stdio"
-
-repo='.rvs'
-pwd=`pwd`
-
-while [ "$pwd" != "`pwd`" ] && [ ! -e "`pwd`/$repo" ]; do
- pwd=`pwd`
- cd ..
-done
-
-if [ -e "`pwd`/$repo" ]; then
- echo "`pwd`/$repo"
-else
- fatal 'no rvs repository found'
-fi
-