ДВК (и всё, что с ними связано)

Загрузка RT-11 через порт её системного терминала ( продолжающаяся при CPS 960 ровно 1 минуту ) довольно поучительна :)

Сообщения на экране того самого системного терминала, через порт которого идут запросы чтения/записи драйвера псевдодиска, вполне обычны:

Код:

.BO/FORE HX0: HX Boot-I-Cold boot.. HX DSK/TTY multiplexer v1.0 2012 SL V08.00 [SW] Сторожевых С.В. 1988 RT-11SB (S) V05.07 C .SET USR NOSWAP .SET EDIT K52 .SET TT FORM .SET SL ON .

Но вот сами запросы - довольно любопытны:

Код:

HX: READ : uUnit[0] ; uBlock[0000] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0000] ; uWordCount[0001] HX: READ : uUnit[0] ; uBlock[0002] ; uWordCount[1024] HX: READ : uUnit[0] ; uBlock[0006] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0048] ; uWordCount[0137] HX: READ : uUnit[0] ; uBlock[0051] ; uWordCount[0167] HX: READ : uUnit[0] ; uBlock[0080] ; uWordCount[0163] HX: READ : uUnit[0] ; uBlock[1400] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[1400] ; uWordCount[0610] HX: READ : uUnit[0] ; uBlock[0047] ; uWordCount[0232] HX: READ : uUnit[0] ; uBlock[0055] ; uWordCount[10932] HX: READ : uUnit[0] ; uBlock[0050] ; uWordCount[0159] HX: READ : uUnit[0] ; uBlock[0053] ; uWordCount[0112] HX: READ : uUnit[0] ; uBlock[0049] ; uWordCount[0074] HX: READ : uUnit[0] ; uBlock[0052] ; uWordCount[0177] HX: READ : uUnit[0] ; uBlock[1556] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0141] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[1542] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0154] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0155] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[1547] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0156] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[1551] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0143] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0159] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[1338] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0136] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0006] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0143] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0144] ; uWordCount[2560] HX: WRITE: uUnit[0] ; uBlock[0144] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0140] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0006] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[1336] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0110] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0112] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0110] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0112] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0110] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0159] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0112] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0160] ; uWordCount[2304] HX: WRITE: uUnit[0] ; uBlock[0160] ; uWordCount[1280] HX: READ : uUnit[0] ; uBlock[0104] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0160] ; uWordCount[1127] HX: READ : uUnit[0] ; uBlock[0110] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0006] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0159] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0112] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0160] ; uWordCount[2304] HX: WRITE: uUnit[0] ; uBlock[0160] ; uWordCount[1280]

Особенно хорош запрос на чтение одного слова из нулевого блока загружаемого диска :)

...

Теперь посмотрим, что сидит в памяти:

Код:

.SH MEM Address Module Words ------- ------ ----- 160000 IOPAGE 4096. 156474 HX 354. 134724 RMON 4532. 130406 SL 1127. 120342 USR 2066. 001000 ..BG.. 20337. .

Код:

HX: READ : uUnit[0] ; uBlock[0134] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0136] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0006] ; uWordCount[0512] HX: READ : uUnit[0] ; uBlock[0271] ; uWordCount[0256] HX: READ : uUnit[0] ; uBlock[0272] ; uWordCount[3072] HX: READ : uUnit[0] ; uBlock[0295] ; uWordCount[1559] HX: READ : uUnit[0] ; uBlock[0055] ; uWordCount[6400]

Вложений: 1

Ну и дела!

Оказывается, последняя версия DESS - имеет ещё и режим HEX:

Код:

Block=000000/00000. Adres=000061 Type=Hex Edit HD0:HX.SYS Size=00004. 000/ 36 32 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *62..............* 020/ 00 00 08 F8 00 00 00 00 00 00 00 00 00 00 00 00 *...x............* 040/ 01 00 00 02 00 00 00 00 DE 06 E0 02 40 06 F3 85 *........^.`.@.s.* 060/ 04 00 E0 04 00 02 E0 00 00 00 00 00 00 00 00 00 *..`...`.........* 100/ 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0D 0A *................* 120/ 48 58 20 44 53 4B 2F 54 54 59 20 6D 75 6C 74 69 *HX DSK/TTY multi* 140/ 70 6C 65 78 65 72 20 20 20 76 31 2E 30 20 20 32 *plexer v1.0 2* 160/ 30 31 32 0D 0A 00 00 00 00 00 00 00 00 00 70 FF *012...........p.* 200/ A0 00 DF 0B 34 00 0B 02 C0 11 C0 65 C4 FF 05 01 * ._.4...@.@eD...* 220/ 1F 94 76 FF DF 8B 74 FF FD 80 C8 8B F9 02 A1 00 *..v._.t.}.H.y.!.* 240/ 87 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *................* 260/ 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *................* 300/ 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *................* 320/ 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *................* 340/ 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *................* 360/ F0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 *p...............* Стек : 000000 000000 000000 000000 000000 000000 000000 Макро-11:

Кстати, для получения в эмуляторе текстовой копии экрана терминала - нужно нажать <PrintScreen>

Цитата:

Сообщение от Patron

Ну и дела!

Оказывается, последняя версия DESS - имеет ещё и режим HEX:

Я кстати на последнюю системную дискету для УКНЦ именно эту версию залил!
Спасибо. )))

Вложений: 2

Так как процессор 1801ВМ1 не поддерживает команды EIS и FIS, то при появлении ДВК-2 с процессором 1801ВМ2, который эти команды поддерживает - у пользователей ДВК возникла проблема совместимости, решить которую был призван драйвер EM.SYS, эмулирующий команды EIS и FIS.

Код:

; Ныс И.Д. ; Московский ; Инженерно-Физический ; Институт ; каф. 17 ; 6 Марта 1985 г. - начало работы. ; 25 марта 1985 г. - конец работы. ; 17 апреля - изменена установка признаков DIV. ; 23 апреля - изменен алгоритм команды MUL. ; 10 мая - прогонка FIS/EIS тестов, коррекция особых ситуаций. ; 2 ноября - переходы по таблице - PIC код, добавлена шапка драйвера ;01 31 окт. 1988 - эмулятор FIS для машины с FPP. ; При работе над эмулятором использовались ; - эмулятор Паскаля ; - подпрограммы Фортран-библиотеки ; - описание процессора M2 ; - эмулятор FIS(FPP) из Модулы-2 ; Модуль эмулирует наборы команд ; EIS: MUL 070RSS 0.35- 0.5 MS ; DIV O71RSS 0.6 ; ASH 072RSS 0.3 - 0.35(вправо) ; - 0.4 (влево) ; ASHC 073RSS 0.3 - 0.5 (вправо) ; - 0.61(влево) ; FIS: FADD 07500R 0.9 - 1.3 MS ; FSUB 07501R - " " - ; FMUL 07502R 1.0 -1.6 ; FDIV 07503R 1.6 ; ; Времена для процессора с быстродействием ; около 250000 команд регистр - регистр в ; секунду, цикл памяти - 500 наносекунд ; После прерывания по резервной команде, дол- ; жна осуществляться передача управления ; в точку $EMUL. ; Управление передается в точку $ILCOD, ; Если эммулятор не способен обработать преры- ; вание ( вызванное командой, не входящей в ; FIS или EIS) ; Для исключения FIS или EIS набора из эмуля- ; тора, поставьте ";" перед определениями со- ; ответствующих символов в следующих строках ; Эмулятор FIS для процессора с отдельным процессором ; плавающей запятой включен Мухамеджановым Алексеем ; 01 ноября 1988 г., (C) фирма "МИГ" кооп. <1988> ; Команды XOR, SOB включены Яковлевым Михаилом ; 12-декабря-86 г. МИФИ, каф. 25 ; ; XOR - 0.3 MS ; SOB - 30-50 MKS (в зависимости от вложенности)

У меня обнаружились исходники двух версий этого драйвера - "общеизвестной" v1.0 и последней - v1.1 ( в последней версии добавлена возможность генерации драйвера с эмуляцией команд FIS при помощи команд FPP ).

При сравнении этих исходников:

EM.SYS v1.0 (фрагмент):

Код:

.TITLE EM ; ДРАЙВЕР-ЭМУЛЯТОР FIS/EIS НАБОРА КОМАНД. ; КОМАНДЫ SET EM ON/OFF ИЗ TH ДРАЙВЕРА БЕЛИЦКОГО Е. .SBTTL MACROS AND DEFINITIONS .MCALL .DRDEF, .PRINT, .EXIT, .WAIT .DRDEF EM, 377, 0, 0, 0, 10 ; Имя, Код, Тип, Размер, Адрес, Вектор JSW=44 ; Слово описания SYSPTR=54 ; Указатель на начало монитора EIS$=400 ; Бит расширенного набора CONFIG=370 ; Смещение слова конфигурации SYSGEN=372 ; Слово параметров EIS=1 ; Включить EIS FIS=1 ; Включать FIS ; SM3=1 ; Включить SOB, XOR .SBTTL INSTALATION VERIFICATION .ASECT .=200 NOP RETURN ; Определение состояния драйвера FINDRV: MOV PC,R0 ADD #DEVNAM-.,R0 MOV PC,-(SP) ADD #AREA-.,(SP) EMT 342 ; PIC .DSTATUS BCS O.BAD MOV AREA+4,R1 O.GOOD: TST (PC)+ O.BAD: SEC RETURN DEVNAM: .RAD50 /EM / AREA: .BLKW 4 EMON: .ASCIZ /?EM-I-Аlready running/ IMSG: .ASCII /?EM-I-V1.0 BY I.NYS, 116-20-42/<15><12> .ASCII /OPTIONS: / .IIF DF EIS .ASCII / EIS/ .IIF DF FIS .ASCII / FIS/ .IIF DF SM3 .ASCII / SOB XOR/ .BYTE 0 .EVEN .IIF GT,<.-400>, .ERROR .-400; INSTALL CODE TO BIG!

EM.SYS v1.1 (фрагмент):

Код:

.TITLE EM ; Драйвер-эмулятор FIS/EIS набора команд. ; Команды SET EM ON/OFF из ТН драйвера Белицкого Е. .SBTTL MACROS AND DEFINITIONS .MCALL .DRDEF, .PRINT, .EXIT, .WAIT .DRDEF EM, 377, 0, 0, 0, 10 ; ИМЯ, КОД, ТИП, РАЗМЕР, АДРЕС, ВЕКТОР. JSW=44 ; Слово описания SYSPTR=54 ; Указатель на начало монитора EIS$=400 ; Бит расширенного набора CONFG1=300 ; Смещение 1 слова конфигурации CONFIG=370 ; Смещение 2 слова конфигурации SYSGEN=372 ; Слово параметров ; EIS=1 ; Включить EIS ; SM3=1 ; Включить SOB, XOR ; FPP=1 ; Включить FIS на FPP .IF NDF FPP FIS=1 ; Включить FIS .ENDC .IF DF FPP AC0 =R0 AC1 =R1 FPPS =^O1400 FPP$ =^O100 .ENDC .SBTTL INSTALATION VERIFICATION .ASECT .=200 NOP RETURN ; Определение состояния драйвера FINDRV: MOV PC, R0 ADD #DEVNAM-., R0 MOV PC, -(SP) ADD #AREA-., (SP) EMT 342 ; PIC .DSTATUS BCS OO.BAD ; Ошибка .DSTATUS MOV AREA+4, R1 O.GOOD: CMP (PC)+,(PC)+ OO.BAD: TST (SP)+ O.BAD: SEC RETURN L1$: MOV PC, R0 ADD #EMON-., R0 PEX: .PRINT BR O.GOOD EMON: .ASCIZ /?EM-I-Already running/ IMSG: .ASCII /EM V1.1 by I.NYS, MX/<15><12> .ASCII /Options:/ .IIF DF EIS .ASCII / EIS/ .IIF DF FPP .ASCII / FIS(for FPP)/ .IIF DF FIS .ASCII / FIS/ .IIF DF SM3 .ASCII / SOB XOR/ .BYTE 0 .EVEN .IIF GT,<.-400>, .ERROR .-400; INSTALL CODE TO BIG! .SBTTL SET OPTION PARAMETR TABLE .DRSET INFORM, -1, O.INF ; Параметры генерации .DRSET ON,-1,O.ON ; Включить .DRSET OFF,-1,O.OFF ; Выключить .DRSET SYSGEN,NOP,O.SYSG ; SYSGEN .SBTTL SET OPTION PROCESSING ROUTINES O.SYSG: MOV @#SYSPTR,R0 ; Не знаю, будет ли работать с диспетчером BIT #2,SYSGEN(R0) ; MMG$T BNE O.BAD MOVB SYSGEN(R0), 60 RETURN O.ON: CALL FINDRV TST R1 ; Если драйвер уже загружен, BNE L1$ ; напечатать об этом MOV @#SYSPTR, R0 BIS #EIS$,CONFIG(R0) ; включить EIS .IF DF FPP BIT #FPP$,CONFG1(R0) ; Ошибка, если нет FPP. BNE 2$ JSR R0,3$ .ASCIZ /?EM-F-Use FPP/ .EVEN 3$: .PRINT MOV (SP)+,R0; BR O.BAD 2$: .ENDC JSR R1, SETCMD .ASCIZ /$LOAD EM/ .BYTE 200 .EVEN RETURN O.INF: MOV PC, R0 ADD #IMSG-., R0 BR PEX O.OFF: CALL FINDRV TST R1 ; Драйвер загружен? BEQ N.OFF ; Уже нет JSR R1, SETCMD .ASCIZ /$UNLOAD EM/ .ASCIZ /$SET EM OFF/ .EVEN RETURN N.OFF: MOV PC, R0 ADD #NOEIS-., R0 MOV R0, @#10 MUL R0, R0 ; Интересно, есть EIS? MOV @#4, @#10 ; Вектор MOV @#6, @#12 ; Статус BIS #1, @#12 ; С установленным C - разрядом CLC RETURN DEVNAM: .RAD50 /EM / AREA: .BLKW 4 NOEIS: MOV @#SYSPTR, R0 BIC #EIS$,CONFIG(R0) ; Включить EIS RTI ; Передача команд монитору SETCMD: MOV #512, R0 CLR R2 1$: INC R2 MOVB (R1)+, (R0)+ BPL 1$ DEC R2 MOV R2, @#510 BIS #4040, @#JSW CLR R0 .EXIT .IIF GT,<.-1000>, .ERROR .-1000; SET CODE TO BIG!

Возникло ощущение, что перенеся в версии 1.1 DEVNAM и AREA за пределы инсталляционного кода - разработчики стали получать постоянную ошибку инсталляции, что заставило изменить завершение инсталлятора с такого:
v1.0

Код:

MOV PC,-(SP) ADD #AREA-.,(SP) EMT 342 ; PIC .DSTATUS BCS O.BAD MOV AREA+4,R1 O.GOOD: TST (PC)+ O.BAD: SEC RETURN DEVNAM: .RAD50 /EM / AREA: .BLKW 4

на такое:
v1.1

Код:

MOV PC, -(SP) ADD #AREA-., (SP) EMT 342 ; PIC .DSTATUS BCS OO.BAD ; Ошибка .DSTATUS MOV AREA+4, R1 O.GOOD: CMP (PC)+,(PC)+ OO.BAD: TST (SP)+ O.BAD: SEC RETURN

Цитата:

Сообщение от Patron

Так как процессор 1801ВМ1 не поддерживает команды EIS и FIS, то при появлении ДВК-2 с процессором 1801ВМ2, который эти команды поддерживает - у пользователей ДВК возникла проблема совместимости, решить которую был призван драйвер EM.SYS, эмулирующий команды EIS и FIS.

Вот такой выясняется момент с этим драйвером на УКНЦ.

Скрытый текст

Он присутствует на "эталонной" дискете от СЭМЗ - с ситемой - которая поставлялась вместе с УКНЦ. Так вот сообщение при старте - драйвер присутствует (проинсталлирован)
http://savepic.net/2503765.png

Но если посмотреть dir/fu системы - они его словно в последний момент
запихнули и проинсталлировали - ну явно не в первом потоке sys файлов,
http://savepic.net/2493525.jpg
(я молчу что они (например) вообще не удосужились на системную дискету записать ucl из за чего монитор его ищет и всё время ругается,
зато запихнули возможность работы с какой-то базой данных ??? бред)
так вот em.sys воткнули позже остальных, почему? Для перестраховки?
Реально на УКНЦ он нужен или нет?
Версия похоже самая первая.
http://savepic.net/2497621.jpg

[свернуть]

:confused_std:

Цитата:

Сообщение от hobot

Реально на УКНЦ он нужен или нет?

Абсолютно не нужен. 1801ВМ2 сам исполняет команды EIS и FIS (эти правда эмулируются в системной памяти).

Код:

MOV PC, -(SP) ADD #AREA-., (SP) EMT 342

Можно стандартными макросами нагляднее выразить:

Код:

.ADDR #AREA, -(SP) .DSTATUS

Цитата:

Сообщение от Alex_K

Абсолютно не нужен.

выходит перестраховались по незнанию??? это вполне вероятно
там инструкция грамотным языком написана к этим дискетам
целая книга (я фотки в теме софта делал выкладывал), правда
там примитивная самая информация.

Цитата:

Сообщение от hobot

Версия похоже самая первая.

"Самая первая" версия у меня есть - но без исходника, да и кривая какая-то, поэтому ну её..

...

P.S.

С EM.SYS связан один интересный момент.

Если при активированном EM.SYS выполнить команду SH CON, то Resorc тихо вылетит после строчки "Extended Instruction Set (EIS)"

Код:

.SE EM ON .SH CON RT-11SB (S) V05.07 C Booted from HD1:RT11SB USR is set NOSWAP EXIT is set SWAP KMON is set NOIND MODE is set NOSJ TT is set NOQUIET ERROR is set ERROR SL is set ON EDIT is set K52 FORTRAN is set FORTRA KMON nesting depth is 3 Global .SCCA flag is disabled CLI is set DCL, CCL, UCL, NO UCF LSI 11 or PDP 11/03 Processor 56KB of memory Extended Instruction Set (EIS) .

Цитата:

Сообщение от Patron

у пользователей ДВК возникла проблема

Несовместимость новых программ на первых машинах???
А игры несовместимые есть которые без em.sys на ВМ1 не работали ??? )))