см. схему ЯП, так так ;-)Цитата:
Сообщение от form
https://pic.maxiol.com/thumbs2/16122...stgview009.png
Вид для печати
см. схему ЯП, так так ;-)Цитата:
Сообщение от form
https://pic.maxiol.com/thumbs2/16122...stgview009.png
Кто подключен ко мне по IPNET/MultiNet, новый IP адрес 178.205.143.174.
Имя pdp-11.online тоже годится.
Всем править CTAKAH.cfg для эмулятора VT52 Patron'аЦитата:
Сообщение от form
Код:Welcome to PDP-11.ONLINE :: CTAKAH
>HEL
Account or name: GUEST
Password:
RSX-11M-PLUS V4.6 BL87 [1,54] System CTAKAH
31-MAR-21 04:14 Logged on Terminal TT52: as GST6
Good Morning
,;,
O(o o)O
+---ooO-----------Ooo----------------------------------------------+
| # # # ## # |
| # ## ## # |
| #### #### #### # # ### # ### # ### # ### ### |
| # # # # # # ### # # # # # # # # # # # # |
| # # # # # # # # # # # # # # # # ##### |
| #### #### #### ### ### # ### # # ### ### # # # |
| # # ### |
| # # CTAKAH:: RSX-11M-PLUS V4.6 |
+------------------------------------------------------------------+
Last interactive login on Tuesday, March 30, 2021 23:45:19 (TT53:)
Last batch login on Tuesday, March 12, 2019 22:10:00
See http://pdp-11.org.ru/~form/ctakah.html for more information.
$ HELP
For HELP on logging in, type HELP LOGIN.
Help is available for DCL commands, utilities, and system features.
You can receive help by typing either HELP or ? after the DCL prompt ($)
followed by the desired topic. For example, for help on the COPY command,
type either HELP COPY or ? COPY. (The examples in the HELP files indicate
only the first of these two formats in order to save space.) Also note that
you can type help requests in either upper case or lower case.
Help is available for the following DCL commands:
ABORT COBOL DELETE INSTALL PRINT START
ALLOCATE CONTINUE DIFFERENCES LIBRARY PURGE STOP
ANALYZE CONVERT DIRECTORY LINK RELEASE SUBMIT
APPEND COPY DISMOUNT LOGIN REMOVE TYPE
ASSIGN CORAL EDIT LOGOUT RENAME UNFIX
BACKUP CREATE FIX MACRO REQUEST UNLOCK
BASIC DEALLOCATE FORTRAN MCR RUN
BROADCAST DEASSIGN HELP MERGE SET Dates
CANCEL DEBUG HOLD MOUNT SHOW
CCC DEFINE INITIALIZE PASCAL SORT
For information on a command, type: HELP commandname. Additional
help on a command qualifier is often available by typing:
HELP commandname qualifier. For the short forms of some commands,
type: HELP BRIEF.
For information on utilities and system features, type: HELP MORE.
$ RUN GANG
В МРАЧНЫХ ПОДЗЕМЕЛЬЯХ СТАРОГО ГАПА ЗАСЕЛИ 20 ГАНГСТЕРОВ.
ХЕР ИХ ЗНАЕТ ЧЕГО ИМ ТАМ ПОНАДОБИЛОСЬ. МОЖЕТ БЫТЬ ХОТЯТ ОНИ
ЗАХВАТИТЬ НАШИ СОЦИАЛИСТИЧЕСКИЕ CM-1420 ДАБЫ ПОДОРВАТЬ
МОГУЩЕСТВО НАШЕЙ РОДИНЫ И УСИЛИТЬ МИРОВОЙ ИМПЕРИАЛИЗМ. БЫТЬ
МОЖЕТ ХОТЯТ ОНИ РАЗОБРАТЬ КОРЗИНЫ И ПРОДАТЬ ИХ НА
ДРАГ-МЕТАЛЫ... А МОЖЕТ БЫТЬ ХОТЯТ ОНИ СОВЕРШИТЬ СТРАШНОЕ
ЗЛОДЕЙСТВО И ЗАПУСТИТЬ ЗЛОЙ SHUTUP, ЧТОБЫ ПОМЕШАТЬ
СОВЕТСКИМ ПРОГРАММИСТАМ В ИХ ВЕЛИКИХ НАЧИНАНИЯХ. И НИКТО
НЕ МОЖЕТ НИЧЕГО ПОДЕЛАТЬ - СЕРГЕЙ ФЕДОРОВИЧ УЕХАЛ НА АЛТАЙ,
А ИГОРЕК ВООБЩЕ НЕИЗВЕСТНО ГДЕ... СЛОВОМ ВСЯ НАДЕЖДА НА ВАС!
ВЫ ГОТОВЫ ВСТУПИТЬ В СМЕРТЕЛЬНУЮ СХВАТКУ С ВРАГОМ? НЕТ
ВОТ ИЗ-ЗА ТАКИХ ТРУСЛИВЫХ И ПОНАСТАВИЛИ ВЕЗДЕ ВИНДОВСОВ...
$ LOGOUT
$ @LB:[1,2]SYSLOGOUT.CMD
$ @ <EOF>
$
Connect time: 0 hrs 5 mins 9 secs
CPU time used: 0 hrs 0 mins 4 secs
Task total: 28
Have a nice day
31-MAR-21 04:19 TT52: logged off CTAKAH
$
Welcome to PDP-11.ONLINE :: CTAKAH
>
Некоторые особенности P/OS в том виде в каком он устанавливается :)
https://pdp-11.online/~form/files/pd...ro/getpriv.png
После запуска test.tsk пользователь стал привилегированным?
Да.Цитата:
Сообщение от AlexCherny
Регион CTPAGE отображается на страницу I/O, тем самым эффективно предоставляя доступ ко всей памяти :)
:v2_eek::v2_eek::v2_eek::v2_eek:Цитата:
Сообщение от form
Это так задумано или брак? есть ли где-то подробный текст по этой теме?
Скорее всего это делалось для доступа к графике, а полновесной защиты не предполагалось - комп-то по сути персональный :)Цитата:
Сообщение от AlexCherny
Код:.TITLE BE
.MCALL ATRG$S,CRAW$S,DIR$ ;SYSTEM MACRO CALLS
.MCALL EXIT$S,RDBBK$,WDBBK$ ;
.MCALL TCBDF$,UCBDF$ ;EXEC MACRO CALLS
TCBDF$ ;DEFINE TCB OFFSETS
UCBDF$ ,,TTDEF ;DEFINE UCB OFFSETS
PSW = 177776 ;PROCESSOR STATUS REGISTER
KPAR0 = 172340 ;KERNEL PAR'S
KPAR1 = 172342 ;
KPAR2 = 172344 ;
KPAR3 = 172346 ;
KPAR4 = 172350 ;
KPDR0 = 172300 ;KERNEL PDR'S
KPDR1 = 172302 ;
KPDR2 = 172304 ;
KPDR3 = 172306 ;
KPDR4 = 172310 ;
UPAR0 = 177640 ;USER PAR'S
UPAR1 = 177642 ;
UPAR2 = 177644 ;
UPAR3 = 177646 ;
UPAR4 = 177650 ;
UPDR0 = 177600 ;USER PDR'S
UPDR1 = 177602 ;
UPDR2 = 177604 ;
UPDR3 = 177606 ;
UPDR4 = 177610 ;
RDB:: RDBBK$ ,CTPAGE,,RS.RED!RS.WRT ;RDB
WDB:: WDBBK$ 7,200,,,,WS.MAP!WS.WRT ;WDB
START:: ATRG$S #RDB ;ATTACH REGION
BCC 20$ ;BRANCH IF OK
MOV #"AT,R0 ;ERROR CODE
10$: MOV $DSW,R1 ;GET $DSW
BPT ;ABORT
20$: MOV RDB+R.GID,WDB+W.NRID ;COPY REGION ID
CRAW$S #WDB ;CREATE ADDRESS WINDOW
BCC 30$ ;BRANCH IF OK
MOV #"CR,R0 ;ERROR CODE
BR 10$ ;ABORT
30$: BIS #340,@#PSW ;RAISE CPU PRIORITY
MOV @#UPAR0,-(SP) ;SAVE USER PARS
MOV @#UPAR1,-(SP) ;
MOV @#UPAR2,-(SP) ;
MOV @#UPAR3,-(SP) ;
MOV @#UPAR4,-(SP) ;
MOV @#UPDR0,-(SP) ;SAVE USER PDRS
MOV @#UPDR1,-(SP) ;
MOV @#UPDR2,-(SP) ;
MOV @#UPDR3,-(SP) ;
MOV @#UPDR4,-(SP) ;
MOV @#KPAR0,@#UPAR0 ;MAP SYSTEM DATABASE
MOV @#KPAR1,@#UPAR1 ;
MOV @#KPAR2,@#UPAR2 ;
MOV @#KPAR3,@#UPAR3 ;
MOV @#KPAR4,@#UPAR4 ;
MOV @#KPDR0,@#UPDR0 ;
MOV @#KPDR1,@#UPDR1 ;
MOV @#KPDR2,@#UPDR2 ;
MOV @#KPDR3,@#UPDR3 ;
MOV @#KPDR4,@#UPDR4 ;
MOV $TKTCB,R0 ;GET OUR TCB
MOV T.UCB(R0),R0 ;GET TI: UCB
BIS #U2.PRV,U.CW2(R0) ;MAKE TERMINAL PRIVILEGED
MOV (SP)+,@#UPDR4 ;RESTORE MAPPING
MOV (SP)+,@#UPDR3 ;
MOV (SP)+,@#UPDR2 ;
MOV (SP)+,@#UPDR1 ;
MOV (SP)+,@#UPDR0 ;
MOV (SP)+,@#UPAR4 ;
MOV (SP)+,@#UPAR3 ;
MOV (SP)+,@#UPAR2 ;
MOV (SP)+,@#UPAR1 ;
MOV (SP)+,@#UPAR0 ;
BIC #340,@#PSW ;LOWER CPU PRIORITY
EXIT$S ;EXIT
.END START
Код:PMA TEST=LB:[1,5]EXEMC/ML,RSXMC/PA:1,SY:[]TEST
.IF <EXSTAT> <> <SUCCES> .EXIT
.OPEN TESTBLD.CMD
.DATA TEST=TEST,LB:[1,5]POS.STB/SS
.DATA /
.DATA STACK=20736
.DATA WNDWS=1
.DATA //
.CLOSE
PAB @TESTBLD
.IF <EXSTAT> <> <SUCCES> .EXIT
PIP TEST.OBJ;*,TESTBLD.CMD;*/DE/NM
Забегу на минутку написать об изменениях...
Теперь системы pdp-11.online недоступны через telnet.
Вместо этого нужно использовать ssh.
Код:System Machine Emul HECnet SSH Guest account
---------------------------------------------------------------------------
RSX-11M+ V4.6 PDP-11/94 SimH CTAKAH rsx@pdp-11.online GUEST
RSX-11M+ V4.6 PDP-11/83 - BIGSYS - GUEST
RSTS/E V10.1 PDP-11/94 SimH CCCP rsts@pdp-11.online 254,254
OpenVMS V7.3 MV3900 SimH XPEH vms@pdp-11.online GUEST
TSX+ V6.50 PDP-11/94 SimH - tsx@pdp-11.online GUEST
Приветствую. Есть еобходимость поставить Decnet на RSX11M v4.8.
Взял decnet11mplus_4_3.tpc, далее в соответствии с докой: ALLOC, MOU, FLX, @PREGEN
Что делать?Код:>* 01.00 Do you wish to see the PREGEN notes? [Y/N]: N
>* 02.00 Are you running on a small dual-disk system? [Y/N]: N
>* 04.00 Where is the Network distribution kit loaded [S]: MS0:
>* 04.01 Is the tape already loaded in MS0:? [Y/N]: Y
>* 04.02 Is the tape 1600 BPI? [Y/N]: Y
FLX -- File not found
MS0:[137,10]NETMOV.DAT
FLX -- File not found
MS0:[137,10]NETMOV.DAT
>;
>; Error - The file MS0:[137,10]NETMOV.DAT could not be copied.
>;
DMO -- TT0: dismounted from MS0: *** Final dismount initiated ***
07:51:27 *** MS0: -- Dismount complete
>;
>* 04.00 Where is the Network distribution kit loaded [S]: