VMware Tools Update Policy, errrrr, Updating

After hearing about the bug with ESX 3.5 Update 3 where a vMotion would cause a tools upgrade, and consequentially a VM reboot, I wanted to check and verify that my VMs would not exhibit this behavior. Apparently the bug is present when the tools update policy is set to “Update at Power On”. (Yes, I admit this bug has been known for a while, I just kept forgetting to post this script.)

There are a multitude of other scripts (including the powershell cmdlet “update-tools”) out there to kickoff a tools update task, so I wasn’t interested in that, all I wanted was to know the update policy and be able to change it.

This perl is the result of that…

#!/usr/bin/perl -w
#
# cfg-vmtools-upgrade.pl - written by Andrew Sullivan, 2008-12-30, http://www.get-admin.com
# 
# Report bugs and request improvements at http://get-admin.com/blog/?p=279
#
# This script does one of two things when executed: 
#   1) reports on the upgrade policy for the VMware tools in a VM
#      and reports on the tools status (up-to-date, out-of-date, etc).
#   2) modifies the upgrade policy to one of the two valid values - manual
#      or upgradeAtPowerCycle if --update is specified
#
# I created this script in response to a bug that was discovered in ESX 3.5 U3 where a
# vMotion will trigger a tools upgrade, causing the VM to reboot itself.  See 
# http://kb.vmware.com/kb/1007501 for more information.
#
# Example usage:
#   Show policy and status for all VMs in vCenter
#     ./cfg-vmtools-upgrade.pl --server your.vc.server
#
#   Show policy and status for only certain VMs
#     ./cfg-vmtools-upgrade.pl --server your.vc.server --vm vm1,vm2,vm3
#     ./cfg-vmtools-upgrade.pl --server your.vc.server --vm vm4
#
#   Change the policy for all VMs to manual
#     ./cfg-vmtools-upgrade.pl --server your.vc.server --update
#
#   Change the policy for one VM to powercycle
#     ./cfg-vmtools-upgrade.pl --server your.vc.server --update --vm vm5 --policy powercycle
#

use strict;
use warnings;

use FindBin;
use lib "$FindBin::Bin/../";

use VMware::VIRuntime;

# add some additional options
my %opts = (
	'policy' =&gt; {
		type =&gt; ":s",
		help =&gt; "The upgrade policy for VMware Tools on the VM.  Valid values are 'manual'"
			. "and 'powercycle'.",
		required =&gt; 0,
		default =&gt; "manual"
	},

	'vm' =&gt; {
		type =&gt; ":s",
		help =&gt; "The VM, or VMs, to apply the new setting to.  If multiple VMs are to be "
			. "modified, separate them with commas.  If this option is not specified,"
			. " it will default to all VMs on the host.",
		required =&gt; 0,
		default =&gt; "all"
	},

	'update' =&gt; {
		type =&gt; ":s",
		help =&gt; "If provided, will update the current policy for each VM specified (or "
			. "all VMs).  If not provided, will display the current policy and status.",
		required =&gt; 0,
		default =&gt; "false"
		
		# if --update is provided at the command line it is an empty string when retrieved
		# via Opts::get_option.  This makes it easy to check and see if it was passed, cause if
		# it's not present at all, then it is set to the default above.
	}
);

Opts::add_options(%opts);
Opts::parse();
Opts::validate(&amp;validate);

Util::connect();

chomp( my $provided_vm_list = Opts::get_option('vm') );
my @VMs;

if ($provided_vm_list =~ m/,/) {
	my @vmList = split(/,/, $provided_vm_list);

	foreach (@vmList) {
		my $virtualMachine = Vim::find_entity_view(
			view_type =&gt; 'VirtualMachine',
			filter =&gt; { 'name' =&gt; qr/($_)/i }
		);

		if ($virtualMachine) {
			push(@VMs, $virtualMachine);
		}
	}

} elsif ($provided_vm_list eq "all") {

	my $virtualMachines = Vim::find_entity_views(
		view_type =&gt; 'VirtualMachine'
	);

	foreach (@$virtualMachines) {
		push(@VMs, $_);
	}
} else {
	my $virtualMachine = Vim::find_entity_view(
		view_type =&gt; 'VirtualMachine',
		filter =&gt; { 'name' =&gt; qr/($provided_vm_list)/i }
	);

	push(@VMs, $virtualMachine);
}


# expand the shorthand "powercycle" to the valid value.
# "manual" is the correct value to provide to the operation, so we don't have to
# worry about it.
my $policy = Opts::get_option('policy');

if ($policy eq "powercycle") {
	$policy = "upgradeAtPowerCycle";
}

foreach (@VMs) {
	if (Opts::get_option('update') eq "false") {
		print $_-&gt;name . ": " 
			. "ntUpgrade Policy: " . $_-&gt;config-&gt;tools-&gt;toolsUpgradePolicy;

		if (defined($_-&gt;summary-&gt;guest-&gt;toolsStatus)) {
			print "ntTools Status:   " . $_-&gt;summary-&gt;guest-&gt;toolsStatus-&gt;val . "n";
		} else {
			print "ntTools Status: Unknownn";
		}
			
	} else {
		eval {
			my $toolsConfigInfo = ToolsConfigInfo-&gt;new(
				'toolsUpgradePolicy' =&gt; $policy
			);

			my $configSpec = VirtualMachineConfigSpec-&gt;new(
				'tools' =&gt; $toolsConfigInfo
			);

			# blocking method, which should give us an error in the below section...
			$_-&gt;ReconfigVM(
				'spec' =&gt; $configSpec
			);
		};

		# do some error checking
		if ($@) {
			Util::trace(0, "Error: "  . $@ . "n");
		}
	}
}

Util::disconnect();

sub validate {
	my $policy = Opts::get_option('policy');
	my $valid = 0;

	if ($policy eq "manual" || $policy eq "powercycle") {
		$valid = 1;
	}

	return $valid;
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

#!/usr/bin/perl -w

# cfg-vmtools-upgrade.pl - written by Andrew Sullivan, 2008-12-30, http://www.get-admin.com

# Report bugs and request improvements at http://get-admin.com/blog/?p=279

# This script does one of two things when executed:

# 1) reports on the upgrade policy for the VMware tools in a VM

# and reports on the tools status (up-to-date, out-of-date, etc).

# 2) modifies the upgrade policy to one of the two valid values - manual

# or upgradeAtPowerCycle if --update is specified

# I created this script in response to a bug that was discovered in ESX 3.5 U3 where a

# vMotion will trigger a tools upgrade, causing the VM to reboot itself. See

# http://kb.vmware.com/kb/1007501 for more information.

# Example usage:

# Show policy and status for all VMs in vCenter

# ./cfg-vmtools-upgrade.pl --server your.vc.server

# Show policy and status for only certain VMs

# ./cfg-vmtools-upgrade.pl --server your.vc.server --vm vm1,vm2,vm3

# ./cfg-vmtools-upgrade.pl --server your.vc.server --vm vm4

# Change the policy for all VMs to manual

# ./cfg-vmtools-upgrade.pl --server your.vc.server --update

# Change the policy for one VM to powercycle

# ./cfg-vmtools-upgrade.pl --server your.vc.server --update --vm vm5 --policy powercycle

use strict;

use warnings;

use FindBin;

use lib "$FindBin::Bin/../";

use VMware::VIRuntime;

# add some additional options

my %opts = (

'policy' => {

type => ":s",

help => "The upgrade policy for VMware Tools on the VM. Valid values are 'manual'"

. "and 'powercycle'.",

required => 0,

default => "manual"

'vm' => {

type => ":s",

help => "The VM, or VMs, to apply the new setting to. If multiple VMs are to be "

. "modified, separate them with commas. If this option is not specified,"

. " it will default to all VMs on the host.",

required => 0,

default => "all"

'update' => {

type => ":s",

help => "If provided, will update the current policy for each VM specified (or "

. "all VMs). If not provided, will display the current policy and status.",

required => 0,

default => "false"

# if --update is provided at the command line it is an empty string when retrieved

# via Opts::get_option. This makes it easy to check and see if it was passed, cause if

# it's not present at all, then it is set to the default above.

}

);

Opts::add_options(%opts);

Opts::parse();

Opts::validate(&validate);

Util::connect();

chomp( my $provided_vm_list = Opts::get_option('vm') );

my @VMs;

if ($provided_vm_list =~ m/,/) {

my @vmList = split(/,/, $provided_vm_list);

foreach (@vmList) {

my $virtualMachine = Vim::find_entity_view(

view_type => 'VirtualMachine',

filter => { 'name' => qr/($_)/i }

);

if ($virtualMachine) {

push(@VMs, $virtualMachine);

}

} elsif ($provided_vm_list eq "all") {

my $virtualMachines = Vim::find_entity_views(

view_type => 'VirtualMachine'

);

foreach (@$virtualMachines) {

push(@VMs, $_);

}

} else {

my $virtualMachine = Vim::find_entity_view(

view_type => 'VirtualMachine',

filter => { 'name' => qr/($provided_vm_list)/i }

);

push(@VMs, $virtualMachine);

}

# expand the shorthand "powercycle" to the valid value.

# "manual" is the correct value to provide to the operation, so we don't have to

# worry about it.

my $policy = Opts::get_option('policy');

if ($policy eq "powercycle") {

$policy = "upgradeAtPowerCycle";

}

foreach (@VMs) {

if (Opts::get_option('update') eq "false") {

print $_->name . ": "

. "ntUpgrade Policy: " . $_->config->tools->toolsUpgradePolicy;

if (defined($_->summary->guest->toolsStatus)) {

print "ntTools Status: " . $_->summary->guest->toolsStatus->val . "n";

} else {

print "ntTools Status: Unknownn";

}

} else {

eval {

my $toolsConfigInfo = ToolsConfigInfo->new(

'toolsUpgradePolicy' => $policy

);

my $configSpec = VirtualMachineConfigSpec->new(

'tools' => $toolsConfigInfo

);

# blocking method, which should give us an error in the below section...

$_->ReconfigVM(

'spec' => $configSpec

);

};

# do some error checking

if ($@) {

Util::trace(0, "Error: " . $@ . "n");

}

Util::disconnect();

sub validate {

my $policy = Opts::get_option('policy');

my $valid = 0;

if ($policy eq "manual" || $policy eq "powercycle") {

$valid = 1;

}

return $valid;

}

5 thoughts on “VMware Tools Update Policy, errrrr, Updating”

darkchao

2009-03-25 at 11:08 am

cool thanks for helping me thanks! 😀
Oliver

2010-02-12 at 8:22 am

Hi,

I tried out your script but I’m getting this message at execution:

Can’t modify non-lvalue subroutine call in chomp at CheckVMwareToolsUpgradePolicy.pl line 78, near “))”

Found some perl threats about this issue, but could not really do something with the solutions…

Thx for your help.

Regards Oliver
Oliver

2010-02-12 at 8:25 am

Hi again,

after removing chomp and the () it works like a charm, thx a lot…

Regards
Oliver
Andrew

2010-02-12 at 9:52 am
Hello Oliver,

It looks like I borked the usage of chomp there. Chomp returns a the number of characters that it removed from the string, so it shouldn’t have worked at all. (For reference, the context I have above is how PHP’s trim command works.)

By changing line 78 to look like the following, it should work:
```
chomp( my $provided_vm_list = Opts::get_option('vm') );
```
Sorry for the confusion.

Andrew
Chan

2011-01-31 at 10:47 am

Hi,

Could be possible can get virtual machine tools version.

Chan

Related

5 thoughts on “VMware Tools Update Policy, errrrr, Updating”

Leave a Reply Cancel reply