aboutsummaryrefslogtreecommitdiffstats
path: root/capsman-download-packages.template.rsc
diff options
context:
space:
mode:
Diffstat (limited to 'capsman-download-packages.template.rsc')
-rw-r--r--capsman-download-packages.template.rsc21
1 files changed, 11 insertions, 10 deletions
diff --git a/capsman-download-packages.template.rsc b/capsman-download-packages.template.rsc
index 744494e..f95212a 100644
--- a/capsman-download-packages.template.rsc
+++ b/capsman-download-packages.template.rsc
@@ -12,15 +12,16 @@
# !! This is just a template to generate the real script!
# !! Pattern '%TEMPL%' is replaced, paths are filtered.
-:global GlobalFunctionsReady;
-:while ($GlobalFunctionsReady != true) do={ :delay 500ms; }
-
:local ExitOK false;
-:do {
+:onerror Err {
+ :global GlobalConfigReady; :global GlobalFunctionsReady;
+ :retry { :if ($GlobalConfigReady != true || $GlobalFunctionsReady != true) \
+ do={ :error ("Global config and/or functions not ready."); }; } delay=500ms max=50;
:local ScriptName [ :jobname ];
:global CleanFilePath;
:global DownloadPackage;
+ :global FileGet;
:global LogPrint;
:global MkDir;
:global RmFile;
@@ -44,7 +45,7 @@
:error false;
}
- :if ([ :len [ /file/find where name=$PackagePath type="directory" ] ] = 0) do={
+ :if ([ $FileGet $PackagePath ] = false) do={
:if ([ $MkDir $PackagePath ] = false) do={
$LogPrint warning $ScriptName ("Creating directory at CAPsMAN package path (" . \
$PackagePath . ") failed!");
@@ -55,7 +56,7 @@
"). Please place your packages!");
}
- :foreach Package in=[ /file/find where type=package \
+ :foreach Package in=[ /file/find where type="package" \
package-version!=$InstalledVersion name~("^" . $PackagePath) ] do={
:local File [ /file/get $Package ];
:if ($File->"package-architecture" = "mips") do={
@@ -64,11 +65,11 @@
:if ([ $DownloadPackage ($File->"package-name") $InstalledVersion \
($File->"package-architecture") $PackagePath ] = true) do={
:set Updated true;
- $RmFile $Package;
+ $RmFile ($File->"name");
}
}
- :if ([ :len [ /file/find where type=package name~("^" . $PackagePath) ] ] = 0) do={
+ :if ([ :len [ /file/find where type="package" name~("^" . $PackagePath) ] ] = 0) do={
$LogPrint info $ScriptName ("No packages available, downloading default set.");
# NOT /interface/wifi/ #
:foreach Arch in={ "arm"; "mipsbe" } do={
@@ -98,6 +99,6 @@
/interface/wifi/capsman/remote-cap/upgrade [ find where version!=$InstalledVersion ];
}
}
-} on-error={
- :global ExitError; $ExitError $ExitOK [ :jobname ];
+} do={
+ :global ExitError; $ExitError $ExitOK [ :jobname ] $Err;
}