From 0fdb6b8448e0e909289b9aa8308ec7434b5cda99 Mon Sep 17 00:00:00 2001
From: Luke Shumaker <LukeShu@sbcglobal.net>
Date: Wed, 31 Mar 2010 08:42:46 -0600
Subject: add comments and tag plugins to rvs

---
 rvs/plugins/files/bin/gettype.sh | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)
 create mode 100644 rvs/plugins/files/bin/gettype.sh

(limited to 'rvs/plugins/files/bin/gettype.sh')

diff --git a/rvs/plugins/files/bin/gettype.sh b/rvs/plugins/files/bin/gettype.sh
new file mode 100644
index 0000000..84eb9da
--- /dev/null
+++ b/rvs/plugins/files/bin/gettype.sh
@@ -0,0 +1,39 @@
+#!/bin/sh
+name='rvs @ID@ gettype'
+ver=0.9
+#  Copyright (C) 2009-2010 Luke Shumaker
+#  
+#  This program 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 of the
+#  License, or (at your option) any later version.
+#  
+#  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.
+#  
+#  You should have received a copy of the GNU General Public License
+#  along with this program;  see the file COPYING.
+#  If not, see <http://www.gnu.org/licenses>.
+
+. "$LIBDIR/@ID@/stdio"
+
+usage="usage: $RVS gettype FILE"
+file=${1?"$usage"}
+
+if [ ! -e "$file" ]; then
+	fatal "file \`$file' does not exist";
+else
+	type=''
+	for check in "$ETCDIR/@ID@/"*; do
+		type=`"$check" "$file"`
+		if [ -n "$type" ]; then break; fi
+	done
+	if [ -n "$type" ]; then
+		echo "$type"
+	else
+		fatal "cannot handle file type of \`$file'"
+	fi
+fi
+
-- 
cgit v1.2.3