TSX-Plus OS

[Hunta]

Кстати, не отправить ли кому советскую документацию что на фотографии выше?

Я могу забрать

[form]

Я могу забрать

Пиши адрес в личку, где-нибудь в конце августа доберусь до почты

[Hunta]

Ответил

[AFZ]

Перелопатил 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...

[hobot]

А где оно выложено?

http://archive.pdp-11.org.ru/ukdwk_a...p601_Y2k_orig/ -читайте шпоры к выложенному (где нет там нет)
и эту тему...

[AFZ]

Интересно, откуда Потемкин взял исходник TSx+ 6.01? В том ПРОшном TSX-е, который мы запускали на Хомере год назад, присутствует исходник TSKMN1, в который Потемкин и компания вписали свою привязку к серийнику 85-й, а заодно и SL от Сторожевых (он, кстати, тоже входил в команду Потемкина, или как?). Так вот, интересно, ГДЕ ОНИ ВЗЯЛИ этот исходник?

Разобрался.Не было у Потемкина исходников. Это качественный дизасм. Просто я тогда читал ту часть, которую Потемкин и его команда дописали сами, а на остальное не смотрел. А остальное оказалось дизасмом, правда качественным, ребята хорошо над ним поработали...

[Advertiser]

[form]

А где оно выложено?

Я из аттачей много чего почистил ибо здесь с этим совсем плохо (было?) - место мгновенно кончалось.
Лежит здесь.

[AFZ]

Да, кстати, о сборке TSX

В системе в которой я собирал не хватило памяти для таблицы символов LINK, пришлось поправить TSXLNK.COM (в том варианте, что он мне достался так и было):

R LINK

заменить на

R VBGEXE
SY:LINK

На реальной машинке - безусловно, XM и VBGEXE. И LINK под ними запускать, и MACRO. Всё работает заметно быстрее. Особенно Макро - чуть ли не вдвое быстрее, если не путаю. А в эмуляторе мне вполне хватило просто дать команду
SET USR SWAP
Ну, будет собираться не 6 секунд, а 7...

[form]

Давно в этой теме ничего не писалось...
А я как раз сейчас регулярной работой по 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
*

[forth32]

В RAFOS/TS команда DUMP имела доступ к любому абсолютному сектору диска, что делало вообще бессмысленным всю эту защиту.
А в новых TSX 6 с этим как?
(лень разбираться с генерацией, чтобы самому попробовать...)