ktest: remove get_grub2_index
Remove get_grub2_index() because it isn't used anywhere. Link: http://lkml.kernel.org/r/20190509213647.6276-6-msys.mizuma@gmail.com Signed-off-by: Masayoshi Mizuma <m.mizuma@jp.fujitsu.com> Signed-off-by: Steven Rostedt (VMware) <rostedt@goodmis.org>
This commit is contained in:
parent
cc2eb3a2f8
commit
00603cd687
@ -1916,42 +1916,6 @@ sub _get_grub_index {
|
|||||||
$last_machine = $machine;
|
$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 {
|
sub get_grub_index {
|
||||||
|
|
||||||
my $command;
|
my $command;
|
||||||
|
Loading…
Reference in New Issue
Block a user