LC_management.ps1

<#
Created by Tomas Ledecky [TIMI]
Initial release v 1.0
#>

##########You can easily edit some settings here (start of settings area)

#if listOnlyMultiHostDS is set to 'y' Datastores that are visible only from one Host will be excluded from folder selection view
$listOnlyMultiHostDS = 'y'

#address of Vcenter server:
#Leave commented for entering during script run
#$Lserver = 'server.name.com'

#Define your credentials for connection to vCenter
#Leave commented $Luser,$Lpass for entering during script run
#$Luser = 'domain\username'
#$Lpass = 'password'

#if you set $UseDomCred to 'yes' the above credentials will be ignored and your windows session credentials will be used
$UseDomCred = 'no'

##########Stop edit at this point (end of settings area)

##########Functions definition area
Function Get-FileName($initialDirectory)
{   
 [System.Reflection.Assembly]::LoadWithPartialName("System.windows.forms") |
 Out-Null

 $OpenFileDialog = New-Object System.Windows.Forms.OpenFileDialog
 $OpenFileDialog.initialDirectory = $initialDirectory
 $OpenFileDialog.filter = "All files (*.*)| *.*"
 $OpenFileDialog.ShowDialog() | Out-Null
 $OpenFileDialog.filename
} #end function Get-FileName

function Generate-OScustom-ip
{
	param ($oscustom, $ipdata, [int]$offset)
	
	$tmposcustom = New-OSCustomizationSpec -OSCustomizationSpec $oscustom –Type NonPersistent
	
	[int]$ip_end = [int]$ipdata.ipaddress.split(".")[3] + [int]$offset
	[string]$ipdata.ipaddress_actual = $ipdata.ipaddress.split(".")[0] + '.' + $ipdata.ipaddress.split(".")[1] + '.' + $ipdata.ipaddress.split(".")[2] + '.' + $ip_end
	
	$nicMapping = Get-OSCustomizationNicMapping –OSCustomizationSpec $tmposcustom | where { $_.Position –eq 1 }
	$nicMapping | Remove-OSCustomizationNicMapping -Confirm:$false
	if ($tmposcustom.OSType -eq "Windows")
	{
		$nicMapping = New-OSCustomizationNicMapping –OSCustomizationSpec $tmposcustom –IpMode UseStaticIP –IpAddress $ipdata.ipaddress_actual –SubnetMask $ipdata.subnet –DefaultGateway $ipdata.gateway –Dns $ipdata.dns
	}
	if ($tmposcustom.OSType -eq "Linux")
	{
		$nicMapping = New-OSCustomizationNicMapping –OSCustomizationSpec $tmposcustom –IpMode UseStaticIP –IpAddress $ipdata.ipaddress_actual –SubnetMask $ipdata.subnet –DefaultGateway $ipdata.gateway
	}
	
	return $tmposcustom
}

##########End of functions definition area

if (!$Lserver) {
	$Lserver = Read-Host "Enter address of vCenter server"
}

if ($UseDomCred -ne 'yes'){
	if (!$Luser){
		$Luser = Read-Host "Enter username for login in format domain\username"
	}
	if (!$Lpass){
		$Lpass = Read-Host "Enter password for login" -AsSecureString
		$Lpass = [Runtime.InteropServices.Marshal]::PtrToStringAuto([Runtime.InteropServices.Marshal]::SecureStringToBSTR($Lpass))
	}
}else{
	Remove-Variable Luser
	Remove-Variable Lpass
}

echo "Connecting to vCenter..."
Import-Module VMware.VimAutomation.Core
$connection = Connect-VIServer -Server $Lserver -User $Luser -Password $Lpass

if ($connection.IsConnected -eq 'True'){$connection} 
else {
	Read-Host "*** Exitting - connection to the server does NOT exist ***"
	exit
}


echo ""
Echo '*** WELCOME TO LINKED CLONE MANAGING SCRIPT ***'
echo ""
echo "Select action"
echo "1 = Create Linked Clones"
echo "2 = Delete Linked Clones by specifying their parent"
$mainSelect = (Read-Host "Specify action [number]")

switch ($mainSelect){
	1 {

		echo ""
		echo "***CLONE VMs SCRIPT***"
		echo "How do you want to enter the new VM names ?"
		echo "1 = Generate them manually as prefix+number+suffix"
		echo "2 = Load from a csv file"
		$VMnamesMethod = (Read-Host "Specify action [number]")
		switch ($VMnamesMethod){
			1 {
				echo "New VMs will be named by scema prefix+number+suffix"
				$prefix = (Read-Host "Please enter a prefix")

				echo ""
				echo "***NUMBERS***"
				echo "Please provide a sequence for numbering (you can add multiple structures together sequences+items)"
				while($Nmode -ne 'q'){

					echo "Choose input type s= sequence (x-y); i= items(x,y,z); q= stop inputing numbers"

					$Nmode = (Read-Host)
					if ($Nmode -eq 's') {
						$ArrayBorders =(Read-Host "Enter range (separate with -)").split('-') | % {$_.trim()}
						$numArray += ($ArrayBorders[0]..$ArrayBorders[1])
					} 
					else {
						if($Nmode -eq 'i'){
							$numArray +=(Read-Host "Enter numbers (separate with comma)").split(',') | % {$_.trim()}
						}
					}
				}

				$suffix = (Read-Host "Please enter a suffix")

				$newVMNames = @()
				foreach ($element in $numArray) {
					$newVMNames += $prefix + $element + $suffix
				}
			
			} #end of VMnamesMethod 1
			2 {
				echo "Select the csv file"
				$CurrLocation = Get-Location
				$csvFilePath = Get-FileName -initialDirectory $CurrLocation
				echo "Selected file: $csvFilePath"
				$csvFile = IMPORT-CSV -Path $csvFilePath -Header vmnames
				$newVMNames = @()
				foreach ($element in $csvFile.vmnames){
					$newVMNames += $element
				}
				if ($newVMNames.Count -eq 0){
					Echo "Unable to load VM names from file"
					Read-Host "Exiting now ..."
					exit
				}
			}#end of VMnamesMethod 2
			
		} #end of VMnamesMethod switch
		
		echo ""
		echo "The new VM names are:"
		echo $newVMNames
		
		echo ""
		$n = 0
		foreach ($element in $newVMNames) {
			$ErrorActionPreference = "SilentlyContinue"
			$current = Get-VM -name $element
			$ErrorActionPreference = ""
			if($current){
				$n++
				Write-Host "The $element will be deleted "
			}
		}
		if($n -gt 0){
			$delAns = (Read-Host "There are VMs that will be deleted (and replaced) before cloning ARE YOU SURE? (y/n) [default = n]")
			if (($delAns -ne 'y') -and ($delAns -ne 'Y') -and ($delAns -ne 'yes')){
				Read-Host "*** Exiting without changes ***"
				exit
			}
		}

		echo ""
		while ($true){
			$oldVMName = Read-host "Enter the name of the old VM you wish to clone from"
			$ErrorActionPreference = "SilentlyContinue"
			$oldVM = Get-VM -name $oldVMName
			$ErrorActionPreference = ""
			if($oldVM) {
				break
			}
			else {
				echo "Specified VM does NOT exist"
			}
	
		}


		$ErrorActionPreference = "SilentlyContinue"
		$oldTag = Get-Tag -Name "Childs-$oldVM"
		$ErrorActionPreference = ""

		
		if($oldTag){
			Echo "It looks like this VM already is a parent, new clones will be added to it, ...you are welcome"
		}
		
		
		echo ""
		echo "*** Finding HOSTS ***"
		$myHosts = Get-VMHost

		$n = 0
		foreach($element in $myHosts){
			$n++
			echo "$n = $element"
		}
		echo "a = Automatic selection (by free RAM)"
		$HOSTselect = Read-Host "Enter the number of the host you wish to create the VM on [number] or [a]"

		if (($HOSTselect -eq 'a') -or ($HOSTselect -eq '')){
			Echo "Clones will be evenly distributed across Hosts"
		}

		echo ""
		echo "*** Finding DATASTORES***"

		$allDSs = Get-Datastore

		if($listOnlyMultiHostDS -eq 'y' ){
			$myDSs = @()
			foreach ($element in $allDSs){
				if ((Get-Datastore -Name $element.Name | Get-VMHost).Count -gt 1){
					$myDSs += $element
				}
			}
		} else {
			$myDSs = $allDSs 
		}

		$n = 0
		foreach($element in $myDSs){
			$n++
			echo "$n = $element"
		}

		$DSselect = Read-Host "Enter the number of the datastore you wish to create the VM on [number] [default = 1]"
		if($DSselect -eq ''){$DSselect = 1}

		$Datastore = $myDSs[$DSselect - 1]

		echo ""
		echo "*** Finding FOLDERS***"

		$folders = Get-Folder

		$n = 0
		$myFolders = @()
		foreach($element in $folders){
			if(($element.Type -eq 'VM')){
			$n++
			$myFolders += $element
			echo "$n = $element"
			}
		}

		$folderSelect = Read-Host "Select folder where the new VM will be created, enter the number (vm = root) [default = 1]"
		if($folderSelect -eq ''){
			$folderSelect = 1
		}

		$folder = $myfolders[$folderSelect - 1]
		
		echo ""
		echo "*** Finding OS customisations***"

		$OSspecs = Get-OSCustomizationSpec

		$n = 0
		foreach($element in $OSspecs){
			$n++
			echo "$n = $element"
		}
		echo "n = none - Don't apply OS specification"
		
		$OSspecSelect = Read-Host "Select OS customization that will be used or n for none [default = n]"
		if($OSspecSelect -eq ''){
			$OSspecSelect = 'n'
		}
		
		if($OSspecSelect -ne 'n'){
			$OSspec = $OSspecs[$OSspecSelect - 1]
			$staticIPSelect = Read-Host "Do you want to set static IP addresses ? [default = n]"
			if ($staticIPSelect -eq 'y')
			{
				$ipdata = @{}
				$ipdata.ipaddress = Read-Host "Enter first IP v4 address"
				$ipdata.subnet = Read-Host "Enter subnet in format xxx.xxx.xxx.xxx"
				$ipdata.gateway = Read-Host "Enter default gateway"
				$ipdata.dns = Read-Host "Enter DNS server address (will apply only on windows)"
			}
		}

		echo ""
		$powerONAns = Read-Host "Do you want to Power on the VMs after creation ? (y/n) [defaut = y]"
		if(($powerONAns -eq '') -or ($powerONAns -eq 'y') -or ($powerONAns -eq 'Y') -or ($powerONAns -eq 'yes')){
			$powerONAnsNice = 'yes'
		} else {
			$powerONAnsNice = 'no'
		}
		
		if (($HOSTselect -eq 'a') -or ($HOSTselect -eq '')){
			$HOSTNameShow = "Automatic selection"
		} else {
			$HOSTNameShow = $myHosts[$HOSTselect - 1]
		}

		Write-Host ""
		Write-Host '**************** SUMMARY **************'
		Write-Host '*                                    *'
		Write-Host '**************************************'
		Write-Host "* VM names         * ${prefix}(n)${suffix}"
		Write-Host "**************************************"
		Write-Host "* Host             * $HOSTNameShow"
		Write-Host "**************************************"
		Write-Host "* Datastore        * $Datastore"
		Write-Host "**************************************"
		Write-Host "* Folder           * $folder"
		Write-Host "**************************************"
		Write-Host "* OScustomization  * $OSspec"
		Write-Host "**************************************"
		Write-Host "* Power on VMs     * $powerONAnsNice"
		Write-Host "**************************************"
		
		Write-Host ""
		
		$sumAns = (Read-Host "Is everything OK? (y/n) [default = y]")
		
		if (($sumAns -ne 'y') -and ($sumAns -ne 'Y') -and ($sumAns -ne 'yes') -and ($sumAns -ne '')){
			Read-Host "*** Exiting without changes ***"
			exit
		}
		
		$ErrorActionPreference = "SilentlyContinue"
		$tagCat = Get-TagCategory -Name Linked_Clones
		$ErrorActionPreference = ""
		
		if (!$tagCat){$tagCat = New-TagCategory -Name Linked_Clones}
		
		
		$OFS = ';'
		if($oldTag){
			$oldDescription = $oldTag.Description
			$newDescription = $oldDescription + ';' + $newVMNames
			$tmpArray = $newDescription -split ";" | select -Unique
			[string]$newDescription = $tmpArray
			$tag = Set-Tag -Tag $oldTag -Description "$newDescription" 
		} else {
			$tag = New-Tag -Name "Childs-$oldVM" -Category $tagCat -Description "$newVMNames"
		}
		rv OFS
		$silent = New-TagAssignment -Tag $tag -Entity $oldVM
		
		
		$oldVMsnap = New-Snapshot -VM $oldVM -Name linked_clone -Confirm:$false -Description "This snapshot is actively used by Linked clones. !!!DO NOT DELETE!!!"
		
		[int]$ipoffset = 0
		foreach ($element in $newVMNames)
		{
			
			$ErrorActionPreference = "SilentlyContinue"
			$actualRem = Get-VM -Name $element
			$ErrorActionPreference = ""
			
			if ($actualRem)
			{
				if ($actualRem.PowerState -eq 'PoweredOn')
				{
					Stop-VM -VM $actualRem -Confirm:$false | Format-Table
				}
				Remove-VM -VM $actualRem -Confirm:$false -DeletePermanently:$true
			}
			
			if (($HOSTselect -eq 'a') -or ($HOSTselect -eq ''))
			{
				$MAXfreeRAM = 0
				# $myHosts = Get-VMHost
				foreach ($elementH in $myHosts)
				{
					$freeRAM = $elementH.MemoryTotalMB - $elementH.MemoryUsageMB
					if ($freeRAM -gt $MAXfreeRAM)
					{
						$MAXfreeRAM = $freeRAM
						$HOSTName = $elementH
					}
				}
			}
			else
			{
				$HOSTName = $myHosts[$HOSTselect - 1]
			}
			
			Echo "Creating $element on $HOSTName"
			
			if ($staticIPSelect -eq "y")
			{
				$tmposspec = Generate-OScustom-ip -oscustom $OSspec -ipdata $ipdata -offset $ipoffset
				$actualVM = New-VM -VM $oldVM -Name $element -VMHost $HOSTName -Location $folder.Name -Datastore $Datastore -LinkedClone:$true -ReferenceSnapshot $oldVMsnap -OSCustomizationSpec $tmposspec
				Remove-OSCustomizationSpec -OSCustomizationSpec $tmposspec -Confirm:$false
			}
			else
			{
				$actualVM = New-VM -VM $oldVM -Name $element -VMHost $HOSTName -Location $folder.Name -Datastore $Datastore -LinkedClone:$true -ReferenceSnapshot $oldVMsnap -OSCustomizationSpec $OSspec
			}
			
			if ($powerONAnsNice -eq 'yes'){
				Start-VM -VM $actualVM | Format-Table
			}
			$ipoffset++
		}
		
		Echo "***FINNISHED***"

	} #End of Cloning module

	#Start of Deleting module
	2 {
		echo ""
		echo "***DELETE VMs SCRIPT***"
		echo "This script deletes all Linked Clones of a provided parent"

		$ParentVMname = (Read-Host "Please enter a VM Parent name")
		$ParentVM = Get-VM -name $ParentVMname

		$tags = Get-TagAssignment -Entity $ParentVM
		
		foreach($element in $tags){
			if ($element.tag.Name -eq "Childs-$ParentVMname"){
				$tag = $element
			}
		
		}
		

		$separator = ';'

		$VMnames = @($tag.Tag.Description.Split($separator))

		$ParentAns = (Read-Host "Do you want to delete The Parent also? (y/n) [Default = Y]")
		if (($ParentAns -eq '') -or ($ParentAns -eq 'Y') -or ($ParentAns -eq 'yes') ){
			$VMnames += $ParentVMname
		} else {
			$SnapshotRem = 'true'
		}

		echo "This machines will be removed:"
		echo $VMnames
		$ParentAns = (Read-Host "ARE YOU SURE? (y/n) [Default = n]")
		if (($ParentAns -eq 'y') -or ($ParentAns -eq 'yes') -or ($ParentAns -eq 'Y') ) {

			foreach ($element in $VMnames){

				$ErrorActionPreference = "SilentlyContinue"
				$actualRem = Get-VM -Name $element
				$ErrorActionPreference = ""
	
				if($actualRem){
					if($actualRem.PowerState -eq 'PoweredOn'){
						$silent = Stop-VM -VM $actualRem -Confirm:$false | Format-Table
					}
					Remove-VM -VM $actualRem -Confirm:$false -DeletePermanently:$true
					echo "$element removed"
				}
			}

			Remove-Tag -Tag "Childs-$ParentVMname" -Confirm:$false

			if($SnapshotRem){
				$actualSnap = Get-Snapshot -VM $ParentVM -Name linked_clone
				Remove-Snapshot -Snapshot $actualSnap -Confirm:$false
			}
	
			echo "***FINISHED***"
	
		} else {
			Read-Host "*** Exiting without changes ***"
		}

	} #End of  deleting module

} #End of switch



exit