Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Простое шифрование пароля / 6 сообщений из 6, страница 1 из 1
13.10.2005, 12:36:01
    #33322263
Diesel_Coldfinger
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Простое шифрование пароля
Есть такая функция: SYS(2007, cExpression), которая возвращает контрольную сумму символьного выражения. А нельзя-ли как-нибудь получить из контрольной суммы - символьное выражение обратно?


смейтесь-смейтесь... Я еще всех вас переживу!!!
...
Рейтинг: 0 / 0
13.10.2005, 13:08:13
    #33322410
Burn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Простое шифрование пароля
Нет. Высчитывание контрольной суммы это не кодирование - разные строки могут иметь одинаковые контрольные суммы. Да и при кодировании не всегда можно востановить - бывают одностороние алгоритмы.
...
Рейтинг: 0 / 0
13.10.2005, 13:14:11
    #33322435
Diesel_Coldfinger
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Простое шифрование пароля
Как же тогда можно зашифровать пароль? Мне страшновато хранить DBF-ку с паролями в открытую. Расскажите?







смейтесь-смейтесь... Я еще всех вас переживу!!!
...
Рейтинг: 0 / 0
13.10.2005, 13:26:09
    #33322505
Владимир СА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Простое шифрование пароля
Diesel_ColdfingerКак же тогда можно зашифровать пароль? Мне страшновато хранить DBF-ку с паролями в открытую. Расскажите?
1. Не надо ничего шифровать. Сам потом будешь голову ломать. Да и все это вскрывается. Ты его как-то в программе будешь расшифровывать. Вот и увидится твой алгоритм расшифровки.
2. Если очень хочется, то для дурака, каждому коду символа прибавь некоторое число и преврати обратно в символ. Вот тебе самое простое шифрование.
...
Рейтинг: 0 / 0
13.10.2005, 14:39:50
    #33322772
Sergey Ch
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Простое шифрование пароля
Try something like this:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
FUNCTION aencode(tcKeyWord)
  LOCAL lcRaw, lnVar, lcEnc
  IF TYPE('tcKeyWord') # "C" OR EMPTY(tcKeyWord)
    ERROR("9000: A Character string is the required parameter for EnCode")
    RETURN ""
  ENDIF
  lcRaw=UPPER(ALLTRIM(tcKeyWord))
  lnVar=INT(RAND()* 10 )
  lcEnc=ALLTRIM(STR(lnVar))
  FOR lnCnt= 1  TO LEN(lcRaw)
    lcChar=SUBSTR(lcRaw, lnCnt, 1 )
    lcEnc = lcEnc+CHR(ASC(lcChar)+ 10 +lnVar+lnCnt+ 1 )
  ENDFOR
  RETURN lcEnc

FUNCTION adecode(tcKeyWord)
  LOCAL lcRaw, lnVar, lcEnc
  IF TYPE('tcKeyWord') # "C" OR EMPTY(tcKeyWord)
    ERROR("9000: A Character string is the required parameter for EnCode")
    RETURN ""
  ENDIF
  lcEnc = ALLTRIM(tcKeyWord)
  lnVar = VAL(LEFT(lcEnc, 1 ))
  lcRaw=''
  FOR lnCnt= 2  TO LEN(lcEnc)
    lcChar=SUBSTR(lcEnc, lnCnt, 1 )
    lcRaw=lcRaw+CHR(ASC(lcChar)-( 10 +lnVar+lnCnt))
  ENDFOR
  RETURN lcRaw
Плюс одно поле с SYS(2017) - чтоб пароль могли сменить только из Вашей программы :)

Но все как написано Выше - защита только от дураков с EXCEL :)
...
Рейтинг: 0 / 0
13.10.2005, 14:46:38
    #33322789
Burn
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Простое шифрование пароля
>Как же тогда можно зашифровать пароль?
Если тебе надо хранить пороли то зачем тебе обратная операция - получения из хеша исходного выражения? Имено для такого случая придумано односторонее кодирование - когда после шифрования получить исходное сообщение невозможно. И сравнивают уже зашифрованые строки.
В такой ситуации, как подсказывает народ, можно воспользоватся SYS(2007) в режиме CRC32
В общем почитай тут - http://forum.foxclub.ru/read.php?f=29&i=5807&t=5807
И ваще посмотри - http://forum.foxclub.ru/search.php?f=29&search=%F8%E8%F4%F0%EE%E2%E0%ED%E8%E5&globalsearch=1&match=1&date=0&fldauthor=0&fldsubject=1&fldbody=1&start=1
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Простое шифрование пароля / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]