| 1 | ; AiR-BOOT (c) Copyright 1998-2008 M. Kiewitz
|
|---|
| 2 | ;
|
|---|
| 3 | ; This file is part of AiR-BOOT
|
|---|
| 4 | ;
|
|---|
| 5 | ; AiR-BOOT is free software: you can redistribute it and/or modify it under
|
|---|
| 6 | ; the terms of the GNU General Public License as published by the Free
|
|---|
| 7 | ; Software Foundation, either version 3 of the License, or (at your option)
|
|---|
| 8 | ; any later version.
|
|---|
| 9 | ;
|
|---|
| 10 | ; AiR-BOOT is distributed in the hope that it will be useful, but WITHOUT ANY
|
|---|
| 11 | ; WARRANTY: without even the implied warranty of MERCHANTABILITY or FITNESS
|
|---|
| 12 | ; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
|
|---|
| 13 | ; details.
|
|---|
| 14 | ;
|
|---|
| 15 | ; You should have received a copy of the GNU General Public License along with
|
|---|
| 16 | ; AiR-BOOT. If not, see <http://www.gnu.org/licenses/>.
|
|---|
| 17 | ;
|
|---|
| 18 | ;---------------------------------------------------------------------------
|
|---|
| 19 | ; AiR-BOOT / DEBUG
|
|---|
| 20 | ;---------------------------------------------------------------------------
|
|---|
| 21 |
|
|---|
| 22 |
|
|---|
| 23 | ; -----------------------
|
|---|
| 24 | ; Rousseau: # DEBUG.ASM #
|
|---|
| 25 | ; -----------------------
|
|---|
| 26 | ; This module contains functions for debugging AiR-BOOT.
|
|---|
| 27 | ; It is only included in debug builds and the codesize of AiR-BOOT increases
|
|---|
| 28 | ; in that case.
|
|---|
| 29 | ;
|
|---|
| 30 | ; Had problems with RU language version because it includes cyrillic charset.
|
|---|
| 31 | ; Parts disabled for now.
|
|---|
| 32 |
|
|---|
| 33 |
|
|---|
| 34 | IFDEF ModuleNames
|
|---|
| 35 | DB 'DEBUG',0
|
|---|
| 36 | ENDIF
|
|---|
| 37 |
|
|---|
| 38 |
|
|---|
| 39 |
|
|---|
| 40 | ; Initialize the com-port
|
|---|
| 41 | ; In: AL - com-port, 0=disable com-port logging, 1=com1 etc. (max 4)
|
|---|
| 42 | ; AH - initialization parameters (see below)
|
|---|
| 43 | ; Out: AX - line status
|
|---|
| 44 | DEBUG_Dump1 Proc Near
|
|---|
| 45 | pushf
|
|---|
| 46 | pusha
|
|---|
| 47 |
|
|---|
| 48 | ; Hello message
|
|---|
| 49 | mov si, offset AuxIOHello
|
|---|
| 50 | call AuxIO_Print
|
|---|
| 51 |
|
|---|
| 52 | ; Build Date
|
|---|
| 53 | mov si, offset BUILD_DATE
|
|---|
| 54 | call AuxIO_Print
|
|---|
| 55 |
|
|---|
| 56 | ; Start new line
|
|---|
| 57 | call AuxIO_TeletypeNL
|
|---|
| 58 | Call AuxIO_TeletypeNL
|
|---|
| 59 |
|
|---|
| 60 | ; Msg check math-module
|
|---|
| 61 | mov si,offset db_checkmath
|
|---|
| 62 | call AuxIO_Print
|
|---|
| 63 |
|
|---|
| 64 | ; Output hex-word
|
|---|
| 65 | mov ax,0BABEh
|
|---|
| 66 | call AuxIO_TeletypeHexWord
|
|---|
| 67 |
|
|---|
| 68 | mov al,' '
|
|---|
| 69 | call AuxIO_Teletype
|
|---|
| 70 | mov al,'*'
|
|---|
| 71 | call AuxIO_Teletype
|
|---|
| 72 | mov al,' '
|
|---|
| 73 | call AuxIO_Teletype
|
|---|
| 74 |
|
|---|
| 75 | ; Output hex-word
|
|---|
| 76 | mov ax,0BABEh
|
|---|
| 77 | call AuxIO_TeletypeHexWord
|
|---|
| 78 |
|
|---|
| 79 | mov al,' '
|
|---|
| 80 | call AuxIO_Teletype
|
|---|
| 81 | mov al,'='
|
|---|
| 82 | call AuxIO_Teletype
|
|---|
| 83 | mov al,' '
|
|---|
| 84 | call AuxIO_Teletype
|
|---|
| 85 |
|
|---|
| 86 | mov ax,0BABEh
|
|---|
| 87 | mul ax
|
|---|
| 88 | call AuxIO_TeletypeHexDWord
|
|---|
| 89 |
|
|---|
| 90 | ; Start new line
|
|---|
| 91 | call AuxIO_TeletypeNL
|
|---|
| 92 |
|
|---|
| 93 |
|
|---|
| 94 | ; Output hex-dword
|
|---|
| 95 | mov dx,0DEADh
|
|---|
| 96 | mov ax,0FACEh
|
|---|
| 97 | call AuxIO_TeletypeHexDWord
|
|---|
| 98 |
|
|---|
| 99 | mov al,' '
|
|---|
| 100 | call AuxIO_Teletype
|
|---|
| 101 | mov al,'*'
|
|---|
| 102 | call AuxIO_Teletype
|
|---|
| 103 | mov al,' '
|
|---|
| 104 | call AuxIO_Teletype
|
|---|
| 105 |
|
|---|
| 106 | ; Output hex-dword
|
|---|
| 107 | mov dx,0DEADh
|
|---|
| 108 | mov ax,0FACEh
|
|---|
| 109 | call AuxIO_TeletypeHexDWord
|
|---|
| 110 |
|
|---|
| 111 | mov al,' '
|
|---|
| 112 | call AuxIO_Teletype
|
|---|
| 113 | mov al,'='
|
|---|
| 114 | call AuxIO_Teletype
|
|---|
| 115 | mov al,' '
|
|---|
| 116 | call AuxIO_Teletype
|
|---|
| 117 |
|
|---|
| 118 |
|
|---|
| 119 |
|
|---|
| 120 | mov bx,0DEADh
|
|---|
| 121 | mov cx,0FACEh
|
|---|
| 122 | mov dx,0DEADh
|
|---|
| 123 | mov ax,0FACEh
|
|---|
| 124 | call MATH_Mul32
|
|---|
| 125 | call AuxIO_TeletypeHexQWord
|
|---|
| 126 |
|
|---|
| 127 |
|
|---|
| 128 | ; Start new line
|
|---|
| 129 | call AuxIO_TeletypeNL
|
|---|
| 130 |
|
|---|
| 131 |
|
|---|
| 132 | ; Start new line
|
|---|
| 133 | call AuxIO_TeletypeNL
|
|---|
| 134 |
|
|---|
| 135 |
|
|---|
| 136 | ; BIOS cyls
|
|---|
| 137 | ; mov dx,word ptr [BIOS_Cyls+02]
|
|---|
| 138 | ; mov ax,word ptr [BIOS_Cyls+00]
|
|---|
| 139 | ; call AuxIO_TeletypeHexDWord
|
|---|
| 140 | ; call AuxIO_TeletypeNL
|
|---|
| 141 |
|
|---|
| 142 | ; BIOS heads
|
|---|
| 143 | ; mov dx,word ptr [BIOS_Heads+02]
|
|---|
| 144 | ; mov ax,word ptr [BIOS_Heads+00]
|
|---|
| 145 | ; call AuxIO_TeletypeHexDWord
|
|---|
| 146 | ; call AuxIO_TeletypeNL
|
|---|
| 147 |
|
|---|
| 148 | ; BIOS secs
|
|---|
| 149 | ; mov dx,word ptr [BIOS_Secs+02]
|
|---|
| 150 | ; mov ax,word ptr [BIOS_Secs+00]
|
|---|
| 151 | ; call AuxIO_TeletypeHexDWord
|
|---|
| 152 | ; call AuxIO_TeletypeNL
|
|---|
| 153 |
|
|---|
| 154 | ; Bytes per sector
|
|---|
| 155 | ; mov ax,[BIOS_Bytes]
|
|---|
| 156 | ; call AuxIO_TeletypeHexWord
|
|---|
| 157 | ; call AuxIO_TeletypeNL
|
|---|
| 158 |
|
|---|
| 159 | ; Total secs
|
|---|
| 160 | ; mov bx, word ptr [BIOS_TotalSecs+06]
|
|---|
| 161 | ; mov cx, word ptr [BIOS_TotalSecs+04]
|
|---|
| 162 | ; mov dx, word ptr [BIOS_TotalSecs+02]
|
|---|
| 163 | ; mov ax, word ptr [BIOS_TotalSecs+00]
|
|---|
| 164 | ; call AuxIO_TeletypeHexDWord
|
|---|
| 165 | ; call AuxIO_TeletypeNL
|
|---|
| 166 |
|
|---|
| 167 | ; CHS to LBA
|
|---|
| 168 | ; mov dx,1
|
|---|
| 169 | ; mov ax,29e5h
|
|---|
| 170 | ; mov bx,23h
|
|---|
| 171 | ; mov cx,9h
|
|---|
| 172 | ; call CONV_CHS2LBA
|
|---|
| 173 | ; call AuxIO_TeletypeHexDWord
|
|---|
| 174 | ; call AuxIO_TeletypeNL
|
|---|
| 175 |
|
|---|
| 176 |
|
|---|
| 177 | popa
|
|---|
| 178 | popf
|
|---|
| 179 | ret
|
|---|
| 180 | DEBUG_Dump1 EndP
|
|---|
| 181 |
|
|---|
| 182 |
|
|---|
| 183 |
|
|---|
| 184 | ;DEBUG_Dump2 Proc Near
|
|---|
| 185 | ; pushf
|
|---|
| 186 | ; pusha
|
|---|
| 187 |
|
|---|
| 188 |
|
|---|
| 189 | ; call AuxIO_TeletypeNL
|
|---|
| 190 | ; call AuxIO_TeletypeNL
|
|---|
| 191 |
|
|---|
| 192 |
|
|---|
| 193 | ; mov si,offset db_config
|
|---|
| 194 | ; call AuxIO_Print
|
|---|
| 195 |
|
|---|
| 196 | ; mov si,offset db_cfgparts
|
|---|
| 197 | ; call AuxIO_Print
|
|---|
| 198 | ; mov al,[CFG_Partitions]
|
|---|
| 199 | ; call AuxIO_TeletypeHexByte
|
|---|
| 200 | ; call AuxIO_TeletypeNL
|
|---|
| 201 |
|
|---|
| 202 | ; mov si,offset db_cfgpartdef
|
|---|
| 203 | ; call AuxIO_Print
|
|---|
| 204 | ; mov al,[CFG_PartDefault]
|
|---|
| 205 | ; call AuxIO_TeletypeHexByte
|
|---|
| 206 | ; call AuxIO_TeletypeNL
|
|---|
| 207 |
|
|---|
| 208 | ; mov si,offset db_cfgpartlast
|
|---|
| 209 | ; call AuxIO_Print
|
|---|
| 210 | ; mov al,[CFG_PartLast]
|
|---|
| 211 | ; call AuxIO_TeletypeHexByte
|
|---|
| 212 | ; call AuxIO_TeletypeNL
|
|---|
| 213 | ; call AuxIO_TeletypeNL
|
|---|
| 214 |
|
|---|
| 215 |
|
|---|
| 216 |
|
|---|
| 217 | ; mov si,offset db_vars
|
|---|
| 218 | ; call AuxIO_Print
|
|---|
| 219 |
|
|---|
| 220 | ; mov si,offset db_newpart
|
|---|
| 221 | ; call AuxIO_Print
|
|---|
| 222 | ; mov si,offset NewPartTable
|
|---|
| 223 | ; call AuxIO_DumpSector
|
|---|
| 224 | ; call AuxIO_TeletypeNL
|
|---|
| 225 | ; add si,512
|
|---|
| 226 | ; call AuxIO_DumpSector
|
|---|
| 227 | ; call AuxIO_TeletypeNL
|
|---|
| 228 | ; call AuxIO_TeletypeNL
|
|---|
| 229 |
|
|---|
| 230 | ; mov si,offset db_newhide
|
|---|
| 231 | ; call AuxIO_Print
|
|---|
| 232 | ; mov si,offset NewHidePartTable
|
|---|
| 233 | ; call AuxIO_DumpSector
|
|---|
| 234 | ; call AuxIO_TeletypeNL
|
|---|
| 235 | ; add si,512
|
|---|
| 236 | ; call AuxIO_DumpSector
|
|---|
| 237 | ; call AuxIO_TeletypeNL
|
|---|
| 238 | ; call AuxIO_TeletypeNL
|
|---|
| 239 |
|
|---|
| 240 | ; mov si,offset db_dletters
|
|---|
| 241 | ; call AuxIO_Print
|
|---|
| 242 | ; mov si,offset NewDriveLetters
|
|---|
| 243 | ; call AuxIO_DumpParagraph
|
|---|
| 244 | ; call AuxIO_TeletypeNL
|
|---|
| 245 | ; add si,16
|
|---|
| 246 | ; call AuxIO_DumpParagraph
|
|---|
| 247 | ; call AuxIO_TeletypeNL
|
|---|
| 248 | ; call AuxIO_TeletypeNL
|
|---|
| 249 |
|
|---|
| 250 | ; mov si,offset db_tmpec
|
|---|
| 251 | ; call AuxIO_Print
|
|---|
| 252 | ; mov si,offset TmpSector
|
|---|
| 253 | ; call AuxIO_DumpSector
|
|---|
| 254 | ; call AuxIO_TeletypeNL
|
|---|
| 255 | ; call AuxIO_TeletypeNL
|
|---|
| 256 |
|
|---|
| 257 | ; mov si,offset db_partsec
|
|---|
| 258 | ; call AuxIO_Print
|
|---|
| 259 | ; mov si,offset PartitionSector
|
|---|
| 260 | ; call AuxIO_DumpSector
|
|---|
| 261 | ; call AuxIO_TeletypeNL
|
|---|
| 262 | ; call AuxIO_TeletypeNL
|
|---|
| 263 |
|
|---|
| 264 | ; popa
|
|---|
| 265 | ; popf
|
|---|
| 266 | ; ret
|
|---|
| 267 | ;DEBUG_Dump2 EndP
|
|---|
| 268 |
|
|---|
| 269 |
|
|---|
| 270 |
|
|---|
| 271 | db_mbr: db "## MBR ##",10,0
|
|---|
| 272 | db_masterlvm: db "## MLVMR ##",10,0
|
|---|
| 273 |
|
|---|
| 274 | db_checkmath: db "## CHK MATH ##",10,0
|
|---|
| 275 |
|
|---|
| 276 |
|
|---|
| 277 | db_config: db '## CFG (DMP2) ##',10,0
|
|---|
| 278 | db_cfgparts: db 'CFG_Partitions:',0
|
|---|
| 279 | db_cfgpartdef: db 'CFG_PartDefault:',0
|
|---|
| 280 | db_cfgpartlast: db 'CFG_PartLast:',0
|
|---|
| 281 |
|
|---|
| 282 |
|
|---|
| 283 | db_vars: db '## VARS ##',10,0
|
|---|
| 284 | db_partsec: db 'PartitionSector:',10,0
|
|---|
| 285 | ;db_lvmsec: db 'LVMSector :',10,0
|
|---|
| 286 | db_tmpec: db 'TmpSector :',10,0
|
|---|
| 287 |
|
|---|
| 288 | db_newpart: db 'NewPartTable :',10,0
|
|---|
| 289 | db_newhide: db 'NewHideTable:',10,0
|
|---|
| 290 | db_dletters: db 'NewDriveLetters:',10,0
|
|---|
| 291 |
|
|---|
| 292 | ;db_partsize: db 'PartitionSizeTable:',10,0
|
|---|
| 293 | ;db_partpoint: db 'PartitionPointers:',10,0
|
|---|
| 294 | ;db_partpointcnt: db 'PartitionPointerCount:',0
|
|---|
| 295 | ;db_partxref: db 'PartitionXref:',10,0
|
|---|
| 296 | ;db_partvoldl: db 'PartitionVolumeLetters:',10,0
|
|---|
| 297 |
|
|---|
| 298 | ;db_totaldisks: db 'TotalHarddiscs:',0
|
|---|
| 299 | ;db_lbaswitchtab: db 'LBASwitchTable:',10,0
|
|---|
| 300 | ;db_newparts: db 'NewPartitions:',0
|
|---|
| 301 |
|
|---|
| 302 | ;db_exabspos: db 'ExtendedAbsPos:',0
|
|---|
| 303 | ;db_exabsposset: db 'ExtendedAbsPosSet:',0
|
|---|
| 304 |
|
|---|
| 305 | db_curpartloc: db 'CurPartition_Location:',0
|
|---|
| 306 | ;db_curiox: db 'CurIO_UseExtension:',0
|
|---|
| 307 |
|
|---|
| 308 | db_curlvmsec: db 'Current LVM Sector:',0
|
|---|