aboutsummaryrefslogtreecommitdiffstats
path: root/global-functions
diff options
context:
space:
mode:
Diffstat (limited to 'global-functions')
-rw-r--r--global-functions12
1 files changed, 5 insertions, 7 deletions
diff --git a/global-functions b/global-functions
index 422eac0..a4b4c4c 100644
--- a/global-functions
+++ b/global-functions
@@ -536,6 +536,7 @@
:local Dir [ :tostr $1 ];
:global CleanFilePath;
+ :global GetRandom20CharHex;
:global WaitForFile;
:set Dir [ $CleanFilePath $Dir ];
@@ -545,17 +546,14 @@
}
:local Return true;
- :local WwwVal [ / ip service get www ];
- / ip service set www address=127.0.0.1/32 disabled=no port=80;
+ :local Name ($Dir . "-" . [ $GetRandom20CharHex ])
:do {
- / tool fetch http://127.0.0.1/ dst-path=($Dir . "/tmp") as-value;
- $WaitForFile ($Dir . "/tmp");
- / file remove ($Dir . "/tmp");
+ / ip smb share add disabled=yes directory=$Dir name=$Name;
+ $WaitForFile $Dir;
} on-error={
:set Return false;
}
- / ip service set www address=($WwwVal->"address") \
- disabled=($WwwVal->"disabled") port=($WwwVal->"port");
+ / ip smb share remove [ find where name=$Name ];
:return $Return;
}