Revision a1bb27b1
b/Makefile.target | ||
---|---|---|
442 | 442 |
endif |
443 | 443 |
ifeq ($(TARGET_BASE_ARCH), arm) |
444 | 444 |
VL_OBJS+= integratorcp.o versatilepb.o ps2.o smc91c111.o arm_pic.o arm_timer.o |
445 |
VL_OBJS+= arm_boot.o pl011.o pl050.o pl080.o pl110.o pl190.o |
|
446 |
VL_OBJS+= versatile_pci.o |
|
445 |
VL_OBJS+= arm_boot.o pl011.o pl050.o pl080.o pl110.o pl181.o pl190.o
|
|
446 |
VL_OBJS+= versatile_pci.o sd.o
|
|
447 | 447 |
VL_OBJS+= arm_gic.o realview.o arm_sysctl.o |
448 | 448 |
VL_OBJS+= arm-semi.o |
449 | 449 |
endif |
b/hw/integratorcp.c | ||
---|---|---|
1 | 1 |
/* |
2 | 2 |
* ARM Integrator CP System emulation. |
3 | 3 |
* |
4 |
* Copyright (c) 2005-2006 CodeSourcery.
|
|
4 |
* Copyright (c) 2005-2007 CodeSourcery.
|
|
5 | 5 |
* Written by Paul Brook |
6 | 6 |
* |
7 | 7 |
* This code is licenced under the GPL |
... | ... | |
500 | 500 |
icp_control_init(0xcb000000); |
501 | 501 |
pl050_init(0x18000000, pic, 3, 0); |
502 | 502 |
pl050_init(0x19000000, pic, 4, 1); |
503 |
pl181_init(0x1c000000, sd_bdrv, pic, 23, 24); |
|
503 | 504 |
if (nd_table[0].vlan) { |
504 | 505 |
if (nd_table[0].model == NULL |
505 | 506 |
|| strcmp(nd_table[0].model, "smc91c111") == 0) { |
b/hw/pl181.c | ||
---|---|---|
1 |
/* |
|
2 |
* Arm PrimeCell PL181 MultiMedia Card Interface |
|
3 |
* |
|
4 |
* Copyright (c) 2007 CodeSourcery. |
|
5 |
* Written by Paul Brook |
|
6 |
* |
|
7 |
* This code is licenced under the GPL. |
|
8 |
*/ |
|
9 |
|
|
10 |
#include "vl.h" |
|
11 |
#include "sd.h" |
|
12 |
|
|
13 |
//#define DEBUG_PL181 1 |
|
14 |
|
|
15 |
#ifdef DEBUG_PL181 |
|
16 |
#define DPRINTF(fmt, args...) \ |
|
17 |
do { printf("pl181: " fmt , ##args); } while (0) |
|
18 |
#else |
|
19 |
#define DPRINTF(fmt, args...) do {} while(0) |
|
20 |
#endif |
|
21 |
|
|
22 |
#define PL181_FIFO_LEN 16 |
|
23 |
|
|
24 |
typedef struct { |
|
25 |
struct sd_state_s *card; |
|
26 |
uint32_t base; |
|
27 |
uint32_t clock; |
|
28 |
uint32_t power; |
|
29 |
uint32_t cmdarg; |
|
30 |
uint32_t cmd; |
|
31 |
uint32_t datatimer; |
|
32 |
uint32_t datalength; |
|
33 |
uint32_t respcmd; |
|
34 |
uint32_t response[4]; |
|
35 |
uint32_t datactrl; |
|
36 |
uint32_t datacnt; |
|
37 |
uint32_t status; |
|
38 |
uint32_t mask[2]; |
|
39 |
uint32_t fifocnt; |
|
40 |
int fifo_pos; |
|
41 |
int fifo_len; |
|
42 |
uint32_t fifo[PL181_FIFO_LEN]; |
|
43 |
void *pic; |
|
44 |
int irq[2]; |
|
45 |
} pl181_state; |
|
46 |
|
|
47 |
#define PL181_CMD_INDEX 0x3f |
|
48 |
#define PL181_CMD_RESPONSE (1 << 6) |
|
49 |
#define PL181_CMD_LONGRESP (1 << 7) |
|
50 |
#define PL181_CMD_INTERRUPT (1 << 8) |
|
51 |
#define PL181_CMD_PENDING (1 << 9) |
|
52 |
#define PL181_CMD_ENABLE (1 << 10) |
|
53 |
|
|
54 |
#define PL181_DATA_ENABLE (1 << 0) |
|
55 |
#define PL181_DATA_DIRECTION (1 << 1) |
|
56 |
#define PL181_DATA_MODE (1 << 2) |
|
57 |
#define PL181_DATA_DMAENABLE (1 << 3) |
|
58 |
|
|
59 |
#define PL181_STATUS_CMDCRCFAIL (1 << 0) |
|
60 |
#define PL181_STATUS_DATACRCFAIL (1 << 1) |
|
61 |
#define PL181_STATUS_CMDTIMEOUT (1 << 2) |
|
62 |
#define PL181_STATUS_DATATIMEOUT (1 << 3) |
|
63 |
#define PL181_STATUS_TXUNDERRUN (1 << 4) |
|
64 |
#define PL181_STATUS_RXOVERRUN (1 << 5) |
|
65 |
#define PL181_STATUS_CMDRESPEND (1 << 6) |
|
66 |
#define PL181_STATUS_CMDSENT (1 << 7) |
|
67 |
#define PL181_STATUS_DATAEND (1 << 8) |
|
68 |
#define PL181_STATUS_DATABLOCKEND (1 << 10) |
|
69 |
#define PL181_STATUS_CMDACTIVE (1 << 11) |
|
70 |
#define PL181_STATUS_TXACTIVE (1 << 12) |
|
71 |
#define PL181_STATUS_RXACTIVE (1 << 13) |
|
72 |
#define PL181_STATUS_TXFIFOHALFEMPTY (1 << 14) |
|
73 |
#define PL181_STATUS_RXFIFOHALFFULL (1 << 15) |
|
74 |
#define PL181_STATUS_TXFIFOFULL (1 << 16) |
|
75 |
#define PL181_STATUS_RXFIFOFULL (1 << 17) |
|
76 |
#define PL181_STATUS_TXFIFOEMPTY (1 << 18) |
|
77 |
#define PL181_STATUS_RXFIFOEMPTY (1 << 19) |
|
78 |
#define PL181_STATUS_TXDATAAVLBL (1 << 20) |
|
79 |
#define PL181_STATUS_RXDATAAVLBL (1 << 21) |
|
80 |
|
|
81 |
#define PL181_STATUS_TX_FIFO (PL181_STATUS_TXACTIVE \ |
|
82 |
|PL181_STATUS_TXFIFOHALFEMPTY \ |
|
83 |
|PL181_STATUS_TXFIFOFULL \ |
|
84 |
|PL181_STATUS_TXFIFOEMPTY \ |
|
85 |
|PL181_STATUS_TXDATAAVLBL) |
|
86 |
#define PL181_STATUS_RX_FIFO (PL181_STATUS_RXACTIVE \ |
|
87 |
|PL181_STATUS_RXFIFOHALFFULL \ |
|
88 |
|PL181_STATUS_RXFIFOFULL \ |
|
89 |
|PL181_STATUS_RXFIFOEMPTY \ |
|
90 |
|PL181_STATUS_RXDATAAVLBL) |
|
91 |
|
|
92 |
static const unsigned char pl181_id[] = |
|
93 |
{ 0x81, 0x11, 0x04, 0x00, 0x0d, 0xf0, 0x05, 0xb1 }; |
|
94 |
|
|
95 |
static void pl181_update(pl181_state *s) |
|
96 |
{ |
|
97 |
int i; |
|
98 |
for (i = 0; i < 2; i++) { |
|
99 |
pic_set_irq_new(s->pic, s->irq[i], (s->status & s->mask[i]) != 0); |
|
100 |
} |
|
101 |
} |
|
102 |
|
|
103 |
static void pl181_fifo_push(pl181_state *s, uint32_t value) |
|
104 |
{ |
|
105 |
int n; |
|
106 |
|
|
107 |
if (s->fifo_len == PL181_FIFO_LEN) { |
|
108 |
fprintf(stderr, "pl181: FIFO overflow\n"); |
|
109 |
return; |
|
110 |
} |
|
111 |
n = (s->fifo_pos + s->fifo_len) & (PL181_FIFO_LEN - 1); |
|
112 |
s->fifo_len++; |
|
113 |
s->fifo[n] = value; |
|
114 |
DPRINTF("FIFO push %08x\n", (int)value); |
|
115 |
} |
|
116 |
|
|
117 |
static uint32_t pl181_fifo_pop(pl181_state *s) |
|
118 |
{ |
|
119 |
uint32_t value; |
|
120 |
|
|
121 |
if (s->fifo_len == 0) { |
|
122 |
fprintf(stderr, "pl181: FIFO underflow\n"); |
|
123 |
return 0; |
|
124 |
} |
|
125 |
value = s->fifo[s->fifo_pos]; |
|
126 |
s->fifo_len--; |
|
127 |
s->fifo_pos = (s->fifo_pos + 1) & (PL181_FIFO_LEN - 1); |
|
128 |
DPRINTF("FIFO pop %08x\n", (int)value); |
|
129 |
return value; |
|
130 |
} |
|
131 |
|
|
132 |
static void pl181_send_command(pl181_state *s) |
|
133 |
{ |
|
134 |
struct sd_request_s request; |
|
135 |
uint8_t response[16]; |
|
136 |
int rlen; |
|
137 |
|
|
138 |
request.cmd = s->cmd & PL181_CMD_INDEX; |
|
139 |
request.arg = s->cmdarg; |
|
140 |
DPRINTF("Command %d %08x\n", request.cmd, request.arg); |
|
141 |
rlen = sd_do_command(s->card, &request, response); |
|
142 |
if (rlen < 0) |
|
143 |
goto error; |
|
144 |
if (s->cmd & PL181_CMD_RESPONSE) { |
|
145 |
#define RWORD(n) ((response[n] << 24) | (response[n + 1] << 16) \ |
|
146 |
| (response[n + 2] << 8) | response[n + 3]) |
|
147 |
if (rlen == 0 || (rlen == 4 && (s->cmd & PL181_CMD_LONGRESP))) |
|
148 |
goto error; |
|
149 |
if (rlen != 4 && rlen != 16) |
|
150 |
goto error; |
|
151 |
s->response[0] = RWORD(0); |
|
152 |
if (rlen == 4) { |
|
153 |
s->response[1] = s->response[2] = s->response[3] = 0; |
|
154 |
} else { |
|
155 |
s->response[1] = RWORD(4); |
|
156 |
s->response[2] = RWORD(8); |
|
157 |
s->response[3] = RWORD(12) & ~1; |
|
158 |
} |
|
159 |
DPRINTF("Response recieved\n"); |
|
160 |
s->status |= PL181_STATUS_CMDRESPEND; |
|
161 |
#undef RWORD |
|
162 |
} else { |
|
163 |
DPRINTF("Command sent\n"); |
|
164 |
s->status |= PL181_STATUS_CMDSENT; |
|
165 |
} |
|
166 |
return; |
|
167 |
|
|
168 |
error: |
|
169 |
DPRINTF("Timeout\n"); |
|
170 |
s->status |= PL181_STATUS_CMDTIMEOUT; |
|
171 |
} |
|
172 |
|
|
173 |
/* Transfer data between teh card and the FIFO. This is complicated by |
|
174 |
the FIFO holding 32-bit words and the card taking data in single byte |
|
175 |
chunks. FIFO bytes are transferred in little-endian order. */ |
|
176 |
|
|
177 |
static void pl181_fifo_run(pl181_state *s) |
|
178 |
{ |
|
179 |
uint32_t bits; |
|
180 |
uint32_t value; |
|
181 |
int n; |
|
182 |
int limit; |
|
183 |
int is_read; |
|
184 |
|
|
185 |
is_read = (s->datactrl & PL181_DATA_DIRECTION) != 0; |
|
186 |
if (s->datacnt != 0 && (!is_read || sd_data_ready(s->card))) { |
|
187 |
limit = is_read ? PL181_FIFO_LEN : 0; |
|
188 |
n = 0; |
|
189 |
value = 0; |
|
190 |
while (s->datacnt && s->fifo_len != limit) { |
|
191 |
if (is_read) { |
|
192 |
value |= (uint32_t)sd_read_data(s->card) << (n * 8); |
|
193 |
n++; |
|
194 |
if (n == 4) { |
|
195 |
pl181_fifo_push(s, value); |
|
196 |
value = 0; |
|
197 |
n = 0; |
|
198 |
} |
|
199 |
} else { |
|
200 |
if (n == 0) { |
|
201 |
value = pl181_fifo_pop(s); |
|
202 |
n = 4; |
|
203 |
} |
|
204 |
sd_write_data(s->card, value & 0xff); |
|
205 |
value >>= 8; |
|
206 |
n--; |
|
207 |
} |
|
208 |
s->datacnt--; |
|
209 |
} |
|
210 |
if (n && is_read) { |
|
211 |
pl181_fifo_push(s, value); |
|
212 |
} |
|
213 |
} |
|
214 |
s->status &= ~(PL181_STATUS_RX_FIFO | PL181_STATUS_TX_FIFO); |
|
215 |
if (s->datacnt == 0) { |
|
216 |
s->status |= PL181_STATUS_DATAEND; |
|
217 |
/* HACK: */ |
|
218 |
s->status |= PL181_STATUS_DATABLOCKEND; |
|
219 |
DPRINTF("Transfer Complete\n"); |
|
220 |
} |
|
221 |
if (s->datacnt == 0 && s->fifocnt == 0) { |
|
222 |
s->datactrl &= ~PL181_DATA_ENABLE; |
|
223 |
DPRINTF("Data engine idle\n"); |
|
224 |
} else { |
|
225 |
/* Update FIFO bits. */ |
|
226 |
bits = PL181_STATUS_TXACTIVE | PL181_STATUS_RXACTIVE; |
|
227 |
if (s->fifo_len == 0) { |
|
228 |
bits |= PL181_STATUS_TXFIFOEMPTY; |
|
229 |
bits |= PL181_STATUS_RXFIFOEMPTY; |
|
230 |
} else { |
|
231 |
bits |= PL181_STATUS_TXDATAAVLBL; |
|
232 |
bits |= PL181_STATUS_RXDATAAVLBL; |
|
233 |
} |
|
234 |
if (s->fifo_len == 16) { |
|
235 |
bits |= PL181_STATUS_TXFIFOFULL; |
|
236 |
bits |= PL181_STATUS_RXFIFOFULL; |
|
237 |
} |
|
238 |
if (s->fifo_len <= 8) { |
|
239 |
bits |= PL181_STATUS_TXFIFOHALFEMPTY; |
|
240 |
} |
|
241 |
if (s->fifo_len >= 8) { |
|
242 |
bits |= PL181_STATUS_RXFIFOHALFFULL; |
|
243 |
} |
|
244 |
if (s->datactrl & PL181_DATA_DIRECTION) { |
|
245 |
bits &= PL181_STATUS_RX_FIFO; |
|
246 |
} else { |
|
247 |
bits &= PL181_STATUS_TX_FIFO; |
|
248 |
} |
|
249 |
s->status |= bits; |
|
250 |
} |
|
251 |
} |
|
252 |
|
|
253 |
static uint32_t pl181_read(void *opaque, target_phys_addr_t offset) |
|
254 |
{ |
|
255 |
pl181_state *s = (pl181_state *)opaque; |
|
256 |
|
|
257 |
offset -= s->base; |
|
258 |
if (offset >= 0xfe0 && offset < 0x1000) { |
|
259 |
return pl181_id[(offset - 0xfe0) >> 2]; |
|
260 |
} |
|
261 |
switch (offset) { |
|
262 |
case 0x00: /* Power */ |
|
263 |
return s->power; |
|
264 |
case 0x04: /* Clock */ |
|
265 |
return s->clock; |
|
266 |
case 0x08: /* Argument */ |
|
267 |
return s->cmdarg; |
|
268 |
case 0x0c: /* Command */ |
|
269 |
return s->cmd; |
|
270 |
case 0x10: /* RespCmd */ |
|
271 |
return s->respcmd; |
|
272 |
case 0x14: /* Response0 */ |
|
273 |
return s->response[0]; |
|
274 |
case 0x18: /* Response1 */ |
|
275 |
return s->response[1]; |
|
276 |
case 0x1c: /* Response2 */ |
|
277 |
return s->response[2]; |
|
278 |
case 0x20: /* Response3 */ |
|
279 |
return s->response[3]; |
|
280 |
case 0x24: /* DataTimer */ |
|
281 |
return s->datatimer; |
|
282 |
case 0x28: /* DataLength */ |
|
283 |
return s->datalength; |
|
284 |
case 0x2c: /* DataCtrl */ |
|
285 |
return s->datactrl; |
|
286 |
case 0x30: /* DataCnt */ |
|
287 |
return s->datacnt; |
|
288 |
case 0x34: /* Status */ |
|
289 |
return s->status; |
|
290 |
case 0x3c: /* Mask0 */ |
|
291 |
return s->mask[0]; |
|
292 |
case 0x40: /* Mask1 */ |
|
293 |
return s->mask[1]; |
|
294 |
case 0x48: /* FifoCnt */ |
|
295 |
return s->fifocnt; |
|
296 |
case 0x80: case 0x84: case 0x88: case 0x8c: /* FifoData */ |
|
297 |
case 0x90: case 0x94: case 0x98: case 0x9c: |
|
298 |
case 0xa0: case 0xa4: case 0xa8: case 0xac: |
|
299 |
case 0xb0: case 0xb4: case 0xb8: case 0xbc: |
|
300 |
if (s->fifocnt == 0) { |
|
301 |
fprintf(stderr, "pl181: Unexpected FIFO read\n"); |
|
302 |
return 0; |
|
303 |
} else { |
|
304 |
uint32_t value; |
|
305 |
s->fifocnt--; |
|
306 |
value = pl181_fifo_pop(s); |
|
307 |
pl181_fifo_run(s); |
|
308 |
pl181_update(s); |
|
309 |
return value; |
|
310 |
} |
|
311 |
default: |
|
312 |
cpu_abort (cpu_single_env, "pl181_read: Bad offset %x\n", offset); |
|
313 |
return 0; |
|
314 |
} |
|
315 |
} |
|
316 |
|
|
317 |
static void pl181_write(void *opaque, target_phys_addr_t offset, |
|
318 |
uint32_t value) |
|
319 |
{ |
|
320 |
pl181_state *s = (pl181_state *)opaque; |
|
321 |
|
|
322 |
offset -= s->base; |
|
323 |
switch (offset) { |
|
324 |
case 0x00: /* Power */ |
|
325 |
s->power = value & 0xff; |
|
326 |
break; |
|
327 |
case 0x04: /* Clock */ |
|
328 |
s->clock = value & 0xff; |
|
329 |
break; |
|
330 |
case 0x08: /* Argument */ |
|
331 |
s->cmdarg = value; |
|
332 |
break; |
|
333 |
case 0x0c: /* Command */ |
|
334 |
s->cmd = value; |
|
335 |
if (s->cmd & PL181_CMD_ENABLE) { |
|
336 |
if (s->cmd & PL181_CMD_INTERRUPT) { |
|
337 |
fprintf(stderr, "pl181: Interrupt mode not implemented\n"); |
|
338 |
abort(); |
|
339 |
} if (s->cmd & PL181_CMD_PENDING) { |
|
340 |
fprintf(stderr, "pl181: Pending commands not implemented\n"); |
|
341 |
abort(); |
|
342 |
} else { |
|
343 |
pl181_send_command(s); |
|
344 |
pl181_fifo_run(s); |
|
345 |
} |
|
346 |
/* The command has completed one way or the other. */ |
|
347 |
s->cmd &= ~PL181_CMD_ENABLE; |
|
348 |
} |
|
349 |
break; |
|
350 |
case 0x24: /* DataTimer */ |
|
351 |
s->datatimer = value; |
|
352 |
break; |
|
353 |
case 0x28: /* DataLength */ |
|
354 |
s->datalength = value & 0xffff; |
|
355 |
break; |
|
356 |
case 0x2c: /* DataCtrl */ |
|
357 |
s->datactrl = value & 0xff; |
|
358 |
if (value & PL181_DATA_ENABLE) { |
|
359 |
s->datacnt = s->datalength; |
|
360 |
s->fifocnt = (s->datalength + 3) >> 2; |
|
361 |
pl181_fifo_run(s); |
|
362 |
} |
|
363 |
break; |
|
364 |
case 0x38: /* Clear */ |
|
365 |
s->status &= ~(value & 0x7ff); |
|
366 |
break; |
|
367 |
case 0x3c: /* Mask0 */ |
|
368 |
s->mask[0] = value; |
|
369 |
break; |
|
370 |
case 0x40: /* Mask1 */ |
|
371 |
s->mask[1] = value; |
|
372 |
break; |
|
373 |
case 0x80: case 0x84: case 0x88: case 0x8c: /* FifoData */ |
|
374 |
case 0x90: case 0x94: case 0x98: case 0x9c: |
|
375 |
case 0xa0: case 0xa4: case 0xa8: case 0xac: |
|
376 |
case 0xb0: case 0xb4: case 0xb8: case 0xbc: |
|
377 |
if (s->fifocnt == 0) { |
|
378 |
fprintf(stderr, "pl181: Unexpected FIFO write\n"); |
|
379 |
} else { |
|
380 |
s->fifocnt--; |
|
381 |
pl181_fifo_push(s, value); |
|
382 |
pl181_fifo_run(s); |
|
383 |
} |
|
384 |
break; |
|
385 |
default: |
|
386 |
cpu_abort (cpu_single_env, "pl181_write: Bad offset %x\n", offset); |
|
387 |
} |
|
388 |
pl181_update(s); |
|
389 |
} |
|
390 |
|
|
391 |
static CPUReadMemoryFunc *pl181_readfn[] = { |
|
392 |
pl181_read, |
|
393 |
pl181_read, |
|
394 |
pl181_read |
|
395 |
}; |
|
396 |
|
|
397 |
static CPUWriteMemoryFunc *pl181_writefn[] = { |
|
398 |
pl181_write, |
|
399 |
pl181_write, |
|
400 |
pl181_write |
|
401 |
}; |
|
402 |
|
|
403 |
static void pl181_reset(void *opaque) |
|
404 |
{ |
|
405 |
pl181_state *s = (pl181_state *)opaque; |
|
406 |
|
|
407 |
s->power = 0; |
|
408 |
s->cmdarg = 0; |
|
409 |
s->cmd = 0; |
|
410 |
s->datatimer = 0; |
|
411 |
s->datalength = 0; |
|
412 |
s->respcmd = 0; |
|
413 |
s->response[0] = 0; |
|
414 |
s->response[1] = 0; |
|
415 |
s->response[2] = 0; |
|
416 |
s->response[3] = 0; |
|
417 |
s->datatimer = 0; |
|
418 |
s->datalength = 0; |
|
419 |
s->datactrl = 0; |
|
420 |
s->datacnt = 0; |
|
421 |
s->status = 0; |
|
422 |
s->mask[0] = 0; |
|
423 |
s->mask[1] = 0; |
|
424 |
s->fifocnt = 0; |
|
425 |
} |
|
426 |
|
|
427 |
void pl181_init(uint32_t base, BlockDriverState *bd, |
|
428 |
void *pic, int irq0, int irq1) |
|
429 |
{ |
|
430 |
int iomemtype; |
|
431 |
pl181_state *s; |
|
432 |
|
|
433 |
s = (pl181_state *)qemu_mallocz(sizeof(pl181_state)); |
|
434 |
iomemtype = cpu_register_io_memory(0, pl181_readfn, |
|
435 |
pl181_writefn, s); |
|
436 |
cpu_register_physical_memory(base, 0x00000fff, iomemtype); |
|
437 |
s->base = base; |
|
438 |
s->card = sd_init(bd); |
|
439 |
s->pic = pic; |
|
440 |
s->irq[0] = irq0; |
|
441 |
s->irq[1] = irq1; |
|
442 |
qemu_register_reset(pl181_reset, s); |
|
443 |
pl181_reset(s); |
|
444 |
/* ??? Save/restore. */ |
|
445 |
} |
b/hw/realview.c | ||
---|---|---|
1 | 1 |
/* |
2 | 2 |
* ARM RealView Baseboard System emulation. |
3 | 3 |
* |
4 |
* Copyright (c) 2006 CodeSourcery. |
|
4 |
* Copyright (c) 2006-2007 CodeSourcery.
|
|
5 | 5 |
* Written by Paul Brook |
6 | 6 |
* |
7 | 7 |
* This code is licenced under the GPL. |
... | ... | |
55 | 55 |
|
56 | 56 |
pl110_init(ds, 0x10020000, pic, 23, 1); |
57 | 57 |
|
58 |
pl181_init(0x10005000, sd_bdrv, pic, 17, 18); |
|
59 |
|
|
58 | 60 |
pci_bus = pci_vpb_init(pic, 48, 1); |
59 | 61 |
if (usb_enabled) { |
60 | 62 |
usb_ohci_init_pci(pci_bus, 3, -1); |
b/hw/sd.c | ||
---|---|---|
1 |
/* |
|
2 |
* SD Memory Card emulation as defined in the "SD Memory Card Physical |
|
3 |
* layer specification, Version 1.10." |
|
4 |
* |
|
5 |
* Copyright (c) 2006 Andrzej Zaborowski <balrog@zabor.org> |
|
6 |
* Copyright (c) 2007 CodeSourcery |
|
7 |
* |
|
8 |
* Redistribution and use in source and binary forms, with or without |
|
9 |
* modification, are permitted provided that the following conditions |
|
10 |
* are met: |
|
11 |
* |
|
12 |
* 1. Redistributions of source code must retain the above copyright |
|
13 |
* notice, this list of conditions and the following disclaimer. |
|
14 |
* 2. Redistributions in binary form must reproduce the above copyright |
|
15 |
* notice, this list of conditions and the following disclaimer in |
|
16 |
* the documentation and/or other materials provided with the |
|
17 |
* distribution. |
|
18 |
* |
|
19 |
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' |
|
20 |
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, |
|
21 |
* THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A |
|
22 |
* PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR |
|
23 |
* CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, |
|
24 |
* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, |
|
25 |
* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR |
|
26 |
* PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY |
|
27 |
* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
|
28 |
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE |
|
29 |
* OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
30 |
*/ |
|
31 |
|
|
32 |
#include "sd.h" |
|
33 |
|
|
34 |
//#define DEBUG_SD 1 |
|
35 |
|
|
36 |
#ifdef DEBUG_SD |
|
37 |
#define DPRINTF(fmt, args...) \ |
|
38 |
do { printf("SD: " fmt , ##args); } while (0) |
|
39 |
#else |
|
40 |
#define DPRINTF(fmt, args...) do {} while(0) |
|
41 |
#endif |
|
42 |
|
|
43 |
typedef enum { |
|
44 |
sd_r0 = 0, /* no response */ |
|
45 |
sd_r1, /* normal response command */ |
|
46 |
sd_r2_i, /* CID register */ |
|
47 |
sd_r2_s, /* CSD register */ |
|
48 |
sd_r3, /* OCR register */ |
|
49 |
sd_r6 = 6, /* Published RCA response */ |
|
50 |
sd_r1b = -1, |
|
51 |
} sd_rsp_type_t; |
|
52 |
|
|
53 |
struct SDState { |
|
54 |
enum { |
|
55 |
sd_inactive, |
|
56 |
sd_card_identification_mode, |
|
57 |
sd_data_transfer_mode, |
|
58 |
} mode; |
|
59 |
enum { |
|
60 |
sd_inactive_state = -1, |
|
61 |
sd_idle_state = 0, |
|
62 |
sd_ready_state, |
|
63 |
sd_identification_state, |
|
64 |
sd_standby_state, |
|
65 |
sd_transfer_state, |
|
66 |
sd_sendingdata_state, |
|
67 |
sd_receivingdata_state, |
|
68 |
sd_programming_state, |
|
69 |
sd_disconnect_state, |
|
70 |
} state; |
|
71 |
uint32_t ocr; |
|
72 |
uint8_t scr[8]; |
|
73 |
uint8_t cid[16]; |
|
74 |
uint8_t csd[16]; |
|
75 |
uint16_t rca; |
|
76 |
uint32_t card_status; |
|
77 |
uint8_t sd_status[64]; |
|
78 |
int wp_switch; |
|
79 |
int *wp_groups; |
|
80 |
uint32_t size; |
|
81 |
int blk_len; |
|
82 |
uint32_t erase_start; |
|
83 |
uint32_t erase_end; |
|
84 |
uint8_t pwd[16]; |
|
85 |
int pwd_len; |
|
86 |
int function_group[6]; |
|
87 |
|
|
88 |
int current_cmd; |
|
89 |
int blk_written; |
|
90 |
uint32_t data_start; |
|
91 |
uint32_t data_offset; |
|
92 |
uint8_t data[512]; |
|
93 |
void (*readonly_cb)(void *, int); |
|
94 |
void (*inserted_cb)(void *, int); |
|
95 |
void *opaque; |
|
96 |
BlockDriverState *bdrv; |
|
97 |
}; |
|
98 |
|
|
99 |
static void sd_set_status(SDState *sd) |
|
100 |
{ |
|
101 |
switch (sd->state) { |
|
102 |
case sd_inactive_state: |
|
103 |
sd->mode = sd_inactive; |
|
104 |
break; |
|
105 |
|
|
106 |
case sd_idle_state: |
|
107 |
case sd_ready_state: |
|
108 |
case sd_identification_state: |
|
109 |
sd->mode = sd_card_identification_mode; |
|
110 |
break; |
|
111 |
|
|
112 |
case sd_standby_state: |
|
113 |
case sd_transfer_state: |
|
114 |
case sd_sendingdata_state: |
|
115 |
case sd_receivingdata_state: |
|
116 |
case sd_programming_state: |
|
117 |
case sd_disconnect_state: |
|
118 |
sd->mode = sd_data_transfer_mode; |
|
119 |
break; |
|
120 |
} |
|
121 |
|
|
122 |
sd->card_status &= ~CURRENT_STATE; |
|
123 |
sd->card_status |= sd->state << 9; |
|
124 |
} |
|
125 |
|
|
126 |
const sd_cmd_type_t sd_cmd_type[64] = { |
|
127 |
sd_bc, sd_none, sd_bcr, sd_bcr, sd_none, sd_none, sd_none, sd_ac, |
|
128 |
sd_none, sd_ac, sd_ac, sd_adtc, sd_ac, sd_ac, sd_none, sd_ac, |
|
129 |
sd_ac, sd_adtc, sd_adtc, sd_none, sd_none, sd_none, sd_none, sd_none, |
|
130 |
sd_adtc, sd_adtc, sd_adtc, sd_adtc, sd_ac, sd_ac, sd_adtc, sd_none, |
|
131 |
sd_ac, sd_ac, sd_none, sd_none, sd_none, sd_none, sd_ac, sd_none, |
|
132 |
sd_none, sd_none, sd_bc, sd_none, sd_none, sd_none, sd_none, sd_none, |
|
133 |
sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_ac, |
|
134 |
sd_adtc, sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, |
|
135 |
}; |
|
136 |
|
|
137 |
const sd_cmd_type_t sd_acmd_type[64] = { |
|
138 |
sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_ac, sd_none, |
|
139 |
sd_none, sd_none, sd_none, sd_none, sd_none, sd_adtc, sd_none, sd_none, |
|
140 |
sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_adtc, sd_ac, |
|
141 |
sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, |
|
142 |
sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, |
|
143 |
sd_none, sd_bcr, sd_ac, sd_none, sd_none, sd_none, sd_none, sd_none, |
|
144 |
sd_none, sd_none, sd_none, sd_adtc, sd_none, sd_none, sd_none, sd_none, |
|
145 |
sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, sd_none, |
|
146 |
}; |
|
147 |
|
|
148 |
static const int sd_cmd_class[64] = { |
|
149 |
0, 0, 0, 0, 0, 9, 10, 0, 0, 0, 0, 1, 0, 0, 0, 0, |
|
150 |
2, 2, 2, 2, 3, 3, 3, 3, 4, 4, 4, 4, 6, 6, 6, 6, |
|
151 |
5, 5, 10, 10, 10, 10, 5, 9, 9, 9, 7, 7, 7, 7, 7, 7, |
|
152 |
7, 7, 10, 7, 9, 9, 9, 8, 8, 10, 8, 8, 8, 8, 8, 8, |
|
153 |
}; |
|
154 |
|
|
155 |
static uint8_t sd_crc7(void *message, size_t width) |
|
156 |
{ |
|
157 |
int i, bit; |
|
158 |
uint8_t shift_reg = 0x00; |
|
159 |
uint8_t *msg = (uint8_t *) message; |
|
160 |
|
|
161 |
for (i = 0; i < width; i ++, msg ++) |
|
162 |
for (bit = 7; bit >= 0; bit --) { |
|
163 |
shift_reg <<= 1; |
|
164 |
if ((shift_reg >> 7) ^ ((*msg >> bit) & 1)) |
|
165 |
shift_reg ^= 0x89; |
|
166 |
} |
|
167 |
|
|
168 |
return shift_reg; |
|
169 |
} |
|
170 |
|
|
171 |
static uint16_t sd_crc16(void *message, size_t width) |
|
172 |
{ |
|
173 |
int i, bit; |
|
174 |
uint16_t shift_reg = 0x0000; |
|
175 |
uint16_t *msg = (uint16_t *) message; |
|
176 |
width <<= 1; |
|
177 |
|
|
178 |
for (i = 0; i < width; i ++, msg ++) |
|
179 |
for (bit = 15; bit >= 0; bit --) { |
|
180 |
shift_reg <<= 1; |
|
181 |
if ((shift_reg >> 15) ^ ((*msg >> bit) & 1)) |
|
182 |
shift_reg ^= 0x1011; |
|
183 |
} |
|
184 |
|
|
185 |
return shift_reg; |
|
186 |
} |
|
187 |
|
|
188 |
static void sd_set_ocr(SDState *sd) |
|
189 |
{ |
|
190 |
sd->ocr = 0x80fffff0; |
|
191 |
} |
|
192 |
|
|
193 |
static void sd_set_scr(SDState *sd) |
|
194 |
{ |
|
195 |
sd->scr[0] = 0x00; /* SCR Structure */ |
|
196 |
sd->scr[1] = 0x2f; /* SD Security Support */ |
|
197 |
sd->scr[2] = 0x00; |
|
198 |
sd->scr[3] = 0x00; |
|
199 |
sd->scr[4] = 0x00; |
|
200 |
sd->scr[5] = 0x00; |
|
201 |
sd->scr[6] = 0x00; |
|
202 |
sd->scr[7] = 0x00; |
|
203 |
} |
|
204 |
|
|
205 |
#define MID 0xaa |
|
206 |
#define OID "XY" |
|
207 |
#define PNM "QEMU!" |
|
208 |
#define PRV 0x01 |
|
209 |
#define MDT_YR 2006 |
|
210 |
#define MDT_MON 2 |
|
211 |
|
|
212 |
static void sd_set_cid(SDState *sd) |
|
213 |
{ |
|
214 |
sd->cid[0] = MID; /* Fake card manufacturer ID (MID) */ |
|
215 |
sd->cid[1] = OID[0]; /* OEM/Application ID (OID) */ |
|
216 |
sd->cid[2] = OID[1]; |
|
217 |
sd->cid[3] = PNM[0]; /* Fake product name (PNM) */ |
|
218 |
sd->cid[4] = PNM[1]; |
|
219 |
sd->cid[5] = PNM[2]; |
|
220 |
sd->cid[6] = PNM[3]; |
|
221 |
sd->cid[7] = PNM[4]; |
|
222 |
sd->cid[8] = PRV; /* Fake product revision (PRV) */ |
|
223 |
sd->cid[9] = 0xde; /* Fake serial number (PSN) */ |
|
224 |
sd->cid[10] = 0xad; |
|
225 |
sd->cid[11] = 0xbe; |
|
226 |
sd->cid[12] = 0xef; |
|
227 |
sd->cid[13] = 0x00 | /* Manufacture date (MDT) */ |
|
228 |
((MDT_YR - 2000) / 10); |
|
229 |
sd->cid[14] = ((MDT_YR % 10) << 4) | MDT_MON; |
|
230 |
sd->cid[15] = (sd_crc7(sd->cid, 15) << 1) | 1; |
|
231 |
} |
|
232 |
|
|
233 |
#define HWBLOCK_SHIFT 9 /* 512 bytes */ |
|
234 |
#define SECTOR_SHIFT 5 /* 16 kilobytes */ |
|
235 |
#define WPGROUP_SHIFT 7 /* 2 megs */ |
|
236 |
#define CMULT_SHIFT 9 /* 512 times HWBLOCK_SIZE */ |
|
237 |
#define BLOCK_SIZE (1 << (HWBLOCK_SHIFT)) |
|
238 |
#define SECTOR_SIZE (1 << (HWBLOCK_SHIFT + SECTOR_SHIFT)) |
|
239 |
#define WPGROUP_SIZE (1 << (HWBLOCK_SHIFT + SECTOR_SHIFT + WPGROUP_SHIFT)) |
|
240 |
|
|
241 |
static const uint8_t sd_csd_rw_mask[16] = { |
|
242 |
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
243 |
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xfc, 0xfe, |
|
244 |
}; |
|
245 |
|
|
246 |
static void sd_set_csd(SDState *sd, uint32_t size) |
|
247 |
{ |
|
248 |
uint32_t csize = (size >> (CMULT_SHIFT + HWBLOCK_SHIFT)) - 1; |
|
249 |
uint32_t sectsize = (1 << (SECTOR_SHIFT + 1)) - 1; |
|
250 |
uint32_t wpsize = (1 << (WPGROUP_SHIFT + 1)) - 1; |
|
251 |
|
|
252 |
sd->csd[0] = 0x00; /* CSD structure */ |
|
253 |
sd->csd[1] = 0x26; /* Data read access-time-1 */ |
|
254 |
sd->csd[2] = 0x00; /* Data read access-time-2 */ |
|
255 |
sd->csd[3] = 0x5a; /* Max. data transfer rate */ |
|
256 |
sd->csd[4] = 0x5f; /* Card Command Classes */ |
|
257 |
sd->csd[5] = 0x50 | /* Max. read data block length */ |
|
258 |
HWBLOCK_SHIFT; |
|
259 |
sd->csd[6] = 0xe0 | /* Partial block for read allowed */ |
|
260 |
((csize >> 10) & 0x03); |
|
261 |
sd->csd[7] = 0x00 | /* Device size */ |
|
262 |
((csize >> 2) & 0xff); |
|
263 |
sd->csd[8] = 0x3f | /* Max. read current */ |
|
264 |
((csize << 6) & 0xc0); |
|
265 |
sd->csd[9] = 0xfc | /* Max. write current */ |
|
266 |
((CMULT_SHIFT - 2) >> 1); |
|
267 |
sd->csd[10] = 0x40 | /* Erase sector size */ |
|
268 |
(((CMULT_SHIFT - 2) << 7) & 0x80) | (sectsize >> 1); |
|
269 |
sd->csd[11] = 0x00 | /* Write protect group size */ |
|
270 |
((sectsize << 7) & 0x80) | wpsize; |
|
271 |
sd->csd[12] = 0x90 | /* Write speed factor */ |
|
272 |
(HWBLOCK_SHIFT >> 2); |
|
273 |
sd->csd[13] = 0x20 | /* Max. write data block length */ |
|
274 |
((HWBLOCK_SHIFT << 6) & 0xc0); |
|
275 |
sd->csd[14] = 0x00; /* File format group */ |
|
276 |
sd->csd[15] = (sd_crc7(sd->csd, 15) << 1) | 1; |
|
277 |
} |
|
278 |
|
|
279 |
static void sd_set_rca(SDState *sd) |
|
280 |
{ |
|
281 |
sd->rca += 0x4567; |
|
282 |
} |
|
283 |
|
|
284 |
#define CARD_STATUS_A 0x02004100 |
|
285 |
#define CARD_STATUS_B 0x00c01e00 |
|
286 |
#define CARD_STATUS_C 0xfd39a028 |
|
287 |
|
|
288 |
static void sd_set_cardstatus(SDState *sd) |
|
289 |
{ |
|
290 |
sd->card_status = 0x00000100; |
|
291 |
} |
|
292 |
|
|
293 |
static void sd_set_sdstatus(SDState *sd) |
|
294 |
{ |
|
295 |
memset(sd->sd_status, 0, 64); |
|
296 |
} |
|
297 |
|
|
298 |
static int sd_req_crc_validate(struct sd_request_s *req) |
|
299 |
{ |
|
300 |
uint8_t buffer[5]; |
|
301 |
buffer[0] = 0x40 | req->cmd; |
|
302 |
buffer[1] = (req->arg >> 24) & 0xff; |
|
303 |
buffer[2] = (req->arg >> 16) & 0xff; |
|
304 |
buffer[3] = (req->arg >> 8) & 0xff; |
|
305 |
buffer[4] = (req->arg >> 0) & 0xff; |
|
306 |
return 0; |
|
307 |
return sd_crc7(buffer, 5) != req->crc; /* TODO */ |
|
308 |
} |
|
309 |
|
|
310 |
void sd_response_r1_make(SDState *sd, |
|
311 |
uint8_t *response, uint32_t last_status) |
|
312 |
{ |
|
313 |
uint32_t mask = CARD_STATUS_B ^ ILLEGAL_COMMAND; |
|
314 |
uint32_t status; |
|
315 |
|
|
316 |
status = (sd->card_status & ~mask) | (last_status & mask); |
|
317 |
sd->card_status &= ~CARD_STATUS_C | APP_CMD; |
|
318 |
|
|
319 |
response[0] = (status >> 24) & 0xff; |
|
320 |
response[1] = (status >> 16) & 0xff; |
|
321 |
response[2] = (status >> 8) & 0xff; |
|
322 |
response[3] = (status >> 0) & 0xff; |
|
323 |
} |
|
324 |
|
|
325 |
void sd_response_r3_make(SDState *sd, uint8_t *response) |
|
326 |
{ |
|
327 |
response[0] = (sd->ocr >> 24) & 0xff; |
|
328 |
response[1] = (sd->ocr >> 16) & 0xff; |
|
329 |
response[2] = (sd->ocr >> 8) & 0xff; |
|
330 |
response[3] = (sd->ocr >> 0) & 0xff; |
|
331 |
} |
|
332 |
|
|
333 |
void sd_response_r6_make(SDState *sd, uint8_t *response) |
|
334 |
{ |
|
335 |
uint16_t arg; |
|
336 |
uint16_t status; |
|
337 |
|
|
338 |
arg = sd->rca; |
|
339 |
status = ((sd->card_status >> 8) & 0xc000) | |
|
340 |
((sd->card_status >> 6) & 0x2000) | |
|
341 |
(sd->card_status & 0x1fff); |
|
342 |
|
|
343 |
response[0] = (arg >> 8) & 0xff; |
|
344 |
response[1] = arg & 0xff; |
|
345 |
response[2] = (status >> 8) & 0xff; |
|
346 |
response[3] = status & 0xff; |
|
347 |
} |
|
348 |
|
|
349 |
static void sd_reset(SDState *sd, BlockDriverState *bdrv) |
|
350 |
{ |
|
351 |
uint32_t size; |
|
352 |
uint64_t sect; |
|
353 |
|
|
354 |
bdrv_get_geometry(bdrv, §); |
|
355 |
sect <<= 9; |
|
356 |
|
|
357 |
if (sect > 0x40000000) |
|
358 |
size = 0x40000000; /* 1 gig */ |
|
359 |
else |
|
360 |
size = sect + 1; |
|
361 |
|
|
362 |
sect = (size >> (HWBLOCK_SHIFT + SECTOR_SHIFT + WPGROUP_SHIFT)) + 1; |
|
363 |
|
|
364 |
sd->state = sd_idle_state; |
|
365 |
sd->rca = 0x0000; |
|
366 |
sd_set_ocr(sd); |
|
367 |
sd_set_scr(sd); |
|
368 |
sd_set_cid(sd); |
|
369 |
sd_set_csd(sd, size); |
|
370 |
sd_set_cardstatus(sd); |
|
371 |
sd_set_sdstatus(sd); |
|
372 |
|
|
373 |
sd->bdrv = bdrv; |
|
374 |
|
|
375 |
sd->wp_switch = bdrv_is_read_only(bdrv); |
|
376 |
sd->wp_groups = (int *) qemu_mallocz(sizeof(int) * sect); |
|
377 |
memset(sd->wp_groups, 0, sizeof(int) * sect); |
|
378 |
memset(sd->function_group, 0, sizeof(int) * 6); |
|
379 |
sd->erase_start = 0; |
|
380 |
sd->erase_end = 0; |
|
381 |
sd->size = size; |
|
382 |
sd->blk_len = 0x200; |
|
383 |
sd->pwd_len = 0; |
|
384 |
} |
|
385 |
|
|
386 |
static void sd_cardchange(void *opaque) |
|
387 |
{ |
|
388 |
SDState *sd = opaque; |
|
389 |
if (sd->inserted_cb) |
|
390 |
sd->inserted_cb(sd->opaque, bdrv_is_inserted(sd->bdrv)); |
|
391 |
if (bdrv_is_inserted(sd->bdrv)) { |
|
392 |
sd_reset(sd, sd->bdrv); |
|
393 |
if (sd->readonly_cb) |
|
394 |
sd->readonly_cb(sd->opaque, sd->wp_switch); |
|
395 |
} |
|
396 |
} |
|
397 |
|
|
398 |
SDState *sd_init(BlockDriverState *bs) |
|
399 |
{ |
|
400 |
SDState *sd; |
|
401 |
|
|
402 |
sd = (SDState *) qemu_mallocz(sizeof(SDState)); |
|
403 |
sd_reset(sd, bs); |
|
404 |
return sd; |
|
405 |
} |
|
406 |
|
|
407 |
void sd_set_cb(SDState *sd, void *opaque, |
|
408 |
void (*readonly_cb)(void *, int), |
|
409 |
void (*inserted_cb)(void *, int)) |
|
410 |
{ |
|
411 |
sd->opaque = opaque; |
|
412 |
sd->readonly_cb = readonly_cb; |
|
413 |
sd->inserted_cb = inserted_cb; |
|
414 |
if (sd->readonly_cb) |
|
415 |
sd->readonly_cb(sd->opaque, bdrv_is_read_only(sd->bdrv)); |
|
416 |
if (sd->inserted_cb) |
|
417 |
sd->inserted_cb(sd->opaque, bdrv_is_inserted(sd->bdrv)); |
|
418 |
bdrv_set_change_cb(sd->bdrv, sd_cardchange, sd); |
|
419 |
} |
|
420 |
|
|
421 |
static void sd_erase(SDState *sd) |
|
422 |
{ |
|
423 |
int i, start, end; |
|
424 |
if (!sd->erase_start || !sd->erase_end) { |
|
425 |
sd->card_status |= ERASE_SEQ_ERROR; |
|
426 |
return; |
|
427 |
} |
|
428 |
|
|
429 |
start = sd->erase_start >> |
|
430 |
(HWBLOCK_SHIFT + SECTOR_SHIFT + WPGROUP_SHIFT); |
|
431 |
end = sd->erase_end >> |
|
432 |
(HWBLOCK_SHIFT + SECTOR_SHIFT + WPGROUP_SHIFT); |
|
433 |
sd->erase_start = 0; |
|
434 |
sd->erase_end = 0; |
|
435 |
sd->csd[14] |= 0x40; |
|
436 |
|
|
437 |
for (i = start; i <= end; i ++) |
|
438 |
if (sd->wp_groups[i]) |
|
439 |
sd->card_status |= WP_ERASE_SKIP; |
|
440 |
} |
|
441 |
|
|
442 |
static uint32_t sd_wpbits(SDState *sd, uint32_t addr) |
|
443 |
{ |
|
444 |
uint32_t i, wpnum; |
|
445 |
uint32_t ret = 0; |
|
446 |
|
|
447 |
wpnum = addr >> (HWBLOCK_SHIFT + SECTOR_SHIFT + WPGROUP_SHIFT); |
|
448 |
|
|
449 |
for (i = 0; i < 32; i ++, wpnum ++, addr += WPGROUP_SIZE) |
|
450 |
if (addr < sd->size && sd->wp_groups[wpnum]) |
|
451 |
ret |= (1 << i); |
|
452 |
|
|
453 |
return ret; |
|
454 |
} |
|
455 |
|
|
456 |
static void sd_function_switch(SDState *sd, uint32_t arg) |
|
457 |
{ |
|
458 |
int i, mode, new_func, crc; |
|
459 |
mode = !!(arg & 0x80000000); |
|
460 |
|
|
461 |
sd->data[0] = 0x00; /* Maximum current consumption */ |
|
462 |
sd->data[1] = 0x01; |
|
463 |
sd->data[2] = 0x80; /* Supported group 6 functions */ |
|
464 |
sd->data[3] = 0x01; |
|
465 |
sd->data[4] = 0x80; /* Supported group 5 functions */ |
|
466 |
sd->data[5] = 0x01; |
|
467 |
sd->data[6] = 0x80; /* Supported group 4 functions */ |
|
468 |
sd->data[7] = 0x01; |
|
469 |
sd->data[8] = 0x80; /* Supported group 3 functions */ |
|
470 |
sd->data[9] = 0x01; |
|
471 |
sd->data[10] = 0x80; /* Supported group 2 functions */ |
|
472 |
sd->data[11] = 0x43; |
|
473 |
sd->data[12] = 0x80; /* Supported group 1 functions */ |
|
474 |
sd->data[13] = 0x03; |
|
475 |
for (i = 0; i < 6; i ++) { |
|
476 |
new_func = (arg >> (i * 4)) & 0x0f; |
|
477 |
if (mode && new_func != 0x0f) |
|
478 |
sd->function_group[i] = new_func; |
|
479 |
sd->data[14 + (i >> 1)] = new_func << ((i * 4) & 4); |
|
480 |
} |
|
481 |
memset(&sd->data[17], 0, 47); |
|
482 |
crc = sd_crc16(sd->data, 64); |
|
483 |
sd->data[65] = crc >> 8; |
|
484 |
sd->data[66] = crc & 0xff; |
|
485 |
} |
|
486 |
|
|
487 |
static inline int sd_wp_addr(SDState *sd, uint32_t addr) |
|
488 |
{ |
|
489 |
return sd->wp_groups[addr >> |
|
490 |
(HWBLOCK_SHIFT + SECTOR_SHIFT + WPGROUP_SHIFT)]; |
|
491 |
} |
|
492 |
|
|
493 |
static void sd_lock_command(SDState *sd) |
|
494 |
{ |
|
495 |
int erase, lock, clr_pwd, set_pwd, pwd_len; |
|
496 |
erase = !!(sd->data[0] & 0x08); |
|
497 |
lock = sd->data[0] & 0x04; |
|
498 |
clr_pwd = sd->data[0] & 0x02; |
|
499 |
set_pwd = sd->data[0] & 0x01; |
|
500 |
|
|
501 |
if (sd->blk_len > 1) |
|
502 |
pwd_len = sd->data[1]; |
|
503 |
else |
|
504 |
pwd_len = 0; |
|
505 |
|
|
506 |
if (erase) { |
|
507 |
if (!(sd->card_status & CARD_IS_LOCKED) || sd->blk_len > 1 || |
|
508 |
set_pwd || clr_pwd || lock || sd->wp_switch || |
|
509 |
(sd->csd[14] & 0x20)) { |
|
510 |
sd->card_status |= LOCK_UNLOCK_FAILED; |
|
511 |
return; |
|
512 |
} |
|
513 |
memset(sd->wp_groups, 0, sizeof(int) * (sd->size >> |
|
514 |
(HWBLOCK_SHIFT + SECTOR_SHIFT + WPGROUP_SHIFT))); |
|
515 |
sd->csd[14] &= ~0x10; |
|
516 |
sd->card_status &= ~CARD_IS_LOCKED; |
|
517 |
sd->pwd_len = 0; |
|
518 |
/* Erasing the entire card here! */ |
|
519 |
printf("SD: Card force-erased by CMD42\n"); |
|
520 |
return; |
|
521 |
} |
|
522 |
|
|
523 |
if (sd->blk_len < 2 + pwd_len || |
|
524 |
pwd_len <= sd->pwd_len || |
|
525 |
pwd_len > sd->pwd_len + 16) { |
|
526 |
sd->card_status |= LOCK_UNLOCK_FAILED; |
|
527 |
return; |
|
528 |
} |
|
529 |
|
|
530 |
if (sd->pwd_len && memcmp(sd->pwd, sd->data + 2, sd->pwd_len)) { |
|
531 |
sd->card_status |= LOCK_UNLOCK_FAILED; |
|
532 |
return; |
|
533 |
} |
|
534 |
|
|
535 |
pwd_len -= sd->pwd_len; |
|
536 |
if ((pwd_len && !set_pwd) || |
|
537 |
(clr_pwd && (set_pwd || lock)) || |
|
538 |
(lock && !sd->pwd_len && !set_pwd) || |
|
539 |
(!set_pwd && !clr_pwd && |
|
540 |
(((sd->card_status & CARD_IS_LOCKED) && lock) || |
|
541 |
(!(sd->card_status & CARD_IS_LOCKED) && !lock)))) { |
|
542 |
sd->card_status |= LOCK_UNLOCK_FAILED; |
|
543 |
return; |
|
544 |
} |
|
545 |
|
|
546 |
if (set_pwd) { |
|
547 |
memcpy(sd->pwd, sd->data + 2 + sd->pwd_len, pwd_len); |
|
548 |
sd->pwd_len = pwd_len; |
|
549 |
} |
|
550 |
|
|
551 |
if (clr_pwd) { |
|
552 |
sd->pwd_len = 0; |
|
553 |
} |
|
554 |
|
|
555 |
if (lock) |
|
556 |
sd->card_status |= CARD_IS_LOCKED; |
|
557 |
else |
|
558 |
sd->card_status &= ~CARD_IS_LOCKED; |
|
559 |
} |
|
560 |
|
|
561 |
static sd_rsp_type_t sd_normal_command(SDState *sd, |
|
562 |
struct sd_request_s req) |
|
563 |
{ |
|
564 |
uint32_t rca = 0x0000; |
|
565 |
|
|
566 |
if (sd_cmd_type[req.cmd] == sd_ac || sd_cmd_type[req.cmd] == sd_adtc) |
|
567 |
rca = req.arg >> 16; |
|
568 |
|
|
569 |
DPRINTF("CMD%d 0x%08x state %d\n", req.cmd, req.arg, sd->state); |
|
570 |
switch (req.cmd) { |
|
571 |
/* Basic commands (Class 0 and Class 1) */ |
|
572 |
case 0: /* CMD0: GO_IDLE_STATE */ |
|
573 |
switch (sd->state) { |
|
574 |
case sd_inactive_state: |
|
575 |
return sd_r0; |
|
576 |
|
|
577 |
default: |
|
578 |
sd->state = sd_idle_state; |
|
579 |
sd_reset(sd, sd->bdrv); |
|
580 |
return sd_r0; |
|
581 |
} |
|
582 |
break; |
|
583 |
|
|
584 |
case 2: /* CMD2: ALL_SEND_CID */ |
|
585 |
switch (sd->state) { |
|
586 |
case sd_ready_state: |
|
587 |
sd->state = sd_identification_state; |
|
588 |
return sd_r2_i; |
|
589 |
|
|
590 |
default: |
|
591 |
break; |
|
592 |
} |
|
593 |
break; |
|
594 |
|
|
595 |
case 3: /* CMD3: SEND_RELATIVE_ADDR */ |
|
596 |
switch (sd->state) { |
|
597 |
case sd_identification_state: |
|
598 |
case sd_standby_state: |
|
599 |
sd->state = sd_standby_state; |
|
600 |
sd_set_rca(sd); |
|
601 |
return sd_r6; |
|
602 |
|
|
603 |
default: |
|
604 |
break; |
|
605 |
} |
|
606 |
break; |
|
607 |
|
|
608 |
case 4: /* CMD4: SEND_DSR */ |
|
609 |
switch (sd->state) { |
|
610 |
case sd_standby_state: |
|
611 |
break; |
|
612 |
|
|
613 |
default: |
|
614 |
break; |
|
615 |
} |
|
616 |
break; |
|
617 |
|
|
618 |
case 6: /* CMD6: SWITCH_FUNCTION */ |
|
619 |
switch (sd->mode) { |
|
620 |
case sd_data_transfer_mode: |
|
621 |
sd_function_switch(sd, req.arg); |
|
622 |
sd->state = sd_sendingdata_state; |
|
623 |
sd->data_start = 0; |
|
624 |
sd->data_offset = 0; |
|
625 |
return sd_r1; |
|
626 |
|
|
627 |
default: |
|
628 |
break; |
|
629 |
} |
|
630 |
break; |
|
631 |
|
|
632 |
case 7: /* CMD7: SELECT/DESELECT_CARD */ |
|
633 |
switch (sd->state) { |
|
634 |
case sd_standby_state: |
|
635 |
if (sd->rca != rca) |
|
636 |
return sd_r0; |
|
637 |
|
|
638 |
sd->state = sd_transfer_state; |
|
639 |
return sd_r1b; |
|
640 |
|
|
641 |
case sd_transfer_state: |
|
642 |
case sd_sendingdata_state: |
|
643 |
if (sd->rca == rca) |
|
644 |
break; |
|
645 |
|
|
646 |
sd->state = sd_standby_state; |
|
647 |
return sd_r1b; |
|
648 |
|
|
649 |
case sd_disconnect_state: |
|
650 |
if (sd->rca != rca) |
|
651 |
return sd_r0; |
|
652 |
|
|
653 |
sd->state = sd_programming_state; |
|
654 |
return sd_r1b; |
|
655 |
|
|
656 |
case sd_programming_state: |
|
657 |
if (sd->rca == rca) |
|
658 |
break; |
|
659 |
|
|
660 |
sd->state = sd_disconnect_state; |
|
661 |
return sd_r1b; |
|
662 |
|
|
663 |
default: |
|
664 |
break; |
|
665 |
} |
|
666 |
break; |
|
667 |
|
|
668 |
case 9: /* CMD9: SEND_CSD */ |
|
669 |
switch (sd->state) { |
|
670 |
case sd_standby_state: |
|
671 |
if (sd->rca != rca) |
|
672 |
return sd_r0; |
|
673 |
|
|
674 |
return sd_r2_s; |
|
675 |
|
|
676 |
default: |
|
677 |
break; |
|
678 |
} |
|
679 |
break; |
|
680 |
|
|
681 |
case 10: /* CMD10: SEND_CID */ |
|
682 |
switch (sd->state) { |
|
683 |
case sd_standby_state: |
|
684 |
if (sd->rca != rca) |
|
685 |
return sd_r0; |
|
686 |
|
|
687 |
return sd_r2_i; |
|
688 |
|
|
689 |
default: |
|
690 |
break; |
|
691 |
} |
|
692 |
break; |
|
693 |
|
|
694 |
case 11: /* CMD11: READ_DAT_UNTIL_STOP */ |
|
695 |
switch (sd->state) { |
|
696 |
case sd_transfer_state: |
|
697 |
sd->state = sd_sendingdata_state; |
|
698 |
sd->data_start = req.arg; |
|
699 |
sd->data_offset = 0; |
|
700 |
|
|
701 |
if (sd->data_start + sd->blk_len > sd->size) |
|
702 |
sd->card_status |= ADDRESS_ERROR; |
|
703 |
return sd_r0; |
|
704 |
|
|
705 |
default: |
|
706 |
break; |
|
707 |
} |
|
708 |
break; |
|
709 |
|
|
710 |
case 12: /* CMD12: STOP_TRANSMISSION */ |
|
711 |
switch (sd->state) { |
|
712 |
case sd_sendingdata_state: |
|
713 |
sd->state = sd_transfer_state; |
|
714 |
return sd_r1b; |
|
715 |
|
|
716 |
case sd_receivingdata_state: |
|
717 |
sd->state = sd_programming_state; |
|
718 |
/* Bzzzzzzztt .... Operation complete. */ |
|
719 |
sd->state = sd_transfer_state; |
|
720 |
return sd_r1b; |
|
721 |
|
|
722 |
default: |
|
723 |
break; |
|
724 |
} |
|
725 |
break; |
|
726 |
|
|
727 |
case 13: /* CMD13: SEND_STATUS */ |
|
728 |
switch (sd->mode) { |
|
729 |
case sd_data_transfer_mode: |
|
730 |
if (sd->rca != rca) |
|
731 |
return sd_r0; |
|
732 |
|
|
733 |
return sd_r1; |
|
734 |
|
|
735 |
default: |
|
736 |
break; |
|
737 |
} |
|
738 |
break; |
|
739 |
|
|
740 |
case 15: /* CMD15: GO_INACTIVE_STATE */ |
|
741 |
switch (sd->mode) { |
|
742 |
case sd_data_transfer_mode: |
|
743 |
if (sd->rca != rca) |
|
744 |
return sd_r0; |
|
745 |
|
|
746 |
sd->state = sd_inactive_state; |
|
747 |
return sd_r0; |
|
748 |
|
|
749 |
default: |
|
750 |
break; |
|
751 |
} |
|
752 |
break; |
|
753 |
|
|
754 |
/* Block read commands (Classs 2) */ |
|
755 |
case 16: /* CMD16: SET_BLOCKLEN */ |
|
756 |
switch (sd->state) { |
|
757 |
case sd_transfer_state: |
|
758 |
if (req.arg > (1 << HWBLOCK_SHIFT)) |
|
759 |
sd->card_status |= BLOCK_LEN_ERROR; |
|
760 |
else |
|
761 |
sd->blk_len = req.arg; |
|
762 |
|
|
763 |
return sd_r1; |
|
764 |
|
|
765 |
default: |
|
766 |
break; |
|
767 |
} |
|
768 |
break; |
|
769 |
|
|
770 |
case 17: /* CMD17: READ_SINGLE_BLOCK */ |
|
771 |
switch (sd->state) { |
|
772 |
case sd_transfer_state: |
|
773 |
sd->state = sd_sendingdata_state; |
|
774 |
sd->data_start = req.arg; |
|
775 |
sd->data_offset = 0; |
|
776 |
|
|
777 |
if (sd->data_start + sd->blk_len > sd->size) |
|
778 |
sd->card_status |= ADDRESS_ERROR; |
|
779 |
return sd_r1; |
|
780 |
|
|
781 |
default: |
|
782 |
break; |
|
783 |
} |
|
784 |
break; |
|
785 |
|
|
786 |
case 18: /* CMD18: READ_MULTIPLE_BLOCK */ |
|
787 |
switch (sd->state) { |
|
788 |
case sd_transfer_state: |
|
789 |
sd->state = sd_sendingdata_state; |
|
790 |
sd->data_start = req.arg; |
|
791 |
sd->data_offset = 0; |
|
792 |
|
|
793 |
if (sd->data_start + sd->blk_len > sd->size) |
|
794 |
sd->card_status |= ADDRESS_ERROR; |
|
795 |
return sd_r1; |
|
796 |
|
|
797 |
default: |
|
798 |
break; |
|
799 |
} |
|
800 |
break; |
|
801 |
|
|
802 |
/* Block write commands (Class 4) */ |
|
803 |
case 24: /* CMD24: WRITE_SINGLE_BLOCK */ |
|
804 |
switch (sd->state) { |
|
805 |
case sd_transfer_state: |
|
806 |
sd->state = sd_receivingdata_state; |
|
807 |
sd->data_start = req.arg; |
|
808 |
sd->data_offset = 0; |
|
809 |
sd->blk_written = 0; |
|
810 |
|
|
811 |
if (sd->data_start + sd->blk_len > sd->size) |
|
812 |
sd->card_status |= ADDRESS_ERROR; |
|
813 |
if (sd_wp_addr(sd, sd->data_start)) |
|
814 |
sd->card_status |= WP_VIOLATION; |
|
815 |
if (sd->csd[14] & 0x30) |
|
816 |
sd->card_status |= WP_VIOLATION; |
|
817 |
return sd_r1; |
|
818 |
|
|
819 |
default: |
|
820 |
break; |
|
821 |
} |
|
822 |
break; |
|
823 |
|
|
824 |
case 25: /* CMD25: WRITE_MULTIPLE_BLOCK */ |
|
825 |
switch (sd->state) { |
|
826 |
case sd_transfer_state: |
|
827 |
sd->state = sd_receivingdata_state; |
|
828 |
sd->data_start = req.arg; |
|
829 |
sd->data_offset = 0; |
|
830 |
sd->blk_written = 0; |
|
831 |
|
|
832 |
if (sd->data_start + sd->blk_len > sd->size) |
|
833 |
sd->card_status |= ADDRESS_ERROR; |
|
834 |
if (sd_wp_addr(sd, sd->data_start)) |
|
835 |
sd->card_status |= WP_VIOLATION; |
|
836 |
if (sd->csd[14] & 0x30) |
|
837 |
sd->card_status |= WP_VIOLATION; |
|
838 |
return sd_r1; |
|
839 |
|
|
840 |
default: |
|
841 |
break; |
|
842 |
} |
|
843 |
break; |
|
844 |
|
|
845 |
case 26: /* CMD26: PROGRAM_CID */ |
|
846 |
switch (sd->state) { |
|
847 |
case sd_transfer_state: |
|
848 |
sd->state = sd_receivingdata_state; |
|
849 |
sd->data_start = 0; |
|
850 |
sd->data_offset = 0; |
|
851 |
return sd_r1; |
|
852 |
|
|
853 |
default: |
|
854 |
break; |
|
855 |
} |
|
856 |
break; |
|
857 |
|
|
858 |
case 27: /* CMD27: PROGRAM_CSD */ |
|
859 |
switch (sd->state) { |
|
860 |
case sd_transfer_state: |
|
861 |
sd->state = sd_receivingdata_state; |
|
862 |
sd->data_start = 0; |
|
863 |
sd->data_offset = 0; |
|
864 |
return sd_r1; |
|
865 |
|
|
866 |
default: |
|
867 |
break; |
|
868 |
} |
|
869 |
break; |
|
870 |
|
|
871 |
/* Write protection (Class 6) */ |
|
872 |
case 28: /* CMD28: SET_WRITE_PROT */ |
|
873 |
switch (sd->state) { |
|
874 |
case sd_transfer_state: |
|
875 |
if (req.arg >= sd->size) { |
|
876 |
sd->card_status = ADDRESS_ERROR; |
|
877 |
return sd_r1b; |
|
878 |
} |
|
879 |
|
|
880 |
sd->state = sd_programming_state; |
|
881 |
sd->wp_groups[req.arg >> (HWBLOCK_SHIFT + |
|
882 |
SECTOR_SHIFT + WPGROUP_SHIFT)] = 1; |
|
883 |
/* Bzzzzzzztt .... Operation complete. */ |
|
884 |
sd->state = sd_transfer_state; |
|
885 |
return sd_r1b; |
|
886 |
|
|
887 |
default: |
|
888 |
break; |
|
889 |
} |
|
890 |
break; |
|
891 |
|
|
892 |
case 29: /* CMD29: CLR_WRITE_PROT */ |
|
893 |
switch (sd->state) { |
|
894 |
case sd_transfer_state: |
|
895 |
if (req.arg >= sd->size) { |
|
896 |
sd->card_status = ADDRESS_ERROR; |
|
897 |
return sd_r1b; |
|
898 |
} |
|
899 |
|
|
900 |
sd->state = sd_programming_state; |
|
901 |
sd->wp_groups[req.arg >> (HWBLOCK_SHIFT + |
|
902 |
SECTOR_SHIFT + WPGROUP_SHIFT)] = 0; |
|
903 |
/* Bzzzzzzztt .... Operation complete. */ |
|
904 |
sd->state = sd_transfer_state; |
|
905 |
return sd_r1b; |
|
906 |
|
|
907 |
default: |
|
908 |
break; |
|
909 |
} |
|
910 |
break; |
|
911 |
|
|
912 |
case 30: /* CMD30: SEND_WRITE_PROT */ |
|
913 |
switch (sd->state) { |
|
914 |
case sd_transfer_state: |
|
915 |
sd->state = sd_sendingdata_state; |
|
916 |
*(uint32_t *) sd->data = sd_wpbits(sd, req.arg); |
|
917 |
sd->data_start = req.arg; |
|
918 |
sd->data_offset = 0; |
|
919 |
return sd_r1b; |
|
920 |
|
|
921 |
default: |
|
922 |
break; |
|
923 |
} |
|
924 |
break; |
|
925 |
|
|
926 |
/* Erase commands (Class 5) */ |
|
927 |
case 32: /* CMD32: ERASE_WR_BLK_START */ |
|
928 |
switch (sd->state) { |
|
929 |
case sd_transfer_state: |
|
930 |
sd->erase_start = req.arg; |
|
931 |
return sd_r1; |
|
932 |
|
|
933 |
default: |
|
934 |
break; |
|
935 |
} |
|
936 |
break; |
|
937 |
|
|
938 |
case 33: /* CMD33: ERASE_WR_BLK_END */ |
|
939 |
switch (sd->state) { |
|
940 |
case sd_transfer_state: |
|
941 |
sd->erase_end = req.arg; |
|
942 |
return sd_r1; |
|
943 |
|
|
944 |
default: |
|
945 |
break; |
|
946 |
} |
|
947 |
break; |
|
948 |
|
|
949 |
case 38: /* CMD38: ERASE */ |
|
950 |
switch (sd->state) { |
|
951 |
case sd_transfer_state: |
|
952 |
if (sd->csd[14] & 0x30) { |
|
953 |
sd->card_status |= WP_VIOLATION; |
|
954 |
return sd_r1b; |
|
955 |
} |
|
956 |
|
|
957 |
sd->state = sd_programming_state; |
|
958 |
sd_erase(sd); |
|
959 |
/* Bzzzzzzztt .... Operation complete. */ |
|
960 |
sd->state = sd_transfer_state; |
|
961 |
return sd_r1b; |
|
962 |
|
|
963 |
default: |
|
964 |
break; |
|
965 |
} |
|
966 |
break; |
|
967 |
|
|
968 |
/* Lock card commands (Class 7) */ |
|
969 |
case 42: /* CMD42: LOCK_UNLOCK */ |
|
970 |
switch (sd->state) { |
|
971 |
case sd_transfer_state: |
|
972 |
sd->state = sd_receivingdata_state; |
|
973 |
sd->data_start = 0; |
|
974 |
sd->data_offset = 0; |
|
975 |
return sd_r1; |
|
976 |
|
|
977 |
default: |
Also available in: Unified diff