mirror.MikroTik/eworm.routeros-scripts
1
0
Fork 0
mirror of https://git.eworm.de/cgit/routeros-scripts synced 2025-06-26 11:38:36 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

global-functions: $HexToNum: properly handle capital characters

Browse source
This commit is contained in:
Christian Hesse 2021-06-16 09:01:14 +02:00
parent 1ce0f63ef7
commit c60c96e32a
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
global-functions
View file

@ -429,12 +429,12 @@
# convert from hex (string) to num # convert from hex (string) to num
:set HexToNum do={ :set HexToNum do={
:local Input [ :tostr $1 ]; :local Input [ :tostr $1 ];
:local Hex "0123456789abcdef"; :local Hex "0123456789abcdef0123456789ABCDEF";
:local Multi 1; :local Multi 1;
:local Return 0; :local Return 0;
:for I from=([ :len $Input ] - 1) to=0 do={ :for I from=([ :len $Input ] - 1) to=0 do={
:set Return ($Return + ([ :find $Hex [ :pick $Input $I ] ] * $Multi)); :set Return ($Return + (([ :find $Hex [ :pick $Input $I ] ] % 16) * $Multi));
:set Multi ($Multi * 16); :set Multi ($Multi * 16);
} }