mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-12-13 11:29:15 +00:00
48 lines
1.8 KiB
Plaintext
48 lines
1.8 KiB
Plaintext
|
;
|
|||
|
|
; File: ReliabilityEqu.a
|
|||
|
|
;
|
|||
|
|
; Contains: equates for the Reliability Manager
|
|||
|
|
;
|
|||
|
|
; Copyright: © 1989-1991, 1993 by Apple Computer, Inc., all rights reserved.
|
|||
|
|
;
|
|||
|
|
; Change History (most recent first):
|
|||
|
|
;
|
|||
|
|
; <SM2> 6/14/93 kc Roll in Ludwig.
|
|||
|
|
; <LW2> 6/11/93 chp Add a deferred task record to the Reliability Manager globals
|
|||
|
|
; and bump the globals’ version number from 1 to 2. The original
|
|||
|
|
; Time Manager task is now deferred until interrupts are enabled.
|
|||
|
|
; <4> 8/22/91 JSM Clean up header.
|
|||
|
|
; <3> 1/30/91 gbm sab, #38: Change the ‘already including this file’ variable to
|
|||
|
|
; all uppercase (for security reasons)
|
|||
|
|
; <1.1> 7/16/89 GGD Fixed RelPwrMask which is supposed to be a 19 bit mask, but was
|
|||
|
|
; only 18.
|
|||
|
|
; <1.0> 5/25/89 rwh new today
|
|||
|
|
;
|
|||
|
|
|
|||
|
|
IF &TYPE('__INCLUDINGRELIABILITYEQU__') = 'UNDEFINED' THEN
|
|||
|
|
__INCLUDINGRELIABILITYEQU__ SET 1
|
|||
|
|
|
|||
|
|
IF &TYPE('__INCLUDINGDEFERREDTASKEQU__') = 'UNDEFINED' THEN
|
|||
|
|
include 'DeferredTaskEqu.a'
|
|||
|
|
ENDIF
|
|||
|
|
|
|||
|
|
Rel1stMask equ $7FF80000 ; mast to get '1st powered on' time
|
|||
|
|
Rel1stBit equ 19 ; # bits to shift '1st time' into position
|
|||
|
|
Jan1st89 equ $9FE31A80 ; # secs from Jan 1 1904 to Jan 1 1989
|
|||
|
|
|
|||
|
|
RelMsCount equ 1000*60*5 ; # msec per power on time count (5 minutes)
|
|||
|
|
RelPwrMask equ $0007FFFF ; mask to get power-on time count <1.1>
|
|||
|
|
|
|||
|
|
RelPram equ $000400B8 ; count, address of PRAM bytes
|
|||
|
|
|
|||
|
|
RelGlobals RECORD 0,INCR ; Reliability Manager's Globals
|
|||
|
|
rlGlobalsVers ds.b 1 ; version of these globals
|
|||
|
|
rlGlobalsSize ds.b 1 ; size of these globals
|
|||
|
|
rlTimeBlock ds.b tmXQSize ; time manager task block
|
|||
|
|
rlDeferredTask ds DeferredTask ; Deferred Task Manager task block
|
|||
|
|
rlRecSize equ *-RelGlobals ; size of these globals
|
|||
|
|
rlRecVers equ 2 ; current version # of these globals
|
|||
|
|
ENDR
|
|||
|
|
|
|||
|
|
|
|||
|
|
ENDIF ; ...already included
|