filename | src/mem.c |
changeset | 10:c898b37506e0 |
next | 11:0a82ef380c45 |
author | nkeynes |
date | Sun Dec 11 05:15:36 2005 +0000 (18 years ago) |
permissions | -rw-r--r-- |
last change | Add CPU disasembly options to mode dropdown Split sh4/mem.c into core mem.c and sh4/mem.c Start adding copyright comments to file headers |
file | annotate | diff | log | raw |
nkeynes@10 | 1 | /** |
nkeynes@10 | 2 | * $Id: mem.c,v 1.1 2005-12-11 05:15:36 nkeynes Exp $ |
nkeynes@10 | 3 | * mem.c is responsible for creating and maintaining the overall system memory |
nkeynes@10 | 4 | * map, as visible from the SH4 processor. |
nkeynes@10 | 5 | * |
nkeynes@10 | 6 | * Copyright (c) 2005 Nathan Keynes. |
nkeynes@10 | 7 | * |
nkeynes@10 | 8 | * This program is free software; you can redistribute it and/or modify |
nkeynes@10 | 9 | * it under the terms of the GNU General Public License as published by |
nkeynes@10 | 10 | * the Free Software Foundation; either version 2 of the License, or |
nkeynes@10 | 11 | * (at your option) any later version. |
nkeynes@10 | 12 | * |
nkeynes@10 | 13 | * This program is distributed in the hope that it will be useful, |
nkeynes@10 | 14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
nkeynes@10 | 15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
nkeynes@10 | 16 | * GNU General Public License for more details. |
nkeynes@10 | 17 | */ |
nkeynes@10 | 18 | |
nkeynes@10 | 19 | #include <sys/mman.h> |
nkeynes@10 | 20 | #include <assert.h> |
nkeynes@10 | 21 | #include <stdint.h> |
nkeynes@10 | 22 | #include <stdlib.h> |
nkeynes@10 | 23 | #include <stdio.h> |
nkeynes@10 | 24 | #include <unistd.h> |
nkeynes@10 | 25 | #include <fcntl.h> |
nkeynes@10 | 26 | #include <errno.h> |
nkeynes@10 | 27 | #include <string.h> |
nkeynes@10 | 28 | #include <zlib.h> |
nkeynes@10 | 29 | #include "dream.h" |
nkeynes@10 | 30 | #include "mem.h" |
nkeynes@10 | 31 | #include "mmio.h" |
nkeynes@10 | 32 | #include "dreamcast.h" |
nkeynes@10 | 33 | |
nkeynes@10 | 34 | char **page_map = NULL; |
nkeynes@10 | 35 | |
nkeynes@10 | 36 | struct mem_region mem_rgn[MAX_MEM_REGIONS]; |
nkeynes@10 | 37 | struct mmio_region *io_rgn[MAX_IO_REGIONS]; |
nkeynes@10 | 38 | struct mmio_region *P4_io[4096]; |
nkeynes@10 | 39 | |
nkeynes@10 | 40 | int num_io_rgns = 1, num_mem_rgns = 0; |
nkeynes@10 | 41 | |
nkeynes@10 | 42 | void *mem_alloc_pages( int n ) |
nkeynes@10 | 43 | { |
nkeynes@10 | 44 | void *mem = mmap( NULL, n * 4096, |
nkeynes@10 | 45 | PROT_READ|PROT_WRITE, MAP_ANONYMOUS|MAP_PRIVATE, -1, 0 ); |
nkeynes@10 | 46 | if( mem == MAP_FAILED ) { |
nkeynes@10 | 47 | ERROR( "Memory allocation failure! (%s)", strerror(errno) ); |
nkeynes@10 | 48 | return NULL; |
nkeynes@10 | 49 | } |
nkeynes@10 | 50 | return mem; |
nkeynes@10 | 51 | } |
nkeynes@10 | 52 | |
nkeynes@10 | 53 | |
nkeynes@10 | 54 | void mem_init( void ) |
nkeynes@10 | 55 | { |
nkeynes@10 | 56 | page_map = mmap( NULL, sizeof(char *) * PAGE_TABLE_ENTRIES, |
nkeynes@10 | 57 | PROT_READ|PROT_WRITE, MAP_ANONYMOUS|MAP_PRIVATE, -1, 0 ); |
nkeynes@10 | 58 | if( page_map == MAP_FAILED ) { |
nkeynes@10 | 59 | ERROR( "Unable to allocate page map! (%s)", strerror(errno) ); |
nkeynes@10 | 60 | page_map = NULL; |
nkeynes@10 | 61 | return; |
nkeynes@10 | 62 | } |
nkeynes@10 | 63 | |
nkeynes@10 | 64 | memset( page_map, 0, sizeof(uint32_t) * PAGE_TABLE_ENTRIES ); |
nkeynes@10 | 65 | } |
nkeynes@10 | 66 | |
nkeynes@10 | 67 | void mem_reset( void ) |
nkeynes@10 | 68 | { |
nkeynes@10 | 69 | /* Restore all mmio registers to their initial settings */ |
nkeynes@10 | 70 | int i, j; |
nkeynes@10 | 71 | for( i=1; i<num_io_rgns; i++ ) { |
nkeynes@10 | 72 | for( j=0; io_rgn[i]->ports[j].id != NULL; j++ ) { |
nkeynes@10 | 73 | if( io_rgn[i]->ports[j].def_val != UNDEFINED && |
nkeynes@10 | 74 | io_rgn[i]->ports[j].def_val != *io_rgn[i]->ports[j].val ) { |
nkeynes@10 | 75 | io_rgn[i]->io_write( io_rgn[i]->ports[j].offset, |
nkeynes@10 | 76 | io_rgn[i]->ports[j].def_val ); |
nkeynes@10 | 77 | } |
nkeynes@10 | 78 | } |
nkeynes@10 | 79 | } |
nkeynes@10 | 80 | } |
nkeynes@10 | 81 | |
nkeynes@10 | 82 | struct mem_region *mem_map_region( void *mem, uint32_t base, uint32_t size, |
nkeynes@10 | 83 | char *name, int flags ) |
nkeynes@10 | 84 | { |
nkeynes@10 | 85 | int i; |
nkeynes@10 | 86 | mem_rgn[num_mem_rgns].base = base; |
nkeynes@10 | 87 | mem_rgn[num_mem_rgns].size = size; |
nkeynes@10 | 88 | mem_rgn[num_mem_rgns].flags = flags; |
nkeynes@10 | 89 | mem_rgn[num_mem_rgns].name = name; |
nkeynes@10 | 90 | mem_rgn[num_mem_rgns].mem = mem; |
nkeynes@10 | 91 | num_mem_rgns++; |
nkeynes@10 | 92 | |
nkeynes@10 | 93 | for( i=0; i<size>>PAGE_BITS; i++ ) |
nkeynes@10 | 94 | page_map[(base>>PAGE_BITS)+i] = mem + (i<<PAGE_BITS); |
nkeynes@10 | 95 | |
nkeynes@10 | 96 | return &mem_rgn[num_mem_rgns-1]; |
nkeynes@10 | 97 | } |
nkeynes@10 | 98 | |
nkeynes@10 | 99 | void *mem_create_ram_region( uint32_t base, uint32_t size, char *name ) |
nkeynes@10 | 100 | { |
nkeynes@10 | 101 | char *mem; |
nkeynes@10 | 102 | |
nkeynes@10 | 103 | assert( (base&0xFFFFF000) == base ); /* must be page aligned */ |
nkeynes@10 | 104 | assert( (size&0x00000FFF) == 0 ); |
nkeynes@10 | 105 | assert( num_mem_rgns < MAX_MEM_REGIONS ); |
nkeynes@10 | 106 | assert( page_map != NULL ); |
nkeynes@10 | 107 | |
nkeynes@10 | 108 | mem = mem_alloc_pages( size>>PAGE_BITS ); |
nkeynes@10 | 109 | |
nkeynes@10 | 110 | mem_map_region( mem, base, size, name, 6 ); |
nkeynes@10 | 111 | return mem; |
nkeynes@10 | 112 | } |
nkeynes@10 | 113 | |
nkeynes@10 | 114 | void *mem_load_rom( char *file, uint32_t base, uint32_t size, uint32_t crc ) |
nkeynes@10 | 115 | { |
nkeynes@10 | 116 | char buf[512], *mem; |
nkeynes@10 | 117 | int fd; |
nkeynes@10 | 118 | uint32_t calc_crc; |
nkeynes@10 | 119 | snprintf( buf, 512, "%s/%s",BIOS_PATH, file ); |
nkeynes@10 | 120 | fd = open( buf, O_RDONLY ); |
nkeynes@10 | 121 | if( fd == -1 ) { |
nkeynes@10 | 122 | ERROR( "Bios file not found: %s", buf ); |
nkeynes@10 | 123 | return NULL; |
nkeynes@10 | 124 | } |
nkeynes@10 | 125 | mem = mmap( NULL, size, PROT_READ, MAP_PRIVATE, fd, 0 ); |
nkeynes@10 | 126 | if( mem == MAP_FAILED ) { |
nkeynes@10 | 127 | ERROR( "Unable to map bios file: %s (%s)", file, strerror(errno) ); |
nkeynes@10 | 128 | close(fd); |
nkeynes@10 | 129 | return NULL; |
nkeynes@10 | 130 | } |
nkeynes@10 | 131 | mem_map_region( mem, base, size, file, 4 ); |
nkeynes@10 | 132 | |
nkeynes@10 | 133 | /* CRC check */ |
nkeynes@10 | 134 | calc_crc = crc32(0L, mem, size); |
nkeynes@10 | 135 | if( calc_crc != crc ) { |
nkeynes@10 | 136 | WARN( "Bios CRC Mismatch in %s: %08X (expected %08X)", |
nkeynes@10 | 137 | file, calc_crc, crc); |
nkeynes@10 | 138 | } |
nkeynes@10 | 139 | return mem; |
nkeynes@10 | 140 | } |
nkeynes@10 | 141 | |
nkeynes@10 | 142 | char *mem_get_region_by_name( char *name ) |
nkeynes@10 | 143 | { |
nkeynes@10 | 144 | int i; |
nkeynes@10 | 145 | for( i=0; i<num_mem_rgns; i++ ) { |
nkeynes@10 | 146 | if( strcmp( mem_rgn[i].name, name ) == 0 ) |
nkeynes@10 | 147 | return mem_rgn[i].mem; |
nkeynes@10 | 148 | } |
nkeynes@10 | 149 | return NULL; |
nkeynes@10 | 150 | } |
nkeynes@10 | 151 | |
nkeynes@10 | 152 | void register_io_region( struct mmio_region *io ) |
nkeynes@10 | 153 | { |
nkeynes@10 | 154 | int i; |
nkeynes@10 | 155 | |
nkeynes@10 | 156 | assert(io); |
nkeynes@10 | 157 | io->mem = mem_alloc_pages(2); |
nkeynes@10 | 158 | io->save_mem = io->mem + PAGE_SIZE; |
nkeynes@10 | 159 | io->index = (struct mmio_port **)malloc(1024*sizeof(struct mmio_port *)); |
nkeynes@10 | 160 | io->trace_flag = 1; |
nkeynes@10 | 161 | memset( io->index, 0, 1024*sizeof(struct mmio_port *) ); |
nkeynes@10 | 162 | for( i=0; io->ports[i].id != NULL; i++ ) { |
nkeynes@10 | 163 | io->ports[i].val = (uint32_t *)(io->mem + io->ports[i].offset); |
nkeynes@10 | 164 | *io->ports[i].val = io->ports[i].def_val; |
nkeynes@10 | 165 | io->index[io->ports[i].offset>>2] = &io->ports[i]; |
nkeynes@10 | 166 | } |
nkeynes@10 | 167 | memcpy( io->save_mem, io->mem, PAGE_SIZE ); |
nkeynes@10 | 168 | if( (io->base & 0xFF000000) == 0xFF000000 ) { |
nkeynes@10 | 169 | /* P4 area (on-chip I/O channels */ |
nkeynes@10 | 170 | P4_io[(io->base&0x1FFFFFFF)>>19] = io; |
nkeynes@10 | 171 | } else { |
nkeynes@10 | 172 | page_map[io->base>>12] = (char *)num_io_rgns; |
nkeynes@10 | 173 | } |
nkeynes@10 | 174 | io_rgn[num_io_rgns] = io; |
nkeynes@10 | 175 | num_io_rgns++; |
nkeynes@10 | 176 | } |
nkeynes@10 | 177 | |
nkeynes@10 | 178 | void register_io_regions( struct mmio_region **io ) |
nkeynes@10 | 179 | { |
nkeynes@10 | 180 | while( *io ) register_io_region( *io++ ); |
nkeynes@10 | 181 | } |
nkeynes@10 | 182 | |
nkeynes@10 | 183 | int mem_has_page( uint32_t addr ) |
nkeynes@10 | 184 | { |
nkeynes@10 | 185 | char *page = page_map[ (addr & 0x1FFFFFFF) >> 12 ]; |
nkeynes@10 | 186 | return page != NULL; |
nkeynes@10 | 187 | } |
nkeynes@10 | 188 | |
nkeynes@10 | 189 | char *mem_get_page( uint32_t addr ) |
nkeynes@10 | 190 | { |
nkeynes@10 | 191 | char *page = page_map[ (addr & 0x1FFFFFFF) >> 12 ]; |
nkeynes@10 | 192 | return page; |
nkeynes@10 | 193 | } |
nkeynes@10 | 194 | |
nkeynes@10 | 195 | char *mem_get_region( uint32_t addr ) |
nkeynes@10 | 196 | { |
nkeynes@10 | 197 | char *page = page_map[ (addr & 0x1FFFFFFF) >> 12 ]; |
nkeynes@10 | 198 | if( ((uint32_t)page) < MAX_IO_REGIONS ) { /* IO Region */ |
nkeynes@10 | 199 | return NULL; |
nkeynes@10 | 200 | } else { |
nkeynes@10 | 201 | return page+(addr&0xFFF); |
nkeynes@10 | 202 | } |
nkeynes@10 | 203 | } |
.