[Info-vax] Does anyone know if the unsupported TBO (time boost utility that "drifts" time forward or backward by adjusting ticklength) was every ported to the Itanium?
Jon Pinkley
jon.pinkley at gmail.com
Sun Dec 27 18:51:18 EST 2020
On Wednesday, November 4, 2020 at 5:48:40 AM UTC-5, Volker Halle wrote:
> Jon,
>
> TBO 2.0 (as pointed to by your first entry), compiles and links without error on OpenVMS I64 V8.2. Chances are good, that it will also function correctly, but I didn't try ...
>
> Volker.
This is just a follow-up.
This works on IA64 VSI OpenVMS V8.4-2L1 with VMS842L1I_UPDATE-V0100
$ sho sys/nopro
OpenVMS V8.4-2L1 on node TORUS 27-DEC-2020 18:43:34.66 Uptime 2 23:22:35
$ write sys$output f$getsyi("hw_name")
HP rx2800 i6 (2.66GHz/32.0MB)
$
Compiled and linked with these commands:
$ macro tbo
$ link/selective_search/notrace tbo
The following is what I did in a mixed architecture Cluster (Alpha,IA64)
Old Alpha just had SYS_UTILITY defined as SYS$SYSDEVICE:[USERLIB.SYSUTL]
To allow common TBO.CLD with image defined as SYS_UTILITY:TBO
I created a subdirectory [.EXE_IA64] and defined SYS_UTILTIY on the IA64 node as follows
$ define/sys/exec sys_utility clu_sysdevice:[userlib.sysutl.exe_ia64],clu_sysdevice:[userlib.sysutl]
Here is more complete log.
-------------------------------------------------
$ show symbol dw
DW == "DIRECTORY/SIZ=ALL/DATE/WID=(FILE:40,SIZ:7)"
$ sho def
CLU_SYSDEVICE:[USERLIB.SYSUTL.00SRC]
$ set def [-]
$ cre/dir [.exe_ia64]
$ cre/dir [.exe_alpha]
$ dw [.00src]tbo.mar
Directory DSA1407:[USERLIB.SYSUTL.00SRC]
TBO.MAR;2 20/24 27-OCT-1996 06:53:30.92
Total of 1 file, 20/24 blocks.
$ set def [.00src]
$ macro tbo/obj=tbo.obj_ia64
$ LINK/SYSEXE=SELECTIVE/exe=[-.exe_ia64]tbo.exe tbo.obj_ia64
$ sho log sys_utility
"SYS_UTILITY" = "CLU_SYSDEVICE:[USERLIB.SYSUTL]" (LNM$SYSTEM_TABLE)
$ define/sys/exec sys_utility clu_sysdevice:[userlib.sysutl.exe_ia64],clu_sysdevice:[userlib.sysutl]
$ dw sys_utility:tbo.exe
Directory DSA1407:[USERLIB.SYSUTL.EXE_IA64]
TBO.EXE;1 50/56 27-DEC-2020 17:30:37.39
Total of 1 file, 50/56 blocks.
Directory DSA1407:[USERLIB.SYSUTL]
TBO.EXE;4 16/16 5-JAN-2010 18:20:31.99
TBO.EXE;3 16/16 1-APR-1999 22:48:29.33
TBO.EXE;2 16/16 27-OCT-1996 06:57:52.82
Total of 3 files, 48/48 blocks.
Grand total of 2 directories, 4 files, 98/104 blocks.
$ LINK/SYSEXE=SELECTIVE/notrace/exe=[-.exe_ia64]tbo.exe tbo.obj_ia64
$ sho def
CLU_SYSDEVICE:[USERLIB.SYSUTL.00SRC]
$ dw sys_utility:tbo.exe
Directory DSA1407:[USERLIB.SYSUTL.EXE_IA64]
TBO.EXE;2 49/56 27-DEC-2020 17:41:34.67
TBO.EXE;1 50/56 27-DEC-2020 17:30:37.39
Total of 2 files, 99/112 blocks.
Directory DSA1407:[USERLIB.SYSUTL]
TBO.EXE;4 16/16 5-JAN-2010 18:20:31.99
TBO.EXE;3 16/16 1-APR-1999 22:48:29.33
TBO.EXE;2 16/16 27-OCT-1996 06:57:52.82
Total of 3 files, 48/48 blocks.
Grand total of 2 directories, 5 files, 147/160 blocks.
$ set command sys_utility:tbo
$ tbo /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:42:51.85
Timeadjust: 0
Ticklength: 10000
$ ! No Crash !
$ tbo /dir=for /range=10 /delta=1 /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:45:56.67
Timeadjust: 10000
Ticklength: 11000
$ tbo /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:46:14.36
Timeadjust: 0
Ticklength: 10000
$ tbo /dir=bac /range=10 /delta=1 /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:46:25.52
Timeadjust: 10000
Ticklength: 9000
$ tbo /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:46:28.75
Timeadjust: 6412
Ticklength: 9000
$ tbo /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:46:30.12
Timeadjust: 4887
Ticklength: 9000
$ tbo /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:46:31.52
Timeadjust: 3341
Ticklength: 9000
$ tbo /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:46:32.42
Timeadjust: 2333
Ticklength: 9000
$ tbo /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:46:33.41
Timeadjust: 1240
Ticklength: 9000
$ tbo /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:46:34.37
Timeadjust: 171
Ticklength: 9000
$ tbo /info
%TBO-I-IDENT, OpenVMS Time Booster Rev 2.0
%TBO-I-INFO, Systemtime: 27-DEC-2020 17:46:35.41
Timeadjust: 0
Ticklength: 10000
$ mc sysman set env/clu
%SYSMAN-I-ENV, current command environment:
Clusterwide on local cluster
Username SYSTEM will be used on nonlocal nodes
SYSMAN> do sho time
%SYSMAN-I-OUTPUT, command execution on node TORUS
27-DEC-2020 17:47:23
%SYSMAN-I-OUTPUT, command execution on node SIGMA
27-DEC-2020 17:47:23
SYSMAN> Exit
$
More information about the Info-vax
mailing list