ajout script backup enjalbert

This commit is contained in:
andre 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ê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être Annulera la Sauvegarde ! !"
Write-Output "! !"
Write-Output "------------------------------------------------------------------------------!"
}
if ( $theme -eq "zipprob") {
write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! La compression de la messagerie a echoué !"
Write-Output "! !"
Write-Output "! !"
Write-Output "! Fermer cette Fenê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é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é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à été lancée !"
Write-Output "! !"
Write-Output "! lors de ces dernières 24 heures !"
Write-Output "! La Sauvegarde est donc annulé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à été lancée !"
Write-Output "! lors de ces dernières 24 heures !"
Write-Output "! La Sauvegarde est donc annulé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îte de dialogue fenêtrée
# Pré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é."
}
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é."
}
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é."}
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érieurs à 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é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 à 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 écrit des indicateurs dans un fichier
# =======================================================
function Set-Indicator($fichier) {
#Si le fichier n'existe pas, je cré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 à copier à 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é 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é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 à ce qu'il ne soit pas modifié 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 à 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é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 été copiés. Voir le fichier de Log."
"7"="Copie OK. Certains fichiers présents et supplémentaires on généré une incohérence entre la source et la destination. Voir le fichier de Log."
"6"="Copie OK. Certains fichiers et dossiers suplémentaires ont généré une incohérence entre la source et la destination. Voir le fichier de Log."
"5"="Copie OK. Certains fichiers ont été copiés et d'autres ont généré une incohérence entre la source et la destination. Voir le fichier de Log."
"4"="Copie OK. Une incohérence entre la source et la destination de la sauvegarde a été détectée. Voir le fichier de Log."
"3"="Copie OK. Certains fichiers supplémentaires ont été copiés avec succès."
"2"="Copie OK. Certains fichiers ou répertoires supplémentaires ont été détectés et copiés avec succès."
"1"="Copie OK. Un ou plusieurs fichiers ont été copiés avec succès du répertoire source au répertoire de destination."
"0"="Copie OK. Aucun changement. Le répertoire source é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écé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é du serveur, on arrê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é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ésultat de la sauvegarde : OK (démarrée le $TimesStart à $HourStart et terminée le $TimesEnd à $HourEnd)"
$body = "Si la sauvegarde a déja été exécutée dans les 18h, elle n'est pas relancée."
$toSupport = $null
}
else {
$messagecourriel = "Un problème est survenu dans l'exécution de votre sauvegarde (démarrée le $TimesStart à $HourStart et terminée le $TimesEnd à $HourEnd)"
$body = "Un problème est survenu dans l'exécution de la sauvegarde pour $UserName. survenu lors de la sauvegarde de Copie-Y démarrée le $TimesStart à $HourStart et terminée le $TimesEnd à $HourEnd.`n`nLes résultats de sauvegardes ont été les suivants :`n`nCopie-Y vers CLUSTER_SYNOLOG `n"+$ExitCode["$DocVolExitCode"]+"`n`Pour de plus amples détails, consultez le fichier log en piè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ê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être Annulera la Sauvegarde ! !"
Write-Output "! !"
Write-Output "------------------------------------------------------------------------------!"
}
if ( $theme -eq "zipprob") {
write-Output "!-------------------------------------------------------------------------------!"
Write-Output "! La compression de la messagerie a echoué !"
Write-Output "! !"
Write-Output "! !"
Write-Output "! Fermer cette Fenê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é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é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à été lancée !"
Write-Output "! !"
Write-Output "! lors de ces dernières 24 heures !"
Write-Output "! La Sauvegarde est donc annulé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à été lancée !"
Write-Output "! lors de ces dernières 24 heures !"
Write-Output "! La Sauvegarde est donc annulé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îte de dialogue fenêtrée
# Pré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é."
}
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é."
}
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é."}
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érieurs à 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é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 à 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 écrit des indicateurs dans un fichier
# =======================================================
function Set-Indicator($fichier) {
#Si le fichier n'existe pas, je cré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 à copier à 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é 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é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 à ce qu'il ne soit pas modifié 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 à 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é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 été copiés. Voir le fichier de Log."
"7"="Copie OK. Certains fichiers présents et supplémentaires on généré une incohérence entre la source et la destination. Voir le fichier de Log."
"6"="Copie OK. Certains fichiers et dossiers suplémentaires ont généré une incohérence entre la source et la destination. Voir le fichier de Log."
"5"="Copie OK. Certains fichiers ont été copiés et d'autres ont généré une incohérence entre la source et la destination. Voir le fichier de Log."
"4"="Copie OK. Une incohérence entre la source et la destination de la sauvegarde a été détectée. Voir le fichier de Log."
"3"="Copie OK. Certains fichiers supplémentaires ont été copiés avec succès."
"2"="Copie OK. Certains fichiers ou répertoires supplémentaires ont été détectés et copiés avec succès."
"1"="Copie OK. Un ou plusieurs fichiers ont été copiés avec succès du répertoire source au répertoire de destination."
"0"="Copie OK. Aucun changement. Le répertoire source é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écé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é du serveur, on arrê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é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ésultat de la sauvegarde : OK (démarrée le $TimesStart à $HourStart et terminée le $TimesEnd à $HourEnd)"
$body = "Si la sauvegarde a déja été exécutée dans les 18h, elle n'est pas relancée."
$toSupport = $null
}
else {
$messagecourriel = "Un problème est survenu dans l'exécution de votre sauvegarde (démarrée le $TimesStart à $HourStart et terminée le $TimesEnd à $HourEnd)"
$body = "Un problème est survenu dans l'exécution de la sauvegarde pour $UserName. survenu lors de la sauvegarde de Copie-Y démarrée le $TimesStart à $HourStart et terminée le $TimesEnd à $HourEnd.`n`nLes résultats de sauvegardes ont été les suivants :`n`nCopie-Y vers CLUSTER_SYNOLOG `n"+$ExitCode["$DocVolExitCode"]+"`n`Pour de plus amples détails, consultez le fichier log en piè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
}