Программу неизвестного назначения вспоминайте

23 views
Skip to first unread message

Leo B.

unread,
Oct 1, 2025, 9:10:20 PMOct 1
to БЭСМ-6
В зоне 0727 обоих дисков 2053 есть маленькая программа (в старых РУКАВАх названная "Допуск"), которая призвана что-то делать со "спецкаталогом" в зоне 71 (тоже согласно РУКАВАм). Там на С.Боровском 2053 нули, а на ИТМовском - какая-то программа.

Если этот "Допуск" запустить с помощью выводимого из кода программы паспорта, например
ШИФР 419900^
DIS 60(2053)^
TEL^
ВХО 77^
EB77 K 00 070 0100
C 0010 0000 0060 0727
B2100
C5177 0000 0002 0123
C неясно, для чего, и 0 и всеед годятся
EKOHEЦ
то становится ясно, что при первом запуске программа жалуется на испорченную зону, а потом заводит в спецкаталоге шифр 419942 с паролем 71762А (это не номер ли п/я?).
Главный пароль программы - ТАЙНА. Все пароли, разумеется, присутствуют в коде открытым текстом. 

Имеются директивы ЗАШ, ВЫШ, ЗАИ, ВЫИ. По директиве ЗАШ выполняется Э50 0141, который нигде не описан. В исходниках Диспака имеется (модуль ЭКСТ, метка Э141), но что делает - неясно.

Пробуждает ли память?

Leo

Василий Долматов

unread,
Oct 3, 2025, 2:46:59 AMOct 3
to be...@googlegroups.com


2 окт. 2025 г., в 04:10, Leo B. <leo...@gmail.com> написал(а):

В зоне 0727 обоих дисков 2053 есть маленькая программа (в старых РУКАВАх названная "Допуск"), которая призвана что-то делать со "спецкаталогом" в зоне 71 (тоже согласно РУКАВАм). Там на С.Боровском 2053 нули, а на ИТМовском - какая-то программа.

Если этот "Допуск" запустить с помощью выводимого из кода программы паспорта, например
ШИФР 419900^
DIS 60(2053)^
TEL^
ВХО 77^
EB77 K 00 070 0100
C 0010 0000 0060 0727
B2100
C5177 0000 0002 0123
C неясно, для чего, и 0 и всеед годятся
EKOHEЦ
то становится ясно, что при первом запуске программа жалуется на испорченную зону, а потом заводит в спецкаталоге шифр 419942 с паролем 71762А (это не номер ли п/я?).
точно нет. 
может быть номер в/ч… :) 

Главный пароль программы - ТАЙНА. Все пароли, разумеется, присутствуют в коде открытым текстом. 

Имеются директивы ЗАШ, ВЫШ, ЗАИ, ВЫИ. По директиве ЗАШ выполняется Э50 0141, который нигде не описан. В исходниках Диспака имеется (модуль ЭКСТ, метка Э141), но что делает - неясно.

Пробуждает ли память?
надо код посмотреть, ткнешь пальцем?

Leo


--
Данное сообщение отправлено Вам, как участнику группы "БЭСМ-6":
http://groups.google.com/group/besm6/topics
---
Вы получили это сообщение, поскольку подписаны на группу "БЭСМ-6".
Чтобы отменить подписку на эту группу и больше не получать от нее сообщения, отправьте письмо на электронный адрес besm6+un...@googlegroups.com.
Чтобы посмотреть обсуждение, перейдите по ссылке https://groups.google.com/d/msgid/besm6/e0265253-ac31-4d9b-b2f0-3f3bd8ae8afen%40googlegroups.com.

Leo B.

unread,
Oct 3, 2025, 3:36:49 AMOct 3
to БЭСМ-6
Отработка собственно экстракода тут: https://github.com/besm6/besm6.github.io/blob/master/sources/dispak-svs/%D1%8D%D0%BA%D1%81%D1%82.bemsh#L272

В старой инструкции (РУКАВА от вер. 93) нашлось

Занесение и исключение признака "ГРИФ"
--------------------------------------
 ИР 050 А, где Аисп - 141 (8)

Входная информация:
М15:   1 - 15 р = 65656
См:    1 - 48 р - шифр в 2-10 виде
М3:    1 - 15 р = 0 - занесение шифра в каталог;
                # 0 - исключение шифра из каталога.

Выходная информация:
См: 1 - 48 р = 0 - работа выполнена
         1 р = 1 - неверный пароль на Э.К.
         2 р = 1 - нет места в каталоге
                   или нет требуемого шифра.

О каком каталоге речь, и в чём заключается этот признак в отрыве от раздела паспорта ГРИФ?
Экстракод, похоже, лезет в большой каталог (зона 545).

Василий Долматов

unread,
Oct 3, 2025, 4:00:06 AMOct 3
to be...@googlegroups.com
ага, ГРИФ родимый… :) 

деталей я, естественно, не знаю ( :) ), в свое время из любопытства копался, но до конца не раскапывал… :) 

остановился на такой версии:

вся эта тряхомудия - для ведения закрытых расчетов (в основном употреблялась во ВНИИЭФ - по крайней мере делалась по его запросу, AFAIR, в последующих версиях все это (и явно что-то ещё :) ) было вынесено в условную компиляцию по переменной «ЭФ=1» 
, при этом диспак конкретно «распухал»  в некоторых местах. 

смысл таблички - в том, что работы эти должны были считаться только под определенными шифрами, для того и была возможность эти шифры заносить/удалять.

если задача идет под шифром из таблички _и_ в ней есть раздел паспорта «ГРИФ», то выдача на АЦПУ начинает «прошиваться» строками ромбов с указанием даты, времени, шифра, машины, числа листов и номера листа.
что происходит с выдачей на перфоратор - не знаю, не проверял, а вот «прошитые» выдачи мне удавалось из диспака получать. :)

возможно, где-то велся отдельный учет таким образом напечатанного - возможно, в других полях вот этой самой таблички :)

насколько это полное и правильное восприятие - сие мне неведомо, только мои эксперименты… :) 

dol@

3 окт. 2025 г., в 10:36, Leo B. <leo...@gmail.com> написал(а):

Чтобы посмотреть обсуждение, перейдите по ссылке https://groups.google.com/d/msgid/besm6/cdb74c2e-5fcd-425c-868b-4441244c6f31n%40googlegroups.com.

Leo B.

unread,
Oct 3, 2025, 1:13:55 PMOct 3
to БЭСМ-6
О, спасибо!  Я не знал, что кроме раздела паспорта, ещё было нужно, чтобы шифр был из секретного списка.
Старый нерезидент, в котором есть слова "НАЧАЛО УЧТЕНЫХ ЛИСТОВ" (sic) в коде выходного потока, и наверное, есть и код для печати тех ромбов, у нас на 2053 лежит, но успешно дизассемблировать его не удаётся: адреса в ДИСП70, на которые он ссылается, уже другие.  И по прочим признакам видно, что Диспак в С. Бору был собран без ЭФ=1. 

Интересно, что за Э50 141 сразу следуют э/к для работы с паролями на шифр. Их явно заводили в составе одной группы изменений.

А ещё в РУКАВАх-93 упоминается

Подтверждение пароля на доступ к системным МД
---------------------------------------------

ИР 050 А , где Аисп = 126 (8)

Входная информация:
См:    1 - 48 р = 1777000000000000.

Данный экстракод смысла не имеет.

Похоже, потом Э50 126  переиспользовали (тоже в экст.bemsh) для чего-то, связанного с захватом дисков, но в более новой документации он не описан.

Leo

Василий Долматов

unread,
Oct 3, 2025, 2:07:34 PMOct 3
to be...@googlegroups.com


3 окт. 2025 г., в 20:13, Leo B. <leo...@gmail.com> написал(а):

О, спасибо!  Я не знал, что кроме раздела паспорта, ещё было нужно, чтобы шифр был из секретного списка. 

это явно поздний апдейт… когда я экспериментировал - этого не требовалось :)

Старый нерезидент, в котором есть слова "НАЧАЛО УЧТЕНЫХ ЛИСТОВ" (sic) в коде выходного потока, и наверное, есть и код для печати тех ромбов, у нас на 2053 лежит, но успешно дизассемблировать его не удаётся: адреса в ДИСП70, на которые он ссылается, уже другие.  И по прочим признакам видно, что Диспак в С. Бору был собран без ЭФ=1. 
а вот когда появился ЭФ - уже ничего проверять на живой системе не получалось… нужно было пересобирать весь диспак и брать «пультовое время»… оно того не стоило, ПМСМ :)
Чтобы посмотреть обсуждение, перейдите по ссылке https://groups.google.com/d/msgid/besm6/77e84044-79fa-4de6-afa1-f7a3c71717e7n%40googlegroups.com.

Michael Yaroslavtsev

unread,
Oct 3, 2025, 3:39:55 PMOct 3
to be...@googlegroups.com
On Fri, Oct 3, 2025 at 1:00 AM Василий Долматов <vdol...@gmail.com> wrote:
ага, ГРИФ родимый… :) 

деталей я, естественно, не знаю ( :) ), в свое время из любопытства копался, но до конца не раскапывал… :) 

остановился на такой версии:

вся эта тряхомудия - для ведения закрытых расчетов (в основном употреблялась во ВНИИЭФ - по крайней мере делалась по его запросу, AFAIR, в последующих версиях все это (и явно что-то ещё :) ) было вынесено в условную компиляцию по переменной «ЭФ=1» 
, при этом диспак конкретно «распухал»  в некоторых местах. 

смысл таблички - в том, что работы эти должны были считаться только под определенными шифрами, для того и была возможность эти шифры заносить/удалять.

если задача идет под шифром из таблички _и_ в ней есть раздел паспорта «ГРИФ», то выдача на АЦПУ начинает «прошиваться» строками ромбов с указанием даты, времени, шифра, машины, числа листов и номера листа.
что происходит с выдачей на перфоратор - не знаю, не проверял, а вот «прошитые» выдачи мне удавалось из диспака получать. :)
И что более важно, выдача идёт на устройства, соответствующие грифу, находящиеся в соответствующих помещениях. 
Чтобы посмотреть обсуждение, перейдите по ссылке https://groups.google.com/d/msgid/besm6/9A20863E-1A5A-41C4-B903-787AF0D2CA1A%40gmail.com.


--
Thanks,
-- Michael
Reply all
Reply to author
Forward
0 new messages