Электроника-85 vs. DEC Pro-350 + их эмуляция

[form]

По поводу TSX+ V6.01 для очистки совести проверил два дистриба которые под рукой с помощью LIN/NOEXE/MAP:TSX TSX.STB - все честно: один только для PRO, второй только для не PRO. А заглядывание в листинги на bitsavers показало, что бывает еще вариант, работающий и там и там.

[AFZ]

А заглядывание в листинги на bitsavers показало, что бывает еще вариант, работающий и там и там.

Я лично запускал свой, который PRO, на ДВК, так, что, очевидно, это он и есть. Да и, на мой взгляд, нецелесообразно делать только для PRO - не найдется PROшного оборудования, остальное-то никто не отменял?

[form]

очевидно, это он и есть

Очевидно обратное - он (взятый из TS601G.DSK) только для PRO. Проверить легко: листинги есть на bitsavers, из них (TSINIT) видим, что глобальный символ PROASM может иметь три значение: 0 - не для PRO, 1 - для PRO, 2 - и для PRO и для не PRO. В TS601G.DSK он равен 1, в том который я у себя запускал он равен 0. А вообще в идеале собраться бы с силами всем заинтересованным народом и если каждый по немногу строчек из листингов тех перегонит в MAC файл, получим (почти?) полные исходники с которыми можно работать

---------- Post added at 13:34 ---------- Previous post was at 13:26 ----------

Для очистки совести конечно могу вечером собрать самый минимальный на свете RT-11SJ и попытаться запустить из под него с моим TSGEN'ом.

---------- Post added at 13:36 ---------- Previous post was at 13:34 ----------

нецелесообразно делать только для PRO

Насколько это целесообразно станет ясно в первые же минуты при попытке сгенерить более-менее приличный конфиг. Например все мое железо можно запользовать только впритык, при том MU: должен быть hwd, а не fsm, а про rtvect хотя бы = 1 уже даже и мечтать не стоит - не влезет в 40Kb

[AFZ]

Очевидно обратное - он (взятый из TS601G.DSK) только для PRO.

Тем не менее, я именно из него истреблял потемкинскую привязку к серийнику ПРОшки. Запустил на ДВК сгенерированное тем товарищем для кого-то из клиентов, оно, конечно, полезло за серийником, такого нет, TRAP to 4, как-то, с помощью пульта, я выловил это место, нашел программу, где эта дрянь вызывается и по-простому, DESS'ом истребил переход на нее. И заработало, вполне нормально.

[form]

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

.SH ALL
TSX-Plus Version = 6.50

19-Mar-2015

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

Assignments:
SY  --> DU2:
TCP --> LD7:
CF  --> VM0:
WF  --> VM0:
DK  --> LD6:


Device  Job    Job name
------  ---  ------------
 CL0    18   TCP/IP      

Uptime: 01:16:25
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)    40  TI        39Kb   01:17:00  00:00:02  KMON     
10   10(0)    40  TI        39Kb   00:07:00  00:00:01  KMON     ROOT        
11   11(0)    40  TI        39Kb   00:01:00  00:00:01  KMON     GUEST       
18    Det.    50  HI        63Kb   00:07:00  00:00:04  RTELNT   TCP/IP      
19    Det.    50  SL-Swap   33Kb   01:17:00  00:00:00  WINPRT   Window print
20    Det.    50  SL        63Kb   01:17:00  00:00:00  RTSORT   SYSTEM      
21    Det.    50  SL-Lock   63Kb   01:17:00  00:00:19  TCPIP    TCP/IP      
26   10(1)    40  TI        39Kb   00:07:00  00:00:00  KMON     ROOT        
27   10(2)    40  TI        39Kb   00:06:00  00:00:00  KMON     ROOT        
28   10(3)    50  TI        39Kb   00:06:00  00:00:01  KMON     ROOT        
29    1(1)    40  TI        39Kb   00:04:00  00:00:00  KMON     
30    1(2)    40  TI        39Kb   00:04:00  00:00:00  KMON     
31    1(3)    50  SL        39Kb   00:04:00  00:00:04  $HOST$   
32   11(1)    40  TI        39Kb   00:01:00  00:00:00  KMON     GUEST       
33   11(2)    40  TI        39Kb   00:01:00  00:00:00  KMON     GUEST       
34*  11(3)    50  IN        39Kb   00:01:00  00:00:02  KMON     GUEST       

ine  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      9600 8N    Yes   DHV11 - 4
11*   Local  DHV- 5 360  160500  VT200      9600 8N    Yes   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

CL version number 18.

Unit  Line   Job           Options
----  ----  ----  ----------------------------
 CL0   12    18   [FORM,TAB,LC,LFOUT,LFIN,CR,CTRL,DTR]
 CL1   13     1   [LC,LFOUT,LFIN,CR,CTRL,DTR]
 CL2  none  none 
 CL3  none  none 

Total installed memory            = 4088Kb
Size of unmapped TSX and handlers = 39Kb  (115252)
Size of mapped TSX system regions = 81Kb
Total size of TSX and mapped data = 142Kb
Size of mapped device handlers    = 4Kb
Size of sharable run-time systems = 54Kb
Size of data cache buffer area    = 0Kb
Space available for user jobs     = 1806Kb
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:
LD6 --> DU2:TSXWRK.DSK[10240]
LD7 --> DU2:TSXTCP.DSK[4800] (read only)

Mounted devices:
  Device          Associated jobs
---------- ------------------------------
DU2:        1 10 11 26 27 28 29 30 31 32 33 34
DU2:TSXTCP  1 10 11 18 21 26 27 28 29 30 31 32 33 34
DU2:TSXWRK  1 10 11 26 27 28 29 30 31 32 33 34
VM0:        1 10 11 26 27 28 29 30 31 32 33 34

Shared run-time systems:
CBR063

Region   Size    Type   Job  Use  Shared  AGE   Base
------  ------  ------  ---  ---  ------  ---  ------
WIN01A     3.8  Global    1    1    No    No   072170
SCKT00     8.0  Global   21    2    Yes   No   071770
WIN10A     3.8  Global   10    1    No    No   071670
WIN26A     3.8  Global   26    1    No    No   071570
WIN27A     3.8  Global   27    1    No    No   071470
WIN28A     3.8  Global   28    1    No    No   071370
WIN29A     3.8  Global   29    1    No    No   071270
WIN30A     3.8  Global   30    1    No    No   071170
WIN31A     3.8  Global   31    1    No    No   071070
WIN11A     3.8  Global   11    1    No    No   070770
WIN32A     3.8  Global   32    1    No    No   070670
WIN33A     3.8  Global   33    1    No    No   070570
WIN34A     3.8  Global   34    1    No    No   070470

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,NOTTYIN,SUBSTITUTE

VM Base=100000 Top=170000 Size=3584

.

[свернуть]

---------- Post added at 13:39 ---------- Previous post was at 13:38 ----------

истреблял потемкинскую привязку к серийнику ПРОшки

Это не его привязка. См вышеупомянутые листинги - там есть глобальный символ и про это.

[AFZ]

В общем-то, скорее всего, "не-ПРОшный" вариант нужен именно для того, чтобы поставить TSX на "нафаршированную" машинку. У 85-й-то оборудования раз, два и обчелся, поэтому место в первых 40К не так дефицитно, что-то специфически ПРОшное ложится туда. А нафаршированная машинка не может быть ПРО, и для обслуживания этого фарша можно выкинуть специфические ПРОшные дела.

ДВК же, в смысле фарша, тоже недалеко ущел от Э-85, поэтому, несмотря на занятый ПРОшным кодом кусок нижней памяти, работает под ПРОшным TSX нормально.

Спрашивается, правда, почему это не решено в рамках условного ассемблирования?

[form]

ДВК же, в смысле фарша, тоже недалеко ущел от Э-85

В ДВК тем не менее можно воткнуть много чего (всмысле без напрягов каких-либо), например советский RQDX, а это уже солидно

---------- Post added at 13:54 ---------- Previous post was at 13:52 ----------

Спрашивается, правда, почему это не решено в рамках условного ассемблирования?

Решено именно так. Но без возможности пользователя повлиять - все собрано до него.

---------- Post added at 13:59 ---------- Previous post was at 13:54 ----------

Ну а почему есть три разных дистриба - понятно - хотели денег побольше поиметь

[AFZ]

Это не его привязка.

Его-его. См. TSKMO1.MAC, в конце, а также (CSPN, RELEAS и RELMAC).MAC целиком, все это лежит в PROTSXplus601 -> TSX10.RT -> TSX.DSK той самой свалки TSX, от которой мы и пляшем.

[form]

Его-его. См. TSKMO1.MAC, в конце, а также (CSPN, RELEAS и RELMAC).MAC целиком, все это лежит в PROTSXplus601 -> TSX10.RT -> TSX.DSK той самой свалки TSX, от которой мы и пляшем.

Ну в листингах видно, что такая фича в принципе есть в оригинале. А уж чья там реализована - мне лень копаться - все листинги есть - можно проверить по ним и по STB от сборки.

[AFZ]

Ну в листингах видно, что такая фича в принципе есть в оригинале.

Вероятно, то, что досталось Потёмкину, было без этой фичи. Или его команда не нашла эту фичу. Но сделано очень грубо: где-то в средине воткнули
GRTFIN::
JMP TESTPN
GRTFI1::
и вот под меткой TESTPN расположили в конце свою программулю, завершающуюся командой
JMP GRTFI1
Если серийник не совпадает, она заканчивается банальным HALT, а так, как этот кусок работает в юзермоде, то, вместо останова, TSKMON перезапускается, и все сначала. В результате на экране моргае первая строчка запуска TSX и вся любовь.