ajout script backup enjalbert

This commit is contained in:
2021-05-19 18:09:20 +02:00
parent f51eb64e2f
commit d55d8ce9f0
2 changed files with 982 additions and 0 deletions

View File

@@ -0,0 +1,491 @@
# =======================================================
# Fonction qui ecrit les messages sur la sortie standard
# Usage : Write-OutputConsole ($theme)
# =======================================================
function Write-OutputConsole($theme) {
if ( $theme -eq "lancement") {
write-Output "!-----------------------------------------------------------------------------!"
Write-Output "! La Sauvegarde en local de Vos Documents et de Votre Bureau est en cours. !"
Write-Output "! !"
Write-Output "! !"
Write-Output "! Les fichiers avec les extensions suivantes sont actuellement exclus: !"
Write-Output "! .ogg.flac.mp3.wav.wma.aac.mpeg.ogm.avi.flv.wmv.mov.divx.xvid !"
Write-Output "! !"
Write-Output "! Fermer cette Fen<65>tre Annulera la Sauvegarde ! !"
Write-Output "! !"
Write-Output "------------------------------------------------------------------------------!"
}
if ( $theme -eq "lancementvol") {
write-Output "!-----------------------------------------------------------------------------!"
Write-Output "! La Sauvegarde sur Serveur distant de Vos Documents et de Votre Bureau !"
Write-Output "! est en cours. !"
Write-Output "! !"
Write-Output "! Les fichiers avec les extensions suivantes sont actuellement exclus: !"
Write-Output "! .ogg.flac.mp3.wav.wma.aac.mpeg.ogm.avi.flv.wmv.mov.divx.xvid !"
Write-Output "! !"
Write-Output "! Fermer cette Fen<65>tre Annulera la Sauvegarde ! !"
Write-Output "! !"
Write-Output "------------------------------------------------------------------------------!"
}
if ( $theme -eq "zipprob") {
write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! La compression de la messagerie a echou<6F> !"
Write-Output "! !"
Write-Output "! !"
Write-Output "! Fermer cette Fen<65>tre Annulera la Sauvegarde ! !"
Write-Output "! !"
Write-Output "--------------------------------------------------------------------------------!"
}
if ( $theme -eq "nospace") {
write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! Le Disque dur C Local n'a pas assez d'espace Libre !"
Write-Output "! !"
Write-Output "! La sauvegarde est annul<75>e !"
Write-Output "! Contactez votre administrateur. !"
Write-Output "! !"
Write-Output "--------------------------------------------------------------------------------!"
}
if ( $theme -eq "novoltaire") {
Write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! Le Serveur de Sauvegarde est indiponible !"
Write-Output "! !"
Write-Output "! !"
Write-Output "! La Sauvegarde distante est Annul<75>e ! !"
Write-Output "! !"
Write-Output "--------------------------------------------------------------------------------!"
}
if ( $theme -eq "pasdeflagloc") {
Write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! La Sauvegarde Locale de Vos Documents e tde Votre Bureau a d<>j<EFBFBD> <20>t<EFBFBD> lanc<6E>e !"
Write-Output "! !"
Write-Output "! lors de ces derni<6E>res 24 heures !"
Write-Output "! La Sauvegarde est donc annul<75>e ! !"
Write-Output "! !"
Write-Output "--------------------------------------------------------------------------------!"
}
if ( $theme -eq "pasdeflagnet") {
Write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! La Sauvegarde R<>seau de Vos Documents et de Votre Bureau !"
Write-Output "! a d<>j<EFBFBD> <20>t<EFBFBD> lanc<6E>e !"
Write-Output "! lors de ces derni<6E>res 24 heures !"
Write-Output "! La Sauvegarde est donc annul<75>e ! !"
Write-Output "! !"
Write-Output "--------------------------------------------------------------------------------!"
}
}
# =======================================================
# Fonction qui envoie un email avec 2 attachements
# =======================================================
function Send-EMail($argFrom, $argTo, $argtoCC, $argPriority, $argSubject, $argBody, $argAtt, $argSmtp) {
$mail = New-Object System.Net.Mail.MailMessage
$smtpClient = new-object system.net.mail.SmtpClient($argSmtp)
$mail.Body = $argBody
$mail.Subject = $argSubject
$mail.priority = $argPriority
$mail.From = $argFrom
$mail.To.Add($argTo)
if ($argtoCC) {
$mail.CC.Add($argtoCC)
}
if (!($argAtt -eq $null)) {
$att = new-object Net.Mail.Attachment $argAtt
$mail.Attachments.Add($att)
}
$smtpClient.Credentials = [System.Net.CredentialCache]::DefaultNetworkCredentials
$smtpClient.Send($mail)
$mail.Attachments.Dispose()
$mail = $null
$smtpClient = $null
}
# =======================================================================
# Fonction qui affiche une boite de dialogue qui se ferme automatiquement
# =======================================================================
function DisplayMessageBox($argText, $argDelayDisplay, $argTitre, $argButton) {
$job=Start-Job -ArgumentList $argText,$argDelayDisplay,$argTitre,$argButton -ScriptBlock {
$a = new-object -comobject wscript.shell
$a.popup($args[0],$args[1],$args[2],$args[3])
}
return $job;
}
# =================================================================================================
# DESCRIPTION: Displays the attention message box & checks to see if the user clicks the ok button.
# Affiche une bo<62>te de dialogue fen<65>tr<74>e
# Pr<50>requis [void][Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")
# =================================================================================================
function Show-MessageBox([string] $Message,[string] $Titre="Attention !!", [String] $IconType="Warning",[String] $BtnType="Ok") {
trap {
switch ($_.Exception.GetType().FullName) {
"System.Management.Automation.PSInvalidCastException" {$_.message;Break}
"System.Management.Automation.RuntimeException" {
Throw "Assurez-vous que l'assembly [System.Windows.Forms] est bien charg<72>."
}
default {Throw $_}
}#switch
}#trap
return [Windows.Forms.MessageBox]::Show($Message,$Titre, $BtnType,$IconType)
}
function Show-QuestionBox([string] $Message,[string] $Titre="Question ??", [String] $IconType="Question",[String] $BtnType="YesNo") {
trap {
switch ($_.Exception.GetType().FullName) {
"System.Management.Automation.PSInvalidCastException" {$_.message;Break}
"System.Management.Automation.RuntimeException" {
Throw "Assurez-vous que l'assembly [System.Windows.Forms] est bien charg<72>."
}
default {Throw $_}
}#switch
}#trap
return [Windows.Forms.MessageBox]::Show($Message,$Titre,[Windows.Forms.MessageBoxButtons]::$BtnType, [Windows.Forms.MessageBoxIcon]::$IconType)
}
function Show-InfoBox([string] $Message,[string] $Titre="Pour votre Information !!", [String] $IconType="Information",[String] $BtnType="Ok") {
trap {
switch ($_.Exception.GetType().FullName) {
"System.Management.Automation.PSInvalidCastException" {$_.message;Break}
"System.Management.Automation.RuntimeException" {
Throw "Assurez-vous que l'assembly [System.Windows.Forms] est bien charg<72>."}
default {Throw $_}
}#switch
}#trap
return [Windows.Forms.MessageBox]::Show($Message,$Titre, $BtnType,$IconType)
}
# =================================================
# Renvoi la Taille d'un repertoire en octets
# =================================================
function Get-FolderSize() {
param ([string]$root = $(resolve-path .))
gci -re $root |
?{ -not $_.PSIsContainer } |
measure-object -sum -property Length
}
# =================================================
# Renvoi la Taille d'un fichier en octet
# =================================================
function Get-FileSize($Path) {
# On verifie si le path exist
if(test-path $Path){
$colItems = (Get-ChildItem $Path)
return $colItems.Length
}
else {
return 0
}
}
# ==================================================
# Renvoie la Taille d'un fichier en Go
# ==================================================
function Get-FileSizeGB($Path){
return ("{0:N2}" -f ((Get-FileSize $Path) /1GB))
}
# ===========================================================
# Nettoyage des Logs
# ===========================================================
function Delete-Logs($argDirectoryLogs,$argDelay){
$jour = [DateTime]::Today
$lastMod = $jour.AddDays(-$argDelay)
#R<>cupere la liste des fichiers logs ant<6E>rieurs <20> la date
$Files = get-childitem $argDirectoryLogs -include *.log -recurse | Where {$_.LastWriteTime -le "$lastMod"}
if (!($Files -eq $null)) {
foreach ($File in $Files) {
write-host $File
Remove-Item $File
}
}
}
# =========================================================================
# Fonction de r<>cup<75>ration du mail utilisateur dans le fichier sur Voltaire
# =========================================================================
function Get-Email {
param ([string]$login,[string]$filelogs)
Get-Content $filelogs | Where-Object { $_.split(";")[0] -match "$login"} | foreach {$_ -replace "^$login;", ""}
}
# =======================================================
# Fonction qui initialise le bon path de la messagerie
# =======================================================
function Find-DirectoryMessagerie {
param ([string]$pathDocsUserLocation)
Set-Location $pathDocsUserLocation
Get-ChildItem "./" | Where-Object {$_.Attributes -eq "Directory"} | Where-Object {$_.Name -match "^[M-m]essagerie$"} | foreach {$_.FullName}
}
# =========================================================================
# Fonctions relatives <20> la taille du disque C
# =========================================================================
function Get-FreeSpaceCGB {
return Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {[Math]::round($_.FreeSpace/1GB,2)}
}
function Get-FreeSpaceC {
return Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {$_.FreeSpace}
}
function Get-SizeC {
return Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {$_.Size}
}
function Get-SizeCGB {
return Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {[Math]::round($_.Size/1GB,2)}
}
function espacedispo
{
$freespaceC = Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {$_.FreeSpace}
$sizeC = Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {$_.Size}
$freespaceCGB = Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {[Math]::round($_.FreeSpace / 1073741824,2)}
$sizeCGB = Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {[Math]::round($_.Size / 1073741824,2)}
$docspace = (Get-FolderSize $DocsUserLocation).Sum
$burspace = (Get-FolderSize $BureauUserLocation).Sum
$totaltoback = $burspace + $docspace
$docspaceGB = [Math]::round($docspace/1GB,2)
$totaltobackGB = [Math]::round($totaltoback/1GB,2)
$spaceminfree = $totaltoback + 21474836480
echo $spaceminfree
echo $freespaceCGB
if
( $freespaceC -lt $spaceminfree )
{
$greenflag = 1
}
else
{
$greenflag = 0
}
return $greenflag
}
function Kill-Process ($app) {
if (Get-Process $app -ErrorAction silentlycontinue) {
Get-Process $app | Stop-Process
Start-Sleep -s 2
}
}
function Get-OS {
return (Get-WmiObject -class Win32_OperatingSystem).Caption | foreach {$_ -replace " ", ""}
}
#=======================================================
# Fonction qui d<>fini laptop ou desktop
# =======================================================
function Get-PCtype {
return (Get-WmiObject -class Win32_computersystem).PCSystemType }
$pctype = Get-PCtype
if ($pctype -ne "2")
{$fixe = "Oui"}
else
{$fixe = "Non"}
# =======================================================
# Fonction qui <20>crit des indicateurs dans un fichier
# =======================================================
function Set-Indicator($fichier) {
#Si le fichier n'existe pas, je cr<63>e un nouveau fichier.
if ((Test-Path $fichier) -ne "True") { New-Item -ItemType file -Path $indicateurs -Force }
# Ajoute une ligne dans le fichier.
# Les champs sont l'utilisateur, l'ordinateur, les 5 codes de sortie des commandes robocopy, les dates de debut et de fin, la taille en GB <20> copier <20> distance
# et l'espace libre suffisant Oui ou Non
Add-Content -Path $fichier -Value "$UserName;$ComputerName;$DocExitCode;$BurExitCode;$BurVolExitCode;$DocVolExitCode;$Tstart;$Tend;$sizetobackGB;$nospace"
}
# =======================================================
# D<>claration des variables globales
# =======================================================
# Portable ou Fixe
#$fixe = "Oui"
# Serveur de backup
$BackupServer = "CLUSTER_SYNOLOG"
# Serveur de Backup FQDN
$BackupServerfdqn = "CLUSTER_SYNOLOG.iut.local"
# R<>pertoire partag<61> sur le serveur
$ShareBackupServer = "Personnel\MonDossier"
# Nom de l'ordinateur
$ComputerName = $Env:COMPUTERNAME
# Nom de la session
$UserName = Enjalbert.S
# Initialisation du jour de la semaine
$numjour = Get-Date -UFormat %u
# Initialisation du Jour de l'ann<6E>e
$dayofyear = (get-date).dayofyear
# R<>pertoire de sauvegarde sur le serveur aubrac
$DirBackVol = "\\$BackupServerfdqn\$ShareBackupServer\$UserName"
# Nom du repertoire de logs
$NameDirectoryLogs = "logssauv"
# Nom du repertoire de logs Local
$NameDirectoryLogsLocal = "localogssauv"
# Nom du serveur smtp
$SmtpServerName = "relay.iut-rodez.fr"
# Mail du support
$toSupport = "support@iut-rodez.fr"
# Emplacement du fichier de correspondance des emails (attention <20> ce qu'il ne soit pas modifi<66> par des utilisateurs!)
$filelogins = "\\$BackupServerfdqn\$ShareBackupServer\logssauv\login-email.csv"
# Champ FROM des courriel
if ((Test-Path $filelogins) -ne "True") {
$mailfrom = "sauvegarde@iut-rodez.fr" }
else {
if (( Get-Content "$filelogins" | ? { $_ -match "$UserName" } ) -eq $Null ) {
$mailfrom = "sauvegarde@iut-rodez.fr" }
else {
$mailfrom = Get-EMail $UserName $filelogins
}
}
if ((Test-Path $filelogins) -ne "True") {
$Toclient = "sauvegarde@iut-rodez.fr" }
else {
if (( Get-Content "$filelogins" | ? { $_ -match "$UserName" } ) -eq $Null ) {
$Toclient = "sauvegarde@iut-rodez.fr" }
else {
$Toclient = Get-EMail $UserName $filelogins
}
}
# Fichier des indicateurs sur Cluster_synolog
$indicateurs = "\\$BackupServerfdqn\$ShareBackupServer\logssauv\indicateurs$dayofyear.txt"
# Localisation du profil des utilisateurs (XP ou seven)
$ProfileUserLocation = $Env:UserProfile
$DirectoryBackup = "$ProfileUserLocation\Copie-Y"
$NameDirectoryLogsVol = "$DirectoryBackup\Logssauv"
$fichierflagnet = "$DirectoryBackup\flag-net.txt"
$os = Get-OS
#Liste des fichiers <20> exclure
$FileExclude = "`"*.ogg`" `"*.flac`" `"*.mp3`" `"*.wav`" `"*.wma`" `"*.aac`" `"*.mpeg`" `"*.ogm`" `"*.avi`" `"*.flv`" `"*.wmv`" `"*.mov`" `"*.divx`" `"*.xvid`" "
# Nom du fichier logs
$NameDocVolLogs = "SavDocVol"+" {0:dddd dd MMM yyyy' - 'HH'h'mm}.log" -f (Get-Date)
$DelayRetentionLogs = 8
$listJob = @()
$ExitCode = @{
"16"="Erreur fatale lors de l'op<6F>ration. Voir fichier de Log"
"15"="Echec de la copie. Voir le fichier de Log."
"14"="Echec de la copie. Voir le fichier de Log."
"13"="Echec de la copie. Voir le fichier de Log."
"12"="Echec de la copie. Voir le fichier de Log."
"11"="Echec de la copie. Voir le fichier de Log."
"10"="Echec de la copie. Voir le fichier de Log."
"9"="Echec de la copie. Voir le fichier de Log."
"8"="Echec de la copie. Plisieurs fichiers n'ont pas <20>t<EFBFBD> copi<70>s. Voir le fichier de Log."
"7"="Copie OK. Certains fichiers pr<70>sents et suppl<70>mentaires on g<>n<EFBFBD>r<EFBFBD> une incoh<6F>rence entre la source et la destination. Voir le fichier de Log."
"6"="Copie OK. Certains fichiers et dossiers supl<70>mentaires ont g<>n<EFBFBD>r<EFBFBD> une incoh<6F>rence entre la source et la destination. Voir le fichier de Log."
"5"="Copie OK. Certains fichiers ont <20>t<EFBFBD> copi<70>s et d'autres ont g<>n<EFBFBD>r<EFBFBD> une incoh<6F>rence entre la source et la destination. Voir le fichier de Log."
"4"="Copie OK. Une incoh<6F>rence entre la source et la destination de la sauvegarde a <20>t<EFBFBD> d<>tect<63>e. Voir le fichier de Log."
"3"="Copie OK. Certains fichiers suppl<70>mentaires ont <20>t<EFBFBD> copi<70>s avec succ<63>s."
"2"="Copie OK. Certains fichiers ou r<>pertoires suppl<70>mentaires ont <20>t<EFBFBD> d<>tect<63>s et copi<70>s avec succ<63>s."
"1"="Copie OK. Un ou plusieurs fichiers ont <20>t<EFBFBD> copi<70>s avec succ<63>s du r<>pertoire source au r<>pertoire de destination."
"0"="Copie OK. Aucun changement. Le r<>pertoire source <20>tait identique au r<>pertoire de destination."
}
$mail = New-Object System.Net.Mail.MailMessage
$killappli = @("outlook","excel","winword","powerpnt","msaccess","mspub","visio","thunderbird","soffice.bin")
$SavDocVolLog = "$NameDirectoryLogsVol\$NameDocVolLogs"
$resultatcopieloc = 0
$resultatcopienet = 0
$pasnecessaireloc = 0
$pasnecessairenet = 0
# FIN VARIABLES GLOBALES DEF ET INIT
# =============================
# DEBUT DU PROGRAMME PRINCIPAL
# =============================
# Chargement d'une librairie pour l'affichade de fenetre
[System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")
# On tue les appli genantes
foreach ($i in $killappli){
Kill-Process ($i)
}
Start-Sleep -s 2
# D<>termination de l'endroit ou effectuer la sauvegarde
# et la validation ou non de la sauvegarde pr<70>c<EFBFBD>dente en local
If (!(Test-Path "$NameDirectoryLogsVol")){
Set-Location "$DirectoryBackup"
New-Item -ItemType Directory -Name "$NameDirectoryLogs"
}
$TimesStart = Get-date -Format 'dddd dd MMM yyyy'
$HourStart = Get-Date -Format 'HH"h"mm'
$Tstart = Get-Date -Format 'yyyy-MM-dd HH:mm:ss'
## ===============================================================
# SEQUENCE : COPIE RESEAU
## ================================================================
Write-OutputConsole("lancement")
Start-Sleep -s 2
# Test de la disponibilit<69> du serveur, on arr<72>te le programme si le serveur est injoignable
if ((!(Test-Connection -computer $BackupServer -Count 3 -quiet)) -or (!(Test-Connection -computer $BackupServerfdqn -Count 5 -quiet))) {
Write-OutputConsole("nosynolog")
Show-MessageBox ("Attention !!", "Le serveur de backup n'est pas joignable, la sauvegarde est annul<75>e`nContactez votre administrateur.`n`nCliquez su OK pour Eteindre")
exit
}
# Lancement de la copie Y CLUSTER_SYNOLOG vers Dossier Copie-Y sur Portable
robocopy "$DirBackVol" "$DirectoryBackup" /MIR /R:3 /W:5 /XD $DirectoryExclude >> $SavDocVolLog
$DocVolExitCode = $LASTEXITCODE
if ($DocVolExitCode -lt 8){
# La sauvegarde Locale est r<>ussie, on remet le fichier flag puis on compresse le tout dans le dossier du jour
set-content -path "$fichierflagnet" -value "OK"
$resultatcopienet = 1
}
$TimesEnd = Get-date -Format 'dddd dd MMM yyyy'
$HourEnd = Get-Date -Format 'HH"h"mm'
$Tend = Get-Date -Format 'yyyy-MM-dd HH:mm:ss'
## ===============================================================
# 3EME SEQUENCE : INDICATEURS/NOTIFICATIONS
# ================================================================
Delete-Logs $NameDirectoryLogsVol 8
if ($resultatcopienet -eq 1) {
$messagecourriel = "R<EFBFBD>sultat de la sauvegarde : OK (d<>marr<72>e le $TimesStart <20> $HourStart et termin<69>e le $TimesEnd <20> $HourEnd)"
$body = "Si la sauvegarde a d<>ja <20>t<EFBFBD> ex<65>cut<75>e dans les 18h, elle n'est pas relanc<6E>e."
$toSupport = $null
}
else {
$messagecourriel = "Un probl<62>me est survenu dans l'ex<65>cution de votre sauvegarde (d<>marr<72>e le $TimesStart <20> $HourStart et termin<69>e le $TimesEnd <20> $HourEnd)"
$body = "Un probl<62>me est survenu dans l'ex<65>cution de la sauvegarde pour $UserName. survenu lors de la sauvegarde de Copie-Y d<>marr<72>e le $TimesStart <20> $HourStart et termin<69>e le $TimesEnd <20> $HourEnd.`n`nLes r<>sultats de sauvegardes ont <20>t<EFBFBD> les suivants :`n`nCopie-Y vers CLUSTER_SYNOLOG `n"+$ExitCode["$DocVolExitCode"]+"`n`Pour de plus amples d<>tails, consultez le fichier log en pi<70>ce jointe."
}
If (!(Test-Path "$SavDocVolLog")){
$SavDocVolLog = $null
}
# Message aux utilisateurs
Send-Email $mailfrom $Toclient $toSupport 'High' $messagecourriel $body $SavDocVolLog $SmtpServerName
# TODO:verifier le lancement de la commande mail
# INDICATEURS :
# ------------
#
Set-indicator($indicateurs)
}
{
Exit
}

View File

@@ -0,0 +1,491 @@
# =======================================================
# Fonction qui ecrit les messages sur la sortie standard
# Usage : Write-OutputConsole ($theme)
# =======================================================
function Write-OutputConsole($theme) {
if ( $theme -eq "lancement") {
write-Output "!-----------------------------------------------------------------------------!"
Write-Output "! La Sauvegarde en local de Vos Documents et de Votre Bureau est en cours. !"
Write-Output "! !"
Write-Output "! !"
Write-Output "! Les fichiers avec les extensions suivantes sont actuellement exclus: !"
Write-Output "! .ogg.flac.mp3.wav.wma.aac.mpeg.ogm.avi.flv.wmv.mov.divx.xvid !"
Write-Output "! !"
Write-Output "! Fermer cette Fen<65>tre Annulera la Sauvegarde ! !"
Write-Output "! !"
Write-Output "------------------------------------------------------------------------------!"
}
if ( $theme -eq "lancementvol") {
write-Output "!-----------------------------------------------------------------------------!"
Write-Output "! La Sauvegarde sur Serveur distant de Vos Documents et de Votre Bureau !"
Write-Output "! est en cours. !"
Write-Output "! !"
Write-Output "! Les fichiers avec les extensions suivantes sont actuellement exclus: !"
Write-Output "! .ogg.flac.mp3.wav.wma.aac.mpeg.ogm.avi.flv.wmv.mov.divx.xvid !"
Write-Output "! !"
Write-Output "! Fermer cette Fen<65>tre Annulera la Sauvegarde ! !"
Write-Output "! !"
Write-Output "------------------------------------------------------------------------------!"
}
if ( $theme -eq "zipprob") {
write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! La compression de la messagerie a echou<6F> !"
Write-Output "! !"
Write-Output "! !"
Write-Output "! Fermer cette Fen<65>tre Annulera la Sauvegarde ! !"
Write-Output "! !"
Write-Output "--------------------------------------------------------------------------------!"
}
if ( $theme -eq "nospace") {
write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! Le Disque dur C Local n'a pas assez d'espace Libre !"
Write-Output "! !"
Write-Output "! La sauvegarde est annul<75>e !"
Write-Output "! Contactez votre administrateur. !"
Write-Output "! !"
Write-Output "--------------------------------------------------------------------------------!"
}
if ( $theme -eq "novoltaire") {
Write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! Le Serveur de Sauvegarde est indiponible !"
Write-Output "! !"
Write-Output "! !"
Write-Output "! La Sauvegarde distante est Annul<75>e ! !"
Write-Output "! !"
Write-Output "--------------------------------------------------------------------------------!"
}
if ( $theme -eq "pasdeflagloc") {
Write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! La Sauvegarde Locale de Vos Documents e tde Votre Bureau a d<>j<EFBFBD> <20>t<EFBFBD> lanc<6E>e !"
Write-Output "! !"
Write-Output "! lors de ces derni<6E>res 24 heures !"
Write-Output "! La Sauvegarde est donc annul<75>e ! !"
Write-Output "! !"
Write-Output "--------------------------------------------------------------------------------!"
}
if ( $theme -eq "pasdeflagnet") {
Write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! La Sauvegarde R<>seau de Vos Documents et de Votre Bureau !"
Write-Output "! a d<>j<EFBFBD> <20>t<EFBFBD> lanc<6E>e !"
Write-Output "! lors de ces derni<6E>res 24 heures !"
Write-Output "! La Sauvegarde est donc annul<75>e ! !"
Write-Output "! !"
Write-Output "--------------------------------------------------------------------------------!"
}
}
# =======================================================
# Fonction qui envoie un email avec 2 attachements
# =======================================================
function Send-EMail($argFrom, $argTo, $argtoCC, $argPriority, $argSubject, $argBody, $argAtt, $argSmtp) {
$mail = New-Object System.Net.Mail.MailMessage
$smtpClient = new-object system.net.mail.SmtpClient($argSmtp)
$mail.Body = $argBody
$mail.Subject = $argSubject
$mail.priority = $argPriority
$mail.From = $argFrom
$mail.To.Add($argTo)
if ($argtoCC) {
$mail.CC.Add($argtoCC)
}
if (!($argAtt -eq $null)) {
$att = new-object Net.Mail.Attachment $argAtt
$mail.Attachments.Add($att)
}
$smtpClient.Credentials = [System.Net.CredentialCache]::DefaultNetworkCredentials
$smtpClient.Send($mail)
$mail.Attachments.Dispose()
$mail = $null
$smtpClient = $null
}
# =======================================================================
# Fonction qui affiche une boite de dialogue qui se ferme automatiquement
# =======================================================================
function DisplayMessageBox($argText, $argDelayDisplay, $argTitre, $argButton) {
$job=Start-Job -ArgumentList $argText,$argDelayDisplay,$argTitre,$argButton -ScriptBlock {
$a = new-object -comobject wscript.shell
$a.popup($args[0],$args[1],$args[2],$args[3])
}
return $job;
}
# =================================================================================================
# DESCRIPTION: Displays the attention message box & checks to see if the user clicks the ok button.
# Affiche une bo<62>te de dialogue fen<65>tr<74>e
# Pr<50>requis [void][Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")
# =================================================================================================
function Show-MessageBox([string] $Message,[string] $Titre="Attention !!", [String] $IconType="Warning",[String] $BtnType="Ok") {
trap {
switch ($_.Exception.GetType().FullName) {
"System.Management.Automation.PSInvalidCastException" {$_.message;Break}
"System.Management.Automation.RuntimeException" {
Throw "Assurez-vous que l'assembly [System.Windows.Forms] est bien charg<72>."
}
default {Throw $_}
}#switch
}#trap
return [Windows.Forms.MessageBox]::Show($Message,$Titre, $BtnType,$IconType)
}
function Show-QuestionBox([string] $Message,[string] $Titre="Question ??", [String] $IconType="Question",[String] $BtnType="YesNo") {
trap {
switch ($_.Exception.GetType().FullName) {
"System.Management.Automation.PSInvalidCastException" {$_.message;Break}
"System.Management.Automation.RuntimeException" {
Throw "Assurez-vous que l'assembly [System.Windows.Forms] est bien charg<72>."
}
default {Throw $_}
}#switch
}#trap
return [Windows.Forms.MessageBox]::Show($Message,$Titre,[Windows.Forms.MessageBoxButtons]::$BtnType, [Windows.Forms.MessageBoxIcon]::$IconType)
}
function Show-InfoBox([string] $Message,[string] $Titre="Pour votre Information !!", [String] $IconType="Information",[String] $BtnType="Ok") {
trap {
switch ($_.Exception.GetType().FullName) {
"System.Management.Automation.PSInvalidCastException" {$_.message;Break}
"System.Management.Automation.RuntimeException" {
Throw "Assurez-vous que l'assembly [System.Windows.Forms] est bien charg<72>."}
default {Throw $_}
}#switch
}#trap
return [Windows.Forms.MessageBox]::Show($Message,$Titre, $BtnType,$IconType)
}
# =================================================
# Renvoi la Taille d'un repertoire en octets
# =================================================
function Get-FolderSize() {
param ([string]$root = $(resolve-path .))
gci -re $root |
?{ -not $_.PSIsContainer } |
measure-object -sum -property Length
}
# =================================================
# Renvoi la Taille d'un fichier en octet
# =================================================
function Get-FileSize($Path) {
# On verifie si le path exist
if(test-path $Path){
$colItems = (Get-ChildItem $Path)
return $colItems.Length
}
else {
return 0
}
}
# ==================================================
# Renvoie la Taille d'un fichier en Go
# ==================================================
function Get-FileSizeGB($Path){
return ("{0:N2}" -f ((Get-FileSize $Path) /1GB))
}
# ===========================================================
# Nettoyage des Logs
# ===========================================================
function Delete-Logs($argDirectoryLogs,$argDelay){
$jour = [DateTime]::Today
$lastMod = $jour.AddDays(-$argDelay)
#R<>cupere la liste des fichiers logs ant<6E>rieurs <20> la date
$Files = get-childitem $argDirectoryLogs -include *.log -recurse | Where {$_.LastWriteTime -le "$lastMod"}
if (!($Files -eq $null)) {
foreach ($File in $Files) {
write-host $File
Remove-Item $File
}
}
}
# =========================================================================
# Fonction de r<>cup<75>ration du mail utilisateur dans le fichier sur Voltaire
# =========================================================================
function Get-Email {
param ([string]$login,[string]$filelogs)
Get-Content $filelogs | Where-Object { $_.split(";")[0] -match "$login"} | foreach {$_ -replace "^$login;", ""}
}
# =======================================================
# Fonction qui initialise le bon path de la messagerie
# =======================================================
function Find-DirectoryMessagerie {
param ([string]$pathDocsUserLocation)
Set-Location $pathDocsUserLocation
Get-ChildItem "./" | Where-Object {$_.Attributes -eq "Directory"} | Where-Object {$_.Name -match "^[M-m]essagerie$"} | foreach {$_.FullName}
}
# =========================================================================
# Fonctions relatives <20> la taille du disque C
# =========================================================================
function Get-FreeSpaceCGB {
return Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {[Math]::round($_.FreeSpace/1GB,2)}
}
function Get-FreeSpaceC {
return Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {$_.FreeSpace}
}
function Get-SizeC {
return Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {$_.Size}
}
function Get-SizeCGB {
return Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {[Math]::round($_.Size/1GB,2)}
}
function espacedispo
{
$freespaceC = Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {$_.FreeSpace}
$sizeC = Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {$_.Size}
$freespaceCGB = Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {[Math]::round($_.FreeSpace / 1073741824,2)}
$sizeCGB = Get-WmiObject win32_logicaldisk -Filter "DriveType=3" | Where-Object {$_.DeviceID -eq "C:"} | ForEach-Object {[Math]::round($_.Size / 1073741824,2)}
$docspace = (Get-FolderSize $DocsUserLocation).Sum
$burspace = (Get-FolderSize $BureauUserLocation).Sum
$totaltoback = $burspace + $docspace
$docspaceGB = [Math]::round($docspace/1GB,2)
$totaltobackGB = [Math]::round($totaltoback/1GB,2)
$spaceminfree = $totaltoback + 21474836480
echo $spaceminfree
echo $freespaceCGB
if
( $freespaceC -lt $spaceminfree )
{
$greenflag = 1
}
else
{
$greenflag = 0
}
return $greenflag
}
function Kill-Process ($app) {
if (Get-Process $app -ErrorAction silentlycontinue) {
Get-Process $app | Stop-Process
Start-Sleep -s 2
}
}
function Get-OS {
return (Get-WmiObject -class Win32_OperatingSystem).Caption | foreach {$_ -replace " ", ""}
}
#=======================================================
# Fonction qui d<>fini laptop ou desktop
# =======================================================
function Get-PCtype {
return (Get-WmiObject -class Win32_computersystem).PCSystemType }
$pctype = Get-PCtype
if ($pctype -ne "2")
{$fixe = "Oui"}
else
{$fixe = "Non"}
# =======================================================
# Fonction qui <20>crit des indicateurs dans un fichier
# =======================================================
function Set-Indicator($fichier) {
#Si le fichier n'existe pas, je cr<63>e un nouveau fichier.
if ((Test-Path $fichier) -ne "True") { New-Item -ItemType file -Path $indicateurs -Force }
# Ajoute une ligne dans le fichier.
# Les champs sont l'utilisateur, l'ordinateur, les 5 codes de sortie des commandes robocopy, les dates de debut et de fin, la taille en GB <20> copier <20> distance
# et l'espace libre suffisant Oui ou Non
Add-Content -Path $fichier -Value "$UserName;$ComputerName;$DocExitCode;$BurExitCode;$BurVolExitCode;$DocVolExitCode;$Tstart;$Tend;$sizetobackGB;$nospace"
}
# =======================================================
# D<>claration des variables globales
# =======================================================
# Portable ou Fixe
#$fixe = "Oui"
# Serveur de backup
$BackupServer = "CLUSTER_SYNOLOG"
# Serveur de Backup FQDN
$BackupServerfdqn = "CLUSTER_SYNOLOG.iut.local"
# R<>pertoire partag<61> sur le serveur
$ShareBackupServer = "Personnel\MonDossier"
# Nom de l'ordinateur
$ComputerName = $Env:COMPUTERNAME
# Nom de la session
$UserName = Enjalbert.S
# Initialisation du jour de la semaine
$numjour = Get-Date -UFormat %u
# Initialisation du Jour de l'ann<6E>e
$dayofyear = (get-date).dayofyear
# R<>pertoire de sauvegarde sur le serveur aubrac
$DirBackVol = "\\$BackupServerfdqn\$ShareBackupServer\$UserName"
# Nom du repertoire de logs
$NameDirectoryLogs = "logssauv"
# Nom du repertoire de logs Local
$NameDirectoryLogsLocal = "localogssauv"
# Nom du serveur smtp
$SmtpServerName = "relay.iut-rodez.fr"
# Mail du support
$toSupport = "support@iut-rodez.fr"
# Emplacement du fichier de correspondance des emails (attention <20> ce qu'il ne soit pas modifi<66> par des utilisateurs!)
$filelogins = "\\$BackupServerfdqn\$ShareBackupServer\logssauv\login-email.csv"
# Champ FROM des courriel
if ((Test-Path $filelogins) -ne "True") {
$mailfrom = "sauvegarde@iut-rodez.fr" }
else {
if (( Get-Content "$filelogins" | ? { $_ -match "$UserName" } ) -eq $Null ) {
$mailfrom = "sauvegarde@iut-rodez.fr" }
else {
$mailfrom = Get-EMail $UserName $filelogins
}
}
if ((Test-Path $filelogins) -ne "True") {
$Toclient = "sauvegarde@iut-rodez.fr" }
else {
if (( Get-Content "$filelogins" | ? { $_ -match "$UserName" } ) -eq $Null ) {
$Toclient = "sauvegarde@iut-rodez.fr" }
else {
$Toclient = Get-EMail $UserName $filelogins
}
}
# Fichier des indicateurs sur \\voltaire\sauvegarde\
$indicateurs = "\\$BackupServerfdqn\$ShareBackupServer\logssauv\indicateurs$dayofyear.txt"
# Localisation du profil des utilisateurs (XP ou seven)
$ProfileUserLocation = $Env:UserProfile
$DirectoryBackup = "$ProfileUserLocation\Copie-Y"
$NameDirectoryLogsVol = "$DirectoryBackup\Logssauv"
$fichierflagnet = "$DirectoryBackup\flag-net.txt"
$os = Get-OS
#Liste des fichiers <20> exclure
$FileExclude = "`"*.ogg`" `"*.flac`" `"*.mp3`" `"*.wav`" `"*.wma`" `"*.aac`" `"*.mpeg`" `"*.ogm`" `"*.avi`" `"*.flv`" `"*.wmv`" `"*.mov`" `"*.divx`" `"*.xvid`" "
# Nom du fichier logs
$NameDocVolLogs = "SavDocVol"+" {0:dddd dd MMM yyyy' - 'HH'h'mm}.log" -f (Get-Date)
$DelayRetentionLogs = 8
$listJob = @()
$ExitCode = @{
"16"="Erreur fatale lors de l'op<6F>ration. Voir fichier de Log"
"15"="Echec de la copie. Voir le fichier de Log."
"14"="Echec de la copie. Voir le fichier de Log."
"13"="Echec de la copie. Voir le fichier de Log."
"12"="Echec de la copie. Voir le fichier de Log."
"11"="Echec de la copie. Voir le fichier de Log."
"10"="Echec de la copie. Voir le fichier de Log."
"9"="Echec de la copie. Voir le fichier de Log."
"8"="Echec de la copie. Plisieurs fichiers n'ont pas <20>t<EFBFBD> copi<70>s. Voir le fichier de Log."
"7"="Copie OK. Certains fichiers pr<70>sents et suppl<70>mentaires on g<>n<EFBFBD>r<EFBFBD> une incoh<6F>rence entre la source et la destination. Voir le fichier de Log."
"6"="Copie OK. Certains fichiers et dossiers supl<70>mentaires ont g<>n<EFBFBD>r<EFBFBD> une incoh<6F>rence entre la source et la destination. Voir le fichier de Log."
"5"="Copie OK. Certains fichiers ont <20>t<EFBFBD> copi<70>s et d'autres ont g<>n<EFBFBD>r<EFBFBD> une incoh<6F>rence entre la source et la destination. Voir le fichier de Log."
"4"="Copie OK. Une incoh<6F>rence entre la source et la destination de la sauvegarde a <20>t<EFBFBD> d<>tect<63>e. Voir le fichier de Log."
"3"="Copie OK. Certains fichiers suppl<70>mentaires ont <20>t<EFBFBD> copi<70>s avec succ<63>s."
"2"="Copie OK. Certains fichiers ou r<>pertoires suppl<70>mentaires ont <20>t<EFBFBD> d<>tect<63>s et copi<70>s avec succ<63>s."
"1"="Copie OK. Un ou plusieurs fichiers ont <20>t<EFBFBD> copi<70>s avec succ<63>s du r<>pertoire source au r<>pertoire de destination."
"0"="Copie OK. Aucun changement. Le r<>pertoire source <20>tait identique au r<>pertoire de destination."
}
$mail = New-Object System.Net.Mail.MailMessage
$killappli = @("outlook","excel","winword","powerpnt","msaccess","mspub","visio","thunderbird","soffice.bin")
$SavDocVolLog = "$NameDirectoryLogsVol\$NameDocVolLogs"
$resultatcopieloc = 0
$resultatcopienet = 0
$pasnecessaireloc = 0
$pasnecessairenet = 0
# FIN VARIABLES GLOBALES DEF ET INIT
# =============================
# DEBUT DU PROGRAMME PRINCIPAL
# =============================
# Chargement d'une librairie pour l'affichade de fenetre
[System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")
# On tue les appli genantes
foreach ($i in $killappli){
Kill-Process ($i)
}
Start-Sleep -s 2
# D<>termination de l'endroit ou effectuer la sauvegarde
# et la validation ou non de la sauvegarde pr<70>c<EFBFBD>dente en local
If (!(Test-Path "$NameDirectoryLogsVol")){
Set-Location "$DirectoryBackup"
New-Item -ItemType Directory -Name "$NameDirectoryLogs"
}
$TimesStart = Get-date -Format 'dddd dd MMM yyyy'
$HourStart = Get-Date -Format 'HH"h"mm'
$Tstart = Get-Date -Format 'yyyy-MM-dd HH:mm:ss'
## ===============================================================
# SEQUENCE : COPIE RESEAU
## ================================================================
Write-OutputConsole("lancement")
Start-Sleep -s 2
# Test de la disponibilit<69> du serveur, on arr<72>te le programme si le serveur est injoignable
if ((!(Test-Connection -computer $BackupServer -Count 3 -quiet)) -or (!(Test-Connection -computer $BackupServerfdqn -Count 5 -quiet))) {
Write-OutputConsole("nosynolog")
Show-MessageBox ("Attention !!", "Le serveur de backup n'est pas joignable, la sauvegarde est annul<75>e`nContactez votre administrateur.`n`nCliquez su OK pour Eteindre")
exit
}
# Lancement de la copie Y sur CLUSTER_SYNOLOG
robocopy "$DirectoryBackup" "$DirBackVol" /MIR /R:3 /W:5 /XD $DirectoryExclude >> $SavDocVolLog
$DocVolExitCode = $LASTEXITCODE
if ($DocVolExitCode -lt 8){
# La sauvegarde Locale est r<>ussie, on remet le fichier flag puis on compresse le tout dans le dossier du jour
set-content -path "$fichierflagnet" -value "OK"
$resultatcopienet = 1
}
$TimesEnd = Get-date -Format 'dddd dd MMM yyyy'
$HourEnd = Get-Date -Format 'HH"h"mm'
$Tend = Get-Date -Format 'yyyy-MM-dd HH:mm:ss'
## ===============================================================
# 3EME SEQUENCE : INDICATEURS/NOTIFICATIONS
# ================================================================
Delete-Logs $NameDirectoryLogsVol 8
if ($resultatcopienet -eq 1) {
$messagecourriel = "R<EFBFBD>sultat de la sauvegarde : OK (d<>marr<72>e le $TimesStart <20> $HourStart et termin<69>e le $TimesEnd <20> $HourEnd)"
$body = "Si la sauvegarde a d<>ja <20>t<EFBFBD> ex<65>cut<75>e dans les 18h, elle n'est pas relanc<6E>e."
$toSupport = $null
}
else {
$messagecourriel = "Un probl<62>me est survenu dans l'ex<65>cution de votre sauvegarde (d<>marr<72>e le $TimesStart <20> $HourStart et termin<69>e le $TimesEnd <20> $HourEnd)"
$body = "Un probl<62>me est survenu dans l'ex<65>cution de la sauvegarde pour $UserName. survenu lors de la sauvegarde de Copie-Y d<>marr<72>e le $TimesStart <20> $HourStart et termin<69>e le $TimesEnd <20> $HourEnd.`n`nLes r<>sultats de sauvegardes ont <20>t<EFBFBD> les suivants :`n`nCopie-Y vers CLUSTER_SYNOLOG `n"+$ExitCode["$DocVolExitCode"]+"`n`Pour de plus amples d<>tails, consultez le fichier log en pi<70>ce jointe."
}
If (!(Test-Path "$SavDocVolLog")){
$SavDocVolLog = $null
}
# Message aux utilisateurs
Send-Email $mailfrom $Toclient $toSupport 'High' $messagecourriel $body $SavDocVolLog $SmtpServerName
# TODO:verifier le lancement de la commande mail
# INDICATEURS :
# ------------
#
Set-indicator($indicateurs)
}
{
Exit
}