1 /* mem.c --- memory for M32C simulator.
3 Copyright (C) 2005 Free Software Foundation, Inc.
4 Contributed by Red Hat, Inc.
6 This file is part of the GNU simulators.
8 The GNU simulators are free software; you can redistribute them and/or
9 modify them under the terms of the GNU General Public License as
10 published by the Free Software Foundation; either version 2 of the
11 License, or (at your option) any later version.
13 The GNU simulators are distributed in the hope that they will be
14 useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with the GNU simulators; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
37 #define L1_LEN (1 << L1_BITS)
38 #define L2_LEN (1 << L2_BITS)
39 #define OFF_LEN (1 << OFF_BITS)
41 static unsigned char **pt
[L1_LEN
];
43 /* [ get=0/put=1 ][ byte size ] */
44 static unsigned int mem_counters
[2][4];
46 #define COUNT(isput,bytes) \
47 if (verbose && enable_counting) mem_counters[isput][bytes]++
54 for (i
= 0; i
< L1_LEN
; i
++)
57 for (j
= 0; j
< L2_LEN
; j
++)
62 memset (pt
, 0, sizeof (pt
));
63 memset (mem_counters
, 0, sizeof (mem_counters
));
66 static unsigned char *
69 int pt1
= (address
>> (L2_BITS
+ OFF_BITS
)) & ((1 << L1_BITS
) - 1);
70 int pt2
= (address
>> OFF_BITS
) & ((1 << L2_BITS
) - 1);
71 int pto
= address
& ((1 << OFF_BITS
) - 1);
75 printf ("NULL pointer dereference\n");
80 pt
[pt1
] = (unsigned char **) calloc (L2_LEN
, sizeof (char **));
81 if (pt
[pt1
][pt2
] == 0)
83 pt
[pt1
][pt2
] = (unsigned char *) malloc (OFF_LEN
);
84 memset (pt
[pt1
][pt2
], 0, OFF_LEN
);
87 return pt
[pt1
][pt2
] + pto
;
91 used (int rstart
, int i
, int j
)
93 int rend
= i
<< (L2_BITS
+ OFF_BITS
);
94 rend
+= j
<< OFF_BITS
;
95 if (rstart
== 0xe0000 && rend
== 0xe1000)
97 printf ("mem: %08x - %08x (%dk bytes)\n", rstart
, rend
- 1,
98 (rend
- rstart
) / 1024);
102 mcs (int isput
, int bytes
)
104 return comma (mem_counters
[isput
][bytes
]);
114 for (i
= 0; i
< L1_LEN
; i
++)
117 for (j
= 0; j
< L2_LEN
; j
++)
123 rstart
= (i
<< (L2_BITS
+ OFF_BITS
)) + (j
<< OFF_BITS
);
140 /* mem foo: 123456789012 123456789012 123456789012 123456789012
142 printf (" byte short pointer long"
144 printf ("mem get: %12s %12s %12s %12s %12s\n", mcs (0, 1), mcs (0, 2),
145 mcs (0, 3), mcs (0, 4), mcs (0, 0));
146 printf ("mem put: %12s %12s %12s %12s\n", mcs (1, 1), mcs (1, 2),
147 mcs (1, 3), mcs (1, 4));
152 s (int address
, char *dir
)
155 printf ("MEM[%0*x] %s", membus_mask
== 0xfffff ? 5 : 6, address
, dir
);
159 #define S(d) if (trace) s(address, d)
170 #define E() if (trace) e()
173 mem_put_byte (int address
, unsigned char value
)
176 address
&= membus_mask
;
177 m
= mem_ptr (address
);
179 printf (" %02x", value
);
185 static int old_led
= -1;
186 static char *led_on
[] =
187 { "\033[31m O ", "\033[32m O ", "\033[34m O " };
188 static char *led_off
[] = { "\033[0m · ", "\033[0m · ", "\033[0m · " };
190 if (old_led
!= value
)
193 for (i
= 0; i
< 3; i
++)
194 if (value
& (1 << i
))
195 fputs (led_off
[i
], stdout
);
197 fputs (led_on
[i
], stdout
);
198 fputs ("\033[0m\r", stdout
);
206 m32c_syscall (value
);
214 printf ("SimTrace: %06lx %02x\n", regs
.r_pc
, value
);
218 printf ("SimTrap: %06lx %02x\n", regs
.r_pc
, value
);
224 mem_put_qi (int address
, unsigned char value
)
227 mem_put_byte (address
, value
& 0xff);
233 mem_put_hi (int address
, unsigned short value
)
236 mem_put_byte (address
, value
& 0xff);
237 mem_put_byte (address
+ 1, value
>> 8);
243 mem_put_psi (int address
, unsigned long value
)
246 mem_put_byte (address
, value
& 0xff);
247 mem_put_byte (address
+ 1, (value
>> 8) & 0xff);
248 mem_put_byte (address
+ 2, value
>> 16);
254 mem_put_si (int address
, unsigned long value
)
257 mem_put_byte (address
, value
& 0xff);
258 mem_put_byte (address
+ 1, (value
>> 8) & 0xff);
259 mem_put_byte (address
+ 2, (value
>> 16) & 0xff);
260 mem_put_byte (address
+ 3, (value
>> 24) & 0xff);
266 mem_put_blk (int address
, void *bufptr
, int nbytes
)
270 mem_counters
[1][1] += nbytes
;
272 mem_put_byte (address
++, *(unsigned char *) bufptr
++);
279 unsigned char *m
= mem_ptr (regs
.r_pc
& membus_mask
);
285 mem_get_byte (int address
)
288 address
&= membus_mask
;
290 m
= mem_ptr (address
);
294 printf (" %02x", *m
);
298 printf (" %02x", *m
);
307 mem_get_qi (int address
)
311 rv
= mem_get_byte (address
);
318 mem_get_hi (int address
)
322 rv
= mem_get_byte (address
);
323 rv
|= mem_get_byte (address
+ 1) * 256;
330 mem_get_psi (int address
)
334 rv
= mem_get_byte (address
);
335 rv
|= mem_get_byte (address
+ 1) * 256;
336 rv
|= mem_get_byte (address
+ 2) * 65536;
343 mem_get_si (int address
)
347 rv
= mem_get_byte (address
);
348 rv
|= mem_get_byte (address
+ 1) << 8;
349 rv
|= mem_get_byte (address
+ 2) << 16;
350 rv
|= mem_get_byte (address
+ 3) << 24;
357 mem_get_blk (int address
, void *bufptr
, int nbytes
)
361 mem_counters
[0][1] += nbytes
;
363 *(char *) bufptr
++ = mem_get_byte (address
++);
368 sign_ext (int v
, int bits
)
372 v
&= (1 << bits
) - 1;
373 if (v
& (1 << (bits
- 1)))
This page took 0.048847 seconds and 4 git commands to generate.