Странно, что для типа криптопровайдера self.ProviderType = PROV_GOST_2012_256 такая проблема, а для PROV_RSA_AES и его алгоритмов норм.
Значит, типы параметров с точки зрения функций Cryptoapi описаны правильно ? Не нравится значение какого то параметра?
Найдено 69 результатов
- 10 Ноябрь 2021, 19:38
- Форум: CLARION for Windows
- Тема: CRYPTOAPI и ГОСТ алгоритмы
- Ответы: 17
- Просмотры: 2776
- 10 Ноябрь 2021, 19:27
- Форум: CLARION for Windows
- Тема: CRYPTOAPI и ГОСТ алгоритмы
- Ответы: 17
- Просмотры: 2776
CRYPTOAPI и ГОСТ алгоритмы
К сожалению, hashlensize вместо hashlen не помог. Да и, вроде, оба Long.
- 10 Ноябрь 2021, 18:47
- Форум: CLARION for Windows
- Тема: CRYPTOAPI и ГОСТ алгоритмы
- Ответы: 17
- Просмотры: 2776
CRYPTOAPI и ГОСТ алгоритмы
Исходник на С полностью рабочий. Я говорил о программе на Clarion. В кларионовском классе было реализовано через два вызова CryptGetHashParam(). Сначала получаем размер буфера, затем сам Hash. Я попробовал реализовать в кларике, как в С - один вызов CryptGetHashParam(hHash,HP_HASHVAL,ADDRESS(ParamBL...
- 10 Ноябрь 2021, 18:18
- Форум: CLARION for Windows
- Тема: CRYPTOAPI и ГОСТ алгоритмы
- Ответы: 17
- Просмотры: 2776
CRYPTOAPI и ГОСТ алгоритмы
Как в С сразу получить Hash , без предварительного получения размера, тоже не получается - та же ошибка
Код: Выделить всё
hashlen = GR3411LEN
ParamBLOB.ParamData &= NEW(STRING(hashlen))
if ~CryptGetHashParam(hHash,HP_HASHVAL,ADDRESS(ParamBLOB.ParamData),hashlen,0) then
- 10 Ноябрь 2021, 18:14
- Форум: CLARION for Windows
- Тема: CRYPTOAPI и ГОСТ алгоритмы
- Ответы: 17
- Просмотры: 2776
CRYPTOAPI и ГОСТ алгоритмы
#include <stdio.h> #ifdef _WIN32 # include <windows.h> # include <wincrypt.h> #else # include <stdlib.h> #endif #include <WinCryptEx.h> static void HandleError(const char *s); // Начало примера (не следует удалять данный комментарий, он используется // для автоматической сборки документации) //----...
- 10 Ноябрь 2021, 17:53
- Форум: CLARION for Windows
- Тема: CRYPTOAPI и ГОСТ алгоритмы
- Ответы: 17
- Просмотры: 2776
- 10 Ноябрь 2021, 17:43
- Форум: CLARION for Windows
- Тема: CRYPTOAPI и ГОСТ алгоритмы
- Ответы: 17
- Просмотры: 2776
CRYPTOAPI и ГОСТ алгоритмы
Нет. При нормальной работе CryptGetHashParam(hHash,HP_HASHSIZE,ADDRESS(HashArr[1]),Hashlensize,0) В HashArr получаем размер буфера и соответственно в hashlen , т.к. HashArr BYTE,DIM(4),over(hashlen) Но в случае ГОСТ алгоритмов, до этого NEW() дело не доходит ) - выхожу по ошибке. Для наглядности убр...
- 10 Ноябрь 2021, 17:17
- Форум: CLARION for Windows
- Тема: CRYPTOAPI и ГОСТ алгоритмы
- Ответы: 17
- Просмотры: 2776
CRYPTOAPI и ГОСТ алгоритмы
Добрый день! Пытаюсь получить Hash по ГОСТ алгоритму с помощью функций Cryptoapi. Использую CryptoClType класс из: cryptocl.clw cryptocl.inc На 4-ом шаге получаю ошибку 87 - Параметр задан неверно Схематичный порядок действий: Module('advapi32.dll') CryptAcquireContext(*LONG hProv,<*CSTRING Containe...
- 03 Сентябрь 2021, 15:45
- Форум: Железо
- Тема: Взять кассу
- Ответы: 688
- Просмотры: 156198
Взять кассу
Спасибо! Все варианты пробовали и не помогают.
В итоге, проблему помог решить пример из документации с использованием другого типа данных TagType = 9
Может, пригодится )
В итоге, проблему помог решить пример из документации с использованием другого типа данных TagType = 9
Может, пригодится )
- 03 Сентябрь 2021, 15:18
- Форум: Железо
- Тема: Взять кассу
- Ответы: 688
- Просмотры: 156198
Взять кассу
И так не идет.
[03.09.2021 15:13:11.845] [00013684] [DEBUG] TDrvFR Set_TagValueStr: '020
[03.09.2021 15:13:11.845] [00013684] [DEBUG] TDrvFR Set_TagValueStr: '020
- 03 Сентябрь 2021, 13:08
- Форум: Железо
- Тема: Взять кассу
- Ответы: 688
- Просмотры: 156198
Взять кассу
Вообще, если говорить об OLE - то Ваш пример в Excel будет работать не всегда. Если ячейка имеет формат "По значению" - то '020' , будет трансформировано в число 20. Для того, что бы заставить записать именно строку - её нужно передать с апострофом «‘»: Loc:STMP = '`020' CassObject{'TagVa...
- 02 Сентябрь 2021, 19:04
- Форум: Железо
- Тема: Взять кассу
- Ответы: 688
- Просмотры: 156198
Взять кассу
Да , это для ФФД 1.2 Со Штрихом активно переписываемся. Они говорят, что проблема в том , что мы не передаем свойству значение типа "Строка". Не представляю другого способа передать значение, чтобы драйвер понял его , как строка. Неужели Clarion так представляет значение, что драйвер Штрих...
- 02 Сентябрь 2021, 16:42
- Форум: Железо
- Тема: Взять кассу
- Ответы: 688
- Просмотры: 156198
Взять кассу
Спасибо за совет, но к сожалению, не помогло.
А вы проверяли как чек в ОФД приходит или лог драйвера ? У вас точно '020' передается ?
А вы проверяли как чек в ОФД приходит или лог драйвера ? У вас точно '020' передается ?
- 02 Сентябрь 2021, 15:32
- Форум: Железо
- Тема: Взять кассу
- Ответы: 688
- Просмотры: 156198
Взять кассу
Может, кто сталкивался с такой проблемой на драйвере ККТ Штрих-М. При передаче числа с лидирующими нулями, как строковую переменную, в драйвер приходит число без лидирующих нулей. CassObject = Create(0,Create:Ole) CassObject{PROP:Create} = 'AddIn.DrvFR' ... CassObject{'TagNumber'} = 1262 CassObject{...
- 29 Май 2021, 14:29
- Форум: CLARION for Windows
- Тема: HTML decode
- Ответы: 6
- Просмотры: 1883
HTML decode
Спасибо! Посмотрю