annotate defs/scf.d @ 1766:2b34da8585c4

Fixed makefile error
author boisy
date Fri, 01 Apr 2005 17:21:19 +0000
parents 27e85b681dab
children 9d95e3246a61
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1629
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
1 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1760
27e85b681dab Fixed DEFS issue in 6809l2 and 6309l2 (thanks Rodney!)
boisy
parents: 1630
diff changeset
2 ; scf - Sequential File Manager Definitions
1629
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
3 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
4 ; $Id$
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
5 ;
1760
27e85b681dab Fixed DEFS issue in 6809l2 and 6309l2 (thanks Rodney!)
boisy
parents: 1630
diff changeset
6 ; SCF stands for 'Sequential Character Filemanager' and is a package of
27e85b681dab Fixed DEFS issue in 6809l2 and 6309l2 (thanks Rodney!)
boisy
parents: 1630
diff changeset
7 ; subroutines that define the logical structure of a serial device.
1629
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
8 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
9 ; The data structures in this file give SCF its 'personality' and are used
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
10 ; by SCF itself, as well as applications that will require disk I/O.
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
11 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
12 ; Edt/Rev YYYY/MM/DD Modified by
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
13 ; Comment
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
14 ; ------------------------------------------------------------------
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
15 ; 2004/07/02 Boisy G. Pitre
1760
27e85b681dab Fixed DEFS issue in 6809l2 and 6309l2 (thanks Rodney!)
boisy
parents: 1630
diff changeset
16 ; Created
1629
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
17
1630
7af4d12008f4 Updated ChangeLogs with slight formatting differences
boisy
parents: 1629
diff changeset
18 .title Sequential File Manager Definitions
7af4d12008f4 Updated ChangeLogs with slight formatting differences
boisy
parents: 1629
diff changeset
19
7af4d12008f4 Updated ChangeLogs with slight formatting differences
boisy
parents: 1629
diff changeset
20 .area SCF (ABS)
1629
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
21
1630
7af4d12008f4 Updated ChangeLogs with slight formatting differences
boisy
parents: 1629
diff changeset
22 .ifndef Level
7af4d12008f4 Updated ChangeLogs with slight formatting differences
boisy
parents: 1629
diff changeset
23 Level == 1
7af4d12008f4 Updated ChangeLogs with slight formatting differences
boisy
parents: 1629
diff changeset
24 .endif
1629
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
25
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
26 .page
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
27 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
28 ; SCF Device Descriptor Offsets
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
29 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
30 ; These definitions are for SCF device descriptors.
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
31
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
32 .org M$DTyp
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
33 IT.DVC:: .rmb 1 ; Device type (DT.SCF)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
34 IT.UPC:: .rmb 1 ; Uppercase flag
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
35 IT.BSO:: .rmb 1 ; Backspace behavior
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
36 IT.DLO:: .rmb 1 ; Delete behavior
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
37 IT.EKO:: .rmb 1 ; Echo flag
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
38 IT.ALF:: .rmb 1 ; Auto linefeed flag
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
39 IT.NUL:: .rmb 1 ; End-of-line null count
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
40 IT.PAU:: .rmb 1 ; Page pause flag
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
41 IT.PAG:: .rmb 1 ; Number of lines per page
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
42 IT.BSP:: .rmb 1 ; Backspace character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
43 IT.DEL:: .rmb 1 ; Delete-line character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
44 IT.EOR:: .rmb 1 ; End-of-record character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
45 IT.EOF:: .rmb 1 ; End-of-file character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
46 IT.RPR:: .rmb 1 ; Reprint-line character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
47 IT.DUP:: .rmb 1 ; Duplicate-last-line character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
48 IT.PSC:: .rmb 1 ; Pause character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
49 IT.INT:: .rmb 1 ; Interrupt character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
50 IT.QUT:: .rmb 1 ; Quit character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
51 IT.BSE:: .rmb 1 ; Backspace echo character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
52 IT.OVF:: .rmb 1 ; Bell character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
53 IT.PAR:: .rmb 1 ; Parity
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
54 IT.BAU:: .rmb 1 ; Baud rate
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
55 IT.D2P:: .rmb 2 ; Attached device name string offset
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
56 IT.XON:: .rmb 1 ; X-ON character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
57 IT.XOFF:: .rmb 1 ; X-OFF character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
58 IT.COL:: .rmb 1 ; Number of columns for display
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
59 IT.ROW:: .rmb 1 ; Number of rows for display
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
60 IT.XTYP:: .rmb 1 ; Extended type (added by BRI)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
61
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
62 .ifgt Level-1
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
63 ; Window Descriptor Additions
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
64 ; For CoCo window, where IT.PAR = $80
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
65 .org IT.ROW+1
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
66 IT.WND:: .rmb 1 ; Window number (matches device name) ($2E)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
67 IT.VAL:: .rmb 1 ; Use defaults on Init (0=no, 1=yes)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
68 IT.STY:: .rmb 1 ; Screen type default
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
69 IT.CPX:: .rmb 1 ; Column start default
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
70 IT.CPY:: .rmb 1 ; Row start default
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
71 IT.FGC:: .rmb 1 ; Foreground color default
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
72 IT.BGC:: .rmb 1 ; Background color default
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
73 IT.BDC:: .rmb 1 ; Border color default
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
74 .endif
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
75
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
76
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
77 .page
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
78 ;;;;;;;;;;;;;;;;;;;;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
79 ; SCF Static Storage
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
80 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
81 ; SCF devices must reserve this space for SCF
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
82 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
83 .org V.USER
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
84 V.TYPE:: .rmb 1 ; Device type or parity
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
85 V.LINE:: .rmb 1 ; Lines left until end of page
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
86 V.PAUS:: .rmb 1 ; Immediate Pause request
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
87 V.DEV2:: .rmb 2 ; Attached device's static
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
88 V.INTR:: .rmb 1 ; Interrupt char
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
89 V.QUIT:: .rmb 1 ; Quit char
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
90 V.PCHR:: .rmb 1 ; Pause char
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
91 V.ERR:: .rmb 1 ; Accumulated errors
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
92 V.XON:: .rmb 1 ; X-On char
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
93 V.XOFF:: .rmb 1 ; X-Off char
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
94 V.KANJI:: .rmb 1 ; Kanji mode flag
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
95 V.KBUF:: .rmb 2 ; Kana - Kanji convert routine work address
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
96 V.MODADR:: .rmb 2 ; Kana - Kanji convert module address
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
97 V.PDLHd:: .rmb 2 ; Open path descriptor list head pointer
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
98 V.RSV:: .rmb 5 ; Reserve bytes for future expansion
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
99 V.SCF == . ; Total SCF manager static overhead
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
100
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
101 .page
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
102 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
103 ; Sequential Character Path Descriptor Format
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
104 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
105 ; A path descriptor is created for every new path that is open
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
106 ; via the I$Open system call (processed by IOMan). Process
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
107 ; descriptors track state information of a path.
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
108 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
109 .org PD.FST
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
110 PD.DV2:: .rmb 2 ; Output device table pointer
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
111 PD.RAW:: .rmb 1 ; Read/Write or ReadLn/WritLn mode
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
112 PD.MAX:: .rmb 2 ; ReadLn high byte count
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
113 PD.MIN:: .rmb 1 ; Devices are "mine" if clear
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
114 PD.STS:: .rmb 2 ; Status routine module addr
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
115 PD.STM:: .rmb 2 ; Reserved for status routine
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
116 .org PD.OPT
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
117 .rmb 1 ; Device type
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
118 PD.UPC:: .rmb 1 ; Case (0=both, 1=upper only)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
119 PD.BSO:: .rmb 1 ; Backspace (0=BSE, 1=BSE,SP,BSE)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
120 PD.DLO:: .rmb 1 ; Delete (0=BSE over line, 1=CRLF)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
121 PD.EKO:: .rmb 1 ; Echo (0=No Echo)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
122 PD.ALF:: .rmb 1 ; Auto linefeed (0=No auto LF)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
123 PD.NUL:: .rmb 1 ; End of Line null count
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
124 PD.PAU:: .rmb 1 ; Page pause (0=No end of page pause)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
125 PD.PAG:: .rmb 1 ; Lines per page
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
126 PD.BSP:: .rmb 1 ; Backspace character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
127 PD.DEL:: .rmb 1 ; Delete Line character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
128 PD.EOR:: .rmb 1 ; End of Record character (read only)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
129 PD.EOF:: .rmb 1 ; End of File character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
130 PD.RPR:: .rmb 1 ; Reprint Line character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
131 PD.DUP:: .rmb 1 ; Dup Last Line character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
132 PD.PSC:: .rmb 1 ; Pause character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
133 PD.INT:: .rmb 1 ; Keyboard interrupt character (CTRL-C)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
134 PD.QUT:: .rmb 1 ; Keyboard quit character (CTRL-E)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
135 PD.BSE:: .rmb 1 ; Backspace echo character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
136 PD.OVF:: .rmb 1 ; Line overflow character (BELL)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
137 PD.PAR:: .rmb 1 ; Parity code
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
138 PD.BAU:: .rmb 1 ; ACIA baud rate (Color Computer)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
139 PD.D2P:: .rmb 2 ; Offset of DEV2 name
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
140 PD.XON:: .rmb 1 ; ACIA X-ON character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
141 PD.XOFF:: .rmb 1 ; ACIA X-OFF character
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
142 OPTCNT == .-PD.OPT ; Total user settable options
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
143 PD.ERR:: .rmb 1 ; Most recent I/O error status
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
144 PD.TBL:: .rmb 2 ; Device table addr (copy)
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
145 PD.PLP:: .rmb 2 ; Path Descriptor List Pointer
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
146 PD.PST:: .rmb 1 ; Current path status
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
147
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
148
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
149 ; PD.PST values Path Descriptor Status byte
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
150 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
151 PST.DCD == 0b00000001 ; Set if DCD is lost on Serial port
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
152
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
153
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
154 ; PD.PAR definitions
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
155 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
156 ; Parity
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
157 PARNONE == 0b00000000
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
158 PARODD == 0b00100000
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
159 PAREVEN == 0b01100000
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
160 PARMARK == 0b10100000
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
161 PARSPACE == 0b11100000
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
162
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
163 ; PD.BAU definitions
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
164 ;
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
165 ; Baud rate
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
166 B110 == 0b00000000
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
167 B300 == 0b00000001
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
168 B600 == 0b00000010
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
169 B1200 == 0b00000011
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
170 B2400 == 0b00000100
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
171 B4800 == 0b00000101
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
172 B9600 == 0b00000110
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
173 B19200 == 0b00000111
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
174 B38400 == 0b00001000
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
175 B57600 == 0b00001001
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
176 B115200 == 0b00001010
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
177 ; Word size
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
178 WORD8 == 0b00000000
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
179 WORD7 == 0b00100000
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
180 ; Stop bits
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
181 STOP1 == 0b00000000
eaa82c22a8a4 scf.d added
boisy
parents:
diff changeset
182 STOP2 == 0b00010000