Форум » [x]Harbour » Аналоги функции HB_Crypt и HB_Decrypt для Harbour'а ? » Ответить
Аналоги функции HB_Crypt и HB_Decrypt для Harbour'а ?
Andrey: Всем привет. Подскажите пожалуйста, есть ли в Харборе фунции как в хХарборе HB_Crypt и HB_Decrypt ?
Ответов - 34, стр:
1 2 All
alkresin: В Харборе есть функции, реализующие разные алгоритмы шифрации: HB_BLOWFISHDECRYPT - Blowfish - популярный криптостойкий алгоритм HB_BLOWFISHENCRYPT HB_MD5DECRYPT - Md5, ничего про него не знаю HB_MD5ENCRYPT SX_DECRYPT - из библиотеки hbsix, наверное, самый простой SX_ENCRYPT
Dima: Andrey [pre2] 2008-06-10 16:06 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) + contrib/xhb/hbcrypt.c + contrib/xhb/hbnxs.h * contrib/xhb/Makefile * contrib/xhb/common.mak + Added HB_CRYPT()/HB_DECRYPT(). Thanks to Giancarlo Niccolai / xhb. + Changed to not depend on hbzlib. ; Minor modifications to compile smoothly in Harbour. [1.0.0RC1] [/pre2]
Andrey: Спасибо БОЛЬШОЕ ! Я искал через Far в папке "Harbour SVN 30" строку "crypt" по маске *.prg - из-за этого и не нашел ничего. Неправильно искал... Интересно, я еще по доке Харбора искал такую строку, тоже ничего нет.
Dima: Andrey я искал в ChangeLog
Andrey: Использую в хХарборе 1.2.3 функцию CRYPT(cStr, cPass) - осталось еще с клипера. Сделал новую прогу на МиниГуи (соответственно последний Харбор) и пытаюсь прочитать базы с хХарбора. Функция CRYPT() в Харборе дает другое значение ! Вопрос: как можно сделать работу функций одинаковой ? Т.е. отказ от CRYPT и переход на одинаковую функцию в Харборе и хХарборе.
Dima: Andrey Это твоя самописная функция ?
Andrey: Dima пишет: Это твоя самописная функция ? Стандартная клиперовская. Работает и в Харборе и хХарборе.
Dima: HB_Crypt не пробовал ?
Dima: Упс , это мы говорим про CRYPT из CT ? Значит надо проверить что выдаст тестовый пример в Clipper , Harbour , Xharbour Проверил. Сlipper и Harbour дают разные результаты
Andrey: Dima пишет: Harbour , Xharbour CRYPT из CT - различается для них !
Dima: Andrey Андрей а если бы кроме Harbour , Xharbour были бы YHarbour и ZHarbour ты бы и на них писал ? Остановись уже на каком то одном. Иначе будешь постоянно находить не стыковки.
Andrey: Dima пишет: Остановись уже на каком то одном. Иначе будешь постоянно находить не стыковки. Дима, штук 10 задач переделал на хХарбор уже давно. Года 2 пытаюсь перейти на МиниГуи. Переделать сразу ВСЁ на Харбор просто нереально. Делаю мелкими шагами. Самый главный шаг это TBROWSE, пока не получается. Сделал пока новое меню на МиниГуи. Открываю базу паролей задач на хХарборе. Споткнулся на функции CRYPT(). Вот из-за этого и спрашиваю, кто знает ОДИНАКОВЫЕ функции (такого класса) для Харбора и хХарбора ?
SergKis: Andrey в MiniGui есть: h_crypt.prg и там (может пойдет): [pre2] FUNCTION _ENCRYPT(cStr, cPass) LOCAL cXorStr := CHARXOR( cStr, "<ORIGINAL>" ) IF !EMPTY(cPass) cXorStr := CHARXOR( cXorStr, cPass ) ENDIF RETURN cXorStr FUNCTION _DECRYPT(cStr, cPass) LOCAL cXorStr := CHARXOR( cStr, cPass ) RETURN CHARXOR( cXorStr, "<ORIGINAL>" ) [/pre2]
SergKis: Andrey еще в hb_six.lib есть SX_DECRYPT(cStr, cPas), SX_ENCRYPT(cStr, cPas)
Andrey: SergKis пишет: CHARXOR( cXorStr, cPass ) А эта функция одинаково работает в Харборе и хХарборе ?
SergKis: Andrey проверь. хХарбора не использую
Dima: Andrey пишет: А эта функция одинаково работает в Харборе и хХарборе ? Проверил. Одинаково в Clipper и Harbour. Xharbour нет у меня но думаю так же будет.
Andrey: Функции HB_Crypt и HB_Decrypt работают в Харборе 3.2.0dev (r1405231501) и хХарборе 1.2.3 - одинаково ! Проверил...
Dazzler: Подскажите пожалуйста параметры функций: HB_BLOWFISHDECRYPT() HB_BLOWFISHENCRYPT()
Dima: Dazzler hb_blowfishKey( <cPass> ) -> <bfKey> hb_blowfishEncrypt( <bfKey>, <cData> ) -> <cCryptedData> hb_blowfishDecrypt( <bfKey>, <cCryptedData> ) -> <cData>
полная версия страницы