nkeynes@10 | 1 | /**
|
nkeynes@11 | 2 | * $Id: mem.c,v 1.2 2005-12-11 12:00:03 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 | }
|
nkeynes@11 | 204 |
|