Blog de Sys Admin » powershell

Mini Boite à outils Powershell

sensei.dje — Wed, 22 Jun 2011 20:07:22 +0000

C’est au fur et à mesure,en jouant avec powershell que j’ai noté et gardé ces bricoles…
Si ça crame, ces p’tits scripts, scriptlets ou commandlet seront au moins sauvés ici …

Accès à une clé de Registre

$key= get-item "HKLM:\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"

A noter : en Powershell, le registre est considéré comme un lecteur « logique » (type C:\) d’où la syntaxe HKLM:\ …

Accès à une propriété d’une clé de Registre

$key= get-item "HKLM:\SOFTWARE\Microsoft\Windows NT\CurrentVersion\
$val= get-itemProperty $key.PSPath |select ProductName

A noter : la propriété .pspath est indispensable pour bypass le chemin « physique » (exemple c:\documents and settings…) par défaut.
La partie « |select… » est optionnelle, elle permet de ne récuperer que certaines propriétés ( select étant un alias de select-object)

Liste des pilotes d’impression installés

$liste=@() #important : pour creer un tableau
$collection =Get-WmiObject win32_Printerdriver | select name,version, supportedplatform
foreach ($drivers in $collection)
{ $liste+=($drivers.name -split ",")[0]}
$liste

Création unitaire d’une file d’impression

Ce script n’installe aucun pilote, il se contente de créer, partager et publier dans l’AD une file correspondant aux variables renseignées…
Gros pré-requis : connaitre le libellé exact du pilote que l’on va utiliser ! cf script précédent…

$Name="IMP-machintruc"
$Comment="Patati..."
$Emplacement="Bureau XXX"
$DriverName = "Lexmark Universal XL" #<== Tres important !!
$IPAddress = "192.168.XXX.XXX"
$PortName = "Port-IPXXX"

# creation du port
$ClassIPPrnPort= [wmiclass]'Win32_TCPIPPrinterPort'
$NewPort= $ClassIPPrnPort.CreateInstance()
$NewPort.HostAddress = $IPAddress
$NewPort.Name = $PortName
$NewPort.Protocol = 1 # 1 = Raw, 2 = LPR
$NewPort.SNMPEnabled = $false
$ResultPort=$NewPort.Put()

# ajout de la file
$ClassPrinter= [wmiclass]'Win32_Printer'
$NewPrinter= $ClassPrinter.CreateInstance()
$NewPrinter.DriverName = $DriverName
$NewPrinter.DeviceID = $Name
$NewPrinter.PortName = $PortName
$newprinter.Shared = $true
$newprinter.Published = $true
$newprinter.Sharename = $Name
$newprinter.Location = $Emplacement
$newprinter.Comment = $Comment

$ResultPrinter=$NewPrinter.Put()

Liste des services arrêtés d’une machine distante

Aussi connu sous le nom : le « ça ressemble à un ‘ps pipe grep' »

get-service -computername "ordXXXX" | where {$_.status -eq "stopped" }

Parcours d’un tableau, concaténation et transtypage

Parcours du tableau $var contenant les valeurs 0 1 2 3 4

$var=0..4;$result="";$result=@() ; foreach ($val in $var) {$result+=[int]([string]$val + "01");}

Bien initialiser la variable $result en tant que tableau.

Ping des controleurs de domaine en powershell

sensei.dje — Thu, 16 Jun 2011 18:03:20 +0000

La supervision des contrôleurs de domaine est facilitée par des outils tels que le vénérable sonar ou son descendant ultrasound (google -> microsoft …) .
On peut aussi être intéressé par une information quasi instantanée de premier niveau, à savoir, repondent-ils au ping…

Dans cet esprit, j’ai ce vieux bout de code, interrogeant le domaine, montant la liste des DC et affichant en vert quand c’est bon, rouge quand ça répond pas.

Le gros du code tourne autour d’une récupération d’info WMI, comme souvent..

$ping = new-object System.Net.Networkinformation.Ping
$objDomain = [System.DirectoryServices.ActiveDirectory.Domain]::GetCurrentDomain()
$dc=$objDomain.FindAllDomainControllers() | Select-Object Name,IpAddress |sort name
for ($i=0; $i -le $dc.count-1 ;$i++) {
Write-Host -ForegroundColor "white" $dc[$i].name -NoNewLine " - IP-> "
if ($ping.send($dc[$i].name).status -eq "success" )
{ Write-Host -ForegroundColor "green" -NoNewLine $dc[$i].ipaddress}
else
{ Write-Host -ForegroundColor "red" -NoNewLine $dc[$i].ipaddress}
Write-Host -ForegroundColor "white" -NoNewLine " - R-> "
if ($dc[$i].name.substring(0,2) -eq "cm")
{$ip=$dc[$i].Ipaddress.substring(0,$dc[$i].Ipaddress.length -3) + "XXX"; #<- à modifier pour votre pattern à vous
if ($ping.send($ip).status -eq "success" )
{ Write-Host -ForegroundColor "green" $ip}
else
{ Write-Host -ForegroundColor "red" $ip}
}
else
{
$Config = Get-Wmiobject win32_NetworkAdapterConfiguration -comp $dc[$i].name
for ($j=0; $j -le $config.count -1;$j++) {
if ($config[$j].IPAddress -ne $null ){
if ($ping.send($config[$j].DefaultIPGateway).status -eq "success" )
{ Write-Host -ForegroundColor "green" $config[$j].DefaultIPGateway}
else
{ Write-Host -ForegroundColor "red" $config[$j].DefaultIPGateway}
}
}
}
}

Il sera possible de profiter de la boucle principale pour rajouter des tests variés, tels que la présence ou non de services tournant sur les serveurs (DFS, antivirus, spooler)… j’y reviendrai…

DHCP et IP en powershell

sensei.dje — Sat, 18 Jun 2011 17:37:43 +0000

N’ayant pas vu (ou pas cherché bien fort) le sympathique wrapper DHCP du ScriptGuy, voici quelques scripts maison et/ou scriplets pour jouer avec des pings, manager des étendues DHCP, ou plus généralement les serveurs DHCP et l’indispensable netsh…

Ping

$ping = new-object System.Net.Networkinformation.Ping
$ping.send("[nom du serveur]")

Remarque : il est possible d’obtenir uniquement le résultat en exécutant : $ping.send(« [nm du serveur] »).status

Ping d’une plage d’adresses IP

$ping = new-object system.net.networkinformation.ping ; 10..20 | foreach { $ip = "XXX.XXX.$_.XXX" ; $ping.send($ip) } |select Address, Status

Nslookup d’une plage IP

Le nmap du pauvre, les vérifications de ports ouverts en moins …

1..255 | % { [System.Net.Dns]::GetHostByAddress("XXX.XXX.XXX.$_") } 2> Out-Null | ft

Bien veiller à remplacer les XXX …

Rajout d’une plage d’exclusion DHCP pour chaque scope DHCP

Approche itérative, dans lequel le second octet est issu d’un tableau… Le reste du script ne fait que préparer des lignes de commandes à rediriger vers un fichier .bat .
Il serait aussi possible d’exécuter chaque commande directement dans la boucle foreach avec invoke-expression (pas testé ici car powershell n’est pas installé sur le serveur dhcp, …)

$scopes=@(101,103,104,111,112,113,114,121,122,123,124,131,132,133,134,141,142,143,144,151,152,153,154)
foreach ($scope in $scopes){1..2 | % {"netsh dhcp server \\[ServeurDHCP]$_ scope XXX.$scope.0.0 add excluderange XXX.$scope.2.0 XXX.$scope.2.0"}}

Remarque : script adapté pour 2 serveurs dhcp d’où le premier foreach…

Mini challenge bash/awk vs powershell

sensei.dje — Sun, 19 Jun 2011 10:22:35 +0000

Mis au défi de faire mieux en powershell qu’en bash (et une louche d’awk) par un collègue, j’ai pondu le mini script suivant :

Défi :

Soit un fichier texte contenant des noms de serveurs, on le nommera « serveurs.txt »
Le plus simplement et efficacement possible, coder un script qui exécutera un script annexe autant de fois que de lignes dans le fichier « serveurs.txt »

Évidement, présenté comme cela, ça ne présente que peu d’intérêt, cela dit, cette méthode nous est utile pour ne pas multiplier les taches cron…

bash & awk

mon_script.sh :

echo $0

One-liner qui va bien :

awk '{print ("sh mon_script.sh " $0)}' serveurs.txt | sh

powershell

mon_script.ps1 :

write-host $arg[0]

One-liner qui va bien :

Get-Content -path serveurs.txt |%{invoke-expression "./mon_script.ps1 $_"}

Vainqueur

Pour moi c’est match nul, à moins de commencer mesquinement à compter le nombre de caractères…
Plus sérieusement, les 2 approches me semblent partager la même logique. Je doute de ne jamais pouvoir faire une comparaison de performance « brute » de traitement de chaines de caractères compte tenu des OS et serveurs physiques trop différents…

Un avis éclairé sur la question sera toujours bienvenu !!

Lister les ordinateurs d’un domaine AD en powershell

sensei.dje — Tue, 07 Jun 2011 17:21:14 +0000

Petit script très basique, pour jouer avec une requête AD très simple …

$filtre = "(objectCategory=Computer)"
$domaine = New-Object System.DirectoryServices.DirectoryEntry
$chercheur = New-Object System.DirectoryServices.DirectorySearcher
$chercheur.SearchRoot = $domaine
$chercheur.PageSize = 1000
$chercheur.Filter = $filtre

# Ajout de la propriété que l'on recherche...
$prop = "name"
foreach ($i in $prop){$chercheur.PropertiesToLoad.Add($i)}

$colResults = $chercheur.FindAll()

foreach ($objResult in $colResults) {
$objItem = $objResult.Properties
# Sortie vers l'écran
write-host $objItem.name
}

L’intérêt de ce mini script réside dans la simplicité de requêtage, $filtre = « (objectCategory=Computer) », qui, associé à la connexion simplifiée à l’AD (remember vbs…) de powershell, donne accès très rapidement aux infos des objets AD.

On pourrait afficher bien plus d’informations en considérant $prop comme une collection de texte, et y rajouter d’autres noms de propriétés.

Je renvoie vers adsiedit pour la litanie des propriétés des objets AD…