| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Простое заксоривание. [D2005, 2003]
go2lo © (2006-11-20 17:58:00)Решил "изобрести" совершенно глупый алгоритм шифрования маленького количества информации (строку до 10 символов).
Входящие три параметра: шифруемые данные, ключ1, ключ2. (UId, Key1, Key2)
const
ConstsXor: array [0..9] of Byte =
($a1, $2b, $3c, $e4, $15, $ef, $19, $a1, $f4, $c0);
var
lkey1, lkey2: Byte;
i: Byte;
lkey := 0; lkey2 := 0;
for i := 1 to Length(UId) do
begin
if lkey = Length(UId) then lkey := 1 else Inc(lkey);
if lkey2 = Length(UId) then lkey2 := 1 else Inc(lkey2);
if Odd(i) then
Result[i] := Chr(Ord(UId[i]) xor ConstsXor[i] xor Ord(Key1[lkey]))
else
Result[i] := Chr(Ord(UId[i]) xor ConstsXor[i] xor Ord(Key2[lkey2]));
end;
Я прекрасно понимаю, что тут просто запудривание мозгов, а не шифрование. Вопросы заключаются в следующем: Возможно упростить код, не потеряв смысла, если да то как? Возможна такая сиуация, когда данные испортятся, т.е. какой-то подводный камень?
Спасибо.
palva (2006-11-20 23:10:00) [1]1. Можно взять очень простой потоковый алгоритм RC4. Он не сложнее будет вашего.
2. При очень маленькой длине сообщения очень возможно, что сообщения будут повторяться. Например "Да" или "Нет". Нужно чтобы шифровка повторяющихся сообщений выглядела каждый раз по-разному. Для этого полезно перед сообщением помещать несколько случайных символов, которые после расшифровки можно отбрасывать.
Leonid Troyanovsky (2006-11-20 19:11:00) [2]
> go2lo (20.11.06 17:58)
> Решил "изобрести" совершенно глупый алгоритм шифрования
> маленького количества информации (строку до 10 символов).
В общем-то, такое кол-во информации вполне можно
запомнить (в голове).
Ну, а если речь идет о повторениях процесса, то
это уже не 10 символов. Т.е., со всеми вытекающими.
Я к тому, что не надо изобретать "глупых", когда
есть нормальные.
--
Regards, LVT.
| |
