mirror/eworm-de-routeros-scripts
1
0
Fork 0
mirror of https://github.com/eworm-de/routeros-scripts.git synced 2024-05-11 05:55:19 +00:00
Code Releases Activity

capsman-download-packages: move code into function

Browse Source
This commit is contained in:
Christian Hesse
2024-03-04 13:48:00 +01:00
parent 1c26dde356
commit c2df671d6f
4 changed files with 219 additions and 199 deletions
Download Patch File Download Diff File Expand all files Collapse all files

99
capsman-download-packages.capsman.rsc
View File

@ -11,66 +11,71 @@
# #
# !! Do not edit this file, it is generated from template! # !! Do not edit this file, it is generated from template!
:local 0 [ :jobname ];
:global GlobalFunctionsReady; :global GlobalFunctionsReady;
:while ($GlobalFunctionsReady != true) do={ :delay 500ms; } :while ($GlobalFunctionsReady != true) do={ :delay 500ms; }
:global CleanFilePath; :local Main do={
:global DownloadPackage; :local ScriptName [ :tostr $1 ];
:global LogPrintExit2;
:global MkDir;
:global ScriptLock;
:global WaitFullyConnected;
$ScriptLock $0; :global CleanFilePath;
$WaitFullyConnected; :global DownloadPackage;
:global LogPrintExit2;
:global MkDir;
:global ScriptLock;
:global WaitFullyConnected;
:local PackagePath [ $CleanFilePath [ /caps-man/manager/get package-path ] ]; $ScriptLock $ScriptName;
:local InstalledVersion [ /system/package/update/get installed-version ]; $WaitFullyConnected;
:local Updated false;
:if ([ :len $PackagePath ] = 0) do={ :local PackagePath [ $CleanFilePath [ /caps-man/manager/get package-path ] ];
$LogPrintExit2 warning $0 ("The CAPsMAN package path is not defined, can not download packages.") true; :local InstalledVersion [ /system/package/update/get installed-version ];
} :local Updated false;
:if ([ :len [ /file/find where name=$PackagePath type="directory" ] ] = 0) do={ :if ([ :len $PackagePath ] = 0) do={
:if ([ $MkDir $PackagePath ] = false) do={ $LogPrintExit2 warning $ScriptName ("The CAPsMAN package path is not defined, can not download packages.") true;
$LogPrintExit2 warning $0 ("Creating directory at CAPsMAN package path (" . \
$PackagePath . ") failed!") true;
} }
$LogPrintExit2 info $0 ("Created directory at CAPsMAN package path (" . $PackagePath . \
"). Please place your packages!") false;
}
:foreach Package in=[ /file/find where type=package \ :if ([ :len [ /file/find where name=$PackagePath type="directory" ] ] = 0) do={
package-version!=$InstalledVersion name~("^" . $PackagePath) ] do={ :if ([ $MkDir $PackagePath ] = false) do={
:local File [ /file/get $Package ]; $LogPrintExit2 warning $ScriptName ("Creating directory at CAPsMAN package path (" . \
:if ($File->"package-architecture" = "mips") do={ $PackagePath . ") failed!") true;
:set ($File->"package-architecture") "mipsbe"; }
$LogPrintExit2 info $ScriptName ("Created directory at CAPsMAN package path (" . $PackagePath . \
"). Please place your packages!") false;
} }
:if ([ $DownloadPackage ($File->"package-name") $InstalledVersion \
($File->"package-architecture") $PackagePath ] = true) do={
:set Updated true;
/file/remove $Package;
}
}
:if ([ :len [ /file/find where type=package name~("^" . $PackagePath) ] ] = 0) do={ :foreach Package in=[ /file/find where type=package \
$LogPrintExit2 info $0 ("No packages available, downloading default set.") false; package-version!=$InstalledVersion name~("^" . $PackagePath) ] do={
:foreach Arch in={ "arm"; "mipsbe" } do={ :local File [ /file/get $Package ];
:foreach Package in={ "routeros"; "wireless" } do={ :if ($File->"package-architecture" = "mips") do={
:if ([ $DownloadPackage $Package $InstalledVersion $Arch $PackagePath ] = true) do={ :set ($File->"package-architecture") "mipsbe";
:set Updated true; }
:if ([ $DownloadPackage ($File->"package-name") $InstalledVersion \
($File->"package-architecture") $PackagePath ] = true) do={
:set Updated true;
/file/remove $Package;
}
}
:if ([ :len [ /file/find where type=package name~("^" . $PackagePath) ] ] = 0) do={
$LogPrintExit2 info $ScriptName ("No packages available, downloading default set.") false;
:foreach Arch in={ "arm"; "mipsbe" } do={
:foreach Package in={ "routeros"; "wireless" } do={
:if ([ $DownloadPackage $Package $InstalledVersion $Arch $PackagePath ] = true) do={
:set Updated true;
}
} }
} }
} }
:if ($Updated = true) do={
:local Script ([ /system/script/find where source~"\n# provides: capsman-rolling-upgrade\n" ]->0);
:if ([ :len $Script ] > 0) do={
/system/script/run $Script;
} else={
/caps-man/remote-cap/upgrade [ find where version!=$InstalledVersion ];
}
}
} }
:if ($Updated = true) do={ $Main [ :jobname ];
:local Script ([ /system/script/find where source~"\n# provides: capsman-rolling-upgrade\n" ]->0);
:if ([ :len $Script ] > 0) do={
/system/script/run $Script;
} else={
/caps-man/remote-cap/upgrade [ find where version!=$InstalledVersion ];
}
}

117
capsman-download-packages.template.rsc
View File

@ -12,85 +12,90 @@
# !! This is just a template to generate the real script! # !! This is just a template to generate the real script!
# !! Pattern '%TEMPL%' is replaced, paths are filtered. # !! Pattern '%TEMPL%' is replaced, paths are filtered.
:local 0 [ :jobname ];
:global GlobalFunctionsReady; :global GlobalFunctionsReady;
:while ($GlobalFunctionsReady != true) do={ :delay 500ms; } :while ($GlobalFunctionsReady != true) do={ :delay 500ms; }
:global CleanFilePath; :local Main do={
:global DownloadPackage; :local ScriptName [ :tostr $1 ];
:global LogPrintExit2;
:global MkDir;
:global ScriptLock;
:global WaitFullyConnected;
$ScriptLock $0; :global CleanFilePath;
$WaitFullyConnected; :global DownloadPackage;
:global LogPrintExit2;
:global MkDir;
:global ScriptLock;
:global WaitFullyConnected;
:local PackagePath [ $CleanFilePath [ /caps-man/manager/get package-path ] ]; $ScriptLock $ScriptName;
:local PackagePath [ $CleanFilePath [ /interface/wifi/capsman/get package-path ] ]; $WaitFullyConnected;
:local PackagePath [ $CleanFilePath [ /interface/wifiwave2/capsman/get package-path ] ];
:local InstalledVersion [ /system/package/update/get installed-version ];
:local Updated false;
:if ([ :len $PackagePath ] = 0) do={ :local PackagePath [ $CleanFilePath [ /caps-man/manager/get package-path ] ];
$LogPrintExit2 warning $0 ("The CAPsMAN package path is not defined, can not download packages.") true; :local PackagePath [ $CleanFilePath [ /interface/wifi/capsman/get package-path ] ];
} :local PackagePath [ $CleanFilePath [ /interface/wifiwave2/capsman/get package-path ] ];
:local InstalledVersion [ /system/package/update/get installed-version ];
:local Updated false;
:if ([ :len [ /file/find where name=$PackagePath type="directory" ] ] = 0) do={ :if ([ :len $PackagePath ] = 0) do={
:if ([ $MkDir $PackagePath ] = false) do={ $LogPrintExit2 warning $ScriptName ("The CAPsMAN package path is not defined, can not download packages.") true;
$LogPrintExit2 warning $0 ("Creating directory at CAPsMAN package path (" . \
$PackagePath . ") failed!") true;
} }
$LogPrintExit2 info $0 ("Created directory at CAPsMAN package path (" . $PackagePath . \
"). Please place your packages!") false;
}
:foreach Package in=[ /file/find where type=package \ :if ([ :len [ /file/find where name=$PackagePath type="directory" ] ] = 0) do={
package-version!=$InstalledVersion name~("^" . $PackagePath) ] do={ :if ([ $MkDir $PackagePath ] = false) do={
:local File [ /file/get $Package ]; $LogPrintExit2 warning $ScriptName ("Creating directory at CAPsMAN package path (" . \
:if ($File->"package-architecture" = "mips") do={ $PackagePath . ") failed!") true;
:set ($File->"package-architecture") "mipsbe"; }
$LogPrintExit2 info $ScriptName ("Created directory at CAPsMAN package path (" . $PackagePath . \
"). Please place your packages!") false;
} }
:if ([ $DownloadPackage ($File->"package-name") $InstalledVersion \
($File->"package-architecture") $PackagePath ] = true) do={
:set Updated true;
/file/remove $Package;
}
}
:if ([ :len [ /file/find where type=package name~("^" . $PackagePath) ] ] = 0) do={ :foreach Package in=[ /file/find where type=package \
$LogPrintExit2 info $0 ("No packages available, downloading default set.") false; package-version!=$InstalledVersion name~("^" . $PackagePath) ] do={
:local File [ /file/get $Package ];
:if ($File->"package-architecture" = "mips") do={
:set ($File->"package-architecture") "mipsbe";
}
:if ([ $DownloadPackage ($File->"package-name") $InstalledVersion \
($File->"package-architecture") $PackagePath ] = true) do={
:set Updated true;
/file/remove $Package;
}
}
:if ([ :len [ /file/find where type=package name~("^" . $PackagePath) ] ] = 0) do={
$LogPrintExit2 info $ScriptName ("No packages available, downloading default set.") false;
# NOT /interface/wifi/ # # NOT /interface/wifi/ #
# NOT /interface/wifiwave2/ # # NOT /interface/wifiwave2/ #
:foreach Arch in={ "arm"; "mipsbe" } do={ :foreach Arch in={ "arm"; "mipsbe" } do={
:foreach Package in={ "routeros"; "wireless" } do={ :foreach Package in={ "routeros"; "wireless" } do={
# NOT /interface/wifi/ # # NOT /interface/wifi/ #
# NOT /interface/wifiwave2/ # # NOT /interface/wifiwave2/ #
# NOT /caps-man/ # # NOT /caps-man/ #
:foreach Arch in={ "arm"; "arm64" } do={ :foreach Arch in={ "arm"; "arm64" } do={
# NOT /interface/wifi/ # # NOT /interface/wifi/ #
:foreach Package in={ "routeros"; "wifiwave2" } do={ :foreach Package in={ "routeros"; "wifiwave2" } do={
# NOT /interface/wifi/ # # NOT /interface/wifi/ #
# NOT /interface/wifiwave2/ # # NOT /interface/wifiwave2/ #
:local Packages { "arm"={ "routeros"; "wifi-qcom"; "wifi-qcom-ac" }; :local Packages { "arm"={ "routeros"; "wifi-qcom"; "wifi-qcom-ac" };
"arm64"={ "routeros"; "wifi-qcom" } }; "arm64"={ "routeros"; "wifi-qcom" } };
:foreach Package in=($Packages->$Arch) do={ :foreach Package in=($Packages->$Arch) do={
# NOT /interface/wifiwave2/ # # NOT /interface/wifiwave2/ #
# NOT /caps-man/ # # NOT /caps-man/ #
:if ([ $DownloadPackage $Package $InstalledVersion $Arch $PackagePath ] = true) do={ :if ([ $DownloadPackage $Package $InstalledVersion $Arch $PackagePath ] = true) do={
:set Updated true; :set Updated true;
}
} }
} }
} }
:if ($Updated = true) do={
:local Script ([ /system/script/find where source~"\n# provides: capsman-rolling-upgrade\n" ]->0);
:if ([ :len $Script ] > 0) do={
/system/script/run $Script;
} else={
/caps-man/remote-cap/upgrade [ find where version!=$InstalledVersion ];
/interface/wifi/capsman/remote-cap/upgrade [ find where version!=$InstalledVersion ];
/interface/wifiwave2/capsman/remote-cap/upgrade [ find where version!=$InstalledVersion ];
}
}
} }
:if ($Updated = true) do={ $Main [ :jobname ];
:local Script ([ /system/script/find where source~"\n# provides: capsman-rolling-upgrade\n" ]->0);
:if ([ :len $Script ] > 0) do={
/system/script/run $Script;
} else={
/caps-man/remote-cap/upgrade [ find where version!=$InstalledVersion ];
/interface/wifi/capsman/remote-cap/upgrade [ find where version!=$InstalledVersion ];
/interface/wifiwave2/capsman/remote-cap/upgrade [ find where version!=$InstalledVersion ];
}
}

103
capsman-download-packages.wifi.rsc
View File

@ -11,68 +11,73 @@
# #
# !! Do not edit this file, it is generated from template! # !! Do not edit this file, it is generated from template!
:local 0 [ :jobname ];
:global GlobalFunctionsReady; :global GlobalFunctionsReady;
:while ($GlobalFunctionsReady != true) do={ :delay 500ms; } :while ($GlobalFunctionsReady != true) do={ :delay 500ms; }
:global CleanFilePath; :local Main do={
:global DownloadPackage; :local ScriptName [ :tostr $1 ];
:global LogPrintExit2;
:global MkDir;
:global ScriptLock;
:global WaitFullyConnected;
$ScriptLock $0; :global CleanFilePath;
$WaitFullyConnected; :global DownloadPackage;
:global LogPrintExit2;
:global MkDir;
:global ScriptLock;
:global WaitFullyConnected;
:local PackagePath [ $CleanFilePath [ /interface/wifi/capsman/get package-path ] ]; $ScriptLock $ScriptName;
:local InstalledVersion [ /system/package/update/get installed-version ]; $WaitFullyConnected;
:local Updated false;
:if ([ :len $PackagePath ] = 0) do={ :local PackagePath [ $CleanFilePath [ /interface/wifi/capsman/get package-path ] ];
$LogPrintExit2 warning $0 ("The CAPsMAN package path is not defined, can not download packages.") true; :local InstalledVersion [ /system/package/update/get installed-version ];
} :local Updated false;
:if ([ :len [ /file/find where name=$PackagePath type="directory" ] ] = 0) do={ :if ([ :len $PackagePath ] = 0) do={
:if ([ $MkDir $PackagePath ] = false) do={ $LogPrintExit2 warning $ScriptName ("The CAPsMAN package path is not defined, can not download packages.") true;
$LogPrintExit2 warning $0 ("Creating directory at CAPsMAN package path (" . \
$PackagePath . ") failed!") true;
} }
$LogPrintExit2 info $0 ("Created directory at CAPsMAN package path (" . $PackagePath . \
"). Please place your packages!") false;
}
:foreach Package in=[ /file/find where type=package \ :if ([ :len [ /file/find where name=$PackagePath type="directory" ] ] = 0) do={
package-version!=$InstalledVersion name~("^" . $PackagePath) ] do={ :if ([ $MkDir $PackagePath ] = false) do={
:local File [ /file/get $Package ]; $LogPrintExit2 warning $ScriptName ("Creating directory at CAPsMAN package path (" . \
:if ($File->"package-architecture" = "mips") do={ $PackagePath . ") failed!") true;
:set ($File->"package-architecture") "mipsbe"; }
$LogPrintExit2 info $ScriptName ("Created directory at CAPsMAN package path (" . $PackagePath . \
"). Please place your packages!") false;
} }
:if ([ $DownloadPackage ($File->"package-name") $InstalledVersion \
($File->"package-architecture") $PackagePath ] = true) do={
:set Updated true;
/file/remove $Package;
}
}
:if ([ :len [ /file/find where type=package name~("^" . $PackagePath) ] ] = 0) do={ :foreach Package in=[ /file/find where type=package \
$LogPrintExit2 info $0 ("No packages available, downloading default set.") false; package-version!=$InstalledVersion name~("^" . $PackagePath) ] do={
:foreach Arch in={ "arm"; "arm64" } do={ :local File [ /file/get $Package ];
:local Packages { "arm"={ "routeros"; "wifi-qcom"; "wifi-qcom-ac" }; :if ($File->"package-architecture" = "mips") do={
"arm64"={ "routeros"; "wifi-qcom" } }; :set ($File->"package-architecture") "mipsbe";
:foreach Package in=($Packages->$Arch) do={ }
:if ([ $DownloadPackage $Package $InstalledVersion $Arch $PackagePath ] = true) do={ :if ([ $DownloadPackage ($File->"package-name") $InstalledVersion \
:set Updated true; ($File->"package-architecture") $PackagePath ] = true) do={
:set Updated true;
/file/remove $Package;
}
}
:if ([ :len [ /file/find where type=package name~("^" . $PackagePath) ] ] = 0) do={
$LogPrintExit2 info $ScriptName ("No packages available, downloading default set.") false;
:foreach Arch in={ "arm"; "arm64" } do={
:local Packages { "arm"={ "routeros"; "wifi-qcom"; "wifi-qcom-ac" };
"arm64"={ "routeros"; "wifi-qcom" } };
:foreach Package in=($Packages->$Arch) do={
:if ([ $DownloadPackage $Package $InstalledVersion $Arch $PackagePath ] = true) do={
:set Updated true;
}
} }
} }
} }
:if ($Updated = true) do={
:local Script ([ /system/script/find where source~"\n# provides: capsman-rolling-upgrade\n" ]->0);
:if ([ :len $Script ] > 0) do={
/system/script/run $Script;
} else={
/interface/wifi/capsman/remote-cap/upgrade [ find where version!=$InstalledVersion ];
}
}
} }
:if ($Updated = true) do={ $Main [ :jobname ];
:local Script ([ /system/script/find where source~"\n# provides: capsman-rolling-upgrade\n" ]->0);
:if ([ :len $Script ] > 0) do={
/system/script/run $Script;
} else={
/interface/wifi/capsman/remote-cap/upgrade [ find where version!=$InstalledVersion ];
}
}

99
capsman-download-packages.wifiwave2.rsc
View File

@ -11,66 +11,71 @@
# #
# !! Do not edit this file, it is generated from template! # !! Do not edit this file, it is generated from template!
:local 0 [ :jobname ];
:global GlobalFunctionsReady; :global GlobalFunctionsReady;
:while ($GlobalFunctionsReady != true) do={ :delay 500ms; } :while ($GlobalFunctionsReady != true) do={ :delay 500ms; }
:global CleanFilePath; :local Main do={
:global DownloadPackage; :local ScriptName [ :tostr $1 ];
:global LogPrintExit2;
:global MkDir;
:global ScriptLock;
:global WaitFullyConnected;
$ScriptLock $0; :global CleanFilePath;
$WaitFullyConnected; :global DownloadPackage;
:global LogPrintExit2;
:global MkDir;
:global ScriptLock;
:global WaitFullyConnected;
:local PackagePath [ $CleanFilePath [ /interface/wifiwave2/capsman/get package-path ] ]; $ScriptLock $ScriptName;
:local InstalledVersion [ /system/package/update/get installed-version ]; $WaitFullyConnected;
:local Updated false;
:if ([ :len $PackagePath ] = 0) do={ :local PackagePath [ $CleanFilePath [ /interface/wifiwave2/capsman/get package-path ] ];
$LogPrintExit2 warning $0 ("The CAPsMAN package path is not defined, can not download packages.") true; :local InstalledVersion [ /system/package/update/get installed-version ];
} :local Updated false;
:if ([ :len [ /file/find where name=$PackagePath type="directory" ] ] = 0) do={ :if ([ :len $PackagePath ] = 0) do={
:if ([ $MkDir $PackagePath ] = false) do={ $LogPrintExit2 warning $ScriptName ("The CAPsMAN package path is not defined, can not download packages.") true;
$LogPrintExit2 warning $0 ("Creating directory at CAPsMAN package path (" . \
$PackagePath . ") failed!") true;
} }
$LogPrintExit2 info $0 ("Created directory at CAPsMAN package path (" . $PackagePath . \
"). Please place your packages!") false;
}
:foreach Package in=[ /file/find where type=package \ :if ([ :len [ /file/find where name=$PackagePath type="directory" ] ] = 0) do={
package-version!=$InstalledVersion name~("^" . $PackagePath) ] do={ :if ([ $MkDir $PackagePath ] = false) do={
:local File [ /file/get $Package ]; $LogPrintExit2 warning $ScriptName ("Creating directory at CAPsMAN package path (" . \
:if ($File->"package-architecture" = "mips") do={ $PackagePath . ") failed!") true;
:set ($File->"package-architecture") "mipsbe"; }
$LogPrintExit2 info $ScriptName ("Created directory at CAPsMAN package path (" . $PackagePath . \
"). Please place your packages!") false;
} }
:if ([ $DownloadPackage ($File->"package-name") $InstalledVersion \
($File->"package-architecture") $PackagePath ] = true) do={
:set Updated true;
/file/remove $Package;
}
}
:if ([ :len [ /file/find where type=package name~("^" . $PackagePath) ] ] = 0) do={ :foreach Package in=[ /file/find where type=package \
$LogPrintExit2 info $0 ("No packages available, downloading default set.") false; package-version!=$InstalledVersion name~("^" . $PackagePath) ] do={
:foreach Arch in={ "arm"; "arm64" } do={ :local File [ /file/get $Package ];
:foreach Package in={ "routeros"; "wifiwave2" } do={ :if ($File->"package-architecture" = "mips") do={
:if ([ $DownloadPackage $Package $InstalledVersion $Arch $PackagePath ] = true) do={ :set ($File->"package-architecture") "mipsbe";
:set Updated true; }
:if ([ $DownloadPackage ($File->"package-name") $InstalledVersion \
($File->"package-architecture") $PackagePath ] = true) do={
:set Updated true;
/file/remove $Package;
}
}
:if ([ :len [ /file/find where type=package name~("^" . $PackagePath) ] ] = 0) do={
$LogPrintExit2 info $ScriptName ("No packages available, downloading default set.") false;
:foreach Arch in={ "arm"; "arm64" } do={
:foreach Package in={ "routeros"; "wifiwave2" } do={
:if ([ $DownloadPackage $Package $InstalledVersion $Arch $PackagePath ] = true) do={
:set Updated true;
}
} }
} }
} }
:if ($Updated = true) do={
:local Script ([ /system/script/find where source~"\n# provides: capsman-rolling-upgrade\n" ]->0);
:if ([ :len $Script ] > 0) do={
/system/script/run $Script;
} else={
/interface/wifiwave2/capsman/remote-cap/upgrade [ find where version!=$InstalledVersion ];
}
}
} }
:if ($Updated = true) do={ $Main [ :jobname ];
:local Script ([ /system/script/find where source~"\n# provides: capsman-rolling-upgrade\n" ]->0);
:if ([ :len $Script ] > 0) do={
/system/script/run $Script;
} else={
/interface/wifiwave2/capsman/remote-cap/upgrade [ find where version!=$InstalledVersion ];
}
}