https://nsis.sourceforge.io/mediawiki/index.php?action=history&feed=atom&title=Delete_directory_with_exclusion
Delete directory with exclusion - Revision history
2026-04-22T18:01:45Z
Revision history for this page on the wiki
MediaWiki 1.39.17
https://nsis.sourceforge.io/mediawiki/index.php?title=Delete_directory_with_exclusion&diff=16518&oldid=prev
BAPBAP: User talk:BAPBAP moved to Delete directory with exclusion: Incorrect title
2008-12-20T22:20:01Z
<p><a href="/User_talk:BAPBAP" class="mw-redirect" title="User talk:BAPBAP">User talk:BAPBAP</a> moved to <a href="/Delete_directory_with_exclusion" title="Delete directory with exclusion">Delete directory with exclusion</a>: Incorrect title</p>
<table style="background-color: #fff; color: #202122;" data-mw="interface">
<col class="diff-marker" />
<col class="diff-content" />
<col class="diff-marker" />
<col class="diff-content" />
<tr class="diff-title" lang="en">
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">↠Older revision</td>
<td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 22:20, 20 December 2008</td>
</tr>
<!-- diff cache key n22049_wiki-wiki_:diff::1.12:old-16517:rev-16518 -->
</table>
BAPBAP
https://nsis.sourceforge.io/mediawiki/index.php?title=Delete_directory_with_exclusion&diff=16517&oldid=prev
BAPBAP: Delete directory with exclusion
2008-12-20T22:14:26Z
<p>Delete directory with exclusion</p>
<p><b>New page</b></p><div>{{PageAuthor|BAPBAP}}<br />
<br />
== Description ==<br />
<br />
These macros allow you to remove all directories except you define.<br />
<br />
Provided "as is" by [BAPBAP].<br />
Use on your own risk. <br />
<br />
== The Script ==<br />
<br />
<highlight-nsis><br />
Function DeleteFoldersWithExclusion<br />
Exch $R0 ; exclude dir<br />
Exch<br />
Exch $R1 ; route dir<br />
Push $R2<br />
Push $R3<br />
<br />
<br />
ClearErrors<br />
FindFirst $R3 $R2 "$R1\*.*"<br />
<br />
<br />
Top:<br />
StrCmp $R2 "." Next<br />
StrCmp $R2 ".." Next<br />
StrCmp $R2 $R0 Exit<br />
IfFileExists "$R1\$R2\*.*" Jump DeleteFile<br />
<br />
Jump:<br />
Push '$R1\$R2'<br />
Push '$R0'<br />
Call DeleteFoldersWithExclusion<br />
<br />
Push "$R1\$R2" <br />
Call isEmptyDir<br />
Pop $0 <br />
StrCmp $0 1 RmD Next<br />
<br />
RmD:<br />
RMDir /r $R1\$R2<br />
Goto Next<br />
<br />
DeleteFile:<br />
Delete '$R1\$R2'<br />
<br />
Next:<br />
ClearErrors<br />
FindNext $R3 $R2<br />
IfErrors Exit<br />
Goto Top<br />
<br />
Exit:<br />
FindClose $R3<br />
<br />
Pop $R3<br />
Pop $R2<br />
Pop $R1<br />
Pop $R0<br />
<br />
FunctionEnd<br />
<br />
<br />
Function isEmptyDir<br />
# Stack -> # Stack: <directory><br />
Exch $0 # Stack: $0<br />
Push $1 # Stack: $1, $0<br />
FindFirst $0 $1 "$0\*.*"<br />
strcmp $1 "." 0 _notempty<br />
FindNext $0 $1<br />
strcmp $1 ".." 0 _notempty<br />
ClearErrors<br />
FindNext $0 $1<br />
IfErrors 0 _notempty<br />
FindClose $0<br />
Pop $1 # Stack: $0<br />
StrCpy $0 1<br />
Exch $0 # Stack: 1 (true)<br />
goto _end<br />
_notempty:<br />
FindClose $0<br />
Pop $1 # Stack: $0<br />
StrCpy $0 0<br />
Exch $0 # Stack: 0 (false)<br />
_end:<br />
FunctionEnd<br />
<br />
<br />
</highlight-nsis><br />
<br />
== Usage ==<br />
<br />
Installer code:<br />
<br />
<highlight-nsis><br />
Push "x:\some\dir" <br />
Push "settings" ;dir to exclude<br />
Call DeleteFoldersWithExclusion <br />
</highlight-nsis><br />
<br />
<br />
[[Category:Disk, Path & File Functions]]</div>
BAPBAP