PC Toledo

... nome publico CapicomAssinaXml() para compatibilidade, mas a implementacao atual nao cria objetos COM CAPICOM. Ela usa CryptoAPI/CNG do Windows para SHA1, atendendo NFe/NFCe/CTe/MDFe/BPe.

Suporte previsto:

- A1 instalado no repositorio do Windows, buscando por CN ou thumbprint.
- A3 instalado/token ...

testei somente com a1 ok

então veja que usa 2 libs do bcc, portanto não confirmo se poder funcionar em outros compiladores

colega tb enviou rotina para assinar em sha1 sem capicom, mas não testei ainda

mas como tem os fontes lá agora dá para tentar outros compiladores

... Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/>
<SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/>
<Reference URI="#DPS355030820117489700013200001000000000000001">
<Transforms>
<Transform Algorithm="http://www.w3.org/2000/09/xmldsig ...

... ds:KeyInfo>
</ds:Signature>


Isso é exatamente o que o MSXML5.MXDigitalSignature fazia.
Sem MSXML5, você teria que:
- calcular o digest SHA1/SHA256
- canonicalizar o XML
- montar o SignedInfo
- assinar o SignedInfo
- montar o SignatureValue
- montar o KeyInfo
- inserir tudo no XML
Ou seja ...

... Criar SignedData */
oSignedData := win_OleCreateObject( "CAPICOM.SignedData" )

/* IMPORTANTE:
CAPICOM assina STRING diretamente
Ele mesmo faz SHA1 + RSA */
oSignedData:Content := cTexto

/* 6. Assinar (RSA-SHA1) */
cAssinatura := oSignedData:Sign( oSigner, .F., 0 )

if cAssinatura ...

... 2º - Converta a cadeia de caracteres ASCII para bytes.
3º - Gere o HASH (array de bytes) utilizando SHA1.
4º - Assine o HASH (array de bytes) utilizando RSA-SHA1.
Manual de Utilização – Web Service
Versão do Manual: 3.3.4
pág. 46
ATENÇÃO! Na ...

... original);
MessageBox.Show(sAssinaturaByte);

RSAPKCS1SignatureFormatter rsaf = new RSAPKCS1SignatureFormatter(rsa);
MessageBox.Show(rsaf);
SHA1CryptoServiceProvider sha1 = new SHA1CryptoServiceProvider();
MessageBox.Show(sha1);

//cria a variavel hash que armazena o resultado do sha1 ...

... Harbour
header directory so they can be used by other components.
+ export sha2 and hmac/sha2 low-level functions from Harbour dynlib
* src/rtl/sha1.c
* src/rtl/sha1.h
* src/rtl/sha1hmac.c
* src/rtl/sha1hmac.h
* src/rtl/sha2.c
* src/rtl/sha2hmac.c
* src/rtl/hbsha1.c
* src/rtl/hbsha1hm.c ...

... conseguir assinar pelo CAPICOM, vou ver o código que vc postou e aceito mais dicas se vc tiver
de como assinar com o CAPICOM com o algoritmo RSA SHA1.

A solução com o openssl.exe e certificado A1 foi essa aqui:


// Cria o arquivo chave PEM a partir do arquivo do certificado PFX:
cCommand ...

... aqui com esse nome 20250324 - Manual_de_Especificações_Técnicas_do_DANFE_NFC-e_QR_Code.pdf.

Estou testando o QRCode 3.0 na SEFAZ SP, quando uso HB_SHA1() a nota fiscal em contingência é emitida... mas quando assino os parâmetros do QRCode conforme mesmo manual
não valida a assinatura. É ruim isso, o ...

... aqui com esse nome 20250324 - Manual_de_Especificações_Técnicas_do_DANFE_NFC-e_QR_Code.pdf.

Estou testando o QRCode 3.0 na SEFAZ SP, quando uso HB_SHA1() a nota fiscal em contingência é emitida... mas quando assino os parâmetros do QRCode conforme mesmo manual
não valida a assinatura. É ruim isso, o ...

... nHandle := FOPEN( cFile_Str_a_Assinar )
FWRITE( nHandle, cStr_a_assinar )
FCLOSE( nHandle )


// Aqui não funciona
cCommand_Dois := "openssl dgst -sha1 -sign " + cPrivateKeyPEMFile + " -out " + cFile_Str_Assinada + " " + cFile_Str_a_Assinar
__RUN( cCommand_Dois )
// Aqui não funciona

// Lê os dados ...

... está sendo assinar a string de parâmetros desse novo layout de QRCode.

Alguém sabe como assina uma string com o harbour no algoritmo RSA SHA1.

Eu tentei essa receitinha pra assinar mas meu código não funcionou:
'<?xml version="1.0" encoding="UTF-8"?>' +;
'<ds:Signature xmlns:ds="http ...

... http://www.w3.org/TR/2001/REC-xml-c14n-20010315"></CanonicalizationMethod>
<SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"></SignatureMethod>
<Reference URI="#NFe31250799999999999999550010000005211524869277">
<Transforms>
<Transform Algorithm="http://www.w3.org/2000 ...

... Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/>
<dsig:SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/>
<dsig:Reference URI="#lote1">
<dsig:Transforms>
<dsig:Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"/>
<dsig ...