Форум » [x]Harbour » Шифрование AES/DES » Ответить
Шифрование AES/DES
Dazzler: Добрый день. Подскажите, пожалуйста, есть ли в Harbour функции симметричного шифрования AES / DES ?
Ответов - 40, стр:
1 2 All
AlexMyr: собрал test.prg такой командой hbmk2 test.prg hbssl.hbc, запустил и все нормально отработало.
Dazzler: Dima пишет: Укажи библу при сборке -lhbssl Указывал. Всё равно ошибка та же (((
AlexMyr: Для библиотек из contrib лучше указывать соответствующий hbc файл
Dazzler: AlexMyr пишет: собрал test.prg такой командой hbmk2 test.prg hbssl.hbc, запустил и все нормально отработало. у меня выдает синтаксическую ошибку ((( у Вас есть такая строка ??: #require "hbssl" И у меня Harbour 3.0.0 (Rev. 16951) - может в этом причина?
AlexMyr: Dazzler пишет: у Вас есть такая строка ??: #require "hbssl" есть Dazzler пишет: И у меня Harbour 3.0.0 (Rev. 16951) у меня Version: Harbour 3.2.0dev (r1303180127) Compiler: MinGW GNU C 4.7.2 (32-bit)
Dazzler: AlexMyr пишет: Version: Harbour 3.2.0dev (r1303180127) Compiler: MinGW GNU C 4.7.2 (32-bit) Где можно взять такую сборку?
AlexMyr: Dazzler пишет: Где можно взять такую сборку? Я беру исходники (http://clipper.borda.ru/?1-3-0-00000254-000-0-0-1363357426) и сам собираю. Возможно проблема в BCC, проверить не могу, нет его у меня.
Dazzler: AlexMyr пишет: Я беру исходники (http://clipper.borda.ru/?1-3-0-00000254-000-0-0-1363357426) и сам собираю. Возможно проблема в BCC, проверить не могу, нет его у меня. Попытался собрать. Запустил make-win.exe Куча строк "Неверный дескриптор"..... в общем не получилось у меня собрать ((( Есть где-нибудь описание, как собирать? "для чайников" как я )))
AlexMyr: мой батник, пути свои поставить, если нет cUrl, то заремить SET HB_WITH_CURL=C:\curl\include исходники лежат тут _git\core cd _git\core SET HB_INSTALL_PREFIX=c:\dev\harbour_core\ SET HB_BUILD_DYN=no SET HB_WITH_OPENSSL=C:\dev\openssl\include SET HB_WITH_CURL=C:\curl\include win-make clean time /T %1 %2 > log_core.txt 2>&1 win-make install %1 %2 >> log_core.txt 2>&1 time /T %1 %2 >> log_core.txt 2>&1
Dazzler: AlexMyr, спасибо! Буду пробовать.
Пользователь: http://www.pctoledo.com.br/forum/viewtopic.php?f=4&t=17146 пролистай до конца и скачай aes.zip
Andrey: В МиниГуи есть пример MiniGUI\SAMPLES\Advanced\AESDEMO Но там только работа с файлами. А как со строками работать ? Есть ли функции работы со строками для этого алгоритма ? Искал по инету, не нашёл. Может и плохо искал...
Dima: Andrey пишет: Может и плохо искал.. Пользователь пишет: http://www.pctoledo.com.br/forum/viewtopic.php?f=4&t=17146 пролистай до конца и скачай aes.zip Тут смотрел ? Архив жив ещё .
Andrey: В Харборе есть функции HB_Crypt() / HB_Decrypt() А к какому алгоритму шифрования они относятся, как называется этот алгоритм ? По комментариям в \Harbour\contrib\xhb\hbcrypt.c - ничего не понятно.
Pasha: Andrey пишет: В Харборе есть функции HB_Crypt() / HB_Decrypt() А к какому алгоритму шифрования они относятся, как называется этот алгоритм ? По комментариям в \Harbour\contrib\xhb\hbcrypt.c - ничего не понятно. Так английским же по белому написано: "WARNING: Non-standard, insecure crypto." Что тут может быть непонятно ? И ниже на том же языке: Giancarlo Niccolai's x scrambler algorithm
SergKis: Andrey Может на это посмотри и подойдет ( http://www.kresin.ru/hrbfaq_3.html#Doc14_13 )[pre2] PROCEDURE MAIN LOCAL cInp := "_msg.log" LOCAL cCry := "_msg.cry" LOCAL cOut := "_msg.txt" LOCAL cPsw := "My_Password_Key_0123456789" LOCAL cBfKey, cCipher, cText fErase("_MsgLog.txt") cBfKey := hb_blowfishKey( cPsw ) cCipher := hb_blowfishEncrypt( cBfKey, hb_memoread(cInp) ) hb_memowrit(cCry, cCipher) cText := hb_blowfishDecrypt( cBfKey, hb_memoread(cCry) ) hb_memowrit(cOut, cText) RETURN[/pre2]
Andrey: SergKis пишет: Может на это посмотри и подойдет То что надо. Я там забыл посмотреть ! Спасибо !!!
Andrey: Я так понял что функция [pre2] cFileDcrp := "mem:FileDecrypt" // create/open in memory via HB_MEMIO lOk := DecryptFileAES( cFileCryp, cFileDcrp, cPassword ) // AES - hbaes.lib[/pre2] Не будет работать с HB_MEMIO ! Григорий, а можно её дописать \MiniGUI\SOURCE\HbAES чтобы работало с HB_MEMIO ? Или это сложно ?
Andrey: SergKis пишет: cText := hb_blowfishDecrypt( cBfKey, hb_memoread(cCry) ) Как определить успешна ли операция при декодировании файла ? Файл может быть и битым...
Andrey: Проверил, cText будет NIL
полная версия страницы