Crash_Override/routeros-scripts
1
0
Fork 0
mirror of https://github.com/eworm-de/routeros-scripts synced 2024-05-14 08:04:19 +00:00
Code Issues Projects Releases Packages Wiki Activity

global-functions: $MkDir: rename internal variable

Browse source
This commit is contained in:
Christian Hesse 2022-12-13 10:37:56 +01:00
parent 446d5c89fc
commit 58f769ac00
1 changed files with 10 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
global-functions
View file

@ -519,35 +519,35 @@
# create directory
:set MkDir do={
:local Dir [ :tostr $1 ];
:local Path [ :tostr $1 ];
:global CleanFilePath;
:global GetRandom20CharAlNum;
:global LogPrintExit2;
:global WaitForFile;
:set Dir [ $CleanFilePath $Dir ];
:set Path [ $CleanFilePath $Path ];
:if ($Dir = "") do={
:if ($Path = "") do={
:return true;
}
:if ([ :len [ /file/find where name=$Dir type="directory" ] ] = 1) do={
:if ([ :len [ /file/find where name=$Path type="directory" ] ] = 1) do={
:return true;
}
:if ([ :len [ /file/find where name=$Dir ] ] = 1) do={
$LogPrintExit2 warning $0 ("The path '" . $Dir . "' exists, but is not a directory.") false;
:if ([ :len [ /file/find where name=$Path ] ] = 1) do={
$LogPrintExit2 warning $0 ("The path '" . $Path . "' exists, but is not a directory.") false;
:return false;
}
:local Return true;
:local Name ($Dir . "-" . [ $GetRandom20CharAlNum 6 ]);
:local Name ($Path . "-" . [ $GetRandom20CharAlNum 6 ]);
:do {
/ip/smb/share/add disabled=yes directory=$Dir name=$Name;
$WaitForFile $Dir;
/ip/smb/share/add disabled=yes directory=$Path name=$Name;
$WaitForFile $Path;
} on-error={
$LogPrintExit2 warning $0 ("Making directory '" . $Dir . "' failed!") false;
$LogPrintExit2 warning $0 ("Making directory '" . $Path . "' failed!") false;
:set Return false;
}
/ip/smb/share/remove [ find where name=$Name ];