OpenCores
URL https://opencores.org/ocsvn/sd_card_controller/sd_card_controller/trunk

Subversion Repositories sd_card_controller

[/] [sd_card_controller/] [trunk/] [sw/] [example/] [src/] [mmc.c] - Blame information for rev 3

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 3 rozpruwacz
/*
2
 * Copyright 2008, Freescale Semiconductor, Inc
3
 * Andy Fleming
4
 *
5
 * Based vaguely on the Linux code
6
 *
7
 * See file CREDITS for list of people who contributed to this
8
 * project.
9
 *
10
 * This program is free software; you can redistribute it and/or
11
 * modify it under the terms of the GNU General Public License as
12
 * published by the Free Software Foundation; either version 2 of
13
 * the License, or (at your option) any later version.
14
 *
15
 * This program is distributed in the hope that it will be useful,
16
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18
 * GNU General Public License for more details.
19
 *
20
 * You should have received a copy of the GNU General Public License
21
 * along with this program; if not, write to the Free Software
22
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
23
 * MA 02111-1307 USA
24
 */
25
 
26
#include "mmc.h"
27
#include <stdio.h>
28
#include <string.h>
29
 
30
void udelay(int t) {
31
#define US_DELAY 100
32
        volatile int us = US_DELAY;
33
        while(t--) {
34
                us = US_DELAY;
35
                while(us--);
36
        }
37
}
38
 
39
/* frequency bases */
40
/* divided by 10 to be nice to platforms without floating point */
41
static const int fbase[] = {
42
        10000,
43
        100000,
44
        1000000,
45
        10000000,
46
};
47
 
48
/* Multiplier values for TRAN_SPEED.  Multiplied by 10 to be nice
49
 * to platforms without floating point.
50
 */
51
static const int multipliers[] = {
52
        0,       /* reserved */
53
        10,
54
        12,
55
        13,
56
        15,
57
        20,
58
        25,
59
        30,
60
        35,
61
        40,
62
        45,
63
        50,
64
        55,
65
        60,
66
        70,
67
        80,
68
};
69
 
70
static void mmc_set_ios(struct mmc *mmc)
71
{
72
        mmc->set_ios(mmc);
73
}
74
 
75
static void mmc_set_bus_width(struct mmc *mmc, uint width)
76
{
77
        mmc->bus_width = width;
78
 
79
        mmc_set_ios(mmc);
80
}
81
 
82
static void mmc_set_clock(struct mmc *mmc, uint clock)
83
{
84
        if (clock > mmc->f_max)
85
                clock = mmc->f_max;
86
 
87
        if (clock < mmc->f_min)
88
                clock = mmc->f_min;
89
 
90
        mmc->clock = clock;
91
 
92
        mmc_set_ios(mmc);
93
}
94
 
95
static int mmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd, struct mmc_data *data)
96
{
97
        int ret;
98
 
99
        ret = mmc->send_cmd(mmc, cmd, data);
100
 
101
        return ret;
102
}
103
 
104
static int mmc_go_idle(struct mmc* mmc)
105
{
106
        struct mmc_cmd cmd;
107
        int err;
108
 
109
        udelay(1000);
110
 
111
        cmd.cmdidx = MMC_CMD_GO_IDLE_STATE;
112
        cmd.cmdarg = 0;
113
        cmd.resp_type = MMC_RSP_NONE;
114
 
115
        err = mmc_send_cmd(mmc, &cmd, NULL);
116
 
117
        if (err)
118
                return err;
119
 
120
        udelay(2000);
121
 
122
        return 0;
123
}
124
 
125
static int mmc_send_if_cond(struct mmc *mmc)
126
{
127
        struct mmc_cmd cmd;
128
        int err;
129
 
130
        cmd.cmdidx = SD_CMD_SEND_IF_COND;
131
        /* We set the bit if the host supports voltages between 2.7 and 3.6 V */
132
        cmd.cmdarg = ((mmc->voltages & 0xff8000) != 0) << 8 | 0xaa;
133
        cmd.resp_type = MMC_RSP_R7;
134
 
135
        err = mmc_send_cmd(mmc, &cmd, NULL);
136
 
137
        if (err)
138
                return err;
139
 
140
        if ((cmd.response[0] & 0xff) != 0xaa)
141
                return UNUSABLE_ERR;
142
        else
143
                mmc->version = SD_VERSION_2;
144
 
145
        return 0;
146
}
147
 
148
static int sd_send_op_cond(struct mmc *mmc)
149
{
150
        int timeout = 1000;
151
        int err;
152
        struct mmc_cmd cmd;
153
 
154
        do {
155
                cmd.cmdidx = MMC_CMD_APP_CMD;
156
                cmd.resp_type = MMC_RSP_R1;
157
                cmd.cmdarg = 0;
158
 
159
                err = mmc_send_cmd(mmc, &cmd, NULL);
160
 
161
                if (err)
162
                        return err;
163
 
164
                cmd.cmdidx = SD_CMD_APP_SEND_OP_COND;
165
                cmd.resp_type = MMC_RSP_R3;
166
 
167
                /*
168
                 * Most cards do not answer if some reserved bits
169
                 * in the ocr are set. However, Some controller
170
                 * can set bit 7 (reserved for low voltages), but
171
                 * how to manage low voltages SD card is not yet
172
                 * specified.
173
                 */
174
                cmd.cmdarg = (mmc->voltages & 0xff8000);
175
 
176
                if (mmc->version == SD_VERSION_2)
177
                        cmd.cmdarg |= OCR_HCS;
178
 
179
                err = mmc_send_cmd(mmc, &cmd, NULL);
180
 
181
                if (err)
182
                        return err;
183
 
184
                udelay(1000);
185
        } while ((!(cmd.response[0] & OCR_BUSY)) && timeout--);
186
 
187
        if (timeout <= 0)
188
                return UNUSABLE_ERR;
189
 
190
        if (mmc->version != SD_VERSION_2)
191
                mmc->version = SD_VERSION_1_0;
192
 
193
        mmc->ocr = cmd.response[0];
194
 
195
        mmc->high_capacity = ((mmc->ocr & OCR_HCS) == OCR_HCS);
196
        mmc->rca = 0;
197
 
198
        return 0;
199
}
200
 
201
static int mmc_send_op_cond(struct mmc *mmc)
202
{
203
        int timeout = 10000;
204
        struct mmc_cmd cmd;
205
        int err;
206
 
207
        /* Some cards seem to need this */
208
        mmc_go_idle(mmc);
209
 
210
        /* Asking to the card its capabilities */
211
        cmd.cmdidx = MMC_CMD_SEND_OP_COND;
212
        cmd.resp_type = MMC_RSP_R3;
213
        cmd.cmdarg = 0;
214
 
215
        err = mmc_send_cmd(mmc, &cmd, NULL);
216
 
217
        if (err)
218
                return err;
219
 
220
        udelay(1000);
221
 
222
        do {
223
                cmd.cmdidx = MMC_CMD_SEND_OP_COND;
224
                cmd.resp_type = MMC_RSP_R3;
225
                cmd.cmdarg =
226
                                (mmc->voltages &
227
                                (cmd.response[0] & OCR_VOLTAGE_MASK)) |
228
                                (cmd.response[0] & OCR_ACCESS_MODE);
229
 
230
                if (mmc->host_caps & MMC_MODE_HC)
231
                        cmd.cmdarg |= OCR_HCS;
232
 
233
                err = mmc_send_cmd(mmc, &cmd, NULL);
234
 
235
                if (err)
236
                        return err;
237
 
238
                udelay(1000);
239
        } while (!(cmd.response[0] & OCR_BUSY) && timeout--);
240
 
241
        if (timeout <= 0)
242
                return UNUSABLE_ERR;
243
 
244
        mmc->version = MMC_VERSION_UNKNOWN;
245
        mmc->ocr = cmd.response[0];
246
 
247
        mmc->high_capacity = ((mmc->ocr & OCR_HCS) == OCR_HCS);
248
        mmc->rca = 0;
249
 
250
        return 0;
251
}
252
 
253
static int mmc_send_status(struct mmc *mmc, int timeout)
254
{
255
        struct mmc_cmd cmd;
256
        int err, retries = 5;
257
 
258
        cmd.cmdidx = MMC_CMD_SEND_STATUS;
259
        cmd.resp_type = MMC_RSP_R1;
260
        cmd.cmdarg = mmc->rca << 16;
261
 
262
        do {
263
                err = mmc_send_cmd(mmc, &cmd, NULL);
264
                if (!err) {
265
                        if ((cmd.response[0] & MMC_STATUS_RDY_FOR_DATA) &&
266
                            (cmd.response[0] & MMC_STATUS_CURR_STATE) !=
267
                             MMC_STATE_PRG)
268
                                break;
269
                        else if (cmd.response[0] & MMC_STATUS_MASK) {
270
                                printf("Status Error: 0x%08X\n\r",
271
                                        cmd.response[0]);
272
                                return COMM_ERR;
273
                        }
274
                } else if (--retries < 0)
275
                        return err;
276
 
277
                udelay(1000);
278
 
279
        } while (timeout--);
280
 
281
        if (timeout <= 0) {
282
                printf("Timeout waiting card ready\n\r");
283
                return TIMEOUT;
284
        }
285
 
286
        return 0;
287
}
288
 
289
static int mmc_send_ext_csd(struct mmc *mmc, char *ext_csd)
290
{
291
        struct mmc_cmd cmd;
292
        struct mmc_data data;
293
        int err;
294
 
295
        /* Get the Card Status Register */
296
        cmd.cmdidx = MMC_CMD_SEND_EXT_CSD;
297
        cmd.resp_type = MMC_RSP_R1;
298
        cmd.cmdarg = 0;
299
 
300
        data.dest = (char *)ext_csd;
301
        data.blocks = 1;
302
        data.blocksize = 512;
303
        data.flags = MMC_DATA_READ;
304
 
305
        err = mmc_send_cmd(mmc, &cmd, &data);
306
 
307
        return err;
308
}
309
 
310
static int mmc_switch(struct mmc *mmc, char set, char index, char value)
311
{
312
        struct mmc_cmd cmd;
313
        int timeout = 1000;
314
        int ret;
315
 
316
        cmd.cmdidx = MMC_CMD_SWITCH;
317
        cmd.resp_type = MMC_RSP_R1b;
318
        cmd.cmdarg = (MMC_SWITCH_MODE_WRITE_BYTE << 24) |
319
                                 (index << 16) |
320
                                 (value << 8);
321
 
322
        ret = mmc_send_cmd(mmc, &cmd, NULL);
323
 
324
        /* Waiting for the ready status */
325
        if (!ret)
326
                ret = mmc_send_status(mmc, timeout);
327
 
328
        return ret;
329
 
330
}
331
 
332
static int sd_switch(struct mmc *mmc, int mode, int group, char value, char *resp)
333
{
334
        struct mmc_cmd cmd;
335
        struct mmc_data data;
336
 
337
        /* Switch the frequency */
338
        cmd.cmdidx = SD_CMD_SWITCH_FUNC;
339
        cmd.resp_type = MMC_RSP_R1;
340
        cmd.cmdarg = (mode << 31) | 0xffffff;
341
        cmd.cmdarg &= ~(0xf << (group * 4));
342
        cmd.cmdarg |= value << (group * 4);
343
 
344
        data.dest = (char *)resp;
345
        data.blocksize = 64;
346
        data.blocks = 1;
347
        data.flags = MMC_DATA_READ;
348
 
349
        return mmc_send_cmd(mmc, &cmd, &data);
350
}
351
 
352
static int sd_change_freq(struct mmc *mmc)
353
{
354
        int err;
355
        struct mmc_cmd cmd;
356
        uint scr[2];
357
        uint switch_status[16];
358
        struct mmc_data data;
359
        int timeout;
360
 
361
        mmc->card_caps = 0;
362
 
363
        /* Read the SCR to find out if this card supports higher speeds */
364
        cmd.cmdidx = MMC_CMD_APP_CMD;
365
        cmd.resp_type = MMC_RSP_R1;
366
        cmd.cmdarg = mmc->rca << 16;
367
 
368
        err = mmc_send_cmd(mmc, &cmd, NULL);
369
 
370
        if (err)
371
                return err;
372
 
373
        cmd.cmdidx = SD_CMD_APP_SEND_SCR;
374
        cmd.resp_type = MMC_RSP_R1;
375
        cmd.cmdarg = 0;
376
 
377
        timeout = 3;
378
 
379
retry_scr:
380
        data.dest = (char *)scr;
381
        data.blocksize = 8;
382
        data.blocks = 1;
383
        data.flags = MMC_DATA_READ;
384
 
385
        err = mmc_send_cmd(mmc, &cmd, &data);
386
 
387
        if (err) {
388
                if (timeout--)
389
                        goto retry_scr;
390
 
391
                return err;
392
        }
393
 
394
        mmc->scr[0] = scr[0];
395
        mmc->scr[1] = scr[1];
396
 
397
        printf("SCR: %08x\n\r", mmc->scr[0]);
398
        printf("     %08x\n\r", mmc->scr[1]);
399
 
400
        switch ((mmc->scr[0] >> 24) & 0xf) {
401
                case 0:
402
                        mmc->version = SD_VERSION_1_0;
403
                        break;
404
                case 1:
405
                        mmc->version = SD_VERSION_1_10;
406
                        break;
407
                case 2:
408
                        mmc->version = SD_VERSION_2;
409
                        break;
410
                default:
411
                        mmc->version = SD_VERSION_1_0;
412
                        break;
413
        }
414
 
415
        if (mmc->scr[0] & SD_DATA_4BIT)
416
                mmc->card_caps |= MMC_MODE_4BIT;
417
 
418
        /* Version 1.0 doesn't support switching */
419
        if (mmc->version == SD_VERSION_1_0)
420
                return 0;
421
 
422
        timeout = 4;
423
        while (timeout--) {
424
                err = sd_switch(mmc, SD_SWITCH_CHECK, 0, 1,
425
                                (char *)switch_status);
426
 
427
                if (err)
428
                        return err;
429
 
430
                printf("switch status 7 %08x\n\r", switch_status[7]);
431
                printf("switch status 3 %08x\n\r", switch_status[3]);
432
                printf("switch status 4 %08x\n\r", switch_status[4]);
433
                /* The high-speed function is busy.  Try again */
434
                if (!(switch_status[7] & SD_HIGHSPEED_BUSY))
435
                        break;
436
        }
437
 
438
        /* If high-speed isn't supported, we return */
439
        if (!(switch_status[3] & SD_HIGHSPEED_SUPPORTED))
440
                return 0;
441
 
442
        /*
443
         * If the host doesn't support SD_HIGHSPEED, do not switch card to
444
         * HIGHSPEED mode even if the card support SD_HIGHSPPED.
445
         * This can avoid furthur problem when the card runs in different
446
         * mode between the host.
447
         */
448
        if (!((mmc->host_caps & MMC_MODE_HS_52MHz) &&
449
                (mmc->host_caps & MMC_MODE_HS)))
450
                return 0;
451
 
452
        err = sd_switch(mmc, SD_SWITCH_SWITCH, 0, 1, (char *)switch_status);
453
 
454
        if (err)
455
                return err;
456
 
457
        if ((switch_status[4] & 0x0f000000) == 0x01000000)
458
                mmc->card_caps |= MMC_MODE_HS;
459
 
460
        return 0;
461
}
462
 
463
static int mmc_change_freq(struct mmc *mmc)
464
{
465
        char ext_csd[512];
466
        char cardtype;
467
        int err;
468
 
469
        mmc->card_caps = 0;
470
 
471
        /* Only version 4 supports high-speed */
472
        if (mmc->version < MMC_VERSION_4)
473
                return 0;
474
 
475
        err = mmc_send_ext_csd(mmc, ext_csd);
476
 
477
        if (err)
478
                return err;
479
 
480
        cardtype = ext_csd[EXT_CSD_CARD_TYPE] & 0xf;
481
 
482
        err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_HS_TIMING, 1);
483
 
484
        if (err)
485
                return err;
486
 
487
        /* Now check to see that it worked */
488
        err = mmc_send_ext_csd(mmc, ext_csd);
489
 
490
        if (err)
491
                return err;
492
 
493
        /* No high-speed support */
494
        if (!ext_csd[EXT_CSD_HS_TIMING])
495
                return 0;
496
 
497
        /* High Speed is set, there are two types: 52MHz and 26MHz */
498
        if (cardtype & MMC_HS_52MHZ)
499
                mmc->card_caps |= MMC_MODE_HS_52MHz | MMC_MODE_HS;
500
        else
501
                mmc->card_caps |= MMC_MODE_HS;
502
 
503
        return 0;
504
}
505
 
506
static int mmc_startup(struct mmc *mmc)
507
{
508
        int err, width;
509
        uint mult, freq;
510
        uint cmult, csize, capacity;
511
        struct mmc_cmd cmd;
512
        char ext_csd[512];
513
        char test_csd[512];
514
        int timeout = 1000;
515
 
516
        /* Put the Card in Identify Mode */
517
        cmd.cmdidx = MMC_CMD_ALL_SEND_CID; /* cmd not supported in spi */
518
        cmd.resp_type = MMC_RSP_R2;
519
        cmd.cmdarg = 0;
520
 
521
        err = mmc_send_cmd(mmc, &cmd, NULL);
522
 
523
        if (err)
524
                return err;
525
 
526
        memcpy(mmc->cid, cmd.response, 16);
527
 
528
        /*
529
         * For MMC cards, set the Relative Address.
530
         * For SD cards, get the Relatvie Address.
531
         * This also puts the cards into Standby State
532
         */
533
        cmd.cmdidx = SD_CMD_SEND_RELATIVE_ADDR;
534
        cmd.cmdarg = mmc->rca << 16;
535
        cmd.resp_type = MMC_RSP_R6;
536
 
537
        err = mmc_send_cmd(mmc, &cmd, NULL);
538
 
539
        if (err)
540
                return err;
541
 
542
        if (IS_SD(mmc))
543
                mmc->rca = (cmd.response[0] >> 16) & 0xffff;
544
 
545
        /* Get the Card-Specific Data */
546
        cmd.cmdidx = MMC_CMD_SEND_CSD;
547
        cmd.resp_type = MMC_RSP_R2;
548
        cmd.cmdarg = mmc->rca << 16;
549
 
550
        err = mmc_send_cmd(mmc, &cmd, NULL);
551
 
552
        /* Waiting for the ready status */
553
        mmc_send_status(mmc, timeout);
554
 
555
        if (err)
556
                return err;
557
 
558
        mmc->csd[0] = cmd.response[0];
559
        mmc->csd[1] = cmd.response[1];
560
        mmc->csd[2] = cmd.response[2];
561
        mmc->csd[3] = cmd.response[3];
562
 
563
        if (mmc->version == MMC_VERSION_UNKNOWN) {
564
                int version = (cmd.response[0] >> 26) & 0xf;
565
 
566
                switch (version) {
567
                        case 0:
568
                                mmc->version = MMC_VERSION_1_2;
569
                                break;
570
                        case 1:
571
                                mmc->version = MMC_VERSION_1_4;
572
                                break;
573
                        case 2:
574
                                mmc->version = MMC_VERSION_2_2;
575
                                break;
576
                        case 3:
577
                                mmc->version = MMC_VERSION_3;
578
                                break;
579
                        case 4:
580
                                mmc->version = MMC_VERSION_4;
581
                                break;
582
                        default:
583
                                mmc->version = MMC_VERSION_1_2;
584
                                break;
585
                }
586
        }
587
 
588
        /* divide frequency by 10, since the mults are 10x bigger */
589
        freq = fbase[(cmd.response[0] & 0x7)];
590
        mult = multipliers[((cmd.response[0] >> 3) & 0xf)];
591
 
592
        mmc->tran_speed = freq * mult;
593
 
594
        mmc->read_bl_len = 1 << ((cmd.response[1] >> 16) & 0xf);
595
 
596
        if (IS_SD(mmc))
597
                mmc->write_bl_len = mmc->read_bl_len;
598
        else
599
                mmc->write_bl_len = 1 << ((cmd.response[3] >> 22) & 0xf);
600
 
601
        if (mmc->high_capacity) {
602
                csize = (mmc->csd[1] & 0x3f) << 16
603
                        | (mmc->csd[2] & 0xffff0000) >> 16;
604
                cmult = 8;
605
        } else {
606
                csize = (mmc->csd[1] & 0x3ff) << 2
607
                        | (mmc->csd[2] & 0xc0000000) >> 30;
608
                cmult = (mmc->csd[2] & 0x00038000) >> 15;
609
        }
610
 
611
        mmc->capacity = (csize + 1) << (cmult + 2);
612
        mmc->capacity *= mmc->read_bl_len;
613
 
614
        if (mmc->read_bl_len > 512)
615
                mmc->read_bl_len = 512;
616
 
617
        if (mmc->write_bl_len > 512)
618
                mmc->write_bl_len = 512;
619
 
620
        /* Select the card, and put it into Transfer Mode */
621
        cmd.cmdidx = MMC_CMD_SELECT_CARD;
622
        cmd.resp_type = MMC_RSP_R1;
623
        cmd.cmdarg = mmc->rca << 16;
624
        err = mmc_send_cmd(mmc, &cmd, NULL);
625
 
626
        if (err)
627
                return err;
628
 
629
        /*
630
         * For SD, its erase group is always one sector
631
         */
632
        mmc->erase_grp_size = 1;
633
        mmc->part_config = MMCPART_NOAVAILABLE;
634
        if (!IS_SD(mmc) && (mmc->version >= MMC_VERSION_4)) {
635
                /* check  ext_csd version and capacity */
636
                err = mmc_send_ext_csd(mmc, ext_csd);
637
                if (!err & (ext_csd[EXT_CSD_REV] >= 2)) {
638
                        /*
639
                         * According to the JEDEC Standard, the value of
640
                         * ext_csd's capacity is valid if the value is more
641
                         * than 2GB
642
                         */
643
                        capacity = ext_csd[EXT_CSD_SEC_CNT] << 0
644
                                        | ext_csd[EXT_CSD_SEC_CNT + 1] << 8
645
                                        | ext_csd[EXT_CSD_SEC_CNT + 2] << 16
646
                                        | ext_csd[EXT_CSD_SEC_CNT + 3] << 24;
647
                        capacity *= 512;
648
                        if ((capacity >> 20) > 2 * 1024)
649
                                mmc->capacity = capacity;
650
                }
651
 
652
                /*
653
                 * Check whether GROUP_DEF is set, if yes, read out
654
                 * group size from ext_csd directly, or calculate
655
                 * the group size from the csd value.
656
                 */
657
                if (ext_csd[EXT_CSD_ERASE_GROUP_DEF])
658
                        mmc->erase_grp_size =
659
                              ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE] * 512 * 1024;
660
                else {
661
                        int erase_gsz, erase_gmul;
662
                        erase_gsz = (mmc->csd[2] & 0x00007c00) >> 10;
663
                        erase_gmul = (mmc->csd[2] & 0x000003e0) >> 5;
664
                        mmc->erase_grp_size = (erase_gsz + 1)
665
                                * (erase_gmul + 1);
666
                }
667
 
668
                /* store the partition info of emmc */
669
                if ((ext_csd[EXT_CSD_PARTITIONING_SUPPORT] & PART_SUPPORT) ||
670
                    ext_csd[EXT_CSD_BOOT_MULT])
671
                        mmc->part_config = ext_csd[EXT_CSD_PART_CONF];
672
        }
673
 
674
        if (IS_SD(mmc))
675
                err = sd_change_freq(mmc);
676
        else
677
                err = mmc_change_freq(mmc);
678
 
679
        if (err)
680
                return err;
681
 
682
        /* Restrict card's capabilities by what the host can do */
683
        mmc->card_caps &= mmc->host_caps;
684
 
685
        if (IS_SD(mmc)) {
686
                if (mmc->card_caps & MMC_MODE_4BIT) {
687
                        cmd.cmdidx = MMC_CMD_APP_CMD;
688
                        cmd.resp_type = MMC_RSP_R1;
689
                        cmd.cmdarg = mmc->rca << 16;
690
 
691
                        err = mmc_send_cmd(mmc, &cmd, NULL);
692
                        if (err)
693
                                return err;
694
 
695
                        cmd.cmdidx = SD_CMD_APP_SET_BUS_WIDTH;
696
                        cmd.resp_type = MMC_RSP_R1;
697
                        cmd.cmdarg = 2;
698
                        err = mmc_send_cmd(mmc, &cmd, NULL);
699
                        if (err)
700
                                return err;
701
 
702
                        mmc_set_bus_width(mmc, 4);
703
                }
704
 
705
                if (mmc->card_caps & MMC_MODE_HS)
706
                        mmc->tran_speed = 50000000;
707
                else
708
                        mmc->tran_speed = 25000000;
709
        } else {
710
                width = ((mmc->host_caps & MMC_MODE_MASK_WIDTH_BITS) >>
711
                         MMC_MODE_WIDTH_BITS_SHIFT);
712
                for (; width >= 0; width--) {
713
                        /* Set the card to use 4 bit*/
714
                        err = mmc_switch(mmc, EXT_CSD_CMD_SET_NORMAL,
715
                                        EXT_CSD_BUS_WIDTH, width);
716
 
717
                        if (err)
718
                                continue;
719
 
720
                        if (!width) {
721
                                mmc_set_bus_width(mmc, 1);
722
                                break;
723
                        } else
724
                                mmc_set_bus_width(mmc, 4 * width);
725
 
726
                        err = mmc_send_ext_csd(mmc, test_csd);
727
                        if (!err && ext_csd[EXT_CSD_PARTITIONING_SUPPORT] \
728
                                    == test_csd[EXT_CSD_PARTITIONING_SUPPORT]
729
                                 && ext_csd[EXT_CSD_ERASE_GROUP_DEF] \
730
                                    == test_csd[EXT_CSD_ERASE_GROUP_DEF] \
731
                                 && ext_csd[EXT_CSD_REV] \
732
                                    == test_csd[EXT_CSD_REV]
733
                                 && ext_csd[EXT_CSD_HC_ERASE_GRP_SIZE] \
734
                                    == test_csd[EXT_CSD_HC_ERASE_GRP_SIZE]
735
                                 && memcmp(&ext_csd[EXT_CSD_SEC_CNT], \
736
                                        &test_csd[EXT_CSD_SEC_CNT], 4) == 0) {
737
 
738
                                mmc->card_caps |= width;
739
                                break;
740
                        }
741
                }
742
 
743
                if (mmc->card_caps & MMC_MODE_HS) {
744
                        if (mmc->card_caps & MMC_MODE_HS_52MHz)
745
                                mmc->tran_speed = 52000000;
746
                        else
747
                                mmc->tran_speed = 26000000;
748
                }
749
        }
750
 
751
        mmc_set_clock(mmc, mmc->tran_speed);
752
 
753
        return 0;
754
}
755
 
756
static int mmc_set_blocklen(struct mmc *mmc, int len)
757
{
758
        struct mmc_cmd cmd;
759
 
760
        cmd.cmdidx = MMC_CMD_SET_BLOCKLEN;
761
        cmd.resp_type = MMC_RSP_R1;
762
        cmd.cmdarg = len;
763
 
764
        return mmc_send_cmd(mmc, &cmd, NULL);
765
}
766
 
767
static int mmc_read_blocks(struct mmc *mmc, void *dst, size_t start, size_t blkcnt)
768
{
769
        struct mmc_cmd cmd;
770
        struct mmc_data data;
771
 
772
        if (blkcnt > 1)
773
                cmd.cmdidx = MMC_CMD_READ_MULTIPLE_BLOCK;
774
        else
775
                cmd.cmdidx = MMC_CMD_READ_SINGLE_BLOCK;
776
 
777
        if (mmc->high_capacity)
778
                cmd.cmdarg = start;
779
        else
780
                cmd.cmdarg = start * mmc->read_bl_len;
781
 
782
        cmd.resp_type = MMC_RSP_R1;
783
 
784
        data.dest = dst;
785
        data.blocks = blkcnt;
786
        data.blocksize = mmc->read_bl_len;
787
        data.flags = MMC_DATA_READ;
788
 
789
        if (mmc_send_cmd(mmc, &cmd, &data))
790
                return 0;
791
 
792
        if (blkcnt > 1) {
793
                cmd.cmdidx = MMC_CMD_STOP_TRANSMISSION;
794
                cmd.cmdarg = 0;
795
                cmd.resp_type = MMC_RSP_R1b;
796
                if (mmc_send_cmd(mmc, &cmd, NULL)) {
797
                        printf("mmc fail to send stop cmd\n");
798
                        return 0;
799
                }
800
        }
801
 
802
        return blkcnt;
803
}
804
 
805
int mmc_init(struct mmc *mmc)
806
{
807
        int err;
808
 
809
        if (mmc->has_init)
810
                return 0;
811
 
812
        err = mmc->init(mmc);
813
 
814
        if (err)
815
                return err;
816
 
817
        mmc_set_bus_width(mmc, 1);
818
        mmc_set_clock(mmc, 1);
819
 
820
        /* Reset the Card */
821
        err = mmc_go_idle(mmc);
822
 
823
        if (err)
824
                return err;
825
 
826
        /* The internal partition reset to user partition(0) at every CMD0*/
827
        mmc->part_num = 0;
828
 
829
        /* Test for SD version 2 */
830
        err = mmc_send_if_cond(mmc);
831
 
832
        /* Now try to get the SD card's operating condition */
833
        err = sd_send_op_cond(mmc);
834
 
835
        /* If the command timed out, we check for an MMC card */
836
        if (err == TIMEOUT) {
837
                err = mmc_send_op_cond(mmc);
838
 
839
                if (err) {
840
                        printf("Card did not respond to voltage select!\n\r");
841
                        return UNUSABLE_ERR;
842
                }
843
        }
844
 
845
        err = mmc_startup(mmc);
846
        if (err)
847
                mmc->has_init = 0;
848
        else
849
                mmc->has_init = 1;
850
        return err;
851
}
852
 
853
size_t mmc_bread(struct mmc *mmc, size_t start, size_t blkcnt, void *dst)
854
{
855
        size_t cur, blocks_todo = blkcnt;
856
 
857
        if (blkcnt == 0)
858
                return 0;
859
 
860
        if ((start + blkcnt) > mmc->capacity / mmc->read_bl_len) {
861
                printf("MMC: block number 0x%lx exceeds max(0x%lx)\n",
862
                        start + blkcnt, mmc->capacity / mmc->read_bl_len);
863
                return 0;
864
        }
865
 
866
        if (mmc_set_blocklen(mmc, mmc->read_bl_len))
867
                return 0;
868
 
869
        do {
870
                cur = (blocks_todo > mmc->b_max) ?  mmc->b_max : blocks_todo;
871
                if(mmc_read_blocks(mmc, dst, start, cur) != cur)
872
                        return 0;
873
                blocks_todo -= cur;
874
                start += cur;
875
                dst += cur * mmc->read_bl_len;
876
        } while (blocks_todo > 0);
877
 
878
        return blkcnt;
879
}
880
 
881
void print_mmcinfo(struct mmc *mmc)
882
{
883
        printf("Device: %s\n\r", mmc->name);
884
        printf("Manufacturer ID: %x\n\r", mmc->cid[0] >> 24);
885
        printf("OEM: %x\n\r", (mmc->cid[0] >> 8) & 0xffff);
886
        printf("Name: %c%c%c%c%c \n\r", mmc->cid[0] & 0xff,
887
                        (mmc->cid[1] >> 24), (mmc->cid[1] >> 16) & 0xff,
888
                        (mmc->cid[1] >> 8) & 0xff, mmc->cid[1] & 0xff);
889
 
890
        printf("Tran Speed: %d\n\r", mmc->tran_speed);
891
        printf("Rd Block Len: %d\n\r", mmc->read_bl_len);
892
 
893
        printf("%s version %d.%d\n\r", IS_SD(mmc) ? "SD" : "MMC",
894
                        (mmc->version >> 4) & 0xf, mmc->version & 0xf);
895
 
896
        printf("High Capacity: %s\n\r", mmc->high_capacity ? "Yes" : "No");
897
        printf("Capacity: %ld\n\r", mmc->capacity);
898
 
899
        printf("Bus Width: %d-bit\n\r", mmc->bus_width);
900
}
901
 
902
 
903
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.