diff options
author | Tar Committer <tar@ocjtech.us> | 2000-11-19 22:01:05 +0000 |
---|---|---|
committer | Tar Committer <tar@ocjtech.us> | 2000-11-19 22:01:05 +0000 |
commit | 1651adc35224e149715bd85af4ba108c5ee184bc (patch) | |
tree | f83b6af44ffb10f2c042b822b2f3469582a129ca /bin/rancid-fe | |
parent | 3861ba4cf180eb01fd98a16f4502702ab217e56f (diff) | |
download | rancid-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')
-rwxr-xr-x | bin/rancid-fe | 43 |
1 files changed, 0 insertions, 43 deletions
diff --git a/bin/rancid-fe b/bin/rancid-fe deleted file mode 100755 index e3fa735..0000000 --- a/bin/rancid-fe +++ /dev/null @@ -1,43 +0,0 @@ -#!/usr/local/bin/perl -## -## -## 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); |