:: Архив конференции по VFP до 2005 года
Зашифровать от чайника
Simple

Сообщений: 41
Дата регистрации: 07.02.2005
Как попроще зашифровать от чайника - можно в dbf - можно в txt -
- дату и время изменения некоторой велиичины
- машину, с которой это сделано
- само изменение: с __ по __

достаточно самого простого шифрования....
можно считать - что шифруется некоторое предложение около 70 символов - но их - предложений - будет много
Ratings: 0 negative/0 positive
Re: Зашифровать от чайника
JS

Сообщений: 12264
Откуда: Эстония
Дата регистрации: 04.09.2000
Поищите в Инете - код Цезаря, очень простой алгоритм, да если еще цифры на символы поменять.




------------------
Knowledge is better than ignorance!
Website: juri.foxhelp.eu
Ratings: 0 negative/0 positive
Re: Зашифровать от чайника
Vadim

Сообщений: 816
Откуда: Клайпеда
Дата регистрации: 26.10.2000
Посмотри здесь :
www.foxclub.ru
и здесь :
www.foxclub.ru




------------------
Ratings: 0 negative/0 positive
Re: Зашифровать от чайника
Simple

Сообщений: 41
Дата регистрации: 07.02.2005
нашел. Переписал. Может кому пригодится:
CLEAR
LOCAL lnSdvig, lcText

M.lcText = 'Проверка шифра'

M.lnSdvig = 7 && это можно менять от 1 и далее; 0 = не шифруем
DIMENSION MasSymbol(255)
FOR i = 1 TO 255
IF i + M.lnSdvig > 255
MasSymbol(i) = CHR(i + M.lnSdvig - 256)
ELSE
MasSymbol(i) = CHR(i + M.lnSdvig)
ENDIF
NEXT

M.lcClosedText = ''
FOR k = 1 TO LEN(M.lcText)
M.lcClosedText = M.lcClosedText + MasSymbol(ASC(SUBSTR(M.lcText, k, 1)))
NEXT

? 'Зашифровали:'
?M.lcClosedText

M.lcOpenedText=''
FOR k = 1 TO LEN(M.lcClosedText)
FOR i = 1 TO 255
IF MasSymbol(i) = SUBSTR(M.lcClosedText, k, 1)
M.lcOpenedText = M.lcOpenedText + CHR(i)
ENDIF
NEXT
NEXT

? 'Вернули:'
?M.lcOpenedText
Ratings: 0 negative/0 positive
Re: Зашифровать от чайника
Igor Korolyov
Автор

Сообщений: 34580
Дата регистрации: 28.05.2002
Hi, JS!

Код прямой замены для такого случая будет самым неудачным решением -
поскольку тут "регулярная" структура (ну ясно что подряд идущие
множественные "CAAFxxxx" явно смахивают на год)... В общем надо чего-то с
"перемешиванием", и возможно с добавлением некоей динамической части.
P.S. Также не дурно бы и добавить чексум или нечто подобное, а то банально
скопируют данные с "соседней" записи и всё




------------------
WBR, Igor
Ratings: 0 negative/0 positive
Re: Зашифровать от чайника
JS

Сообщений: 12264
Откуда: Эстония
Дата регистрации: 04.09.2000
Привет Игорь!

Поскольку шифрование от чайника, то и Цезарь вполне пойдет,
кто будет разбираться, да еще подбирать смещение...
(кстати надо еще знать, что такой спсоб существует и именно
этим способом дешифовать)
Посмотрит такой чайник на ^twwlxlp+psl~+lwrlm+??~+xl}v
да и не полезет



Отредактировано (17.02.05 21:08)


------------------
Knowledge is better than ignorance!
Website: juri.foxhelp.eu
Ratings: 0 negative/0 positive
Re: Зашифровать от чайника
Димон71

Сообщений: 80
Дата регистрации: 08.02.2005
Давай мыло сброшу тебе готовый компонент Activex для шифрования текста
Ratings: 0 negative/0 positive
Re: Зашифровать от чайника
Igor Korolyov
Автор

Сообщений: 34580
Дата регистрации: 28.05.2002
Hi, JS!

Чайник имеет свойство из 2-х способов решения задачи выбрать третий, не
предусмотренный разработчиком
Например увидев такие страшные "письмена", он может вместо попытки
декодировать это, просто взять и перенести инфу из другой записи, например
созданной самой первой давным давно Т.е. не всегда нужно "влезть" чтоб
"поломать"

P.S. Кстати такая-же примерно ситуация с DataBase Events - типа были
радостные крики что "всё, никто теперь неавторизованно табличку не
откроет..." А ведь можно банальным текстовым редактором в FAR сделать
практически всё что угодно в любой dbf таблице




------------------
WBR, Igor
Ratings: 0 negative/0 positive


Извините, но у вас нет прав для того, чтобы оставлять сообщения в этом форуме.

On-line: 8 (Гостей: 8)

© 2000-2024 Fox Club 
Яндекс.Метрика