diff options
author | V3n3RiX <venerix@redcorelinux.org> | 2018-07-14 21:03:06 +0100 |
---|---|---|
committer | V3n3RiX <venerix@redcorelinux.org> | 2018-07-14 21:03:06 +0100 |
commit | 8376ef56580626e9c0f796d5b85b53a0a1c7d5f5 (patch) | |
tree | 7681bbd4e8b05407772df40a4bf04cbbc8afc3fa /dev-perl/Net-Telnet-Cisco | |
parent | 30a9caf154332f12ca60756e1b75d2f0e3e1822d (diff) |
gentoo resync : 14.07.2018
Diffstat (limited to 'dev-perl/Net-Telnet-Cisco')
6 files changed, 210 insertions, 0 deletions
diff --git a/dev-perl/Net-Telnet-Cisco/Manifest b/dev-perl/Net-Telnet-Cisco/Manifest new file mode 100644 index 000000000000..c82b24f235c6 --- /dev/null +++ b/dev-perl/Net-Telnet-Cisco/Manifest @@ -0,0 +1,7 @@ +AUX 1.10-warning.patch 571 BLAKE2B 6f1bbd62c172d5ea7b392d03b371176c31363078bad1dfa56fe758aff83c3453727b056d6c558f8d1a238c39398cde4ef9871c7e562340711bad8fab5e715fd0 SHA512 a1b34d57d3dd68c360d47fc5db20ddafd8cad2c7e0927b89410d39e5d6300a5eef38c58a776399b2745275fb97b337700887dc264fb20c852da5f0af85b35f2f +AUX Net-Telnet-Cisco-1.11-no-interactive-test.patch 3561 BLAKE2B 32e91eb50abf5bb0460f41edd225b1d575f20dc56f8704427798f5d590d83ad117a59c2789748407919fb3f7f7c2f431ff39377200640092c0edabc80490a87d SHA512 b1e162b90a03a7cd1ce59898ed4a9575928216e9af0ef724df41fd4303c1b1a18218cbb45303c1e1588927cee4dc6d15b6e52c060abfa99d04f58ef74dfbc1dc +DIST Net-Telnet-Cisco-1.10.tar.gz 17579 BLAKE2B 0fd21fcb58d7d0b8474df3e04b28cc8e2ae978f1d02f2c050bc9974b39f1b531ff159f9282aec9d17ddae309ff902a0a5eeacdf9903acfd5ee503f803d9cdb00 SHA512 1fcae8e54425a2ddf2e32c772886af97d308421eb664abb296ec16e97531c2eb6727ea4607d48fa957e9a926dc5b88bfffdfa75da10793f4f0247fa3b1f45672 +DIST Net-Telnet-Cisco-1.11.tar.gz 19282 BLAKE2B 39925b96a8d709f58012c12ec368c48a54549a324ae0fbcdc4cf97daed034b6cb76639b3fda1c3b77824e5c702f6b8e5abc4093558888788ce6cac19342575c4 SHA512 b12da84517df470d40d56a54e8d8c7b331bed87c3c330da7fc1efb7d078805e6f7348f0b52971d3c1b4e3d39014d76bbe7535c40ad3afa7efcf567521ddf0c4b +EBUILD Net-Telnet-Cisco-1.100.0-r1.ebuild 434 BLAKE2B 5323a16af3001c0437af5fc9abc7d85aa653770bcbacc6f6d8d0f732281a2e4b69abd52f884a8a2d788807ea13d92c34d25f7af2531808c716d4a977f93168ba SHA512 33de8f4bf3fe849a47a2f242108b5f749814c1f49d808e19a954bf7321ee08db3aa8c040776801b3bbd1e7d0349b90fad9a3f7c3bb08ae3ef3728ba9a6993c87 +EBUILD Net-Telnet-Cisco-1.110.0.ebuild 845 BLAKE2B 3cb07eb6c39e02750d178c2a016cec5a3d0eeec4821e40530e7ed5d0821c439aa3b23ab4e9553b88114bb931f8aa5089a9b785e93fb05ea2eadf999614d27361 SHA512 1b08acc896f22898f93d3166b7b4cdf392e9b4ca04e9a371c1f4e7e84413fb27c917fdd529739e0ef0eb826858fdbb7a041972e4a206e008286d5ade9d8f8cbd +MISC metadata.xml 405 BLAKE2B 69bc843b13f3d936e191bc1a233e73d7e53567a18e272199fe14b5959d594158835de317f754c2edd20031e1987ab1a67385e7a8f68f72e5059c76418da05bb8 SHA512 8d84c7d06d47dc52c1a9a8f5fa64bf013283a1dad3b3e112d3ed0c8a16d367e04eb5c12326f97448771ac9b340863ad5a11f51b6a427271d15f2f62029787c75 diff --git a/dev-perl/Net-Telnet-Cisco/Net-Telnet-Cisco-1.100.0-r1.ebuild b/dev-perl/Net-Telnet-Cisco/Net-Telnet-Cisco-1.100.0-r1.ebuild new file mode 100644 index 000000000000..d766bb4158d2 --- /dev/null +++ b/dev-perl/Net-Telnet-Cisco/Net-Telnet-Cisco-1.100.0-r1.ebuild @@ -0,0 +1,20 @@ +# Copyright 1999-2014 Gentoo Foundation +# Distributed under the terms of the GNU General Public License v2 + +EAPI=5 + +MODULE_AUTHOR=JOSHUA +MODULE_VERSION=1.10 +inherit perl-module + +DESCRIPTION="Automate telnet sessions w/ routers&switches" + +SLOT="0" +KEYWORDS="alpha amd64 hppa ia64 ~mips ~ppc ppc64 sparc x86" +IUSE="" + +RDEPEND="dev-perl/Net-Telnet + dev-perl/TermReadKey" +DEPEND="${RDEPEND}" + +PATCHES=( "${FILESDIR}/1.10-warning.patch" ) diff --git a/dev-perl/Net-Telnet-Cisco/Net-Telnet-Cisco-1.110.0.ebuild b/dev-perl/Net-Telnet-Cisco/Net-Telnet-Cisco-1.110.0.ebuild new file mode 100644 index 000000000000..238f2c98ec18 --- /dev/null +++ b/dev-perl/Net-Telnet-Cisco/Net-Telnet-Cisco-1.110.0.ebuild @@ -0,0 +1,31 @@ +# Copyright 1999-2017 Gentoo Foundation +# Distributed under the terms of the GNU General Public License v2 + +EAPI=6 + +DIST_AUTHOR=VINSWORLD +DIST_VERSION=1.11 +inherit perl-module + +DESCRIPTION="Automate telnet sessions w/ routers&switches" + +SLOT="0" +KEYWORDS="~alpha ~amd64 ~hppa ~ia64 ~mips ~ppc ~ppc64 ~sparc ~x86" +IUSE="test" + +RDEPEND=">=dev-perl/Net-Telnet-3.20.0" +DEPEND="${RDEPEND} + virtual/perl-ExtUtils-MakeMaker + test? ( dev-perl/TermReadKey ) +" +PATCHES=( "${FILESDIR}/${PN}-1.11-no-interactive-test.patch" ) +PERL_RM_FILES=( "t/02-pod-coverage.t" ) + +src_test() { + if [[ -z $CISCO_TEST_ROUTER ]]; then + elog "Comprehensive testing requires a configured, network accessible Cisco Router" + elog "to test against. For details, see:" + elog "https://wiki.gentoo.org/wiki/Project:Perl/maint-notes/${CATEGORY}/${PN}" + fi + perl-module_src_test +} diff --git a/dev-perl/Net-Telnet-Cisco/files/1.10-warning.patch b/dev-perl/Net-Telnet-Cisco/files/1.10-warning.patch new file mode 100644 index 000000000000..1ec11726ce1c --- /dev/null +++ b/dev-perl/Net-Telnet-Cisco/files/1.10-warning.patch @@ -0,0 +1,15 @@ +https://bugs.gentoo.org/show_bug.cgi?id=192808 +http://rt.cpan.org/Public/Bug/Display.html?id=7796 + +diff -ru Net-Telnet-Cisco-1.10/Cisco.pm Net-Telnet-Cisco-1.10/Cisco.pm +--- Net-Telnet-Cisco-1.10/Cisco.pm 2002-06-18 19:17:03.000000000 +0200 ++++ Net-Telnet-Cisco-1.10/Cisco.pm 2008-05-08 20:59:09.000000000 +0200 +@@ -753,7 +753,7 @@ + 1 while s/[^\cH\c?][\cH\c?]//mg; # ^H ^? + s/^.*\cU//mg; # ^U + +- return wantarray ? split /$/mg, $_ : $_; # ORS instead? ++ return wantarray ? split /$/m, $_ : $_; # ORS instead? + } + + # Lifted from Net::Telnet en toto diff --git a/dev-perl/Net-Telnet-Cisco/files/Net-Telnet-Cisco-1.11-no-interactive-test.patch b/dev-perl/Net-Telnet-Cisco/files/Net-Telnet-Cisco-1.11-no-interactive-test.patch new file mode 100644 index 000000000000..7ab7b2ad20ab --- /dev/null +++ b/dev-perl/Net-Telnet-Cisco/files/Net-Telnet-Cisco-1.11-no-interactive-test.patch @@ -0,0 +1,125 @@ +From 60d93af35887e53677be5a0f95591489c2683c73 Mon Sep 17 00:00:00 2001 +From: Kent Fredric <kentnl@gentoo.org> +Date: Wed, 13 Dec 2017 18:42:56 +1300 +Subject: Remove test interactivity + +Pass configuration by enviroment variables and don't prompt. +--- + test.pl | 82 ++++++++++++++++------------------------------------------------- + 1 file changed, 20 insertions(+), 62 deletions(-) + +diff --git a/test.pl b/test.pl +index 369bc30..e9f7ae2 100644 +--- a/test.pl ++++ b/test.pl +@@ -5,14 +5,8 @@ + + use Test::More tests => 32; + #use Test::More qw/no_plan/; +-use ExtUtils::MakeMaker qw/prompt/; + use Carp; + use Cwd; +-my $HAVE_Term_ReadKey = 0; +-eval "use Term::ReadKey"; +-if(!$@) { +- $HAVE_Term_ReadKey = 1 +-} + + use vars qw/$ROUTER $PASSWD $LOGIN $S $EN_PASS $PASSCODE/; + +@@ -161,18 +155,9 @@ END { cleanup() }; + + sub cleanup { + return unless -f "input.log" || -f "dump.log"; +- +- print <<EOB; +- +-Would you like to delete the test logs? They will contain +-security info like your login and passwords. If you ran +-into problems and wish to investigate, you can save them +-and manually delete them later. +-EOB +- + my $dir = cwd(); + +- my $ans = prompt("Delete logs", "y"); ++ my $ans = "y"; + if ($ans eq "y") { + print "Deleting logs in $dir..."; + unlink "input.log" or warn "Can't delete input.log! $!"; +@@ -183,53 +168,26 @@ EOB + } + } + +-sub get_login { +- print <<EOB; +- +-Net::Telnet::Cisco needs to log into a router to +-perform it\'s full suite of tests. To log in, we +-need a test router, a login, a password, an +-optional enable password, and an optional +-SecurID/TACACS PASSCODE. +- +-To skip these tests, hit "return". +- +-EOB +- +- $ROUTER = prompt("Router:", $ROUTER) or return; +- $LOGIN = prompt("Login:", $LOGIN) or return; +- $PASSWD = passprompt("Password:", $PASSWD) or return; +- $EN_PASS = passprompt("Enable password [optional]:", $EN_PASS); +- $PASSCODE = passprompt("SecurID/TACACS PASSCODE [optional]:", $PASSCODE); ++sub maskpass { ++ return 'not set' unless defined $_[0]; ++ return ( '*' x ( length $_[0] ) ) . ' [masked]'; + } + ++sub get_login { ++ $ROUTER = $ENV{CISCO_TEST_ROUTER} or return; ++ $LOGIN = $ENV{CISCO_TEST_LOGIN} or return; ++ $PASSWD = $ENV{CISCO_TEST_PASSWORD} or return; ++ $EN_PASS = $ENV{CISCO_TEST_ENABLE_PASSWORD}; ++ $PASSCODE = $ENV{CISCO_TEST_PASSCODE}; ++ ++ printf STDERR ++ <<EOB, $ROUTER, $LOGIN, maskpass($PASSWD), maskpass($EN_PASS), maskpass($PASSCODE); ++Using the following configuration for testing: ++ Router: %s ++ Login: %s ++ Password: %s ++ Enable Password: %s ++ SecureID/TACACS PASSCODE: %s + +-# Lifted from ExtUtils::MakeMaker. +-# +-# If the user has Term::ReadKey, we can hide any passwords +-# they type from shoulder-surfing attacks. +-# +-# Args: "Question for user", "optional default answer" +-sub passprompt ($;$) { +- my($mess,$def)=@_; +- $ISA_TTY = -t STDIN && (-t STDOUT || !(-f STDOUT || -c STDOUT)) ; # Pipe? +- Carp::confess("prompt function called without an argument") unless defined $mess; +- my $dispdef = defined $def ? "[$def] " : " "; +- $def = defined $def ? $def : ""; +- my $ans; +- local $|=1; +- print "$mess $dispdef"; +- if ($ISA_TTY) { +- if ( $Term::ReadKey::VERSION ) { +- ReadMode( 'noecho' ); +- chomp($ans = ReadLine(0)); +- ReadMode( 'normal' ); +- print "\n"; +- } else { +- chomp($ans = <STDIN>); +- } +- } else { +- print "$def\n"; +- } +- return ($ans ne '') ? $ans : $def; ++EOB + } +-- +2.14.3 + diff --git a/dev-perl/Net-Telnet-Cisco/metadata.xml b/dev-perl/Net-Telnet-Cisco/metadata.xml new file mode 100644 index 000000000000..60ce11af08f4 --- /dev/null +++ b/dev-perl/Net-Telnet-Cisco/metadata.xml @@ -0,0 +1,12 @@ +<?xml version="1.0" encoding="UTF-8"?> +<!DOCTYPE pkgmetadata SYSTEM "http://www.gentoo.org/dtd/metadata.dtd"> +<pkgmetadata> + <maintainer type="project"> + <email>perl@gentoo.org</email> + <name>Gentoo Perl Project</name> + </maintainer> + <upstream> + <remote-id type="cpan">Net-Telnet-Cisco</remote-id> + <remote-id type="cpan-module">Net::Telnet::Cisco</remote-id> + </upstream> +</pkgmetadata> |