From 20c837d94fdd1eaa90b2c75e4d3796315fb07470 Mon Sep 17 00:00:00 2001
From: lissav <lissav@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 12 Dec 2007 13:39:25 +0000
Subject: [PATCH] Support xdsh api interface

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@163 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT-2.0/xCAT/DSHContext.pm | 71 ++++++++++++++++++++++++++++++++
 1 file changed, 71 insertions(+)
 create mode 100644 perl-xCAT-2.0/xCAT/DSHContext.pm

diff --git a/perl-xCAT-2.0/xCAT/DSHContext.pm b/perl-xCAT-2.0/xCAT/DSHContext.pm
new file mode 100644
index 000000000..99ffe3f41
--- /dev/null
+++ b/perl-xCAT-2.0/xCAT/DSHContext.pm
@@ -0,0 +1,71 @@
+#!/usr/bin/env perl
+# IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
+
+package xCAT::DSHContext;
+
+use locale;
+
+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;