GetAll 5.76 KB
Newer Older
Neil Turton's avatar
Neil Turton committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
; Copyright 1996 Acorn Computers Ltd
;
; Licensed under the Apache License, Version 2.0 (the "License");
; you may not use this file except in compliance with the License.
; You may obtain a copy of the License at
;
;     http://www.apache.org/licenses/LICENSE-2.0
;
; Unless required by applicable law or agreed to in writing, software
; distributed under the License is distributed on an "AS IS" BASIS,
; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
; See the License for the specific language governing permissions and
; limitations under the License.
;
; > GetAll

        GET     Hdr:ListOpts
        GET     Hdr:Macros
        GET     Hdr:System
        GET     Hdr:Machine.<Machine>
        GET     Hdr:ImageSize.<ImageSize>
        $GetCPU
        $GetIO
        $GetMEMC
        $GetMEMM
        $GetVIDC

28
        GET     hdr.Options
29

Neil Turton's avatar
Neil Turton committed
30 31 32 33
; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
; now get the headers
; ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

34 35 36
        GBLL    ShowWS
ShowWS  SETL    {TRUE}                          ; Make KernelWS be verbose

Neil Turton's avatar
Neil Turton committed
37 38
        GET     Hdr:CMOS
        GET     Hdr:Heap
39 40
        GET     Hdr:PublicWS
        GET     Hdr:KernelWS
41 42
        GET     Hdr:HALEntries
        GET     Hdr:OSEntries
Neil Turton's avatar
Neil Turton committed
43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70
        GET     Hdr:Services
        GET     Hdr:FSNumbers
        GET     Hdr:HighFSI
        GET     Hdr:NewErrors
        GET     Hdr:Proc
        GET     Hdr:Sprite
        GET     Hdr:KeyWS
        GET     Hdr:RS423
        GET     Hdr:ModHand
        GET     Hdr:Variables
        GET     Hdr:EnvNumbers
        GET     Hdr:UpCall
        GET     Hdr:Sound
        GET     Hdr:Pointer
        GET     Hdr:Podule
        GET     Hdr:VduExt
;        GET     Hdr:Fox
        GET     Hdr:Buffer
        GET     Hdr:Font
        GET     Hdr:DevNos
;        GET     Hdr:IOEB
        GET     Hdr:Territory
        GET     Hdr:Portable
        GET     Hdr:MsgTrans
        GET     Hdr:PaletteV
        GET     Hdr:Wimp
        GET     Hdr:ColourTran
        GET     Hdr:Debug
71
        GET	Hdr:nvram
72
        GET     Hdr:PortMan
Neil Turton's avatar
Neil Turton committed
73 74 75 76 77
        GET     s.PMF.DEF          ; Common with 6502 code in the keyboard
        Protocol

; now the main parts of the MOS

78 79 80 81
;        IMPORT  EndOfKernel

        GET     hdr.Copro15ops ; some macros
        GET     hdr.ARMops
Neil Turton's avatar
Neil Turton committed
82

Neil Turton's avatar
Neil Turton committed
83
        GET     s.Kernel
84
        $GetFlashROM
85
        GET     s.ARMops
Neil Turton's avatar
Neil Turton committed
86 87 88 89 90 91 92 93
        GET     s.NewIRQs
        GET     s.Oscli
        GET     s.SysComms
        GET     s.HeapMan
        GET     s.ModHand
        $GetUnsqueeze
        GET     s.ArthurSWIs
        GET     s.ChangeDyn
94
        $GetHAL
Neil Turton's avatar
Neil Turton committed
95
        GET     s.Arthur2
96
        GET     s.LibKern
Neil Turton's avatar
Neil Turton committed
97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112
        GET     s.Utility
        GET     s.MoreComms
        GET     s.Convrsions
        GET     s.MoreSWIs
        GET     s.ExtraSWIs
        GET     s.HeapSort
        GET     s.Arthur3
        GET     s.SWINaming
        GET     s.TickEvents
        $GetKbdRes
        GET     s.NewReset
        $GetMessages
        GET     s.Middle
        GET     s.Super1
        $GetKernelMEMC
        $GetMemInfo
113
        ! 0, "Main kernel size = &" :CC: :STR: (.-KernelBase)
Neil Turton's avatar
Neil Turton committed
114
StartOfVduDriver
115
        GET     s.vdu.vduhint
Neil Turton's avatar
Neil Turton committed
116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164
        GET     s.vdu.VduDriver
        GET     s.vdu.VduSWIs
        GET     s.vdu.VduPalette
        $GetPalette
        GET     s.vdu.VduPlot
        GET     s.vdu.VduGrafA
        GET     s.vdu.VduGrafB
        GET     s.vdu.VduGrafC
        GET     s.vdu.VduGrafD
        GET     s.vdu.VduGrafE
        GET     s.vdu.VduGrafF
        GET     s.vdu.VduGrafG
        GET     s.vdu.VduGrafH
        GET     s.vdu.VduGrafI
        GET     s.vdu.VduGrafJ
        GET     s.vdu.VduGrafK
        GET     s.vdu.VduGrafL
        GET     s.vdu.VduWrch
        GET     s.vdu.Vdu23
        GET     s.vdu.VduPointer
        GET     s.vdu.Vdu5
        GET     s.vdu.VduCurSoft
        GET     s.vdu.VduTTX

        GBLS    GiveMeBfontAnyDay
        [ BleedinDaveBell
GiveMeBfontAnyDay SETS "GET s.vdu.VduFontL1"
        |
GiveMeBfontAnyDay SETS "GET s.vdu.VduFont"
        ]

        $GiveMeBfontAnyDay

        ! 0, "Vdu drivers size = &" :CC: :STR: (.-StartOfVduDriver)

StartOfPMF
        GET     s.PMF.osinit
        GET     s.PMF.oseven
        GET     s.PMF.osbyte
        GET     s.PMF.osword
        GET     s.PMF.realtime
        GET     s.PMF.convdate
        GET     s.PMF.i2cutils
        GET     s.PMF.oswrch
        GET     s.PMF.buffer
        $GetKbdDrA1
        GET     s.PMF.key
        GET     s.PMF.mouse
        ALIGN
Kevin Bracey's avatar
Kevin Bracey committed
165 166 167
EndOfPMF

        ! 0, "PMF section size = &" :CC: :STR: (EndOfPMF - StartOfPMF)
Neil Turton's avatar
Neil Turton committed
168

Kevin Bracey's avatar
Kevin Bracey committed
169
 [ {FALSE}
Neil Turton's avatar
Neil Turton committed
170 171
StartOfAMB_beforealign
        ALIGN   4096                    ;align to 4k page boundary, for easy ROMpatch
Kevin Bracey's avatar
Kevin Bracey committed
172 173
 ]

Neil Turton's avatar
Neil Turton committed
174 175
StartOfAMB
        GET     s.AMBControl.AMB
Kevin Bracey's avatar
Kevin Bracey committed
176 177
EndOfAMB

178
        ! 0, "AMB section size = &" :CC: :STR: (EndOfAMB - StartOfAMB)
Kevin Bracey's avatar
Kevin Bracey committed
179

180
;        ALIGN   65536
Neil Turton's avatar
Neil Turton committed
181
EndOfKernel
182
        DCD     0
Neil Turton's avatar
Neil Turton committed
183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200

 [ med_00001_debug
 ! 0,""
 ! 0,",-----------------------------------------------------------------,"
 ! 0,"| **** WARNING ****                                               |"
 ! 0,"|                                                                 |"
 ! 0,"| Audit trail debugging for MED-00001 is enabled. This reuses the |"
 ! 0,"| first three words of OldIRQ1Vspace. This should be turned off   |"
 ! 0,"| once MED-00001 has been tested and marked 'fixed'.              |"
 ! 0,"|                                                                 |"
 ! 0,"| Usage:                                                          |"
 ! 0,"|   +0   start of area used by flood fill                         |"
 ! 0,"|   +4   end+1 of area used by flood fill                         |"
 ! 0,"|   +8   amount the rma was grown by                              |"
 ! 0,"'-----------------------------------------------------------------'"
 ! 0,""
 ]

201

Neil Turton's avatar
Neil Turton committed
202
        END