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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
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
71
72
73
74
75
76
77
78
79
80
81
82
83
|
#include "memory.h"
#include "arena.h"
#include "io.h"
#include "minilib.h"
#include "string.h"
#include "utils.h"
#include "io.h"
void memory_init( Memory *memory, int size )
{
memory->size = size;
memory->m = allocate( size );
memory_reset( memory );
}
void memory_done( Memory *memory )
{
deallocate( (void **)&memory->m );
}
void memory_reset( Memory *memory )
{
memset( memory->m, 0, memory->size );
}
void memory_write( Memory *memory, int addr, char v )
{
if( addr < 0 || addr > memory->size ) {
print( "MEMORY WRITE ACCESS VIOLATION" );
halt( );
}
memory->m[addr] = v;
}
char memory_read( Memory *memory, int addr )
{
if( addr < 0 || addr > memory->size ) {
print( "MEMORY READ ACCESS VIOLATION" );
halt( );
}
return memory->m[addr];
}
void memory_print_dump( Memory *memory )
{
int i;
char *s = allocate( memory->size * 4 );
char buf[4];
s[0] = '\0';
strcat( s, " 00: " );
for( i = 0; i < memory->size; i++ ) {
strtohex( &memory->m[i], 1, buf );
strcat( s, buf );
strcat( s, " " );
if( i % 16 == 15 ) {
print( s );
*s = '\0';
inttohex( i + 1, buf );
strcat( s, " " );
strcat( s, buf );
strcat( s, ": " );
} else {
if( i % 8 == 7 ) {
strcat( s, " " );
}
}
}
print( s );
deallocate( (void **)&s );
}
void memory_read_from_file( Memory *memory, char *filename )
{
if( readfile( filename, memory->m, memory->size ) < 0 ) {
print( "MEMORY DUMP LOAD ERROR" );
halt( );
}
}
|