Imported from rancid-2.0.tar.gz.rancid-2.0

1 files changed, 43 insertions, 0 deletions

diff --git a/bin/rancid-fe.in b/bin/rancid-fe.in
new file mode 100755
index 0000000..8e5d333
--- /dev/null
+++ b/bin/rancid-fe.in
@@ -0,0 +1,43 @@
+#!@PERLV_PATH@
+##
+##
+## Copyright (C) 1997 by Henry Kilmer.
+## All rights reserved.
+##
+## This software may be freely copied, modified and redistributed without
+## fee for non-commerical purposes provided that this copyright notice is
+## preserved intact on all copies and modified copies.
+##
+## There is no warranty or other guarantee of fitness of this software.
+## It is provided solely "as is". The author(s) disclaim(s) all
+## responsibility and liability with respect to this software's usage
+## or its effect upon hardware, computer systems, other software, or
+## anything else.
+##
+##
+#
+#  rancid-FE - front-end to rancid/jrancid for use with par. 
+#
+# usage: rancid-fe <router>:<vendor>
+#
+
+require 5;
+
+($router, $vendor) = split('\:', $ARGV[0]);
+
+if ($vendor =~ /^cisco$/i) {
+    exec('rancid', $router);
+} elsif ($vendor =~ /^cat5$/i) {
+    exec('cat5rancid', $router);
+} elsif ($vendor =~ /^ezt3$/i) {
+    exec('erancid', $router);
+} elsif ($vendor =~ /^juniper$/i) {
+    exec('jrancid', $router);
+} elsif ($vendor =~ /^foundry$/i) {
+    exec('francid', $router);
+} elsif ($vendor =~ /^redback$/i) {
+    exec('rrancid', $router);
+}
+
+printf(STDERR "unknown router manufacturer for $router: $vendor\n");
+exit(-1);