XYplorer Beta Club

Code: Select all

fileacl X:\ /o Administrator /sub /files /force
fileacl X:\ /s Administrator:F /replace /force
fileacl X:\ /replace /inherit /noroot /sub /files /force

Code: Select all

CACLS folderpass /t /C /G Everyone:F

Code: Select all

    foreach($folder, "<get SelectedItemsPathNames |>", "|") {
        if (exists($folder) == 2) { run """%COMSPEC%"" /k CACLS ""$folder"" /T /C /G Everyone:F", 2, 0; }
    }

Code: Select all

@echo off
:a
if exist "%~1\nul" cd /d %1&set sub=/T
title ResetNTFSPermissions CACLS
echo This will REPLACE all the NTFS permissions to EVERYONE incuding all subfolders
echo (or run the command manually with /E to Edit ACL instead of replacing it)
echo ---
echo CACLS %1 %sub% /C /G Everyone:F
echo ---
CACLS %1 %sub% /t /C /G Everyone:F
shift
set g=hiren%1
if %g%==hiren goto e
goto a
:e
Pause

Code: Select all

    /*
        /T = Recusive
        /C = Continue in case of any file errors
        /Q = Don't show a message for each file / folder
        /grant:r = Replace permissions instead of adding them
        (OI) = Object inheritance (Vererbung für Dateien)
        (CI) = Container inheritance (Vererbung für Ordner)
        F = Full
    */

    // End if no files / folders are selected
    $selectedItems = "<get SelectedItemsPathNames |>";
    if ($selectedItems == "") {
        status "No item(s) selected, aborted!", "FF0000", "stop";
        end(true);
    }

    $batFile = "%TEMP%\~icacls.bat";
    $getAdminVBSFile = "%TEMP%\~GetAdmin.vbs";

    // Get client language
    $languageID = regexmatches(runret("""%COMSPEC%"" /c REG QUERY ""HKLM\SYSTEM\CurrentControlSet\Control\Nls\Language"" /v ""InstallLanguage"""), "\d{4}");

    // Translation
    $groupList = "Administrators|Users|Everyone";
    if ($languageID == "0407") { // German
        $localizedGroupList = "Administratoren|Benutzer|Jeder";
    } else { // Fallback to english
        $localizedGroupList = $groupList;
    }

    // Possible ICACLS commands
    $acl_Options = " /T /C /Q";
    $acl_Reset_Full = replacelist("/grant:r Everyone:(OI)(CI)F", $groupList, $localizedGroupList, "|");
    $acl_Add_Admin = replacelist("/grant Administrators:(OI)(CI)F", $groupList, $localizedGroupList, "|");
    $acl_Add_CurUser = "/grant %USERNAME%:(OI)(CI)F";

    // Edit this list if you want to add / remove commands to process
    // Ofc you need to add additional variables right over this comment...
    $aclProcessList = '$acl_Reset_Full|$acl_Add_Admin|$acl_Add_CurUser';

    $batchCommands = "";
    foreach($item, $selectedItems, "|") {
        $cmdOptions = "";
        foreach($entry, $aclProcessList, "|") {
            $entry = eval($entry); // Resove the variable names
            $cmd = "@ICACLS " . quote($item) . " " . $entry . $acl_Options;
            $cmdOptions = $cmdOptions . "@ECHO [Options: $entry]<crlf>" . $cmd . "<crlf>" . "@ECHO." . "<crlf>";
        }
        $batchCommands = $batchCommands . "@ECHO [$item]<crlf>" . $cmdOptions . "<crlf>" . "@ECHO.<crlf>@ECHO.<crlf>";
    }

    writefile($batFile, $batchCommands); // Write the .bat file

    $getAdminVBS = <<<>>>
        Set UAC = CreateObject("Shell.Application")
        UAC.ShellExecute "%COMSPEC%", "/k ""$batFile""", "", "runas", 1
>>>;

    writefile($getAdminVBSFile, trim($getAdminVBS));
    run """cscript"" ""$getAdminVBSFile""", , 0, 0;