Ошибки api честный знак

Всем привет! Делаю интеграцию 1с с честным знаком. Задача получать входящие документы и их подписывать.

Ниже пример использования:

ПодписатьТекст(ЗашифроватьBase64(ФайлXML, «windows-1251»),Отпечаток,Истина);

    
    ТекстДляПодписи = СокрЛП(ТекстДляПодписи);

    
    Возврат sSignedMessage; // Подпись в формате Base64

    
КонецФункции

    
КонецФункции

ТекстДляПодписи — содержание XML файла

У клиента менялся сертификат, может быть в этом причина? Хотя при «ручном» подписании ошибок нет.

Кто сталкивался? Отзовитесь плиз…..

Куда сейчас документацию API выкладывают? Раньше в телеге выкладывали, сейчас — фиг разберешься.

Исходный xml отправляете ведь с подписанным? Через base64Строка прогнать и отправить?

(6) у нах сайт лёг кстати. Успел вытащить описание до санкций.

Да, файл покупателя уже с подписанным файлом от продавца. Вначале в base64, а потом уже подписываем.

Плюс в тело post запроса подпись самого файла от покупателя.

Попробую без CAPICOM_AUTHENTICATED_ATTRIBUTE_SIGNING_TIME. Отпишусь. Думаю,  что всем полезно знать решение

(2)

Решил отказаться от штамма времени в алгоритме при подписании документов:

Функция ПодписатьТекст(ТекстДляПодписи, sThumbprint, bDetached)

    
    ТекстДляПодписи = СокрЛП(ТекстДляПодписи);

    
    Возврат sSignedMessage; // Подпись в формате Base64

    
КонецФункции

Но ничего не изменилось. А Вы говорили, что у Вас есть рабочий код для подписи? Можете поделиться? Спасибо

(11)

Не всегда БСПшные функции работают корректно. Велосипед, да. Но нужно в нем разобраться.

(12)

Тут согласен полностью. Но имеем то, что имеем.

(8)

Вообще у вас вполне нормальный код, только он сильно замусорен непонятно зачем нужными опциями: сертификат ищется двумя способами, к подписи добавляются какие-то атрибуты и штамп времени… Возможно, все это нужно ЧЗ. Или нет? У меня на этот счет сомнения.

(17)

Смотрю да. Надо короче пробовать. Но мы же текстовое содержимое файлов xml файлов подписываем? Пробовал уйти от времени — результат тот же. Подумаем короче…

(17)

Сам алгоритм то рабочий,  сессию же я получаю без проблем. Проблемы с подписью документов.

(20)

Добрый день! А  подробнее можно? Куда этот параметр CMS вставить?

Причем сверил сам отпечаток. Полностью совпадает  с тем, как тут получают. Так что проблем серфикатом быть не должно

Ниже код, как я заполняю справочников сертификатов (отдельный сделал, БСПшный не стал использовать):

        
ОбъектСертификат.Записать();

Отказался от CAPICOM_AUTHENTICATED_ATTRIBUTE_SIGNING_TIME. результат тот же…

Вот код:

Функция ПодписатьТекстОтсоединеннаяПодпись(ТекстДляПодписи,Отпечаток)

    
    ФайлСПодписями = ПолучитьИмяВременногоФайла(«txt»);

        
    ДД_Подпись =  МенеджерКриптографии.Подписать(ТекстДляПодписи,ФайлСПодписями,Сертификат);

    
    Возврат ПолучитьСтрокуИзДвоичныхДанных(ДД_Подпись,»windows-1251″);

КонецФункции // ПодписатьТекстОтсоединеннаяПодпись()

Но получаю ошибку:

Как заставить его работать?

Использую для ГИИС, но может, найдёшь что полезное.

Стр — ссылка на эл. справочника СертификатыКлючейЭлектроннойПодписиИШифрования

Код на базе БСП 3.1.5.385

КриптоСертификат=Новый СертификатКриптографии(Стр.ДанныеСертификата.Получить()); //двоичные данные сертификата

МенеджерКриптографии=Новый МенеджерКриптографии(Стр.СертификатИмяПрограммы,»»,Стр.СертификатТипПрограммы); //из того же справочника

ПараметрыXMLDSig=ЭлектроннаяПодписьСлужебныйКлиентСервер.ПараметрыXMLDSig();

МенеджерКриптографии.ПарольДоступаКЗакрытомуКлючу=»****»;

ПодписанныйПакет=ЭлектроннаяПодписьСлужебный.Подписать(ТелоПакета,ПараметрыXMLDSig,КриптоСертификат,МенеджерКриптографии);

1СникСоСтажем

27 — 16.05.22 — 22:42

(26)

Добрый день! Именно так и есть, хотя бы подпись получил. Ниже код, как я это делаю.

Причем ФайлXML_ДД — двоичные данные XML файла. Если отправлять содержимое XML файла — то будет ошибка, описанная выше.

То есть вначале подпись, а потом уже ее в Base64/ На что еще обратить внимание? Подписываю файл продавца и титул покупателя одинаково

ПодписатьТекстОтсоединеннаяПодпись(ФайлXML_ДД,Отпечаток)

Функция ПодписатьТекстОтсоединеннаяПодпись(Файл_ДД,Отпечаток)

        
    ДД_Подпись = МенеджерКриптографии.Подписать(Файл_ДД,Сертификат);

        
    Результат = Base64Строка(ДД_Подпись);

    Возврат Результат;

КонецФункции // ПодписатьТекстОтсоединеннаяПодпись()

Приветствую, получаю от Честного знака токен методом GET {«uuid»:»d12b8e68-a2f8-48a2-sdcb-a3b632cbb270″,»data»:»JLZTXJTMFXCXUUAFYQKHZOIQSAUXKC»}

    Соеденение = СоздатьОбъект(«WinHttp.WinHttpRequest.5.1»);

    Соеденение.Option(2,»utf-8″);

    Соеденение.SetTimeouts(0,0,0,0);

    URL = «https://ismp.crpt.ru/api/v3/auth/cert/key»;;

    Соеденение.Open(«GET», URL, 0);

    Соеденение.SetRequestHeader(«Content-Type», «application/json»);

    Соеденение.SetRequestHeader(«Accept-Charset», «utf-8»);

    Соеденение.Send();

(Вот так получаю)

Мне для дальнейших действий я так понял, нужно его подписать и отправить методом POST

        Соеденение = СоздатьОбъект(«WinHttp.WinHttpRequest.5.1»);

    Соеденение.Option(2,»utf-8″);

    Соеденение.SetTimeouts(0,0,0,0);

    URL = «https://ismp.crpt.ru/api/v3/auth/cert»;;

    Соеденение.Open(«POST», URL, 0);

    Соеденение.SetRequestHeader(«Content-Type», «application/json»);

    Соеденение.SetRequestHeader(«Accept-Charset», «utf-8»);

        Соеденение.Send();

    RequestTimeout = 40;

(Вот так отправляю, ошибка <UnauthorizedException><error>unauthorized</error><error_description>Full authentication is required to access this resource</error_description></UnauthorizedException>)

Я полагаю что я не авторизовался

ДанныеЗапроса = Подписанные вашим ЭЦП данные;

ТекстЗапроса = «{«»uuid»»:»»»+СокрЛП(СессияUuid)+»»»,»»data»»:»»» + ДанныеЗапроса + «»»}»;

Соеденение.Send(ТекстЗапроса);

Примерно так. Но я давно с этим разбирался, вроде работало.

Приведу вымученный код для восьмёрки, чтобы было понимание, как разговаривать с ЧЗ. Предполагается, что сертификат ЭЦП, которым подписываем запросы, установлен на сервере и прописан в 1С, плюс прописан в настройках обмена с ИС МП:

&НаСервере

Функция ПолучитьТокен(Организация) Экспорт

    
    СертификатДляОбмена = ПолучитьСертификатОрганизацииИзНастроек(Организация);

    
    Если НЕ СертификатДляОбмена.Отпечаток = Неопределено Тогда

        
        Сертификат = НайтиСертификатПоОтпечаткуСтр(СертификатДляОбмена.Отпечаток);

        
        // Получение данных для получения токена

        HTTPСоединение =    Новый HTTPСоединение(ДанныеПодключенияЧестныйЗнак().АдресСервера, 443,,,,, Новый ЗащищенноеСоединениеOpenSSL);

        HTTPЗапрос = новый HTTPЗапрос(«/api/v3/auth/cert/key»);

        HTTPОтвет = HTTPСоединение.ВызватьHTTPМетод(«GET», HTTPЗапрос);

        ОтветСтрока = HTTPОтвет.ПолучитьТелоКакСтроку(«UTF-8»);

        ЧтениеJSON = Новый ЧтениеJSON;

        ЧтениеJSON.УстановитьСтроку(ОтветСтрока);

        ДанныеJSON = ПрочитатьJSON(ЧтениеJSON);

        ЧтениеJSON.Закрыть();

        УИД = ДанныеJSON.uuid;

        ДанныеДляПолученияТокена = ДанныеJSON.data;

        
        // Подписание данных для получения токена

        ДанныеДляПолученияТокена = ПодписатьТекст(ЗашифроватьBase64(ДанныеДляПолученияТокена, КодировкаТекста.UTF8), Сертификат, Ложь);

        
        // Получение токена с использованием подписанных данных

        Соединение = Новый HTTPСоединение(ДанныеПодключенияЧестныйЗнак().АдресСервера, 443,,,,, Новый ЗащищенноеСоединениеOpenSSL);

        Заголовки = Новый Соответствие;

        Заголовки.Вставить(«Content-Type», «application/json; charset=UTF-8»);

        Заголовки.Вставить(«Accept», «application/json»);

        HTTPЗапрос = Новый HTTPЗапрос(«/api/v3/auth/cert/»,Заголовки);

        ЗаписьJOIN = Новый ЗаписьJSON;

        ЗаписьJOIN.УстановитьСтроку();

        ДанныеДляЗапроса = Новый Структура;

        ДанныеДляЗапроса.Вставить(«uuid»,УИД);

        ДанныеДляЗапроса.Вставить(«data»,ДанныеДляПолученияТокена);    

        ЗаписатьJSON(ЗаписьJOIN,ДанныеДляЗапроса);

        СтрокаДляЗапроса = ЗаписьJOIN.Закрыть();

        
        HTTPЗапрос.УстановитьТелоИзСтроки(СтрокаДляЗапроса,КодировкаТекста.UTF8, ИспользованиеByteOrderMark.НеИспользовать);

        Ответ = Соединение.ОтправитьДляОбработки(HTTPЗапрос);

        Если Ответ.КодСостояния = 200 Тогда

            
            ЧтениеJSON = Новый ЧтениеJSON;

            ЧтениеJSON.УстановитьСтроку(Ответ.ПолучитьТелоКакСтроку());

            
            Токен = ПрочитатьJSON(ЧтениеJSON, Ложь).token;

            
            Возврат Новый Структура(«Токен, ТекстОшибки», Токен, «»);

            
        Иначе

            
            Возврат Новый Структура(«Токен, ТекстОшибки», Неопределено, «Ошибка получения токена. Код ответа: » + Ответ.КодСостояния + «.»);    

        
        КонецЕсли;

        
    Иначе

        
        Возврат Новый Структура(«Токен, ТекстОшибки», Неопределено, СертификатДляОбмена.ТекстОшибки);

        
    КонецЕсли;

    
КонецФункции

&НаСервере

Функция ПолучитьСертификатОрганизацииИзНастроек(Организация) Экспорт

    
    ХранилищеЗначения = Константы.НастройкиОбменаГосИС.Получить();

    СохраненныеНастройки = ХранилищеЗначения.Получить();

    
    НайденнаяСтрока = СохраненныеНастройки.Найти(Организация, «Организация»);

    
    Если НайденнаяСтрока = Неопределено Тогда

        
        Отпечаток = Неопределено;

        ТекстОшибки = «Сертифкат для » + Организация + » не найден в настройках сертификатов для автоматического обмена с ИС МП»;

                
    Иначе

        
        Отпечаток = НайденнаяСтрока.Сертификат.Отпечаток;

        ТекстОшибки = «»;

        
    КонецЕсли;

    
    Возврат Новый Структура(«Отпечаток, ТекстОшибки», Отпечаток, ТекстОшибки);

    
    
КонецФункции

&НаСервере

Функция НайтиСертификатПоОтпечаткуСтр(ОтпечатокСтр) Экспорт

    //Поиск доступных сертификатов

    CAPICOM_CURRENT_USER_STORE = 2;

    //2 — Искать сертификат в ветке «Личное» хранилища.

    CAPICOM_MY_STORE = «My»;

    // Указываем, что ветку «Личное» берем из хранилища текущего пользователя

    CAPICOM_STORE_OPEN_READ_ONLY = 0; // Открыть хранилище только на чтение

    oStore = Новый COMОбъект(«CAdESCOM.Store»); // Объект описывает хранилище сертификатов

    
    oStore.Open(CAPICOM_CURRENT_USER_STORE, CAPICOM_MY_STORE,

    CAPICOM_STORE_OPEN_READ_ONLY); // Открыть хранилище сертификатов

    CAPICOM_CERTIFICATE_FIND_SHA1_HASH = 0;

    Certificates = oStore.Certificates.Find(CAPICOM_CERTIFICATE_FIND_SHA1_HASH, СтрЗаменить(Строка(Base64Значение(ОтпечатокСтр)), » «, «»));

    Возврат Certificates.Item(1);

КонецФункции

&НаСервере

// ТекстДляПодписи должен быть в Base64

// bDetached — Истина/Ложь — откреплённая(для подписания документов)/прикреплённая(для получения токена авторизации) подпись

Функция ПодписатьТекст(ТекстДляПодписи, Certificate, bDetached) Экспорт

    CADESCOM_BASE64_TO_BINARY = 1; // Входные данные пришли в Base64

    CADESCOM_CADES_TYPE = 1; // Тип усовершенствованной подписи

    CAPICOM_AUTHENTICATED_ATTRIBUTE_SIGNING_TIME = 0; // Атрибут штампа времени подписи

    oSigner = Новый COMОбъект(«CAdESCOM.CPSigner»);

    // Объект, задающий параметры создания и содержащий информацию об усовершенствованной подписи.

    oSigner.Certificate = Certificate;

    oSigner.KeyPin = «123»; //пароль, с которым сертификат установлен на сервер. если пароля нет — комментируем строку

    oSigningTimeAttr = Новый COMОбъект(«CAdESCOM.CPAttribute»);

    oSigningTimeAttr.Name = CAPICOM_AUTHENTICATED_ATTRIBUTE_SIGNING_TIME;

    oSigningTimeAttr.Value = ТекущаяДата();

    oSigner.AuthenticatedAttributes2.Add(oSigningTimeAttr);

    ТекстДляПодписи = СокрЛП(ТекстДляПодписи);

    oSignedData = Новый COMОбъект(«CAdESCOM.CadesSignedData»);

    // Объект CadesSignedData предоставляет свойства и методы для работы с усовершенствованной подписью.

    oSignedData.ContentEncoding = CADESCOM_BASE64_TO_BINARY;

    oSignedData.Content = СокрЛП(ТекстДляПодписи);

    EncodingType = 0;

    sSignedMessage = oSignedData.SignCades(oSigner, CADESCOM_CADES_TYPE, bDetached, EncodingType);

    // Метод добавляет к сообщению усовершенствованную подпись.

    Возврат sSignedMessage; // Подпись в формате Base64

КонецФункции

&НаСервере

Функция ЗашифроватьBase64(Строка, Кодировка) Экспорт

    ИмяВременногоФайла = ПолучитьИмяВременногоФайла();

    ЗаписьТекста = Новый ЗаписьТекста(ИмяВременногоФайла, Кодировка);

    ЗаписьТекста.Записать(Строка);

    ЗаписьТекста.Закрыть();

    Двоичные = Новый ДвоичныеДанные(ИмяВременногоФайла);

    Результат = Base64Строка(Двоичные);

    Если Лев(Результат, 4) = «77u/» Тогда

        Результат = Сред(Результат, 5);

    КонецЕсли;

    Результат = СтрЗаменить(Результат, Символы.ПС, «»);

    УдалитьФайлы(ИмяВременногоФайла);

    Возврат Результат;

КонецФункции

(9) Получается ты вообще не в теме что-ли??

Воюшмать! (с)

Функция ПолучитьСписокСертификатов()

    РезСписок    = СоздатьОбъект(«СписокЗначений»);

    comStore        = СоздатьОбъект(«CAdESCOM.Store»);

    comStore.Open(

        2,        // StoreLocation — CAPICOM_CURRENT_USER_STORE.

        «MY»,    // StoreName

        );        // OpenMode — CAPICOM_STORE_OPEN_READ_ONLY.

    comCertificates = comStore.Certificates;

    comStore.Close();

    comStore = «»;

    КоличествоСертификатов = comCertificates.Count;

    
    ТекДата    = ТекущаяДата();

    
    фл = 0;

    Для a=1 По КоличествоСертификатов Цикл

        Объект    = comCertificates.Item(a);

        
        Субъект        = Объект.SubjectName;

        ДатаНачало    = Объект.ValidFromDate;

        ДатаКонец    = Объект.ValidToDate;

        
        Если ДатаКонец < ТекДата Тогда

            Продолжить;

        КонецЕсли;

        Список    = РазложитьСубъекта(Субъект);

        ИНН        = Список.Получить(«ИНН»);

        Если ПустаяСтрока(ИНН) = 1 Тогда

            Продолжить;

        КонецЕсли;

        
        СерийныйНомер    = Объект.SerialNumber;

        Отпечаток        = Объект.Thumbprint;

        Наименование    = Список.Получить(«CN»);

        РезСписок.ДобавитьЗначение(Отпечаток,Наименование+»: «+ДатаКонец);

    КонецЦикла;

    Возврат РезСписок;

КонецФункции

(25) А какой объект заработал? Cadescom или CAPICOM?

(26) Там же список, значение списка — отпечаток ключа, строка в списке — владелец + дата окончания. Выбирая из списка, получаешь отпечаток ключа, его подставляешь при подписывании.

(25) А какой объект заработал? Cadescom или CAPICOM?

(26) Там же список, значение списка — отпечаток ключа, строка в списке — владелец + дата окончания. Выбирая из списка, получаешь отпечаток ключа, его подставляешь при подписывании.

(29) Там просто из строки наименования берем названия, инн и т.п.

Функция РазложитьСубъекта(Субъект)

    Результат    = СоздатьОбъект(«СписокЗначений»);

    Результат.ДобавитьЗначение(Субъект,»субъект»);

    
    ВремСтрока    = СтрЗаменить(Субъект,»,»,РазделительСтрок);

    Для а=1 По СтрКоличествоСтрок(ВремСтрока) Цикл

        ТекСтр    = СокрЛП(СтрПолучитьСтроку(ВремСтрока,а));

        ТекСтр    = СтрЗаменить(ТекСтр,»=»,РазделительСтрок);

        Результат.ДобавитьЗначение(СокрЛП(СтрПолучитьСтроку(ТекСтр,2)),СокрЛП(СтрПолучитьСтроку(ТекСтр,1)));

    КонецЦикла;

    Возврат Результат;

КонецФункции // гл

(44) тут нужен сертификат а не отпечаток

Функция ПолучитьСертификатПоОтпечатку(ОтпечатокСтр)
    Рез = "";// Найденный сертификат (Com-объект)

    CAPICOM_CURRENT_USER_STORE = 2;    //2 - Искать сертификат в ветке "Личное" хранилища.

    CAPICOM_MY_STORE = "My"// Указываем, что ветку "Личное" берем из хранилища текущего пользователя

    CAPICOM_STORE_OPEN_READ_ONLY = 0;// Открыть хранилище только на чтение

    //oStore = СоздатьОбъект("CAdESCOM.Store"); // иногда не работает

    oStore = СоздатьОбъект("CAPICOM.Store");// Объект описывает хранилище сертификатов

    
    oStore.Open(CAPICOM_CURRENT_USER_STORE, CAPICOM_MY_STORE,CAPICOM_STORE_OPEN_READ_ONLY);// Открыть хранилище сертификатов

    // 1 вариант: поиск сертификата по отпечатку

    CAPICOM_CERTIFICATE_FIND_SHA1_HASH = 0;
    Certificates = oStore.Certificates.Find(CAPICOM_CERTIFICATE_FIND_SHA1_HASH, ОтпечатокСтр);
    Рез = Certificates.Item(1);
    
    //2 вариант: обходом по коллекции и сравнение с отпечатком

    //Для Каждого ТекСертификат Из oStore.Certificates Цикл //цикл на 1с8

    //    ТекОтпечаток = ТекСертификат.Thumbprint; // возвращается отпечаток в шестнадцатеричном виде

    //    Если ВРЕГ(ТекОтпечаток) = ВРЕГ(ОтпечатокСтр) Тогда Рез = ТекСертификат;

    //        Прервать;

    //    КонецЕсли;

    //КонецЦикла;

    oStore.Close();// Закрыть хранилище сертификатов и освободить объект 61

    Возврат Рез;
КонецФункции

oSigner.Certificate = ПолучитьСертификатПоОтпечатку(Отпечаток);

Caesar

46 — 27.10.21 — 17:23

Прошу прощения за подъем достаточно давней темы.

При попытке подписания токена получаю сообщение:

sSignedMessage = oSignedData.SignCades(oSigner, CADESCOM_CADES_TYPE, bDetached, EncodingType);

{E:BASESV7КОВАЛЕВА СВЕРТКАОБМЕН_С_ЧЕСТНЫЙЗНАК.ERT(134)}: Поле агрегатного объекта не обнаружено (SignCades)

Текст функции подписания —

// bDetached — Истина/Ложь — откреплённая(для подписания документов)/прикреплённая(для получения токена авторизации) подпись

Функция ПодписатьТекст(ТекстДляПодписи, СертификатДляПодписи, bDetached)    

    //ТекстДляПодписи — токен в формате Base64

    //СертификатДляПодписи — сертификат, полученный по отпечатку

    
    CADESCOM_BASE64_TO_BINARY = 1;// Входные данные пришли в Base64

    CADESCOM_CADES_TYPE = 1;// Тип усовершенствованной подписи

    CAPICOM_AUTHENTICATED_ATTRIBUTE_SIGNING_TIME = 0;// Атрибут штампа времени подписи

    oSigner = СоздатьОбъект(«CAdESCOM.CPSigner»);

    // Объект, задающий параметры создания и содержащий информацию об усовершенствованной подписи.

    oSigner.Certificate = СертификатДляПодписи;

    //oSigner.KeyPin = «12345678»;//пароль, с которым сертификат установлен на сервер. если пароля нет — комментируем строку

    oSigningTimeAttr = СоздатьОбъект(«CAdESCOM.CPAttribute»);

    oSigningTimeAttr.Name = CAPICOM_AUTHENTICATED_ATTRIBUTE_SIGNING_TIME;

    oSigningTimeAttr.Value = ТекущаяДата();

    oSigner.AuthenticatedAttributes2.Add(oSigningTimeAttr);

    ТекстДляПодписи = СокрЛП(ТекстДляПодписи);

    oSignedData = СоздатьОбъект(«CAdESCOM.CadesSignedData»);

    // Объект CadesSignedData предоставляет свойства и методы для работы с усовершенствованной подписью.

    oSignedData.ContentEncoding = CADESCOM_BASE64_TO_BINARY;

    oSignedData.Content = СокрЛП(ТекстДляПодписи);

    EncodingType = 0;

    sSignedMessage = oSignedData.SignCades(oSigner, CADESCOM_CADES_TYPE, bDetached, EncodingType);   // ВОТ ТУТ ОШИБКА

    // Метод добавляет к сообщению усовершенствованную подпись.

    Возврат sSignedMessage;// Подпись в формате Base64

КонецФункции        

Цепочка сертификатов до доверенного КЦ выстроена.

Очень прошу помочь.

Заранее благодарен.