Cluster Hyper-V avec S2D (sans environnement Active Directory)

function fACTIVER.VIRTUALISATION.IMBRIQUEE {
clear
Write-Host "##############################"
Write-Host "# ACTIVER LA VIRTUALISATION IMBRIQUEE POUR UN ORDINATEUR VIRTUEL"
Write-Host " "
# Obtenez la liste des ordinateurs virtuels disponibles
$vms = Get-VM
# Affichez les ordinateurs virtuels disponibles avec un numéro
Write-Host "--------------------------------------"
Write-Host "LISTE DES ORDINATEURS VIRTUELS DISPONIBLES"
Write-Host " "
for ($i = 0; $i -lt $vms.Count; $i++) {
Write-Host "$($i+1): $($vms[$i].Name)"
}
Write-Host " "
$selectedVMNumber = Read-Host "ENTRER LE NUMERO DE L'ORDINATEUR VIRTUEL POUR ACTIVER LA VIRTUALISATION IMBRIQUEE"
$VMName = $vms[$selectedVMNumber - 1].Name
# Vérifiez si l'ordinateur virtuel est éteint
$vmStatus = (Get-VM -Name $VMName).State
if ($vmStatus -eq "Off") {
Set-VMProcessor -VMName $VMName -ExposeVirtualizationExtensions $true
Write-Host " "
Write-Host "VIRTUALISATION IMBRIQUEE ACTIVEE AVEC SUCCES."
} else {
Write-Host "Erreur : L'ORDINATEUR VIRTUEL '$VMName' DOIT ETRE ETEINT POUR ACTIVER LA VIRTUALISATION IMBRIQUEE."
}
}

function fCHANGER.NOM.ORDINATEUR {
########################################
# Changer le nom de l'ordinateur :
Clear-Host
Write-Host "########################"
Write-Host "# NOM DE L'ORDINATEUR"
Write-Host " "
$computerName = $env:COMPUTERNAME
Write-Host "NOM ACTUEL : $computerName"
Write-Host " "
$changeName = $null
while ($changeName -ne "O" -and $changeName -ne "N") {
$changeName = Read-Host "VOULEZ-VOUS LE CHANGER ? (O/N)"
Write-Host " "
}
if ($changeName -eq "O") {
$validName = $false
while (-not $validName) {
$newName = Read-Host "ENTRER LE NOUVEAU NOM"
if ($newName -match "^[a-zA-Z0-9-]{1,15}$") {
$validName = $true
Rename-Computer -NewName $newName -Force
Write-Host " "
$restart = $null
while ($restart -ne "O" -and $restart -ne "N") {
$restart = Read-Host "VOULEZ-VOUS REDEMARRER L'ORDINATEUR MAINTENANT ? (O/N)"
Write-Host " "
}
if ($restart -eq "O") {
Restart-Computer -Force
} else {
Write-Host "N'OUBLIEZ PAS DE REDEMARRER L'ORDINATEUR POUR PRENDRE EN COMPTE LE CHANGEMENT DE NOM."
}
} else {
Write-Host "NOM INVALIDE"
Write-Host " "
}
}
} else {
Write-Host "AUCUNE MODIFICATION APPORTEE."
}
}

function fCONFIGURATION.RESEAU {
Clear-Host
Write-Host "#########################"
Write-Host "# CONFIGURATION RESEAU"
Write-Host " "
$networkAdapters = Get-NetAdapter | Where-Object { $_.Status -eq "Up" }
$index = 0
$networkAdapters | ForEach-Object {
Write-Host "$index - $($_.Name)"
$index++
}
Write-Host " "
$selectedAdapterIndex = Read-Host "ENTRER LE NUMERO DE L'INTERFACE A CONFIGURER"
$selectedAdapter = $networkAdapters[$selectedAdapterIndex]
$newName = Read-Host "ENTRER LE NOUVEAU NOM DE L'INTERFACE (LAISSER VIDE POUR NE PAS CHANGER)"
if ($newName -ne "") {
Rename-NetAdapter -Name $selectedAdapter.Name -NewName $newName
$selectedAdapter = Get-NetAdapter | Where-Object { $_.Name -eq $newName }
}
$configurationChoice = Read-Host "TAPER 'DHCP' OU 'STATIQUE'"
if ($configurationChoice -eq "DHCP") {
Set-NetIPInterface -InterfaceAlias $selectedAdapter.Name -Dhcp Enabled
Clear
Write-Host "LA CARTE RESEAU A ETE CONFIGUREE VIA DHCP."
}
elseif ($configurationChoice -eq "STATIQUE") {
Write-Host
Write-Host "(IL VOUS FAUDRA ENTRER 2 FOIS VOTRE ADRESSE IP, C'EST NORMAL)"
Write-Host
$ipAddress = Read-Host "ENTRER L'IP (EX : 192.168.10.250)"
$subnetMask = Read-Host "ENTRER LE PREFIX (EX : 24)"
$gateway = Read-Host "ENTRER L'IP DE LA PASSERELLE (EX : 192.168.10.1)"
$dns1 = Read-Host "ENTRER L'IP DU DNS PRINCIPAL (LAISSER VIDE SI AUCUN)"
$dns2 = Read-Host "ENTRER L'IP DU DNS SECONDAIRE (LAISSER VIDE SI AUCUN)"
New-NetIPAddress -InterfaceAlias $selectedAdapter.Name -IPAddress $ipAddress -PrefixLength $subnetMask -DefaultGateway $gateway
if ($dns1 -ne "") {
Set-DnsClientServerAddress -InterfaceAlias $selectedAdapter.Name -ServerAddresses $dns1, $dns2
}
Clear
Write-Host "LA CARTE RESEAU A ETE CONFIGUREE."
}
}

function fMAJ {
if (-not (Get-PackageProvider -Name NuGet -ErrorAction SilentlyContinue)) {
Write-Host "NuGet N'EST PAS INSTALLE. INSTALLATION EN COURS..."
Install-PackageProvider -Name NuGet -MinimumVersion 2.8.5.201 -Force
}
if (-not (Get-PSRepository -Name PSGallery -ErrorAction SilentlyContinue)) {
Write-Host "LE REFERENTIEL PSGallery N'EST PAS CONFIGURE. CONFIGURATION EN COURS..."
Set-PSRepository -Name PSGallery -InstallationPolicy Trusted
}
if (-not (Get-Module -Name PSWindowsUpdate -ListAvailable -ErrorAction SilentlyContinue)) {
Write-Host "LE MODULE PSWindowsUpdate N'EST PAS ENCORE INSTALLE. INSTALLATION EN COURS..."
Install-Module -Name PSWindowsUpdate
}
Import-Module PSWindowsUpdate
# Passe en mode manuel pour les mises à jour
$RegPath = "HKLM:\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU"
Set-ItemProperty -Path $RegPath -Name NoAutoUpdate -Type DWord -Value 1
Restart-Service -Name wuauserv -Force
Write-Host "LE MODE DE MISE-A-JOUR A ETE DEFINI SUR MANUEL"
# Installation des mises à jour trouvées
Install-WindowsUpdate -AcceptAll -AutoReboot
# Désactivation à la fin
Set-ItemProperty -Path $RegPath -Name NoAutoUpdate -Type DWord -Value 1
Set-ItemProperty -Path $RegPath -Name AUOptions -Type DWord -Value 1
Restart-Service -Name wuauserv -Force
Write-Host "LES MISES-A-JOUR ONT ETE DESACTIVEES"
Write-Host "RECHERCHE DES MISES-A-JOUR TERMINEE"
}

function fINSTALLER.ROLE.HYPERV {
Install-WindowsFeature -Name Hyper-V -IncludeManagementTools -Restart
}

function fINSTALLER.SERVEUR.FICHIER {
Install-WindowsFeature -Name FS-FileServer -IncludeManagementTools
}

function fINSTALLER.FONCTIONNALITE.CLUSTER.BASCULEMENT {
Install-WindowsFeature -Name Failover-Clustering -IncludeManagementTools
}

function fAJOUTER.HOSTS {
param (
[string]$IP,
[string]$Nom
)
# Vérifiez si le fichier hosts existe
$HostsFile = "C:\Windows\System32\drivers\etc\hosts"
if (Test-Path -Path $HostsFile) {
# Demandez à l'utilisateur d'entrer un nom d'hôte
$Nom = Read-Host "ENTRER UN NOM D'HOTE"
# Demandez à l'utilisateur d'entrer une adresse IP
$IP = Read-Host "ENTRER SON IP"
# Créez la ligne à ajouter dans le fichier hosts
$LineToAdd = "$IP`t$Nom"
# Ajoutez la ligne au fichier hosts
Add-Content -Path $HostsFile -Value $LineToAdd
Write-Host "HOTE AJOUTE."
} else {
Write-Host "FICHIER HOSTS NON TROUVE"
}
}

New-Alias -Name AJOUTER.HOSTS -Value fAJOUTER.HOSTS

function fCREER.CLUSTER.HYPERV {
Clear-Host
Write-Host "| ========= -------------------------------------- ========= |" -ForegroundColor Cyan
Write-Host "| ========= CREATION D'UN CLUSTER HYPER-V ========= |" -ForegroundColor Cyan
Write-Host
Write-Host "| CONFIRMEZ-VOUS LES PRE-REQUIS SUIVANTS ?"
Write-Host "| ---------------------------------------"
Write-Host "| - 2 SERVEURS (A MINIMA) DE CONFIGURATION IDENTIQUE"
Write-Host "| - LES SERVEURS ONT-ILS ETE CORRECTEMENT RENOMME ?"
Write-Host "| - LES MAJ ONT-ELLES ETE FAITE SUR CHAQUE NOEUD ?"
Write-Host "| - LE ROLE HYPER-V EST-IL INSTALLE SUR CHAQUE NOEUD ?"
Write-Host "| - LE ROLE SERVEUR DE FICHIERS EST-IL INSTALLE SUR CHAQUE NOEUD ?"
Write-Host "| - LA FONCTIONNALITE DE CLUSTERING DE BASCULEMENT EST-ELLE INSTALLEE SUR CHAQUE NOEUD ?"
Write-Host "| - TOUS LES NOEUDS ONT-ILS ETE JOINT A UN MEME DOMAINE ACTIVE DIRECTORY ?"
Write-Host "| (OU AVEZ-VOUS FAIT UN ENREGISTREMENT DNS DANS LE FICHIER HOSTS DE CHAQUE NOEUD ?)"
Write-Host "| (ET Y AVEZ-VOUS EGALEMENT PRECISE L'ENREGISTREMENT DNS DU FUTUR CLUSTER ?)"
Write-Host "| - VOUS NE DEVEZ EXECUTER CETTE FONCTION QUE SUR UN SEUL DES NOEUDS DU FUTUR CLUSTER."
Write-Host "| (DE PREFERENCE, LE NOEUD N1)"
Write-Host
Write-Host "| RAPPEL"
Write-Host "| ------"
Write-Host "| - CE SCRIPT NE GERE NI LA CONFIGURATION DU QUORUM, NI LE STOCKAGE DISTRIBUE"
Write-Host "| - SI VOUS DISPOSEZ D'INTERFACES INTER-NOEUDS (POUR S2D), VOUS DEVREZ INDIQUER LE RESEAU"
Write-Host "| DANS CETTE FONCTION AFIN DE L'EXCLURE DE L'ADMINISTRATION DU CLUSTER"
Write-Host
Write-Host "| ========= -------------------------------------- ========= |" -ForegroundColor Cyan
$confirm = Read-Host "| SI TOUT EST OK, VOUS POUVEZ CONTINUER (O/N)"
switch ($confirm) {
"O" { continue }
"N" { return }
default {
return
}
}
Write-Host
# Demander à l'utilisateur d'entrer les noms des serveurs à mettre en cluster, séparés par une virgule
$nodes = Read-Host "VEUILLEZ ENTRER LES NOMS DES SERVEURS A METTRE EN CLUSTER, SEPARES PAR UNE VIRGULE"
# Séparer les noms des noeuds
$nodesArray = $nodes.Split(',')
# vérifier que chaque noeud existe et est accessible
foreach ($node in $nodesArray) {
if (Test-Connection -ComputerName $node -Count 1 -Quiet) {
Write-Output "$node EST ACCESSIBLE."
} else {
Write-Error "$node N'EST PAS ACCESSIBLE. VEUILLEZ VERIFIER LE NOM ET LA CONNECTIVITE DU NOEUD."
return
}
}
# Installer les outils RSAT de gestion des clusters
Write-Host
try {
Install-WindowsFeature -Name RSAT-Clustering -IncludeAllSubFeature -Verbose
Write-Output "LES OUTILS RSAT DE GESTION DES CLUSTERS ONT ETE INSTALLES AVEC SUCCES."
} catch {
Write-Error "UNE ERREUR S'EST PRODUITE LORS DE L'INSTALLATION DES OUTILS RSAT DE GESTION DES CLUSTERS : $_"
return
}
# Lancer le test du cluster
try {
Test-Cluster -Node $nodesArray
Write-Output "LE TEST DU CLUSTER A ETE LANCE AVEC SUCCES."
} catch {
Write-Error "UNE ERREUR S'EST PRODUITE LORS DU TEST DU CLUSTER : $_"
return
}
Write-Host
# Demander à l'utilisateur d'entrer l'Adresse IP du futur cluster
$ClusterIPaddress = Read-Host "VEUILLEZ ENTRER L'ADRESSE IP STATIQUE DE GESTION DU FUTUR CLUSTER"
# Demander à l'utilisateur d'entrer un nom pour le futur cluster
$ClusterName = Read-Host "VEUILLEZ ENTRER UN NOM POUR LE FUTUR CLUSTER"
# Convertir l'adresse IP en une collection de chaînes
$ClusterIPaddressCollection = New-Object System.Collections.Specialized.StringCollection
$ClusterIPaddressCollection.Add($ClusterIPaddress)
# Demander à l'utilisateur s'il souhaite exclure un réseau
$excludeNetwork = Read-Host "SOUHAITEZ-VOUS EXCLURE UN RESEAU SPECIFIQUE DE LA GESTION DU CLUSTER (Ex : UN RESEAU INTER-NOEUDS) ? (O/N)"
if ($excludeNetwork -eq "O") {
# Demander à l'utilisateur quel réseau exclure
$networkToExclude = Read-Host "ENTREZ LE RESEAU A EXCLURE (ex : 10.172.172.0/29)"
# Conversion explicite en StringCollection
$NetworkToExcludeCollection = New-Object System.Collections.Specialized.StringCollection
$NetworkToExcludeCollection.Add($networkToExclude)
# EXCLUSION EXPLICITE DU RESEAU
try {
New-Cluster -Name $ClusterName `
-Node $nodesArray `
-StaticAddress $ClusterIPaddressCollection `
-IgnoreNetwork $NetworkToExcludeCollection `
-Verbose
Write-Output "Le cluster '$ClusterName' A ETE CREE AVEC SUCCES AVEC EXCLUSION DE RESEAU."
} catch {
Write-Error "UNE ERREUR S'EST PRODUITE LORS DE LA CREATION DU CLUSTER : $_"
return
}
} else {
# Création normale sans exclusion
try {
New-Cluster -Name $ClusterName `
-Node $nodesArray `
-StaticAddress $ClusterIPaddressCollection `
-Verbose
Write-Output "Le cluster '$ClusterName' A ETE CREE AVEC SUCCES SANS EXCLUSION DE RESEAU."
} catch {
Write-Error "UNE ERREUR S'EST PRODUITE LORS DE LA CREATION DU CLUSTER : $_"
return
}
}
Start-Sleep -Seconds 10
Get-ClusterNode -Cluster "$ClusterName"
$clusterIP = (Get-ClusterResource -Cluster $clusterName | Where-Object { $_.ResourceType -eq "IP Address" } | Get-ClusterParameter -Name "Address").Value
Write-Output "L'ADRESSE IP DU CLUSTER $clusterName EST : $clusterIP"
}

New-Alias -Name CREER.CLUSTER.HYPERV -Value fCREER.CLUSTER.HYPERV

New-VMSwitch -Name "COM_EXT" -NetAdapterName "<nom_de_votre_interface>" -AllowManagementOS $true

function fPREPARER.DISQUES.S2D {
Clear-Host
Write-Host "| ========= -------------------------------------- ========= |" -ForegroundColor Cyan
Write-Host "| ========= PREPARER LES DISQUES POUR S2D ========= |" -ForegroundColor Cyan
Write-Host
Write-Host "| - Au moins un disque pour S2D sur chaque noeud"
Write-Host "| - Même nombre de disques identiques sur chaque noeud"
Write-Host "| - Cluster déjà opérationnel"
Write-Host " "
$confirm = Read-Host "| SI TOUT EST OK, VOUS POUVEZ CONTINUER (O/N)"
if ($confirm -ne "O") { return }
$computerName = $env:COMPUTERNAME
Invoke-Command ($computerName) {
Update-StorageProviderCache
Get-StoragePool | ? IsPrimordial -eq $false | Set-StoragePool -IsReadOnly:$false -ErrorAction SilentlyContinue
Get-StoragePool | ? IsPrimordial -eq $false | Get-VirtualDisk | Remove-VirtualDisk -Confirm:$false -ErrorAction SilentlyContinue
Get-StoragePool | ? IsPrimordial -eq $false | Remove-StoragePool -Confirm:$false -ErrorAction SilentlyContinue
Get-PhysicalDisk | Reset-PhysicalDisk -ErrorAction SilentlyContinue
Get-Disk | ? Number -ne $null | ? IsBoot -ne $true | ? IsSystem -ne $true | ? PartitionStyle -ne RAW | % {
$_ | Set-Disk -isoffline:$false
$_ | Set-Disk -isreadonly:$false
$_ | Clear-Disk -RemoveData -RemoveOEM -Confirm:$false
$_ | Set-Disk -isreadonly:$true
$_ | Set-Disk -isoffline:$true
}
Get-Disk | Where Number -Ne $Null | Where IsBoot -Ne $True | Where IsSystem -Ne $True | Where PartitionStyle -Eq RAW | Group -NoElement -Property FriendlyName
} | Sort -Property PsComputerName, Count
}

function fACTIVER.S2D {
Clear-Host
Write-Host "| ========= ACTIVER S2D ========= |"
$confirm = Read-Host "| SI TOUT EST OK, VOUS POUVEZ CONTINUER (O/N)"
if ($confirm -ne "O") { return }
Enable-ClusterS2D
Start-Sleep 10
$poolName = (Get-StoragePool | Where-Object FriendlyName -Like "S2D on *").FriendlyName
Write-Host "| LE POOL S2D CREE SE NOMME : $poolName"
Pause
}

function fCREER.VDISK.S2D {
Clear-Host
Write-Host "| ========= CREER UN DISQUE VIRTUEL POUR S2D ========= |"
$confirm = Read-Host "| SI TOUT EST OK, VOUS POUVEZ CONTINUER (O/N)"
if ($confirm -ne "O") { return }
$ndisk = Read-Host "| COMBIEN DE DISQUES DEVOLUS A S2D PAR NOEUD AVEZ-VOUS ?"
switch ($ndisk) {
"1" {
$poolName = (Get-StoragePool | Where-Object FriendlyName -Like "S2D on *").FriendlyName
Write-Host "| - CREATION D'UN VDISK MIROIR A RECOPIE DOUBLE"
New-VirtualDisk -StoragePoolFriendlyName $poolName `
-FriendlyName "S2D_VDISK" `
-ResiliencySettingName Mirror `
-NumberOfDataCopies 2 `
-UseMaximumSize `
-ProvisioningType Fixed
}
"2" {
$poolName = (Get-StoragePool | Where-Object FriendlyName -Like "S2D on *").FriendlyName
Write-Host "| - CREATION D'UN VDISK MIROIR A RECOPIE TRIPLE"
New-VirtualDisk -StoragePoolFriendlyName $poolName `
-FriendlyName "S2D_VDISK" `
-ResiliencySettingName Mirror `
-NumberOfDataCopies 3 `
-UseMaximumSize `
-ProvisioningType Fixed
}
default {
Write-Host "| CHOIX INVALIDE. VEUILLEZ REESSAYER." -ForegroundColor Yellow
Pause
}
}
Pause
}

function fCREER.VOLUME.VDISK.S2D {
$labelLecteur = "DATA_S2D"
$VirtualDisk = Get-VirtualDisk -FriendlyName "S2D_VDISK" -ErrorAction Stop
$disk = $VirtualDisk | Get-Disk
$ClusterDisk = Get-ClusterResource | Where-Object { $_.ResourceType -eq "Physical Disk" -and $_.Name -like "*S2D_VDISK*" }
if ($ClusterDisk) {
Suspend-ClusterResource -Name $ClusterDisk.Name
$partition = $disk | New-Partition -AssignDriveLetter -UseMaximumSize
$partition | Format-Volume -FileSystem ReFS -NewFileSystemLabel "$labelLecteur" -Confirm:$false
Resume-ClusterResource -Name $ClusterDisk.Name
} else {
Write-Error "Le disque de cluster n'a pas été trouvé."
}
Pause
}

New-SmbShare -Name "QuorumShare" -Path "D:\QuorumShare" -FullAccess "TSSR\Administrators"

PS C:\Users\Administrateur> Get-NetConnectionProfile

Name : Réseau 2
InterfaceAlias : Ethernet
InterfaceIndex : 4
NetworkCategory : Public
DomainAuthenticationKind : None
IPv4Connectivity : Internet
IPv6Connectivity : NoTraffic

PS C:\Users\Administrateur> Set-NetConnectionProfile -InterfaceIndex 4 -NetworkCategory Private

PS C:\Users\Administrateur> Start-Service WinRM

PS C:\Users\Administrateur> Set-Item WSMan:\localhost\Client\TrustedHosts -Value "CORE-1,CORE-2"