Merge latest bugfixes
[SCSI2SD.git] / software / SCSI2SD / src / sd.c
1 //      Copyright (C) 2013 Michael McMaster <michael@codesrc.com>\r
2 //\r
3 //      This file is part of SCSI2SD.\r
4 //\r
5 //      SCSI2SD is free software: you can redistribute it and/or modify\r
6 //      it under the terms of the GNU General Public License as published by\r
7 //      the Free Software Foundation, either version 3 of the License, or\r
8 //      (at your option) any later version.\r
9 //\r
10 //      SCSI2SD is distributed in the hope that it will be useful,\r
11 //      but WITHOUT ANY WARRANTY; without even the implied warranty of\r
12 //      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
13 //      GNU General Public License for more details.\r
14 //\r
15 //      You should have received a copy of the GNU General Public License\r
16 //      along with SCSI2SD.  If not, see <http://www.gnu.org/licenses/>.\r
17 \r
18 #include "device.h"\r
19 #include "scsi.h"\r
20 #include "config.h"\r
21 #include "disk.h"\r
22 #include "sd.h"\r
23 #include "led.h"\r
24 \r
25 #include "scsiPhy.h"\r
26 \r
27 #include <string.h>\r
28 \r
29 // Global\r
30 SdDevice sdDev;\r
31 \r
32 static uint8 sdCrc7(uint8* chr, uint8 cnt, uint8 crc)\r
33 {\r
34         uint8 a;\r
35         for(a = 0; a < cnt; a++)\r
36         {\r
37                 uint8 Data = chr[a];\r
38                 uint8 i;\r
39                 for(i = 0; i < 8; i++)\r
40                 {\r
41                         crc <<= 1;\r
42                         if( (Data & 0x80) ^ (crc & 0x80) ) {crc ^= 0x09;}\r
43                         Data <<= 1;\r
44                 }\r
45         }\r
46         return crc & 0x7F;\r
47 }\r
48 \r
49 // Read and write 1 byte.\r
50 static uint8 sdSpiByte(uint8 value)\r
51 {\r
52         SDCard_WriteTxData(value);\r
53         while (!(SDCard_ReadRxStatus() & SDCard_STS_RX_FIFO_NOT_EMPTY)) {}\r
54         return SDCard_ReadRxData();\r
55 }\r
56 \r
57 static void sdSendCRCCommand(uint8 cmd, uint32 param)\r
58 {\r
59         uint8 send[6];\r
60 \r
61         send[0] = cmd | 0x40;\r
62         send[1] = param >> 24;\r
63         send[2] = param >> 16;\r
64         send[3] = param >> 8;\r
65         send[4] = param;\r
66         send[5] = (sdCrc7(send, 5, 0) << 1) | 1;\r
67 \r
68         for(cmd = 0; cmd < sizeof(send); cmd++)\r
69         {\r
70                 sdSpiByte(send[cmd]);\r
71         }\r
72         // Allow command to process before reading result code.\r
73         sdSpiByte(0xFF);\r
74 }\r
75 \r
76 static void sdSendCommand(uint8 cmd, uint32 param)\r
77 {\r
78         uint8 send[6];\r
79 \r
80         send[0] = cmd | 0x40;\r
81         send[1] = param >> 24;\r
82         send[2] = param >> 16;\r
83         send[3] = param >> 8;\r
84         send[4] = param;\r
85         send[5] = 0;\r
86 \r
87         for(cmd = 0; cmd < sizeof(send); cmd++)\r
88         {\r
89                 sdSpiByte(send[cmd]);\r
90         }\r
91         // Allow command to process before reading result code.\r
92         sdSpiByte(0xFF);\r
93 }\r
94 \r
95 static uint8 sdReadResp()\r
96 {\r
97         uint8 v;\r
98         uint8 i = 128;\r
99         do\r
100         {\r
101                 v = sdSpiByte(0xFF);\r
102         } while(i-- && (v & 0x80));\r
103         return v;\r
104 }\r
105 \r
106 static uint8 sdCommandAndResponse(uint8 cmd, uint32 param)\r
107 {\r
108         sdSpiByte(0xFF);\r
109         sdSendCommand(cmd, param);\r
110         return sdReadResp();\r
111 }\r
112 \r
113 static uint8 sdCRCCommandAndResponse(uint8 cmd, uint32 param)\r
114 {\r
115         sdSpiByte(0xFF);\r
116         sdSendCRCCommand(cmd, param);\r
117         return sdReadResp();\r
118 }\r
119 \r
120 // Clear the sticky status bits on error.\r
121 static void sdClearStatus()\r
122 {\r
123         uint8 r2hi = sdCRCCommandAndResponse(SD_SEND_STATUS, 0);\r
124         uint8 r2lo = sdSpiByte(0xFF);\r
125         (void) r2hi; (void) r2lo;\r
126 }\r
127 \r
128 \r
129 void sdPrepareRead()\r
130 {\r
131         uint8 v;\r
132         uint32 scsiLBA = (transfer.lba + transfer.currentBlock);\r
133         uint32 sdLBA = SCSISector2SD(scsiLBA);\r
134         \r
135         if (!sdDev.ccs)\r
136         {\r
137                 sdLBA = sdLBA * SD_SECTOR_SIZE;\r
138         }\r
139         v = sdCommandAndResponse(SD_READ_MULTIPLE_BLOCK, sdLBA);\r
140         if (v)\r
141         {\r
142                 scsiDiskReset();\r
143                 sdClearStatus();\r
144 \r
145                 scsiDev.status = CHECK_CONDITION;\r
146                 scsiDev.sense.code = HARDWARE_ERROR;\r
147                 scsiDev.sense.asc = LOGICAL_UNIT_COMMUNICATION_FAILURE;\r
148                 scsiDev.phase = STATUS;\r
149         }\r
150         else\r
151         {\r
152                 transfer.inProgress = 1;\r
153         }\r
154 }\r
155 \r
156 static void doReadSector(uint32_t numBytes)\r
157 {\r
158         int prep, i, guard;\r
159 \r
160         // Wait for a start-block token.\r
161         // Don't wait more than 100ms, which is the timeout recommended\r
162         // in the standard.\r
163         //100ms @ 64Hz = 6400000\r
164         int maxWait = 6400000;\r
165         uint8 token = sdSpiByte(0xFF);\r
166         while (token != 0xFE && (maxWait-- > 0))\r
167         {\r
168                 token = sdSpiByte(0xFF);\r
169         }\r
170         if (token != 0xFE)\r
171         {\r
172                 if (transfer.multiBlock)\r
173                 {\r
174                         sdCompleteRead();\r
175                 }\r
176                 if (scsiDev.status != CHECK_CONDITION)\r
177                 {\r
178                         scsiDev.status = CHECK_CONDITION;\r
179                         scsiDev.sense.code = HARDWARE_ERROR;\r
180                         scsiDev.sense.asc = UNRECOVERED_READ_ERROR;\r
181                         scsiDev.phase = STATUS;\r
182                 }\r
183                 return;\r
184         }\r
185 \r
186         scsiEnterPhase(DATA_IN);\r
187 \r
188         // Quickly seed the FIFO\r
189         prep = 4;\r
190         CY_SET_REG8(SDCard_TXDATA_PTR, 0xFF); // Put a byte in the FIFO\r
191         CY_SET_REG8(SDCard_TXDATA_PTR, 0xFF); // Put a byte in the FIFO\r
192         CY_SET_REG8(SDCard_TXDATA_PTR, 0xFF); // Put a byte in the FIFO\r
193         CY_SET_REG8(SDCard_TXDATA_PTR, 0xFF); // Put a byte in the FIFO\r
194         \r
195         i = 0;\r
196         guard = 0;\r
197         \r
198         // This loop is critically important for performance.\r
199         // We stream data straight from the SDCard fifos into the SCSI component\r
200         // FIFO's. If the loop isn't fast enough, the transmit FIFO's will empty,\r
201         // and performance will suffer. Every clock cycle counts.\r
202         while (i < numBytes && !scsiDev.resetFlag)\r
203         {\r
204                 uint8_t sdRxStatus = CY_GET_REG8(SDCard_RX_STATUS_PTR);\r
205                 uint8_t scsiStatus = CY_GET_REG8(scsiTarget_StatusReg__STATUS_REG);\r
206 \r
207                 // Read from the SPIM fifo if there is room to stream the byte to the\r
208                 // SCSI fifos\r
209                 if((sdRxStatus & SDCard_STS_RX_FIFO_NOT_EMPTY) &&\r
210                         (scsiStatus & 1) // SCSI TX FIFO NOT FULL\r
211                         )\r
212                 {\r
213                         uint8_t val = CY_GET_REG8(SDCard_RXDATA_PTR);\r
214                         CY_SET_REG8(scsiTarget_datapath__F0_REG, val);\r
215                         guard++;\r
216 \r
217                         // How many bytes are in a 4-byte FIFO ? 5.  4 FIFO bytes PLUS one byte\r
218                         // being processed bit-by-bit. Artifically limit the number of bytes in the \r
219                         // "combined" SPIM TX and RX FIFOS to the individual FIFO size.\r
220                         // Unlike the SCSI component, SPIM doesn't check if there's room in\r
221                         // the output FIFO before starting to transmit.\r
222 \r
223                         if (prep < numBytes)\r
224                         {\r
225                                 CY_SET_REG8(SDCard_TXDATA_PTR, 0xFF); // Put a byte in the FIFO\r
226                                 prep++;\r
227                         }\r
228 \r
229                 }\r
230                                         \r
231                 // Byte has been sent out the SCSI interface.\r
232                 if (scsiStatus & 2) // SCSI RX FIFO NOT EMPTY\r
233                 {\r
234                         CY_GET_REG8(scsiTarget_datapath__F1_REG);\r
235                         ++i;\r
236                 }\r
237         }\r
238 \r
239         // Read and discard remaining bytes. This applis for non-512 byte sectors,\r
240         // or if a SCSI reset was triggered.\r
241         while (guard < SD_SECTOR_SIZE)\r
242         {\r
243                 uint8_t sdRxStatus = CY_GET_REG8(SDCard_RX_STATUS_PTR);\r
244                 if(sdRxStatus & SDCard_STS_RX_FIFO_NOT_EMPTY)\r
245                 {\r
246                         CY_GET_REG8(SDCard_RXDATA_PTR);\r
247                         guard++;\r
248                 }\r
249 \r
250                 if ((prep - guard < 4) && (prep < SD_SECTOR_SIZE))\r
251                 {\r
252                         CY_SET_REG8(SDCard_TXDATA_PTR, 0xFF); // Put a byte in the FIFO\r
253                         prep++;\r
254                 }\r
255         }\r
256 \r
257         sdSpiByte(0xFF); // CRC\r
258         sdSpiByte(0xFF); // CRC\r
259         scsiDev.dataLen = numBytes;\r
260         scsiDev.dataPtr = numBytes;\r
261         \r
262         while (SCSI_ReadPin(SCSI_In_ACK) && !scsiDev.resetFlag) {}\r
263 }\r
264 \r
265 static void doReadSectorSingle(uint32 sdBlock, int sdBytes)\r
266 {\r
267         uint8 v;\r
268         if (!sdDev.ccs)\r
269         {\r
270                 sdBlock = sdBlock * SD_SECTOR_SIZE;\r
271         }       \r
272         v = sdCommandAndResponse(SD_READ_SINGLE_BLOCK, sdBlock);\r
273         if (v)\r
274         {\r
275                 scsiDiskReset();\r
276                 sdClearStatus();\r
277 \r
278                 scsiDev.status = CHECK_CONDITION;\r
279                 scsiDev.sense.code = HARDWARE_ERROR;\r
280                 scsiDev.sense.asc = LOGICAL_UNIT_COMMUNICATION_FAILURE;\r
281                 scsiDev.phase = STATUS;\r
282         }\r
283         else\r
284         {\r
285                 doReadSector(sdBytes);\r
286         }\r
287 }\r
288 \r
289 \r
290 void sdReadSectorSingle()\r
291 {\r
292         uint32 scsiLBA = (transfer.lba + transfer.currentBlock);\r
293         uint32 sdLBA = SCSISector2SD(scsiLBA);\r
294         \r
295         int sdSectors = SDSectorsPerSCSISector();\r
296         int i;\r
297         for (i = 0; (i < sdSectors - 1) && (scsiDev.status != CHECK_CONDITION); ++i)\r
298         {\r
299                 doReadSectorSingle(sdLBA + i, SD_SECTOR_SIZE);\r
300         }\r
301 \r
302         if (scsiDev.status != CHECK_CONDITION)\r
303         {\r
304                 int remaining = config->bytesPerSector % SD_SECTOR_SIZE;\r
305                 if (remaining == 0) remaining = SD_SECTOR_SIZE; // Full sector needed.\r
306                 doReadSectorSingle(sdLBA + i, remaining);\r
307         }\r
308 }\r
309 \r
310 void sdReadSectorMulti()\r
311 {\r
312         // Pre: sdPrepareRead called.\r
313         int sdSectors = SDSectorsPerSCSISector();\r
314         int i;\r
315         for (i = 0; (i < sdSectors - 1) && (scsiDev.status != CHECK_CONDITION); ++i)\r
316         {\r
317                 doReadSector(SD_SECTOR_SIZE);\r
318         }\r
319 \r
320         if (scsiDev.status != CHECK_CONDITION)\r
321         {\r
322                 int remaining = config->bytesPerSector % SD_SECTOR_SIZE;\r
323                 if (remaining == 0) remaining = SD_SECTOR_SIZE; // Full sector needed.\r
324                 doReadSector(remaining);\r
325         }\r
326 }\r
327 \r
328 \r
329 void sdCompleteRead()\r
330 {\r
331         transfer.inProgress = 0;\r
332 \r
333         // We cannot send even a single "padding" byte, as we normally would when\r
334         // sending a command.  If we've just finished reading the very last block\r
335         // on the card, then reading an additional dummy byte will just trigger\r
336         // an error condition as we're trying to read past-the-end of the storage\r
337         // device.\r
338         // ie. do not use sdCommandAndResponse here.\r
339         uint8 r1b;\r
340         sdSendCommand(SD_STOP_TRANSMISSION, 0);\r
341         r1b = sdReadResp();\r
342 \r
343         if (r1b)\r
344         {\r
345                 // Try very hard to make sure the transmission stops\r
346                 int retries = 255;\r
347                 while (r1b && retries)\r
348                 {\r
349                         r1b = sdCommandAndResponse(SD_STOP_TRANSMISSION, 0);\r
350                         retries--;\r
351                 }\r
352 \r
353                 scsiDev.status = CHECK_CONDITION;\r
354                 scsiDev.sense.code = HARDWARE_ERROR;\r
355                 scsiDev.sense.asc = UNRECOVERED_READ_ERROR;\r
356                 scsiDev.phase = STATUS;\r
357         }\r
358 \r
359         // R1b has an optional trailing "busy" signal.\r
360         {\r
361                 uint8 busy;\r
362                 do\r
363                 {\r
364                         busy = sdSpiByte(0xFF);\r
365                 } while (busy == 0);\r
366         }\r
367 }\r
368 \r
369 static void sdWaitWriteBusy()\r
370 {\r
371         uint8 val;\r
372         do\r
373         {\r
374                 val = sdSpiByte(0xFF);\r
375         } while (val != 0xFF);\r
376 }\r
377 \r
378 static int doWriteSector(uint32_t numBytes)\r
379 {\r
380         int prep, i, guard;\r
381         int result, maxWait;\r
382         uint8 dataToken;\r
383 \r
384         scsiEnterPhase(DATA_OUT);\r
385         \r
386         sdSpiByte(0xFC); // MULTIPLE byte start token\r
387         \r
388         prep = 0;\r
389         i = 0;\r
390         guard = 0;\r
391 \r
392         // This loop is critically important for performance.\r
393         // We stream data straight from the SCSI fifos into the SPIM component\r
394         // FIFO's. If the loop isn't fast enough, the transmit FIFO's will empty,\r
395         // and performance will suffer. Every clock cycle counts.       \r
396         while (i < numBytes && !scsiDev.resetFlag)\r
397         {\r
398                 uint8_t sdRxStatus = CY_GET_REG8(SDCard_RX_STATUS_PTR);\r
399                 uint8_t scsiStatus = CY_GET_REG8(scsiTarget_StatusReg__STATUS_REG);\r
400 \r
401                 // Read from the SCSI fifo if there is room to stream the byte to the\r
402                 // SPIM fifos\r
403                 // See sdReadSector for comment on guard (FIFO size is really 5)\r
404                 if((guard - i < 4) &&\r
405                         (scsiDev.resetFlag || (scsiStatus & 2))\r
406                         ) // SCSI RX FIFO NOT EMPTY\r
407                 {\r
408                         uint8_t val = CY_GET_REG8(scsiTarget_datapath__F1_REG);\r
409                         CY_SET_REG8(SDCard_TXDATA_PTR, val);\r
410                         guard++;\r
411                 }\r
412 \r
413                 // Byte has been sent out the SPIM interface.\r
414                 if (sdRxStatus & SDCard_STS_RX_FIFO_NOT_EMPTY)\r
415                 {\r
416                          CY_GET_REG8(SDCard_RXDATA_PTR);\r
417                         ++i;\r
418                 }\r
419 \r
420                 if (prep < numBytes &&\r
421                         (scsiDev.resetFlag || (scsiStatus & 1)) // SCSI TX FIFO NOT FULL\r
422                         )\r
423                 {\r
424                         // Trigger the SCSI component to read a byte\r
425                         CY_SET_REG8(scsiTarget_datapath__F0_REG, 0xFF);\r
426                         prep++;\r
427                 }\r
428         }\r
429         \r
430         // Write remaining bytes as 0x00\r
431         while (i < SD_SECTOR_SIZE)\r
432         {\r
433                 uint8_t sdRxStatus = CY_GET_REG8(SDCard_RX_STATUS_PTR);\r
434 \r
435                 if((guard - i < 4) && (guard < SD_SECTOR_SIZE))\r
436                 {\r
437                         CY_SET_REG8(SDCard_TXDATA_PTR, 0x00);\r
438                         guard++;\r
439                 }\r
440 \r
441                 // Byte has been sent out the SPIM interface.\r
442                 if (sdRxStatus & SDCard_STS_RX_FIFO_NOT_EMPTY)\r
443                 {\r
444                          CY_GET_REG8(SDCard_RXDATA_PTR);\r
445                         ++i;\r
446                 }\r
447         }\r
448         \r
449         sdSpiByte(0x00); // CRC\r
450         sdSpiByte(0x00); // CRC\r
451 \r
452         // Don't wait more than 1s.\r
453         // My 2g Kingston micro-sd card doesn't respond immediately.\r
454         // My 16Gb card does.\r
455         maxWait = 1000000;\r
456         dataToken = sdSpiByte(0xFF); // Response\r
457         while (dataToken == 0xFF && maxWait-- > 0)\r
458         {\r
459                 CyDelayUs(1);\r
460                 dataToken = sdSpiByte(0xFF);\r
461         }\r
462         if (((dataToken & 0x1F) >> 1) != 0x2) // Accepted.\r
463         {\r
464                 uint8 r1b, busy;\r
465                 \r
466                 sdWaitWriteBusy();\r
467 \r
468                 r1b = sdCommandAndResponse(SD_STOP_TRANSMISSION, 0);\r
469                 (void) r1b;\r
470                 sdSpiByte(0xFF);\r
471 \r
472                 // R1b has an optional trailing "busy" signal.\r
473                 do\r
474                 {\r
475                         busy = sdSpiByte(0xFF);\r
476                 } while (busy == 0);\r
477 \r
478                 // Wait for the card to come out of busy.\r
479                 sdWaitWriteBusy();\r
480 \r
481                 transfer.inProgress = 0;\r
482                 scsiDiskReset();\r
483                 sdClearStatus();\r
484 \r
485                 scsiDev.status = CHECK_CONDITION;\r
486                 scsiDev.sense.code = HARDWARE_ERROR;\r
487                 scsiDev.sense.asc = LOGICAL_UNIT_COMMUNICATION_FAILURE;\r
488                 scsiDev.phase = STATUS;\r
489                 result = 0;\r
490         }\r
491         else\r
492         {\r
493                 sdWaitWriteBusy();\r
494                 result = 1;\r
495         }\r
496 \r
497         while (SCSI_ReadPin(SCSI_In_ACK) && !scsiDev.resetFlag) {}\r
498 \r
499         return result;\r
500 }\r
501 \r
502 int sdWriteSector()\r
503 {\r
504         int result = 1;\r
505         // Pre: sdPrepareWrite called.\r
506         int sdSectors = SDSectorsPerSCSISector();\r
507         int i;\r
508         for (i = 0; result && (i < sdSectors - 1) && (scsiDev.status != CHECK_CONDITION); ++i)\r
509         {\r
510                 result = doWriteSector(SD_SECTOR_SIZE);\r
511         }\r
512 \r
513         if (result && scsiDev.status != CHECK_CONDITION)\r
514         {\r
515                 int remaining = config->bytesPerSector % SD_SECTOR_SIZE;\r
516                 if (remaining == 0) remaining = SD_SECTOR_SIZE; // Full sector needed.\r
517                 result = doWriteSector(remaining);\r
518         }\r
519         return result;\r
520 }\r
521 \r
522 void sdCompleteWrite()\r
523 {\r
524         transfer.inProgress = 0;\r
525 \r
526         uint8 r1, r2;\r
527 \r
528         sdSpiByte(0xFD); // STOP TOKEN\r
529         // Wait for the card to come out of busy.\r
530         sdWaitWriteBusy();\r
531 \r
532         r1 = sdCommandAndResponse(13, 0); // send status\r
533         r2 = sdSpiByte(0xFF);\r
534         if (r1 || r2)\r
535         {\r
536                 sdClearStatus();\r
537                 scsiDev.status = CHECK_CONDITION;\r
538                 scsiDev.sense.code = HARDWARE_ERROR;\r
539                 scsiDev.sense.asc = WRITE_ERROR_AUTO_REALLOCATION_FAILED;\r
540                 scsiDev.phase = STATUS;\r
541         }\r
542 }\r
543 \r
544 \r
545 // SD Version 2 (SDHC) support\r
546 static int sendIfCond()\r
547 {\r
548         int retries = 50;\r
549 \r
550         do\r
551         {\r
552                 uint8 status = sdCRCCommandAndResponse(SD_SEND_IF_COND, 0x000001AA);\r
553 \r
554                 if (status == SD_R1_IDLE)\r
555                 {\r
556                         // Version 2 card.\r
557                         sdDev.version = 2;\r
558                         // Read 32bit response. Should contain the same bytes that\r
559                         // we sent in the command parameter.\r
560                         sdSpiByte(0xFF);\r
561                         sdSpiByte(0xFF);\r
562                         sdSpiByte(0xFF);\r
563                         sdSpiByte(0xFF);\r
564                         break;\r
565                 }\r
566                 else if (status & SD_R1_ILLEGAL)\r
567                 {\r
568                         // Version 1 card.\r
569                         sdDev.version = 1;\r
570                         sdClearStatus();\r
571                         break;\r
572                 }\r
573 \r
574                 sdClearStatus();\r
575         } while (--retries > 0);\r
576 \r
577         return retries > 0;\r
578 }\r
579 \r
580 static int sdOpCond()\r
581 {\r
582         int retries = 50;\r
583 \r
584         uint8 status;\r
585         do\r
586         {\r
587                 CyDelay(33); // Spec says to retry for 1 second.\r
588 \r
589                 sdCRCCommandAndResponse(SD_APP_CMD, 0);\r
590                 // Host Capacity Support = 1 (SDHC/SDXC supported)\r
591                 status = sdCRCCommandAndResponse(SD_APP_SEND_OP_COND, 0x40000000);\r
592 \r
593                 sdClearStatus();\r
594         } while ((status != 0) && (--retries > 0));\r
595 \r
596         return retries > 0;\r
597 }\r
598 \r
599 static int sdReadOCR()\r
600 {\r
601         uint8 buf[4];\r
602         int i;\r
603         \r
604         uint8 status = sdCRCCommandAndResponse(SD_READ_OCR, 0);\r
605         if(status){goto bad;}\r
606 \r
607         for (i = 0; i < 4; ++i)\r
608         {\r
609                 buf[i] = sdSpiByte(0xFF);\r
610         }\r
611 \r
612         sdDev.ccs = (buf[0] & 0x40) ? 1 : 0;\r
613 \r
614         return 1;\r
615 bad:\r
616         return 0;\r
617 }\r
618 \r
619 static int sdReadCSD()\r
620 {\r
621         uint8 startToken;\r
622         int maxWait, i;\r
623         uint8 buf[16];\r
624         \r
625         uint8 status = sdCRCCommandAndResponse(SD_SEND_CSD, 0);\r
626         if(status){goto bad;}\r
627 \r
628         maxWait = 1023;\r
629         do\r
630         {\r
631                 startToken = sdSpiByte(0xFF);\r
632         } while(maxWait-- && (startToken != 0xFE));\r
633         if (startToken != 0xFE) { goto bad; }\r
634 \r
635         for (i = 0; i < 16; ++i)\r
636         {\r
637                 buf[i] = sdSpiByte(0xFF);\r
638         }\r
639         sdSpiByte(0xFF); // CRC\r
640         sdSpiByte(0xFF); // CRC\r
641 \r
642         if ((buf[0] >> 6) == 0x00)\r
643         {\r
644                 // CSD version 1\r
645                 // C_SIZE in bits [73:62]\r
646                 uint32 c_size = (((((uint32)buf[6]) & 0x3) << 16) | (((uint32)buf[7]) << 8) | buf[8]) >> 6;\r
647                 uint32 c_mult = (((((uint32)buf[9]) & 0x3) << 8) | ((uint32)buf[0xa])) >> 7;\r
648                 uint32 sectorSize = buf[5] & 0x0F;\r
649                 sdDev.capacity = ((c_size+1) * ((uint64)1 << (c_mult+2)) * ((uint64)1 << sectorSize)) / SD_SECTOR_SIZE;\r
650         }\r
651         else if ((buf[0] >> 6) == 0x01)\r
652         {\r
653                 // CSD version 2\r
654                 // C_SIZE in bits [69:48]\r
655 \r
656                 uint32 c_size =\r
657                         ((((uint32)buf[7]) & 0x3F) << 16) |\r
658                         (((uint32)buf[8]) << 8) |\r
659                         ((uint32)buf[7]);\r
660                 sdDev.capacity = (c_size + 1) * 1024;\r
661         }\r
662         else\r
663         {\r
664                 goto bad;\r
665         }\r
666 \r
667         return 1;\r
668 bad:\r
669         return 0;\r
670 }\r
671 \r
672 int sdInit()\r
673 {\r
674         int result = 0;\r
675         int i;\r
676         uint8 v;\r
677         \r
678         sdDev.version = 0;\r
679         sdDev.ccs = 0;\r
680         sdDev.capacity = 0;\r
681 \r
682         SD_CS_Write(1); // Set CS inactive (active low)\r
683         SD_Init_Clk_Start(); // Turn on the slow 400KHz clock\r
684         SD_Clk_Ctl_Write(0); // Select the 400KHz clock source.\r
685         SDCard_Start(); // Enable SPI hardware\r
686 \r
687         // Power on sequence. 74 clock cycles of a "1" while CS unasserted.\r
688         for (i = 0; i < 10; ++i)\r
689         {\r
690                 sdSpiByte(0xFF);\r
691         }\r
692 \r
693         SD_CS_Write(0); // Set CS active (active low)\r
694         CyDelayUs(1);\r
695 \r
696         v = sdCRCCommandAndResponse(SD_GO_IDLE_STATE, 0);\r
697         if(v != 1){goto bad;}\r
698 \r
699         ledOn();\r
700         if (!sendIfCond()) goto bad; // Sets V1 or V2 flag\r
701         if (!sdOpCond()) goto bad;\r
702         if (!sdReadOCR()) goto bad;\r
703 \r
704         // This command will be ignored if sdDev.ccs is set.\r
705         // SDHC and SDXC are always 512bytes.\r
706         v = sdCRCCommandAndResponse(SD_SET_BLOCKLEN, SD_SECTOR_SIZE); //Force sector size\r
707         if(v){goto bad;}\r
708         v = sdCRCCommandAndResponse(SD_CRC_ON_OFF, 0); //crc off\r
709         if(v){goto bad;}\r
710 \r
711         // now set the sd card up for full speed\r
712         // The SD Card spec says we can run SPI @ 25MHz\r
713         // But the PSoC 5LP SPIM datasheet says the most we can do is 18MHz.\r
714         // I've confirmed that no data is ever put into the RX FIFO when run at\r
715         // 20MHz or 25MHz.\r
716         // ... and then we get timing analysis failures if the BUS_CLK is over 62MHz.\r
717         // So we run the MASTER_CLK and BUS_CLK at 60MHz, and run the SPI clock at 30MHz\r
718         // (15MHz SPI transfer clock).\r
719         SDCard_Stop();\r
720         \r
721         // We can't run at full-speed with the pullup resistors enabled.\r
722         SD_MISO_SetDriveMode(SD_MISO_DM_DIG_HIZ);\r
723         SD_MOSI_SetDriveMode(SD_MOSI_DM_STRONG);\r
724         SD_SCK_SetDriveMode(SD_SCK_DM_STRONG);\r
725         \r
726         SD_Data_Clk_Start(); // Turn on the fast clock\r
727         SD_Clk_Ctl_Write(1); // Select the fast clock source.\r
728         SD_Init_Clk_Stop(); // Stop the slow clock.\r
729         CyDelayUs(1);\r
730         SDCard_Start();\r
731 \r
732         // Clear out rubbish data through clock change\r
733         CyDelayUs(1);\r
734         SDCard_ReadRxStatus();\r
735         SDCard_ReadTxStatus();\r
736         SDCard_ClearFIFO();\r
737 \r
738         if (!sdReadCSD()) goto bad;\r
739 \r
740         result = 1;\r
741         goto out;\r
742 \r
743 bad:\r
744         sdDev.capacity = 0;\r
745 \r
746 out:\r
747         sdClearStatus();\r
748         ledOff();\r
749         return result;\r
750 \r
751 }\r
752 \r
753 void sdPrepareWrite()\r
754 {\r
755         uint8 v;\r
756         \r
757         // Set the number of blocks to pre-erase by the multiple block write command\r
758         // We don't care about the response - if the command is not accepted, writes\r
759         // will just be a bit slower.\r
760         // Max 22bit parameter.\r
761         uint32_t sdBlocks = transfer.blocks * SDSectorsPerSCSISector();\r
762         uint32 blocks = sdBlocks > 0x7FFFFF ? 0x7FFFFF : sdBlocks;\r
763         sdCommandAndResponse(SD_APP_CMD, 0);\r
764         sdCommandAndResponse(SD_APP_SET_WR_BLK_ERASE_COUNT, blocks);\r
765 \r
766         uint32 scsiLBA = (transfer.lba + transfer.currentBlock);\r
767         uint32 sdLBA = SCSISector2SD(scsiLBA);\r
768         if (!sdDev.ccs)\r
769         {\r
770                 sdLBA = sdLBA * SD_SECTOR_SIZE;\r
771         }\r
772         v = sdCommandAndResponse(25, sdLBA);\r
773         if (v)\r
774         {\r
775                 scsiDiskReset();\r
776                 sdClearStatus();\r
777                 scsiDev.status = CHECK_CONDITION;\r
778                 scsiDev.sense.code = HARDWARE_ERROR;\r
779                 scsiDev.sense.asc = LOGICAL_UNIT_COMMUNICATION_FAILURE;\r
780                 scsiDev.phase = STATUS;\r
781         }\r
782         else\r
783         {\r
784                 transfer.inProgress = 1;\r
785         }\r
786 }\r
787 \r