[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?

[Carl Friedberg]

Nice work, Jon. Thanks for sharing that. Carl

On Sun, Dec 27, 2020 at 7:05 PM Jon Pinkley via Info-vax <info-vax at rbnsn.com>
wrote:

> 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
> $
> _______________________________________________
> Info-vax mailing list
> Info-vax at rbnsn.com
> http://rbnsn.com/mailman/listinfo/info-vax_rbnsn.com
>


-- 
www.comets.com