$!.. BOOTBATCH.JOB Startup stuff postponed into a batch job... $ SET NOVERIFY $ SET NOON $ SET PROCESS/PRIORITY=14 ! High priority process!!! $ TELL := WRITE SYS$OUTPUT $ SHOW TIME $! $ RUN SYS$SYSTEM:SYSGEN !Protect system's console floppy from abuse CONNECT CONSOLE EXIT $ MOUNT/SYSTEM/FOREIGN/PROTECTION=(SYSTEM:RWLP) CSA1: CONSOLE $! $ thisnode = F$GETSYI( "NODENAME") !Which system? $ opsys == thisnode .EQS. "OPER" $ dvsys == thisnode .EQS. "DEVL" $ acsys == thisnode .EQS. "ADCALC" $ devl_cluster == dvsys .OR. acsys $ SUBMIT :== SUBMIT !Eliminate any /NOTIFY qualifier $ SYS_SUBMIT := SUBMIT /NOPRINT /QUEUE='thisnode'_SYSTEM - /USER=SYSMANAGER /LOG_FILE=SYS$MANAGER: $! $! Check on memory configuration -- there must be at least 8 MB of $! physical memory seen or we complain to OPCOM. $! $@SYS$STARTUP:MEMCHECK $! $! Meddle with the disk configuration, setting /NOAVAILABLE those disk $! drives this system shouldn't see (defined by the DECnet node as OPER $! or not OPER) and transfer the SPARE_xxxx logical names (defining the $! spare removeable media disk drives) from OPER to the other Accelerator $! VAXen. $! $ TELL " <> Modify the shared disk configuration." $@SYS$MANAGER:DSKCONFIG $! $! Start the ALLOCWATCHER process to watch for allocation of shared devices $! and (using DECnet) communicate this to the other systems (from OPER to $! ADCALC/DEVL or from ADCALC/DEVL to OPER, but not between ADCALC and DEVL). $! $@SYS$STARTUP:STARTALLOCW $! $! Start the ARGUS process to watch for idle processes on the port $! selector lines and log them off after 12 minutes (6 if privileged) and $! to log off idle hard line processes after 2 hours. $! $!> $@SYS$STARTUP:STARTARGUS $!> $ REPLY/TERMINAL=OPA0: " Argus started" $! $! Submit the daily, weekly and monthly system batch jobs if needed. $! $ TELL " <> Requeue repeated batch jobs as needed." $@SYS$MGR_UTIL:EVERYNITE.JOB IFF_SETUP $@SYS$MGR_UTIL:EVERYWEEK.JOB IFF_SETUP $@SYS$MGR_UTIL:EVERYMNTH.JOB IFF_SETUP $! $! Submit EVERYBOOT jobs for other users. $! $@SYS$MGR_UTIL:USERSEJOBS EVERYBOOT $! $! Start all the other batch queues and the print queues... $! $ TELL " <> Start non-system batch and all print queues." $ SHOW TIME $@SYS$STARTUP:STARTQS $! $! Display the queues and their characteristics so we have a record... $! $ SHOW QUEUE /BATCH /ALL /FULL $ SHOW QUEUE /DEVICE /ALL /FULL $ SHOW TIME $! $! Append OPERATOR.LOG files to existing and/or created OPERATOR.SUM file. $! $@SYS$MGR_UTIL:OPRLOGSUM $! $! Turn back on the logging of the disabled DECnet events. $! 4.15/4.18 - adjacency up/down and 4.7 - circuit fault messages $! $ RUN SYS$SYSTEM:NCP SET LOGGING MONITOR EVENTS 4.15 SET LOGGING MONITOR EVENTS 4.18 SET LOGGING MONITOR EVENTS 4.7 EXIT $! $! Submit one-time only job (if any) and delete the job when completed $! $ IF F$SEARCH( "SYS$MANAGER:ONCEONLY.JOB") THEN - $ SYS_SUBMIT SYS$MANAGER:ONCEONLY.JOB/DELETE $! $ PURGE SYS$MANAGER:BOOTJOB.LOG $ REQUEST/TO=CENTRAL "Startup batch job completed." $ EXIT $!============================================================================= $! BOOTBATCH.JOB $! $! Batch job submitted at boot time to startup non-critical detached processes $! and submit system batch jobs (particularly the repetitively executed batch $! jobs, to make sure that said jobs were not lost during a system crash). $! Tests the NODENAME SYSGEN parameter to decide if running on Operational $! system or Development system. $! $!============================================================================= $! Modification History: $! 28-Jul-82 FJN Created from SYSTARTUP.COM (replacing BOOTBATCH.TMP) $! 30-Aug-82 FJN Edits to take advantage of VMS V3 features $! 03-Sep-82 FJN Some final VMS V3 edits $! 26-Apr-83 FJN Eliminate ERRLOG job submittal $! 23-Sep-83 FJN Change to SYSMANAGER so Argus and batch jobs run under $! that account $! 03-Nov-83 FJN Change to append OPERATOR.LOG to OPERATOR.SUM $! 15-Dec-83 FJN Changed by moving the OPERATOR.SUM code to OPRLOGSUM $! procedure in utility area $! 05-Jan-84 FJN Run V3.1 Argus on both OPER and DEVL systems to stop $! idle hardline processes $! 23-Jul-84 FJN Added mounting of CONSOLE floppy from MOUNTDSKS.COM $! 27-Jul-84 FJN Restore verify $! 28-Jul-84 FJN Add call to the disk configuration procedures which $! transfer the SPARE_xxxx logical names between systems $! with DECnet (among other things) $! 29-Jul-84 FJN Had to put DSKCONFIG into SYS$MANAGER to get it to work $! 06-Sep-84 FJN Turn on Ethernet DECnet circuit (state is OFF in the $! permanent database). $! 18-Nov-84 FJN Turn logging of DECnet adjancency up/down events on $! 29-Dec-84 FJN Disable access to ADCALC Temporary System disk $! 23-Apr-85 FJN Check for full physical memory available $! 01-Jun-85 FJN Prepared for use with VMS V4 $! 06-Jun-85 FJN First tests under VMS V4, fix job name $! 09-Jun-85 FJN Changed parameter to EVERY* procedures to IFF_SETUP $! (conditional restart), moved STARTQS call to after $! the calls to EVERY*.JOB's and enabled DSKCONFIG call $! 13-Jun-85 FJN Add restoration of the DECnet logging of "circuit fault" $! messages $! 14-Jun-85 FJN NCP does not like comments on its commands $! 14-Jul-85 FJN Invoke USERSEJOBS to submit EVERYBOOT jobs for users $! 15-Oct-85 FJN Cutover to VMS V4.2; enable EVERY* job submittals $! 24-Oct-85 FJN Enable EVERYMNTH job $! 29-Oct-85 FJN Prepare for starting ALLOCWATCHER on boot $! 08-Nov-85 FJN Enable startup of AllocWatcher