Просмотр полной версии : TSX-Plus OS
Привет всем,
вот есть такое дело http://ru.wikipedia.org/wiki/TSX-Plus
скажите кто работал с этой системой, что в ней хорошего что плохого, как она совместима\несовместима с нашими клонами, где взять дистрибутивы и т.д.
Интересует также сравнение с RT-11TS, RSX11M (RSX11M+).
Нашёл пока мануал: https://archive.org/details/bitsavers_decpdp11tslus6.0Corrections_576046
Вот мой сборный пакет c maxoil (А. Забайрацкий) и от form: http://yadi.sk/d/41MmMycGJdR5M (64 Мб)
Все файлы дампов открываются через плагин Patron-а к ТС.
Лично мне нравится тем, что там отмечено, что он может работать под Pro-3xx/Э-85 (есть готовые драйвера).
P.S. Ещё бы М.И. Потемкина потрепать вопросами...
P.P.S. Да, всё это уже раньше тут в разных темах пробегало. Просто компонуем вместе, стягиваем инструкции, рекомендации.
Что то такое есть
http://archive.pdp-11.org.ru/ukdwk_archive/dwkwebcomplekt/tsxp601_Y2k_distrib/
http://zx.pk.ru/showpost.php?p=575937&postcount=200
Источник, уважаемый товарищ form !
anasana, а вот я с яндекса ничего не могу забрать. В целом странное дело - у меня не работают этот и квиповские файло-хранилища ))) Что я делаю не так ))) И майл.ру глючит и не открывается )))
(* сильно подозреваю что если покопаться на форуме уже всё есть! просто сами забыли где что публиковали и по каким темам раскидали )
Было время, я выставлял TSX-Plus (на живом 11/83) в сеть... Сейчас DHV-11 позволяет отдать 4 сессии + DZQ11 еще 2 (+ DLV11-J еще одну, но его пока вытащил из корзины в пользу другой - до которой так и не добрался пока)...
Может как-нибудь снова выставлю :)
Может как-нибудь снова выставлю :)
А как там работало tcp/ip с виртуальными консолями по telnet-у? SLIP какой-то? DECNA или DELQA не потянет?
А как там работало tcp/ip с виртуальными консолями по telnet-у? SLIP какой-то? DECNA или DELQA не потянет?
У меня DELQA. Драйвера есть для всего. Телнет там работает методом замыкания терминальных линий одна на другую - этакая пара tty/pty только физическая :)
У меня сейчас DHV11 (8 портов), DZQ11 (4 порта) и DLV11-J (4 порта) - можно наделать телнетов :)
У меня DELQA. Драйвера есть для всего. Телнет там работает методом замыкания терминальных линий одна на другую - этакая пара tty/pty только физическая :)
У меня сейчас DHV11 (8 портов), DZQ11 (4 порта) и DLV11-J (4 порта) - можно наделать телнетов :)
1)
"DHV11 (8 портов), DZQ11 (4 порта) и DLV11-J (4 порта)" - это ж железные rs232c интерфейсы как я понимаю TSXPlus имеет в своем составе драйвера для них, но вопрос как их выставить в inet? Существует какой-то внешний device rs232c->tcp/ip?
2)
"У меня DELQA. Драйвера есть для всего." - в самом TSXPlus есть драйвер для DELQA? это ж сетевуха как же она представляется в системе в которой можно работать только с символьными и блочными устройствами (ну и еще там с сообщениями какими-то???)??
1)
"DHV11 (8 портов), DZQ11 (4 порта) и DLV11-J (4 порта)" - это ж железные rs232c интерфейсы как я понимаю TSXPlus имеет в своем составе драйвера для них, но вопрос как их выставить в inet? Существует какой-то внешний device rs232c->tcp/ip?
2)
"У меня DELQA. Драйвера есть для всего." - в самом TSXPlus есть драйвер для DELQA? это ж сетевуха как же она представляется в системе в которой можно работать только с символьными и блочными устройствами (ну и еще там с сообщениями какими-то???)??
В инет выставляется, как ни смешно, с помощью TCP/IP for TSX-Plus (http://shop-pdp.kent.edu/) :)
Драйвера идут в составе этого самого TCP/IP. А что до блочности-символьности, так и во всяких линухах-виндовсах все точно также - это до сих пор никому не мешало :)
Ещё патч от form'a
http://zx.pk.ru/showpost.php?p=580768&postcount=21
Ещё патч от form'a
http://zx.pk.ru/showpost.php?p=580768&postcount=21
А я разве не выкладывал дистрибы со всеми патчами?
Впрочем их все-равно надо довести до ума. Как минимум исправить последствия шаловливых ручек советских инженеров (я бы вешал за замену табов на пробелы), а в идеале добавить вызов .CLOSZ - тогда из под RT-11 V5.5 и новее можно будет запускать безболезненно редактор KED без бубна :)
А я разве не выкладывал дистрибы со всеми патчами?
Гляди, что в хламничке "у меня" лежит :
1. http://archive.pdp-11.org.ru/ukdwk_archive/dwkwebcomplekt/tsxp601_Y2k_distrib/
2. http://archive.pdp-11.org.ru/ukdwk_archive/dwkwebcomplekt/y2k_TSXPlus5161/
---------- Post added at 01:09 ---------- Previous post was at 01:08 ----------
Я эти ссылки лепил в шапке темы про y2K
http://zx.pk.ru/showthread.php?t=20864
там ещё есть на то что видимо позже добавлялось уже.
Включил первый раз с осени 11/83... Вроде живое все.
Если вечером не лень будет - выставлю TSX-Plus 6.01 в сеть...
Network Access SW V3.2 BL01 for DS90M
DECserver 90M, Novosibirsk, RU
(c) Copyright 2005, Digital Networks, DNPG, LLC - All Rights Reserved
Visit us at www.digitalnetworks.net
Please type HELP if you need assistance
Local> C BIGSYS_CONS
Password>
Local -010- Session 1 to BIGSYS_CONS on node PDP11.ORG.RU established
Testing in progress - Please wait
Memory Size is 4088 K Bytes
9 Step memory test
Step 1 2 3 4 5 6 7 8 9
Message 04 Entering Dialog mode
Commands are Help, Boot, List, Setup, Map and Test.
Type a command then press the RETURN key: B DU2
Trying DU2
Starting system from DU2
BOOTING UP XXDP-XM EXTENDED MONITOR
XXDP-XM EXTENDED MONITOR - XXDP V2.5
REVISION: F0
BOOTED FROM DU2
124KW OF MEMORY
NON-UNIBUS SYSTEM
RESTART ADDRESS: 152000
TYPE "H" FOR HELP !
.R VMJA??
VMJAB0.BIC
CVMJAB0 ECC/PARITY MEMORY DIAGNOSTIC
11/83 CACHE AVAILABLE
SWR = 000000 NEW = 100200
CSR MAP
CSR 0 1 2 3 4 5 6 7 8 9 A B C D E F
MEMTYPE E E
2044K OF ECC MEMORY
2044K WORDS OF MEMORY TOTAL
MEMORY CONFIGURATION MAP
16K WORD BANKS
1 2 3 4 5 6 7
01234567012345670123456701234567012345670123456701 2345670123
ERRORS
MEMTYPE EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE EEEEEEEEEE
CSR 00000000000000000000000000000000000000000000000000 0000000000
PROTECT PP
1 1 1 1 1 1 1
0 1 2 3 4 5 6
45670123456701234567012345670123456701234567012345 6701234567
ERRORS
MEMTYPE EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE EEEEEEEEEE
CSR 00001111111111111111111111111111111111111111111111 1111111111
PROTECT
1
7
01234567
ERRORS
MEMTYPE EEEEEEEE
CSR 11111111
PROTECT
END PASS #QV 1
Включил первый раз с осени 11/83...
DU2 это SCSI или MFM?
XXDP-XM EXTENDED MONITOR - XXDP V2.5 - тупанул с определением размера памяти, написал 128kW
DU2 это SCSI или MFM?
Это SCSI. Есть еще RQDX3 с MFM, но не подключен.
---------- Post added at 14:30 ---------- Previous post was at 14:20 ----------
CQD-420/TM (http://pdp-11.org.ru/~form/files/pics/1183/modules/CQD-420TM.jpg)
есть TSXPlus 4.6 очепатка! 6.5 правда достать его можно обратившись лично к человеку который его достал у S&H, скоро он выложит его всем желающим а пока только в личном порядке:
After stating that I expected TSX Plus to be available generally to the
collector community this week, I have had a number of folks request
access to TSX plus via private FTP.
Please be a bit patient and wait for me to post it to a new website I'm
in the process of creating. I now have full agreement from S&H to
generally release TSX Plus, COBOL, etc., to the collector community via
a simple download.
BTW: I have converted all of the original documentation, which was in HP
print file format to PDFs for easier and more general use.
Over time I will likely be able to release some of the utilities, etc.
that S&H used internally with TSX plus. Some time ago S&H gave me all
of their RL02 packs and a SMD drive with everything they had related to
the PDP-11 version of TSX. (They have a current version of TSX for X86
systems which is NOT free and is NOT part of this release).
Over time, there may be a project to scan the source listings and
recreate TSX Plus source code. (The source listings are available on
bitsavers.org (pdf/dec/pdp11/tsxPlus/listings/). Unfortunately, we are
missing the MACRO definitions in the source listings. Some of us are
working on that issue. (Note: All of the original PDP-11 source code was
accidentally lost by S&H).
I will also make available any software that other folks submit to me
related to TSX on my website.
Regards.
Lyle
--
Bickley Consulting West Inc.
http://bickleywest.com
"Black holes are where God is dividing by zero"
есть TSXPlus 4.6 правда достать его можно обратившись лично к человеку который его достал у S&H, скоро он выложит его всем желающим а пока только в личном порядке:
4.6 это очень древний...
Но я понял, что речь идет про 6.5 :)
А насчет скоро выложит - он его "скоро выложит" примерно лет 10 уже :D
Добыть 6.5 было бы хорошо...
Это SCSI. CQD-420/TM (http://pdp-11.org.ru/~form/files/pics/1183/modules/CQD-420TM.jpg)
мда бешенная штука... $600
---------- Post added at 09:38 ---------- Previous post was at 09:37 ----------
очепатка! 6.5
мда бешенная штука... $600
Я браз примерно за 300. Второй еще хочу взять - для второй корзины, но пока жаба давит :)
---------- Post added at 14:44 ---------- Previous post was at 14:43 ----------
очепатка! 6.4
последний 6.5 был
а вот посмотрел, то листинги для 6.4 есть а этот действительно 6.5!
правда при запуске tskmon:
.tskmon
?KMON-F-TSGEN was modified without relinking TSKMON
* TSX-Plus Version 6.50 *
Copyright (c) 1980,1981,1982,1983,1984,1985,1986,1987,1988,1989, 1990,1991
an unpublished work by S&H Computer Systems, Inc., Nashville, TN, USA
(S&H) covered by U.S. Patent No. 4,642,756. All rights reserved.
This material contains the valuable properties and trade secrets of S&H
and may not be used except by the express written permission of S&H.
Distributed by S&H Computer Systems, Inc.
Licensed for use on a single computer system at TSX-Plus User
License # = 999-T1S-50000
Line # 0
?MON-F-Invalid channel
Abort location = 047014
.
к стати, возвращаясь в первому посту. На скоко эта система сравнима с RT11TS RSX11M RSX11M+ и RSTS?
к стати, возвращаясь в первому посту. На скоко эта система сравнима с RT11TS RSX11M RSX11M+ и RSTS?
Сравнивать трудно - слишком разные системы с RSTS еще более-менее можно сравнить. В общем случае, считай, многотерминальный, многопользовательский RT-11 в котором на одном терминале может кроме того быть много независимых окон. Есть detached jobs. Права, ограничения, приоритеты.
---------- Post added at 16:17 ---------- Previous post was at 14:57 ----------
Пока до дома не доехал с TSX возиться лень. Запустил RSX-11M-PLUS до того времени - если кому интересно побаловаться на живой машине...
Network Access SW V3.2 BL01 for DS90M
DECserver 90M, Novosibirsk, RU
(c) Copyright 2005, Digital Networks, DNPG, LLC - All Rights Reserved
Visit us at www.digitalnetworks.net
Please type HELP if you need assistance
Local> C BIGSYS_CONS
Password>
Local -010- Session 1 to BIGSYS_CONS on node PDP11.ORG.RU established
Testing in progress - Please wait
Memory Size is 4088 K Bytes
9 Step memory test
Step 1 2 3 4 5 6 7 8 9
Message 04 Entering Dialog mode
Commands are Help, Boot, List, Setup, Map and Test.
Type a command then press the RETURN key: B DU
Trying DU0
Starting system from DU0
RSX-11M-PLUS V4.6 BL87 2044.KW System:"BIGSYS"
>RED DU:=SY:
>RED DU:=LB:
>RED DU:=SP:
>MOU DU0:"RSX11MPBL87"/ACP=UNIQUE
>@DU:[1,2]STARTUP
>;
>* Please enter time and date (HH:MM DD-MMM-YYYY) [S]:
Зайти на него проще всего с BOPOHA (telnet rsx.pdp-11.org.ru 2023):
Welcome to OpenVMS (TM) Alpha Operating System, Version V8.4
Username: GUEST
Welcome to OpenVMS (TM) Alpha Operating System, Version V8.4 on node BOPOHA
Last interactive login on Monday, 3-MAR-2014 15:02:05.01
Last non-interactive login on Friday, 20-DEC-2013 00:04:05.15
$
$ LAT BIGSYS
%LAT-S-CONNECTED, session to BIGSYS established
%LAT-I-TODISCON, type ^\ to disconnect the session
>HEL GUEST/
RSX-11M-PLUS V4.6 BL87 [1,54] System BIGSYS
11-MAR-14 16:14 Logged on Terminal TT21: as GST1
Good Afternoon
************************************************** ***************
* *
* Welcome to RSX-11M-PLUS *
* *
* Version 4.6 Base level 87 *
* *
************************************************** ***************
Last interactive login on Thursday, June 6, 2013 14:28:39 (TT0:)
>@LB:[1,2]SYSLOGIN.CMD
>@ <EOF>
>
Добыть 6.5 было бы хорошо...
скоро он выложит его всем желающим а пока только в личном порядке:
Мне интересно на уровне хламничка и в перспективе освоения этой ОС так же )
Обнаружил, что у меня не сохранился готовый конфиг TSX, а с нуля его редактировать сейчас сил нет. Так что пока выключил 11/83... На выходных будет время - доберусь :)
Добрался таки до конфига и запустил TSX-Plus в том виде в каком сейчас железо собрано... Винчестеры SCSIшные громкие - на ночь уже не стану включать, а вот завтра примерно в 5:00 по Москве включу часов на 12 ;)
Телнетные линии настроены на терминалы VT2xx, вход телнетом на pdp-11.org.ru, GUEST без пароля, одновременно работают 3 телнетные сессии.
Type a command then press the RETURN key: B DU3
Trying DU3
Starting system from DU3
RT-11ZM (S) V05.07
.SET TT QUIET
.R DATE
Date? 11-MAR-2014
.@TIM
.LO NQ
.RU ETHTIM
.UNL NQ
.R DATE
.BO RT11SB
RT-11SB (S) V05.07
.SET TT QUIET
.R DATE
.@SY:RUNTSX
.D 1000=13700,54,12760,2005,276,104350
.ST 1000
.SET ERROR NONE
.R TSX
* TSX-Plus Version 6.01 *
Copyright (c) 1980, 1981, 1982, 1983, 1984, 1985 an unpublished work by
S&H Computer Systems, Inc., Nashville, TN, USA (S&H) All rights reserved.
This material contains the valuable properties and trade secrets of S&H
and may not be used except by the express written permission of S&H.
Distributed by JPY Associates Limited
Licensed for use on a single computer system at HI TECH SYSTEMS S A
License # = 56-T1S-10783
11-Mar-2014 22:08:30
Line # 1
Logon please:ROOT
Password:
Welcome to the system
.SH ALL
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 006057 055646 000000 708
DU 0 102450 105612 000000 944 172150 154
VM 0 102447 107472 000000 384
LP 0 032003 120000 075622 404 177514 200
NL 0 000025 120000 075621 58
EQ 3 007061 120000 075531 3566 174440 120
Assignments:
SY --> DU3:
DK --> DU3:
TCP --> LD7:
CF --> VM0:
WF --> VM0:
Device Job Job name
------ --- ------------
CL0 10 TELNET servr
CL1 13 TELNET servr
CL2 14 TELNET servr
Uptime: 00:00:28
System use: Run=37%, I/O-wait=61%, Swap-wait=0%, Idle=0%
I/O Activity: User I/O=94%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 HI 37Kb 00:01:00 00:00:01 KMON ROOT
2 2(0) 50 TI 37Kb 00:01:00 00:00:01 KMON GUEST
3 3(0) 50 TI 37Kb 00:01:00 00:00:01 KMON GUEST
4 4(0) 50 TI 37Kb 00:01:00 00:00:01 KMON GUEST
10 Det. 50 SL 62Kb 00:01:00 00:00:01 RTELNT TELNET servr
11 Det. 50 SL-Swap 30Kb 00:01:00 00:00:00 WINPRT Window print
12 Det. 50 SL-Lock 62Kb 00:01:00 00:00:04 TCPIP TCP/IP stack
13 Det. 50 SL 62Kb 00:01:00 00:00:01 RTELNT TELNET servr
14 Det. 50 SL 62Kb 00:01:00 00:00:01 RTELNT TELNET servr
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT200 9600 8N Yes Console
2 Local DHV- 0 350 160500 VT200 19200 8N Yes DHV unit 0
3 Local DHV- 1 350 160500 VT200 19200 8N Yes DHV unit 1
4 Local DHV- 4 350 160500 VT200 19200 8N Yes DHV unit 4
5 Local DHV- 5 350 160500 VT200 19200 8N No DHV unit 5
6 Local DZ - 0 340 160100 VT200 9600 8N No DZ unit 0
7 Local DZ - 1 340 160100 VT200 9600 8N No DZ unit 1
8 Local DZ - 2 340 160100 VT200 9600 8N No DZ unit 2
9 Local DZ - 3 340 160100 VT200 9600 8N No DZ unit 3
36 CL DHV- 2 350 160500 unknown 19200 8N CL0 DHV unit 2
37 CL DHV- 3 350 160500 unknown 19200 8N CL1 DHV unit 3
38 CL DHV- 6 350 160500 unknown 19200 8N CL2 DHV unit 6
39 CL DHV- 7 350 160500 unknown 19200 8N CL3 DHV unit 7
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 36 10 [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL1 37 13 [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL2 38 14 [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL3 39 none [TAB,LC,EIGHTBIT,LFOUT,LFIN,CR,CTRL]
CL4 none none
Total installed memory = 4088Kb
Size of unmapped TSX and handlers = 37Kb
Size of mapped TSX system regions = 70Kb
Total size of TSX and mapped data = 124Kb
Size of mapped device handlers = 4Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 0Kb
Space available for user jobs = 1915Kb
Swappable job context area = 6Kb
Current job memory limit = 56Kb
Maximum job memory limit = 56Kb
Spooled devices: LP
Logical subset disks:
LD7 --> DU3:TSXTCP.DSK[4800]
Mounted devices:
Device Associated jobs
---------- ------------------------------
DU3: 1 2 3 4 10 11 12 13 14
DU3:TSXTCP 1 2 3 4 10 12 13 14
DU3:TSXWRK 2 3 4
VM0: 1 2 3 4
Shared run-time systems:
Region Size Type Job Use Shared AGE
------ ------ ------ --- --- ------ ---
EI $ 31.6 Global 12 0 Yes No
WIN01A 3.8 Global 1 1 No No
SCKT00 8.0 Global 12 2 Yes No
WIN02A 3.8 Global 2 1 No No
SCKT01 8.0 Global 12 2 Yes No
WIN03A 3.8 Global 3 1 No No
SCKT02 8.0 Global 12 2 Yes No
WIN04A 3.8 Global 4 1 No No
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: ON,NOKED,NOTTY,SUBSTITUTE
.
Можно мучить :)
и тут тоже:
.tskmon
?KMON-F-TSGEN was modified without relinking TSKMON
* TSX-Plus Version 6.01 *
Copyright (c) 1980, 1981, 1982, 1983, 1984, 1985 an unpublished work by
S&H Computer Systems, Inc., Nashville, TN, USA (S&H) All rights reserved.
This material contains the valuable properties and trade secrets of S&H
and may not be used except by the express written permission of S&H.
Distributed by JPY Associates Limited
Licensed for use on a single computer system at HI TECH SYSTEMS S A
License # = 56-T1S-10783
12-Mar-2014 13398:28:15
Line # 0
?MON-F-Invalid channel
Abort location = 073342
.
а еще sysmon не печатает карту распределения памяти (наверно нету этой фичи еще)
.tskmon
?KMON-F-TSGEN was modified without relinking TSKMON
Ну это правильная реакция собственно - TSKMON не предназначен для запуска вручную - при этом он определит несоответствие своего адреса ожидаемому и соответственно выскажется.
?MON-F-Invalid channel
Abort location = 073342
Не встречалось ни разу.
а еще sysmon не печатает карту распределения памяти (наверно нету этой фичи еще)
А у него была такая фича когда-то? Не путаешь с RMD? :)
---------- Post added at 16:16 ---------- Previous post was at 16:13 ----------
Уф. Добил TSGEN.MAC - привел в соответствие с тем вариантом который изначально был в дистрибутиве. Вечером сделаю дистриб близкий к оригиналу с поддержкой Y2K.
А у него была такая фича когда-то? Не путаешь с RMD? :)
то в 6.50 такое есть
а как:
1 пользоваться screen-ами?
2 посмотреть хотябы каталоги дисков? или узнать какие диски подключенны?
то в 6.50 такое есть
6.50 пока не сумел достать к сожалению :(
Отчего и мучаю 6.01 на предмет патчей :D
пользоваться screen-ами?
CTRL/W<n> для переключения между окнами, где <n> - номер окна, изначально активно окно 0.
2 посмотреть хотябы каталоги дисков? или узнать какие диски подключенны?
Список устройств видно по SH DEV, а конкретные диски - только перебором :)
В этой системе для GUEST активно только это:
ACCESS SY:/READ,DU4:/READ,DU5:/READ,DU6:/READ,DU7:/READ,VM:,SY:TSXWRK.DSK
Итого: DU3, DU4, DU5, DU6, DU7, VM, LD6 (DK после входа), LD7 (TCP)
Для RT-11 доступны диски DU0-23, но TSX еще старый и диски с номером больше 7 не умеет открывать - при наличии привилегий просто переключаю DU7 на нужный :)
---------- Post added at 16:36 ---------- Previous post was at 16:27 ----------
хе :)
Uptime: 08:56:58
System use: Run=2%, I/O-wait=97%, Swap-wait=0%, Idle=0%
I/O Activity: User I/O=99%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 37Kb 00:24:00 00:01:15 KMON FORM
2 2(0) 50 TI 62Kb 00:31:00 00:01:16 SYSMON GUEST
10 Det. 50 SL 62Kb 00:31:00 00:00:38 RTELNT TELNET servr
12 Det. 50 HI-Lock 62Kb 08:57:00 00:05:23 TCPIP TCP/IP stack
Вечером сделаю дистриб близкий к оригиналу с поддержкой Y2K.
Предлагаю добавить по готовности в хламник и ссылку в шапку по теме Y2K в этом разделе. У народа есть герои - народ должен о них знать! )
---------- Post added at 15:52 ---------- Previous post was at 15:33 ----------
Можно мучить
у меня забой не работает в DK: ноль файлов, а RTEM не запускается вовсе ? )
Я что то наверное не так делаю?
у меня забой не работает в DK: ноль файлов, а RTEM не запускается вовсе ? )
Я что то наверное не так делаю?
Для начала стоит перевести на русски написанное ;)
я все шпоры что ты мне про стакан давал куда запихнул надо раскопать
там список команд был !!! и держать впредь под рукой !!!
sh all пока изучаю )
---------- Post added at 15:56 ---------- Previous post was at 15:54 ----------
RTELNT-11 V02.40 [15-Jun-2008]
Remote TELNET Server @bigsys.home.lan [172.31.10.13]
Initiated from host: 178.140.66.73
* TSX-Plus Version 6.01 *
License # = 56-T1S-10783
12-Mar-2014 18:44:21
Line # 2
Logon please:GUEST
Password:
Welcome to the system
<<
.dir
12-Mar-2014
0 Files, 0 Blocks
10202 Free blocks
.sh s
LD6 --> DU3:TSXWRK.DSK[10240]
LD7 --> DU3:TSXTCP.DSK[4800] (read only)
.^C
.SET TRA:CP$1251
?KMON-F-Invalid device
.RTE /VS
?KMON-F-Unrecognizable command
.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 006057 055712 000000 708
DU 0 102450 105656 000000 944
VM 0 102447 107536 000000 384
LP 0 032003 120000 075622 404
NL 0 000025 120000 075621 58
EQ 9 007061 120000 075531 3566
.DIR
12-Mar-2014
0 Files, 0 Blocks
10202 Free blocks
.^C
.TIME
18:49:27
.DATE
12-Mar-2014
.HELP
HELP Lists helpful information
SYNTAX
HELP[/options][ topic[ subtopic[:items...]...]]
or HELP *
SEMANTICS
HELP * lists the items for which help is available.
HELP lists the HELP text (of which this is a part).
HELP topic lists information on the specific topic only.
HELP topic subtopic lists information on the specific subtopic
only (for example, HELP HELP SEMANTICS lists the paragraph of
which this text is a part).
HELP topic subtopic:item lists only the text associated with
the specific item.
HELP topic/item lists the text associated with the specific item
under the subtopic OPTIONS.
Valid topics are the keyboard monitor commands.
Subtopics are "SYNTAX", "SEMANTICS", "OPTIONS", and "EXAMPLES".
Items are specific command options.
OPTIONS
PRINTER
Press <RETURN> for more...
Prints the HELP text on the line printer
TERMINAL (default)
Types the HELP text on the terminal
EXAMPLES
HELP COPY !Lists information about COPY command
HELP/PRINTER EXECUTE !Prints information about EXECUTE
!command
HELP PRINT OPTION:COPIES!Describes the COPIES option for PRINT
HELP COPY/BOOT/DEVICE !Describes the listed options for COPY
.sh all
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 006057 055712 000000 708
DU 0 102450 105656 000000 944
VM 0 102447 107536 000000 384
LP 0 032003 120000 075622 404
NL 0 000025 120000 075621 58
EQ 9 007061 120000 075531 3566
Assignments:
SY --> DU3:
TCP --> LD7:
CF --> VM0:
WF --> VM0:
DK --> LD6:
Device Job Job name
------ --- ------------
CL0 10 TELNET servr
Uptime: 11:14:21
System use: Run=3%, I/O-wait=96%, Swap-wait=0%, Idle=0%
I/O Activity: User I/O=99%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
2* 2(0) 50 IN 37Kb 00:10:00 00:00:03 KMON GUEST
10 Det. 50 SL 62Kb 00:10:00 00:00:04 RTELNT TELNET servr
12 Det. 50 HI-Lock 62Kb 11:15:00 00:06:54 TCPIP TCP/IP stack
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1 Oper. DL 060 177560 VT200 9600 8N No Console
2* Local DHV- 0 350 160500 VT200 19200 8N Yes DHV unit 0
3 Local DHV- 1 350 160500 VT200 19200 8N No DHV unit 1
4 Local DHV- 4 350 160500 VT200 19200 8N No DHV unit 4
5 Local DHV- 5 350 160500 VT200 19200 8N No DHV unit 5
6 Local DZ - 0 340 160100 VT200 9600 8N No DZ unit 0
7 Local DZ - 1 340 160100 VT200 9600 8N No DZ unit 1
8 Local DZ - 2 340 160100 VT200 9600 8N No DZ unit 2
9 Local DZ - 3 340 160100 VT200 9600 8N No DZ unit 3
36 CL DHV- 2 350 160500 unknown 19200 8N CL0 DHV unit 2
37 CL DHV- 3 350 160500 unknown 19200 8N CL1 DHV unit 3
38 CL DHV- 6 350 160500 unknown 19200 8N CL2 DHV unit 6
39 CL DHV- 7 350 160500 unknown 19200 8N CL3 DHV unit 7
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 36 10 [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL1 37 none [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL2 38 none [TAB,LC,EIGHTBIT,LFOUT,LFIN,CR,CTRL]
CL3 39 none [TAB,LC,EIGHTBIT,LFOUT,LFIN,CR,CTRL]
CL4 none none
Total installed memory = 4088Kb
Size of unmapped TSX and handlers = 37Kb
Size of mapped TSX system regions = 70Kb
Total size of TSX and mapped data = 124Kb
Size of mapped device handlers = 4Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 0Kb
Space available for user jobs = 1915Kb
Swappable job context area = 6Kb
Current job memory limit = 56Kb
Maximum job memory limit = 56Kb
Spooled devices: LP
Logical subset disks:
LD6 --> DU3:TSXWRK.DSK[10240]
LD7 --> DU3:TSXTCP.DSK[4800] (read only)
Mounted devices:
Device Associated jobs
---------- ------------------------------
DU3: 2 10 12
DU3:TSXTCP 2 10 12
DU3:TSXWRK 2
VM0: 2
Shared run-time systems:
Region Size Type Job Use Shared AGE
------ ------ ------ --- --- ------ ---
EI $ 31.6 Global 12 0 Yes No
SCKT01 8.0 Global 12 1 Yes No
SCKT00 8.0 Global 12 2 Yes No
WIN02A 3.8 Global 2 1 No No
SCKT02 8.0 Global 12 1 Yes No
Authorized privileges: ALLOCATE,DEBUG,DETACH,MESSAGE,NFSREAD,NFSWRITE,
RLOCK,SEND,SETNAME,SPFUN,SYSGBL,SAME,SUBPROCESS
Current privileges: ALLOCATE,DEBUG,DETACH,MESSAGE,NFSREAD,NFSWRITE,
RLOCK,SEND,SETNAME,SPFUN,SYSGBL,SAME,SUBPROCESS
SL status: ON,NOKED,NOTTY,SUBSTITUTE
.
А сильно шумит она интересно - в плане охлаждения и ЖД 11/83 ?
Ну как бы трудно ожидать от TSX-Plus понимания RSXных команд ;)
По CTR-W окна это супер !!! Слушай так это BSD ! )
---------- Post added at 16:02 ---------- Previous post was at 16:01 ----------
TSX-Plus понимания RSXных команд
Извини form - я в старших системах нуль ) У меня была шпора - а теперь нет,
но я из любопытства тыркаю тут ) Вот начитаюсь книжек и отправлю тебе мессадж
штатными средствами !!! )
---------- Post added at 16:06 ---------- Previous post was at 16:02 ----------
TSX-Plus
а у 6.01 минимальные системные требования ( я про железо конечно ) ?
---------- Post added at 16:09 ---------- Previous post was at 16:06 ----------
я пока отключился )
интересно, даже классно, как будто на авианосце побывал )
http://s7.hostingkartinok.com/uploads/images/2014/03/8b330ff5d57f0249a9ac7b0611837a4c.png
а у 6.01 минимальные системные требования ( я про железо конечно ) ?
Проц с MMU, 96kB памяти вроде минимум. Точно не помню уже.
Проц с MMU, 96kB памяти вроде минимум. Точно не помню уже.
КВАНТ-4 !!! ) С КЦГД и портировать туда FAST-PASCAL с граф.модулем !!! )
---------- Post added at 17:07 ---------- Previous post was at 17:05 ----------
Меня вот уверяют на ВИКИ что TSX это доработанная RT-11, оказывается что всё не так! )
Проц с MMU, 96kB памяти вроде минимум. Точно не помню уже.
Как я понял использовать систему с менее чем 128kW памяти не приходится, это абсолютный практический минимум.
Хотя говоря вообще о "минимальных" ресурсах для многозадачности, form отвечал уклончиво. Якобы возможна unmapped RSX11D система... или даже RSX11M но не ясны практические моменты её применения.
Но раз тема эта про TSXPlus (и косвенно тут задет RT11 софт), то для unmapped систем нет никакой возможности как я понимаю запускать этот софт в многозадачном режиме.
Как я понял использовать систему с менее чем 128kW памяти не приходится, это абсолютный практический минимум.
124K :)
128 - это уже 22bit
Якобы возможна unmapped RSX11D система... или даже RSX11M но не ясны практические моменты её применения.
Насчет 11D/IAS не знаю, а 11M возможен и используется в дистрибутивах 11M до 4.0. Одно из практических применений - standalone BRU, DSC, BAD итд, работающие на простеньких машинках... Для работы же такая системы неудобна ибо самые полезные фичи в нее не помещаются.
---------- Post added at 21:59 ---------- Previous post was at 21:54 ----------
Меня вот уверяют на ВИКИ что TSX это доработанная RT-11, оказывается что всё не так! )
Там много чего уверяют. Многие считают, что TSX - надстройка над RT-11, что абсолютно неверно. Он просто запускается из под RT-11, после чего от RT-11 в памяти ни следа не остается кроме бвух байт - номера версии системы :)
Также слышал мнение, что RAFOS/TS - это не TSX. И это неверно - это самый обыкновенный TSX (но не -Plus) без каких либо переделок (если не считать библиотеки макросов для TSX вызовов - в родном TSX ее не было, а также "исправленного" драйвера CT который умеет работать с кривым советским контроллером [не умеющим отличать байт от слова]).
---------- Post added at 22:27 ---------- Previous post was at 21:59 ----------
Компоновкой дистриба пока не занялся, отдыхаю. 11/83 тоже пока не выключал - пусть крутится пока спать не лягу :)
Пока не собрал дистриб, вкратце что сделано, что не сделано...
Итак, сделано для TSX-Plus V6.1:
поддержка Y2K в команде DATE
поддержка Y2K в вызове .DATE
поддержка Y2K в вызове .SDTTM
поддержка Y2K в программе SYSMON
поддержка Y2K в программе FILTIM
Не сделано:
корректировка версии системы при запуске, чтобы она была не больше 5.4 (5.2?) - это избавляет от танцев с бубном перед запуском из под RT-11 V5.7 и глюков KED в случае если танцев не было
портирование драйвера MU - TSX-Plus V6.1 шел во времена RT-11 V5.2 и потому SLP файла для MU еще нету - MU появился в 5.4
Если кому не лень заняться... ;)
А в идеале конечно найти бы 6.5 :D
А в идеале конечно найти бы 6.5 :D
так я ж говорил, нужно всего-то отписать письмо этому Lyle Bickley, он откроет свой ftp потом и даст скачать, только нужно обратиться в индивидуальном порядке
так я ж говорил, нужно всего-то отписать письмо этому Lyle Bickley, он откроет свой ftp потом и даст скачать, только нужно обратиться в индивидуальном порядке
Так пробовалось уже - тишина. Пропал он куда-то лет этак назад. Потом вроде снова появлялся и опять затих...
Насчет 11D/IAS не знаю, а 11M возможен и используется в дистрибутивах 11M до 4.0. Одно из практических применений - standalone BRU, DSC, BAD итд, работающие на простеньких машинках... Для работы же такая системы неудобна ибо самые полезные фичи в нее не помещаются.
так а какая может быть многозадачность с BRU, DSC, BAD ?
так а какая может быть многозадачность с BRU, DSC, BAD ?
Например никто не мешает запустить все перечисленное одновременно. Правда конкретно в случае с standalone BRU который идет в составе системы это не имеет смысла в силу ограничений драйверов, но самостоятельно сделать такую систему которая могла бы одновременно к примеру форматить один диск и проверять другой - запросто.
Например никто не мешает запустить все перечисленное одновременно. Правда конкретно в случае с standalone BRU который идет в составе системы это не имеет смысла в силу ограничений драйверов, но самостоятельно сделать такую систему которая могла бы одновременно к примеру форматить один диск и проверять другой - запросто.
Ну интересен как бы момент запуска процесса скажем выполнения огромного скрипта который допустим собирает систему и паралельно редактирования с ним файла или хотябы наблюдения за свободными и занятыми ресурсами каким-нибудь системным монитором. Или одновременная компиляция своих программ и их выполнение двумя разными консолями. т.е. что-то более менее "НЕ ПРИТЯНУТОЕ ЗА УШИ"
Ну интересен как бы момент запуска процесса скажем выполнения огромного скрипта который допустим собирает систему и паралельно редактирования с ним файла или хотябы наблюдения за свободными и занятыми ресурсами каким-нибудь системным монитором. Или одновременная компиляция своих программ и их выполнение двумя разными консолями. т.е. что-то более менее "НЕ ПРИТЯНУТОЕ ЗА УШИ"
Это вполне возможно. Только редактирование одновременно с компиляцией без MMU вещь довольно муторная будет ибо и то и другое требует много ресурсов и будет постоянно свапить друг друга. Но в целом 11M V4.0 вроде еще собирался сначала в 28K системе и при том вполне можно было в ней что-то еще по мелочи делать :)
А вот генерить unmapped систему - процесс еще тот - не для слабонервных :D
---------- Post added at 23:36 ---------- Previous post was at 23:29 ----------
Я кстати в RT-11 так делаю - одновременно редактирую на одном терминале, компилю на другом, мониторю на третьем :)
Только не в unmapped системе конечно :D
Каких еще систем выставить на живом 11/83? :D
RSX-11M-PLUS уже выставлял...
Можно поставить RSTS/E, RSX-11M, 2.11BSD, Ultrix 3.1...
Да вобщем-то при желании можно просто консоль выставить в сеть через DECserver и поставить что угодно :)
Итак, сделано для TSX-Plus V6.1:
поддержка Y2K в команде DATE
поддержка Y2K в вызове .DATE
поддержка Y2K в вызове .SDTTM
поддержка Y2K в программе SYSMON
поддержка Y2K в программе FILTIM
Не сделано:
корректировка версии системы при запуске, чтобы она была не больше 5.4 (5.2?) - это избавляет от танцев с бубном перед запуском из под RT-11 V5.7 и глюков KED в случае если танцев не было
портирование драйвера MU - TSX-Plus V6.1 шел во времена RT-11 V5.2 и потому SLP файла для MU еще нету - MU появился в 5.4
Слушай, а давай вот про патчи именно даты касаемо инфу вот в
этой теме продолжать, а то потом снова по всему форуму искать будем,
там в шапку если что я все нужные ссылки соберу > http://zx.pk.ru/showthread.php?t=20864 (просто что бы удобней было - именно касательно
поддержки календаря), а вопросы по системе\системам TSX семейства(?) ветки(?) конечно - эта тема самое то! )
Слушай, а давай вот про патчи именно даты касаемо инфу вот в
этой теме продолжать, а то потом снова по всему форуму искать будем,
там в шапку если что я все нужные ссылки соберу > http://zx.pk.ru/showthread.php?t=20864 (просто что бы удобней было - именно касательно
поддержки календаря), а вопросы по системе\системам TSX семейства(?) ветки(?) конечно - эта тема самое то! )
Патчи в целом не ориентированы на y2k. Просто звучит так внушительно количество сделанного в этом направлении :)
form, в итоге дистрибутив который в хламничке нужно будет целиком перезалить? ссылку я в этой теме давал уже, она есть в шапке про у2к.
если честно, я просто мнение своё хочу сказать, зажимать актуальную версию системы я бы точно не стал, тем более понимая уровень интереса form'а, но так тож я )
Про 11\83:
Слушай а RSX с RTEM где крутиться и вообще виден в сети? Я шпору по нему откопал! И главное я планировал там ещё погонять аскии игры для обзора в тему про "игры на стакане!" со скриншотами там и всё такое. Просто радостно
осознавать что на той стороне живая машинка, а не эмуль.
Слушай а RSX с RTEM где крутиться и вообще виден в сети? Я шпору по нему откопал! И главное я планировал там ещё погонять аскии игры для обзора в тему про "игры на стакане!" со скриншотами там и всё такое. Просто радостно
осознавать что на той стороне живая машинка, а не эмуль.
На живом - на этом же только когда RSX загружен. Но в RSXе пока нет телнетного сервера - так, что достучаться можно нормально только через другую машину в HECnet и оттуда по LAT :)
А эмулятор VT52 + СТАКАН.cfg пойдёт - я последнее время им заходил, и сейчас попробовал коннект есть = пишит ВЕЛКОМЕ ! )
Я вот про вчерашнюю сессию - у меня кнопка "забой" не фурычила всю дорогу,
приходилось упр-ц сбрасывать и заного печатать (secCRT у меня стоит ещё с первых времён, я в нём если вспомнишь первый раз в ГАНГСТЕРОВ гонял! В теме про игры скрины и отчёт есть! Там дату видно, но по старому конфигу не коннектиться - понимаю отсутствие телнета). Так что с "забоем" не так в TSX ?
Или просто настройка в клиенте у меня нужно было?
у меня кнопка "забой" не фурычила всю дорогу
Неправильная настройка терминала - например шлет BackSpace по нажатию на BackSpace на клавиатуре ;)
Должен слать Delete.
Да вобщем-то при желании можно просто консоль выставить в сеть через DECserver и поставить что угодно :)
17777560 ? это конечно круто будет, но оно ж только на 1-го одновременно подключенного человека работать будет. Прикольно бы иметь типа shared screen для всех физических консолей, т.е. чтоб на любую консоль можно было одновременно заломиться многим сразу и наблюдать что там печатается ну и самому брать управление консолью. В принципе google hangout это позволяет, но там оно сделанно больше для online meeting-ов.
17777560 ? это конечно круто будет, но оно ж только на 1-го одновременно подключенного человека работать будет. Прикольно бы иметь типа shared screen для всех физических консолей, т.е. чтоб на любую консоль можно было одновременно заломиться многим сразу и наблюдать что там печатается ну и самому брать управление консолью. В принципе google hangout это позволяет, но там оно сделанно больше для online meeting-ов.
Внаружу OpenBSD торчит, так, что никто не мешает написать программку строчек 20 которая "распаралелит" один порт на всех кто пдключится :)
---------- Post added at 20:30 ---------- Previous post was at 20:26 ----------
Однако будем последовательными - сначала надо обжать кабель DECserver<>роутер :)
Тут меня терзает вопрос с внешними storage устройствами для TSXPlus и RSX11, какой вообще обьем нужен для того чтоб можно было поставить весь "основной" софт? Тут народ на форуме недавно обнаружил что RQDX3 может читать виртуальные HD-дискеты с китайского эмулятора floppy дисковода на SD карточке. Как я понимаю это очень классная штука потому что дешево стоит и сам по себе RQDX3 можно достать. Другой вопрос хватит ли 1.44Mb обьема? Ясное дело что это не RL02 (эмулятор которого можно на AlteraDE1 соорудить).
Тут меня терзает вопрос с внешними storage устройствами для TSXPlus и RSX11, какой вообще обьем нужен для того чтоб можно было поставить весь "основной" софт?
RSX-11M-PLUS можно упихать на 10Mb диск, оставив только один вариант утилит (RES, FSL или статически собранные). RSX-11M вполне поместится на 5 мегов, TSX (вместе с RT-11 который ему нужен) тоже (много места займут всякие свап файлы).
ругой вопрос хватит ли 1.44Mb обьема?
Хватит только продемонстрировать что запускается. Для реальной работы не хватит. Кроме того не уверен, что RQDX3 сможет прочитать 1.44 "дискету", боюсь, он из дискет читает только RX50 (в лучшем случае RX33). RX23 (соответствующий 1.44Mb) вроде никогда не был выпущен и расчитана ли на него фирмварь - фиг знает. А кроме дискет он только несколько типов фиксированных геометрий для разных RD дисков умеет читать (после предварительной разметки диска в XXDP).
Хватит только продемонстрировать что запускается. Для реальной работы не хватит. Кроме того не уверен, что RQDX3 сможет прочитать 1.44 "дискету", боюсь, он из дискет читает только RX50 (в лучшем случае RX33). RX23 (соответствующий 1.44Mb) вроде никогда не был выпущен и расчитана ли на него фирмварь - фиг знает. А кроме дискет он только несколько типов фиксированных геометрий для разных RD дисков умеет читать (после предварительной разметки диска в XXDP).
Мда 5Mb конечно это уже RL02, SCSI, MFM HDD нужен.
Тут говорят что RX33 эмулится http://www.vintage-computer.com/vcforum/showthread.php?41116-Booting-Pdp-11-from-flash-USB
А можно ж вроди как прохачить RQDX первый или RQDX3 чтоб он "чужие" MFM винчестеры понимал?
Тут говорят что RX33 эмулится
RX33 - это 1.2Mb
RQDX первый или RQDX3 чтоб он "чужие" MFM винчестеры понимал?
Ну если кто-то возьмется фирмварю переписать :)
Кстати кроме всего прочего, RD диски от RQDX3 не прочитаются на RQDX1 и наоборот - потребуется переразметка...
Или чужие - имеются в виду неразмеченные DEC'ом, но со стандартной геометрией? - это, понятно, делается через XXDP.
Перелопатил TSX+ V6.01, пропатчил на предмет Y2K, восстановил TSGEN.MAC и TSXLNK.COM в том виде в каком они были изначально.
Теперь процедура генерации соответствует документации.
В архиве также лежит файл RUNTSX.COM, предназначенный для запуска TSX из под RT-11 V5.5 и новее (если запускать обычным способом, KED откажется сохранять отредактированные файлы [других проблем не замечено]).
14-Mar-2014
Volume ID: TSX+ V6.01
Owner : FORM
CCL .SAV 43P 26-Dec-1986 FILTIM.SAV 3P 14-Mar-2014
LOGON .SAV 8P 26-Dec-1986 SETSIZ.SAV 4P 26-Dec-1986
TSAUTH.SAV 22P 26-Dec-1986 TSPAT .SAV 4P 26-Dec-1986
TSXDB .SAV 2P 26-Dec-1986 TSXPM .SAV 7P 26-Dec-1986
TSXUCL.SAV 6P 26-Dec-1986 WINPRT.SAV 8P 26-Dec-1986
SYSODT.REL 8P 26-Dec-1986 CR .TSX 3P 26-Dec-1986
CT .TSX 6P 26-Dec-1986 DD .TSX 5P 26-Dec-1986
DL .TSX 5P 26-Dec-1986 DM18 .TSX 5P 26-Dec-1986
DM22 .TSX 5P 26-Dec-1986 DP .TSX 3P 26-Dec-1986
DS .TSX 3P 26-Dec-1986 DT .TSX 3P 26-Dec-1986
DU .TSX 4P 26-Dec-1986 DX .TSX 4P 26-Dec-1986
DY .TSX 4P 26-Dec-1986 LP .TSX 2P 26-Dec-1986
LS .TSX 3P 26-Dec-1986 MM .TSX 10P 26-Dec-1986
MS .TSX 11P 26-Dec-1986 MT .TSX 9P 26-Dec-1986
NL .TSX 2P 26-Dec-1986 PC .TSX 2P 26-Dec-1986
RF .TSX 3P 26-Dec-1986 RK .TSX 3P 26-Dec-1986
VM .TSX 2P 26-Dec-1986 XL .TSX 4P 26-Dec-1986
RTSORT.TSX 1P 26-Dec-1986 WINPRT.TSX 1P 26-Dec-1986
DTSUB .OBJ 5P 26-Dec-1986 FTSUB .OBJ 1P 26-Dec-1986
SYSMON.OBJ 70P 14-Mar-2014 TSCASH.OBJ 10P 26-Dec-1986
TSCLO .OBJ 18P 26-Dec-1986 TSDBUG.OBJ 25P 26-Dec-1986
TSDUMP.OBJ 25P 26-Dec-1986 TSEM2 .OBJ 33P 14-Mar-2014
TSEM3 .OBJ 14P 26-Dec-1986 TSEM4 .OBJ 16P 26-Dec-1986
TSEXC2.OBJ 40P 26-Dec-1986 TSKM2A.OBJ 52P 14-Mar-2014
TSKM2B.OBJ 19P 26-Dec-1986 TSKSHO.OBJ 45P 26-Dec-1986
TSKST1.OBJ 70P 26-Dec-1986 TSKST2.OBJ 36P 26-Dec-1986
TSLOCK.OBJ 16P 26-Dec-1986 TSMIO .OBJ 6P 26-Dec-1986
TSMSG .OBJ 7P 26-Dec-1986 TSPLAS.OBJ 18P 26-Dec-1986
TSRTX .OBJ 6P 26-Dec-1986 TSSLE .OBJ 23P 26-Dec-1986
TSSPOL.OBJ 14P 26-Dec-1986 TSSWAP.OBJ 6P 26-Dec-1986
TSTIOX.OBJ 7P 26-Dec-1986 TSTTY .OBJ 40P 26-Dec-1986
TSTTY2.OBJ 5P 26-Dec-1986 TSUSR .OBJ 28P 26-Dec-1986
TSWIN .OBJ 29P 26-Dec-1986 TSXMOA.OBJ 18P 26-Dec-1986
TSXMOB.OBJ 17P 26-Dec-1986 TSXMOD.OBJ 55P 26-Dec-1986
TSXMOT.OBJ 23P 26-Dec-1986 TSX1 .OBJ 148P 26-Dec-1986
TSX2 .OBJ 115P 14-Mar-2014 DTSUB .MAC 44P 26-Dec-1986
FTSUB .MAC 6P 26-Dec-1986 CT501 .SLP 3P 26-Dec-1986
CT502 .SLP 3P 26-Dec-1986 DD501 .SLP 3P 26-Dec-1986
DD502 .SLP 3P 26-Dec-1986 DL501 .SLP 9P 26-Dec-1986
DL502 .SLP 9P 26-Dec-1986 DM501 .18 7P 26-Dec-1986
DM501 .22 8P 26-Dec-1986 DM502 .18 7P 26-Dec-1986
DM502 .22 8P 26-Dec-1986 DX501 .SLP 3P 26-Dec-1986
DX502 .SLP 3P 26-Dec-1986 DY501 .SLP 3P 26-Dec-1986
DY502 .SLP 3P 26-Dec-1986 DY51B .SLP 3P 26-Dec-1986
FSM501.SLP 8P 26-Dec-1986 FSM502.SLP 8P 26-Dec-1986
LS501 .SLP 3P 26-Dec-1986 LS502 .SLP 3P 26-Dec-1986
LS51C .SLP 3P 26-Dec-1986 TJ501 .SLP 5P 26-Dec-1986
TJ502 .SLP 5P 26-Dec-1986 TM501 .SLP 5P 26-Dec-1986
TM502 .SLP 5P 26-Dec-1986 TS501 .SLP 7P 26-Dec-1986
TS502 .SLP 6P 26-Dec-1986 TS51C .SLP 7P 26-Dec-1986
XL501 .SLP 3P 26-Dec-1986 XL502 .SLP 3P 26-Dec-1986
XL51C .SLP 3P 26-Dec-1986 SETSIZ.COM 1P 26-Dec-1986
TSXLNK.COM 2P 14-Mar-2014 TSXCND.MAC 3P 26-Dec-1986
TSGEN .MAC 209 14-Mar-2014
107 Files, 1692 Blocks
94 Free blocks
Процесс сборки:
.MAC TSGEN
.@TSXLNK
.R LINK
*TSX[250],TSX/A,TSX[60]=TSGEN,TSX1/Q/P:300.//
*TSTTY/O:1
*TSTTY2/O:1
*TSEM2/O:1
*TSEM3/O:1
*TSEM4/O:1
*TSTIOX/O:1
*TSSWAP/O:1
*TSPLAS/O:1
*TSUSR/O:1
*TSSPOL/O:1
*TSLOCK/O:1
*TSMSG/O:1
*TSRTX/O:1
*TSCASH/O:1
*TSMIO/O:1
*TSSLE/O:1
*TSWIN/O:1
*TSCLO/O:1
*TSDBUG/O:1
*TSDUMP/O:1
*TSEXC2/O:1//
Load section:address? TSXEND:120000
Load section:address?
*TSKMON[120]=TSX2,TSX.STB/Y:40000/P:700/C
*TSKM2A/O:1/C
*TSKM2B/O:1/C
*TSKST1/O:1/C
*TSKST2/O:1/C
*TSKSHO/O:1
Boundary section? $OTABL
?LINK-W-Multiple definition of $OVRH
*SYSMON=TSX.STB,SYSMON
*TSXMOD=TSXMOD,TSX.STB/Y:40000/C
*TSXMOA/O:1/C
*TSXMOB/O:1/C
*TSXMOT/O:1
Boundary section? $OTABL
?LINK-W-Multiple definition of $OVRH
*^C
.
При сборке выдаются предупреждения "?LINK-W-Multiple definition of $OVRH" - это нормальное поведение, описанное в документации...
Вчера кстати обжал кабель RS232<>RJ45, так, что теперь в принципе можно дать доступ к DECserver и оттуда к консоли PDP-11/83 :)
Завтра понедельник, могу в дневное время кому-нибудь дать доступ к консоли 11/83 если есть интерес - все BACKUPы сделал если что :D
Так что на полное растерзание:
KDJ11-BF (18MHz, установлен FPA, таймер выставлен на 50Hz)
4Mb памяти (2xMSV11-JE)
DELQA-M
LPV11
DZQ11 (никуда не подключен сейчас)
DHV11 (установлены заглушки H3277 для XXDP и TELNET из RT-11/TSX-Plus TCP/IP)
CQD-420/TM (4 disks + tape)
Установлены системы:
DU0 - RSX-11M-PLUS V4.6
DU2 - XXDP+ V2.5
DU3 - RT-11 V5.7
Выбрал время помучить немного TSX+ V6.5...
Наконец-то счастье наступило: заработал MU: в TSX ;)
Терминалы на DLV11-J не конфигурил - слишком много их (терминалов) у меня - все вместе не влезает в 40Kb нижней памяти (что требует TSX+). Можно конечно поиграться с TSGEN и попробовать оттуда выкинуть запасы для TSXMOD, но лень. Вместо этого повесил на две линии DLV11 драйверы DD и LS - они грузятся наверх и нижнюю память не жрут...
Extended device units в TSX+ не поддерживаются, так, что с доступом к доброй половине RTшных DU: из под TSX облом...
Резюмируя, можно сказать, что по сравнению с 6.01 существенные плюсы только:
многострочный SL
возможность создания драйвером регионов (в 6.01 нужно было программой создавать)
собственно MU:
.SH ALL
TSX-Plus Version = 6.50
1-Jun-2014
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 016057 052156 000000 726
DU 0 102450 103244 000000 340 172150 154
MU 0 017060 103770 000000 3240 174500 260 254
DD 0 100034 112240 000000 1242 176520 320 324
VM 0 102447 114572 000000 426
EQ 3 007061 120000 075362 3528 174440 120
LP 0 030003 120000 074363 406 177514 200
LS 0 030041 120000 074350 686 176530 330 334
NL 0 000025 120000 074347 60
Assignments:
SY --> DU2:
TCP --> LD7:
CF --> VM0:
WF --> VM0:
DK --> SY :
Device Job Job name
------ --- ------------
CL0 12 TELNET servr
CL1 13 TELNET servr
Uptime: 00:02:00
System use: Run=14%, I/O-wait=42%, Swap-wait=0%, Idle=43%
I/O Activity: User I/O=52%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 39Kb 00:03:00 00:00:06 KMON FORM
2 2(0) 40 TI 63Kb 00:02:00 00:00:01 MACRO FORM
3 3(0) 40 TI 39Kb 00:02:00 00:00:01 KED FORM
10 Det. 50 SL-Lock 63Kb 00:03:00 00:00:05 TCPIP TCP/IP stack
11 Det. 50 SL-Swap 33Kb 00:03:00 00:00:00 WINPRT Window print
12 Det. 50 SL 63Kb 00:02:00 00:00:02 RTELNT TELNET servr
13 Det. 50 SL 63Kb 00:02:00 00:00:01 RTELNT TELNET servr
14 2(1) 50 TI 63Kb 00:02:00 00:00:00 LINK FORM
15 3(1) 50 TI 63Kb 00:02:00 00:00:00 PIP FORM
16 1(1) 40 TI 63Kb 00:02:00 00:00:00 DIR FORM
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT200 9600 8N Yes Console
2 Local DHV- 0 350 160500 VT200 9600 8N Yes FORM
3 Local DHV- 1 350 160500 VT200 9600 8N Yes FORM
4 Local DHV- 4 350 160500 VT200 Auto 8N No
5 Local DHV- 5 350 160500 VT200 Auto 8N No
6 Local DZ - 0 340 160100 VT200 9600 8N No
7 Local DZ - 1 340 160100 VT200 9600 8N No
8 Local DZ - 2 340 160100 VT200 9600 8N No
9 Local DZ - 3 340 160100 VT200 9600 8N No
23 CL DHV- 2 350 160500 VT200 9600 8N CL0 CL unit 0
24 CL DHV- 3 350 160500 VT200 9600 8N CL1 CL unit 1
25 CL DHV- 6 350 160500 VT200 9600 8N CL2 CL unit 2
26 CL DHV- 7 350 160500 unknown 9600 8N CL3 CL unit 3
CL version number 18.
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 23 12 [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL1 24 13 [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL2 25 none [LC,LFOUT,LFIN,CR,CTRL]
CL3 26 none [LC,LFOUT,LFIN,CR,CTRL]
CL4 none none
Total installed memory = 4088Kb
Size of unmapped TSX and handlers = 39Kb (115764)
Size of mapped TSX system regions = 71Kb
Total size of TSX and mapped data = 126Kb
Size of mapped device handlers = 5Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 0Kb
Space available for user jobs = 1874Kb
Swappable job context area = 7Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
QUAN0 = 2
QUAN1 = 20
QUAN1A = 2
QUAN1B = 2
QUAN1C = 1
QUAN2 = 10
QUAN3 = 20
INTIOC = 30
HIPRCT = 40
Spooled devices: LP0 LS0
Logical subset disks:
LD6 --> DU2:TSXWRK.DSK[10240]
LD7 --> DU2:TSXTCP.DSK[4800]
Mounted devices:
Device Associated jobs
---------- ------------------------------
DU2: 1 2 3 10 12 13 14 15 16
DU2:TSXTCP 1 2 3 10 12 13 14 15 16
DU2:TSXWRK 1 2 3 10 12 13 14 15 16
VM0: 1 2 3 10 12 13 14 15 16
Shared run-time systems:
(none)
Region Size Type Job Use Shared AGE Base
------ ------ ------ --- --- ------ --- ------
WIN01A 3.8 Global 1 1 No No 074140
SCKT00 8.0 Global 10 2 Yes No 073740
SCKT01 8.0 Global 10 2 Yes No 073540
WIN02A 3.8 Global 2 1 No No 073440
WIN14A 3.8 Global 14 1 No No 073340
WIN03A 3.8 Global 3 1 No No 073240
WIN15A 3.8 Global 15 1 No No 073140
WIN16A 3.8 Global 16 1 No No 073040
Program Attributes and Privileges
-------------- -----------------------------------------
DU2:DUP.SAV DUP/PRIV=(SYSPRV,NODEBUG)
DU2:IND.SAV NOWAIT/IND/PRIV=(NODEBUG)
DU2:KED.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:KEX.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:K52.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:LOGON.SAV LOCK/BYPASN/PRIV=(BYPASS,SETNAME,SETPRV,SYSPRV,
NODEBUG)
DU2:PATCH.SAV SINGLECHAR/PRIV=(NODEBUG)
DU2:SETUP.SAV IOPAGE/SETUP/PRIV=(NODEBUG)
DU2:SYSMON.SAV /PRIV=(MEMMAP,NODEBUG)
DU2:TECO.SAV SINGLECHAR/NOWAIT/PRIV=(NODEBUG)
DU2:TRANSF.SAV SINGLECHAR/NOWAIT/NONINTERACTIVE/NOWINDOW/PRIV=(
NODEBUG)
DU2:TSAUTH.SAV BYPASN/PRIV=(NODEBUG)
DU2:TSXUCL.SAV TSXUCL/PRIV=(NODEBUG)
DU2:VTCOM.SAV SINGLECHAR/NOWAIT/MEMLOCK/PRIV=(PSWAPM,NODEBUG)
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: ON,NOKED,NOTTYIN,SUBSTITUTE
VM Base=100000 Top=170000 Size=3584
.
form, Что из себя представляет TSX+ V6.5. Там X Window есть?
Какие минимальные требования? И если можно скриншот (если оболочка графическая).
form, Что из себя представляет TSX+ V6.5. Там X Window есть?
Какие минимальные требования. И если можно скриншот (если оболочка графическая).
Ну как бы очевидно, что X нету уже исходя из того, что никакой поддержки сети в системе нету (сторонний софт вроде TCP/IP for TSX+ не в счет). Далее, как представляется себе графическая оболочка - на каком железе? :) DECовские графические устройства на PDP-11 не очень удбны для таких целей, а сторонние - они и есть сторонние - их даже у нас в союзе в каждом институте коих десятки в нашем городке, свой вариант был, "самый лучший", ни с чем не совместимый :)
Если интересны Xы - это надо копать в сторону VMS (вот (http://pdp-11.org.ru/~form/files/pics/decw.jpg) к примеру)...
Насчет минимальных требований точных цифер не помню, но в общем случае, наличие MMU у процессора и 248 Kb (реально меньше, но условно возьмем максимум для 18bit).
Ну а представляет - как уже говорилось в этой же теме вроде, с точки зрения пользователей - обычный RT-11 с многотерминальной, многопользовательской поддержкой и защитой.
form, Дело в том что имея КЦГД и не использовать его на полную катушку как то не очень. Более того КЦГД имеет возможность подключать мышь.
По поводу мин. требований по твоим описанием TSX+ V6.5 по ходу не пойдет на ВМ3 без ВМ4?
form, Дело в том что имея КЦГД и не использовать его на полную катушку как то не очень. Более того КЦГД имеет возможность подключать мышь.
По поводу мин. требований по твоим описанием TSX+ V6.5 по ходу не пойдет на ВМ3 без ВМ4?
Ну как бы очевидно, что ни DEC ни S&H понятия не имели о том что такое КЦГД со всеми вытекающими... Коли есть желание - так компилятор в руки :)
ВМ4 не нужен, но вот насчет ВМ3 - возможно придется кое-что подправить. Это на уровне слухов, подтверждения нет. Такие же слухи ходили про RSX, а они между тем ничего общего с реальностью не имели...
form, TSX у тебя на какой терминал выводит (физический)?
form, TSX у тебя на какой терминал выводит?
У меня 11/83 подключен консолью к DECserver к которому подключены VT220, CM7209, мой Notebook и мой роутер - так что на любой вкус выбор, не считая того, что весь HECnet который в одном сегменте со мной может по сети подключиться :)
В данный момент сижу на нотебяке, в качестве терминала SecureCRT в режиме VT220.
form, скинь SecureCRT плиз. Можно в этой теме http://zx.pk.ru/showthread.php?t=18079
form, скинь SecureCRT плиз. Можно в этой теме http://zx.pk.ru/showthread.php?t=18079
Мне аттачи форум не дает прицеплять - говорит слишком много их, а чистить лень... Да и выкладывать платный софт здесь как бы не очень хорошо наверное :)
В личку еще напишу...
Всегда считал X-ы мусором который сожрал ресурса у unix и open vms стоко что они так ничего и не смогли противопоставить (в плане скорости) против GUI на win16 или apple quickdraw.
Для pdp11 подойдет шото типа BLIT terminal (оно же и похоже на КЦГД), есть еще на pro350 synergy какой-то, но его внутренности это загадка века
Всегда считал X-ы мусором который сожрал ресурса у unix и open vms стоко что они так ничего и не смогли противопоставить (в плане скорости) против GUI на win16 или apple quickdraw.
Сравнивать теплое с зеленым не очень корректно... А насчет противопоставить в плане скорости - полно и не в пользу GUI... Но это отдельная тема которая не измеряется укладываниям в рамки одного только X и в любом случае выходит за рамки данной темы ;)
Note: Version 6.5 of TSX-Plus is the only version which is year 2000
compliant. (c) TSX-Plus V6.5 Release Notes...
Ну-ну...
.SH VER
TSX-Plus Version = 6.50
.FILTIM FILTIM.SAV
DK:FILTIM.SAV 3 21-RST-82 13:46:24 10078
.SYSMON 2,1
...
TSX-Plus SYSMON Utility
09-Jun-82 12:46:47
Вобщем пара патчиков, исправляющих ситуацию... Для FILTIM патч тот же что и для 6.01...
SYMAIN.PAT:
.TITLE SYSMON
.PSECT
.=.+16412
CALL FIXDAT
ADD #1972.,R0
MOV #4,R2
.=.+4
NOP
NOP
NOP
NOP
.PSECT FIXDAT,I,RO,LCL
FIXDAT: MOV R0,-(SP)
BIC #^C37,@SP
BIC #^C140000,R0
SWAB R0
ASR R0
BIS (SP)+,R0
RETURN
.END
FILTIM.SIP:
R SIPP
FILTIM.SAV/A
0
50
2522
^Z
2162
4767
254
^Z
2250
4767
204
^Z
2442
42705
177760
5305
11646
10566
2
207
16601
2
6201
301
42701
177637
60501
62701
3664
5000
71027
144
10005
10146
4737
2022
12605
207
^Y
^C
Установка патчей:
.@FILTIM.SIP
.REN/NOLOG SYMAIN.OBJ .OLD
.MAC/OB:PATCH SYMAIN.PAT
.PAT SYMAIN.OLD,PATCH SYMAIN
.@TSXLNK
Вобщем пара патчиков, исправляющих ситуацию...
А почему не в эту тему? http://zx-pk.ru/showthread.php?t=20864
Я просто за то что бы проще было искать через полгода к примеру )
Поскольку Version 6.5 of TSX-Plus - в разделе ДВК пока не размещена,
там младшая версия лежит (про плюсы и отличия я пост прочитал), эти патчи (http://zx-pk.ru/showpost.php?p=715806&postcount=72)
пока так-же только тута )
что бы проще было искать через полгода к примеру )
Через пол года проще не будет - я недавно поудалял кучу своих аттачей потому что этот гребаный форум, внезапно решивший, что вчера еще у меня было дофига свободного места для аттачей, а сегодня оно в десятки раз превышено, иначе не давал нифига залить. Так что сразу подбирай и в архив :D
Правда на этот раз аттачей не было :)
Так что сразу подбирай и в архив
Я так уже проделывал несколько раз за последние два года, пробегал по старым
сообщениям\темам и повторно или впервые всё сохранял у себя,
(далее не по теме)
сверял с версией в архиве ) Он мне тоже не даёт ничего больше лепить, правда мои аттачи в основном касаются УК-НЦ, редко эмуляторов и ДВК. form, я видел ты свои образы системных дискет снёс, зря, но снёс и снёс, в крайнем случае, есть тема
ПОИСКА\ЗАПРОСОВ (http://zx-pk.ru/showthread.php?t=16861)для случая когда ищу очень надо не знаю\не вижу где -, если, что (по заявкам\запросам\обращения м), я думаю найдём \ откопаем :redface:
Единственно, помнишь ты целую тему бейсики разные собирал?
Вот что с этой подборкой? Я её не собирал, а сейчас копался и (то ли проглядел) не могу с ходу даже тему саму увидеть, весь раздел ДВК\УК-НЦ вроде пролистал.
Шото немогу поставить систему на DU пишет что DU не был залинкован... для этого только tsgen надо подправить или еще есть шото?
Шото немогу поставить систему на DU пишет что DU не был залинкован... для этого только tsgen надо подправить или еще есть шото?
Из написанного таки не ясно кто и что все-таки говорит :)
DEVDEF <DU> в TSGEN.MAC и файл DU.TSX должен быть в наличии.
Сконфигурял все железо какое вставлено в 11/83. Размер нижней части TSX на пределе... VM не влезает в нижнюю память, MU с поддержкой файловой системы тоже. DHV11 жрет много.
.SH ALL
TSX-Plus Version = 6.50
22-Jul-2014
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 016057 057506 000000 1198
C1 0 016057 057506 000000 4
DU 0 102450 115524 000000 340 172150 154
MU 0 017060 116250 000000 448 174500 260 254
LP 0 030003 120000 165271 406 177514 200
NL 0 000025 120000 165270 60
EQ 0 007061 120000 165200 3528 174440 120
Assignments:
SY --> DU2:
DK --> DU2:
There are no allocated devices
Uptime: 00:02:14
System use: Run=3%, I/O-wait=0%, Swap-wait=0%, Idle=96%
I/O Activity: User I/O=1%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 39Kb 00:01:00 00:00:01 KMON FORM
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT200 9600 8N Yes Console
2 Local DHV- 0 350 160440 VT200 Auto 8N No
3 Local DHV- 1 350 160440 VT200 Auto 8N No
4 Local DHV- 2 350 160440 VT200 Auto 8N No
5 Local DHV- 3 350 160440 VT200 Auto 8N No
6 Local DZ - 0 340 160100 VT200 9600 8N No
7 Local DZ - 1 340 160100 VT200 9600 8N No
8 Local DZ - 2 340 160100 VT200 9600 8N No
9 Local DZ - 3 340 160100 VT200 9600 8N No
32 CL DL 300 176500 unknown 9600 8N CL0 CL unit 0
33 CL DL 310 176510 unknown 9600 8N CL1 CL unit 1
34 CL DL 320 176520 unknown 9600 8N CL2 CL unit 2
35 CL DL 330 176530 unknown 9600 8N CL3 CL unit 3
36 CL DHV- 4 350 160440 unknown 9600 8N CL4 CL unit 4
37 CL DHV- 5 350 160440 unknown 9600 8N CL5 CL unit 5
38 CL DHV- 6 350 160440 unknown 9600 8N CL6 CL unit 6
39 CL DHV- 7 350 160440 unknown 9600 8N CL7 CL unit 7
CL version number 18.
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 32 none (spooled) [LC,LFOUT,LFIN,CR,CTRL]
CL1 33 none [LC,LFOUT,LFIN,CR,CTRL]
CL2 34 none [LC,LFOUT,LFIN,CR,CTRL]
CL3 35 none [LC,LFOUT,LFIN,CR,CTRL]
CL4 36 none [LC,LFOUT,LFIN,CR,CTRL]
CL5 37 none [LC,LFOUT,LFIN,CR,CTRL]
CL6 38 none [LC,LFOUT,LFIN,CR,CTRL]
CL7 39 none [LC,LFOUT,LFIN,CR,CTRL]
C10 none none
Total installed memory = 4088Kb
Size of unmapped TSX and handlers = 40Kb (117404)
Size of mapped TSX system regions = 78Kb
Total size of TSX and mapped data = 137Kb
Size of mapped device handlers = 4Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 2111Kb
Space available for user jobs = 1546Kb
Swappable job context area = 7Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
QUAN0 = 2
QUAN1 = 20
QUAN1A = 2
QUAN1B = 2
QUAN1C = 1
QUAN2 = 10
QUAN3 = 20
INTIOC = 30
HIPRCT = 40
Spooled devices: LP0 CL0
Logical subset disks:
No logical disks are mounted
Mounted devices:
Device Associated jobs
---------- ------------------------------
DU2: 1
Shared run-time systems:
(none)
Region Size Type Job Use Shared AGE Base
------ ------ ------ --- --- ------ --- ------
WIN01A 3.8 Global 1 1 No No 062030
Program Attributes and Privileges
-------------- -----------------------------------------
DU2:DUP.SAV DUP/PRIV=(SYSPRV,NODEBUG)
DU2:IND.SAV NOWAIT/IND/PRIV=(NODEBUG)
DU2:KED.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:KEX.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:K52.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:LOGON.SAV LOCK/BYPASN/PRIV=(BYPASS,SETNAME,SETPRV,SYSPRV,
NODEBUG)
DU2:PATCH.SAV SINGLECHAR/PRIV=(NODEBUG)
DU2:SETUP.SAV IOPAGE/SETUP/PRIV=(NODEBUG)
DU2:SYSMON.SAV /PRIV=(MEMMAP,NODEBUG)
DU2:TECO.SAV SINGLECHAR/NOWAIT/PRIV=(NODEBUG)
DU2:TRANSF.SAV SINGLECHAR/NOWAIT/NONINTERACTIVE/NOWINDOW/PRIV=(
NODEBUG)
DU2:TSAUTH.SAV BYPASN/PRIV=(NODEBUG)
DU2:TSXUCL.SAV TSXUCL/PRIV=(NODEBUG)
DU2:VTCOM.SAV SINGLECHAR/NOWAIT/MEMLOCK/PRIV=(PSWAPM,NODEBUG)
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: ON,NOKED,NOTTYIN,SUBSTITUTE
VM not installed
.
Из написанного таки не ясно кто и что все-таки говорит :)
DEVDEF <DU> в TSGEN.MAC и файл DU.TSX должен быть в наличии.
-----------------------------------------------------------
.RUN DU4:TSX.SAV
?TSX-F-TSX generation did not include device DU
.
.DIR DU4:DU*.*
DUP .SAV 47 20-Dec-1985 DUMP .SAV 9 20-Dec-1985
DU .MAC 94 20-Dec-1985 DU54C .SLP 15 27-Mar-1991
DU .TSX 9 27-Mar-1991 DU .SYS 8 20-Dec-1985
DUX .SYS 9 20-Dec-1985
7 Files, 191 Blocks
56178 Free blocks
-----------------------------------------------------------
tsgen:
;
DEVBEG ;Beginning of device definitions
DEVDEF <DL>
DEVDEF <DM>
DEVDEF <DU>,DMA,MAPH
;DEVDEF <RK>,MAPIO
;DEVDEF <DY>,MAPIO
;DEVDEF <DX>
DEVDEF <LP>
DEVDEF <NL>
DEVEND ;End of device definitions
еще неможет собрать TSXMON
.R LINK
*TSKMON[165],TSKMON[120]/W=TSX2,TSX.STB/Y:40000/C
*TSKM2A/O:1/C
*TSKM2B/O:1/C
*TSKM2C/O:1/C
*TSKM2D/O:1/C
*TSKST1/O:1/C
*TSKST2/O:1/C
*TSKSHO/O:1
Boundary section? $OTABL
?LINK-W-Multiple definition of $OVRH
?LINK-F-Symbol table overflow
*^C
.
RUN DU4:TSX.SAV
С этого места поподробнее: почему RUN DU4:TSX, а не R TSX?
DU4: совпадает с SY:?
DU4: является MSCP контроллером 0, unit 4 (в оригинале не бывает [но не мешает])?
DEVDEF <DU>,DMA,MAPH
DU не будет работать как mapped handler. Должно быть NOMAPH,NOSET. Лучше просто ничего не писать - он автоматом правильные умолчания для своих драйверов ставит (в оригинале в 6.5 NOSET все-таки написано).
?LINK-F-Symbol table overflow
Не хватает памяти. Собирать лучше из под XM/ZM (или TSX). Или старого базового SJ.
При этом для V5.6/5.7 проще всего пропатчить LINK.SAV (4/200) и дать команту SET RUN VBGEXE - этого достаточно. Для более старых систем в TSXLNK.COM заменить
R LINK на
R VBGEXE
SY:LINK
взял систему rt11-xm 5.03, перекинул все на DU0:, сбилдил используя VBGEXE, мда теперь по круче проблема:
.TSX
000403
@
взял систему rt11-xm 5.03, перекинул все на DU0:, сбилдил используя VBGEXE, мда теперь по круче проблема:
.TSX
000403
@
Ни о чем не говорит. Нужен как минимум TSGEN.MAC, тип процессора и результат SH в RT-11. Навскидку могу предположить, что таки была сделана попытка описать DU как MAPH :)
---------- Post added at 04:36 ---------- Previous post was at 04:29 ----------
Еще покопался с конфигурацией, выгадал пару kb нижней памяти куда удалось подгрузить VM... Добавил TCP/IP с FTP сервером, синхронизацию времени по Ethernet при старте... Завтра если не лень будет, спаяю кабели для DHV11 и DZQ11 и вывешу по порту с каждого через DECserver :)
.SH ALL
TSX-Plus Version = 6.50
23-Jul-2014
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 016057 053114 000000 1112
DU 0 102450 110554 000000 340 172150 154
MU 0 017060 111300 000000 448 174500 260 254
LP 0 030003 120000 135271 406 177514 200
NL 0 000025 120000 135270 60
VM 0 102447 112200 000000 426
EQ 3 007061 120000 135200 3528 174440 120
Assignments:
SY --> DU2:
DK --> DU2:
TCP --> LD7:
PAS --> LD7:
CF --> VM0:
WF --> VM0:
There are no allocated devices
Uptime: 00:02:55
System use: Run=7%, I/O-wait=92%, Swap-wait=0%, Idle=0%
I/O Activity: User I/O=99%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 39Kb 00:03:00 00:00:07 KMON FORM
10 Det. 50 SL 63Kb 00:01:00 00:00:02 RFTP FTP server
11 Det. 50 SL-Swap 33Kb 00:03:00 00:00:00 WINPRT Window print
12 Det. 50 SL-Lock 63Kb 00:03:00 00:00:02 TCPIP TCP/IP stack
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT200 9600 8N Yes Console
2 Local DHV- 0 350 160440 VT200 Auto 8N No
3 Local DHV- 1 350 160440 VT200 Auto 8N No
4 Local DHV- 2 350 160440 VT200 Auto 8N No
5 Local DHV- 3 350 160440 VT200 Auto 8N No
6 Local DZ - 0 340 160100 VT200 9600 8N No
7 Local DZ - 1 340 160100 VT200 9600 8N No
8 Local DZ - 2 340 160100 VT200 9600 8N No
9 Local DZ - 3 340 160100 VT200 9600 8N No
23 CL DL 300 176500 unknown 9600 8N CL0 CL unit 0
24 CL DL 310 176510 unknown 9600 8N CL1 CL unit 1
25 CL DL 320 176520 unknown 9600 8N CL2 CL unit 2
26 CL DL 330 176530 unknown 9600 8N CL3 CL unit 3
27 CL DHV- 4 350 160440 unknown 9600 8N CL4 CL unit 4
28 CL DHV- 5 350 160440 unknown 9600 8N CL5 CL unit 5
29 CL DHV- 6 350 160440 unknown 9600 8N CL6 CL unit 6
30 CL DHV- 7 350 160440 unknown 9600 8N CL7 CL unit 7
CL version number 18.
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 23 none (spooled) [LC,LFOUT,LFIN,CR,CTRL]
CL1 24 none [LC,LFOUT,LFIN,CR,CTRL]
CL2 25 none [LC,LFOUT,LFIN,CR,CTRL]
CL3 26 none [LC,LFOUT,LFIN,CR,CTRL]
CL4 27 none [LC,LFOUT,LFIN,CR,CTRL]
CL5 28 none [LC,LFOUT,LFIN,CR,CTRL]
CL6 29 none [LC,LFOUT,LFIN,CR,CTRL]
CL7 30 none [LC,LFOUT,LFIN,CR,CTRL]
Total installed memory = 4088Kb
Size of unmapped TSX and handlers = 38Kb (113306)
Size of mapped TSX system regions = 78Kb
Total size of TSX and mapped data = 131Kb
Size of mapped device handlers = 4Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 1056Kb
Space available for user jobs = 1838Kb
Swappable job context area = 7Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
QUAN0 = 2
QUAN1 = 20
QUAN1A = 2
QUAN1B = 2
QUAN1C = 1
QUAN2 = 10
QUAN3 = 20
INTIOC = 30
HIPRCT = 40
Spooled devices: LP0 CL0
Logical subset disks:
LD7 --> DU2:TSXTCP.DSK[4800]
Mounted devices:
Device Associated jobs
---------- ------------------------------
DU2: 1
DU2:TSXTCP 1 10 12
Shared run-time systems:
(none)
Region Size Type Job Use Shared AGE Base
------ ------ ------ --- --- ------ --- ------
WIN01A 3.8 Global 1 1 No No 073010
SCKT00 8.0 Global 12 2 Yes No 072610
SCKT01 8.0 Global 12 2 Yes No 072410
Program Attributes and Privileges
-------------- -----------------------------------------
DU2:DUP.SAV DUP/PRIV=(SYSPRV,NODEBUG)
DU2:IND.SAV NOWAIT/IND/PRIV=(NODEBUG)
DU2:KED.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:KEX.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:K52.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:LOGON.SAV LOCK/BYPASN/PRIV=(BYPASS,SETNAME,SETPRV,SYSPRV,
NODEBUG)
DU2:PATCH.SAV SINGLECHAR/PRIV=(NODEBUG)
DU2:SETUP.SAV IOPAGE/SETUP/PRIV=(NODEBUG)
DU2:SYSMON.SAV /PRIV=(MEMMAP,NODEBUG)
DU2:TECO.SAV SINGLECHAR/NOWAIT/PRIV=(NODEBUG)
DU2:TRANSF.SAV SINGLECHAR/NOWAIT/NONINTERACTIVE/NOWINDOW/PRIV=(
NODEBUG)
DU2:TSAUTH.SAV BYPASN/PRIV=(NODEBUG)
DU2:TSXUCL.SAV TSXUCL/PRIV=(NODEBUG)
DU2:VTCOM.SAV SINGLECHAR/NOWAIT/MEMLOCK/PRIV=(PSWAPM,NODEBUG)
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: ON,NOKED,NOTTYIN,SUBSTITUTE
VM Base=140000 Top=170000 Size=1536
.
---------- Post added at 04:40 ---------- Previous post was at 04:36 ----------
Да, ну и по вопросу выше - надеюсь, сам TSX запускается не из под XM :)
Да, ну и по вопросу выше - надеюсь, сам TSX запускается не из под XM :)
ага! вот именно!
.SH ALL
TSX-Plus Version = 6.50
23-Jul-2014
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 016057 036430 000000 254
DU 0 102450 067256 000000 340 172150 154
NL 0 000025 120000 005527 60
Assignments:
SY --> DU0:
DK --> DU0:
There are no allocated devices
Uptime: 00:00:26
System use: Run=42%, I/O-wait=14%, Swap-wait=0%, Idle=42%
I/O Activity: User I/O=15%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 39Kb 00:01:00 00:00:11 KMON
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT52 9600 8N Yes Console
2 Local DL 310 176510 unknown 9600 8N No * Not installed *
3 Local DL 320 176520 unknown 9600 8N No * Not installed *
CL version number 17.
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 none none (spooled)
Total installed memory = 256Kb
Size of unmapped TSX and handlers = 29Kb (070066)
Size of mapped TSX system regions = 62Kb
Total size of TSX and mapped data = 93Kb
Size of mapped device handlers = 0Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 0Kb
Space available for user jobs = 149Kb
Swappable job context area = 7Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
QUAN0 = 2
QUAN1 = 20
QUAN1A = 2
QUAN1B = 2
QUAN1C = 1
QUAN2 = 10
QUAN3 = 20
INTIOC = 30
HIPRCT = 40
Spooled devices: CL0
Logical subset disks:
No logical disks are mounted
Mounted devices:
Device Associated jobs
---------- ------------------------------
DU0: 1
Shared run-time systems:
(none)
There are no named regions
Program Attributes and Privileges
-------------- -----------------------------------------
DU0:DUP.SAV DUP/PRIV=(SYSPRV,NODEBUG)
DU0:IND.SAV NOWAIT/IND/PRIV=(NODEBUG)
DU0:KED.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU0:KEX.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU0:K52.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU0:LOGON.SAV LOCK/BYPASN/PRIV=(BYPASS,SETNAME,SETPRV,SYSPRV,
NODEBUG)
DU0:PATCH.SAV SINGLECHAR/PRIV=(NODEBUG)
DU0:SETUP.SAV IOPAGE/SETUP/PRIV=(NODEBUG)
DU0:SYSMON.SAV /PRIV=(MEMMAP,NODEBUG)
DU0:TECO.SAV SINGLECHAR/NOWAIT/PRIV=(NODEBUG)
DU0:TRANSF.SAV SINGLECHAR/NOWAIT/NONINTERACTIVE/NOWINDOW/PRIV=(
NODEBUG)
DU0:TSAUTH.SAV BYPASN/PRIV=(NODEBUG)
DU0:TSXUCL.SAV TSXUCL/PRIV=(NODEBUG)
DU0:VTCOM.SAV SINGLECHAR/NOWAIT/MEMLOCK/PRIV=(PSWAPM,NODEBUG)
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: OFF,NOKED,NOTTYIN,SUBSTITUTE
VM not installed
.
теперь надо бы сконфигурить как следует, и компиляторов навесить
Сейчас домучаю свой конфиг и могу diff выложить.
---------- Post added at 05:41 ---------- Previous post was at 05:09 ----------
Дифф конфига из расчета на мое железо и TCP/IP
--- tsgen.old Wed Jul 23 05:39:30 2014
+++ tsgen.mac Wed Jul 23 05:39:23 2014
@@ -2481,11 +2481,11 @@
; Note: In a non-swapping system (SWAPFL=0), SEGBLK must be non-zero
; if PLAS support is wanted, but its value does not matter.
;
-SEGBLK = 0. ;# blocks for PLAS swap file
+SEGBLK = 1024. ;# blocks for PLAS swap file
;
; Number of shared global PLAS regions that can be created by all jobs.
;
-NGR = 12. ;Number of global PLAS regions
+NGR = 30. ;Number of global PLAS regions
;
; BUSTYP defines the machine bus structure for TSX-Plus. Their are two
; possible machine bus structures supported by TSX-Plus - the QBUS (LSI)
@@ -2506,7 +2506,7 @@
; available memory on the machine. To disable the use of extended
; memory, set MEMSIZ to 248 or less.
;
-MEMSIZ = 248. ;Upper memory limit
+MEMSIZ = 3072. ;Upper memory limit
;
; The INIABT parameter controls the action taken by TSX-Plus when
; certain errors are detected during system initialization.
@@ -2602,7 +2602,7 @@
; is approximately equal to the number of commands per job times the
; total number of time-sharing lines divided by 5).
;
-UCLMNC = 5. ;Maximum user-defined commands per job
+UCLMNC = 16. ;Maximum user-defined commands per job
;
; The UCLORD parameter selects the default call order for checking
; to see if a command is a user-defined command.
@@ -2647,13 +2647,13 @@
; subprocesses in that they preserve the screen context when you switch
; between processes.
;
-MAXWIN = 10. ;Total number of display windows for all jobs
+MAXWIN = 26. ;Total number of display windows for all jobs
;
; Set DBGFLG to 1 to cause the TSX-Plus program debugging facility
; to be included with the system.
; Set DBGFLG to 0 if the debugging facility is not wanted.
;
-DBGFLG = 0 ;1==>Include debugger; 0==>Exclude debugger
+DBGFLG = 1 ;1==>Include debugger; 0==>Exclude debugger
;
; Number of slots in INSTALL table to reserve for user programs.
;
@@ -2757,7 +2757,7 @@
;
; Maximum number of subprocesses per primary process.
;
-MAXSEC = 2. ;Max subprocesses per user
+MAXSEC = 1. ;Max subprocesses per user
;
; Maximum file size (# blocks) that will be returned in response to
; a .ENTER request that specifies a file size of 0 blocks.
@@ -2771,7 +2771,7 @@
; the mapped portion of the system.
; The maximum number of blocks that may be held in the cache is 4095. (2MB)
;
-CACHE = 0. ;Number of blocks in data cache
+CACHE = 2048. ;Number of blocks in data cache
;
; The following parameters relate to the cache of file directory entries
; maintained by TSX-Plus. This cache is used to reduce the number of disk
@@ -2979,14 +2979,12 @@
; *************************************
;
DEVBEG ;Beginning of device definitions
- DEVDEF <DL>
- DEVDEF <DM>
DEVDEF <DU>,NOSET
- DEVDEF <RK>,MAPIO
- DEVDEF <DY>,MAPIO
- DEVDEF <DX>
+ DEVDEF <MU>,NOSET
DEVDEF <LP>
DEVDEF <NL>
+ DEVDEF <VM>
+ DEVDEF <EQ>,DMA,MAPH,NOSET
DEVEND ;End of device definitions
;--------------------------------------------------------------------------
@@ -3100,7 +3098,7 @@
; argument (number of spooled devices) is zero, no spool
; tables are generated and arguments 2-7 are ignored.
;
- SPOOL 2,20.,3,500.,<LP CL0>,0,10.
+ SPOOL 2,20.,3,500.,<LP CL4>,0,10.
;----------------------------------------------------------------
; Define parameters pertaining to record (block) locking
@@ -3112,20 +3110,20 @@
; simultaneously. Note that several users accessing the same
; file count as 1.
;
-MAXSF = 30. ;Max number of shared files
+MAXSF = 4. ;Max number of shared files
;
; Maximum number of I/O channels which all users may
; simultaneously have open to shared files.
; Note, this is the total number for all users not
; for each user.
;
-MAXSFC = 30. ;Max # shared file channels
+MAXSFC = 16. ;Max # shared file channels
;
; Maximum number of blocks which may be simultaneously
; held locked by any channel. That is, max blocks
; locked per channel.
;
-MXLBLK = 3. ;Max blocks locked per channel
+MXLBLK = 16. ;Max blocks locked per channel
;
; Number of 512-byte blocks to be held in the in-memory data
; cache for shared files.
@@ -3142,19 +3140,19 @@
; Maximum number of message communication channels
; which may be simultaneously in use.
;
-MAXMC = 3. ;Max message channels
+MAXMC = 24. ;Max message channels
;
; Maximum message length (bytes).
;
-MSCHRS = 200. ;Max message length (bytes)
+MSCHRS = 16. ;Max message length (bytes)
;
; Maximum number of messages which may be held in queue.
;
-MAXMSG = 3. ;Max queued messages
+MAXMSG = 64. ;Max queued messages
;
; Maximum number of requests for messages that may be held in queue
;
-MAXMRB = 10. ;Max # pending message requests
+MAXMRB = 24. ;Max # pending message requests
;----------------------------------------------------------------------------
; The RTVECT parameter specifies the number of real-time interrupt vectors
@@ -3177,7 +3175,7 @@
; Specify the size as number of bytes for the table.
; (Note: The maximum allowed size is 8192 bytes)
;
-PMSIZE = 0. ;Size of performance monitor table (bytes)
+PMSIZE = 8192. ;Size of performance monitor table (bytes)
;----------------------------------------------------------------------------
; Use the RTDEF macro at this point to specify information about
@@ -3253,7 +3251,7 @@
; the extra units) may not exceed 16. The first 8 CL units are
; named CL0 to CL7, the second 8 are named C10 through C17.
;
-CLXTRA = 1. ;Number of extra CL units.
+CLXTRA = 4. ;Number of extra CL units.
;
; Default output ring buffer size for I/O communication lines defined
; with the CLDEF macro and accessed as "CL" devices.
@@ -3310,7 +3308,7 @@
; 3. The number of detached jobs.
; 4. The number of dedicated CL lines.
;
- TBLDEF 3.,2.,2.,0. ;# Real, # Subprocess, # Detached, # CL lines
+ TBLDEF 13.,13.,4.,4. ;# Real, # Subprocess, # Detached, # CL lines
;
; Define primary (real) time-sharing lines
@@ -3319,72 +3317,139 @@
; #1 time-sharing line
LINDEF 60,177560,OPER ;USE CONSOLE TERMINAL AS T/S TERM
NAME <Console>
-; CMDFIL LINE1.TSX
-; TRMTYP VT100
+ CMDFIL LOGON.TSX
+ TRMTYP VT200
FLAGS NRMFLG!$START
LINEND
-
+;
; #2 time-sharing line
- LINDEF 310,176510
-; CMDFIL LINE2.TSX
-; TRMTYP LA120
+ LINDEF 300,176500
+ CMDFIL LOGON.TSX
+ TRMTYP VT200
FLAGS NRMFLG
LINEND
-
+;
; #3 time-sharing line
+ LINDEF 310,176510
+ CMDFIL LOGON.TSX
+ TRMTYP VT200
+ FLAGS NRMFLG
+ LINEND
+;
+; #4 time-sharing line
LINDEF 320,176520
-; CMDFIL LINE3.TSX
-; TRMTYP VT52
+ CMDFIL LOGON.TSX
+ TRMTYP VT200
FLAGS NRMFLG
LINEND
;
+; #5 time-sharing line
+ LINDEF 330,176530
+ CMDFIL LOGON.TSX
+ TRMTYP VT200
+ FLAGS NRMFLG
+ LINEND
+;
;; The following section is an example of line definitions for a
;; DHV11 type multiplexer.
;
-; DHVDEF 370,160020 ;DHV11 MUX VECTOR & RSR ADDRESS
+ DHVDEF 350,160440 ;DHV11 MUX VECTOR & RSR ADDRESS
;
;; Mux line # 0 - first line on DHV
-; LINDEF 0
-; CMDFIL LINE2.TSX
-; FLAGS NRMFLG!$AUTO
-; LINEND
+ LINDEF 0
+ TRMTYP VT200
+ CMDFIL LOGON.TSX
+ FLAGS NRMFLG!$AUTO
+ LINEND
;
+;; Mux line # 1
+ LINDEF 1
+ TRMTYP VT200
+ CMDFIL LOGON.TSX
+ FLAGS NRMFLG!$AUTO
+ LINEND
+;
+;; Mux line # 2
+ LINDEF 2
+ TRMTYP VT200
+ CMDFIL LOGON.TSX
+ FLAGS NRMFLG!$AUTO
+ LINEND
+;
+;; Mux line # 3
+ LINDEF 3
+ TRMTYP VT200
+ CMDFIL LOGON.TSX
+ FLAGS NRMFLG!$AUTO
+ LINEND
+;
+;; Mux line # 4
+ CLDEF 0,4
+ SILO 256.,12.,4.
+ CLEND
+;
+;; Mux line # 5
+ CLDEF 1,5
+ SILO 256.,12.,4.
+ CLEND
+;
+;; Mux line # 6
+ CLDEF 2,6
+ SILO 256.,12.,4.
+ CLEND
+;
;; Mux line # 7 - last line on DHV
-; LINDEF 7
-; CMDFIL LINE2.TSX
-; FLAGS NRMFLG!$AUTO
-; LINEND
+ CLDEF 3,7
+ SILO 256.,12.,4.
+ CLEND
;
-; MUXEND ;END OF DHV11 MUX LINES USED
+ MUXEND ;END OF DHV11 MUX LINES USED
;
;; The following section is an example of line definitions for a
;; DZV11 type multiplexer.
;
-; DZDEF 360,160010 ;DZV11 MUX VECTOR & RSR ADDRESS
+ DZDEF 340,160100 ;DZV11 MUX VECTOR & RSR ADDRESS
;
;; Mux line # 0 - first line on DZ
-; LINDEF 0
-; TRMTYP VT100
-; SPEED S9600
-; CMDFIL LINE2.TSX
-; LINEND
+ LINDEF 0
+ TRMTYP VT200
+ SPEED S9600
+ CMDFIL LOGON.TSX
+ FLAGS NRMFLG
+ LINEND
;
+;; Mux line # 1
+ LINDEF 1
+ TRMTYP VT200
+ SPEED S9600
+ CMDFIL LOGON.TSX
+ FLAGS NRMFLG
+ LINEND
+;
+;; Mux line # 2
+ LINDEF 2
+ TRMTYP VT200
+ SPEED S9600
+ CMDFIL LOGON.TSX
+ FLAGS NRMFLG
+ LINEND
+;
;; Mux line # 3 - last line on DZ
-; LINDEF 3
-; TRMTYP LA120
-; SPEED S1200
-; CMDFIL LINE2.TSX
-; FLAGS NRMFLG!$FORM
-; LINEND
+ LINDEF 3
+ TRMTYP VT200
+ SPEED S9600
+ CMDFIL LOGON.TSX
+ FLAGS NRMFLG
+ LINEND
;
-; MUXEND ;End of DZ11 lines
+ MUXEND ;End of DZ11 lines
;
; Use the "DETACH" macro here to declare any start-up command
; files and associated parameters (up to 80 characters) to be
; run as detached jobs:
;
; DETACH <SY:EXAMPL.TSX PARM1 PARM2> ;Detached job with parameters
-; DETACH <SY:DETACH.TSX> ;Start-up detached job
+ DETACH <SY:DETACH.TSX> ;Start-up detached job
; DETACH <SY:WINPRT.TSX> ;Start window-print detached job
;
;================================================= ================
Все! Упаковал все терминальные линии в виде timesharing с полным набором нужных устройств, не превышая 40Kb нижней памяти.
MU только нефайловый, но он в основном для BUP нужен, а ему пофигу.
.SH ALL
TSX-Plus Version = 6.50
23-Jul-2014
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 016057 057350 000000 512
DU 0 102450 111414 000000 340 172150 154
MU 0 017060 112140 000000 448 174500 260 254
LP 0 030003 120000 135271 406 177514 200
NL 0 000025 120000 135270 60
VM 0 102447 113040 000000 426
EQ 3 007061 120000 135200 3528 174440 120
Assignments:
SY --> DU2:
DK --> DU2:
TCP --> LD7:
PAS --> LD7:
CF --> VM0:
WF --> VM0:
There are no allocated devices
Uptime: 00:00:28
System use: Run=24%, I/O-wait=74%, Swap-wait=0%, Idle=0%
I/O Activity: User I/O=96%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 39Kb 00:01:00 00:00:04 KMON FORM
19 Det. 50 SL 33Kb 00:01:00 00:00:01 WINPRT Window print
20 Det. 50 SL-Lock 63Kb 00:01:00 00:00:01 TCPIP TCP/IP stack
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT200 9600 8N Yes Console
2 Local DL 300 176500 VT200 9600 8N CL0 CL unit 0
3 Local DL 310 176510 VT200 9600 8N No
4 Local DL 320 176520 VT200 9600 8N No
5 Local DL 330 176530 VT200 9600 8N No
6 Local DHV- 0 350 160440 VT200 Auto 8N No
7 Local DHV- 1 350 160440 VT200 Auto 8N No
8 Local DHV- 2 350 160440 VT200 Auto 8N No
9 Local DHV- 3 350 160440 VT200 Auto 8N No
10 Local DHV- 4 350 160440 VT200 Auto 8N No
11 Local DHV- 5 350 160440 VT200 Auto 8N No
12 Local DHV- 6 350 160440 VT200 Auto 8N No
13 Local DHV- 7 350 160440 VT200 Auto 8N No
14 Local DZ - 0 340 160100 VT200 9600 8N No
15 Local DZ - 1 340 160100 VT200 9600 8N No
16 Local DZ - 2 340 160100 VT200 9600 8N No
17 Local DZ - 3 340 160100 VT200 9600 8N No
CL version number 18.
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 2 none (spooled) [LC,LFOUT,LFIN,CR,CTRL,DTR]
CL1 none none
CL2 none none
CL3 none none
Total installed memory = 4088Kb
Size of unmapped TSX and handlers = 39Kb (114146)
Size of mapped TSX system regions = 78Kb
Total size of TSX and mapped data = 138Kb
Size of mapped device handlers = 4Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 1056Kb
Space available for user jobs = 1832Kb
Swappable job context area = 7Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
QUAN0 = 2
QUAN1 = 20
QUAN1A = 2
QUAN1B = 2
QUAN1C = 1
QUAN2 = 10
QUAN3 = 20
INTIOC = 30
HIPRCT = 40
Spooled devices: LP0 CL0
Logical subset disks:
LD7 --> DU2:TSXTCP.DSK[4800]
Mounted devices:
Device Associated jobs
---------- ------------------------------
DU2: 1
DU2:TSXTCP 1 20
Shared run-time systems:
(none)
Region Size Type Job Use Shared AGE Base
------ ------ ------ --- --- ------ --- ------
WIN01A 3.8 Global 1 1 No No 073010
Program Attributes and Privileges
-------------- -----------------------------------------
DU2:DUP.SAV DUP/PRIV=(SYSPRV,NODEBUG)
DU2:IND.SAV NOWAIT/IND/PRIV=(NODEBUG)
DU2:KED.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:KEX.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:K52.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DU2:LOGON.SAV LOCK/BYPASN/PRIV=(BYPASS,SETNAME,SETPRV,SYSPRV,
NODEBUG)
DU2:PATCH.SAV SINGLECHAR/PRIV=(NODEBUG)
DU2:SETUP.SAV IOPAGE/SETUP/PRIV=(NODEBUG)
DU2:SYSMON.SAV /PRIV=(MEMMAP,NODEBUG)
DU2:TECO.SAV SINGLECHAR/NOWAIT/PRIV=(NODEBUG)
DU2:TRANSF.SAV SINGLECHAR/NOWAIT/NONINTERACTIVE/NOWINDOW/PRIV=(
NODEBUG)
DU2:TSAUTH.SAV BYPASN/PRIV=(NODEBUG)
DU2:TSXUCL.SAV TSXUCL/PRIV=(NODEBUG)
DU2:VTCOM.SAV SINGLECHAR/NOWAIT/MEMLOCK/PRIV=(PSWAPM,NODEBUG)
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: ON,NOKED,NOTTYIN,SUBSTITUTE
VM Base=140000 Top=170000 Size=1536
.
Cobol-Plus :)
.DIR
23-Jul-2014
HELLO .CBL 1 23-Jul-2014
1 Files, 1 Blocks
1521 Free blocks
.SH RUN
CBR063
.TY HELLO.CBL
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
DATA DIVISION.
PROCEDURE DIVISION.
MAIN SECTION.
BEGIN.
DISPLAY "Hello, world!".
STOP RUN.
.COB HELLO
Errors detected: 0
.LIN HELLO
.RU HELLO
Hello, world!
.
Вдруг кому пригодится... Попробовал запустить TELNET сервер без использования статических CL. Получилось... В общем случае, все делал как в инструкции кроме определения CL - у меня все порты описаны как терминальные линии, а CL только как CLXTRA в TSGEN.MAC...
Стартовый файл TCP/IP:
.TY SY:TCPIP.TSX
SET PROCESS/NAME="TCP/IP"
SET CL0 LINE=12,SPEED=9600
SET CL1 LINE=13,SPEED=9600
MOUNT LD7: SY:TSXTCP.DSK TCP:
ASSIGN EQ0: EN0:
ASSIGN EQ1: EN1:
ASSIGN EQ2: EN2:
ASSIGN EQ3: EN3:
!RUN TCP:ENPLAS.SAV !НУЖНО ТОЛЬКО ДЛЯ TSX+ V6.01 И СТАРЕЕ
R ETM /SET
RUN/SINGLE TCP:TCPIP
^1 ^2 ^3 ^4 ^5 ^6
.
Линии:
.SH TE
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT200 9600 8N Yes Console
2 Local DL 300 176500 VT200 9600 8N No DLV11 - 1
3 Local DL 310 176510 VT200 9600 8N No DLV11 - 2
4 Local DL 320 176520 VT200 9600 8N No DLV11 - 3
5 Local DL 330 176530 VT200 9600 8N No DLV11 - 4
6 Local DHV- 0 360 160500 VT200 Auto 8N No DHV11 - 0
7 Local DHV- 1 360 160500 VT200 Auto 8N No DHV11 - 1
8 Local DHV- 2 360 160500 VT200 Auto 8N No DHV11 - 2
9 Local DHV- 3 360 160500 VT200 Auto 8N No DHV11 - 3
10 Local DHV- 4 360 160500 VT200 Auto 8N No DHV11 - 4
11 Local DHV- 5 360 160500 VT200 Auto 8N No DHV11 - 5
12 Local DHV- 6 360 160500 VT200 9600 8N CL0 DHV11 - 6
13 Local DHV- 7 360 160500 VT200 9600 8N CL1 DHV11 - 7
14 Local DZ - 0 350 160100 VT200 9600 8N No DZQ11 - 0
15 Local DZ - 1 350 160100 VT200 9600 8N No DZQ11 - 1
16 Local DZ - 2 350 160100 VT200 9600 8N No DZQ11 - 2
17 Local DZ - 3 350 160100 VT200 9600 8N No DZQ11 - 3
.SH CL
CL version number 18.
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 12 none [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL1 13 none [LC,LFOUT,LFIN,CR,CTRL]
CL2 none none
CL3 none none
.
Cobol-Plus
Мощно! )
http://docs.cntd.ru/document/1200021890
Не помню уже в какой теме зашла речь о попробовать... Вобщем все отлично запустилось без каких-либо переделок на ДВК-4.
RT-11SB (S) V05.07
.D 1000=13700,54,52760,100000,300,104350
.ST 1000
.R DATE
.TSX
* TSX-Plus Version 6.50 *
Copyright (c) 1980,1981,1982,1983,1984,1985,1986,1987,1988,1989, 1990,1991
an unpublished work by S&H Computer Systems, Inc., Nashville, TN, USA
(S&H) covered by U.S. Patent No. 4,642,756. All rights reserved.
This material contains the valuable properties and trade secrets of S&H
and may not be used except by the express written permission of S&H.
Distributed by S&H Computer Systems, Inc.
Licensed for use on a single computer system at TSX-Plus User
License # = 999-T1S-50000
18-Feb-2016 00:09:32
Line # 1
.SH ALL
TSX-Plus Version = 6.50
18-Feb-2016
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 016057 043156 000000 254
DW 0 102453 120000 003700 976 174020 300
LP 0 030003 120000 003671 406 177514 200
NL 0 000025 120000 003670 60
Assignments:
SY --> DW0:
DK --> LD0:
There are no allocated devices
Uptime: 00:00:23
System use: Run=16%, I/O-wait=32%, Swap-wait=50%, Idle=1%
I/O Activity: User I/O=42%, Swapping I/O=54%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 39Kb 00:01:00 00:00:03 KMON
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT52 9600 8N Yes Console
2 Local DL 360 176560 unknown 9600 8N No DLV11 - 1
CL version number 18.
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 none none
Total installed memory = 256Kb
Size of unmapped TSX and handlers = 31Kb (074240)
Size of mapped TSX system regions = 77Kb
Total size of TSX and mapped data = 119Kb
Size of mapped device handlers = 1Kb
Size of sharable run-time systems = 54Kb
Size of data cache buffer area = 0Kb
Space available for user jobs = 80Kb
Swappable job context area = 7Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
QUAN0 = 2
QUAN1 = 20
QUAN1A = 2
QUAN1B = 2
QUAN1C = 1
QUAN2 = 10
QUAN3 = 20
INTIOC = 30
HIPRCT = 40
Spooled devices: LP0
Logical subset disks:
LD0 --> DW0:WORK.DSK[10240]
Mounted devices:
Device Associated jobs
---------- ------------------------------
DW0: 1
DW0:WORK 1
Shared run-time systems:
CBR063
Region Size Type Job Use Shared AGE Base
------ ------ ------ --- --- ------ --- ------
WIN01A 3.8 Global 1 1 No No 003560
Program Attributes and Privileges
-------------- -----------------------------------------
DW0:DUP.SAV DUP/PRIV=(SYSPRV,NODEBUG)
DW0:IND.SAV NOWAIT/IND/PRIV=(NODEBUG)
DW0:KED.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DW0:KEX.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DW0:K52.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DW0:LOGON.SAV LOCK/BYPASN/PRIV=(BYPASS,SETNAME,SETPRV,SYSPRV,
NODEBUG)
DW0:PATCH.SAV SINGLECHAR/PRIV=(NODEBUG)
DW0:SETUP.SAV IOPAGE/SETUP/PRIV=(NODEBUG)
DW0:SYSMON.SAV /PRIV=(MEMMAP,NODEBUG)
DW0:TECO.SAV SINGLECHAR/NOWAIT/PRIV=(NODEBUG)
DW0:TRANSF.SAV SINGLECHAR/NOWAIT/NONINTERACTIVE/NOWINDOW/PRIV=(
NODEBUG)
DW0:TSAUTH.SAV BYPASN/PRIV=(NODEBUG)
DW0:TSXUCL.SAV TSXUCL/PRIV=(NODEBUG)
DW0:VTCOM.SAV SINGLECHAR/NOWAIT/MEMLOCK/PRIV=(PSWAPM,NODEBUG)
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: ON,NOKED,NOTTYIN,SUBSTITUTE
VM not installed
.DIR SY:/DA
18-Feb-2016
SYSMON.SAV 80 18-Feb-2016 TSXMOD.SAV 79 18-Feb-2016
TSKMON.SAV 150 18-Feb-2016 TSX .SAV 257 18-Feb-2016
TSXIND.TSX 252 18-Feb-2016 TSXUCL.TSX 108 18-Feb-2016
TSXSPL.TSX 501 18-Feb-2016 TSXSWP.TSX 2538 18-Feb-2016
TSXRSF.TSX 256 18-Feb-2016 STRTSB.COM 1 18-Feb-2016
10 Files, 4222 Blocks
18604 Free blocks
.BO
[System shutdown]
Connect=00:01:00 CPU=00:00:10
RT-11SB (S) V05.07
.D 1000=13700,54,52760,100000,300,104350
.ST 1000
.R DATE
.
Не помню уже в какой теме зашла речь о попробовать... Вобщем все отлично запустилось без каких-либо переделок на ДВК-4.
так а как же с драйверами my,dw они что от rt11 подошли?
так а как же с драйверами my,dw они что от rt11 подошли?
DW прекрасно подошел (разумеется от XM), MY не пробовал, но по идее тоже подойдет без переделок и без траты нижней памяти.
- - - Добавлено - - -
Добавлю, что также не возникло проблем с большим диском (1024 cyl, 8/16) - единственный найденный в виде исходников драйвер все это прекрасно осилил (хотя сам драйвер кривой в плане загрузчика).
Патчик для запуска TSX+ V6.50 на быстрых эмуляторах где код выполняется слишком быстро, чтобы TSX сумел определить наличие таймера.
Использование:
.LIB/EX TSX1 TSINIT.OLD
Global? TSINIT
Global?
.MAC/OB:PATCH TSINIT.PAT
.PAT TSINIT.OLD,PATCH TSINIT
.LIB/DEL/OBJ:TMP TSX1.OBJ
Module name? TSINIT
Module name?
.LIB/INS/OBJ:TSX1 TMP TSINIT
.$@TSXLNK
DW прекрасно подошел (разумеется от XM) Так обязан.
А что, эта 6.50 с исходниками, да?
Патчик для запуска TSX+ V6.50 на быстрых эмуляторах где код выполняется слишком быстро, чтобы TSX сумел определить наличие таймера. Неужели Патрон дошел до беты?
Так обязан.
Конкретно DW - да - сделан совместимо, а вообще - драйвер от XM отнюдь не обязан подойти :)
А что, эта 6.50 с исходниками, да?
Если бы с исходниками - то и патча не нужно :)
Но OBJ легко дизассемблится со всеми глобальными именами, а дальше создать патч для OBJ - минутное дело. Обычно... Конкретно для модуля TSINIT это весьма сложное дело ибо там места нет чтобы что-то впихнуть. Пришлось укомпресить процедуру инициализации страниц MMU и в освободившемся месте разместить нужное...
Неужели Патрон дошел до беты?
Нет, но как бы нормальных эмуляторов полно :)
Патроновский несет надежду конкретно на ВМ3 - чтобы под рукой был для тестов, ибо ДВКшное железо я более-менее и в E11 могу потестить, а вот вставлять туда эмуляцию ВМ3 неохота :)
Конкретно DW - да - сделан совместимо, а вообще - драйвер от XM отнюдь не обязан подойти Так я, как раз, про DW - он же без всяких фокусов, вроде DMA и пр. - чистый PIO-Mode, единственное прерывание, MAPH его, и вперед!
Если бы с исходниками А, я бегло глянул, увидел "Source code" в цитате Lyle Bickley, а "was accidentally lost by S&H" не разглядел. :(
Нет, но как бы нормальных эмуляторов полно Угу, но у них нет поддержки DW, а без него я не могу взяться за ДИАМС.
он же без всяких фокусов
Более того, все фокусы в нем выполняются через PAR1 (как положено в TSX), а не через PAR6 как принято в RT-11... Правда не стал смотреть что ему от P1EXT надо - лень было :)
Source code
Есть листинги. Для 6.50 не видел, но для 6.40 на bitsavers есть - в прнципе если толпой навалиться - можно понемногу перевести в подходящий вид - не так их там и много...
Угу, но у них нет поддержки DW
Поддержки MY тоже не было в E11, но я ее сделал минут за 20 (тогда еще в принципе не знал как MY работает - разбирался с нуля).
Интересно, откуда Потемкин взял исходник TSx+ 6.01? В том ПРОшном TSX-е, который мы запускали на Хомере год назад, присутствует исходник TSKMN1, в который Потемкин и компания вписали свою привязку к серийнику 85-й, а заодно и SL от Сторожевых (он, кстати, тоже входил в команду Потемкина, или как?). Так вот, интересно, ГДЕ ОНИ ВЗЯЛИ этот исходник?
исходник TSx+ 6.01
Видимо когда-то это можно было достать, но держалось в секрете... На моей памяти попадалось много RAFOS/TS со всякими довесками и подарочными надписями, и судя по всему это делалось на уровне исходников, а не патчей, хотя кто знает... А РАФОС/TS это тоже древний TSX. А привязка к сериалу в TSX и родная есть, но возможно это была самоделка из непрошного TSX (я вроде делал тест по STB файлу, но результаты в памяти не отложились).
Еще вопрос. Тут где-то пробежало, что TCP/IP, вроде-бы, не сильно интегрирован в TSX 6.50, так вот, а в 6.01 он, случайно, не заведется?
Поддержки MY тоже не было в E11, но я ее сделал минут за 20 Не умею я этого. Подозреваю, что это не сильно сложно, но нужен еще и дисплей с переключением рус/лат по ctrl-N/O, в общем буду ждать эмулятор Патрона, хотя бы бету.
А привязка к сериалу в TSX и родная есть Похоже, они ее не нашли. Или, как вариант, может там серийник открыто хранится? Эти орлы его зашифровали...
Еще вопрос. Тут где-то пробежало, что TCP/IP, вроде-бы, не сильно интегрирован в TSX 6.50, так вот, а в 6.01 он, случайно, не заведется?
Про интеграцию в 6.50 написано видимо только на википедии. Безосновательно - ничего такого разумеется нет (может перепутали с TSX-32 от того же S&H). А так - пакет TCP/IP для TSX+ есть. В 6.01 прекрасно работает. Единственная разница с 6.50 только в том, что нужно вручную запустить программу создания региона для драйвера (6.01 еще не поддерживал регионы драйверов). Все тут (http://shop-pdp.net/) есть.
Похоже, они ее не нашли. Или, как вариант, может там серийник открыто хранится? Эти орлы его зашифровали...
Я не копался - прошник презираю (как и сам DEC его презирал, о чем откровенно и говорил) :)
Листинги прошные есть на bitsavers...
- - - Добавлено - - -
Патч аналогичный тому что выше для TSX+ V6.01 (не прошному [хотя может и подойдет - надо смотреть]).
Начал урывками в свободное время понемногу восстанавливать исходники TSX-Plus V6.40 из листингов (http://bitsavers.trailing-edge.com/pdf/dec/pdp11/tsxPlus/listings/6.40/). У кого есть интерес, просьба помочь в этом нелегком деле - вместе быстрее добьемся результата.
Кто берется за файлы - просьба отписываться здесь, чтобы не дублировать работу.
Для упрощения последующего приведения всего в порядок и поиска возможных ошибок, просьба не поддаваться на нестерпимые желания исправить ошибки, улучшить дурацкое, а так же поправить коментарии (в том числе поменять регистр букв, исправить опечатки итд) - все это сделаем потом :)
Там где в листинге номера строк снова начинаются с 1, просьба вставлять в текст символ <FF> (CTRL/L).
На данный момент готовы файлы TSOVR.MAC, OHANDL.MAC, TSNAME.MAC и почти закончен TSINIT.MAC (он пригодится намного раньше чем работа будет закончена).
Беру 05_05_tstio_19890117.pdf
@form (http://zx-pk.ru/member.php?u=4895),
взял
08_03_tsem2_19890118.pdf
08_04_tsem3_19890118.pdf
Сделал страничку (http://pdp-11.org.ru:10080/) с текущим состоянием дел. Пусть поработает Web сервер, написанный на BASIC-PLUS-2 :)
Command: EX
DU1:[TSX]TSINIT.MAC;17 4409 lines
Уф. Еще много :)
По ходу дела выяснилось, что TSX не требует SYSGEN-соответствия от драйвера. Проверяется только MMGT$ - он обязателен, а остальные биты только учитываются, чтобы правильно заполнить вектор в конце драйвера.
SYSGEN-соответствия от драйвера form, может надо и 6.0 RT-11 модифицировать подобным образом )
По теме:
Ты можешь кусочек из готового файла показать для примера к какому виду надо привести.
Меня смущают вот это адреса\ячейки\смещения(???) столбцы как от дизассемблера(?) ! Я в двух шагах до текстового воплощения взятых файлов.
RT-11 модифицировать
Для RT-11 и так исходники есть от 5.7 почти всего :)
кусочек из готового файла показать для примера
На CTAKAHе лежит в SW:[TSX] - можно открыть с помощью EDT - там видно как выглядит. Отступы где можно (то есть почти везде) делаются TABами, страницы разбиваются FFами. Можно и директиву .PAGE вписать вместо FF (С точки зрения листинга отличить нельзя так как директива вырезается). На CTAKAHе EDT настроен так, что FF вставляется по CTRL/F, в K52 вроде можно CTRL/L нажать.
Самое главное - TABы, а не куча пробелов и сохранение оригинального текста пока - так будет прозще потом отлавливать ошибки. Хотя руки так и чешутся порой косяки поправить :D
TSINIT.MAC готов. Осталось проверить и можно сразу в дело пускать для небольших переделок в существующих дистрибах TSX.
Так в каком состоянии проект сейчас?
Так в каком состоянии проект сейчас?
Там где и остановиля в последний раз :)
Видимо со временем туго у всех.
У меня TSINIT.MAC был переведен в текст, но проверка не была завершена на ошибки.
Это я прикидываю драйвер AZ для ХМ, ну, и смотрел, что надо, чтобы он сразу подошел для TSX. Кроме PA1 требования есть?
- - - Добавлено - - -
И еще. Когда мне выдадут адрес для пересылки данных, блок (256 слов) туда всегда влезает?
- - - Добавлено - - -
Ну, кроме случая, когда он последний и неполный...
я Олегу сдал только заголовок набитый у 1-го из двух файлов, по многим причинам и прикинув потраченное на них время, честно насколько это возможно отказался от дальнейшей набивки, имхо лучше так, чем молчать продолжая сеять какие то несбыточные ожидания. как то так.
на 85-й я хотел потестить TSX.
Там оказывается DW обязателен, на одних дискетах не даёт.
Странное дело, скопировал TSX на DW, после скопировал RT11 5.07 и copy/boot того же RT. Перезагружаюсь на экране надпись Электроника и всё.
RT11 5.07
Сейчас уже не вспомню, но кажется не все варианты 5.07 которые в сети ходят с живым драйвером PI. Драйвер от более старой RT-11 в принципе тоже работал (хотя и принципы хуков изменились начиная с 5.5). Я где-то вроде выкладывал вариант который точно запускается на прошнике.
TSX который тут упоминался у меня тоже получалось запустить.
Использовать 5.07 со старыми TSX не рекомендую - могут возникнуть проблемы. Я зафиксировал как минимум проблемы с DECовскими редакторами вроде KED/K52 из новых систем: видя достаточно новую версию RT-11 (а TSX ее просто копирует), они пробуют пользоваться новыми вызовами (вроде .CLOSZ) которые не будут работать. В качестве workaround можно перед запуском TSX подправить версию RT-11 в RMON (пример команд тоже где-то выклыдывал).
Сейчас уже не вспомню, но кажется не все варианты 5.07 которые в сети ходят с живым драйвером PI.
Я образ 5.07 брал от AFZ. В эмуле загружается а пропадает когда уже из монитора запускаю TSX.
В эмуле загружается а пропадает когда уже из монитора запускаю TSX.
TSX еще нужно проверять что там сконфигурено прежде чем запускать.
Загрузился на Электронике с RT11 5.02 (правда клавиатуру мне на QWERTY переделал)
Далее TSX.
*TSX-Plus <System VI> *
License # = 999-TPS-0
Line # 1
01-DW0> Set ucl last
01-DW0> Kill 2
01-DW0> _r pip tt:*.*=sy:vt200.esc
?PIP-F-File not found SY:VT200.ESC
01-DW0>
- - - Добавлено - - -
Ну с 5.07 дела такие:
Записал на голый винт RT11 v5.07 далее copy/boot и делаю перезагрузку.
На экране показывает Электроника и через некоторое время рисует скелет электроники без закрашивания каких либо плат и код ошибки-
051124
000002
В общем дело не в TSX.
P.S. Этот же образ 5.07 в эмуляторе грузится.
Загрузился на Электронике с RT11 5.02 (правда клавиатуру мне на QWERTY переделал)Странно, должна быть JCUKENG. Что-то не то с драйвером PI.
Далее TSX.TSX пошел, и это отлично!
Ну с 5.07 дела такие: А из 5.07 TSX не загрузится ни при каком раскладе - драйвер PI слишком толстый, при этом в нижних 56К остается недостаточно места для стартера TSX.
Если сильно хочется 5.07, то надо взять ее оригинал с дистрибутива. То, что лежит на моей дискете - это результат моих попыток ужать ее, чтобы оно, все-таки, попыталось запуститься, наверное я при этом что-то таки попортил. Но из-под 5.07 TSX по-любому не запустишь. Зато можно загрузить XM, с ним в виртуальном режиме памяти для задач RT-11 сколько угодно.
Впрочем, под TSX то же самое, там на любой терминальной линии (неважно, реальной или виртуальной) предоставляется виртуальная XM. Скорость, конечно, будет поменьше - ведь ЦП разделяется между несколькими терминальными линиями.
Да, а клавиатура под TSX какая? Должна быть jcukeng...
И ещё.
TSX использует драйверы от ХМ, где в образе таковых нет. Да и монитор SB вроде как не работает на Эл 85. Минимум FB. С образом 5.02 как раз FB и работал.
TSX использует драйверы от ХМ, где в образе таковых нет Да, только их переименовывают из ddX.SYS в dd.TSX
Да и монитор SB вроде как не работает на Эл 85. Минимум FB. SB - это не SJ. SJ - да, на 85-й не работает. А SB - это FB с нулевым количеством оперативных задач. FB, как известно, может выполнять фоновую задачу и от одной до семи оперативных задач. А у SB - 0 оперативных задач, но вся организация у него, как у FB, а не тот примитив, которым является SJ.
Если сильно хочется
Не, не хочется. Я это для Вас делал.
А SB - это FB с нулевым количеством оперативных задач.
Значит образ кривой...
Не, не хочется. Я это для Вас делал. Спасибо. TSX на реальной 85-й завелся, и это радует! Да, кстати, а клавиатура у него какая: QWERTY или JCUKENG ?
Значит образ кривой... По всей видимости, я, в стремлении ужать его, что-то накосячил. Но и бог с ним, я и не надеялся, что оно пойдет из-под 5.07, пошло из-под 5.02, и отлично! Спасибо!
Да, кстати, а клавиатура у него какая: QWERTY или JCUKENG ?
На RT11 QWERTY, на TSX JCUKEN.
- - - Добавлено - - -
пошло из-под 5.02, и отлично!
Ну так криво пошло. Нет VT200.ESC, убит 2 (процесс?).
Но из-под 5.07 TSX по-любому не запустишь.
Может и запустишь. Надо посмотреть на досуге.
Прошный вариант конечно нагруженный, но и мой вариант с DHV и MSCP/TMSCP не маленький, а вполне себе запускается из далеко не минимального SB.
На RT11 QWERTY, на TSX JCUKEN.Это я, похоже, положил на дискету с RT-11 V5.02 не тот драйвер PI.SYS, понятия не имею, где я его такой взял...
Ну так криво пошло. Нет VT200.ESC, убит 2 (процесс?). Это мелочи. TSX уже работает, это результат исполнения стартового командного файла STARTS.TSX, теперь надо вдумчиво комплектовать набор софта на винчестере. Если это кому-нибудь надо, то есть, кто-то реально соберется держать 85-ю под TSX-ом, могу заняться, когда будет время. А так, меня вполне устраивает и этот результат - TSX в реале завелся, все ОК. Желающие могут сгенерить собственный вариант TSX, материалы все выложены в той теме чуть раньше.
Впрочем, я потихоньку планирую еще раз заняться TSX-ом, на этот раз, для ДВК - как только сделаю XM-овский драйвер для AZ, так сразу и займусь. Но это будет ближе к осени...
Желающие могут сгенерить собственный вариант TSX, материалы все выложены в той теме чуть раньше.
Можно на досуге патчи Y2K сделать.
Прошный вариант конечно нагруженный, но и мой вариант с DHV и MSCP/TMSCP не маленькийЯ добился, что SB 5.07 оставляет даже чуть больше памяти для фонового раздела, чем FB 5.02, но ПРОшный TSX завешивает эмулятор (Xhomer). А в реале, почему-то, и SB не запускается...
На RT11 QWERTY, на TSX JCUKEN.Вспомнил, зачем там QWERTY. Иначе невозможно (крайне утомительно) набрать что-либо в эмуляторе, который Xhomer.
- - - Добавлено - - -
Для реала лучше взять RT-11 вот здесь (https://yadi.sk/d/n4GyDI-efPmrP). Там, заодно, LAND забавный (HELL).
ПРОшный TSX завешивает эмулятор (Xhomer).
Я именно в xhomer запускал - работало.
Попробовал ту RT-11, которая с LAND'ом. Странно, когда-то, в реале, оно весело загружало TSX, а сейчас в эмуляторе завешивается... Ладно, будет время, еще повоюю, а пока TSX уверенно загружается из-под той самой 5.02, которая выложена вместе со сгенерированным TSX-ом.
Нет VT200.ESC Прямо из-под TSX вызываем EDK, без параметров, на его запрос строки CSI ("*") набираем VT200.ESC, EDK спросит "файл не найден, создадим?", отвечаем Y, набираем 12 и выходим - давим ПФ1 и потом Е. Далее набираем DESS VT200.ESC, давим один раз "R", DESS перерисует экран в побайтовом представлении, исправляем 061062 на 033074 и выходим - давим E, DESS спросит Replace, отвечаем Y, спросит Exit, тоже отвечаем Y и все, можно перезагружаться.
Как-то можно это сделать и сразу посредством EDK, но я не помню, как в нем вызывать ввод управляющего символа, а так файл должен содержать .ASCIZ <033>"<", т.е последовательно байты 033 и 074, а дальше - нули.
Соберу-ка на нотебяке xhomer :)
form, а, кстати, кто там у TSX дефолтно второй задачей? А то в starts.tsx ее первым делом грохают...
- - - Добавлено - - -
Соберу-ка на нотебяке xhomer Линюховый? Я пользую виндовый, который anasana спортил.
кто там у TSX дефолтно второй задачей?
Не понял о чем речь :)
инюховый? Я пользую виндовый, который anasana спортил.
Угу, у меня сейчас линух на нотебяке, опен на роутере и виндовс на стационаре.
А виндового я так и не сумел за все время выпросить :D
- - - Добавлено - - -
Нашел 5.7 (http://pdp-11.online/~form/files/pdp-11/rt11v57-pro.rar) который у меня в xhomer запускался. Тут вроде PI и DW родные. Места немного конечно остается :)
Не понял о чем речьСам глянул, никого. Просто в STARTS.TSX второй командой зачем-то стояло KILL 2, но и без нее по команде WHO показываются только
1* 1(0) ... KMON (т.е. моя задача с консоли) и
3 Det. ... WINPRT Window Print
Никакой второй задачи нет. Может из экономии памяти хотели прибить эту WINPRT, да облажались?
Кстати, хотел еще проконсультироваться по поводу дискового драйвера для XM/TSX, сделать новую тему, или как?
Может из экономии памяти хотели прибить эту WINPRT, да облажались?
А не проще было тогда ее не запускать? :)
- - - Добавлено - - -
Кстати, хотел еще проконсультироваться по поводу дискового драйвера для XM/TSX, сделать новую тему, или как?
Да пусть тут будет :)
- - - Добавлено - - -
из экономии памяти
Особой экономии не получится - он все-равно вылетит в свап и там останется пока кто-то не позовет комбинацией клавиш. А свап все-равно на диске заранее выделяется из расчета на все возможные задачи :)
- - - Добавлено - - -
Посмотрел у себя на том что online - изначально сидит в свапе - никто туда не пинал специально :)
.W
Uptime: 14:43:03
System use: Run=0%, I/O-wait=99%, Swap-wait=0%, Idle=0%
I/O Activity: User I/O=99%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1 1(0) 50 TI 39Kb 14:44:00 00:00:01 KMON
2* 2(0) 50 IN 39Kb 00:02:00 00:00:01 KMON FORM
11 Det. 50 SL-Swap 33Kb 14:44:00 00:00:00 WINPRT Window print
12 Det. 50 SL 63Kb 14:44:00 00:00:00 RTSORT RTSORT
13 Det. 50 SL-Lock 63Kb 14:44:00 00:00:10 TCPIP TCP/IP
.
Нашел 5.7 который у меня в xhomer запускался. Тут вроде PI и DW родные. Места немного конечно остается 5.7 запускается, но у FB для запуска TSX не хватает памяти, а у SB нет таймера. Я вспомнил, тогда мне пришлось перегенерить SB именно из-за таймера.
А не проще было тогда ее не запускать? Может не нашли, где оно запускается...
- - - Добавлено - - -
11 Det. 50 SL-Swap 33Kb 14:44:00 00:00:00 WINPRT Window print А у меня оно просто SL, без Swap...
у SB нет таймера
Это конфигурируемый параметр - можно добавить.
Хотя все-равно видно что памяти очень немного остается после подгрузки PI.
А у меня оно просто SL, без Swap...
Ну значит выпнется когда надо - может его TCP/IP выкинул когда запускался, хотя памяти вроде дофига.
- - - Добавлено - - -
из-за таймера
Я как-то делал вариант который не проверял таймер - для эмуляторов актуально поскольку он на них часто не обнаруживает что сколько-то времени прошло пока выполнялся TSINIT :)
- - - Добавлено - - -
Кстати тут вспомнилось что для запуска TSX собственно не нужна поддержка таймера - он не использует таймерных вызовов при запуске. Он просто смотрит изменилось ли системное время пока он выполнял TSINIT.
Это конфигурируемый параметр - можно добавить. Где?
А вообще не пойму - что-то расколбасило мой эмулятор - то забывает про нажатые Ctrl и Shift, воспринимает только после третьего-четвертого нажатия, сейчас вообще отказался с DW работать: DIR DW - Invalid Directory - INI DW: - Are you sure - Y - DIR DW: - Invalid Directory!..
Где?
В SYSGEN.
Но как уже написал выше, собственно и не нужно - не используется в TSX.
В SYSGEN.
Но как уже написал выше, собственно и не нужно - не используется в TSX. То есть генерить. А что оно не используется в TSX - это понятно, от RT-11 после загрузки TSX не остается ни одного байта. Но, чтобы обойти эту проверку, нужно что-то патчить. Что и где?
Ладно, это лирика. Я вот тут примеряюсь к драйверу XM/TSX для моего контроллера AZ. Так какие требования совместимости драйверов XM и TSX ? PA1 - это я знаю. А еще?
не остается ни одного байта
Остается два байта, и именно в этом может возникнуть трудность при запуске старых версий TSX+ из под новых RT-11 :)
ак какие требования совместимости драйверов XM и TSX ? PA1 - это я знаю. А еще?
Больше вроде ничего не вспоминается особо. В большинстве случаев разницы вообще не будет.
Разбираюсь с ХМ-ными делами.
1. Я правильно понял, что переслав Q$PAR в KPAR1 (172342, предварительно сохранив его) я получу доступ к буферу пользвателя по виртуальному адресу в Q$BUFF?
2. Я правильно понял, что переслав очередной блок по адресу из Q$BUFF командами MOV DATA,(Rx)+ я должен уменьшить на 1000 этот адрес в Rx (т.е. вернуть тот адрес, который был в Q.BUFF) и увеличить на 10 содержимое KPAR1?
3. В руководстве по программированию периферийных устройств для ФОДОС-2 (цельноутянуто с RT-11 V05.0x), как вариант, предлагают переписать программой $P1EXT тот кусок, который выполняет эту передачу, в системный стек и выполнять его оттуда, на случай, если сам драйвер вдруг окажется в зоне системного PA1. Это действительно надо делать?
4. Я правильно понял, что все эти действия можно выполнять на .FORK-уровне?
Остается два байта, и именно в этом может возникнуть трудность при запуске старых версий TSX+ из под новых RT-11, а если будет стартовая дискета навязанная, но 100% рабочая с рекомендацией сделать копию и пользовать с гарантией рабочести только её, выход?
Разбираюсь с ХМ-ными делами.Частично разобрался. На (1) и (2) ответ "Да". На (3) ответ с вариантами. Для ДВК оно на фиг не нужно, а для "нафаршированных" машинок, включая 85-ю, оно таки нужно. Это я заглянул в драйвер DW от 85-й, в смысле ПРОшки. Варианта контроллера AZ для 85-й точно не будет никогда - не буду я его сочинять, а для оригинальных PDP-11, конечно, надо, и Макс собирается разводить такую плату, а вот с дровишками для XM/TSX надо разобраться.
Вероятно, для 11/84 в "нафаршированной" конфигурации тоже потребуется этот перенос куска программы в стек? Или нет?
Ну, как я понимаю, если AZ будет системным, то это дело точно не нужно. Да и, если загрузиться с чего-то другого, а потом, перед обращением к AZ загрузить его драйвер командой LO AZ, то этот драйвер тоже никак не попадет в область PA1. И вообще, как я понимаю, он туда может попасть только будучи загруженным из исполняемой задачи командой .FETCH, да?
Ну и (4). Раз все эти дела весело исполняются на системном уровне, то и на .FORK-уровне оно должно исполняться точно так же, хоть я еще и не проверял. Вскорости попробую добавить в драйвер обслуживание прерываний, вот там это и выяснится...
А вот TSX сходу не пошел, то ли я нагенерил что-то не то, то ли драйвер не совсем правильный...
form, не найдется ли TSX, работающий на ДВК ?
Это пока без прерываний, за них я еще не брался...
1. Я правильно понял, что переслав Q$PAR в KPAR1 (172342, предварительно сохранив его) я получу доступ к буферу пользвателя по виртуальному адресу в Q$BUFF?
Да. На Q-Bus машинах больше ничего особо не надо.
В TSX+ используется PAR6 вроде.
Обычно ничего пересылать не надо, а просто использовать родные $MP*, $GT*/$PT* - тогда и не нужно думать какой там пар.
Я правильно понял, что переслав
Родные подпрограммы сами все что нужно делают.
можно выполнять на .FORK-уровне?
Можно на форк, можно и не на форк - там есть рекомендации сколько инструкций можно на уровне прерывания делать, можно примерно прикинуть вписывается или нет.
Обычно ничего пересылать не надо, а просто использовать родные $MP*, $GT*/$PT* - тогда и не нужно думать какой там пар.Оно-то, конечно, так, только долго. Не зря и в DW, и в DX пересылают своим кодом, а не через эти программы. Тем более, что ни ожиданий не надо, ничего - просто 256 раз выполнить команду MOV @R3,(R2)+ и прочитанный в буфер контроллера блок переедет в память пользователя. Или, наоборот, 256 раз выполнить MOV (R2)+,@R3, и блок из памяти пользователя переползет в буфер контроллера. С учетом команды SOB, которая делает эти повторы, это всего 768 циклов шины, грубо говоря, 1 мс. А вызывать те программы - минимум, десятка два команд, если не больше. То есть время будет измеряться десятками мс, причем далеко не одним десятком. Да, а TSX у меня не пошел, похоже я что-то не то нагенерил. Ну, или что-то не так в драйвере...
Нет ли сгенеренного TSX-а для ДВК ? Чтобы я просто добавил в него DEVDEF <AZ>,MAPH, пересобрал и попробовал? URL?
- - - Добавлено - - -
Да, попробовал собрать TSX на реальном ДВК. Блин, как это до-о-олго! Минут 5 компилится TSGEN.MAC и еще минут 5-7 линкуются все 4 модуля. Против нескольких секунд в эмуляторе...
А еще я знаю, почему наши орлы разбивали TSGEN.MAC на части. Он ведь не лезет в редактор EDK. Категорически не лезет. Пришлось раза 4 подавать команды "Goto Bottom" и "Next".
- - - Добавлено - - -
В TSX+ используется PAR6 вроде. Не-а! Вот твои же слова:
Более того, все фокусы в нем выполняются через PAR1 (как положено в TSX), а не через PAR6 как принято в RT-11... Правда не стал смотреть что ему от P1EXT надо - лень было Вот оно, то самое. P1EXT, кстати, как раз переносит код за его вызовом в системный стек и исполняет его оттуда. На случай, если драйвер окажется в области действия системного PAR1.
И, кстати, эта самая 6.50 где-нибудь выложена? И где TSGEN.MAC, подправленный для ДВК?
- - - Добавлено - - -
Кстати, эти самые фокусы с P1EXT - это единственное, что я не сделал в своем драйвере. Не от этого ли оно у меня валится?
А вот изба фигвам! Действительно, в TSX используется PAR6. А в RT-11 - PAR1. И драйвер, использующий для передачи PAR6 напрямую не годится для RT-11XM, как и наоборот, драйвер с PAR1 не годится для TSX. Внимание, вопрос: таки городить огород с P1EXT, или забить и по-простому генерить драйвер отдельно для TSX, отдельно для XM, посредством условной компиляции?
В общем, TSX у меня кое-как захромал, но еще куча всякого. Например, не идет EDK. На мои нажатия стрелок рисует параграф с буковкой А, В... Что-то надо подкручивать, а что - пока не знаю...
А, В
всё правильно
только это второй код символ, а первый видимо АР2
form, а чем разобрать TSX2.OBJ (который склеен из кучки объектных модулей прямым копированием 1.obj+2.obj...) ? Под RT-11, RSX у меня нет, и я его не знаю...
а чем разобрать TSX2.OBJ
Я его не разбирал - PAT его отлично принимает на входе и дает на выходе такой же.
UPD. Хотя наверное разбирал как-то. Возможно DOBу просто скармливал чтобы посмотреть адреса, а потом патчил неразобранный. Немного отдохну после отдыха и попробую вспомнить :)
Из отпуска вернулся? Прими мои самые глубокие соболезнования по поводу его кончины (в смысле, окончания). :)
Прими мои самые глубокие соболезнования по поводу его кончины
Ну я получил хороший семейный отдых, а остальное там все скучное и ненастоящее :D
Ладно, пока ты в онлайне, давай посовещаемся. Я не стал городить огород с P1EXT и, по-простому, сделал еще один параметр генерации - TSX$, если он взведен, генерится обмен через PAR6, если нет - через PAR1. То есть, конечно, оно коряво, я и сам понимаю, плюс нельзя просто переименовать XM-овский драйвер в .TSX, надо перегенерить. Но оно работает, а воевать с P1EXT - это еще несколько команд, а их и так уже 208 слов. Так что делать, пусть будет так, или все же переиграть через P1EXT ?
Так что делать, пусть будет так, или все же переиграть через P1EXT ?
Сейчас думается еще плохо, а надо еще в работу войти после отдыха - там за это время всяких задач понакопилось.
В свое время я смотрел на прилагаемые к дистрибутиву .SLP файлы для оригинальных драйверов, применял их к оригиналу и смотрел что получилось. Там как раз добавляется проверка параметра генерации TSX$P вроде и в зависимости от этого меняются некоторые вещи.
Тут вот подал TSX-у команду SH INS и получил такую картинку
.SH INS
Program Attributes and Privileges
-------------- -----------------------------------------
AZ2:DUP.SAV DUP/PRIV=(NODEBUG)
AZ2:IND.SAV NOWAIT/IND/PRIV=(NODEBUG)
AZ2:KED.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
AZ2:KEX.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
AZ2:K52.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
AZ2:LOGON.SAV LOCK/BYPASN/PRIV=(BYPASS,SETNAME,SETPRV,SYSPRV,
NODEBUG)
AZ2:PATCH.SAV SINGLECHAR/PRIV=(NODEBUG)
AZ2:SETUP.SAV IOPAGE/SETUP/PRIV=(NODEBUG)
AZ2:SYSMON.SAV /PRIV=(MEMMAP,NODEBUG)
AZ2:TECO.SAV SINGLECHAR/NOWAIT/PRIV=(NODEBUG)
AZ2:TRANSF.SAV SINGLECHAR/NOWAIT/NONINTERACTIVE/PRIV=(NODEBUG)
AZ2:TSAUTH.SAV BYPASN/PRIV=(NODEBUG)
AZ2:TSXUCL.SAV TSXUCL/PRIV=(NODEBUG)
AZ2:VTCOM.SAV SINGLECHAR/NOWAIT/MEMLOCK/PRIV=(PSWAPM,NODEBUG)
. Внимание, вопрос: как рулить этими делами? Есть ли какая-то программа, которой можно подключить туда, допуcтим, EDIK (EDK), с теми же параметрами, что и KED/K52 Или это надо править DESS'ом что-то в самом EDK ?
Второй вопрос: как пользоваться SETSIZ'ом? Руководство кде-нибудь выложено?
Внимание, вопрос: как рулить этими делами? Есть ли какая-то программа, которой можно подключить туда, допуcтим, EDIK (EDK), с теми же параметрами, что и KED/K52 Или это надо править DESS'ом что-то в самом EDK ?
В TSGEN.MAC вроде можно было прописать. Ну и собственно командой INS сделать.
Второй вопрос: как пользоваться SETSIZ'ом? Руководство кде-нибудь выложено?
Руководства все на bitsavers есть. Точно не помню в каком именно - скорее в system manager, но может и в user ref.
http://pdp-11.org.ru/images/docs.jpg
AFZ, http://pdp-11.org.ru/info.pl на этой страничке есть раздел мануалов под TSX+
TSX-Plus
Файл Размер Описание
tsxp-inst.zip (http://pdp-11.org.ru/files/docs/tsx/tsxp-inst.zip) 3.74 Mb TSX-Plus Installation Guide
tsxp-progref.zip (http://pdp-11.org.ru/files/docs/tsx/tsxp-progref.zip) 10.18 Mb TSX-Plus Programmer's Reference Manual
tsxp-sysmgr.zip (http://pdp-11.org.ru/files/docs/tsx/tsxp-sysmgr.zip) 6.17 Mb TSX-Plus System Manager's Guide
tsxp-usrref.zip (http://pdp-11.org.ru/files/docs/tsx/tsxp-usrref.zip) 8.36 Mb TSX-Plus User's Reference Manual
tsxp631-relnot.zip (http://pdp-11.org.ru/files/docs/tsx/tsxp631-relnot.zip) 1.40 Mb TSX-Plus V6.31 Release Notes
:confused_std:
на этой страничке есть раздел мануалов под TSX+
Не помню какая у меня там версия.
У меня есть документация до v6.40, сам 6.40 я так же перевел в комбинированный вариант PDF в котором поиск работает. Будет время - вытащу из архивов.
- - - Добавлено - - -
Кстати, не отправить ли кому советскую документацию что на фотографии выше?
Жена будет счастлива :D
Кстати, не отправить ли кому советскую документацию что на фотографии выше?<br> https://zx-pk.ru/threads/30693-politekhnicheskaya-ekspozitsiya-v-muzee-mgiet-niu.html
Кстати, не отправить ли кому советскую документацию что на фотографии выше?
Я могу забрать :)
Я могу забрать
Пиши адрес в личку, где-нибудь в конце августа доберусь до почты :)
Перелопатил TSX+ V6.01, пропатчил на предмет Y2K, восстановил TSGEN.MAC и TSXLNK.COM в том виде в каком они были изначально.
Теперь процедура генерации соответствует документации.
В архиве также лежит файл RUNTSX.COM, предназначенный для запуска TSX из под RT-11 V5.5 и новее (если запускать обычным способом, KED откажется сохранять отредактированные файлы [других проблем не замечено]).
14-Mar-2014
Volume ID: TSX+ V6.01
Owner : FORM
CCL .SAV 43P 26-Dec-1986 FILTIM.SAV 3P 14-Mar-2014
LOGON .SAV 8P 26-Dec-1986 SETSIZ.SAV 4P 26-Dec-1986
TSAUTH.SAV 22P 26-Dec-1986 TSPAT .SAV 4P 26-Dec-1986
TSXDB .SAV 2P 26-Dec-1986 TSXPM .SAV 7P 26-Dec-1986
TSXUCL.SAV 6P 26-Dec-1986 WINPRT.SAV 8P 26-Dec-1986
SYSODT.REL 8P 26-Dec-1986 CR .TSX 3P 26-Dec-1986
CT .TSX 6P 26-Dec-1986 DD .TSX 5P 26-Dec-1986
DL .TSX 5P 26-Dec-1986 DM18 .TSX 5P 26-Dec-1986
DM22 .TSX 5P 26-Dec-1986 DP .TSX 3P 26-Dec-1986
DS .TSX 3P 26-Dec-1986 DT .TSX 3P 26-Dec-1986
DU .TSX 4P 26-Dec-1986 DX .TSX 4P 26-Dec-1986
DY .TSX 4P 26-Dec-1986 LP .TSX 2P 26-Dec-1986
LS .TSX 3P 26-Dec-1986 MM .TSX 10P 26-Dec-1986
MS .TSX 11P 26-Dec-1986 MT .TSX 9P 26-Dec-1986
NL .TSX 2P 26-Dec-1986 PC .TSX 2P 26-Dec-1986
RF .TSX 3P 26-Dec-1986 RK .TSX 3P 26-Dec-1986
VM .TSX 2P 26-Dec-1986 XL .TSX 4P 26-Dec-1986
RTSORT.TSX 1P 26-Dec-1986 WINPRT.TSX 1P 26-Dec-1986
DTSUB .OBJ 5P 26-Dec-1986 FTSUB .OBJ 1P 26-Dec-1986
SYSMON.OBJ 70P 14-Mar-2014 TSCASH.OBJ 10P 26-Dec-1986
TSCLO .OBJ 18P 26-Dec-1986 TSDBUG.OBJ 25P 26-Dec-1986
TSDUMP.OBJ 25P 26-Dec-1986 TSEM2 .OBJ 33P 14-Mar-2014
TSEM3 .OBJ 14P 26-Dec-1986 TSEM4 .OBJ 16P 26-Dec-1986
TSEXC2.OBJ 40P 26-Dec-1986 TSKM2A.OBJ 52P 14-Mar-2014
TSKM2B.OBJ 19P 26-Dec-1986 TSKSHO.OBJ 45P 26-Dec-1986
TSKST1.OBJ 70P 26-Dec-1986 TSKST2.OBJ 36P 26-Dec-1986
TSLOCK.OBJ 16P 26-Dec-1986 TSMIO .OBJ 6P 26-Dec-1986
TSMSG .OBJ 7P 26-Dec-1986 TSPLAS.OBJ 18P 26-Dec-1986
TSRTX .OBJ 6P 26-Dec-1986 TSSLE .OBJ 23P 26-Dec-1986
TSSPOL.OBJ 14P 26-Dec-1986 TSSWAP.OBJ 6P 26-Dec-1986
TSTIOX.OBJ 7P 26-Dec-1986 TSTTY .OBJ 40P 26-Dec-1986
TSTTY2.OBJ 5P 26-Dec-1986 TSUSR .OBJ 28P 26-Dec-1986
TSWIN .OBJ 29P 26-Dec-1986 TSXMOA.OBJ 18P 26-Dec-1986
TSXMOB.OBJ 17P 26-Dec-1986 TSXMOD.OBJ 55P 26-Dec-1986
TSXMOT.OBJ 23P 26-Dec-1986 TSX1 .OBJ 148P 26-Dec-1986
TSX2 .OBJ 115P 14-Mar-2014 DTSUB .MAC 44P 26-Dec-1986
FTSUB .MAC 6P 26-Dec-1986 CT501 .SLP 3P 26-Dec-1986
CT502 .SLP 3P 26-Dec-1986 DD501 .SLP 3P 26-Dec-1986
DD502 .SLP 3P 26-Dec-1986 DL501 .SLP 9P 26-Dec-1986
DL502 .SLP 9P 26-Dec-1986 DM501 .18 7P 26-Dec-1986
DM501 .22 8P 26-Dec-1986 DM502 .18 7P 26-Dec-1986
DM502 .22 8P 26-Dec-1986 DX501 .SLP 3P 26-Dec-1986
DX502 .SLP 3P 26-Dec-1986 DY501 .SLP 3P 26-Dec-1986
DY502 .SLP 3P 26-Dec-1986 DY51B .SLP 3P 26-Dec-1986
FSM501.SLP 8P 26-Dec-1986 FSM502.SLP 8P 26-Dec-1986
LS501 .SLP 3P 26-Dec-1986 LS502 .SLP 3P 26-Dec-1986
LS51C .SLP 3P 26-Dec-1986 TJ501 .SLP 5P 26-Dec-1986
TJ502 .SLP 5P 26-Dec-1986 TM501 .SLP 5P 26-Dec-1986
TM502 .SLP 5P 26-Dec-1986 TS501 .SLP 7P 26-Dec-1986
TS502 .SLP 6P 26-Dec-1986 TS51C .SLP 7P 26-Dec-1986
XL501 .SLP 3P 26-Dec-1986 XL502 .SLP 3P 26-Dec-1986
XL51C .SLP 3P 26-Dec-1986 SETSIZ.COM 1P 26-Dec-1986
TSXLNK.COM 2P 14-Mar-2014 TSXCND.MAC 3P 26-Dec-1986
TSGEN .MAC 209 14-Mar-2014
107 Files, 1692 Blocks
94 Free blocks
Процесс сборки:
.MAC TSGEN
.@TSXLNK
.R LINK
*TSX[250],TSX/A,TSX[60]=TSGEN,TSX1/Q/P:300.//
*TSTTY/O:1
*TSTTY2/O:1
*TSEM2/O:1
*TSEM3/O:1
*TSEM4/O:1
*TSTIOX/O:1
*TSSWAP/O:1
*TSPLAS/O:1
*TSUSR/O:1
*TSSPOL/O:1
*TSLOCK/O:1
*TSMSG/O:1
*TSRTX/O:1
*TSCASH/O:1
*TSMIO/O:1
*TSSLE/O:1
*TSWIN/O:1
*TSCLO/O:1
*TSDBUG/O:1
*TSDUMP/O:1
*TSEXC2/O:1//
Load section:address? TSXEND:120000
Load section:address?
*TSKMON[120]=TSX2,TSX.STB/Y:40000/P:700/C
*TSKM2A/O:1/C
*TSKM2B/O:1/C
*TSKST1/O:1/C
*TSKST2/O:1/C
*TSKSHO/O:1
Boundary section? $OTABL
?LINK-W-Multiple definition of $OVRH
*SYSMON=TSX.STB,SYSMON
*TSXMOD=TSXMOD,TSX.STB/Y:40000/C
*TSXMOA/O:1/C
*TSXMOB/O:1/C
*TSXMOT/O:1
Boundary section? $OTABL
?LINK-W-Multiple definition of $OVRH
*^C
.
При сборке выдаются предупреждения "?LINK-W-Multiple definition of $OVRH" - это нормальное поведение, описанное в документации...А где оно выложено? У Хобота лежит какой-то 6.01 Y2k, но TSGEN.MAC там поделеный на 3 части, а не собран в оригинальный вид...
Да, если что, цитируемая мессага от марта 2014...
А где оно выложено?
http://archive.pdp-11.org.ru/ukdwk_archive/dwkwebcomplekt/tsxp601_Y2k_orig/ -читайте шпоры к выложенному (где нет там нет)
и эту тему...
Интересно, откуда Потемкин взял исходник TSx+ 6.01? В том ПРОшном TSX-е, который мы запускали на Хомере год назад, присутствует исходник TSKMN1, в который Потемкин и компания вписали свою привязку к серийнику 85-й, а заодно и SL от Сторожевых (он, кстати, тоже входил в команду Потемкина, или как?). Так вот, интересно, ГДЕ ОНИ ВЗЯЛИ этот исходник?Разобрался.Не было у Потемкина исходников. Это качественный дизасм. Просто я тогда читал ту часть, которую Потемкин и его команда дописали сами, а на остальное не смотрел. А остальное оказалось дизасмом, правда качественным, ребята хорошо над ним поработали...
А где оно выложено?
Я из аттачей много чего почистил ибо здесь с этим совсем плохо (было?) - место мгновенно кончалось.
Лежит здесь (http://pdp-11.online/~form/files/pdp-11/tsx/).
Да, кстати, о сборке TSX
В системе в которой я собирал не хватило памяти для таблицы символов LINK, пришлось поправить TSXLNK.COM (в том варианте, что он мне достался так и было):
R LINK
заменить на
R VBGEXE
SY:LINKНа реальной машинке - безусловно, XM и VBGEXE. И LINK под ними запускать, и MACRO. Всё работает заметно быстрее. Особенно Макро - чуть ли не вдвое быстрее, если не путаю. А в эмуляторе мне вполне хватило просто дать команду
SET USR SWAP
Ну, будет собираться не 6 секунд, а 7...
Давно в этой теме ничего не писалось...
А я как раз сейчас регулярной работой по PDP-11 занимаюсь в TSX+ который у меня online выставлен.
Разные размышления...
Когда-то в старые добрые времена был у нас RAFOS/TS.
Многие до сих пор верят, что это была самостоятельная система, но это был таки TSX+ V4 - тот самый, что еще не сигналил официально о том, что это TSX, но с помощьтю .SERR и TSX EMT это можно было проверить.
Все там казалось поросто: утверждается, что SY:*.(TSX,SYS) недоступны простому пользователю (разных уровней привилегий тогда еще не было) - так вроде и недоступны - вон, TY SY:START01.TSX ругается!.
А дальше в то время не думалось: система-то не прижилась на фоне использующегося RSX.
Сейчас вот работаю в TSX+ V6.50 (последний, Y2K из коробки [хоть и не без косяков которые пришлось правимть]), и вижу, что оптимизм того времени был преждевременным :)
Начнем с простого: может ли простой (в терминах TSX V5+ не имеющий соответствующих привилегий) пользователь читать файлы SY:*.(TSX,SYS)?
Казалось бы документация однозначно отвечает: ан фиг там - достаточно попробовать выполнить команду TY SY:START01.TSX (или [о, ужас] COP SY:ACCESS.TSX DK:) как станет ясно, что бодрые рассуждения разбились о реальность :)
В RT-11V5 утилита PIP окончательно забыла про файлы и стала работать только напрямую (с источником).
Да и утилита тут непричем.
В TSX нет своих утилит, а чтобы работали DIR, PIP, DUP и прочее - всем даются привилегии NFSREAD/NFSWRITE, а если их отобрать - пропадет элементарный функционал команд.
На текущий момент все, что придумалось (и мельком такой вариант упоминается, хоть и в другом контексте) - это командой ACCESS выдать права к конкретным файлам на SY: (с использованием *) на чтение, но не к самому SY:.
Более кривой вариант - скопировать куда-нибудь то, что можно DIR/COPить и переназначить туда SY: (в TSX допускается) - криво, но хоть как-то :)
В общем пока так:
.SET PROC/PRIV=(NONFSR,NONFSW,NOBYP,NOSYSP)
.DIR SY:
?MON-F-Device or file is access restricted
File specification causing error: SY:
Abort location = 010466
.R PIP
*
В RAFOS/TS команда DUMP имела доступ к любому абсолютному сектору диска, что делало вообще бессмысленным всю эту защиту.
А в новых TSX 6 с этим как?
(лень разбираться с генерацией, чтобы самому попробовать...)
А в новых TSX 6 с этим как?
Точно также: чтобы иметь возможность смотреть каталог диска командой DIR или копировать файлы командой COPY - нужно открыть доступ к чтению самого устройства, а значит и DUMPить его можно.
У меня сейчас командный файл непривилегированных пользователей выглядит так:
^(
MOU LD7: SY:TSXTCP TCP:
ACC SY:*.DAT/READ,SY:*.INS/READ,SY:*.MAC/READ,SY:*.MLB/READ,SY:*.MSG/READ
ACC SY:*.OBJ/READ,SY:*.SAV/READ,SY:*.SHR/READ,SY:*.SML/READ
ACC TCP:*.SAV/READ,TCP:*.COM/READ,TCP:*.INS/READ,DL1:/READ,DL2:/READ,DL3:/READ
ACC DA2:/READ,DA3:/READ,DA4:/READ,DA5:/READ,DA6:/READ,DA1:,DL:,LP:,VM:,MM:
SET ENDSTARTUP
@SY:SYSUCL.INS
@TCP:TSXUCL.INS
SET PROMPT "^^J."
SET TT DEFER
MOU VM0:
MOU DA1:
ASS VM0: CF
ASS VM0: WF
ASS DA1: DK:
В таком варианте все защищено, но и сделать DIR SY: или TYP SY:CUSTOM.TXT уже не получится.
Но запускать программы с SY: или читать конкретные файлы в пределах доступа сторонними программами (обращающимися к файлам, а не к устройству) - пожалуйста.
- - - Добавлено - - -
Примерно так выглядит доступ к тому, к чему можно :)
.TY SY:SYSUCL.INS
?MON-F-Device or file is access restricted
File specification causing error: SY:
Abort location = 013062
.SPLIT SY:SYSUCL.INS/B:0 ,TT:
^(
BAS*IC :== R BASIC ^
BU*ILD :== EXECUTE/NORUN ^
DEV*ICES :== SHOW DEVICES
.
Вспомнил что у меня есть какой-то кусок TSX. Ценности особой не представляет, но пусть будет.
Вспомнил что у меня есть какой-то кусок TSX
Выглядит как прошный образ, лень нотебяку старю открывать чтобы смотреть детально.
В принципе доступны листинги TSX+ V6.40, нужно только время чтобы их перевести в вид исходников :)
какой-то кусок TSX
Volume in drive K is HyperV C
Volume Serial Number is 22E9-C735
Directory of K:\PDP\Check!\TSX\@TSX.dsk
11.08.2022 00:57 <DIR> .
11.08.2022 00:57 <DIR> ..
11.08.2022 00:57 512 $BOOT.BLK
11.08.2022 00:57 2 048 $MONI.TOR
11.08.2022 00:57 2 968 $VOLUM.INF
01.01.1972 00:00 512 CTSX1.COM
06.09.1992 23:00 38 400 TSXMOD.SAV
26.12.1986 00:00 3 584 TSXPM.SAV
28.03.1993 23:00 32 768 TSXRSF.TSX
26.12.1986 00:00 3 072 TSXUCL.SAV
07.09.1992 23:00 20 480 TSXUCL.TSX
05.01.1990 00:00 1 024 VM.TSX
26.12.1986 00:00 4 096 WINPRT.SAV
05.01.1990 00:00 512 WINPRT.TSX
12 File(s) 109 976 bytes
2 Dir(s) 352 359 018 496 bytes free
По сути, TSXPM.SAV, TSXUCL.SAV, WINPRT.SAV и VM.TSX.
WINPRT.TSX - командный файл для запуска печаталки окон
TSXMOD.SAV - бесполезен - собирается при генерации и годится только для данной системы
TSXRSF.TSX - своп файл регионов, создается при запуске системы если у существующего размер не соответствует крнфигурации (и, что мерзко - в любую сторону, хотя файл размером больше можно спокойно использовать было бы).
...
Сейчас вот работаю в TSX+ V6.50 (последний, Y2K из коробки [хоть и не без косяков которые пришлось правимть]), и вижу, что оптимизм того времени был преждевременным :)
...
Пардон за нескромный вопрос - а где можно взять 6.5?
SuperMax
09.01.2023, 08:05
Пардон за нескромный вопрос - а где можно взять 6.5?
к примеру поискать тут
https://mirrors.pdp-11.ru/search.php?text=TSX+dsk&page=1
к примеру поискать тут
https://mirrors.pdp-11.ru/search.php?text=TSX+dsk&page=1
Спасибо, поискал - не нашел (tsx65p.dsk это patch от form).
TSX-Plus V6.5 выдавали по запросам, но ссылок под рукой нет.
Процесс перевода листинга TSINIT в .MAC медленно, но двигается.
Как дойдет до конца - появится возможность убрать персональную информацию :)
Тем временем TSX+ V6.5 online жив :)
.W
Uptime: 76 00:03:00
System use: Run=0%, I/O-wait=1%, Swap-wait=0%, Idle=0%
I/O Activity: User I/O=1%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1 1(0) 50 TI 39Kb 731:48:00 00:00:03 KMON Console
17* 17(0) 50 IN 39Kb 00:02:00 00:00:02 KMON ROOT
19 Det. 50 SL-Swap 33Kb 731:48:00 00:00:00 WINPRT SYSTEM
20 Det. 50 SL-Swap 63Kb 731:48:00 00:00:00 RTSORT SYSTEM
21 Det. 50 SL-Lock 63Kb 731:48:00 01:11:53 TCPIP SYSTEM
.
Нашел время немного покопаться во внутренностях.
С лицензионной информацией все просто - ее легко можно менять в модуле TSNAME который лежит в склейке TSX2.OBJ.
Склейку можно разобрать на отдельные модули с помощью LIBR (я правда не помню как это делается - мне проще в RSX перебросить и с помощью LBR все сделать).
TSX-Plus на трансивере :)
https://pdp-11.online/~form/files/pdp-11/pics/xiegu/IMG_20230319_162347_MP.jpg
Сгенерил как есть на 11/23-Plus (реализация forth32 на FPGA), системный диск RK
(вставил "DEVDEF <RK>,MAPIO"). Результат:
?TSX-F-Fatal system error at 123410
KRE-KMON read error
Arg. value = 000000
Seg. value = 000027
Overlay: EX2
SP at time of crash = 141464
В файле TSGEN больше нет секции
;
; Enable 22-bit addressing for the 11/23-Plus, 11/24, 11/44, and 11/73.
; This feature requires the use of either the 22-bit extended memory
; mapping for the LSI or the UNIBUS. This feature must be enabled to
; allow TSX-Plus to utilize more than 256Kb of memory.
;
EXTMCH = 1 ;1==>Allow 22-bit addressing; 0==>Do not use 22-bit.
11/23-Plus (реализация forth32 на FPGA), системный диск RK
Q-Bus + RK не сильно удачная конфигурация.
RK (сам по себе) даже в теории не может адресовать больше 18bit, а на Q-Bus и вовсе в последних версиях драйверов ограничен 16 битами (официально других Q-Bus контроллеров не было). Можно попробовать поиграться с опцией MAPIO в определении драйвера, но насколько это поможет - фиг знает.
UPD. Смотрю MAPIO есть как раз (да он и по умолчанию скорее всего включен). Как вариант - попробовать найти драйвер постарее - от TSX+ V6.01 например. Или для начала ограничить память до 248Kb если есть возможность (как минимум в TSGEN можно).
Ну и из приведенного куска конфига не ясно правильно ли выбрана шина в TSGEN.
Ну и из приведенного куска конфига не ясно правильно ли выбрана шина в TSGEN.
HIMEM = 64.
DFLMEM = 56.
SWAPFL = 1
SWPSLT = 0.
SEGBLK = 0.
NGR = 0.
BUSTYP = QBUS
MEMSIZ = 0. (пробовал 248 - не помогло)
INIABT = 0
UXIFLG = 1
SYSDMP = 0
DMPTCR = 177560
DMPKTP = 0
IOABT = 1
U$CL = 1
UCLMNC = 5.
UCLORD = MIDDLE
LDSYS = 1
SLEDIT = 1
KEYMAX = 8.
MAXWIN = 10.
DBGFLG = 0
...
CACHE = 0.
...
DEVBEG ;Beginning of device definitions
DEVDEF <DM>,DMA,MAPH,HANBUF
DEVDEF <RK>,MAPIO
DEVDEF <LP>,MAPH
DEVDEF <NL>,MAPH
DEVDEF <VM>,EVNBUF,NOCACHE,NOMAPH
DEVEND ;End of device definitions
MIONBF = 1.
MIOBSZ = 8.
DEVXMR = 8.
SPOOL 1,20.,2,500.,<LP>,0,10.
...
NUMDC = 0.
MAXMC = 24.
попробовать найти драйвер постарее - от TSX+ V6.01 например.
Попробовал:
.R TSX
002544
@
- - - Добавлено - - -
Разместил все на DM - пр запуске ругани нет, просто "вылет".
DEVDEF <RK>,MAPIO
Я честно говоря не помню как работает DEVDEF - определяет в точности или добавляет к умолчаниям.
Можно в TSXMOD посмотреть.
На всякий случай стоит DMA добавить.
Посмотрел умолчания - там DMA,MAPH.
Разместил все на DM - пр запуске ругани нет, просто "вылет".
DM тоже не умеет 22bit.
Была какая-то сторонняя реализация, для нее отдельный драйвер должен быть - что-то вроде DM22.TSX.
Я бы для начала в RT-11XM поигрался - обычная система должна работать нормально, а VBGEXE программы будут падать если что-то не так.
RT-11XM
RT-11XM работает нормально.
Хотса TSX6.5 ...
UPD: DM22.TSX на SY: присутствует.
RT-11XM работает нормально.
Сама система и будет работать - нужно проверить виртуальные программы - например запустить DIR.SAV через VBGEXE и посмиотреть что будет.
DM22.TSX на SY: присутствует.
Его переименовать нужно в DM.TSX чтобы он использовался.
- - - Добавлено - - -
Ну и до кучи интересен результат команды SH CONF из под RT-11.
- - - Добавлено - - -
Немного времени есть - побалуюсь в E11 с RK (SimH не позволяет кривые конфигурации делать).
- - - Добавлено - - -
Грузиться не пробовал, но RK заработал с флагами "DMA,MAPH,MAPIO", только драйвер, как и предполагалось, пришлось взять из TSX-Plus V6.01.
Родной из V6.5 дает ошибку (раз QBUS - значит RK может работать только с 16bit).
MOV #<^B11>,-(SP) ;U-bus controller can handle 18-bit
; transfers
MOV @#SYSPTR,R1 ;R1 -> $RMON
BIT #<BUS$>,CONFG2(R1) ;Running on qbus?
BEQ 47$ ;Nope...
CLR (SP) ;Q-bus controller can handle 16-bit
; transfers
47$: BIC (SP)+,R2 ;Strip off allowed hi-order component
Продолжение генерации 6.5 на FPGA реализации 11/23+.
Перенес все на DM.
нужно проверить виртуальные программы - например запустить DIR.SAV через VBGEXE и посмиотреть что будет.
.R VBGEXE
Program? DIR
*/L
26-Mar-2023
DM .SYS 5 25-Mar-2023 DMX .SYS 5 25-Mar-2023
NQX .SYS 10 25-Mar-2023 LP .SYS 2 25-Mar-2023
LPX .SYS 2 25-Mar-2023 NL .SYS 2 25-Mar-2023
NLX .SYS 2 25-Mar-2023 SWAP .SYS 28 21-Apr-1998
SL .SYS 17 21-Apr-1998 SLX .SYS 20 21-Apr-1998
...
Версия 6.1 успешно генерится и работает, но только с MEMSIZ = 248.
Повторил генерацию 6.5 с параметрами от 6.1, результат:
.R TSX
?TSX-F-Fatal system error at 023554
UEI-Interrupt occurred at unexpected location
Arg. value = 000070
Seg. value = 000027
Overlay: EX2
SP at time of crash = 000772
Тудыть в качель!!!
с параметрами от 6.1
Дело не в параметрах - нужен именно драйвер RK.TSX из 6.01.
Сейчас попробую собрать минимальный образ на RK, достаточный для старта.
Дело не в параметрах - нужен именно драйвер RK.TSX из 6.01.
с RK пока "завязал", работа идет на DM. RK исключил из конфига.
Выложил на некоторое время загрузочный образ (https://pdp-11.online/~form/files/pdp-11/tsx/temp/rk05_0.dsk).
В эмуляторе загрузился в 22-bit QBUS конфигурации.
RT-11FB V05.07
.SET TT SCOPE
.TSX
* TSX-Plus Version 6.50 *
Copyright (c) 1980,1981,1982,1983,1984,1985,1986,1987,1988,1989, 1990,1991
an unpublished work by S&H Computer Systems, Inc., Nashville, TN, USA
(S&H) covered by U.S. Patent No. 4,642,756. All rights reserved.
This material contains the valuable properties and trade secrets of S&H
and may not be used except by the express written permission of S&H.
Distributed by S&H Computer Systems, Inc.
Licensed for use Here, There and Everywhere in The World.
License # = 999-TPS-00000
Line # 1
.SH ALL
TSX-Plus Version = 6.50
Date unknown
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 016057 035470 000000 512
DU 0 102450 067706 000000 340 172150 154
DL 0 102405 120000 075255 1418 174400 160
RK 0 100000 120000 075250 280 177400 220
MU 0 017060 070432 000000 3240 174500 260 254
Assignments:
SY --> RK0:
DK --> RK0:
There are no allocated devices
Uptime: 00:00:03
System use: Run=20%, I/O-wait=0%, Swap-wait=0%, Idle=80%
I/O Activity: User I/O=8%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 39Kb 00:01:00 00:00:00 KMON
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT200 9600 8N Yes Console
CL version number 18.
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 none none
CL1 none none
CL2 none none
CL3 none none
Total installed memory = 4088Kb
Size of unmapped TSX and handlers = 32Kb (077142)
Size of mapped TSX system regions = 77Kb
Total size of TSX and mapped data = 129Kb
Size of mapped device handlers = 2Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 33Kb
Space available for user jobs = 1873Kb
Swappable job context area = 7Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
QUAN0 = 2
QUAN1 = 20
QUAN1A = 2
QUAN1B = 2
QUAN1C = 1
QUAN2 = 10
QUAN3 = 20
INTIOC = 30
HIPRCT = 40
There are no spooled devices
Logical subset disks:
No logical disks are mounted
Mounted devices:
Device Associated jobs
---------- ------------------------------
RK0: 1
Shared run-time systems:
There are no named regions
Program Attributes and Privileges
-------------- -----------------------------------------
RK0:DUP.SAV DUP/PRIV=(SYSPRV,NODEBUG)
RK0:IND.SAV NOWAIT/IND/PRIV=(NODEBUG)
RK0:KED.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
RK0:KEX.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
RK0:K52.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
RK0:LOGON.SAV LOCK/BYPASN/PRIV=(BYPASS,SETNAME,SETPRV,SYSPRV,
NODEBUG)
RK0:PATCH.SAV SINGLECHAR/PRIV=(NODEBUG)
RK0:SETUP.SAV IOPAGE/SETUP/PRIV=(NODEBUG)
RK0:SYSMON.SAV /PRIV=(MEMMAP,NODEBUG)
RK0:TECO.SAV SINGLECHAR/NOWAIT/PRIV=(NODEBUG)
RK0:TRANSF.SAV SINGLECHAR/NOWAIT/NONINTERACTIVE/NOWINDOW/PRIV=(
NODEBUG)
RK0:TSAUTH.SAV BYPASN/PRIV=(NODEBUG)
RK0:TSXUCL.SAV TSXUCL/PRIV=(NODEBUG)
RK0:VTCOM.SAV SINGLECHAR/NOWAIT/MEMLOCK/PRIV=(PSWAPM,NODEBUG)
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: OFF,NOKED,NOTTYIN,SUBSTITUTE
VM not installed
.BO
[System shutdown]
Connect=00:01:00 CPU=00:00:01
RT-11FB V05.07
.SET TT SCOPE
.
- - - Добавлено - - -
работа идет на DM
Для начала стоит проверить DMA,MAPH,MAPIO, если заведется - попробовать драйвер DM22 (без MAPIO).
В эмуляторе загрузился в 22-bit QBUS конфигурации.
R TSX -- тотальный вис без сообщений.
С драйвером RK из 6.5 ругань, как и раньше;
?TSX-F-Fatal system error at 123410
KRE-KMON read error
Arg. value = 000000
Seg. value = 000027
Overlay: EX2
SP at time of crash = 141464
Ради интереса попробую (но немного позже - сейчас другое терзаю) на PDP-11X/23 :)
С драйвером RK из 6.5
Там образ RK05 - можно весь образ попробовать.
Если он заработает - проблемы нужно искать в TSGEN, если не заработает - нужно ковырять железяку.
У TSX есть системный отладчик, но я ни разу не пробовал его.
Ну и таки интересно что SH CONF говорит на этой железяке.
SH CONF говорит на этой железяке.
RT-11FB V05.07
Booted from RK0:RT11FB
USR is set SWAP
EXIT is set SWAP
KMON is set NOIND
MODE is set NOSJ
TT is set NOQUIET
ERROR is set ERROR
SL is set OFF
EDIT is set KED
FORTRAN is set FORTRA
KMON nesting depth is 3
CLI is set DCL, CCL, UCL, NO UCF
PDP 11/23 PLUS Processor
4088KB of memory
FP11 Hardware Floating Point Unit
Extended Instruction Set (EIS)
Memory Management Unit
50 Hertz System Clock
FPU support
нужно ковырять железяку.
Переделывать контроллер RK от комрада forth32 желания нет (необходимости тоже - прекрасно работает с кучей систем и TSX 6.1)
Что-то где-то в нвстройках... Например, почему 6.1 не работает с MEMSIZ > 248?
Например, почему 6.1 не работает с MEMSIZ > 248?
У меня все прекрасно работало.
Type a command then press the RETURN key: B DU3
Trying DU3
Starting system from DU3
RT-11ZM (S) V05.07
.SET TT QUIET
.R DATE
Date? 11-MAR-2014
Tim
.LO NQ
.RU ETHTIM
.UNL NQ
.R DATE
.BO RT11SB
RT-11SB (S) V05.07
.SET TT QUIET
.R DATE
.@SY:RUNTSX
.D 1000=13700,54,12760,2005,276,104350
.ST 1000
.SET ERROR NONE
.R TSX
* TSX-Plus Version 6.01 *
Copyright (c) 1980, 1981, 1982, 1983, 1984, 1985 an unpublished work by
S&H Computer Systems, Inc., Nashville, TN, USA (S&H) All rights reserved.
This material contains the valuable properties and trade secrets of S&H
and may not be used except by the express written permission of S&H.
Distributed by JPY Associates Limited
Licensed for use on a single computer system at HI TECH SYSTEMS S A
License # = 56-T1S-10783
11-Mar-2014 22:08:30
Line # 1
Logon please:ROOT
Password:
Welcome to the system
.SH ALL
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 006057 055646 000000 708
DU 0 102450 105612 000000 944 172150 154
VM 0 102447 107472 000000 384
LP 0 032003 120000 075622 404 177514 200
NL 0 000025 120000 075621 58
EQ 3 007061 120000 075531 3566 174440 120
Assignments:
SY --> DU3:
DK --> DU3:
TCP --> LD7:
CF --> VM0:
WF --> VM0:
Device Job Job name
------ --- ------------
CL0 10 TELNET servr
CL1 13 TELNET servr
CL2 14 TELNET servr
Uptime: 00:00:28
System use: Run=37%, I/O-wait=61%, Swap-wait=0%, Idle=0%
I/O Activity: User I/O=94%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 HI 37Kb 00:01:00 00:00:01 KMON ROOT
2 2(0) 50 TI 37Kb 00:01:00 00:00:01 KMON GUEST
3 3(0) 50 TI 37Kb 00:01:00 00:00:01 KMON GUEST
4 4(0) 50 TI 37Kb 00:01:00 00:00:01 KMON GUEST
10 Det. 50 SL 62Kb 00:01:00 00:00:01 RTELNT TELNET servr
11 Det. 50 SL-Swap 30Kb 00:01:00 00:00:00 WINPRT Window print
12 Det. 50 SL-Lock 62Kb 00:01:00 00:00:04 TCPIP TCP/IP stack
13 Det. 50 SL 62Kb 00:01:00 00:00:01 RTELNT TELNET servr
14 Det. 50 SL 62Kb 00:01:00 00:00:01 RTELNT TELNET servr
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT200 9600 8N Yes Console
2 Local DHV- 0 350 160500 VT200 19200 8N Yes DHV unit 0
3 Local DHV- 1 350 160500 VT200 19200 8N Yes DHV unit 1
4 Local DHV- 4 350 160500 VT200 19200 8N Yes DHV unit 4
5 Local DHV- 5 350 160500 VT200 19200 8N No DHV unit 5
6 Local DZ - 0 340 160100 VT200 9600 8N No DZ unit 0
7 Local DZ - 1 340 160100 VT200 9600 8N No DZ unit 1
8 Local DZ - 2 340 160100 VT200 9600 8N No DZ unit 2
9 Local DZ - 3 340 160100 VT200 9600 8N No DZ unit 3
36 CL DHV- 2 350 160500 unknown 19200 8N CL0 DHV unit 2
37 CL DHV- 3 350 160500 unknown 19200 8N CL1 DHV unit 3
38 CL DHV- 6 350 160500 unknown 19200 8N CL2 DHV unit 6
39 CL DHV- 7 350 160500 unknown 19200 8N CL3 DHV unit 7
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 36 10 [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL1 37 13 [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL2 38 14 [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
CL3 39 none [TAB,LC,EIGHTBIT,LFOUT,LFIN,CR,CTRL]
CL4 none none
Total installed memory = 4088Kb
Size of unmapped TSX and handlers = 37Kb
Size of mapped TSX system regions = 70Kb
Total size of TSX and mapped data = 124Kb
Size of mapped device handlers = 4Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 0Kb
Space available for user jobs = 1915Kb
Swappable job context area = 6Kb
Current job memory limit = 56Kb
Maximum job memory limit = 56Kb
Spooled devices: LP
Logical subset disks:
LD7 --> DU3:TSXTCP.DSK[4800]
Mounted devices:
Device Associated jobs
---------- ------------------------------
DU3: 1 2 3 4 10 11 12 13 14
DU3:TSXTCP 1 2 3 4 10 12 13 14
DU3:TSXWRK 2 3 4
VM0: 1 2 3 4
Shared run-time systems:
Region Size Type Job Use Shared AGE
------ ------ ------ --- --- ------ ---
EI $ 31.6 Global 12 0 Yes No
WIN01A 3.8 Global 1 1 No No
SCKT00 8.0 Global 12 2 Yes No
WIN02A 3.8 Global 2 1 No No
SCKT01 8.0 Global 12 2 Yes No
WIN03A 3.8 Global 3 1 No No
SCKT02 8.0 Global 12 2 Yes No
WIN04A 3.8 Global 4 1 No No
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: ON,NOKED,NOTTY,SUBSTITUTE
.
В сущности V6.01 работал не хуже 6.50.
Из недостатков: не поддерживаются регионы для драйверов и вызов .CLOSZ (из-за чего запуск из под RT-11 V5.5 и новее требует хитростей [в коде выше их видно] - иначе будут проблемы с KED).
Вот "моя" 6.1
---------------------------------------------------------------
.sh all
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 006057 034006 000000 236
DM 0 102423 063512 000000 1434 177440 210
RK 0 100000 120000 006046 280 177400 220
Assignments:
SY --> DM2:
DK --> DM2:
There are no allocated devices
Uptime: 00:00:10
System use: Run=1%, I/O-wait=2%, Swap-wait=0%, Idle=95%
I/O Activity: User I/O=2%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 37Kb 00:01:00 00:00:00 KMON ROOT
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT100 N/A 8N Yes Console
2 Local DL 310 176510 unknown N/A 8N No * Not installed *
3 Local DL 320 176520 unknown N/A 8N No * Not installed *
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 none none
Total installed memory = 4088Kb
Size of unmapped TSX and handlers = 28Kb
Size of mapped TSX system regions = 53Kb
Total size of TSX and mapped data = 91Kb
Size of mapped device handlers = 0Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 0Kb
Space available for user jobs = 155Kb
Swappable job context area = 6Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
There are no spooled devices
Logical subset disks:
No logical disks are mounted
Mounted devices:
Device Associated jobs
---------- ------------------------------
DM2: 1
Shared run-time systems:
There are no named regions
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: ON,NOKED,NOTTY,SUBSTITUTE
---------------------------------------------------------------
Сгенерина с MEMSIZ = 248, с большими значениями "рубится".
Сгенерина с MEMSIZ = 248, с большими значениями "рубится".
Нужен TSGEN.MAC - так ничего не понять.
- - - Добавлено - - -
Сгенерина с MEMSIZ = 248, с большими значениями "рубится".
Хм.
Если проблема только в падениях - то скорее всего из-за DM который не умеет работать с 22bit.
Нужно попробовать с MAPIO.
Нужно попробовать с MAPIO.
Хорошо, попробую.
- - - Добавлено - - -
"Взял" PDP2011 от forth32, заменил в TSGEN QBUS на UNIBUS и поставил MEMSIZ = 2048.
Сработало (sh mem):
Total installed memory = 3840Kb
Size of unmapped TSX and handlers = 28Kb
Size of mapped TSX system regions = 53Kb
Total size of TSX and mapped data = 91Kb
Size of mapped device handlers = 0Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 0Kb
Space available for user jobs = 1952Kb
Swappable job context area = 6Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
RT11XM:
PDP 11/70 Processor
3840KB of memory
FP11 Hardware Floating Point Unit
Extended Instruction Set (EIS)
Memory Management Unit
Cache Memory
50 Hertz System Clock
UNIBUS
Если железка конфигурится как UNIBUS то все вопросы с памятью отпадают - там нет проблем с 22bit для RK/DM.
Ну что могу сказать...
RT-11FB V05.07
.SET TT SCOPE
.sho conf
RT-11FB V05.07
Booted from RK0:RT11FB
USR is set SWAP
EXIT is set SWAP
KMON is set NOIND
MODE is set NOSJ
TT is set NOQUIET
ERROR is set ERROR
SL is set OFF
EDIT is set KED
FORTRAN is set FORTRA
KMON nesting depth is 3
CLI is set DCL, CCL, UCL, NO UCF
PDP 11/24 Processor
512KB of memory
FP11 Hardware Floating Point Unit
Extended Instruction Set (EIS)
Memory Management Unit
60 Hertz System Clock
FPU support
* TSX-Plus Version 6.50 *
Copyright (c) 1980,1981,1982,1983,1984,1985,1986,1987,1988,1989, 1990,1991
an unpublished work by S&H Computer Systems, Inc., Nashville, TN, USA
(S&H) covered by U.S. Patent No. 4,642,756. All rights reserved.
This material contains the valuable properties and trade secrets of S&H
and may not be used except by the express written permission of S&H.
Distributed by S&H Computer Systems, Inc.
Licensed for use Here, There and Everywhere in The World.
License # = 999-TPS-00000
Line # 1
.sho all
TSX-Plus Version = 6.50
Date unknown
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 016057 035470 000000 512
DL 0 102405 120000 015423 1418 174400 160
RK 0 100000 120000 015416 280 177400 220
Assignments:
SY --> RK0:
DK --> RK0:
There are no allocated devices
Uptime: 00:00:02
System use: Run=8%, I/O-wait=4%, Swap-wait=0%, Idle=86%
I/O Activity: User I/O=8%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 39Kb 00:01:00 00:00:00 KMON
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT200 9600 8N Yes Console
CL version number 18.
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 none none
CL1 none none
CL2 none none
CL3 none none
Total installed memory = 512Kb
Size of unmapped TSX and handlers = 29Kb (070146)
Size of mapped TSX system regions = 77Kb
Total size of TSX and mapped data = 126Kb
Size of mapped device handlers = 2Kb
Size of sharable run-time systems = 0Kb
Size of data cache buffer area = 33Kb
Space available for user jobs = 349Kb
Swappable job context area = 7Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
QUAN0 = 2
QUAN1 = 20
QUAN1A = 2
QUAN1B = 2
QUAN1C = 1
QUAN2 = 10
QUAN3 = 20
INTIOC = 30
HIPRCT = 40
There are no spooled devices
Logical subset disks:
No logical disks are mounted
Mounted devices:
Device Associated jobs
---------- ------------------------------
RK0: 1
Shared run-time systems:
There are no named regions
Program Attributes and Privileges
-------------- -----------------------------------------
RK0:DUP.SAV DUP/PRIV=(SYSPRV,NODEBUG)
RK0:IND.SAV NOWAIT/IND/PRIV=(NODEBUG)
RK0:KED.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
RK0:KEX.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
RK0:K52.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
RK0:LOGON.SAV LOCK/BYPASN/PRIV=(BYPASS,SETNAME,SETPRV,SYSPRV,
NODEBUG)
RK0:PATCH.SAV SINGLECHAR/PRIV=(NODEBUG)
RK0:SETUP.SAV IOPAGE/SETUP/PRIV=(NODEBUG)
RK0:SYSMON.SAV /PRIV=(MEMMAP,NODEBUG)
RK0:TECO.SAV SINGLECHAR/NOWAIT/PRIV=(NODEBUG)
RK0:TRANSF.SAV SINGLECHAR/NOWAIT/NONINTERACTIVE/NOWINDOW/PRIV=(
NODEBUG)
RK0:TSAUTH.SAV BYPASN/PRIV=(NODEBUG)
RK0:TSXUCL.SAV TSXUCL/PRIV=(NODEBUG)
RK0:VTCOM.SAV SINGLECHAR/NOWAIT/MEMLOCK/PRIV=(PSWAPM,NODEBUG)
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: OFF,NOKED,NOTTYIN,SUBSTITUTE
VM not installed
.
Как примечание. Насколько я помню, RESORC определяет комп как UNIBUS, если есть switch регистр. Он у меня есть по умолчанию, так что.. Но UMR нет:
PDP-11/23 (256KW) (PDP-2011 based) FullODT for halt mode (in development :))
>>>B RK0
R0=000000 R1=000002 R2=152334 R3=141354 R4=141550 R5=141670
SP=000766 SP=000000 SP=045146 PC=120100 PS=030340
>>>
>>>170200/
170200 ?
>>>
Так что... Не могу сказать, что будет, если потребуется ввод/вывод из/в память выше 256 кб..
На всякий случай временно выложил образ RK07 (DM) (https://pdp-11.online/~form/files/pdp-11/tsx/temp/rk07_1.dsk) (QBUS конфигурация).
В E11 работает.
E11>
E11>B DM1
RT-11FB (S) V05.07
.SET TT QUIET
?DATE-I-Time source: KDJ11-E
?DATE-I-Date & time: 26-MAR-2023 14:59:06
.TS
* TSX-Plus Version 6.50 *
Copyright (c) 1980,1981,1982,1983,1984,1985,1986,1987,1988,1989, 1990,1991
an unpublished work by S&H Computer Systems, Inc., Nashville, TN, USA
(S&H) covered by U.S. Patent No. 4,642,756. All rights reserved.
This material contains the valuable properties and trade secrets of S&H
and may not be used except by the express written permission of S&H.
Distributed by S&H Computer Systems, Inc.
Licensed for use Here, There and Everywhere in The World.
License # = 999-TPS-00000
26-Mar-2023 14:59:08
Line # 1
.SH ALL
TSX-Plus Version = 6.50
26-Mar-2023
Active Handler Handler Handler
Device I/O Status V. base P. base size CSR Vector
------ ------ ------ ------- ------- ------- ------ ------
TT 0 000004
LD 0 102446
CL 0 016057 035470 000000 512
DU 0 102450 067706 000000 340 172150 154
DL 0 102405 120000 073515 1418 174400 160
DM 0 102423 070432 000000 1594 177440 210
RK 0 100000 120000 073510 280 177400 220
MU 0 017060 073524 000000 3240 174500 260 254
LP 0 030003 120000 073501 406 177514 200
VM 0 102447 101774 000000 426
Assignments:
SY --> DM1:
DK --> DM1:
There are no allocated devices
Uptime: 00:00:05
System use: Run=20%, I/O-wait=0%, Swap-wait=0%, Idle=79%
I/O Activity: User I/O=6%, Swapping I/O=0%
Job Line Pri State Size Connect CPU time Program Job name
--- ------ --- ------- ----- --------- -------- ------- ------------
1* 1(0) 50 IN 39Kb 00:01:00 00:00:01 KMON
Line Type Vector CSR Terminal Speed Active Line Name
---- ----- ---------- ------ -------- -------- ------ ------------
1* Oper. DL 060 177560 VT200 9600 8N Yes Console
CL version number 18.
Unit Line Job Options
---- ---- ---- ----------------------------
CL0 none none
CL1 none none
CL2 none none
CL3 none none
Total installed memory = 4088Kb
Size of unmapped TSX and handlers = 34Kb (103172)
Size of mapped TSX system regions = 77Kb
Total size of TSX and mapped data = 131Kb
Size of mapped device handlers = 2Kb
Size of sharable run-time systems = 54Kb
Size of data cache buffer area = 33Kb
Space available for user jobs = 1816Kb
Swappable job context area = 7Kb
Current job memory limit = 56Kb
Maximum job memory limit = 64Kb
QUAN0 = 2
QUAN1 = 20
QUAN1A = 2
QUAN1B = 2
QUAN1C = 1
QUAN2 = 10
QUAN3 = 20
INTIOC = 30
HIPRCT = 40
Spooled devices: LP0
Logical subset disks:
No logical disks are mounted
Mounted devices:
Device Associated jobs
---------- ------------------------------
DM1: 1
Shared run-time systems:
CBR063
There are no named regions
Program Attributes and Privileges
-------------- -----------------------------------------
DM1:DUP.SAV DUP/PRIV=(SYSPRV,NODEBUG)
DM1:IND.SAV NOWAIT/IND/PRIV=(NODEBUG)
DM1:KED.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DM1:KEX.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DM1:K52.SAV SINGLECHAR/NOWAIT/HIGH/PRIV=(NODEBUG)
DM1:LOGON.SAV LOCK/BYPASN/PRIV=(BYPASS,SETNAME,SETPRV,SYSPRV,
NODEBUG)
DM1:PATCH.SAV SINGLECHAR/PRIV=(NODEBUG)
DM1:SETUP.SAV IOPAGE/SETUP/PRIV=(NODEBUG)
DM1:SYSMON.SAV /PRIV=(MEMMAP,NODEBUG)
DM1:TECO.SAV SINGLECHAR/NOWAIT/PRIV=(NODEBUG)
DM1:TRANSF.SAV SINGLECHAR/NOWAIT/NONINTERACTIVE/NOWINDOW/PRIV=(
NODEBUG)
DM1:TSAUTH.SAV BYPASN/PRIV=(NODEBUG)
DM1:TSXUCL.SAV TSXUCL/PRIV=(NODEBUG)
DM1:VTCOM.SAV SINGLECHAR/NOWAIT/MEMLOCK/PRIV=(PSWAPM,NODEBUG)
Authorized privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
Current privileges: ALLOCATE,BYPASS,DEBUG,DETACH,GETCXT,MEMMAP,
MESSAGE,NFSREAD,NFSWRITE,OPER,PSWAPM,REALTIME,
RLOCK,SEND,SETNAME,SETPRV,SPFUN,SYSGBL,
SYSPRV,TERMINAL,WORLD,GROUP,SAME,SUBPROCESS,
UP1,UP2,UP3,UP4
SL status: OFF,NOKED,NOTTYIN,SUBSTITUTE
VM Base=100000 Top=170000 Size=3584
.
TSGEN в образ не положил, но это тот же TSGEN который лежит в образе RK05 (https://pdp-11.online/~form/files/pdp-11/tsx/temp/rk05_0.dsk), только строчка для DM добавлена.
На PDP2011 6.1 с верхней памятью заработала.
6.5 - "вис"
- - - Добавлено - - -
выложил образ RK07 (DM) (QBUS конфигурация).
В E11 работает.
"Вис..."
.sh conf
RT-11FB (S) V05.07
Booted from DM1:RT11FB
USR is set SWAP
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 KED
FORTRAN is set FORTRA
KMON nesting depth is 3
Global .SCCA flag is disabled
CLI is set DCL, CCL, UCL, NO UCF
PDP 11/23 PLUS Processor
4088KB of memory
FP11 Hardware Floating Point Unit
Extended Instruction Set (EIS)
Memory Management Unit
50 Hertz System Clock
Device I/O time-out support
Memory parity support
Global .SCCA support
FPU support
.r tsx
- - - Добавлено - - -
Для начала стоит проверить DMA,MAPH,MAPIO, если заведется - попробовать драйвер DM22 (без MAPIO).
Посмотрел исходники - у rk611 18-разрядная шина адреса, значит для DM нужно всегда ставить MAPIO и использовать DM18.TSX.
Или я что-то не понимаю?
для DM нужно всегда ставить MAPIO и использовать DM18.TSX
Да.
На QBUS требуется MAPIO.
На UNIBUS не требуется - там свой механизм.
DM22 работает с неофициальным 22-бит контроллером от Dylog.
На случай если кому захочется поменять лицензионную информацию в TSX-Plus ;)
Вот восстановленный файл TSNAME.MAC от TSX-Plus V6.40 (с добавлением меток ULTEXT и ULTXND, использующихся в V6.50):
.TITLE TSNAME - Site name
.ENABL LC
; Copytight 1981,1982,1983,1984,1985,1986,1987,1988,1989.
; S&H Computer Systems, Inc.
; Nashville, Tennessee
.PSECT CBNAME
.GLOBL SUMS,SUCS,TSXLN,GRT1,SUPCOD,TRGRET,LICTXT,NAMTOP,M DT
.GLOBL DISTRB,SITE,LICENS,LICNUM,MNUAOT,ULTEXT,ULTXND
MICRO = 0
.MACRO NAME TEXT ;Store text string & compute checksum for it.
.IRPC CHAR,<TEXT>
.BYTE -<''CHAR>
SUCS = SUCS-''CHAR
.ENDM
.ENDM NAME
.MACRO SNAME TEXT ;Macro to define site name
NAME <'TEXT>
.IF NE, MICRO ;allocate enough space for 30 char (micro)
.NCHR $$$,<'TEXT>
.REPT 30.-$$$
NAME < >
.ENDR
.ENDC
.ENDM SNAME
.MACRO LICENSE NUMBER,NUM2 ;Macro to define license #
NAME <'NUMBER>
.IF NE,MICRO ;allocate enough space for 5 digits (micro)
.NCHR $$$,<'NUMBER>
.REPT 5.-$$$
NAME < >
.ENDR
.ENDC
TSXLN = ^D'NUMBER
MNUAOT = ^D'NUM2
.ENDM LICENSE
.MACRO NEWLIN ;Macro to store <CR><LF> into the string.
.BYTE <-15>,<-12>
SUCS = SUCS-15-12
.ENDM NEWLIN
MDT = 0.
.NLIST BEX
ULTEXT:
ULTXND:
GRT1: .ASCII <15><12>/* /
.IF NE, MICRO
.ASCII \Micro/\
.ENDC
.ASCIZ /TSX-Plus Version 6.40 */<12>
.EVEN
SUCS = 0 ;INITIALIZE CHECKSUM
SUMS = .+1246 ;ENCRIPT ADDRESS
NAME <Copyright (c) 1980,1981,1982,1983,1984,1985,1986,1987,1988>
NAME <,1989>
NEWLIN
NAME <an unpublished work by S&H Computer Systems, Inc., Nashville, TN, USA>
NEWLIN
NAME <(S&H) covered by U.S. Patent No. 4,642,756. All rights reserved.>
NEWLIN
NAME <This material contains the valuable properties and trade secrets of S&H>
NEWLIN
NAME <and may not be used except by the express written permission of S&H.>
NEWLIN
NAME <Distributed by >
DISTRB:
NAME <S&H Computer Systems, Inc.>
NEWLIN
NAME <Licensed for use on a single computer system >
TRGRET:
NAME <at >
SITE:
NAME <S&H Computer Systems, Inc.>
NEWLIN
LICTXT:
NAME <License # = >
LICENS:
NAME <999>
NAME <T>
NAME <P>
SUPCOD:
NAME <S>
NAME <->
LICNUM:
LICENSE <00044>,<4878>
NEWLIN
.BYTE 0 ;END OF COPYRIGHT LINE
.EVEN
SUCS = <-SUCS>+1 ;ENCRIPT CHECKSUM SLIGHTLY
NAMTOP: ;TOP OF TSNAME MODULE
.END
Модуль TSNAME находится в файле TSX2.OBJ (это склейка объектных модулей).
Разобрать TSX2.OBJ на отдельные модули можно так:
.R LIBR
*TSX2.LIB=TSX2
*OHANDL=TSX2.LIB/E
Global? O$DONE
Global?
*TSKMN1=TSX2.LIB/E
Global? R50KMN
Global?
*TSKMN3=TSX2.LIB/E
Global? CFSTOP
Global?
*TSKMSG=TSX2.LIB/E
Global? CLUNIT
Global?
*TSNAME=TSX2.LIB/E
Global? GRT1
Global?
*^C
Склеить модули обратно можно так:
.COP/PRE/CON (OHANDL,TSKMN1,TSKMN3,TSKMSG,TSNAME).OBJ TSX2.OBJ
SIMH и E11 одинаково (по смыслу) ругаются: ?TSX-F-Computer line time clock (50 or 60 Hz) is not working
Как исправить?
?TSX-F-Computer line time clock (50 or 60 Hz) is not working
Это из-за слишком большой скорости эмуляции - за время выполнения TSINIT не успевает даже 1 прерывание от таймера возникнуть.
В E11 можно в файл инициализации добавить команду SET THT INT=50.
Циферка подбирается опытным путем - чем она меньше, тем скорость эмуляции будет меньше.
В windows у меня работали цеферки в районе 1000-6000, в linux около 50-100.
В simh скорость эмуляции можно ограничить командой SET THR 2m (параметр задает скорость процессора 2m (2 mips), 100k (100 kips) итд.
В принципе можно просто убрать проверку таймера - сейчас гляну TSINIT.
E11 заработал при set throt int=10 и меньше.
Thanks a lot.
сейчас гляну TSINIT
Оказалось DOB который у меня под рукой давно испорчен кем-то и генерит .MAC вместо привычного .DOB, что сильно неудобно в принципе, а уж для создания патчей и вовсе бе-е.
На досуге откопаю старый вариант, а пока скоростью эмуляции крутить.
Или могу предложить поправить вручную TSX.SAV после сборки.
Делаем дамп TSX.SAV:
.DUM/OUT:TSX.DMP/ALLO:-1 TSX.SAV
В дампе находим код 012700 005000 104374 (самый первый результат поиска).
Найдется что-то вроде такого:
BLOCK NUMBER 000047
...
420/ 000002 104375 012700 005000 104374 010037 004654 020237 *..}.@...|...,.. *
440/ 006106 001010 012700 040050 104351 012700 041173 104351 *F...@.(@i.@.{Bi.*
Нас интересует циферка, помеченная красным - инструкция BNE - меняем ее на BR:
.SIPP TSX.SAV/A
Base?
Offset? 47442
Base Offset Old New?
000000 047442 001010 410
000000 047444 012700 (нажимаем CTRL/Y)
После этого TSX будет запускаться при любой скорости эмуляции.
Выкопал старый удобный DOB.
Чтобы запретить проверку таймера в TSX-Plus V6.50 на уровне дистрибутива нужно создать файл NOCLK.MAC:
.TITLE TSINIT
.PSECT TSINIT
.=.+10352
BR .+22
.END
Для TSX-Plus V6.01 смещение перед командой BR должно быть 7772.
Далее просто извлекаем модуль TSINIT из библиотеки TSX1.OBJ, патчим его и кладем обратно в библиотеку:
.LIB/EX TSX1 TSINIT
Global? INITGO
Global?
.MAC NOCLK
.PAT TSINIT,NOCLK TSINIT.NEW
.LIB TSX1 TSINIT.NEW/REPL
.
Переработал набор патчей (https://pdp-11.online/~form/files/pdp-11/tsx/patches/) для TSX-Plus V6.01/V6.50 и собрал их в одну кучу.
Командный файл, запускаемый через IND, сам спросит все что нужно, сам определит версию и сам пропатчит.
Патчи работают на дистрибутивах для PDP-11 (вариант с поддержкой PRO/для PRO не подойдет).
При применении всех патчей проверяется контрольная сумма, так что если что не так - должно сразу быть видно.
Если в TSX-Plus V6.01 TSGEN.MAC поделен на файлы TSG1.MAC, TSGEN.MAC и TSG2.MAC (попадался такой), нужно сначала собрать файлы в один:
.COP TSG1.MAC+TSGEN.MAC+TSG2.MAC XXX.MAC
.REN XXX.MAC TSGEN
Патчи в наборе:
Поддержка дат после 1999 года в системе (для TSX-Plus V6.01)
Поддержка дат после 1999 года в FILTIM.SAV
Поддержка дат после 1999 года в SYSMON.SAV
Подержка загрузки не-RT систем командой BOOT/$STOP
Запрет проверки таймера для запуска на быстрых эмуляторах
V6.50:
.IND LD:TSXPAT
;
; TSX-Plus V6.01/V6.50 patcher V02.00.
; Copyright (c) 2023 by Oleg Safiullin <form@pdp-11.online>
;
* What is the name of the patch kit device [S R:1-4 D:"LD0"]:
* What is the name of the TSX-Plus kit device [S R:1-4 D:"DU2"]:
;
; DU2: Found TSX-Plus V6.50
;
; Press <ESC><RET> for more information.
;
* Fix display of dates after 1999 in FILTIM.SAV? [Y/N D:Y]:
* Fix display of dates after 1999 in SYSMON.SAV? [Y/N D:Y]:
* Allow booting of foreign systems? [Y/N D:Y]:
* Disable checking of line clock? [Y/N D:Y]:
.$@PATCH
.COPY/PREDELETE FILTIM.SAV FILTIM.OLD
.UNPROTECT FILTIM.SAV
.$@LD0:FILTIM.SIP
.R SIPP
*FILTIM.SAV/A/C
Base? 0
Offset? 50
Base Offset Old New?
000000 000050 002440 2522
000000 000052 000000 ^Z
Offset? 2162
Base Offset Old New?
000000 002162 005305 4767
000000 002164 010546 254
000000 002166 012702 ^Z
Offset? 2250
Base Offset Old New?
000000 002250 062705 4767
000000 002252 000110 204
000000 002254 004737 ^Z
Offset? 2442
Base Offset Old New?
000000 002442 000000 42705
000000 002444 000000 177760
000000 002446 000000 5305
000000 002450 000000 11646
000000 002452 000000 10566
000000 002454 000000 2
000000 002456 000000 207
000000 002460 000000 16601
000000 002462 000000 2
000000 002464 000000 6201
000000 002466 000000 301
000000 002470 000000 42701
000000 002472 000000 177637
000000 002474 000000 60501
000000 002476 000000 62701
000000 002500 000000 3664
000000 002502 000000 5000
000000 002504 000000 71027
000000 002506 000000 144
000000 002510 000000 10005
000000 002512 000000 10146
000000 002514 000000 4737
000000 002516 000000 2022
000000 002520 000000 12605
000000 002522 000000 207
000000 002524 000000 ^Y
Checksum? 30306
*^C
.COPY/PREDELETE SYMAIN.OBJ SYMAIN.OLD
.MACRO/OBJECT:PATCH LD0:SM65
.R PAT
*SYMAIN.NEW=SYMAIN/C:170502,PATCH
*^C
.UNPROTECT SYMAIN.OBJ
.RENAME SYMAIN.NEW SYMAIN.OBJ
.DELETE/NOQUERY PATCH.OBJ
.COPY/PREDELETE TSX2.OBJ TSX2.OLD
.MACRO/OBJECT:PATCH LD0:TK365
.R PAT
*TSX2.NEW=TSX2/C:54550,PATCH
*^C
.UNPROTECT TSX2.OBJ
.RENAME TSX2.NEW TSX2.OBJ
.DELETE/NOQUERY PATCH.OBJ
.COPY/PREDELETE TSX1.OBJ TSX1.OLD
.MACRO/OBJECT:PATCH LD0:TI65
.LIBRARY/EXTRACT TSX1 TSINIT
Global? INITGO
Global?
.R PAT
*TSINIT.NEW=TSINIT/C:36053,PATCH
*^C
.UNPROTECT TSX1.OBJ
.LIBRARY TSX1 TSINIT/REPLACE
.DELETE/NOQUERY (PATCH,TSINIT).OBJ,TSINIT.NEW
.DELETE/NOQUERY PATCH.COM
@ <EOF>
.
V6.01:
.IND LD:TSXPAT
;
; TSX-Plus V6.01/V6.50 patcher V02.00.
; Copyright (c) 2023 by Oleg Safiullin <form@pdp-11.online>
;
* What is the name of the patch kit device [S R:1-4 D:"LD0"]:
* What is the name of the TSX-Plus kit device [S R:1-4 D:"DU2"]:
;
; DU2: Found TSX-Plus V6.01
;
; Press <ESC><RET> for more information.
;
* Add support for dates after 1999? [Y/N D:Y]:
* Fix display of dates after 1999 in FILTIM.SAV? [Y/N D:Y]:
* Fix display of dates after 1999 in SYSMON.SAV? [Y/N D:Y]:
* Allow booting of foreign systems? [Y/N D:Y]:
* Disable checking of line clock? [Y/N D:Y]:
.$@PATCH
.COPY/PREDELETE TSEM2.OBJ TSEM2.OLD
.MACRO/OBJECT:PATCH LD0:TE261
.R PAT
*TSEM2.NEW=TSEM2/C:176327,PATCH
*^C
.UNPROTECT TSEM2.OBJ
.RENAME TSEM2.NEW TSEM2.OBJ
.DELETE/NOQUERY PATCH.OBJ
.COPY/PREDELETE TSKM2A.OBJ TSKM2A.OLD
.MACRO/OBJECT:PATCH LD0:TK2A61
.R PAT
*TSKM2A.NEW=TSKM2A/C:152100,PATCH
*^C
.UNPROTECT TSKM2A.OBJ
.RENAME TSKM2A.NEW TSKM2A.OBJ
.DELETE/NOQUERY PATCH.OBJ
.COPY/PREDELETE TSX2.OBJ TSX2.OLD
.MACRO/OBJECT:PATCH PATPFX+LD0:TK361
.R PAT
*TSX2.NEW=TSX2/C:173377,PATCH
*^C
.UNPROTECT TSX2.OBJ
.RENAME TSX2.NEW TSX2.OBJ
.DELETE/NOQUERY PATCH.OBJ
.COPY/PREDELETE FILTIM.SAV FILTIM.OLD
.UNPROTECT FILTIM.SAV
.$@LD0:FILTIM.SIP
.R SIPP
*FILTIM.SAV/A/C
Base? 0
Offset? 50
Base Offset Old New?
000000 000050 002440 2522
000000 000052 000000 ^Z
Offset? 2162
Base Offset Old New?
000000 002162 005305 4767
000000 002164 010546 254
000000 002166 012702 ^Z
Offset? 2250
Base Offset Old New?
000000 002250 062705 4767
000000 002252 000110 204
000000 002254 004737 ^Z
Offset? 2442
Base Offset Old New?
000000 002442 000000 42705
000000 002444 000000 177760
000000 002446 000000 5305
000000 002450 000000 11646
000000 002452 000000 10566
000000 002454 000000 2
000000 002456 000000 207
000000 002460 000000 16601
000000 002462 000000 2
000000 002464 000000 6201
000000 002466 000000 301
000000 002470 000000 42701
000000 002472 000000 177637
000000 002474 000000 60501
000000 002476 000000 62701
000000 002500 000000 3664
000000 002502 000000 5000
000000 002504 000000 71027
000000 002506 000000 144
000000 002510 000000 10005
000000 002512 000000 10146
000000 002514 000000 4737
000000 002516 000000 2022
000000 002520 000000 12605
000000 002522 000000 207
000000 002524 000000 ^Y
Checksum? 30306
*^C
.COPY/PREDELETE SYSMON.OBJ SYSMON.OLD
.MACRO/OBJECT:PATCH LD0:SM61
.R PAT
*SYSMON.NEW=SYSMON/C:103243,PATCH
*^C
.UNPROTECT SYSMON.OBJ
.RENAME SYSMON.NEW SYSMON.OBJ
.DELETE/NOQUERY PATCH.OBJ
.COPY/PREDELETE TSX1.OBJ TSX1.OLD
.MACRO/OBJECT:PATCH LD0:TI61
.LIBRARY/EXTRACT TSX1 TSINIT
Global? INITGO
Global?
.R PAT
*TSINIT.NEW=TSINIT/C:55617,PATCH
*^C
.UNPROTECT TSX1.OBJ
.LIBRARY TSX1 TSINIT/REPLACE
.DELETE/NOQUERY (PATCH,TSINIT).OBJ,TSINIT.NEW
.DELETE/NOQUERY PATCH.COM
@ <EOF>
.
Перевел модуль TSINIT от V6.50 в MAC, расставил метки в соответствии с листингом от V6.40 (руки бы поотрывать!)
Большая часть откоментирована (коментарии взяты из того же листинга).
Еще есть над чем поработать.
Полный список отличий от TSINIT в V6.40:
метки TSX адресуются в виде @#INISTP вместо INISTP
добавлена версия RT-11 V5.6 в список узнаваемых
эмулируемая версия RT-11 по умолчанию теперь 5.5 вместо 5.4
в эмулируемом RMON слово $CNFG3 отображает бит CF3.DM (есть DMA драйверы) в соответствии с драйверами TSX
Интересный факт: при компиляции с макробиблиотекой RT-11 V5.7 не совпадает код двух макрокоманд с оригиналом: у .DSTATUS и .FETCH сначала заносится аргумент в стек, потом в R0, а в оригинале (скорее всего макробиблиотека от V5.4) наоборот.
Функционально никакой разницы, но чексума модуля получается другая :)
Обновил патч кит (https://zx-pk.ru/threads/22802-tsx-plus-os.html?p=1176042&viewfull=1#post1176042) TSX-Plus V6.01/V6.50.
Мелкие исправления.
при компиляции с макробиблиотекой RT-11 V5.7 не совпадает код двух макрокоманд с оригиналом: у .DSTATUS и .FETCH сначала заносится аргумент в стек, потом в R0, а в оригинале (скорее всего макробиблиотека от V5.4) наоборот
Я с похожим столкнулся, когда делал генерацию макро-обращений для своего DisAsm-а, где именно столкнулся - не вспомню, но смысл тот же - в макро-библиотеке одно, а при дизасме программы - немного другой порядок.
немного другой порядок
Посмотрел макробиблиотеки - начиная с версии 4.0 порядок такой же как в 5.7.
Видимо они свои макросы использовали чтобы не привязываться к системной макробиблиотеке :)
Перелопатил немного FILTIM.SAV (https://pdp-11.online/~form/files/pdp-11/tsx/filtim.sav).
Вместо Y2K хука (напомню, что в версии TSX-Plus V6.50 программа FILTIM осталась та же самая какая была еще во времена V6.01) переписал вывод года.
Добавил возможность запуска под обычным RT-11.
Под TSX-Plus программа как обычно использует EMT 375 с кодом функции 145.
.RU FILTIM FILTIM.SAV
DK:FILTIM.SAV 6 18-Jan-2024 15:10:24 62082
.
Под RT-11 делается поиск по каталогу вручную.
Работа под TSX-Plus определяется по параметрам SYSGEN, соответственно совсем старые версии или RAFOS/TS не опознаются как TSX-Plus, но что-то мне подсказывает, что там и не было нужного функционала, так что все правильно.
.SH CONF
RT-11FB V05.07
Booted from VS0:RTEMFB
USR is set SWAP
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 KED
FORTRAN is set FORTRA
KMON nesting depth is 3
Global .SCCA flag is disabled
CLI is set DCL, CCL, UCL, NO UCF
Emulated RT-11 environment, processor type unknown
60KB of memory
FP11 Hardware Floating Point Unit
Extended Instruction Set (EIS)
50 Hertz System Clock
Multi-terminal support
Global .SCCA support
FPU support
Extended unit support
.RU FILTIM FILTIM.SAV
DK:FILTIM.SAV 6 18-Jan-2024 00:00:00 56683
.
Не то, чтобы оно сильно нужно, но на досуге может прикручу время создания файла в RT-11 (что отмечено в последних доках DEC как планируемое на будущее).
- - - Добавлено - - -
Еще немного информации по новому FILTIM.SAV.
По уомлчанию расширение файла .MAC - как было, поменять можно по смещению 1000 (в RADIX-50).
Если по смещениям 3206-3210 записать NOPы, то под TSX-Plus тоже будет использоваться прямое чтение каталога.
Powered by vBulletin® Version 4.2.5 Copyright © 2025 vBulletin Solutions, Inc. All rights reserved. Перевод: zCarot