Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 2 Próxima »

Função: PrivVeryRSA

Verifica um determinado conteúdo assinado, usando a chave pública.

PrivVeryRSA ( < cPathKey>, < cContent>, < nTipo>, < cAssinado>, [ cErrStr], [ nPad] ) --> lRet

 

NomeTipoDescriçãoObrigatórioReferência
cPathKeyCaracterIndica o caminho (path) da chave pública que deve ser no formato do arquivo .PEM.X 
cContentCaracterIndica o valor que será verificado, com um conteúdo já assinado.X 
nTipoNuméricoIndica um numérico que informa o tipo de algoritmo que será utilizado para verificar a assinatura. Para mais informações do tipos válidos, consulte a área Observações.X 
cAssinadoCaracterIndica uma string que contém o valor assinado.X 
cErrStrCaracterIndica a varíavel para retornar as mensagens de erro.  
nPadNuméricoIndica o tipo de schema de criptografia que será utilizado. Para mais informações do tipos válidos, consulte a área Observações.  

 

lRet
    (caracter)
  • Retorna verdadeiro (.T.), se o valor informado, no parâmetro <cContent>, está de acordo com o valor enviado que foi assinado, pelo tipo <nTipo> e a chave informada <cPathKey>; Caso contrário, falso (.F.).

Essa função utiliza uma chave pública para verificar a assinatura. Para isso, é necessário informar o caminho (path) da chave pública, no parâmetro <cPathKey>, e, em seguida, o conteúdo <cContent>, um numérico <nTipo> que informa o tipo de algoritmo que será utilizado para realizar a assinatura e finalmente é passado o valor assinado.

 

Tipo de algoritmo válido para o parâmetro

ValorAlgoritmo
MD5 
SHA1 
RIPEMD160 
MD5_SHA1 

 

 

Tipo de schema de criptografia válido para o parâmetro

ValorSchema

PKCS1

SSL
NO

PKCS1_OAEP

5

X931

Observação
Caso não seja passado nenhum schema de criptografia, a rotina assume como padrão o schema 1-PKCS1.

 

User Function RSA_Sign() 
Local sStr := '01234567890123456789'
Local sOut := ''
sStr := Md5( sStr )
varinfo( '1', sStr )
sOut := PrivSignRSA( 'private.pem', sStr, 1, 'assinatura' )
varinfo( 'sOut', sOut )
conout( PrivVeryRSA( 'public.pem', sStr, 1, sOut ) )
Return
Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10

 

  • Sem rótulos