sysinfo.c revision 1.2.4.2
1 1.2.4.2 nathanw /* $NetBSD: sysinfo.c,v 1.2.4.2 2002/02/28 04:08:34 nathanw Exp $ */ 2 1.2.4.2 nathanw 3 1.2.4.2 nathanw /*- 4 1.2.4.2 nathanw * Copyright (c) 1998 The NetBSD Foundation, Inc. 5 1.2.4.2 nathanw * All rights reserved. 6 1.2.4.2 nathanw * 7 1.2.4.2 nathanw * This code is derived from software contributed to The NetBSD Foundation 8 1.2.4.2 nathanw * by Leo Weppelman. 9 1.2.4.2 nathanw * 10 1.2.4.2 nathanw * Redistribution and use in source and binary forms, with or without 11 1.2.4.2 nathanw * modification, are permitted provided that the following conditions 12 1.2.4.2 nathanw * are met: 13 1.2.4.2 nathanw * 1. Redistributions of source code must retain the above copyright 14 1.2.4.2 nathanw * notice, this list of conditions and the following disclaimer. 15 1.2.4.2 nathanw * 2. Redistributions in binary form must reproduce the above copyright 16 1.2.4.2 nathanw * notice, this list of conditions and the following disclaimer in the 17 1.2.4.2 nathanw * documentation and/or other materials provided with the distribution. 18 1.2.4.2 nathanw * 3. All advertising materials mentioning features or use of this software 19 1.2.4.2 nathanw * must display the following acknowledgement: 20 1.2.4.2 nathanw * This product includes software developed by the NetBSD 21 1.2.4.2 nathanw * Foundation, Inc. and its contributors. 22 1.2.4.2 nathanw * 4. Neither the name of The NetBSD Foundation nor the names of its 23 1.2.4.2 nathanw * contributors may be used to endorse or promote products derived 24 1.2.4.2 nathanw * from this software without specific prior written permission. 25 1.2.4.2 nathanw * 26 1.2.4.2 nathanw * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 1.2.4.2 nathanw * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 1.2.4.2 nathanw * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 1.2.4.2 nathanw * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 1.2.4.2 nathanw * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 1.2.4.2 nathanw * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 1.2.4.2 nathanw * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 1.2.4.2 nathanw * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 1.2.4.2 nathanw * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 1.2.4.2 nathanw * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 1.2.4.2 nathanw * POSSIBILITY OF SUCH DAMAGE. 37 1.2.4.2 nathanw */ 38 1.2.4.2 nathanw 39 1.2.4.2 nathanw #ifdef TOSTOOLS 40 1.2.4.2 nathanw #include <stdio.h> 41 1.2.4.2 nathanw #include <sys/types.h> 42 1.2.4.2 nathanw #else 43 1.2.4.2 nathanw 44 1.2.4.2 nathanw #include <stand.h> 45 1.2.4.2 nathanw #include <atari_stand.h> 46 1.2.4.2 nathanw #include <string.h> 47 1.2.4.2 nathanw #include <libkern.h> 48 1.2.4.2 nathanw #include <machine/cpu.h> 49 1.2.4.2 nathanw #endif /* TOSTOOLS */ 50 1.2.4.2 nathanw 51 1.2.4.2 nathanw #include "libtos.h" 52 1.2.4.2 nathanw #include "tosdefs.h" 53 1.2.4.2 nathanw #include "kparamb.h" 54 1.2.4.2 nathanw /* 55 1.2.4.2 nathanw * Extract memory and cpu/fpu info from system. 56 1.2.4.2 nathanw */ 57 1.2.4.2 nathanw void 58 1.2.4.2 nathanw sys_info(od) 59 1.2.4.2 nathanw osdsc_t *od; 60 1.2.4.2 nathanw { 61 1.2.4.2 nathanw long *jar; 62 1.2.4.2 nathanw OSH *oshdr; 63 1.2.4.2 nathanw 64 1.2.4.2 nathanw od->cputype = 0; 65 1.2.4.2 nathanw 66 1.2.4.2 nathanw /* 67 1.2.4.2 nathanw * Some GEMDOS versions use a different year-base in the RTC. 68 1.2.4.2 nathanw */ 69 1.2.4.2 nathanw oshdr = *ADDR_OSHEAD; 70 1.2.4.2 nathanw oshdr = oshdr->os_beg; 71 1.2.4.2 nathanw if ((oshdr->os_version > 0x0300) && (oshdr->os_version < 0x0306)) 72 1.2.4.2 nathanw od->cputype |= ATARI_CLKBROKEN; 73 1.2.4.2 nathanw 74 1.2.4.2 nathanw /* 75 1.2.4.2 nathanw * Auto configure memory sizes when they are not pre-set. 76 1.2.4.2 nathanw */ 77 1.2.4.2 nathanw if (od->stmem_size <= 0) 78 1.2.4.2 nathanw od->stmem_size = *ADDR_PHYSTOP; 79 1.2.4.2 nathanw 80 1.2.4.2 nathanw if (od->ttmem_size) 81 1.2.4.2 nathanw od->ttmem_start = TTRAM_BASE; 82 1.2.4.2 nathanw else { 83 1.2.4.2 nathanw if (*ADDR_CHKRAMTOP == RAMTOP_MAGIC) { 84 1.2.4.2 nathanw od->ttmem_size = *ADDR_RAMTOP; 85 1.2.4.2 nathanw if (od->ttmem_size > TTRAM_BASE) { 86 1.2.4.2 nathanw od->ttmem_size -= TTRAM_BASE; 87 1.2.4.2 nathanw od->ttmem_start = TTRAM_BASE; 88 1.2.4.2 nathanw } 89 1.2.4.2 nathanw else od->ttmem_size = 0; 90 1.2.4.2 nathanw } 91 1.2.4.2 nathanw } 92 1.2.4.2 nathanw 93 1.2.4.2 nathanw /* 94 1.2.4.2 nathanw * Scan cookiejar for cpu types, accellerator boards, etc. 95 1.2.4.2 nathanw */ 96 1.2.4.2 nathanw jar = *ADDR_P_COOKIE; 97 1.2.4.2 nathanw if (jar != NULL) { 98 1.2.4.2 nathanw do { 99 1.2.4.2 nathanw if (jar[0] == 0x5f435055) { /* _CPU */ 100 1.2.4.2 nathanw switch (jar[1]) { 101 1.2.4.2 nathanw case 0: 102 1.2.4.2 nathanw od->cputype |= ATARI_68000; 103 1.2.4.2 nathanw break; 104 1.2.4.2 nathanw case 10: 105 1.2.4.2 nathanw od->cputype |= ATARI_68010; 106 1.2.4.2 nathanw break; 107 1.2.4.2 nathanw case 20: 108 1.2.4.2 nathanw od->cputype |= ATARI_68020; 109 1.2.4.2 nathanw break; 110 1.2.4.2 nathanw case 30: 111 1.2.4.2 nathanw od->cputype |= ATARI_68030; 112 1.2.4.2 nathanw break; 113 1.2.4.2 nathanw case 40: 114 1.2.4.2 nathanw od->cputype |= ATARI_68040; 115 1.2.4.2 nathanw break; 116 1.2.4.2 nathanw case 60: 117 1.2.4.2 nathanw od->cputype |= ATARI_68060; 118 1.2.4.2 nathanw break; 119 1.2.4.2 nathanw default: 120 1.2.4.2 nathanw /* This error is caught later on */ 121 1.2.4.2 nathanw break; 122 1.2.4.2 nathanw } 123 1.2.4.2 nathanw } 124 1.2.4.2 nathanw if (jar[0] == 0x42504658) { /* BPFX */ 125 1.2.4.2 nathanw unsigned long *p; 126 1.2.4.2 nathanw 127 1.2.4.2 nathanw p = (unsigned long*)jar[1]; 128 1.2.4.2 nathanw 129 1.2.4.2 nathanw od->ttmem_start = p[1]; 130 1.2.4.2 nathanw od->ttmem_size = p[2]; 131 1.2.4.2 nathanw } 132 1.2.4.2 nathanw if (jar[0] == 0x5f435432) { /* _CT2 */ 133 1.2.4.2 nathanw /* 134 1.2.4.2 nathanw * The CT2 board has a different physical base address! 135 1.2.4.2 nathanw */ 136 1.2.4.2 nathanw od->ttmem_start = CTRAM_BASE; 137 1.2.4.2 nathanw } 138 1.2.4.2 nathanw jar = &jar[2]; 139 1.2.4.2 nathanw } while (jar[-2]); 140 1.2.4.2 nathanw } 141 1.2.4.2 nathanw } 142
Indexes created Wed Oct 01 19:09:53 GMT 2025