From f2e811527206373d91ffa36f4a9662b1adb563d2 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Sat, 25 Mar 2023 21:59:40 +0100
Subject: global-functions: $MkDir: make directory by adding file

This is new functionality in RouterOS 7.9beta4, where new file can be
added with `/file/add ...`. This also creates directories for the full
path.
---
 global-functions.rsc | 19 ++++++++++++++++++-
 1 file changed, 18 insertions(+), 1 deletion(-)

diff --git a/global-functions.rsc b/global-functions.rsc
index 3f0aa6a..24b6223 100644
--- a/global-functions.rsc
+++ b/global-functions.rsc
@@ -558,6 +558,7 @@
   :global CleanFilePath;
   :global GetRandom20CharAlNum;
   :global LogPrintExit2;
+  :global RequiredRouterOS;
   :global WaitForFile;
 
   :local MkTmpfs do={
@@ -590,7 +591,23 @@
     :return true;
   }
 
-  {
+  :if ([ $RequiredRouterOS $0 "7.9beta4" false ] = true) do={
+    :if ([ :pick $Path 0 5 ] = "tmpfs") do={
+      :if ([ $MkTmpfs ] = false) do={
+        :return false;
+      }
+    }
+
+    :do {
+      :local File ($Path . "/file");
+      /file/add name=$File;
+      $WaitForFile $File;
+      /file/remove $File;
+    } on-error={
+      $LogPrintExit2 warning $0 ("Making directory '" . $Path . "' failed!") false;
+      :return false;
+    }
+  } else={
     :local Error false;
     :local PathNext "";
     :foreach Dir in=[ :toarray [ $CharacterReplace $Path "/" "," ] ] do={
-- 
cgit v1.2.3-70-g09d2