Discussion :

[MaAamie]

Bonjour,

J'ai réalisé un script qui permet d'éteindre les machines par site/sous-réseaux de mon entreprise ( total 1000 machines ), hélas je rencontre un problème, le script dure plus de 8h ... après quelques recherches, j'ai trouvé le problème, ce sont les machines déjà éteintes, ainsi la commande bloque et renvoie l'erreur " serveur RPC non disponible .... ". Comment puis je contourner le problème ? peux t'on ne pas attendre le résultat de la commande ? le paramètre throttelimit peut résoudre le problème ?

Pour l'instant je vais contourner le problème en réalisant un ping sur chaque machine avant de lancer la commande.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
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
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
Get-Date -Format dd/MM/yyyy-HH:mm:ss 

# Positionnement dans le répertoire du script

$Dir = $MyInvocation.MyCommand.Path

$Dir = $Dir.Substring(0,($Dir.LastIndexOf("\")+1))

Set-Location $Dir


# Creation du répertoire Sites et Etats

$CurrentEAP = $ErrorActionPreference

$ErrorActionPreference = "silentlycontinue"

$RepSites = ".\Sites\"

New-Item -Path $RepSites -ItemType directory

$RepEtats = ".\Etats\"

New-Item -Path $RepEtats -ItemType directory

$RepLog = ".\Log\"

New-Item -Path $RepLog -ItemType directory

$FicExclu = ".\Clients-Exclu.txt"

New-Item -Path $FicExclu -ItemType file

$ErrorActionPreference = $CurrentEAP


# Verifie si les fichiers necessaires existent

if(Test-Path ".\PARAMETRES.txt"){

    #Récupération des parametres

    $Parametres = Get-Content -Path ".\PARAMETRES.txt"

    foreach($param in $Parametres){
    
        switch -Wildcard ($param){
            "ORGANISME:*" {

            $index = $param.IndexOf(":")+1
            $nbre = $param.Length - $index

            $ORG = ($param.Substring($index,$nbre)).Trim()
            }
            "ADDRIPSITE:*" {

            $index = $param.IndexOf(":")+1
            $nbre = $param.Length - $index

            $AddrIPSite = ($param.Substring($index,$nbre)).Trim()
            }
        }
    }

    # Recherche des Etendues de notre Foret AD 

    $forest = [System.DirectoryServices.ActiveDirectory.Forest]::GetCurrentForest()
    $sites = $forest.Sites
    $scopes = $sites | where Name -like "$ORG*"
    $scopes = $scopes.subnets
    $scopes = $scopes | where Name -like "$AddrIPSite*"

    # Parcour des Etendues IP

    foreach($scope in $scopes){

    $scopex = $scope.Name

    $site = $scope.Site

    $scopex = $scopex.ToString()

    $scopex = $scopex.Substring(0,$scopex.IndexOf("/"))

    
    # Initialise le chemin de la liste des clients du site

    $CheminSitesPC = $RepSites + $site + ".txt"

    New-Item -Path $CheminSitesPC -ItemType File -Force

    
    # Creation du fichier témoin pour activer/desactiver le Shutd

    $ShutdEtat = $RepEtats + $site + ".txt"

    if(!(Test-Path $ShutdEtat)){

        New-Item -Path $ShutdEtat -ItemType File -Force

        Set-Content -Path $ShutdEtat -Value "1"

        }

    # Liste les plages adresses de l'Etendue

    $pooladdr = netsh dhcp server \\serverDHCP scope $scopex show iprange

        foreach($lign in $pooladdr){

            if ($lign.contains("DHCP")){

            $LignPool1 = $lign.Trim()

            # Récupère Plage de début

            $PoolAddrD = $LignPool1.Substring(0,$LignPool1.IndexOf("-"))

            $PoolAddrD = $PoolAddrD.Trim()

            # Récupère IP de début

            $PoolAddrIP1 = $PoolAddrD.Remove(0,7)

            $AddrIPD = $PoolAddrIP1.Substring(0,$PoolAddrIP1.IndexOf("."))
        
            # Supprime la plage de début pour la suite

            $LignPool2 = $LignPool1.Remove(0,($LignPool1.IndexOf("-")+1))

            $LignPool2 = $LignPool2.Trim()

            # Récupère Plage de Fin

            $PoolAddrF = $LignPool2.Substring(0,$LignPool2.IndexOf("-"))

            $PoolAddrF = $PoolAddrF.Trim()

            #Récupère IP de fin

            $PoolAddrIP2 = $PoolAddrF.Remove(0,7)

            $AddrIPF = $PoolAddrIP2.Substring(0,$PoolAddrIP2.IndexOf("."))
                
            }
        }



    # Récupération des machines de l'étendue
    $i = $null

    [int]$i = $AddrIPD

    $ListePC = $null

        $AddrIPD..$AddrIPF | foreach{

            $PcIP = $scopex.Substring(0,7) + $i +"."

            $PCs = $null

            $PCs = Get-ADComputer -LDAPFilter '(&(objectCategory=computer))' -property * | where {($_.IPv4Address -Like "$PcIP*") -and (($_.Name -Like "PCA*") -or ($_.Name -Like "PCB*") -or ($_.Name -Like "TOTO*"))}

            $ListePC = $ListePC + $PCs.name

            $i = $i + 1

        }

    $ListePC = $ListePC | sort

    # Enregistrement de la liste des pc du site

    Add-Content -Path $CheminSitesPC -Value $ListePC


    }




# Récupération des Sites

$ListSites = Get-Item -Path $RepSites* | sort


foreach($sitePcs in $ListSites){
    
    $DirEtatSite = $RepEtats + $sitePcs.Name

    $EtatSrv = Get-Content $DirEtatSite 

    if($EtatSrv.Contains("1")){

        $ListPCs = Get-Content $sitePcs

        # Suppression des exclusions

        $ListPCsEx = Get-Content $FicExclu


        foreach($Pcex in $ListPCsEx){
        
            $ListPCs = $ListPCs -replace $pcex,"$null"

        }
    
        $ListPCsFinal = $ListPCs  | where { $_ -ne "$null" }


        # fichier de log du site
    
        $NomLog = $RepLog + $sitePcs.Name

        New-Item -Path $NomLog -ItemType File -Force
    
        Add-Content -Value "----------------- `n" -path $NomLog
        $DateD = Get-Date -Format dd/MM/yyyy-HH:mm:ss
        Add-Content -Value $DateD -Path $NomLog
        Add-Content -Value "----------------- `n" -path $NomLog

        # Shutd des machines

        
                Stop-Computer -ComputerName $ListPCsFinal -Force 
                


        # Enregistre le log des Shutds des machines
        
        Add-Content -Value "----------------- `n" -path $NomLog
        $DateF = Get-Date -Format dd/MM/yyyy-HH:mm:ss
        Add-Content -Value $DateF -Path $NomLog
        Add-Content -Value "----------------- `n" -path $NomLog

        }

    }
}


Get-Date -Format dd/MM/yyyy-HH:mm:ss

Je vais testé ce soir ce code là :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
                foreach($Machine in $ListPCsFinal){

            $ping = new-object System.Net.NetworkInformation.Ping

            $ResultatPing = $ping.Send($Machine)

                if($ResultatPing.status –eq “Success”){
       
                Stop-Computer -ComputerName $Machine -Force
                
                Add-Content -Value "$Machine `n" -path $NomLog

                }else{
                                      
                Add-Content -Value "$Machine `n" -path $NomLog

                }

            }

[Laurent Dardenne]

Salut,

le paramètre throttelimit peut résoudre le problème ?

Oui si tu utilises des jobs pour réduire le temps d'exécution, mais le cmdlet Stop-Computer utilise WMI en interne, le délai avant erreur provient de là je pense.
Avec le ping tu réduis les cas d'erreur.

[MaAamie]

Je te remercie pour ta réponse, donc la solution serait de créer un job par tranche de machines ? c'est ce que tu voulais dire ?

Le paramètre throttelimit, d'après l'aide défini une limite du nombre de connexions mais comment ça ? je ne vois pas comment cela fonctionne, pourrais tu m'en dire plus ?

[Laurent Dardenne]

donc la solution serait de créer un job par tranche de machines ? c'est ce que tu voulais dire ?

Pas tout à fait, je parlais d'amélioration.
Je ne connais pas ton infra ni tes contraintes, c'est à toi de décider si ce qu'on te propose sur un forum est une solution
C'est plus une piste à étudier.

je ne vois pas comment cela fonctionne, pourrais tu m'en dire plus ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
$H=(get-Help Stop-Computer -full)
$H.Parameters.Parameter|Where {$_.Name -match 'AsJob|ThrottleLimit'}

La lecture de ce tutoriel peut t'aider à y voir plus clair.

Mais le premier soucis est de savoir si tu peux configurer WinRm sur ton infra (job distant), ensuite si les versions de PS sont identiques...
Si cela ne te semble pas possible, peu importe la raison, reste sur 'WMI' (les jobs locaux restant possible).

[suchiwa]

Bonjour MaAamie,

Une alternative à ton ping, qui renvoie un booleen, serait la commande suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
# $ping est true ou false avec le paramètre -Quiet
$ping = test-connection -ComputerName $server -Count 1 -Quiet
if($ping){
...
}
else{...}

Ne solutionne pas la désactivation d'echo-request sur des serveurs disponibles, tout comme le ping.
Éventuellement coupler à un test-path \\$server\c$, fonctionne bien à partir de Windows 2008 Server.

Cordialement,
Vincent

[6ratgus]

Boujour à tous

je met mon petit grains de sel !

la solution du System.Net.NetworkInformation.Ping est bonne mais si tu rajoute un délais c'est mieux voir cette doc

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$ResultatPing = $ping.Send($machine, 1000) # delais timeout en millisecondes

le temps du timeout standard au ping sur une machine qui est éteinte est de 5 secondes environs
le temps du timeout standard au ping sur une machine qui n'existe pas dans le DNS est de 3 secondes environs. ce temps peut être réduit par le paramètre indiqué ci-dessus
sauf que pour ce dernier cas, le délais donné au ping n'a pas effet sur le temps de résolution du nom de la machine
une solution est de convertir le nom en adresse IP avant le ping ou de ne pas faire de ping si il n'y a pas de résolution
pour info le temps de suppression d'une machine dans le DNS dépend de l'administrateur mais est de 1h en général

autre gain de temps sur la résolution de nom de la machine :
[System.Net.DNS]::GetHostAddresses($Machine) renvoie une erreur au bout de 3 secondes si la résolution échoue, avec l'erreur :
« Le nom demandé est valide, mais aucune donnée du type requise n’a été trouvée »
nslookup $Ordinateur 2>$null renvoie aussi une erreur mais immédiatement
nslookup : *** srvad.domaine.lan ne parvient pas … trouver pc-test : Non-existent domain

personnellement j'utilise ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
    try {$n = $(((nslookup $Ordinateur 2>$null)[4] -split "[Addresses:|Address:]  ([\w.]+)")[1])} catch {$n = $null}
    if ($n) {
    $ResultatPing = $ping.Send($Ordinateur, 1000)
    if ($ResultatPing.Status -eq "Success") {
# traitement
        }

pour info test-connection ne gère le temps en cas de non reponse , dommage, ça manque

la solution multi job est pas mal aussi mais il te faudra quand même réduire les timeout !!