DEA192decrypt and DEA192encrypt (String functions)

From m204wiki
Jump to navigation Jump to search

DEA192 encryption or decryption (String class)

[Introduced in Model 204 7.6]

DEA192decrypt and DEA192encrypt are synonyms for the String class function that applies the DEA (Data Encryption Algorithm) using a 192-bit symmetric key to decrypt or encrypt each 64-bit block of input text. For more details about how the algorithm works, see Triple DES.

The length of the returned string is the same as that of the object string.

DEA is a two-way cipher, so encrypting a string with a key and then decrypting the result of that encryption with the same key produces the original string. That is, the following assertion should always hold:

assert %string:dea192encrypt(%key):dea192decrypt(%key) eq %string

You can use DEA192decrypt to "document" that you are decrypting, and use DEA192encrypt to "document" that you are encrypting. You can use DEA192decrypt and DEA192encrypt interchangeably on the rest of this page.


%outString = string:DEA192decrypt( key) Throws UnsupportedCrypto, InvalidCryptoKey, InvalidCryptoData

%outString = string:DEA192encrypt( key) Throws UnsupportedCrypto, InvalidCryptoKey, InvalidCryptoData

Syntax terms

%outString A string variable to receive the encrypted or decrypted method object string. Its length is the same as string.
string The string to which the method is applied. string must be a multiple of eight bytes in length; its maximum is 32768 bytes. It may be null.
key A 24-byte (only) string variable whose value is used to encrypt or decrypt the method object, string.

Usage notes

  • You are not prevented from creating confusion by encrypting with DEA192decrypt and decrypting with DEA192encrypt.
  • The DEA192decrypt and DEA192encrypt functions are available as of Model 204 7.6.


In the following example, the output string from the DEA192encrypt method is converted to hex using the StringToHex function to reveal its non-displayable characters, then decrypted to return the original input string:

b %ls is longstring %string is longstring %key is longstring %string = 'onetwothreefour0onetwothreefour0' %key = '123456781616161624242424' %ls = %string:dea192encrypt(%key) printText {~} is {%ls:stringTohex} printText {~} is: {%ls:dea192decrypt(%key)} end

The result is:

%ls:stringTohex is: 20D8ABB419EC53E42545B5EBB00B857E20D8ABB419EC53E42545B5EBB00B857E %ls:dea192decrypt(%key) is: onetwothreefour0onetwothreefour0

See also