Софт для ДВК/PDP11

[Patron]

Обновление исходников драйвера MY для XXDP+ V2.4/2.5 (Rev A.1).

Похоже, что там есть ошибка:

	CMP	#READ$,XCO(R5)		;READ ERROR?
	BEQ	80$			;YES
	MOV	PC,R0			;ELSE WRITE ERROR
	ADD	#MWTERR-.,R0		;
	EMT	44			;
	RETURN				;RETURN
80$:	MOV	PC,R0			;WRITE ERROR
	ADD	#MWTERR-.,R0		;
	EMT	44			;
90$:	RETURN				;RETURN

---------- Post added at 17:31 ---------- Previous post was at 16:05 ----------

Пропатчена программа UPDAT

При выполнении команды CREATE программа UPDAT вылетает:

035112: BIT   #1, @#177572          ; 035114:000001 -> 177572:
BUS ERROR: Чтение по пустому адресу: 177572
011712: MOV   @#172352, -(SP)       ; 172352:       -> 023220:013274
BUS ERROR: Чтение по пустому адресу: 172352
000006: HALT

[form]

Похоже, что там есть ошибка

Видно неотрежактировал после копирования.

При выполнении команды CREATE программа UPDAT вылетает

Да, писал уже что надо еще много где патчить (если вообще возможно).

[form]

Похоже, что там есть ошибка

Обновление драйверов MY для XXDP+ V2.4/2.5 - исправлен вывод ошибок.

[form]

Добрался поковырять утилиту UPDAT. В процессе ковыряния выяснилось следующее:

• UPDAT в XXDP+ V2.5 не содержит ошибки, он в явном виде предназначен для запуска в XM мониторе (об этом говорит первая запись файла, записывающая 10000 по адресу 52)
• UPDAT в ТМОС-2 не столько пропатчен, сколько просто урезан в функционале. Не знаю критично ли это где-либо при работе в расширенном мониторе.

Сделал утилиту UPDAT которая сама себя патчит если нет MMU и работает как обычно если есть, в связи с чем обновился образ MY XXDP+ V2.5 (попутно драйвер MY обрезан до используемого размера).

.BO MY:/FO
 
 
MEMORY MANAGEMENT UNIT NOT FOUND
 
 
 
BOOTING UP XXDP-SM SMALL MONITOR
 
 
XXDP-SM SMALL MONITOR - XXDP V2.6
REVISION: E0
BOOTED FROM MY0
28KW OF MEMORY
NON-UNIBUS SYSTEM
 
RESTART ADDRESS: 152010
TYPE "H" FOR HELP
 
.R UPDAT
UPDAT .BIC
 
UPDAT - XXDP V2 UPDATE UTILITY REVISION G
RESTART: 004140
 
*ZERO MY1:
USER DATA ON MY1 WILL BE DESTROYED!
PROCEED?(Y/N/CR=N)Y
 
*CREATE MY1:
 
*PIP MY1:=MY0:
XXDPXM.SYS
XXDPSM.SYS
DRSXM .SYS
DRSSM .SYS
DIR   .SYS
DB    .SYS
DD    .SYS
DL    .SYS
DM    .SYS
DR    .SYS
DU    .SYS
DY    .SYS
LP    .SYS
MM    .SYS
MS    .SYS
MU    .SYS
MY    .SYS
DATE  .SYS
DUSZ  .SYS
HELP  .TXT
UPDAT .BIC
 
*BOOT MY1:
 
 
MEMORY MANAGEMENT UNIT NOT FOUND
 
 
 
BOOTING UP XXDP-SM SMALL MONITOR
 
 
XXDP-SM SMALL MONITOR - XXDP V2.6
REVISION: E0
BOOTED FROM MY1
28KW OF MEMORY
NON-UNIBUS SYSTEM
 
RESTART ADDRESS: 152010
TYPE "H" FOR HELP
 
.

---------- Post added at 21:48 ---------- Previous post was at 20:39 ----------

Обновление драйвера MY для XXDP+ V2.4/2.5. Версия A3. Функционально не отличается, код слегка укорочен, чтобы можно было впихнуть драйвер в 1 блок. Обычным LINK'ом не получится, позже выложу програмку которая позволяет сделать. Собранный вариант в 1 блок прилагается.

[form]

Обновил образ MY с XXDP+ V2.5. Внутри драйвер A3 длиной в 1 блок и UPDAT, работающий без MMU. Попутно нашел ошибку в E11 плугине MY, надо уже переписать наверное его...

---------- Post added at 16:24 ---------- Previous post was at 14:34 ----------

Обновился IOSCAN V4.0. Добавился вариант для XXDP/XXDP+. Также магнитофонный загрузчик включен в пресобранные варианты.

---------- Post added at 17:45 ---------- Previous post was at 16:24 ----------

IOSCAN для XXDP длиной в 1 блок добавлен в образ MY...

[form]

Программа предназначена для запуска из стартового файла RT-11 или TSX-Plus.
Программа позволяет определить тип терминала, установить параметры изображения и настроить параметры, зависящие от типа терминала (SET EDIT, SET SL), а также включить окна в TSX-Plus.

При запуске в TSX-Plus и RTEM-11 программа определяет тип терминала по системным настройкам и использует его (если явно не задан опрос терминала параметром /INQUIRE или конкретный тип терминала).

В RT-11 V5 и TSX-Plus программу можно запускать командой TTSET [параметры] (подразумевается, что программа лежит на системном устройстве).
В ранних версиях RT-11 программа запускается командой R TTSET. При этом в RT-11 V5.1/TSX-Plus V6.01 и более старых системах при отсутствии параметров, указанных в командной строке, программа попросит ввести параметры.
В более новых системах при отсутствии параметров командной строки подразумевается /EDIT.

Поддерживаемые параметры:

• /DARK - Включить темный фон/светлый текст (обычный режим).
  Параметр доступен только для терминалов, совместимых с VT100.
• /EDIT - Установить редактор в соответствии с типом терминала.
  Параметр всегда включен (он нужен только для старых систем чтобы было что написать в качестве параметра при запуске).
• /INQUIRE - Автоматически определить тип терминала.
• /LIGHT - Включить светлый фон/темный текст (инверсный режим).
  Параметр доступен только для терминалов, совместимых с VT100.
• /NARROW - Включить режим 80 колонок.
  Параметр доступен только для терминалов, совместимых с VT100.
• /SANE - Привести терминал в порядок (выключить графический режим, включить английский язык, выключить альтернативный режим, разрешить скроллинг всего экрана итд).
• /SL - Включить редактирование ввода (SL).
  В RT-11 опция работает только если драйвер SL установлен в системе.
• /TEST - Тестовый режим.
  Программа печатает тип терминала и список команд которые должны быть выполнены для заданных параметров.
• /VT100 - Установить тип терминала VT100.
• /VT200 - Установить тип терминала VT200.
  В RT-11 ничем не отличается от /VT100.
• /VT52 - Установить тип терминала VT52.
• /WIDE - Включить режим 132 колонок.
  Параметр доступен только для терминалов, совместимых с VT100.
• /WINDOW - Включить окна в TSX-Plus.

Параметры /INQUIRE, /VT100, /VT200 и /VT52 взаимоисключающие.
Параметры /DARK и /LIGHT взаимоисключающие.
Также взаимоисключающими являются параметры /NARROW и /WIDE.

Если тип терминала совместим с VT52, VT100 или VT200, в TSX-Plus выдается команда SET TT для установки соответствующего типа терминала.

Для установки редактора по умолчанию выдается команда SET EDIT в соответствии с типом терминала: KEX (RT-11XM/XB/ZM/ZB) или KED для VT100-совместимых терминалов, K52 для VT52-совместимых терминалов, EDIT для остальных типов терминала, а также в случае отсутствия KEX/KED/K52 на системном диске.

Для включения SL выдается команда SET SL ON если тип терминала совместим с VT52, VT100 или VT200. При этом в RT-11 предварительно выдается команда SET SL VT52 или SET SL VT100.

Для включения окон в TSX-Plus в прошлых версиях программы использовалась команда SET WINDOW ON. Начиная с TTSET версии 6.0, вместо этого используются системные вызовы. Это позволяет разрешить пользователю самостоятельно манипулировать окнами без необходимости давать ему привилегию SYSGBL (программа TTSET в этом случае должна быть установлена в системе командой INS ADD SY:TTSET/PRIV=(NODEBUG,SYSGBL).

В RTEM-11 и TSX-Plus программа включает ввод букв нижнего регистра.

В RTEM-11 программа не меняет тип терминала, установленный в RSX-11.

Программа молча игнорирует параметры которые не поддерживаются в данной системе или недоступны для данного типа терминала.

В прошлых версиях TTSET в RT-11 (если это не RTEM-11) автоматически включалось автоопределение терминала. Начиная с TTSET версии 6.0 нужно явно задать параметр /INQUIRE. Если тип терминала не задан явно и не определяется из настроек TSX-Plus и RSX-11 (в RTEM-11), включается автоопределение типа терминала.

В TTSET версии 6.1 если автоопределение типа терминала с помощью <ESC>Z не сработало, делается попытка определить терминал с помощью ANSI последовательности <ESC>[c. Этот вариант работает в tmux.

Возможные проблемы:

• В RT-11XM V4 и старее если на системном диске будет обнаружен файл KEX.SAV - будет выдана команда SET EDIT KEX которая не поддерживается в этих системах.
• В ФОДОС В3.0 (возможно и в других версиях) нет команды SET EDIT K52.
• В TSX-Plus не проверяется наличие поддержки SL в системе.
  Не проверял как реагирует система без поддержки на команду SET SL ON.
• В RT-11 программа надеется что драйвер SL поддерживает команды SET SL VT52 и SET SL VT100. В дистрибутивном драйвере от RT-11 V5.6 и новее, а так же в советском варианте эти команды не поддерживаются. Годится полноценный SL из RT-11 V5.4G или собранный вручную с нужными опциями (в RT-11 V5.7 source kit есть исходники).
• В tmux программа не может определить тип терминала. Возможно tmux реагирует только на ANSI вариант запроса <ESC>[c и не реагирует на классический <ESC>Z. Проверю на досуге.
• Программа TTSET использует запросы .MRKT и .CMKT. Если используется SJ/SB монитор без поддержки таймера, автоопределение терминала может подвиснуть если терминал не ответил ни на один из вариантов опроса.

.TTSET /INQ/SL/WIN/TEST 
?TTSET-I-Terminal type is VT200 series
?TTSET-I-The following commands would be executed:
  SET EDIT KED
  SET TT VT200
  SET SL ON
  SET WINDOW ON NARROW DARK

.

UPD: V6.1 - исправлены мелкие ошибки, добавлена возможность определения терминала с помощью ANSI ESC-последовательности. Возвращено старое поведение: если тип терминала не определился из системных настроек и не указан явно, включается режим автоопределения.

UPD: V6.2 - добавлена проверка типа терминала при установке ANSI атрибутов

UPD: V7.0 - возвращена команда SET WINDOW в TSX-Plus (тип терминала должен быть установлен до включения окон)

UPD: V7.1 - поддержка типа терминала PC3XX

UPD: V7.2 - опция приведения терминала в нормальный режим

[Advertiser]

[AFZ]

form, а я возвращаюсь к TSX. Почему драйвер DU (или какой, не помню) такой толстый, что после него не остается места в нижних 40К? Не получится ли его разбить на два? По типу того, как был сделан драйвер LD в RT-11: вызванный LD, вычисляет новый дисковый адрес и переходит к драйверу того диска, на котором находится этот логический диск. А здесь так не получится? В физическом драйвере расположить только запуск физической операции обмена и обслуживание окончания операции, не думаю, что это потребует много кода. А все остальное - вычисление дисковых адресов, номеров устройств и все связанные с этим таблицы и поля перенести в логический драйвер, который можно будет сделать MAPH. Не выйдет?

[form]

Почему драйвер DU (или какой, не помню) такой толстый, что после него не остается места в нижних 40К?

Я бы не сказал, что такой уж он большой - 340. слов всего. Какой-нибудь DHU/DHV раз в 7-8 больше жрут, не говоря уже о любом магнитофонном полноценном драйвере... И тем не менее, у меня одновременно и DU и MU и DHV и DZQ и 5 DLV11... MU входит только без поддержки файловой системы, но для BUP и не требуется...

.SH DEV
        Active          Handler  Handler  Handler
Device    I/O   Status  V. base  P. base   size     CSR    Vector
------  ------  ------  -------  -------  -------  ------  ------
  TT        0   000004   
  LD        0   102446   
  CL        0   016057   061550   000000    512  
  DU        0   102450   112566   000000    340    172150  154
  MU        0   017060   113312   000000    410    174500  260
  EQ        3   007061   120000   073370   3528    174440  120
  LP        0   030003   120000   072371    406    177514  200
  NL        0   000025   120000   072370     60  
  VM        0   102447   114144   000000    426  

.

---------- Post added at 19:29 ---------- Previous post was at 19:26 ----------

к драйверу того диска, на котором находится этот логический диск

То есть кроме уже существующего DU сделать к нему довесок который бы на него ссылался?

Не выйдет?

Было бы желание изучить вопрос, а сделать все можно Борьба с оверлеями в 2.11BSD в этом плане весьма поучительна - там можно фактически любой драйвер выгнать из базы и загнать в оверлей, включая тот с которого система грузится и даже терминал

---------- Post added at 19:32 ---------- Previous post was at 19:29 ----------

Взможно правда в 6.01 DU больше занимает - там вроде не было еще регионов для устройств куда часть драйвера улетает как это сделано в новых RT-11. Под рукой нету готового к запуску чтобы посмотреть...

---------- Post added at 19:33 ---------- Previous post was at 19:32 ----------

Но ив 6.01 у меня проблемы с 40Kb начинались только когда все 17 терминалов пытался запустить да кучку CL, да... но при том без MU - он там не пойдет просто...

[AFZ]

Но ив 6.01 у меня проблемы с 40Kb начинались только когда все 17 терминалов пытался запустить да кучку CL, да... но при том без MU - он там не пойдет просто...

Ну, так разобраться, кто там жрет память в нижних 40 К и переделать соответствующие дровишки, чтобы бОльшую часть загнать в MAPH.

Кстати, обратил внимание, бОльшая часть TSX оттранслирована с /ENABLE:AMA, т.е. вместо метода адресации 67 везде стоит 37, вероятно, для облегчения отладки. Что, кстати, сильно нагружает реальный процессор во время линковки - "думает" ДВК над этой линковкой вполне конкретно. По эмулятором этого, естественно, не заметишь.

[form]

Ну, так разобраться, кто там жрет память в нижних 40 К и переделать соответствующие дровишки, чтобы бОльшую часть загнать в MAPH.

NOMAPH и NOSET - наследство от драйверов RT-11 из которых все сделано с минимальными переделками. Проще не переделать, а с нуля написать так, чтобы можно было в MAPH загнать. Только кто этим будет заниматься?
Мне оно не критично - во-первых нет проблемы с 40Kb несмотря на просто огромнейшую с точки зрения пожирания нижней памяти конфигурацию, да и TSX для меня не основная система...

---------- Post added at 12:20 ---------- Previous post was at 11:47 ----------

Касаемо TSX и того же DU есть задача интереснее: в связи с тем, что TSX в отличие от RT-11 не поддерживает номера устройств больше 7 - сделать драйвер который позволял бы получить доступ к остальным разделам DU