![]() |
|
Модераторы: korob2001, ginnie |
![]()
|
|
| Cyr |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 48 Регистрация: 20.3.2006 Репутация: нет Всего: нет |
arto, у меня бинарник (пакет) от АТС. Протокол там CSTA (ASN.1 ber). есть даже файл с определениями asn1. Сколько не бился, сколько не пробовал готовые pm. не выходит ни фига. утилитой unber из asn1c я получил тоже что и вы мне тут показали. Но надо перлом эту структуру ещё заполнить определениями из файла asn1. Это сообщение отредактировал(а) Cyr - 10.3.2014, 15:52 |
|||
|
||||
| arto |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
В дистрибутиве Convert::ASN1 идёт пример x509decode, он рабочий:
# perl x509decode server-cert.der $VAR1 = { "signature" => [ "\"\254\263\240g\353\302\@6\232Vq \374.K=\333\261\203\363\226Z3\233\3333\336R\334\234\2006x\233\343\220\352c\314\f\254\17\275\1 &\217G'\203#\251\220\266\256\\\330< '\312\4\264^\233\205\3744\257^\221`;\322\337\267\6\256\343\1\t\37\211\257\n\30\n?\357C\326=n\26t2\263\6\360\212\364\200a\367\361\203\205\350,\35\270\203\366\201\207\263\315+\13\210\32\371?\25w;\314", 1024 ], "tbsCertificate" => { "subject" => { "rdnSequence" => [ [ { "type" => "2.5.4.6", "value" => { "printableString" => "DE" } } ], [ { "value" => { "printableString" => "Bayern" }, "type" => "2.5.4.8" } ], ... Посмотрите и сделайте, как там описано, должно помочь. ps. для asn.1 схему для гостового сертификата не нашёл, поэтому использовал стандартный rsa сертификат. |
|||
|
||||
| Cyr |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 48 Регистрация: 20.3.2006 Репутация: нет Всего: нет |
arto, давай начнём сначала.
Вот мой код (бинарник обрабатываемого пакета прикрёплён к сообщению):
выводит $VAR1 = undef; что я делаю не так? Это сообщение отредактировал(а) Cyr - 11.3.2014, 11:50 Присоединённый файл ( Кол-во скачиваний: 3 )
114_111.bin 0,08 Kb |
|||
|
||||
| arto |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
Net::CSTA и Net::CSTA::ASN не помогут?
|
|||
|
||||
| Cyr |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 48 Регистрация: 20.3.2006 Репутация: нет Всего: нет |
Может и помогут, только я не знаю с какой стороны к ним подступить ? Как ими декодировать бинарник? |
|||
|
||||
| arto |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
посмотреть как сделана и загружена грамматика и система типов, затем запустить decode.
|
|||
|
||||
![]()
|
| Правила форума "Perl" | |
|
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Perl: Общие вопросы | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |