$Lstr Base64 Decode

Convert from base 64 to byte string

Most Sirius $functions have been deprecated in favor of Object Oriented methods. The OO equivalent for the $Lstr_Base64_Decode function is the Base64ToString (String function).

This function converts from a base 64 encoded string to the decoded byte string. It is identical to $Base64_Decode, except it is longstring capable.

The $Lstr_Base64_Decode function accepts one argument and returns a string result whose base 64 encoding is that argument.

The first argument is a longstring which is a base 64 encoding.

The returned value is the base 64 decoding of the argument string. If the argument is not a valid base 64 encoding, the null string is returned.

Syntax

<section begin="syntax" />%DECODED = $Lstr_Base64_Decode(string) <section end="syntax" />

$Lstr_Base64_Decode Function

%DECODED is set to the base 64 decoding of :hp1.string:ehp1..

For example, given the following argument of length 4:

%JUNK = $Lstr_Base64_Decode('ABCD')

%JUNK is set to the byte string (of length 3) represented in hexadecimal as X'001083'.

You can check for an invalid base 64 encoding by checking for the null string return value from $Lstr_Base64_Decode. Of course, if it is possible that the argument is null, the null string is a valid returned value. If you need to check for errors, and the null string is a possible argument value, you can use an approach such as the following:

%STR = $Lstr_Base64_Decode(%IN) IF %STR EQ IF %IN NE THEN error code ... END IF END IF

$Lstr_Base64_Encode is the inverse of $Lstr_Base64_Decode.

This $function is new in Version 6.8 of the Sirius Mods.

Products authorizing $Lstr_Base64_Decode

• Sirius functions
• Fast/Unload User Language Interface
• Janus Open Client
• Janus Open Server
• Janus Sockets
• Janus Web Server
• Japanese functions
• Sir2000 Field Migration Facility

Products authorizing $Lstr_Base64_Decode