Спорное утверждение. Делфи тут не причем.


Новичкам может больше помочь пример (исходник) для СМЭВ под делфи или пример вызова какого-нибудь метода.

Я не утвержаю, что в Delphi нет средств для каноникализации XML... я констатирую этот факт. Если у кого то есть сомнения по этому поводу, что ж...
Можно написать и самому, но для этого надо знать как оно должно работать... именно с этой целью я и выложил программу c14n.exe... если вы не сможете вручную преобразовать XML к каноническому виду, то тем более не сможете "научить" этому свою процедуру...
А исходники конечно будут, если будет интерес к этому вопросу...
но не будет толка от процедур для получения хеша и подписи пока не будет возможности передать им "нужный" XML...

ok... я только рад помочь.. давайте, для начала, попробуем канонизировать вот такой простой вариант
(программой c14n.exe не пользоваться!... если вы не будете присылать свои варианты решения, я сам позже разберу этот пример, потом перейдем к примеру посложнее...):

<ds:SignedInfo>
<ds:CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#"/>
<ds:SignatureMethod Algorithm="http://www.w3.org/2001/04/xmldsig-more#gostr34102001-gostr3411"/>
<ds:Reference URI="#body">
<ds:Transforms>
<ds:Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#"/>
</ds:Transforms>
<ds:DigestMethod Algorithm="http://www.w3.org/2001/04/xmldsig-more#gostr3411"/>
<ds:DigestValue>acivl1p/l/aEtQoHJlkezFywapOcAipW90WvTnaac3A=</ds:DigestValue>
</ds:Reference>
</ds:SignedInfo>

ps: и да! у любого xml должна быть единственная каноническая форма, без вариантов... смэв не будет выбирать как канонизировать xml для дальнейшей обработки... мы должны канонизировать его точно так же... до байта!!! только тогда подпись пройдет...

ладно... ответов нет. пишу сам:
1.канонализированный XML (далее буду писать C-XML) должен содержать все объявления пространства имен, который используются в тэгах и их атрибутах... в данном случае не обявлено что такое "ds"... добавим xmlns:ds="http://www.w3.org/2000/09/xmldsig#" в тэг <ds:SignedInfo>
2.не должно быть тегов вида <Tag/> они должны быть заменены на пары <Tag></Tag>

результат C-XML:

<ds:SignedInfo xmlns:ds="http://www.w3.org/2000/09/xmldsig#">
<ds:CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#"></ds:CanonicalizationMethod>
<ds:SignatureMethod Algorithm="http://www.w3.org/2001/04/xmldsig-more#gostr34102001-gostr3411"></ds:SignatureMethod>
<ds:Reference URI="#body">
<ds:Transforms>
<ds:Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#"></ds:Transform>
</ds:Transforms>
<ds:DigestMethod Algorithm="http://www.w3.org/2001/04/xmldsig-more#gostr3411"></ds:DigestMethod>
<ds:DigestValue>acivl1p/l/aEtQoHJlkezFywapOcAipW90WvTnaac3A=</ds:DigestValue>
</ds:Reference>
</ds:SignedInfo>

Отредактировано пользователем 10 февраля 2015 г. 11:34:00(UTC)  | Причина: Не указана

пространства имен xmlns - основной геморрой...

1.все объявления пространств имен xmlns должны идти раньше чем атрибуты (ds5:id="ID001" надо перенести в "хвост" тэга <ds4:Body>)
2.и пр.имен и атрибуты должны быть упорядочены по алфавиту (xmlns:ds5 должен идти позже чем все остальные, которые останутся, xmlns:ds6 исчезнет совсем п.3)
3.не используемые в xml пр.имен должны быть удалены (xmlns:ds6="http:")
4.узлы одного уровня НЕ упорядочиваются по афавиту, а остаются на своих местах (<ds5:Inner2/> идет раньше чем <ds3:Inner/>... так и должно остаться)
5!!!!!.пр.имен должны быть объявлены только в тех узлах, в которых они используются (xmlns:ds1 не используется в <ds4:Body> должен быть опущен ниже, до <ds1:Sender>)

C-XML:

<ds4:Body xmlns:ds4="http:" xmlns:ds5="http:" ds5:id="ID001">
<ds1:Sender xmlns:ds1="http:"> ds1 нигде "выше" не используется
<ds2:Code xmlns:ds2="http:">1226</ds2:Code> ds2 нигде "выше" не используется
<ds2:Name xmlns:ds2="http:">Компания</ds2:Name> ds2 нигде "выше" не используется
<ds4:Code2>1228</ds4:Code2> а вот ds4 уже был обявлен ранее в родительском узле
</ds1:Sender>
<ds5:Inner2></ds5:Inner2> ds5 уже использовался (и объявлялся) ранее.. в <ds4:Body .... ds5:id="ID001">
<ds3:Inner xmlns:ds3="http:"></ds3:Inner> порядок тегов одного уровня не изменился!
<ds3:Autor xmlns:ds3="http:"></ds3:Autor> порядок тегов одного уровня не изменился!
</ds4:Body>


без примечаний:

<ds4:Body xmlns:ds4="http:" xmlns:ds5="http:" ds5:id="ID001">
<ds1:Sender xmlns:ds1="http:">
<ds2:Code xmlns:ds2="http:">1226</ds2:Code>
<ds2:Name xmlns:ds2="http:">Компания</ds2:Name>
<ds4:Code2>1228</ds4:Code2>
</ds1:Sender>
<ds5:Inner2></ds5:Inner2>
<ds3:Inner xmlns:ds3="http:"></ds3:Inner>
<ds3:Autor xmlns:ds3="http:"></ds3:Autor>
</ds4:Body>

Отредактировано пользователем 10 февраля 2015 г. 12:04:47(UTC)  | Причина: Не указана

готовый C-XML для вычисления хеша должен быть переведен в UTF-8

вот рабочий код вызова процедуры вычисления хеша и подписи у меня:



function SoapCreateMessage(CryptContainer: WideString; BodyContext: string): string;
var
DataStream: TStream;
Cert,Hash,Sign: TBytesStream;
SignedInfo,Security: string;
TimeStamp: string;
CertId,KeyId,STRId,SignID: string;
begin

//обертка данных сообщения блоком <Body>
BodyContext:=
'<soapenv:Body '+
'xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" '+
'xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" '+
'wsu:Id="body">'+
'<smev:GISGMPTransferMsg xmlns:smev="http://roskazna.ru/gisgmp/02000000/SmevGISGMPService/">'+
BodyContext+
'</smev:GISGMPTransferMsg>'+
'</soapenv:Body>';

DataStream:=TStringStream.Create(BodyContext,TEncoding.UTF8);
Hash:=TBytesStream.Create;
try

//вычисление хеша блока <Body>
GetHashStream(CryptContainer,DataStream,nil,nil,Hash,nil);

//блок для подписи
SignedInfo:=
'<ds:SignedInfo xmlns:ds="http://www.w3.org/2000/09/xmldsig#">'+
'<ds:CanonicalizationMethod Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#">'+
'</ds:CanonicalizationMethod>'+
'<ds:SignatureMethod Algorithm="http://www.w3.org/2001/04/xmldsig-more#gostr34102001-gostr3411">'+
'</ds:SignatureMethod>'+
'<ds:Reference URI="#body">'+
'<ds:Transforms>'+
'<ds:Transform Algorithm="http://www.w3.org/2001/10/xml-exc-c14n#">'+
'</ds:Transform>'+
'</ds:Transforms>'+
'<ds:DigestMethod Algorithm="http://www.w3.org/2001/04/xmldsig-more#gostr3411">'+
'</ds:DigestMethod>'+
'<ds:DigestValue>'+
//хэш элемента <soapenv:Body> по алгоритму ГОСТ Р 34.11-94 в формате base64
StreamAsBase64(Hash)+
'</ds:DigestValue>'+
'</ds:Reference>'+
'</ds:SignedInfo>';

finally
DataStream.Free;
Hash.Free;
end;

DataStream:=TStringStream.Create(SignedInfo,TEncoding.ansi);//UTF8);
Cert:=TBytesStream.Create;
Sign:=TBytesStream.Create;
try

//подпись <SignedInfo> и получение данных сертификата
GetHashStream(CryptContainer,DataStream,Cert,nil,nil,Sign);

TimeStamp:='';
CertId:='CertId-'+SoapGenID;
KeyId:='KeyId-'+SoapGenID;
STRId:='STRId-'+SoapGenID;
SignID:='SignID-'+SoapGenID;

Security:=
'<wsse:Security '+
'soapenv:actor="http://smev.gosuslugi.ru/actors/smev">'+
'<wsse:BinarySecurityToken '+
'EncodingType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-soap-message-security-1.0#Base64Binary" '+
'ValueType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509v3" '+
'wsu:Id="'+CertId+'">'+
//сертификат в формате Base64
StreamAsBase64(Cert)+
'</wsse:BinarySecurityToken>'+
'<ds:Signature Id="'+SignID+'" '+
'xmlns:ds="http://www.w3.org/2000/09/xmldsig#">'+
//вставим готовый блок <SignedInfo>
SignedInfo+
'<ds:SignatureValue>'+
//электронная подпись для <ds:SignedInfo> по алгоритму ГОСТ Р 34.11-2001 в формате base64
StreamAsBase64(Sign)+
'</ds:SignatureValue>'+
'<ds:KeyInfo Id="'+KeyId+'">'+
'<wsse:SecurityTokenReference wsu:Id="'+STRId+'">'+
'<wsse:Reference URI="#'+CertId+'" '+
'ValueType="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-x509-token-profile-1.0#X509v3"/>'+
'</wsse:SecurityTokenReference>'+
'</ds:KeyInfo>'+
'</ds:Signature>'+
'</wsse:Security>';

//soap envelope
Result:=
'<?xml version="1.0"?>'+
'<soapenv:Envelope '+
'xmlns:inc="http://www.w3.org/2004/08/xop/include" '+
'xmlns:mes="http://roskazna.ru/gisgmp/xsd/116/Message" '+
'xmlns:mes1="http://roskazna.ru/gisgmp/xsd/116/MessageData" '+
'xmlns:rev="http://smev.gosuslugi.ru/rev120315" '+
'xmlns:smev="http://roskazna.ru/gisgmp/02000000/SmevGISGMPService/" '+
'xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" '+
'xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd" '+
'xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd" '+
'xmlns:xd="http://www.w3.org/2000/09/xmldsig#">'+
'<soapenv:Header>'+
Security+
'</soapenv:Header>'+
BodyContext+
'</soapenv:Envelope>';

finally
DataStream.Free;
Cert.Free;
Sign.Free;
end;

end;