cff531af |
1 | /* |
2 | * PicoDrive |
3 | * (C) notaz, 2009,2010 |
4 | * |
5 | * This work is licensed under the terms of MAME license. |
6 | * See COPYING file in the top-level directory. |
7 | */ |
41397701 |
8 | #include <string.h> |
b4db550e |
9 | #include <stddef.h> |
10 | |
41397701 |
11 | #include "sh2.h" |
5686d931 |
12 | #include "../debug.h" |
679af8a3 |
13 | #include "compiler.h" |
41397701 |
14 | |
15 | #define I 0xf0 |
16 | |
f0d7b1fa |
17 | SH2 *sh2; // active sh2 |
18 | |
679af8a3 |
19 | int sh2_init(SH2 *sh2, int is_slave) |
41397701 |
20 | { |
679af8a3 |
21 | int ret = 0; |
22 | |
41397701 |
23 | memset(sh2, 0, sizeof(*sh2)); |
24 | sh2->is_slave = is_slave; |
5686d931 |
25 | pdb_register_cpu(sh2, PDBCT_SH2, is_slave ? "ssh2" : "msh2"); |
679af8a3 |
26 | #ifdef DRC_SH2 |
27 | ret = sh2_drc_init(sh2); |
28 | #endif |
29 | return ret; |
41397701 |
30 | } |
31 | |
e898de13 |
32 | void sh2_finish(SH2 *sh2) |
33 | { |
34 | #ifdef DRC_SH2 |
35 | sh2_drc_finish(sh2); |
36 | #endif |
37 | } |
38 | |
41397701 |
39 | void sh2_reset(SH2 *sh2) |
40 | { |
bcf65fd6 |
41 | sh2->pc = p32x_sh2_read32(0, sh2); |
42 | sh2->r[15] = p32x_sh2_read32(4, sh2); |
41397701 |
43 | sh2->sr = I; |
44 | sh2->vbr = 0; |
45 | sh2->pending_int_irq = 0; |
46 | } |
47 | |
6add7875 |
48 | void sh2_do_irq(SH2 *sh2, int level, int vector) |
41397701 |
49 | { |
41397701 |
50 | sh2->r[15] -= 4; |
bcf65fd6 |
51 | p32x_sh2_write32(sh2->r[15], sh2->sr, sh2); /* push SR onto stack */ |
41397701 |
52 | sh2->r[15] -= 4; |
bcf65fd6 |
53 | p32x_sh2_write32(sh2->r[15], sh2->pc, sh2); /* push PC onto stack */ |
41397701 |
54 | |
55 | /* set I flags in SR */ |
56 | sh2->sr = (sh2->sr & ~I) | (level << 4); |
57 | |
58 | /* fetch PC */ |
bcf65fd6 |
59 | sh2->pc = p32x_sh2_read32(sh2->vbr + vector * 4, sh2); |
41397701 |
60 | |
61 | /* 13 cycles at best */ |
62 | sh2->cycles_done += 13; |
63 | // sh2->icount -= 13; |
64 | } |
65 | |
1f1ff763 |
66 | void sh2_irl_irq(SH2 *sh2, int level, int nested_call) |
41397701 |
67 | { |
68 | sh2->pending_irl = level; |
1f1ff763 |
69 | if (level < sh2->pending_int_irq) |
70 | level = sh2->pending_int_irq; |
71 | sh2->pending_level = level; |
41397701 |
72 | |
1f1ff763 |
73 | if (!nested_call) { |
74 | // not in memhandler, so handle this now (recompiler friendly) |
75 | // do this to avoid missing irqs that other SH2 might clear |
76 | if (level > ((sh2->sr >> 4) & 0x0f)) { |
77 | int vector = sh2->irq_callback(sh2, level); |
78 | sh2_do_irq(sh2, level, vector); |
79 | } |
80 | } |
81 | else |
82 | sh2->test_irq = 1; |
41397701 |
83 | } |
84 | |
85 | void sh2_internal_irq(SH2 *sh2, int level, int vector) |
86 | { |
6add7875 |
87 | // FIXME: multiple internal irqs not handled.. |
88 | // assuming internal irqs never clear until accepted |
41397701 |
89 | sh2->pending_int_irq = level; |
90 | sh2->pending_int_vector = vector; |
6add7875 |
91 | if (level > sh2->pending_level) |
92 | sh2->pending_level = level; |
41397701 |
93 | |
6add7875 |
94 | sh2->test_irq = 1; |
41397701 |
95 | } |
96 | |
b4db550e |
97 | #define SH2_REG_SIZE (offsetof(SH2, macl) + sizeof(sh2->macl)) |
98 | |
99 | void sh2_pack(const SH2 *sh2, unsigned char *buff) |
100 | { |
101 | unsigned int *p; |
102 | |
103 | memcpy(buff, sh2, SH2_REG_SIZE); |
104 | p = (void *)(buff + SH2_REG_SIZE); |
105 | |
106 | p[0] = sh2->pending_int_irq; |
107 | p[1] = sh2->pending_int_vector; |
108 | p[2] = sh2->cycles_aim; |
109 | p[3] = sh2->cycles_done; |
110 | } |
111 | |
112 | void sh2_unpack(SH2 *sh2, const unsigned char *buff) |
113 | { |
114 | unsigned int *p; |
115 | |
116 | memcpy(sh2, buff, SH2_REG_SIZE); |
117 | p = (void *)(buff + SH2_REG_SIZE); |
118 | |
119 | sh2->pending_int_irq = p[0]; |
120 | sh2->pending_int_vector = p[1]; |
121 | sh2->cycles_aim = p[2]; |
122 | sh2->cycles_done = p[3]; |
123 | } |
124 | |