Uranium Backup
La soluzione più completa e versatile per il backup e il trasferimento dei tuoi dati.

Backup dei permessi di sicurezza NTFS dei file

In questo semplice articolo vediamo come sia possibile fare il backup dei permessi di sicurezza NTFS (ACL) mediante le procedure messe a disposizione dalla ben nota libreria per Delphi: JEDI.

Mediante delle semplici funzioni è possibile copiare i permessi da un file sorgente a un file di destinazione.

Vediamo il primo esempio di codice.

Innanzitutto nella clausola uses dobbiamo aggiungere le unit di Delphi Jedi necessarie:

uses Windows, JwaAclApi, JwaWinNT, JwaAccCtrl, JwaWinBase;

Quindi basterà usare la seguente funzione:

function CopyACLs(const Source, Dest: string): boolean;
var   SidOwner: PSID;
SidGroup: PSID;
Dacl: PACL;
Sacl: PACL
SecDescPtr: PSECURITY_DESCRIPTOR;
begin
Result := false;
if GetNamedSecurityInfo(PChar(Source), SE_FILE_OBJECT,     DACL_SECURITY_INFORMATION or SACL_SECURITY_INFORMATION or     OWNER_SECURITY_INFORMATION or GROUP_SECURITY_INFORMATION,     @SidOwner, @SidGroup, @Dacl, @Sacl, SecDescPtr) = ERROR_SUCCESS then
begin
Result := SetNamedSecurityInfo(PChar(Dest), SE_FILE_OBJECT,       DACL_SECURITY_INFORMATION or SACL_SECURITY_INFORMATION or       OWNER_SECURITY_INFORMATION or GROUP_SECURITY_INFORMATION,       SidOwner, SidGroup, Dacl, Sacl) = ERROR_SUCCESS;
LocalFree(HLOCAL(SecDescPtr));
end;
end;

Come possiamo vedere, è davvero molto semplice con JEDI fare il backup dei permessi NTFS dei file, e copiare quindi nella destinazione anche le impostazioni ACL, per avere la sicurezza che il nostro backup mantenga gli stessi livelli di sicurezza e protezione che hanno i file nelle cartelle sorgenti.

Aderisci al nostro programma rivenditori!

Diventare rivenditore del software Backup Uranium è semplice.
Guadagna vendendo un programma affidabile e di qualità.
Scopri i vantaggi