2
0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-05-31 18:16:39 +00:00
xcat-core/perl-xCAT/xCAT/DSHContext.pm
2016-07-20 11:40:27 -04:00

72 lines
998 B
Perl

#!/usr/bin/env perl
# IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
package xCAT::DSHContext;
use locale;
use strict;
require xCAT::DSHCore;
sub valid_context {
return 1;
}
sub context_defaults {
my %defaults = ();
$defaults{'NodeRemoteShell'} = '/usr/bin/rsh';
return \%defaults;
}
sub context_properties {
return;
}
sub all_devices {
return undef;
}
sub all_devicegroups {
return undef;
}
sub all_nodes {
return undef;
}
sub all_nodegroups {
return undef;
}
sub devicegroup_members {
return undef;
}
sub nodegroup_members {
return undef;
}
sub resolve_device {
return undef;
}
sub resolve_node {
return 1;
}
sub verify_target {
return 127;
}
sub verify_mode {
return "NOXCAT";
}
sub resolve_hostnames {
my ($class, $resolved_targets, $unresolved_targets, @target_list) = @_;
xCAT::DSHCore->resolve_hostnames(undef, $resolved_targets, $unresolved_targets,
undef, @target_list);
}
1;