xloader: Panda - clean compile warnings
[x-loader-sniper.git] / cpu / omap4 / mmc.c
1 /*
2  * (C) Copyright 2008
3  * Texas Instruments, <www.ti.com>
4  * Syed Mohammed Khasim <khasim@ti.com>
5  *
6  * See file CREDITS for list of people who contributed to this
7  * project.
8  *
9  * This program is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU General Public License as
11  * published by the Free Software Foundation's version 2 of
12  * the License.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
22  * MA 02111-1307 USA
23  */
24
25 #include <config.h>
26 #include <common.h>
27 #include <part.h>
28 #include <fat.h>
29 #include <mmc.h>
30 #include <i2c.h>
31
32 const unsigned short mmc_transspeed_val[15][4] = {
33         {CLKD(10, 1), CLKD(10, 10), CLKD(10, 100), CLKD(10, 1000)},
34         {CLKD(12, 1), CLKD(12, 10), CLKD(12, 100), CLKD(12, 1000)},
35         {CLKD(13, 1), CLKD(13, 10), CLKD(13, 100), CLKD(13, 1000)},
36         {CLKD(15, 1), CLKD(15, 10), CLKD(15, 100), CLKD(15, 1000)},
37         {CLKD(20, 1), CLKD(20, 10), CLKD(20, 100), CLKD(20, 1000)},
38         {CLKD(26, 1), CLKD(26, 10), CLKD(26, 100), CLKD(26, 1000)},
39         {CLKD(30, 1), CLKD(30, 10), CLKD(30, 100), CLKD(30, 1000)},
40         {CLKD(35, 1), CLKD(35, 10), CLKD(35, 100), CLKD(35, 1000)},
41         {CLKD(40, 1), CLKD(40, 10), CLKD(40, 100), CLKD(40, 1000)},
42         {CLKD(45, 1), CLKD(45, 10), CLKD(45, 100), CLKD(45, 1000)},
43         {CLKD(52, 1), CLKD(52, 10), CLKD(52, 100), CLKD(52, 1000)},
44         {CLKD(55, 1), CLKD(55, 10), CLKD(55, 100), CLKD(55, 1000)},
45         {CLKD(60, 1), CLKD(60, 10), CLKD(60, 100), CLKD(60, 1000)},
46         {CLKD(70, 1), CLKD(70, 10), CLKD(70, 100), CLKD(70, 1000)},
47         {CLKD(80, 1), CLKD(80, 10), CLKD(80, 100), CLKD(80, 1000)}
48 };
49
50 mmc_card_data cur_card_data;
51 static block_dev_desc_t mmc_blk_dev;
52
53 block_dev_desc_t *mmc_get_dev(int dev)
54 {
55         return (block_dev_desc_t *)&mmc_blk_dev;
56 }
57
58 unsigned char mmc_board_init(void)
59 {
60         return 1;
61 }
62
63 void mmc_init_stream(void)
64 {
65         volatile unsigned int mmc_stat;
66
67         OMAP_HSMMC_CON |= INIT_INITSTREAM;
68
69         OMAP_HSMMC_CMD = MMC_CMD0;
70         do {
71                 mmc_stat = OMAP_HSMMC_STAT;
72         } while (!(mmc_stat & CC_MASK));
73
74         OMAP_HSMMC_STAT = CC_MASK;
75
76         OMAP_HSMMC_CMD = MMC_CMD0;
77         do {
78                 mmc_stat = OMAP_HSMMC_STAT;
79         } while (!(mmc_stat & CC_MASK));
80
81         OMAP_HSMMC_STAT = OMAP_HSMMC_STAT;
82         OMAP_HSMMC_CON &= ~INIT_INITSTREAM;
83 }
84
85 unsigned char mmc_clock_config(unsigned int iclk, unsigned short clk_div)
86 {
87         unsigned int val;
88
89         mmc_reg_out(OMAP_HSMMC_SYSCTL, (ICE_MASK | DTO_MASK | CEN_MASK),
90                     (ICE_STOP | DTO_15THDTO | CEN_DISABLE));
91
92         switch (iclk) {
93         case CLK_INITSEQ:
94                 val = MMC_INIT_SEQ_CLK / 2;
95                 break;
96         case CLK_400KHZ:
97                 val = MMC_400kHz_CLK;
98                 break;
99         case CLK_MISC:
100                 val = clk_div;
101                 break;
102         default:
103                 return 0;
104         }
105         mmc_reg_out(OMAP_HSMMC_SYSCTL,
106                     ICE_MASK | CLKD_MASK, (val << CLKD_OFFSET) | ICE_OSCILLATE);
107
108         while ((OMAP_HSMMC_SYSCTL & ICS_MASK) == ICS_NOTREADY)
109                 ;
110
111         OMAP_HSMMC_SYSCTL |= CEN_ENABLE;
112         return 1;
113 }
114
115 unsigned char mmc_init_setup(void)
116 {
117         unsigned int reg_val;
118
119         mmc_board_init();
120
121         OMAP_HSMMC_SYSCONFIG |= MMC_SOFTRESET;
122         while ((OMAP_HSMMC_SYSSTATUS & RESETDONE) == 0)
123                 ;
124
125         OMAP_HSMMC_SYSCTL |= SOFTRESETALL;
126         while ((OMAP_HSMMC_SYSCTL & SOFTRESETALL) != 0x0)
127                 ;
128
129         OMAP_HSMMC_HCTL = DTW_1_BITMODE | SDBP_PWROFF | SDVS_3V0;
130         OMAP_HSMMC_CAPA |= VS30_3V0SUP | VS18_1V8SUP;
131
132         reg_val = OMAP_HSMMC_CON & RESERVED_MASK;
133
134         OMAP_HSMMC_CON = CTPL_MMC_SD | reg_val | WPP_ACTIVEHIGH |
135             CDP_ACTIVEHIGH | MIT_CTO | DW8_1_4BITMODE | MODE_FUNC |
136             STR_BLOCK | HR_NOHOSTRESP | INIT_NOINIT | NOOPENDRAIN;
137
138         mmc_clock_config(CLK_INITSEQ, 0);
139         OMAP_HSMMC_HCTL |= SDBP_PWRON;
140
141         OMAP_HSMMC_IE = 0x307f0033;
142
143         mmc_init_stream();
144
145         return 1;
146 }
147
148 unsigned char mmc_send_cmd(unsigned int cmd, unsigned int arg,
149                            unsigned int *response)
150 {
151         volatile unsigned int mmc_stat;
152
153         while ((OMAP_HSMMC_PSTATE & DATI_MASK) == DATI_CMDDIS)
154                 ;
155
156         OMAP_HSMMC_BLK = BLEN_512BYTESLEN | NBLK_STPCNT;
157         OMAP_HSMMC_STAT = 0xFFFFFFFF;
158         OMAP_HSMMC_ARG = arg;
159         OMAP_HSMMC_CMD = cmd | CMD_TYPE_NORMAL | CICE_NOCHECK |
160             CCCE_NOCHECK | MSBS_SGLEBLK | ACEN_DISABLE | BCE_DISABLE |
161             DE_DISABLE;
162
163         while (1) {
164                 do {
165                         mmc_stat = OMAP_HSMMC_STAT;
166                 } while (mmc_stat == 0);
167
168                 if ((mmc_stat & ERRI_MASK) != 0)
169                         return (unsigned char) mmc_stat;
170
171                 if (mmc_stat & CC_MASK) {
172                         OMAP_HSMMC_STAT = CC_MASK;
173                         response[0] = OMAP_HSMMC_RSP10;
174                         if ((cmd & RSP_TYPE_MASK) == RSP_TYPE_LGHT136) {
175                                 response[1] = OMAP_HSMMC_RSP32;
176                                 response[2] = OMAP_HSMMC_RSP54;
177                                 response[3] = OMAP_HSMMC_RSP76;
178                         }
179                         break;
180                 }
181         }
182         return 1;
183 }
184
185 unsigned char mmc_read_data(unsigned int *output_buf)
186 {
187         volatile unsigned int mmc_stat;
188         unsigned int read_count = 0;
189
190         /*
191          * Start Polled Read
192          */
193         while (1) {
194                 do {
195                         mmc_stat = OMAP_HSMMC_STAT;
196                 } while (mmc_stat == 0);
197
198                 if ((mmc_stat & ERRI_MASK) != 0)
199                         return (unsigned char) mmc_stat;
200
201                 if (mmc_stat & BRR_MASK) {
202                         unsigned int k;
203
204                         OMAP_HSMMC_STAT |= BRR_MASK;
205                         for (k = 0; k < MMCSD_SECTOR_SIZE / 4; k++) {
206                                 *output_buf = OMAP_HSMMC_DATA;
207                                 output_buf++;
208                                 read_count += 4;
209                         }
210                 }
211
212                 if (mmc_stat & BWR_MASK)
213                         OMAP_HSMMC_STAT |= BWR_MASK;
214
215                 if (mmc_stat & TC_MASK) {
216                         OMAP_HSMMC_STAT |= TC_MASK;
217                         break;
218                 }
219         }
220         return 1;
221 }
222
223 unsigned char mmc_detect_card(mmc_card_data *mmc_card_cur)
224 {
225         unsigned char err;
226         unsigned int argument = 0;
227         unsigned int ocr_value, ocr_recvd, ret_cmd41, hcs_val;
228         unsigned int resp[4];
229         unsigned short retry_cnt = 2000;
230
231         /* Set to Initialization Clock */
232         err = mmc_clock_config(CLK_400KHZ, 0);
233         if (err != 1)
234                 return err;
235
236         mmc_card_cur->RCA = MMC_RELATIVE_CARD_ADDRESS;
237         argument = 0x00000000;
238
239         ocr_value = (0x1FF << 15);
240         err = mmc_send_cmd(MMC_CMD0, argument, resp);
241         if (err != 1)
242                 return err;
243
244         argument = SD_CMD8_CHECK_PATTERN | SD_CMD8_2_7_3_6_V_RANGE;
245         err = mmc_send_cmd(MMC_SDCMD8, argument, resp);
246         hcs_val = (err == 1) ?
247             MMC_OCR_REG_HOST_CAPACITY_SUPPORT_SECTOR :
248             MMC_OCR_REG_HOST_CAPACITY_SUPPORT_BYTE;
249
250         argument = 0x0000 << 16;
251         err = mmc_send_cmd(MMC_CMD55, argument, resp);
252         if (err == 1) {
253                 mmc_card_cur->card_type = SD_CARD;
254                 ocr_value |= hcs_val;
255                 ret_cmd41 = MMC_ACMD41;
256         } else {
257                 mmc_card_cur->card_type = MMC_CARD;
258                 ocr_value |= MMC_OCR_REG_ACCESS_MODE_SECTOR;
259                 ret_cmd41 = MMC_CMD1;
260                 OMAP_HSMMC_CON &= ~OD;
261                 OMAP_HSMMC_CON |= OPENDRAIN;
262         }
263
264         argument = ocr_value;
265         err = mmc_send_cmd(ret_cmd41, argument, resp);
266         if (err != 1)
267                 return err;
268
269         ocr_recvd = ((mmc_resp_r3 *) resp)->ocr;
270
271         while (!(ocr_recvd & (0x1 << 31)) && (retry_cnt > 0)) {
272                 retry_cnt--;
273                 if (mmc_card_cur->card_type == SD_CARD) {
274                         argument = 0x0000 << 16;
275                         err = mmc_send_cmd(MMC_CMD55, argument, resp);
276                 }
277
278                 argument = ocr_value;
279                 err = mmc_send_cmd(ret_cmd41, argument, resp);
280                 if (err != 1)
281                         return err;
282                 ocr_recvd = ((mmc_resp_r3 *) resp)->ocr;
283         }
284
285         if (!(ocr_recvd & (0x1 << 31)))
286                 return 0;
287
288         if (mmc_card_cur->card_type == MMC_CARD) {
289                 if ((ocr_recvd & MMC_OCR_REG_ACCESS_MODE_MASK) ==
290                     MMC_OCR_REG_ACCESS_MODE_SECTOR) {
291                         mmc_card_cur->mode = SECTOR_MODE;
292                 } else {
293                         mmc_card_cur->mode = BYTE_MODE;
294                 }
295
296                 ocr_recvd &= ~MMC_OCR_REG_ACCESS_MODE_MASK;
297         } else {
298                 if ((ocr_recvd & MMC_OCR_REG_HOST_CAPACITY_SUPPORT_MASK)
299                     == MMC_OCR_REG_HOST_CAPACITY_SUPPORT_SECTOR) {
300                         mmc_card_cur->mode = SECTOR_MODE;
301                 } else {
302                         mmc_card_cur->mode = BYTE_MODE;
303                 }
304                 ocr_recvd &= ~MMC_OCR_REG_HOST_CAPACITY_SUPPORT_MASK;
305         }
306
307         ocr_recvd &= ~(0x1 << 31);
308         if (!(ocr_recvd & ocr_value))
309                 return 0;
310
311         err = mmc_send_cmd(MMC_CMD2, argument, resp);
312         if (err != 1)
313                 return err;
314
315         if (mmc_card_cur->card_type == MMC_CARD) {
316                 argument = mmc_card_cur->RCA << 16;
317                 err = mmc_send_cmd(MMC_CMD3, argument, resp);
318                 if (err != 1)
319                         return err;
320         } else {
321                 argument = 0x00000000;
322                 err = mmc_send_cmd(MMC_SDCMD3, argument, resp);
323                 if (err != 1)
324                         return err;
325
326                 mmc_card_cur->RCA = ((mmc_resp_r6 *) resp)->newpublishedrca;
327         }
328
329         OMAP_HSMMC_CON &= ~OD;
330         OMAP_HSMMC_CON |= NOOPENDRAIN;
331         return 1;
332 }
333
334 unsigned char mmc_read_cardsize(mmc_card_data *mmc_dev_data,
335                                 mmc_csd_reg_t *cur_csd)
336 {
337         mmc_extended_csd_reg_t ext_csd;
338         unsigned int size, count, blk_len, blk_no, card_size, argument;
339         unsigned char err;
340         unsigned int resp[4];
341
342         if (mmc_dev_data->mode == SECTOR_MODE) {
343                 if (mmc_dev_data->card_type == SD_CARD) {
344                         card_size =
345                             (((mmc_sd2_csd_reg_t *) cur_csd)->
346                              c_size_lsb & MMC_SD2_CSD_C_SIZE_LSB_MASK) |
347                             ((((mmc_sd2_csd_reg_t *) cur_csd)->
348                               c_size_msb & MMC_SD2_CSD_C_SIZE_MSB_MASK)
349                              << MMC_SD2_CSD_C_SIZE_MSB_OFFSET);
350                         mmc_dev_data->size = card_size * 1024;
351                         if (mmc_dev_data->size == 0)
352                                 return 0;
353                 } else {
354                         argument = 0x00000000;
355                         err = mmc_send_cmd(MMC_CMD8, argument, resp);
356                         if (err != 1)
357                                 return err;
358                         err = mmc_read_data((unsigned int *) &ext_csd);
359                         if (err != 1)
360                                 return err;
361                         mmc_dev_data->size = ext_csd.sectorcount;
362
363                         if (mmc_dev_data->size == 0)
364                                 mmc_dev_data->size = 8388608;
365                 }
366         } else {
367                 if (cur_csd->c_size_mult >= 8)
368                         return 0;
369
370                 if (cur_csd->read_bl_len >= 12)
371                         return 0;
372
373                 /* Compute size */
374                 count = 1 << (cur_csd->c_size_mult + 2);
375                 card_size = (cur_csd->c_size_lsb & MMC_CSD_C_SIZE_LSB_MASK) |
376                     ((cur_csd->c_size_msb & MMC_CSD_C_SIZE_MSB_MASK)
377                      << MMC_CSD_C_SIZE_MSB_OFFSET);
378                 blk_no = (card_size + 1) * count;
379                 blk_len = 1 << cur_csd->read_bl_len;
380                 size = blk_no * blk_len;
381                 mmc_dev_data->size = size / MMCSD_SECTOR_SIZE;
382                 if (mmc_dev_data->size == 0)
383                         return 0;
384         }
385         return 1;
386 }
387
388 unsigned char omap_mmc_read_sect(unsigned int start_sec, unsigned int num_bytes,
389                                  mmc_card_data *mmc_c,
390                                  unsigned long *output_buf)
391 {
392         unsigned char err;
393         unsigned int argument;
394         unsigned int resp[4];
395         unsigned int num_sec_val =
396             (num_bytes + (MMCSD_SECTOR_SIZE - 1)) / MMCSD_SECTOR_SIZE;
397         unsigned int sec_inc_val;
398
399         if (num_sec_val == 0)
400                 return 1;
401
402         if (mmc_c->mode == SECTOR_MODE) {
403                 argument = start_sec;
404                 sec_inc_val = 1;
405         } else {
406                 argument = start_sec * MMCSD_SECTOR_SIZE;
407                 sec_inc_val = MMCSD_SECTOR_SIZE;
408         }
409
410         while (num_sec_val) {
411                 err = mmc_send_cmd(MMC_CMD17, argument, resp);
412                 if (err != 1)
413                         return err;
414
415                 err = mmc_read_data((unsigned int *) output_buf);
416                 if (err != 1)
417                         return err;
418
419                 output_buf += (MMCSD_SECTOR_SIZE / 4);
420                 argument += sec_inc_val;
421                 num_sec_val--;
422         }
423         return 1;
424 }
425
426 unsigned char configure_mmc(mmc_card_data *mmc_card_cur)
427 {
428         unsigned char ret_val;
429         unsigned int argument;
430         unsigned int resp[4];
431         unsigned int trans_clk, trans_fact, trans_unit, retries = 2;
432         mmc_csd_reg_t Card_CSD;
433         unsigned char trans_speed;
434
435         ret_val = mmc_init_setup();
436
437         if (ret_val != 1)
438                 return ret_val;
439
440         do {
441                 ret_val = mmc_detect_card(mmc_card_cur);
442                 retries--;
443         } while ((retries > 0) && (ret_val != 1));
444
445         argument = mmc_card_cur->RCA << 16;
446         ret_val = mmc_send_cmd(MMC_CMD9, argument, resp);
447         if (ret_val != 1)
448                 return ret_val;
449
450         ((unsigned int *) &Card_CSD)[3] = resp[3];
451         ((unsigned int *) &Card_CSD)[2] = resp[2];
452         ((unsigned int *) &Card_CSD)[1] = resp[1];
453         ((unsigned int *) &Card_CSD)[0] = resp[0];
454
455         if (mmc_card_cur->card_type == MMC_CARD)
456                 mmc_card_cur->version = Card_CSD.spec_vers;
457
458         trans_speed = Card_CSD.tran_speed;
459
460         ret_val = mmc_send_cmd(MMC_CMD4, MMC_DSR_DEFAULT << 16, resp);
461         if (ret_val != 1)
462                 return ret_val;
463
464         trans_unit = trans_speed & MMC_CSD_TRAN_SPEED_UNIT_MASK;
465         trans_fact = trans_speed & MMC_CSD_TRAN_SPEED_FACTOR_MASK;
466
467         if (trans_unit > MMC_CSD_TRAN_SPEED_UNIT_100MHZ)
468                 return 0;
469
470         if ((trans_fact < MMC_CSD_TRAN_SPEED_FACTOR_1_0) ||
471             (trans_fact > MMC_CSD_TRAN_SPEED_FACTOR_8_0))
472                 return 0;
473
474         trans_unit >>= 0;
475         trans_fact >>= 3;
476
477         trans_clk = mmc_transspeed_val[trans_fact - 1][trans_unit] * 2;
478         ret_val = mmc_clock_config(CLK_MISC, trans_clk);
479
480         if (ret_val != 1)
481                 return ret_val;
482
483         argument = mmc_card_cur->RCA << 16;
484         ret_val = mmc_send_cmd(MMC_CMD7_SELECT, argument, resp);
485         if (ret_val != 1)
486                 return ret_val;
487
488         /* Configure the block length to 512 bytes */
489         argument = MMCSD_SECTOR_SIZE;
490         ret_val = mmc_send_cmd(MMC_CMD16, argument, resp);
491         if (ret_val != 1)
492                 return ret_val;
493
494         /* get the card size in sectors */
495         ret_val = mmc_read_cardsize(mmc_card_cur, &Card_CSD);
496         if (ret_val != 1)
497                 return ret_val;
498
499         return 1;
500 }
501 unsigned long mmc_bread(int dev_num, unsigned long blknr, lbaint_t blkcnt,
502                         unsigned long *dst)
503 {
504         omap_mmc_read_sect(blknr, (blkcnt * MMCSD_SECTOR_SIZE), &cur_card_data,
505                            dst);
506         return 1;
507 }
508
509 int mmc_init(int verbose)
510 {
511         unsigned char ret = configure_mmc(&cur_card_data);
512
513         if (ret != 1)
514                 return 0;
515
516         mmc_blk_dev.if_type = IF_TYPE_MMC;
517         mmc_blk_dev.part_type = PART_TYPE_DOS;
518         mmc_blk_dev.dev = 0;
519         mmc_blk_dev.lun = 0;
520         mmc_blk_dev.type = 0;
521
522         /* FIXME fill in the correct size (is set to 32MByte) */
523         mmc_blk_dev.blksz = MMCSD_SECTOR_SIZE;
524         mmc_blk_dev.lba = 0x10000;
525         mmc_blk_dev.removable = 0;
526         mmc_blk_dev.block_read = mmc_bread;
527
528         fat_register_device(&mmc_blk_dev, 1);
529
530         return 1;
531 }
532
533 int mmc_read(ulong src, uchar *dst, int size)
534 {
535         return 0;
536 }
537
538 int mmc_write(uchar *src, ulong dst, int size)
539 {
540         return 0;
541 }
542
543 int mmc2info(ulong addr)
544 {
545         return 0;
546 }