Cabeçalho

RC4Crypt [AS]

Autor: Eurai Criado: 01/01/2016 Atualizado: 26/04/2025 Criptografia e Segurança

Postagem

Descrição

RC4Crypt [AS] - SHA1 (Secure Hash Algorithm) gera o hash (ou digest) de um conteúdo, com base no algoritmo definido em FIPS PUB 180-1 published April 17, 1995.

Sintaxe

RC4Crypt( <cBase>, <cChave>, <lAscII> )

Parâmetros

Par	Nome	Tipo	Descrição	Default	Obg	Ref
01	cBase	Caracter	Indica a sequência de caracteres que serão criptografadas		X
02	cChave	Caracter	Indica a sequência de caracteres a serem utilizados como chave para o algoritmo de criptografia		X
03	lAscII	Boolean	Se .T., indica que o retorno será em código ASCII hexadecimal, caso contrário em texto plano. Por padrão é assumido .T.	.T.

Retorno

Retorno	Tipo	Descrição
cRet	Caracter	Retorna uma cadeia de caracteres criptografada. O formato depende do parâmetro lAscII. Caso .T., o resultado será em código ASCII hexadecimal sem nenhuma separação. Cada código corresponde a dois caracteres

Exemplo

#INCLUDE "TOTVS.CH"

User Function RC4Crypt()

MsgInfo( RC4Crypt('UniversoADVPL','0123456789', .T.) + CRLF + ;
RC4Crypt('UniversoADVPL', '0123456789', .F.) + CRLF + ;
RC4Crypt('UniversoADVPL', '0123456789!@#$%¨&*()', .T.) + CRLF + ;
RC4Crypt('UniversoADVPL', '0123456789!@#$%¨&*()', .F.), 'UniversoADVPL' )

Return( Nil )

Resultado
rc4crypt_-_resultado_01