Hi Bauzo,
Below is the code snippet to create a new cluster and then add a host to it. I have hard-coded all the values (Datacenter name, Host IP, etc.) but you can change these to suit your needs. I added few comments in the script so that it becomes self explanatory in terms of what it does. I have only used the minimal set of options wherever required, for additional option refer to the SDK and you should be able to add complexity to it.
sub create_cluster {
.# search for the datacenter where you want to create the cluster. 'DC1' in my example
my $datacenter_views =
Vim::find_entity_views (view_type => 'Datacenter',
filter => { name => 'DC1'});
unless (@$datacenter_views)
if ($#{$datacenter_views} != 0)
my $datacenter = shift @$datacenter_views;
my $host_folder_view = Vim::get_view(mo_ref => $datacenter->hostFolder);
.# create a ClusterConfig Spec. This will be with the default cluster settings. For additional setting you would need to add different parameters in the line below. refer to the SDK for the different options.
my $ccspec = ClusterConfigSpec->new();
my $new_cr;
eval {
.# actually create a a cluster named 'MyCluster'
$new_cr = $host_folder_view->CreateCluster(name => 'MyCluster',
spec => $ccspec);
Util::trace(0, "\nSuccessfully created Cluster : 'MyCluster'\n");
};
if ($@)
if (defined $new_cr) {
eval {
my $cr_ref = Vim::get_view(mo_ref => $new_cr);
.# create a HostConnectSpec Spec. Below I have only specified the mandatory options. for other possible options refer to the SDK
my $hcspec = HostConnectSpec->new(force => 1,
hostName => '10.100.0.1',
password => 'mypassword',
userName => 'root'
);
.# actually add the host '10.100.0.1' to the newly created cluster. Again there are more options that you can try these are the minimal set
$cr_ref->AddHost_Task(spec => $hcspec,
asConnected => 0
);
};
if ($@)
}
}
Hope the code helps. Do reply back with your queries/comments.
~ Sidharth
