Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
ARC4
ARC4

Função: ARC4

Cria uma sequência de caracteres criptografada, utilizando o algoritmo de criptografia de fluxo ARC4, a partir de uma sequência de caracteres que compõe o dado a ser criptografado e uma sequência de caracteres adicional usada como base para a criptografia, chamada de chave.

ARC4 ( < cBase>, < cChave> ) --> cStringArc4

 

NomeTipoDescriçãoObrigatórioReferência
cBaseCaracterIndica a sequência de caracteres que serão criptografadas.X 
cChaveCaracterIndica a sequência de caracteres a serem utilizados como chave para o algoritmo de criptografia.X 

 

cStringArc4
    (caracter)
  • Retorna uma string criptografada.
ARC4( "abc" ,"123456789" )   // Resultadouser function arc4_exemplo

local cRet
local cOriginal

// resultado ASCII em hex: "55-AB-39-45-24"
ARC4cRet = arc4( "abcdabcde" ,"123456789" ) // Resultado: "55-AB-39-45"
ARC4( "abcde" ,"123456789" ) // Resultado: "55-AB-39-45-24")
conout("Criptografado em ascii = " + cRet)
// converte de ASCII em hex para string
cRet = chr(CTON('55', 16))
cRet += chr(CTON('AB', 16))
cRet += chr(CTON('39', 16))
cRet += chr(CTON('45', 16))
cRet += chr(CTON('24', 16))

// processo inverso
cOriginal = arc4(cRet, "123456789")
conout("Original em ascii = " + cOriginal)

// converte de ASCII em hex para string
cRet = chr(CTON('61', 16))
cRet += chr(CTON('62', 16))
cRet += chr(CTON('63', 16))
cRet += chr(CTON('64', 16))
cRet += chr(CTON('65', 16))
conout ("String original = " + cRet)

return
Abrangência
Microsiga Protheus 8.11 , Protheus 10