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
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
|
#include <dolphin/exi.h>
#include <dolphin/os.h>
#include "__os.h"
static s32 Chan;
static u32 Dev;
static u32 Enabled;
static u32 BarnacleEnabled;
// prototypes
int InitializeUART(void);
int ReadUARTN(void);
int WriteUARTN(void *buf, u32 len);
void __OSEnableBarnacle(s32 chan, u32 dev);
static BOOL ProbeBarnacle(s32 chan, u32 dev, u32* revision) {
int err;
u32 cmd;
if (chan != 2 && dev == 0 && !EXIAttach(chan, NULL)) {
return FALSE;
}
err = !EXILock(chan, dev, NULL);
if (!err) {
err = !EXISelect(chan, dev, EXI_FREQ_1M);
if (!err) {
cmd = 0x20011300;
err = FALSE;
err |= !EXIImm(chan, &cmd, sizeof(cmd), EXI_WRITE, NULL);
err |= !EXISync(chan);
err |= !EXIImm(chan, revision, sizeof(revision), EXI_READ, NULL);
err |= !EXISync(chan);
err |= !EXIDeselect(chan);
}
EXIUnlock(chan);
}
if (chan != 2 && dev == 0) {
EXIDetach(chan);
}
if (err) {
return FALSE;
}
if (*revision != 0xFFFFFFFF) {
return TRUE;
}
return FALSE;
}
void __OSEnableBarnacle(s32 chan, u32 dev) {
u32 id;
if (!EXIGetID(chan, dev, &id)) {
return;
}
switch (id) {
case EXI_MEMORY_CARD_59:
case EXI_MEMORY_CARD_123:
case EXI_MEMORY_CARD_251:
case EXI_MEMORY_CARD_507:
case EXI_USB_ADAPTER:
case EXI_NPDP_GDEV:
case EXI_MODEM:
case 0x03010000:
case 0x04020100:
case EXI_ETHER:
case 0x04020300:
case 0x04220000:
case EXI_RS232C:
case EXI_MIC:
case EXI_AD16:
case EXI_STREAM_HANGER:
case 0x80000004:
case 0x80000008:
case 0x80000010:
case 0x80000020:
case 0xFFFFFFFF:
break;
default:
if (ProbeBarnacle(chan, dev, &id)) {
Chan = chan;
Dev = dev;
Enabled = BarnacleEnabled = 0xA5FF005A;
break;
}
}
}
int InitializeUART(void) {
if (BarnacleEnabled == 0xA5FF005A) {
return 0;
}
if ((OSGetConsoleType() & 0x10000000) == 0) {
Enabled = 0;
return 2;
}
Chan = 0;
Dev = 1;
Enabled = 0xA5FF005A;
return 0;
}
int ReadUARTN(void) {
return 4;
}
static int QueueLength(void) {
u32 cmd;
if (EXISelect(Chan, Dev, 3) == 0) {
return -1;
}
cmd = 0x20010000;
EXIImm(Chan, &cmd, sizeof(cmd), EXI_WRITE, 0);
EXISync(Chan);
EXIImm(Chan, &cmd, 1, EXI_READ, 0);
EXISync(Chan);
EXIDeselect(Chan);
return 0x10 - (cmd >> 0x18);
}
int WriteUARTN(void *buf, u32 len) {
u32 cmd;
s32 xLen;
int qLen;
char* ptr;
int locked;
int error;
if ((Enabled - 0xA5FF0000) != 0x5A) {
return 2;
}
locked = EXILock(Chan, Dev, 0);
if (locked == 0) {
return 0;
} else {
ptr = (char*)buf;
}
while ((u32)ptr - (u32)buf < len) {
if (*(s8*)ptr == 0xA) {
*ptr = 0xD;
}
ptr++;
}
error = 0;
cmd = 0xA0010000;
while (len != 0) {
qLen = QueueLength();
if (qLen < 0) {
error = 3;
break;
}
if ((qLen >= 0xC) || (qLen >= len)) {
if (EXISelect(Chan, Dev, EXI_FREQ_8M) == 0) {
error = 3;
break;
}
EXIImm(Chan, &cmd, sizeof(cmd), EXI_WRITE, 0);
EXISync(Chan);
while((qLen != 0) && (len != 0)) {
if ((qLen < 4) && (qLen < len)) {
break;
}
xLen = len < 4 ? (long)len : 4;
EXIImm(Chan, buf, xLen, EXI_WRITE, 0);
(char*)buf += xLen;
len -= xLen;
qLen -= xLen;
EXISync(Chan);
}
EXIDeselect(Chan);
}
}
EXIUnlock(Chan);
return error;
}
|
