Subversion Repositories NaviCtrl

Rev

Rev 366 | Rev 379 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1 ingob 1
/*#######################################################################################*/
2
/* !!! THIS IS NOT FREE SOFTWARE !!!                                                     */
3
/*#######################################################################################*/
4
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
5
// + www.MikroKopter.com
6
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 7
// + Software Nutzungsbedingungen (english version: see below)
8
// + der Fa. HiSystems GmbH, Flachsmeerstrasse 2, 26802 Moormerland - nachfolgend Lizenzgeber genannt -
9
// + Der Lizenzgeber räumt dem Kunden ein nicht-ausschließliches, zeitlich und räumlich* unbeschränktes Recht ein, die im den
10
// + Mikrocontroller verwendete Firmware für die Hardware Flight-Ctrl, Navi-Ctrl, BL-Ctrl, MK3Mag & PC-Programm MikroKopter-Tool 
11
// + - nachfolgend Software genannt - nur für private Zwecke zu nutzen.
12
// + Der Einsatz dieser Software ist nur auf oder mit Produkten des Lizenzgebers zulässig.
1 ingob 13
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 14
// + Die vom Lizenzgeber gelieferte Software ist urheberrechtlich geschützt. Alle Rechte an der Software sowie an sonstigen im
15
// + Rahmen der Vertragsanbahnung und Vertragsdurchführung überlassenen Unterlagen stehen im Verhältnis der Vertragspartner ausschließlich dem Lizenzgeber zu.
16
// + Die in der Software enthaltenen Copyright-Vermerke, Markenzeichen, andere Rechtsvorbehalte, Seriennummern sowie
17
// + sonstige der Programmidentifikation dienenden Merkmale dürfen vom Kunden nicht verändert oder unkenntlich gemacht werden.
18
// + Der Kunde trifft angemessene Vorkehrungen für den sicheren Einsatz der Software. Er wird die Software gründlich auf deren
19
// + Verwendbarkeit zu dem von ihm beabsichtigten Zweck testen, bevor er diese operativ einsetzt.
20
// + Die Haftung des Lizenzgebers wird - soweit gesetzlich zulässig - begrenzt in Höhe des typischen und vorhersehbaren
21
// + Schadens. Die gesetzliche Haftung bei Personenschäden und nach dem Produkthaftungsgesetz bleibt unberührt. Dem Lizenzgeber steht jedoch der Einwand 
22
// + des Mitverschuldens offen.
23
// + Der Kunde trifft angemessene Vorkehrungen für den Fall, dass die Software ganz oder teilweise nicht ordnungsgemäß arbeitet.
24
// + Er wird die Software gründlich auf deren Verwendbarkeit zu dem von ihm beabsichtigten Zweck testen, bevor er diese operativ einsetzt.
25
// + Der Kunde wird er seine Daten vor Einsatz der Software nach dem Stand der Technik sichern.
26
// + Der Kunde ist darüber unterrichtet, dass der Lizenzgeber seine Daten im zur Vertragsdurchführung erforderlichen Umfang
27
// + und auf Grundlage der Datenschutzvorschriften erhebt, speichert, verarbeitet und, sofern notwendig, an Dritte übermittelt.
28
// + *) Die räumliche Nutzung bezieht sich nur auf den Einsatzort, nicht auf die Reichweite der programmierten Software.
29
// + #### ENDE DER NUTZUNGSBEDINGUNGEN ####'
30
// +  Hinweis: Informationen über erweiterte Nutzungsrechte (wie z.B. Nutzung für nicht-private Zwecke) sind auf Anfrage per Email an info(@)hisystems.de verfügbar.
1 ingob 31
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 32
// + Software LICENSING TERMS
1 ingob 33
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 34
// + of HiSystems GmbH, Flachsmeerstrasse 2, 26802 Moormerland, Germany - the Licensor -
35
// + The Licensor grants the customer a non-exclusive license to use the microcontroller firmware of the Flight-Ctrl, Navi-Ctrl, BL-Ctrl, and MK3Mag hardware 
36
// + (the Software) exclusively for private purposes. The License is unrestricted with respect to time and territory*.
37
// + The Software may only be used with the Licensor's products.
38
// + The Software provided by the Licensor is protected by copyright. With respect to the relationship between the parties to this
39
// + agreement, all rights pertaining to the Software and other documents provided during the preparation and execution of this
40
// + agreement shall be the property of the Licensor.
41
// + The information contained in the Software copyright notices, trademarks, other legal reservations, serial numbers and other
42
// + features that can be used to identify the program may not be altered or defaced by the customer.
43
// + The customer shall be responsible for taking reasonable precautions
44
// + for the safe use of the Software. The customer shall test the Software thoroughly regarding its suitability for the
45
// + intended purpose before implementing it for actual operation. The Licensor's liability shall be limited to the extent of typical and
46
// + foreseeable damage to the extent permitted by law, notwithstanding statutory liability for bodily injury and product
47
// + liability. However, the Licensor shall be entitled to the defense of contributory negligence.
48
// + The customer will take adequate precautions in the case, that the software is not working properly. The customer will test
49
// + the software for his purpose before any operational usage. The customer will backup his data before using the software.
50
// + The customer understands that the Licensor collects, stores and processes, and, where required, forwards, customer data
51
// + to third parties to the extent necessary for executing the agreement, subject to applicable data protection and privacy regulations.
52
// + *) The territory aspect only refers to the place where the Software is used, not its programmed range.
53
// + #### END OF LICENSING TERMS ####
54
// + Note: For information on license extensions (e.g. commercial use), please contact us at info(@)hisystems.de.
1 ingob 55
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
24 StephanB 56
#include <stdio.h>
57
#include <string.h>
58
#include "91x_lib.h"
41 ingob 59
#include "uart1.h"
24 StephanB 60
#include "sdc.h"
61
#include "ssc.h"
119 killagreg 62
#include "timer1.h"
1 ingob 63
#include "main.h"
24 StephanB 64
#include "crc16.h"
1 ingob 65
 
66
//________________________________________________________________________________________________________________________________________
24 StephanB 67
// Module name:                 sdc.c 
1 ingob 68
// Compiler used:               avr-gcc 3.4.5
24 StephanB 69
// Last Modifikation:   08.06.2008
70
// Version:                             1.07
71
// Authors:                             Stephan Busker, Gregor Stobrawa         
72
// Description:                 Source files for connecting to an sd-card using the SSC
1 ingob 73
//
74
//........................................................................................................................................
24 StephanB 75
// Functions:                   SD_Result_t     SDC_init(void);
76
//                                              u8                      SDC_PutCommand (u8 *cmd);
77
//                                              SD_Result_t     SDC_PutSector(u32 addr,u8 *Buffer);
78
//                                              SD_Result_t     SDC_GetSector(u32 addr,u8 *Buffer);
1 ingob 79
//
80
////........................................................................................................................................
81
// ext. functions:              extern void SSC_Init(void);
24 StephanB 82
//                                              extern u8   SSC_GetChar (void);
1 ingob 83
//                                              extern void SSC_PutChar (u8);
84
//                                              extern void SSC_Enable(void);
85
//                                              extern void SSC_Disable(void);
24 StephanB 86
//                                              extern void     SSC_ClearRxFifo();
1 ingob 87
//........................................................................................................................................
88
//
89
// URL:                                 www.Mikro-Control.de
90
// mailto:                              stephan.busker@mikro-control.de
91
//________________________________________________________________________________________________________________________________________
92
 
93
 
94
 
24 StephanB 95
#define CMD_GO_IDLE_STATE               0x00    /* CMD00: response R1 */
96
#define CMD_SEND_OP_COND                0x01    /* CMD01: response R1 */
97
#define CMD_SEND_IF_COND                0x08    /* CMD08: response R7 */
98
#define CMD_SEND_CSD                    0x09    /* CMD09: response R1 */
99
#define CMD_SEND_CID                    0x0A    /* CMD10: response R1 */
100
#define CMD_SEND_STATUS                 0x0D    /* CMD13: response R2 */
101
#define CMD_SET_BLOCKLEN                0x10    /* CMD16: arg0[31:0]: block length, response R1*/
102
#define CMD_READ_SINGLE_BLOCK   0x11    /* CMD17: arg0[31:0]: data address, response R1 */
103
#define CMD_WRITE_SINGLE_BLOCK  0x18    /* CMD24: arg0[31:0]: data address, response R1 */
104
#define CMD_APP_CMD                             0x37    /* CMD55: response R1 */
105
#define CMD_READ_OCR                    0x3A    /* CMD58: response R3 */
106
#define CMD_CRC_ON_OFF                  0x3B    /* CMD59: arg0[31:1]: stuff bits, arg0[0:0]: crc option, response R1 */                                                                         
107
#define ACMD_SEND_OP_COND               0x29    /* ACMD41: arg0[31]: stuff bits, arg0[30]: HCS, arg0[29:0] stuff bits*, response R1 */
1 ingob 108
 
24 StephanB 109
#define R1_NO_ERR                               0x00
110
#define R1_IDLE_STATE                   0x01
111
#define R1_ERASE_RESET                  0x02
112
#define R1_ILLEGAL_CMD                  0x04
113
#define R1_COM_CRC_ERR                  0x08
114
#define R1_ERASE_SEQUENCE_ERR   0x10
115
#define R1_ADDRESS_ERR                  0x20
116
#define R1_PARAMETER_ERR                0x40
117
#define R1_BAD_RESPONSE                 0x80
118
 
119
#define R2_NO_ERR                               0x00
120
#define R2_CARD_LOCKED                  0x01
121
#define R2_ERASE_WRITE_PROT_ERR 0x02
122
#define R2_UNKOWN_ERR                   0x04
123
#define R2_CARD_CTRL_ERR                0x08
124
#define R2_CARD_ECC_ERR             0x10
125
#define R2_WRITE_PROT_ERR               0x20
126
#define R2_ERASE_PARAM_ERR              0x40
127
#define R2_OUT_OF_RANGE_ERR             0x80
128
 
129
#define DATA_START_TOKEN                0xFE
130
#define DATA_RESPONSE_MASK              0x1F 
131
#define DATA_RESPONSE_OK                0x05
132
#define DATA_RESPONSE_CRC_ERR   0x0B
133
#define DATA_RESPONSE_WRITE_ERR 0x1D
134
 
135
volatile SDCardInfo_t SDCardInfo;
136
 
137
 
1 ingob 138
//________________________________________________________________________________________________________________________________________
24 StephanB 139
// Function:    CRC7(u8* cmd, u32 len);
1 ingob 140
// 
24 StephanB 141
// Description: This function calculated the CRC7 checksum used in the last byte of a spi command frame. 
1 ingob 142
//                              
143
//
24 StephanB 144
// Returnvalue: the function returns the crc7 including bit 0 set to 1
1 ingob 145
//________________________________________________________________________________________________________________________________________
146
 
24 StephanB 147
u8 CRC7(u8 * cmd, u32 len)
1 ingob 148
{
24 StephanB 149
        u8 i, a;
150
        u8 crc, Data;
1 ingob 151
 
24 StephanB 152
        crc = 0; // init CRC buffer
153
        for (a = 0; a < len ;a++) // for every byte in the msg
154
        {
155
                Data = cmd[a];
156
                for (i=0;i<8;i++) // for every bit in the byte
157
                {
158
                        crc <<= 1; // shift crc
159
                        if ((Data & 0x80)^(crc & 0x80)) crc ^=0x09;       //xor
160
                        Data <<= 1;     // shift data  for next bit
161
                }
162
        }
163
        crc = (crc<<1)|1; // set terminating bit to 1
164
        return(crc);
165
}
1 ingob 166
 
41 ingob 167
u8 SDC_WaitForBusy(u32 timeout)
24 StephanB 168
{
169
        u8 rsp = 0;
41 ingob 170
        u32 timestamp = 0;
1 ingob 171
 
24 StephanB 172
        SSC_ClearRxFifo();
173
        SSC_Enable();                           // enable chipselect.
41 ingob 174
        timestamp = SetDelay(timeout);
24 StephanB 175
        do     
1 ingob 176
        {
24 StephanB 177
                rsp = SSC_GetChar();
378 holgerb 178
                if(CheckDelay(timestamp))  break;
362 holgerb 179
        }while(rsp != 0xFF && (SD_WatchDog));           // wait while card is busy (data out low)
24 StephanB 180
        return(rsp);
181
}
182
 
183
 
184
 
185
//________________________________________________________________________________________________________________________________________
186
// Function:    SDC_SendCMDR1(u8 CmdNo, u32 arg);
187
// 
188
// Description: This function send a command frame to the SD-Card in spi-mode. 
189
//                              
190
//
191
// Returnvalue: The function returns the first response byte like for R1 commands
192
//________________________________________________________________________________________________________________________________________
193
u8 SDC_SendCMDR1(u8 CmdNo, u32 arg)
194
{
195
        u8 r1;
41 ingob 196
        u16 timeout = 0;
24 StephanB 197
        u16 a;
198
        u8 cmd[6];
199
 
200
        SSC_ClearRxFifo();      // clear the rx fifo
201
        SSC_Enable();           // enable chipselect.
378 holgerb 202
        SDC_WaitForBusy(600);   // wait 500ms until card is busy
24 StephanB 203
        SSC_ClearRxFifo();      // clear the rx fifo
204
        SSC_GetChar();      // dummy to sync
205
 
206
        cmd[0] = 0x40|CmdNo; // set command index
207
        cmd[1] = (arg & 0xFF000000)>>24;
208
        cmd[2] = (arg & 0x00FF0000)>>16;
209
        cmd[3] = (arg & 0x0000FF00)>>8;
210
        cmd[4] = (arg & 0x000000FF);
211
        cmd[5] = CRC7(cmd, 5); // update checksum 
212
        for (a = 0;a < 6; a++) // send the command sequence to the sdcard (6 bytes)
213
        {      
214
                SSC_PutChar(cmd[a]);
1 ingob 215
        }
24 StephanB 216
        SSC_ClearRxFifo();      // clear the rx fifo to discard the bytes received during the transmission of the 6 command bytes
41 ingob 217
 
24 StephanB 218
        do                                     
1 ingob 219
        {
24 StephanB 220
                r1 = SSC_GetChar();       // get byte from sd-card
41 ingob 221
                if (timeout++ >500) break;
362 holgerb 222
        }while(r1 == 0xFF && (SD_WatchDog)); // wait for the response byte from sd-card.
24 StephanB 223
        return(r1);
1 ingob 224
}
225
 
226
 
24 StephanB 227
//________________________________________________________________________________________________________________________________________
228
// Function:    SDC_SendACMDR1(u8 CmdNo, u32 arg);
41 ingob 229
//                                         
24 StephanB 230
// Description: This function send a application command frame to the SD-Card in spi-mode. 
231
//                              
232
//
233
// Returnvalue: The function returns the first response byte like for R1 commands
234
//________________________________________________________________________________________________________________________________________
235
u8 SDC_SendACMDR1(u8 CmdNo, u32 arg)
236
{
237
        u8 r1 = 0xFF;
238
        r1 = SDC_SendCMDR1(CMD_APP_CMD, 0UL);
239
        if(r1 & R1_BAD_RESPONSE) return(r1);
240
        r1 = SDC_SendCMDR1(CmdNo, arg);
241
        return(r1);
242
}
1 ingob 243
 
244
 
245
//________________________________________________________________________________________________________________________________________
24 StephanB 246
// Function:    SDC_GetData(u8 * cmd ,u8 *Buffer, u32 len);
1 ingob 247
// 
24 StephanB 248
// Description: This function sneds cmd an reads a datablock of len from the sd-card
1 ingob 249
//                              
250
//
24 StephanB 251
// Returnvalue: SD_Result_t
1 ingob 252
//________________________________________________________________________________________________________________________________________
253
 
24 StephanB 254
SD_Result_t SDC_GetData(u8 CmdNo, u32 addr, u8 *Buffer, u32 len)
1 ingob 255
{
24 StephanB 256
        u8 rsp;        
41 ingob 257
        u16 a, crc16;
146 killagreg 258
        u32 timeout;
24 StephanB 259
        SD_Result_t result = SD_ERROR_UNKNOWN;
1 ingob 260
 
24 StephanB 261
        // send the command     
262
        rsp = SDC_SendCMDR1(CmdNo, addr);
263
        if (rsp != R1_NO_ERR)
1 ingob 264
        {
24 StephanB 265
                result = SD_ERROR_BAD_RESPONSE;
266
                goto end;
1 ingob 267
        }
268
        SSC_ClearRxFifo();
146 killagreg 269
        timeout = SetDelay(500);
24 StephanB 270
        do
1 ingob 271
        {
24 StephanB 272
                rsp = SSC_GetChar();
146 killagreg 273
                if( ( (rsp & 0xF0) == 0x00 ) || CheckDelay(timeout) ) // data error token or timeout 
1 ingob 274
                {
24 StephanB 275
                        result = SD_ERROR_READ_DATA;
276
                        goto end;
1 ingob 277
                }
362 holgerb 278
        }while(rsp != DATA_START_TOKEN && (SD_WatchDog));
24 StephanB 279
        // data start token received
280
        for (a = 0; a < len; a++)       // read the block from the SSC
281
        {
282
                Buffer[a] = SSC_GetChar();
1 ingob 283
        }
24 StephanB 284
        // Read two bytes CRC16-Data checksum
146 killagreg 285
        crc16 = SSC_GetChar(); // highbyte first        
41 ingob 286
        crc16 = (crc16<<8)|SSC_GetChar(); // lowbyte last
287
/*      if(crc16 != CRC16(Buffer, len)) result = SD_ERROR_CRC_DATA;
364 ingob 288
        else */
289
        result = SD_SUCCESS;
24 StephanB 290
        end:
291
        if(result != SD_SUCCESS)
292
        {
293
                sprintf(text,"Error %02X reading data from sd card (R1=%02X).\r\n", result, rsp);
110 killagreg 294
                UART1_PutString(text);
24 StephanB 295
        }
296
        return(result);
297
}
1 ingob 298
 
24 StephanB 299
 
300
//________________________________________________________________________________________________________________________________________
301
// Function:    SDC_PrintCID(u8 * pCID);
302
// 
303
// Description: This function prints the CIS register in a human readable format. 
304
//                              
305
//
306
// Returnvalue: the function returns nothing
307
//________________________________________________________________________________________________________________________________________
308
 
309
void SDC_PrintCID(u8 * pCID)
310
{
311
        u8 pn[6];
312
        u16 temp1, temp2;
313
 
41 ingob 314
        sprintf(text, "\r\n Manufacturer ID: %i\r\n", pCID[0]);
110 killagreg 315
        UART1_PutString(text);
24 StephanB 316
        memcpy(pn, &pCID[1], 2);
317
        pn[2] = '\0'; // terminate string
41 ingob 318
        sprintf(text, " Application ID: %s\r\n",pn);
110 killagreg 319
        UART1_PutString(text);
24 StephanB 320
        memcpy(pn, &pCID[3], 5);
321
        pn[5] = '\0'; // terminate string
41 ingob 322
        sprintf(text, " Product Name: %s\r\n",pn);
110 killagreg 323
        UART1_PutString(text);
41 ingob 324
        sprintf(text, " Product Rev.: %i.%i\r\n",pCID[8]>>4, pCID[8]&0xF);
110 killagreg 325
        UART1_PutString(text);
326
        UART1_PutString(" Serial No.: ");
24 StephanB 327
        for(temp1 = 0; temp1<4; temp1++)
328
        {
329
                sprintf(text,"%02X", pCID[9+temp1]);
110 killagreg 330
                UART1_PutString(text);
24 StephanB 331
        }
110 killagreg 332
        UART1_PutString("\r\n");
24 StephanB 333
        temp1 = pCID[14] & 0x0F;    // month 
334
        temp2 = ((pCID[14]>>4)|(pCID[13]<<4)) + 2000; // year 
41 ingob 335
        sprintf(text, " Manufac. Date: %i/%i\r\n\r\n",temp1, temp2);
110 killagreg 336
        UART1_PutString(text);
1 ingob 337
}
338
 
24 StephanB 339
//________________________________________________________________________________________________________________________________________
340
// Funtion:     SDC_GetCID(u8 * pCID);
341
// 
342
// Description: This function reads the CIS register form the sd card in spi mode. 
343
//                              
344
//
345
// Returnvalue: the function returns error state
346
//________________________________________________________________________________________________________________________________________
1 ingob 347
 
24 StephanB 348
SD_Result_t SDC_GetCID(u8 * pCID)
349
{
350
        return SDC_GetData(CMD_SEND_CID, 0UL, pCID, 16);
351
}
1 ingob 352
 
24 StephanB 353
//________________________________________________________________________________________________________________________________________
354
// Funtion:     SDC_GetCSD(u8 * pCSD);
355
// 
356
// Description: This function reads the CSD register form the sd card in spi mode. 
357
//                              
358
//
359
// Returnvalue: the function returns error state
360
//________________________________________________________________________________________________________________________________________
1 ingob 361
 
24 StephanB 362
SD_Result_t SDC_GetCSD(u8 * pCSD)
363
{
364
        return SDC_GetData(CMD_SEND_CSD, 0UL, pCSD, 16);
365
}
366
 
367
 
1 ingob 368
//________________________________________________________________________________________________________________________________________
24 StephanB 369
// Funtion:     SDC_Init(void);
1 ingob 370
// 
24 StephanB 371
// Description: This function initialises the SDCard to spi-mode. 
1 ingob 372
//                              
373
//
24 StephanB 374
// Returnvalue: the function returns 0 if the initialisation was successfull otherwise the function returns an errorcode.
1 ingob 375
//________________________________________________________________________________________________________________________________________
376
 
24 StephanB 377
SD_Result_t SDC_Init(void)
1 ingob 378
{
41 ingob 379
        u32 timeout = 0;
24 StephanB 380
        u8 rsp[6]; // SD-SPI response buffer
381
        SD_Result_t result = SD_ERROR_UNKNOWN;
382
 
383
        if(SD_SWITCH) // init only if the SD-Switch is indicating a card in the slot
384
        {
110 killagreg 385
                UART1_PutString("\r\n SSC init...");
24 StephanB 386
                SSC_Init();
110 killagreg 387
                UART1_PutString("ok");
41 ingob 388
 
110 killagreg 389
                UART1_PutString("\r\n SDC init...");
24 StephanB 390
                SDCardInfo.Valid = 0;
391
                /* The host shall supply power to the card so that the voltage is reached to Vdd_min within 250ms and
392
                start to supply at least 74 SD clocks to the SD card with keeping cmd line to high. In case of SPI
393
                mode, CS shall be held to high during 74 clock cycles. */
394
                SSC_Disable(); // set SD_CS high
395
                SSC_ClearRxFifo();      // clear the rx fifo
1 ingob 396
 
41 ingob 397
                for (timeout = 0; timeout < 15; timeout++)      // 15*8 = 120 cycles
24 StephanB 398
                {
399
                        SSC_PutChar(0xFF);
400
                }
401
 
402
                // switch to idle state
403
                while(SDC_SendCMDR1(CMD_GO_IDLE_STATE, 0UL) != R1_IDLE_STATE)                                          
404
                {
41 ingob 405
                        if (timeout++ > 20)
24 StephanB 406
                        {
110 killagreg 407
                                UART1_PutString("reset timeout");
24 StephanB 408
                                result = SD_ERROR_RESET;
409
                                goto end;                                                                              
410
                        }
411
                }
412
            // enable crc feature
413
/*              if(SDC_SendCMDR1(CMD_CRC_ON_OFF, 1UL) != R1_IDLE_STATE)
414
                {
41 ingob 415
                                sprintf(text,"Bad cmd59 R1=%02X.", rsp[0]);
110 killagreg 416
                                UART1_PutString(text);
24 StephanB 417
                                result = SD_ERROR_BAD_RESPONSE;
418
                                goto end;
419
                }*/
420
                // check for card hw version                                            
421
                // 2.7-3.6V Range = 0x01, check pattern 0xAA
422
                rsp[0] = SDC_SendCMDR1(CMD_SEND_IF_COND, 0x000001AA);
423
                // answer to cmd58 is an R7 response (R1+ 4Byte IFCond)
424
                if(rsp[0] & R1_BAD_RESPONSE)
425
                {
41 ingob 426
                        sprintf(text,"Bad cmd8 R1=%02X.", rsp[0]);
110 killagreg 427
                        UART1_PutString(text);
24 StephanB 428
                        result = SD_ERROR_BAD_RESPONSE;
429
                        goto end;
430
                }
431
                if(rsp[0] & R1_ILLEGAL_CMD)
432
                {
433
                        //Ver1.X SD Memory Card or not a SD Memory Card
434
                        SDCardInfo.Version = VER_1X;                   
435
                }
436
                else
437
                {
438
                   // Ver2.00 or later SD Memory Card
439
                   // reading the remaining bytes of the R7 response
440
                   SDCardInfo.Version = VER_20;
41 ingob 441
                   for(timeout = 1; timeout < 5; timeout++)
24 StephanB 442
                   {
41 ingob 443
                                rsp[timeout] = SSC_GetChar();
24 StephanB 444
                   }
445
                   //check pattern
446
                   if(rsp[4]!= 0xAA)
447
                   {
110 killagreg 448
                                UART1_PutString("Bad cmd8 R7 check pattern.\r\n");
24 StephanB 449
                                result = SD_ERROR_BAD_RESPONSE;
450
                                goto end;
451
                   }
452
                   if ( (rsp[3] & 0x0F)!= 0x01 ) // voltage range is not 2.7-3.6V
453
                   {
454
 
110 killagreg 455
                                UART1_PutString("Card is incompatible to 3.3V.\r\n");
24 StephanB 456
                                result = SD_ERROR_BAD_VOLTAGE_RANGE;
457
                                goto end;              
458
                   }
459
                }
460
 
461
                rsp[0] = SDC_SendCMDR1(CMD_READ_OCR, 0UL);
462
                // answer to cmd58 is an R3 response (R1 + 4Byte OCR)
463
                if(rsp[0] & R1_BAD_RESPONSE)
464
                {
41 ingob 465
                        sprintf(text,"Bad cmd58 R1 %02x.", rsp[0]);
110 killagreg 466
                        UART1_PutString(text);
24 StephanB 467
                        result = SD_ERROR_BAD_RESPONSE;
468
                        goto end;
469
                }
470
                if(rsp[0] & R1_ILLEGAL_CMD)
471
                {
110 killagreg 472
                        UART1_PutString("Not an SD-CARD.");
24 StephanB 473
                        result = SD_ERROR_NO_SDCARD;
474
                        goto end;
475
                }
476
                // read 4 bytes of OCR register
41 ingob 477
                for(timeout = 1; timeout < 5; timeout++)
24 StephanB 478
                {
41 ingob 479
                        rsp[timeout] = SSC_GetChar();
24 StephanB 480
                }
481
                //      NavicCtrl uses 3.3 V,  therefore check for bit 20 & 21 
482
                if((rsp[2] & 0x30) != 0x30)
483
                {
484
                        // supply voltage is not supported by sd-card
110 killagreg 485
                        UART1_PutString("Card is incompatible to 3.3V.");
24 StephanB 486
                        result = SD_ERROR_BAD_VOLTAGE_RANGE;
487
                        goto end;
488
                }
489
 
490
                // Initialize the sd-card sending continously ACMD_SEND_OP_COND (only supported by SD cards)
41 ingob 491
                timeout =  SetDelay(2000); // set timeout to 2000 ms (large cards tend to longer) 
24 StephanB 492
                do
493
                {
494
                        rsp[0] = SDC_SendACMDR1(ACMD_SEND_OP_COND, 0UL);
495
                        if(rsp[0] & R1_BAD_RESPONSE)
496
                        {
41 ingob 497
                                sprintf(text,"Bad Acmd41 R1=%02X.", rsp[0]);
110 killagreg 498
                                UART1_PutString(text);
24 StephanB 499
                                result = SD_ERROR_BAD_RESPONSE;
500
                                goto end;
501
                        }
41 ingob 502
                        if(CheckDelay(timeout))
24 StephanB 503
                        {
110 killagreg 504
                            UART1_PutString("Init timeout.");
24 StephanB 505
                                result = SD_ERROR_INITIALIZE;
506
                                goto end;
507
                        }
508
                } while(rsp[0] & R1_IDLE_STATE); // loop until idle state
509
 
510
                if(rsp[0] != R1_NO_ERR)
511
                {
110 killagreg 512
                        UART1_PutString("Init error.");
24 StephanB 513
                        result = SD_ERROR_INITIALIZE;
514
                        goto end;      
515
                }
516
                /* set block size to 512 bytes */
517
        if(SDC_SendCMDR1(CMD_SET_BLOCKLEN, 512UL) != R1_NO_ERR)
518
        {
110 killagreg 519
                UART1_PutString("Error setting block length to 512.");
24 StephanB 520
                        result = SD_ERROR_SET_BLOCKLEN;
521
                        goto end;
522
        }
41 ingob 523
 
524
                //SSC_Disable(); // set SD_CS high                                                                       
24 StephanB 525
                // here is the right place to inrease the SPI boud rate to maximum              
526
                //SSC_Enable(); // set SD_CS high
527
 
528
                // read CID register
529
                result = SDC_GetCID((u8 *)&SDCardInfo.CID);
530
                if(result != SD_SUCCESS)
531
                {
110 killagreg 532
                        UART1_PutString("Error reading CID.\r\n");
24 StephanB 533
                        goto end;
534
                }
1 ingob 535
 
24 StephanB 536
                // read CSD register
537
                result = SDC_GetCSD((u8 *)&SDCardInfo.CSD);
538
                if(result != SD_SUCCESS)
539
                {
110 killagreg 540
                        UART1_PutString("Error reading CSD.");
24 StephanB 541
                        goto end;
542
                }
1 ingob 543
 
110 killagreg 544
                UART1_PutString("ok\r\n");
24 StephanB 545
 
546
                u8 c_size_mult, read_bl_len;
547
                u32 c_size;
548
 
549
                switch(SDCardInfo.CSD[0]>>6) // check CSD Version
550
                {
551
                case 0x00: // if CSD is V1.0 structure (2GB limit)
552
 
553
                        /*
554
                        memory capacity = BLOCKNR * BLOCK_LEN
555
                        BLOCKNR = (C_SIZE+1) * MULT
556
                        MULT = 2^(C_SIZE_MULT+2)
557
                        BLOCK_LEN = 2^READ_BL_LEN
558
 
559
                        C_SIZE      is 12 bits [73:62] in CSD register
560
                        C_SIZE_MULT is  3 bits [49:47] in CSD register
561
                        READ_BL_LEN is  4 bits [83:80] in CSD register
562
                        */
563
 
564
                        read_bl_len = (SDCardInfo.CSD[5] & 0x0F);               //CSD[05] -> [87:80]
565
                        c_size = ((u32)(SDCardInfo.CSD[6] & 0x03))<<10; //CSD[06] -> [79:72]
566
                        c_size |= ((u32)SDCardInfo.CSD[7])<<2;                  //CSD[07] -> [71:64]
567
                        c_size |= (u32)(SDCardInfo.CSD[8]>>6);                  //CSD[08] -> [63:56]
568
                        c_size_mult = (SDCardInfo.CSD[9] & 0x03)<<1;    //CSD[09] -> [55:48]
569
                        c_size_mult |=(SDCardInfo.CSD[10] & 0x80)>>7;   //CSD[10] -> [47:40]
570
                        SDCardInfo.Capacity = (u32)(c_size+1)*(1L<<(c_size_mult+2))*(1L<<read_bl_len);
571
                        break;
572
 
573
                case 0x01: // if CSD is V2.0 structure (HC SD-Card > 2GB) 
574
 
575
                        /*
576
                        memory capacity = (C_SIZE+1) * 512K byte
577
                        C_SIZE is 22 bits [69:48] in CSR register
578
                        */
579
 
580
                        c_size = ((u32)(SDCardInfo.CSD[7] & 0x3F))<<16; //CSD[07] -> [71:64]
581
                        c_size |= ((u32)SDCardInfo.CSD[8])<<8;                  //CSD[08] -> [63:56]
582
                        c_size |= (u32)SDCardInfo.CSD[9];                               //CSD[09] -> [55:48];
583
                        SDCardInfo.Capacity = (c_size + 1)* 512L * 1024L;
41 ingob 584
                        break;
585
 
586
                default: //unknown CSD Version
24 StephanB 587
                        SDCardInfo.Capacity = 0;
588
                        break; 
589
                }
590
 
591
                switch(SDCardInfo.Version)
592
                {
593
                        case VER_1X:
149 killagreg 594
                                UART1_PutString(" SD-CARD V1.x");
24 StephanB 595
                                break;
596
                        case VER_20:
149 killagreg 597
                                UART1_PutString(" SD-CARD V2.0 or later");
24 StephanB 598
                        default:
599
                                break;
600
                }
601
                u16 mb_size = (u16)(SDCardInfo.Capacity/(1024L*1024L));
149 killagreg 602
                sprintf(text, "\r\n Capacity = %i MB", mb_size);
110 killagreg 603
                UART1_PutString(text);
24 StephanB 604
 
41 ingob 605
                SDC_PrintCID((u8 *)&SDCardInfo.CID);
24 StephanB 606
                SDCardInfo.Valid = 1;
607
                // jump point for error condition before
608
                end:
609
                SSC_Disable();
610
        }
611
        else
1 ingob 612
        {
24 StephanB 613
                SSC_Deinit();
614
                SDCardInfo.Valid = 0;
615
                result = SD_ERROR_NOCARD;
110 killagreg 616
                UART1_PutString("No Card in Slot.");
1 ingob 617
        }
24 StephanB 618
        return(result);
1 ingob 619
}
620
 
621
 
622
//________________________________________________________________________________________________________________________________________
24 StephanB 623
// Funtion:     SDC_Deinit(void);
1 ingob 624
// 
24 StephanB 625
// Description: This function deinitialises the SDCard interface. 
1 ingob 626
//                              
627
//
324 killagreg 628
// Returnvalue: the function returns 0 if the deinitialisation was successfull otherwise the function returns an errorcode.
1 ingob 629
//________________________________________________________________________________________________________________________________________
630
 
24 StephanB 631
SD_Result_t SDC_Deinit(void)
632
{
110 killagreg 633
        UART1_PutString("\r\n SDC deinit...");
364 ingob 634
        // SSC_Deinit();
1 ingob 635
 
24 StephanB 636
        SDCardInfo.Valid = 0;
637
        SDCardInfo.Capacity = 0;
638
        SDCardInfo.Version = VER_UNKNOWN;
1 ingob 639
 
110 killagreg 640
        UART1_PutString("ok");
24 StephanB 641
        return(SD_SUCCESS);
1 ingob 642
}
643
 
644
 
645
//________________________________________________________________________________________________________________________________________
24 StephanB 646
// Funtion:     SDC_PutSector(void);
1 ingob 647
// 
24 StephanB 648
// Description: This function writes one sector of data to the SSC 
1 ingob 649
//                              
650
//
24 StephanB 651
// Returnvalue: SD_Result_t
1 ingob 652
//________________________________________________________________________________________________________________________________________
653
 
24 StephanB 654
SD_Result_t SDC_PutSector(u32 addr, const u8 *Buffer)
655
{
656
        u8 rsp;
41 ingob 657
        u16 a, crc16;
24 StephanB 658
        u16 timeout = 0;
659
        SD_Result_t result = SD_ERROR_UNKNOWN;
660
 
661
        addr = addr << 9; // convert sectoradress to byteadress
662
        rsp = SDC_SendCMDR1(CMD_WRITE_SINGLE_BLOCK, addr);
663
        if (rsp != R1_NO_ERR)
1 ingob 664
        {
24 StephanB 665
                result = SD_ERROR_BAD_RESPONSE;
666
                goto end;
1 ingob 667
        }
668
        SSC_ClearRxFifo();             
24 StephanB 669
        for (a=0;a<20;a++)                                      // at least one byte
1 ingob 670
        {
24 StephanB 671
                SSC_GetChar();
1 ingob 672
        }
41 ingob 673
        crc16 = CRC16(Buffer, 512);         // calc checksum for data block
24 StephanB 674
        SSC_PutChar(DATA_START_TOKEN);          // send data start of header to the SSC 
1 ingob 675
 
24 StephanB 676
        for (a=0;a<512;a++)                                     // transmit one sector (normaly 512bytes) of data to the sdcard.
677
        {
678
                SSC_PutChar(Buffer[a]);
679
        }
680
        // write two bytes of crc16 to the sdcard
41 ingob 681
        SSC_PutChar((u8)(crc16>>8));            // write high byte first
682
        SSC_PutChar((u8)(0x00FF&crc16));        // lowbyte last
24 StephanB 683
        SSC_ClearRxFifo();
684
        do                                                                      // wait for data response token
685
        {
686
                rsp = SSC_GetChar();
41 ingob 687
                if(timeout++ > 500)
688
                {
689
                        result = SD_ERROR_TIMEOUT;
690
                        goto end;
691
                }
24 StephanB 692
        }while((rsp & 0x11) != 0x01 );
324 killagreg 693
 
24 StephanB 694
        // analyse data response token
695
        switch(rsp & DATA_RESPONSE_MASK)
696
        {
697
                case DATA_RESPONSE_OK:
698
                        result = SD_SUCCESS;
699
                        break;
700
                case DATA_RESPONSE_CRC_ERR:
701
                        result = SD_ERROR_CRC_DATA;
702
                        goto end;
703
                        break;
704
                case DATA_RESPONSE_WRITE_ERR:
705
                        result = SD_ERROR_WRITE_DATA;
706
                        goto end;
707
                        break;
708
                default:
709
                        result = SD_ERROR_UNKNOWN;
710
                        goto end;
711
                        break;
712
 
713
        }
41 ingob 714
        // wait 2 seconds until the sdcard is busy.
715
        rsp = SDC_WaitForBusy(2000);
24 StephanB 716
        if(rsp != 0xFF)
717
        {
41 ingob 718
                result =  SD_ERROR_TIMEOUT;
719
                goto end;
24 StephanB 720
        }
41 ingob 721
 
24 StephanB 722
        // check card status
723
        rsp = SDC_SendCMDR1(CMD_SEND_STATUS, 0);
41 ingob 724
        // first byte of R2 response is like R1 response
24 StephanB 725
        if(rsp != R1_NO_ERR)
726
        {
727
                result =  SD_ERROR_BAD_RESPONSE;
41 ingob 728
                SSC_GetChar(); // read out 2nd byte
24 StephanB 729
                goto end;
730
        }
731
        // 2nd byte of r2 response
732
        rsp = SSC_GetChar();
733
        if(rsp != R2_NO_ERR)
734
        {
735
                result =  SD_ERROR_WRITE_DATA;
736
                SSC_GetChar();
737
                goto end;
738
        }
739
        end:
740
        if(result != SD_SUCCESS)
741
        {
742
                sprintf(text,"Error %02X writing data to sd card (R=%02X).\r\n", result, rsp);
110 killagreg 743
                UART1_PutString(text);
24 StephanB 744
        }
362 holgerb 745
 
24 StephanB 746
        return(result);
41 ingob 747
}
24 StephanB 748
 
749
 
750
//________________________________________________________________________________________________________________________________________
751
// Funtion:     SDC_GetSector(u32 addr,u8 *Buffer);
752
// 
753
// Description: This function reads one sector of data from the SSC
754
//                              
755
//
756
// Returnvalue: SD_Result_t
757
//________________________________________________________________________________________________________________________________________
758
 
759
SD_Result_t SDC_GetSector(u32 addr,u8 *Buffer)
760
{
761
        addr = addr << 9; // convert sectoradress to byteadress
762
        return SDC_GetData(CMD_READ_SINGLE_BLOCK, addr, Buffer, 512);
1 ingob 763
}
764
 
765
 
766