global-functions: introduce $GetRandom20CharAlNum

This commit is contained in:
Christian Hesse 2022-09-07 12:28:45 +02:00
parent ff0b05ea20
commit 8f32887a1a

View file

@ -28,6 +28,7 @@
:global EscapeForRegEx; :global EscapeForRegEx;
:global FlushEmailQueue; :global FlushEmailQueue;
:global GetMacVendor; :global GetMacVendor;
:global GetRandom20CharAlNum;
:global GetRandom20CharHex; :global GetRandom20CharHex;
:global GetRandomNumber; :global GetRandomNumber;
:global HexToNum; :global HexToNum;
@ -400,6 +401,13 @@
} }
} }
# generate random 20 chars alphabetical (A-Z & a-z) and numerical (0-9)
:set GetRandom20CharAlNum do={
:global EitherOr;
:return [ :rndstr length=[ $EitherOr [ :tonum $1 ] 20 ] from="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789" ];
}
# generate random 20 chars hex (0-9 and a-f) # generate random 20 chars hex (0-9 and a-f)
:set GetRandom20CharHex do={ :set GetRandom20CharHex do={
:global EitherOr; :global EitherOr;