[<prev] [next>] [<thread-prev] [thread-next>] [day] [month] [year] [list]
Message-Id: <20190509174630.26713-5-msys.mizuma@gmail.com>
Date: Thu, 9 May 2019 13:46:29 -0400
From: Masayoshi Mizuma <msys.mizuma@...il.com>
To: Steven Rostedt <rostedt@...dmis.org>
Cc: Masayoshi Mizuma <msys.mizuma@...il.com>,
Masayoshi Mizuma <m.mizuma@...fujitsu.com>,
linux-kernel@...r.kernel.org
Subject: [PATCH 4/5] ktest: remove get_grub2_index
From: Masayoshi Mizuma <m.mizuma@...fujitsu.com>
Remove get_grub2_index() because it isn't used anywhere.
Signed-off-by: Masayoshi Mizuma <m.mizuma@...fujitsu.com>
---
tools/testing/ktest/ktest.pl | 36 ------------------------------------
1 file changed, 36 deletions(-)
diff --git a/tools/testing/ktest/ktest.pl b/tools/testing/ktest/ktest.pl
index c910d7921f48..e965751ad2da 100755
--- a/tools/testing/ktest/ktest.pl
+++ b/tools/testing/ktest/ktest.pl
@@ -1904,42 +1904,6 @@ sub _get_grub_index {
$last_machine = $machine;
}
-sub get_grub2_index {
-
- return if (defined($grub_number) && defined($last_grub_menu) &&
- $last_grub_menu eq $grub_menu && defined($last_machine) &&
- $last_machine eq $machine);
-
- doprint "Find grub2 menu ... ";
- $grub_number = -1;
-
- my $ssh_grub = $ssh_exec;
- $ssh_grub =~ s,\$SSH_COMMAND,cat $grub_file,g;
-
- open(IN, "$ssh_grub |")
- or dodie "unable to get $grub_file";
-
- my $found = 0;
- my $grub_menu_qt = quotemeta($grub_menu);
-
- while (<IN>) {
- if (/^menuentry.*$grub_menu_qt/) {
- $grub_number++;
- $found = 1;
- last;
- } elsif (/^menuentry\s|^submenu\s/) {
- $grub_number++;
- }
- }
- close(IN);
-
- dodie "Could not find '$grub_menu' in $grub_file on $machine"
- if (!$found);
- doprint "$grub_number\n";
- $last_grub_menu = $grub_menu;
- $last_machine = $machine;
-}
-
sub get_grub_index {
my $command;
--
2.20.1
Powered by blists - more mailing lists