Где можно найти алгоритм кодирования Base64?

← →
Vit1251 © (2002-11-21 13:00) [0]

Уважаемые программисты!

Не знаете ли вы: "Где можно найти алгоритм кодирования Base64?"
Если можно, то как алгоритм в формате PAS...То есть Unit...

← →
Наезжалкин (2002-11-21 13:11) [1]

http://www.delphikingdom.com/helloworld/base64.htm

← →
Кокандокало (2002-11-21 15:11) [2]

да, да.. а еще желательно unbase64
а то авторицацию немогу на прокси послать =)
Блин, перешел на delphi с java и понял, что основных функций как-то не хватает... в java base64 есть =)

← →
asmith (2002-11-21 19:54) [3]

В D6 входит набор компонентов InDy, причем с исходными текстами, там имеются классы TIdBase64Encoder и TIdBase64Decoder

← →
Anatoly Podgoretsky © (2002-11-21 20:08) [4]

Кокандокало (21.11.02 15:11)
Надо поискать только для Д1-Д5, а насчет остальных ты неправ есть у тебя
А что ты используешь на Д1 для работы с Интернетом?

Я ищу код для TurboPaskal 7.0, FreePaskal и Delphi, а это очень сложно найти...
Тем более что ссылка URL которая тут указана, не функциональна или полу функциональна
так как мне не удаеться закодировать мое имя (только 3 буквы декодирует) - нет не матерные,
а моего имени причем первые??? Странно?!

← →
Мазут Береговой (2002-11-30 20:41) [6]

Алгоритм простой.
Из файла берутся 3 байта (по 8 бит каждый) и преобразуются в 4 6-битовых символа. Значение каждого символа распологается в пределах от 0 до 64. Этот диапазон для 6 бит. Больше не получится. Последовательность такая -
0 64

ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=
Последний символ (=) является служебным.
Вот пример.
00011101 00100101 00101001 разделяем ->
000111 010010 010100 101001
получилась такая последовательность чисел 7, 18, 20, 41.
Теперь, согласно этих чисел выбираем символы из вышепрмведенной последовательности - H,S,U,p. Читаешь следующие три байта и делаешь тоже самое.
В конце файла могут встретиться три ситуации
1. когда последние три байта заполнены полностью
2. когда в конце не хватает одного байта
3. когда в конце не хватает двух байт

в случае 1 ничего делать не надо.
в случае 2 надо в конце последовательности поставить один символ "="
в случае 3 надо поставить 2 символа "=" (т.е. "==")
(естественно что последний символ будет неполный - заполнить нулями)выглядеть это будет так
YYU=, HJ==.
Вот и все. Раскодирование в обратном порядке.

Где можно найти алгоритм кодирования Base64? Найти похожие ветки