;	.TITLE ~module~ - ~descr~
;	.IDENT /~rel~~lev~/
; this include file doesn't want a title/ident 

.REM |
*+	~module~ - ~descr~

	File:~file~
	Version: ~rel~~lev~
	Author:
	Last Edit: 28-MAY-1985 09:43:35 
	Last Update: ~upddate~ ~updtime~ 
		     ~purpose~


*-
|

	
	.sbttl	Message Database

	.psect data,d,gbl,rw,con

.rem |
	Each message logged by SCLI is identified by a message number. 
	The message number, along with required parameters, are passed
	to LOG on the argument stack - a variable number of parameters
	is allowed. The number is defined along with the message below. 

|
	; define EDMSG control strings for each message
; the next premsg timestamps the buffer (with code in LOG to get time
; ). it is suppressed for now, as COT and errlog timestamp for us.
; to restore timestamp, change comments below...
;;premsg:	.ASCIZ /SECURE: %19<%Y %3Z %10>/	; preamble to all messages
premsg:	.ASCIZ /SECURE: /	; preamble to all messages - no timestamp

msg1:	.ASCIZ /%I Logged On  TT%Q:/
msg2:	.ASCIZ /%I Logged Off TT%Q:/
msg3:	.ASCIZ /Mumble-ON TT%Q:, count=%M./
	; when CLI brought on-line (e.g. at boot time) or reinit
msg4:	.ASCIZ /Security System Initialized/	
	; when terminal connected, other than by logoff (e.g. at boot)
msg5:	.ASCIZ /Connect to TT%Q:/
	; when terminal disconnected other than by login  (e.g. at shutdown)
msg6:	.ASCIZ /Disconnect from TT%Q:/
	; when CLI told to shut down (maintenance mode)
msg7:	.ASCIZ /Maintenance ON by TT%Q:/
	; when CLI eliminated
msg8:	.ASCIZ /CLI Eliminated/
	; report internal errors -- note variable params
msg9:	.ASCIZ /Error #%M. - %VP/
;@MARK@
	; to log all illegal logins (enabled by a /message)
msg10:	.ASCIZ /TT%Q: *%I*/
	; if command received from unknown (to SCLI) terminal
msg11:	.ASCIZ /Message from TT%Q: ???/
	; when eliminated and exiting (e.g. maint shutdown)
msg12:	.ASCIZ /Security service terminated/

;
; define a control byte for each message, indicating where
; it is to be sent. multiple destinations are valid
;
	ms.ssm = 1	; send to error log file
	ms.cot = 2	; send to console
msgflg:
	.byte	ms.ssm!ms.cot	; 1 - logged on
	.byte	ms.ssm!ms.cot	; 2 - logged off
	.byte	ms.ssm!ms.cot	; 3 - mumble
	.byte	ms.ssm!ms.cot	; 4 - scli init
	.byte	ms.ssm!ms.cot	; 5 -  connect
	.byte	ms.ssm!ms.cot	; 6 - disconnect
	.byte	ms.ssm!ms.cot	; 7 - mait mode	
	.byte	ms.ssm!ms.cot	; 8 - eliminated
	.byte	ms.ssm		; 9 - internal error
	.byte	ms.cot		; 10 - illegal login
	.byte	ms.ssm!ms.cot	; 11 - unknown terminal
	.byte	ms.ssm!ms.cot	; 12 - scli exit
flgnd = .

;
; now define a table of pointers to the above messages
;
	.even
msgtbl:	.word	msg1
	.word	msg2
	.word	msg3
	.word	msg4
	.word	msg5
	.word	msg6
	.word	msg7
	.word	msg8
	.word	msg9
	.word	msg10
	.word	msg11
	.word	msg12
msgtnd=.

