mirror.MikroTik/wifinigel.MikrotikScripting
1
0
Fork 0
mirror of https://github.com/wifinigel/MikrotikScripting.git synced 2025-07-10 10:04:29 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Syntax errors

Browse source 
These changes have not been verified, but it seems clear
that they are error.
This commit is contained in:
Tomas Abad 2023-05-31 18:26:23 +02:00
parent 78cac6a07c
commit b6b5e2a58c
6 changed files with 18 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

4
scripts/v6/ch10-04-bad-script.rsc
View file

@ -21,7 +21,7 @@
# check arg type str of correct length passed # check arg type str of correct length passed
if (([:typeof $WebSiteName]!="str") or \ if (([:typeof $WebSiteName]!="str") or \
([:len value=$WebSiteName] < 6)) do={ ([:len $WebSiteName] < 6)) do={
$LogMessageFunc ("DnsResolveFunc: arg value $WebSiteName not \ $LogMessageFunc ("DnsResolveFunc: arg value $WebSiteName not \
a valid string!"); a valid string!");
} }
@ -50,7 +50,7 @@
# check arg type str of correct length passed # check arg type str of correct length passed
if (([:typeof $SiteName] != "str") or \ if (([:typeof $SiteName] != "str") or \
([:len value=$SiteName] < 6)) do={ ([:len $SiteName] < 6)) do={
$LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \ $LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \
valid string!"); valid string!");
} }

6
scripts/v6/ch10-07-bad-script.rsc
View file

@ -21,7 +21,7 @@
# check arg type str of correct length passed # check arg type str of correct length passed
:if (([:typeof $WebSiteName] != "str") or \ :if (([:typeof $WebSiteName] != "str") or \
([:len value=$WebSiteName] < 6)) do={ ([:len $WebSiteName] < 6)) do={
$LogMessageFunc ("DnsResolveFunc: arg value $WebSiteName not \ $LogMessageFunc ("DnsResolveFunc: arg value $WebSiteName not \
a valid string!"); a valid string!");
@ -67,7 +67,7 @@
# check arg type str of correct length passed # check arg type str of correct length passed
:if (([:typeof $SiteName] != "str") or \ :if (([:typeof $SiteName] != "str") or \
([:len value=$SiteName] < 6)) do={ ([:len $SiteName] < 6)) do={
$LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \ $LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \
valid string!"); valid string!");
:return "*** test failed ***"; :return "*** test failed ***";
@ -80,7 +80,7 @@
} on-error={ } on-error={
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \ $LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
$SiteName !"); $SiteName !");
:return { "duration"="*** test failed ***" } :return { "*** test failed ***" }
} }
} }

8
scripts/v6/ch10-08-bad-script.rsc
View file

@ -37,7 +37,7 @@
$DebugFunc "Checking arg data type is correct"; $DebugFunc "Checking arg data type is correct";
:if (([:typeof $WebSiteName] != "str") or \ :if (([:typeof $WebSiteName] != "str") or \
([:len value=$WebSiteName] < 6)) do={ ([:len $WebSiteName] < 6)) do={
:local ErrorMsg "DnsResolveFunc: arg value $WebSiteName \ :local ErrorMsg "DnsResolveFunc: arg value $WebSiteName \
not a valid string!"; not a valid string!";
$LogMessageFunc $ErrorMsg; $LogMessageFunc $ErrorMsg;
@ -88,10 +88,10 @@
# check arg type str of correct length passed # check arg type str of correct length passed
if (([:typeof $SiteName] != "str") or \ if (([:typeof $SiteName] != "str") or \
([:len value=$SiteName] < 6)) do={ ([:len $SiteName] < 6)) do={
$LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \ $LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \
valid string!"); valid string!");
:return { "duration"="*** test failed ***" }; :return { "*** test failed ***" };
} }
do { do {
@ -100,7 +100,7 @@
} on-error { } on-error {
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \ $LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
$SiteName !"); $SiteName !");
return { "duration"="*** test failed ***" }; return { "*** test failed ***" };
} }
} }

4
scripts/v7/ch10-04-bad-script.rsc
View file

@ -21,7 +21,7 @@
# check arg type str of correct length passed # check arg type str of correct length passed
if (([:typeof $WebSiteName]!="str") or \ if (([:typeof $WebSiteName]!="str") or \
([:len value=$WebSiteName] < 6)) do={ ([:len $WebSiteName] < 6)) do={
$LogMessageFunc ("DnsResolveFunc: arg value $WebSiteName not \ $LogMessageFunc ("DnsResolveFunc: arg value $WebSiteName not \
a valid string!"); a valid string!");
} }
@ -50,7 +50,7 @@
# check arg type str of correct length passed # check arg type str of correct length passed
if (([:typeof $SiteName] != "str") or \ if (([:typeof $SiteName] != "str") or \
([:len value=$SiteName] < 6)) do={ ([:len $SiteName] < 6)) do={
$LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \ $LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \
valid string!"); valid string!");
} }

6
scripts/v7/ch10-07-bad-script.rsc
View file

@ -21,7 +21,7 @@
# check arg type str of correct length passed # check arg type str of correct length passed
:if (([:typeof $WebSiteName] != "str") or \ :if (([:typeof $WebSiteName] != "str") or \
([:len value=$WebSiteName] < 6)) do={ ([:len $WebSiteName] < 6)) do={
$LogMessageFunc ("DnsResolveFunc: arg value $WebSiteName not \ $LogMessageFunc ("DnsResolveFunc: arg value $WebSiteName not \
a valid string!"); a valid string!");
@ -67,7 +67,7 @@
# check arg type str of correct length passed # check arg type str of correct length passed
:if (([:typeof $SiteName] != "str") or \ :if (([:typeof $SiteName] != "str") or \
([:len value=$SiteName] < 6)) do={ ([:len $SiteName] < 6)) do={
$LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \ $LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \
valid string!"); valid string!");
:return "*** test failed ***"; :return "*** test failed ***";
@ -80,7 +80,7 @@
} on-error={ } on-error={
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \ $LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
$SiteName !"); $SiteName !");
:return { "duration"="*** test failed ***" } :return { "*** test failed ***" }
} }
} }

8
scripts/v7/ch10-08-bad-script.rsc
View file

@ -37,7 +37,7 @@
$DebugFunc "Checking arg data type is correct"; $DebugFunc "Checking arg data type is correct";
:if (([:typeof $WebSiteName] != "str") or \ :if (([:typeof $WebSiteName] != "str") or \
([:len value=$WebSiteName] < 6)) do={ ([:len $WebSiteName] < 6)) do={
:local ErrorMsg "DnsResolveFunc: arg value $WebSiteName \ :local ErrorMsg "DnsResolveFunc: arg value $WebSiteName \
not a valid string!"; not a valid string!";
$LogMessageFunc $ErrorMsg; $LogMessageFunc $ErrorMsg;
@ -88,10 +88,10 @@
# check arg type str of correct length passed # check arg type str of correct length passed
if (([:typeof $SiteName] != "str") or \ if (([:typeof $SiteName] != "str") or \
([:len value=$SiteName] < 6)) do={ ([:len $SiteName] < 6)) do={
$LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \ $LogMessageFunc ("GetWebPageFunc: arg value $SiteName not a \
valid string!"); valid string!");
:return { "duration"="*** test failed ***" }; :return { "*** test failed ***" };
} }
do { do {
@ -100,7 +100,7 @@
} on-error { } on-error {
$LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \ $LogMessageFunc ("GetWebPageFunc: unable to retrieve site: \
$SiteName !"); $SiteName !");
return { "duration"="*** test failed ***" }; return { "*** test failed ***" };
} }
} }