summaryrefslogtreecommitdiffstats
path: root/bin/rancid-fe.in
diff options
context:
space:
mode:
authorTar Committer <tar@ocjtech.us>2000-11-19 22:01:05 +0000
committerTar Committer <tar@ocjtech.us>2000-11-19 22:01:05 +0000
commit1651adc35224e149715bd85af4ba108c5ee184bc (patch)
treef83b6af44ffb10f2c042b822b2f3469582a129ca /bin/rancid-fe.in
parent3861ba4cf180eb01fd98a16f4502702ab217e56f (diff)
downloadrancid-1651adc35224e149715bd85af4ba108c5ee184bc.tar.gz
rancid-1651adc35224e149715bd85af4ba108c5ee184bc.tar.xz
rancid-1651adc35224e149715bd85af4ba108c5ee184bc.zip
Imported from rancid-2.0.tar.gz.rancid-2.0
Diffstat (limited to 'bin/rancid-fe.in')
-rwxr-xr-xbin/rancid-fe.in43
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);