Подозреваю, что только примерно человека три
Вид для печати
Подозреваю, что только примерно человека три
Был, ЕМНИП, кто то ещё, но не помню
На старости лет решил посмотреть что за DIBOL такой, а то компилер у меня есть, а сам язык не пробовал :)
Команда RUN затерта выводом программы :)Код:>TYP HELLO.DBL
.TITLE 'Hello World'
RECORD ABC
HELLO,A11,'Hello World'
PROC
XCALL FLAGS (007000000,1)
OPEN(1,O,'TI:')
WRITES(1,HELLO)
CLOSE 1
END
>DIB HELLO/OPT/BUI
No errors detected
>TKB @HELLO
Hello World
>
Не помню почему у меня он не установлен в RSX - толи дистриб битый, толи старый он, толи просто забыл про него :)
В RSTS вот точно помню - дистриб старый.
Провел ревизию - сейчас установлены:
- BASIC-11
- BASIC-PLUS-2
- DECUS C
- DIBOL 83
- FORTRAN IV
- FORTRAN 77
- PDP11 C
- PDP11 PASCAL
Все Y2K-patched (или сразу не нуждалось в этом).
Для BP2 родные патчи переделаны (родные не патчили сам BP2 - только либы).
Для PASCAL патчи сделаны с нуля - видимо родных вообще никогда не было - забросили язык.
- - - Добавлено - - -
Соврал.
Есть у меня COBOL-81 на CTAKAHе.
Код:>TYP HELLO.CBL
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
PROCEDURE DIVISION.
MAIN SECTION.
BEGIN.
DISPLAY "Hello, world!".
STOP RUN.
>C81 HELLO=HELLO
>TKB HELLO=HELLO,LB:[1,1]C81LIB/LB
>RUN HELLO
Hello, world!
>
Пользуясь кротким затишьем в работе допинал BRU в M+ V4.6 (давно хотел это сделать, да руки все не доходили).
На CTAKAH::SW:[BRU46PAT] доступны патчи которые заставляют BRU проходить через обычные проверки доступа к файловой системе если пользователь непривилегированный.
Изменения касаются восстановления файлов на диск без инициализации: у непривилигированного пользователя не будет прав создания каталогов и записи в каталоги к которым у него обычно нет доступа.
Теперь установка BRU в системе не грозит сюрпризами в виде LB:[0,0]RSX11.SYS;2 :)
Ну по крайней мере на первый взгляд :D
Патчи так же доступны по ftp://pdp-11.online.
Код:>SET /NONAMED
>SET /UIC=[377,377]
>VCP CON RK07/CR:RK07/MOU:FOR
VCP - Bad block descriptor created.
VCP - Device VF0: (DM0:) has been assigned.
>SET /NOPRIV=TI:
>BRU /MOU/INI LB:[1,1]RSXMAC.SML DM:
BRU -- *WARNING* -- This disk will not contain a hardware bootable system
BRU - Completed
>DMO DM:
DMO -- TT12: dismounted from DM0: *** Final dismount initiated ***
>MOU DM:RSX11MPBL87
>BRU /MOU/NOI/UFD LB:[1,1]SYSLIB.OLB DM:
BRU -- *WARNING* -- OPEN error [001001] SYSLIB.OLB;1
I/O error code -16
BRU -- *WARNING* -- No files found
BRU - Completed
>BRU /MOU/NOI/UFD LB:[1,2]STARTUP.CMD DM:
BRU -- *WARNING* -- Error accessing UFD. Skipping [001002]
BRU -- *WARNING* -- No files found
BRU - Completed
>DMO DM:
DMO -- TT12: dismounted from DM0: *** Final dismount initiated ***
>MOU DM:RSX11MPBL87/NOSH
>BRU /MOU/NOI/UFD LB:[1,2]STARTUP.CMD DM:
BRU - Completed
>BRU /MOU/NOI/UFD LB:[1,1]SYSLIB.OLB DM:
BRU - Completed
>
Решил сюда записать как памятку, а то изредка приходится вспоминать особенности при установке языков :)
Рассматриваем установку BASIC-PLUS 2 V2.7, DIBOL-83 V1.4, DATATRIEVE-11 V3.3A, FORTRAN IV V2.8, FORTRAN 77 V5.4, PDP11 C V1.2 и PDP11 PASCAL V1.3 в RSX-11M-PLUS V4.6.
Для большей части перечисленного софта в дистрибутивном ките RSX-11M-PLUS V4.6 есть набор патчей.
Однако для BASIC-PLUS 2 и DATATRIEVE-11 есть свои обновления (для BP2 исправляет дату в самом BP2, а для DTR уже и не помню что там еще).
Для PDP11 PASCAL есть только свои патчи.
Общие особенности установки:
- нужно быть залогиненным через HEL (если это консоль после загрузки - выйти и залогиниться снова), диск по умолчанию должен быть тот же что LB: (лучше всего годится родной [1,1])
- установить режим SET /NONAMED
- ни в коем случае не пытаться монтировать дистрибутивную ленту как public device
- запуск AUTOIN должен выполняться из привилегированного UIC (например [1,1]) как @[367,367]AUTOIN
Все ленты (за исключением BASIC-PLUS 2 и DIBOL-83) в формате BRU.
DATATRIEVE-11 (DTR), FORTRAN 77 (F77), PDP11 PASCAL (PAS), PDP11 C (CCC) устанавливаются через AUTOIN.
FORTRAN IV (FOR) устанавливается командным файлом INSTAL который следует запускать из его родного каталога [245,245] (предварительно нужно скопировать обновленный вариант из каталога патчей [245,200])
DIBOL-83 устанавливается командным файлом DBLRSX из под каталога [1,1] куда предварительно коипруется с ленты в формате FLX.
BASIC-PLUS 2 устанавливается командным файлом BP2RSX из под каталога [1,10] куда предварительно коипруется с ленты в формате FLX.
Подробные логи установки есть здесь.
Вспомнил что за проблема была с COBOL-81. Там был битый образ ленты с simh.trailing-edge.com в котором даже после исправления с помощью brufix оставался битый OLB файл. Сначала я смог подсунуть ему этот файл от более старого дистрибутива, но потом вроде удалось запинать родной с помощью перестановки соседних блоков. Только вот найти поправленный вариант так и не смог. Будет время - разберусь - по идее исправленный OLB должен лежать на CTAKAH.
На CTAKAH в SW:[VMR46PAT] добавились патчи для VMR.
Аналогично BRUшным - не позволяют непривилегированному пользователю мучить системный образ, но не мешает ему (при установленном VMR) мучить свои образы на диске, смонтированном с /NOSH (или образы к которым он имеет доступ на запись обычным образом).
- - - Добавлено - - -
Восстановил дистриб COBOL-81 V3.1.
Будем надеяться, что больше косяков нет :)
Тесты при установке проходят.
Лежит в CTAKAH::SW:[KITS].
Код:>TYP HELLO.CBL
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
PROCEDURE DIVISION.
MAIN SECTION.
BEGIN.
DISPLAY "Hello, world!".
STOP RUN.
>C81 HELLO=HELLO
>TKB HELLO=HELLO,LB:[1,1]C81LIB/LB
>RUN HELLO
Hello, world!
>
Скрытый текст
Код:>@[367,367]AUTOIN
RSX-11M/M-PLUS Auto-Install Procedure V1.1
10-MAR-21 07:01:02
Type "?" for help; CTRL/Z to end; or valid input.
Which product(s) do you want to install? C81
Type "?" for help; CTRL/Z to exit Auto-Install; or valid input.
Where are the update files located <DU0:>?
Type "?" for help; CTRL/Z to skip this product; or valid input.
Which device are the distribution files for C81 (C81) located on (include colon)
? MU1:
BRU - Starting Tape 1 on MU1:
BRU - End of Tape 1 on MU1:
BRU - Completed
Products being installed:
Device Product Task name
------ ------- ---------
MU1: C81 (C81)
Determining system configuration.
BRU - Starting Tape 1 on MU1:
BRU - End of Tape 1 on MU1:
BRU - Completed
WARNING -- no updates found for configuration data file; procedure continuing.
Do you want to customize C81 (C81) (Y/N) <N>? Y
Where do you want to store the installation files <SY0:>?
Which directory do you want the COBOL tasks assigned to ([X,Y]) <[1,54]>? [3,54]
Generate CIS or NONCIS code <CIS, NONCIS, UNKNOWN> <UNKNOWN>? NONCIS
Change the default of any of the compiler switches <NO>?
Build which of the COBOL-81 OTS resident libraries <NONE, CIS, NONCIS, BOTH> <NO
NE>? BOTH
Allow future customization of this file <YES>?
Allow future customization of this file <YES>?
Print release notes automatically <NO>?
Print the installation log automatically <NO>?
Delete optional installation files <YES>?
Do you want to customize C81 (C81) again (Y/N) <N>?
Installation of C81 (C81) beginning at 10-MAR-21 07:03:15
Reading C81C81.CFG.
C81 (C81) must be installed from a distribution kit because
optional installation files may have been deleted. Please verify
that your distribution kit is placed on a device and indicate
which device it is located on (including colon). An example of
valid input is:
MM0:
Type "?" for help; CTRL/Z to end; RETURN to accept default
(given in <>); or valid input.
Which device is the distribution kit located on (include colon) <MU1:>?
Type "T" for tape, "D" for disk, CTRL/Z to end; or RETURN to accept default
(given in <>).
What type of kit is this <T/D> <T>?
ALL -- Device mounted
MOU - volume already mounted
Transferring kit files to work area.
BRU - Starting Tape 1 on MU1:
BRU - End of Tape 1 on MU1:
BRU - Completed
BRU - Starting Tape 1 on MU1:
BRU - End of Tape 1 on MU1:
BRU - Completed
DMO -- TT0: dismounted from MU1: *** Final dismount initiated ***
07:03:49 *** MU1: -- Dismount complete
Updating kit files.
Begin Update process for COBOL-81 V3.1 software
on 10-MAR-21 at 07:03:49.
Update the compiler object module library.
LBR DU0:[367,100]C81BLD/RP=DU0:[215,200]C81COMUPD.OBS
Module "FLCHK " replaced
Finished with Update process for COBOL-81 V3.1 software
on 10-MAR-21 at 07:03:49.
Building product C81 (C81).
Building the COBOL-81 compiler...
Copying built components to the appropriate places.
Building resident libraries if requested.
PIP -- No such file(s)
LB:[1,1]C81LIB.TSK;*
PIP -- No such file(s)
LB:[1,1]C81LIB.STB;*
PIP -- No such file(s)
LB:[1,1]C81CIS.TSK;*
PIP -- No such file(s)
LB:[1,1]C81CIS.STB;*
Installing COBOL-81 tasks.
REM -- Task not in system
REM -- Task not in system
REM -- Task not in system
Now compile and task-build the
installation certification program.
Transferring files from work area.
Running IVP command procedure C81IVP.CMD.
****************************************************
** This is the COBOL-81 installation **
** certification procedure. If the messages: **
** **
** C81IC1 has passed. **
** **
** C81IC2 has passed. **
** **
** follow this message, then the installation **
** of COBOL-81 V3.1-00 was successful; otherwise,**
** the installation was unsuccessful. **
****************************************************
C81IC1 has passed.
C81IC2 has passed.
****************************************************
** End of installation certification procedure. **
****************************************************
Installation of C81 (C81) ending at 10-MAR-21 07:06:55.
Installation of C81 (C81) successful.
Auto-Install ended on 10-MAR-21 at 07:06:56.
>
[свернуть]
Выложил образ ленты SimH/E11.