http://www.kpxx.ru/kbaht4c/Софт/MIM/
Когда-то он и был под E11, но сейчас крутится под SimH.
Я их не запускал после переезда моего роутера вместе со стаканом. Будет время - прокину ethernet через пол страны - подниму.
Или запустить RTEM - он принудительно включает чтобы не подвиснуть потом в кеде :)Код:SET LOW
.GTIM использует двухсловный EMT блок, во втором слове адрес буфера.
В коде этого никак не отражено.
Это не одно и тоже - это позволяет сделать то же самое - узнать размер с точностью до байта.
При этом никаких цепочек считать не надо - информация доступна сразу при считывании аттрибутов файла.
- - - Добавлено - - -
За парой исключений впрочем: хрен работает на той же машине что и стакан и TSX-Plus крутится на самом роутере :)
Что-то реально интересное, хотя и ОТ.
Интересно, что в Миме ftp работает раз в 2-3 медленнее, чем в стакане, а проц раз в 10 быстрее. Какой-то парадокс.
Благодарю Вас, помогло. Но почему-то раньше без этого работало.
Отражено, иначе как бы оно работало в 19 случаях из 20?
Первый MOV и кладет этот адрес.Код:mov r0,-(sp) ; Stack address of space on stack
mov #17*256,-(sp) ; 17 = 021 = GETTIM - Get Time
Нo до юзера это практически никак не доходит. :(
А вот хрен не работает, зависает при подключении. Другие просто сразу отпадают. :) Только стакан пока ещё стоит, но шатается. :)
Просто по умолчанию на всех терминалах разрешено, а когда я захожу - у меня в стартовом файле запрещается, и в таком состоянии терминал остается :)
первый MOV кладет адрес EMT блока в R0, в первом слове блока должен быть код (он записывается далее), во втором - адрес буфера (второе слово не инициализируется).Код:RSX-11M-PLUS V4.6 BL87 [1,54] System CTAKAH
22-SEP-21 23:42 Logged on Terminal TT53: as OIS70
Good Evening
,;,
O(o o)O
+---ooO-----------Ooo----------------------------------------------+
| # # # ## # |
| # ## ## # |
| #### #### #### # # ### # ### # ### # ### ### |
| # # # # # # ### # # # # # # # # # # # # |
| # # # # # # # # # # # # # # # # ##### |
| #### #### #### ### ### # ### # # ### ### # # # |
| # # ### |
| # # CTAKAH:: RSX-11M-PLUS V4.6 |
+------------------------------------------------------------------+
Last interactive login on Wednesday, September 22, 2021 20:51:18 (TT52:)
Last batch login on Saturday, March 9, 2019 11:59:20
>@LB:[1,2]SYSLOGIN.CMD
>SET /NOLOWER=TI:
>@ <EOF>
>SET HOST XPEH
Welcome to OpenVMS (TM) VAX Operating System, Version V7.3
Username: GUEST
,;,
O(o o)O
+---ooO-----------Ooo------------------------------------------------+
| # # # W E L C O M E T O |
| # ## ## |
| #### #### #### # # ### # ### #### # # ### # # |
| # # # # # # ### # # # # # # # # # # # # |
| # # # # # # # # # # # # # # # # |
| #### #### #### ### ### # ### # ##### # # ### |
| # # # |
| # # XPEH:: OpenVMS VAX V7.3 #### |
+--------------------------------------------------------------------+
Last interactive login on Saturday, 13-FEB-2021 13:44
$
Так уж принято - мерять все в блоках в этих системах. А в блоках все показывается - как используемое пространство так и выделенное.
Извиняюсь, перепутал хрен с безымянным сервером TSX+, который подвисал при подключении. Подумал про него "вот хрен-то" и получилась накладка. :) В HECnet не заходил.
Что-то не понимаю вас - не теряйте формы! Вот опять мой код с подробными комментариями.
И, повторю, это работает почти всегда. Даже с дебаггером проверил. Теперь почти уверен, что проблема не в этом коде, а в каком-то другом. Здесь все правильно. Cтранно, что англичанин что-то тут мудрил про локальный стек. В любом случае благодарю вас, нашли время на этот код посмотреть.Код:cmp -(sp),-(sp) ; выделяем 4 байта для данных таймера
mov sp,r0
mov r0,-(sp) ; записываем указатель на эти 4 байта в emt-блок вторым словом
mov #17*256,-(sp) ; 17 = 021 = GETTIM - Get Time - 1-е слово emt-блока
mov sp,r0 ;адрес emt-блока заносим в R0
emt 253 ;=0375
cmp (sp)+,(sp)+ ; Drop command and address
mov (sp)+,r1 ; Get 50Hz/60Hz tick to r1:r0
mov (sp)+,r0
- - - Добавлено - - -
Выше в теме form давал ссылки. Cтерва, хрен и прочие - это, как вам уже писалось, сервера. А зачем тратить время на настройки и подгонки, если есть готовые хорошие системы? Вам никто вроде не мешает поставить свой сервер или, например, извиняюсь, пойти и заняться физкультурой.
Отлично работает.
Только там надо Enter нажать - так уж устроено все в TSX+ - иначе просто будет таймаут.
Да, невнимательно посмотрел. Все ок.
Ну чтобы посмотреть что именно вызвало падение можно воспользоваться командой E.
Или еще лучше - загрузить SD и запустить - тогда SD отловит момент падения и предоставит всю информацию в удобном виде (на картинке код - мусор, единственное что я сделал - записал 0 по адресу 1000 и стартовал с него [HALT -> трап по 4]).
Если есть исходники (или OBJ файлы) - можно заставить SD распознавать имена символов (правда при этом он будет все похожие цифры тоже распознавать как эти самые символы).
В TSX+ можно запустить программу как RUN/DEBUG чтобы отлавливать косяки, но там будет что-то похожее на обычный ODT, а он на фоне SD смотрится бледно. Да и не помню если честно отлавливает ли он падения :)
Кстати о примере, если уж используем стек, то можно сэкономить пару слов:
:)Код:MOV SP,R0
CMP -(R0),-(R0)
MOV R0,-(SP)
MOV #21*400,-(SP)
EMT 375
MOV (SP)+,R1
MOV (SP)+,R0
Обновился shared образ для RTEM.
Теперь в JOAT десятичные версии в RSX-11 поддерживаются полноценно (в прошлом варианте работало только отображение, а ввод работал только если номер версии не содержал циферок 8 и 9).