1// SPDX-License-Identifier: GPL-2.0+
2/*
3 * (C) Copyright 2006-2007 Freescale Semiconductor, Inc.
4 *
5 * (C) Copyright 2006
6 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
7 *
8 * Copyright (C) 2004-2006 Freescale Semiconductor, Inc.
9 * (C) Copyright 2003 Motorola Inc.
10 * Xianghua Xiao (X.Xiao@motorola.com)
11 */
12
13#ifndef CONFIG_MPC83XX_SDRAM
14
15#include <common.h>
16#include <cpu_func.h>
17#include <log.h>
18#include <time.h>
19#include <vsprintf.h>
20#include <asm/processor.h>
21#include <asm/io.h>
22#include <i2c.h>
23#include <spd.h>
24#include <asm/mmu.h>
25#include <spd_sdram.h>
26#include <asm/bitops.h>
27#include <asm/global_data.h>
28#include <linux/delay.h>
29
30DECLARE_GLOBAL_DATA_PTR;
31
32void board_add_ram_info(int use_default)
33{
34	volatile immap_t *immap = (immap_t *) CONFIG_SYS_IMMR;
35	volatile ddr83xx_t *ddr = &immap->ddr;
36	char buf[32];
37
38	printf(" (DDR%d", ((ddr->sdram_cfg & SDRAM_CFG_SDRAM_TYPE_MASK)
39			   >> SDRAM_CFG_SDRAM_TYPE_SHIFT) - 1);
40
41#if defined(CONFIG_ARCH_MPC8308) || defined(CONFIG_ARCH_MPC831X)
42	if ((ddr->sdram_cfg & SDRAM_CFG_DBW_MASK) == SDRAM_CFG_DBW_16)
43		puts(", 16-bit");
44	else if ((ddr->sdram_cfg & SDRAM_CFG_DBW_MASK) == SDRAM_CFG_DBW_32)
45		puts(", 32-bit");
46	else
47		puts(", unknown width");
48#else
49	if (ddr->sdram_cfg & SDRAM_CFG_32_BE)
50		puts(", 32-bit");
51	else
52		puts(", 64-bit");
53#endif
54
55	if (ddr->sdram_cfg & SDRAM_CFG_ECC_EN)
56		puts(", ECC on");
57	else
58		puts(", ECC off");
59
60	printf(", %s MHz)", strmhz(buf, gd->mem_clk));
61
62#if defined(CONFIG_SYS_LB_SDRAM) && defined(CFG_SYS_LBC_SDRAM_SIZE)
63	puts("\nSDRAM: ");
64	print_size (CFG_SYS_LBC_SDRAM_SIZE * 1024 * 1024, " (local bus)");
65#endif
66}
67
68#ifdef CONFIG_SPD_EEPROM
69#ifndef	CFG_SYS_READ_SPD
70#define CFG_SYS_READ_SPD	i2c_read
71#endif
72#ifndef SPD_EEPROM_OFFSET
73#define SPD_EEPROM_OFFSET	0
74#endif
75#ifndef SPD_EEPROM_ADDR_LEN
76#define SPD_EEPROM_ADDR_LEN     1
77#endif
78
79/*
80 * Convert picoseconds into clock cycles (rounding up if needed).
81 */
82int
83picos_to_clk(int picos)
84{
85	unsigned int mem_bus_clk;
86	int clks;
87
88	mem_bus_clk = gd->mem_clk >> 1;
89	clks = picos / (1000000000 / (mem_bus_clk / 1000));
90	if (picos % (1000000000 / (mem_bus_clk / 1000)) != 0)
91		clks++;
92
93	return clks;
94}
95
96unsigned int banksize(unsigned char row_dens)
97{
98	return ((row_dens >> 2) | ((row_dens & 3) << 6)) << 24;
99}
100
101int read_spd(uint addr)
102{
103	return ((int) addr);
104}
105
106#undef SPD_DEBUG
107#ifdef SPD_DEBUG
108static void spd_debug(spd_eeprom_t *spd)
109{
110	printf ("\nDIMM type:       %-18.18s\n", spd->mpart);
111	printf ("SPD size:        %d\n", spd->info_size);
112	printf ("EEPROM size:     %d\n", 1 << spd->chip_size);
113	printf ("Memory type:     %d\n", spd->mem_type);
114	printf ("Row addr:        %d\n", spd->nrow_addr);
115	printf ("Column addr:     %d\n", spd->ncol_addr);
116	printf ("# of rows:       %d\n", spd->nrows);
117	printf ("Row density:     %d\n", spd->row_dens);
118	printf ("# of banks:      %d\n", spd->nbanks);
119	printf ("Data width:      %d\n",
120			256 * spd->dataw_msb + spd->dataw_lsb);
121	printf ("Chip width:      %d\n", spd->primw);
122	printf ("Refresh rate:    %02X\n", spd->refresh);
123	printf ("CAS latencies:   %02X\n", spd->cas_lat);
124	printf ("Write latencies: %02X\n", spd->write_lat);
125	printf ("tRP:             %d\n", spd->trp);
126	printf ("tRCD:            %d\n", spd->trcd);
127	printf ("\n");
128}
129#endif /* SPD_DEBUG */
130
131long int spd_sdram()
132{
133	volatile immap_t *immap = (immap_t *)CONFIG_SYS_IMMR;
134	volatile ddr83xx_t *ddr = &immap->ddr;
135	volatile law83xx_t *ecm = &immap->sysconf.ddrlaw[0];
136	spd_eeprom_t spd;
137	unsigned int n_ranks;
138	unsigned int odt_rd_cfg, odt_wr_cfg;
139	unsigned char twr_clk, twtr_clk;
140	unsigned int sdram_type;
141	unsigned int memsize;
142	unsigned int law_size;
143	unsigned char caslat, caslat_ctrl;
144	unsigned int trfc, trfc_clk, trfc_low;
145	unsigned int trcd_clk, trtp_clk;
146	unsigned char cke_min_clk;
147	unsigned char add_lat, wr_lat;
148	unsigned char wr_data_delay;
149	unsigned char four_act;
150	unsigned char cpo;
151	unsigned char burstlen;
152	unsigned char odt_cfg, mode_odt_enable;
153	unsigned int max_bus_clk;
154	unsigned int max_data_rate, effective_data_rate;
155	unsigned int ddrc_clk;
156	unsigned int refresh_clk;
157	unsigned int sdram_cfg;
158	unsigned int ddrc_ecc_enable;
159	unsigned int pvr = get_pvr();
160
161	/*
162	 * First disable the memory controller (could be enabled
163	 * by the debugger)
164	 */
165	clrsetbits_be32(&ddr->sdram_cfg, SDRAM_CFG_MEM_EN, 0);
166	sync();
167	isync();
168
169	/* Read SPD parameters with I2C */
170	CFG_SYS_READ_SPD(SPD_EEPROM_ADDRESS, SPD_EEPROM_OFFSET,
171		SPD_EEPROM_ADDR_LEN, (uchar *) &spd, sizeof(spd));
172#ifdef SPD_DEBUG
173	spd_debug(&spd);
174#endif
175	/* Check the memory type */
176	if (spd.mem_type != SPD_MEMTYPE_DDR && spd.mem_type != SPD_MEMTYPE_DDR2) {
177		debug("DDR: Module mem type is %02X\n", spd.mem_type);
178		return 0;
179	}
180
181	/* Check the number of physical bank */
182	if (spd.mem_type == SPD_MEMTYPE_DDR) {
183		n_ranks = spd.nrows;
184	} else {
185		n_ranks = (spd.nrows & 0x7) + 1;
186	}
187
188	if (n_ranks > 2) {
189		printf("DDR: The number of physical bank is %02X\n", n_ranks);
190		return 0;
191	}
192
193	/* Check if the number of row of the module is in the range of DDRC */
194	if (spd.nrow_addr < 12 || spd.nrow_addr > 15) {
195		printf("DDR: Row number is out of range of DDRC, row=%02X\n",
196							 spd.nrow_addr);
197		return 0;
198	}
199
200	/* Check if the number of col of the module is in the range of DDRC */
201	if (spd.ncol_addr < 8 || spd.ncol_addr > 11) {
202		printf("DDR: Col number is out of range of DDRC, col=%02X\n",
203							 spd.ncol_addr);
204		return 0;
205	}
206
207#ifdef CFG_SYS_DDRCDR_VALUE
208	/*
209	 * Adjust DDR II IO voltage biasing.  It just makes it work.
210	 */
211	if(spd.mem_type == SPD_MEMTYPE_DDR2) {
212		immap->sysconf.ddrcdr = CFG_SYS_DDRCDR_VALUE;
213	}
214	udelay(50000);
215#endif
216
217	/*
218	 * ODT configuration recommendation from DDR Controller Chapter.
219	 */
220	odt_rd_cfg = 0;			/* Never assert ODT */
221	odt_wr_cfg = 0;			/* Never assert ODT */
222	if (spd.mem_type == SPD_MEMTYPE_DDR2) {
223		odt_wr_cfg = 1;		/* Assert ODT on writes to CSn */
224	}
225
226	/* Setup DDR chip select register */
227#ifdef CONFIG_SYS_83XX_DDR_USES_CS0
228	ddr->csbnds[0].csbnds = (banksize(spd.row_dens) >> 24) - 1;
229	ddr->cs_config[0] = ( 1 << 31
230			    | (odt_rd_cfg << 20)
231			    | (odt_wr_cfg << 16)
232			    | ((spd.nbanks == 8 ? 1 : 0) << 14)
233			    | ((spd.nrow_addr - 12) << 8)
234			    | (spd.ncol_addr - 8) );
235	debug("\n");
236	debug("cs0_bnds = 0x%08x\n",ddr->csbnds[0].csbnds);
237	debug("cs0_config = 0x%08x\n",ddr->cs_config[0]);
238
239	if (n_ranks == 2) {
240		ddr->csbnds[1].csbnds = ( (banksize(spd.row_dens) >> 8)
241				  | ((banksize(spd.row_dens) >> 23) - 1) );
242		ddr->cs_config[1] = ( 1<<31
243				    | (odt_rd_cfg << 20)
244				    | (odt_wr_cfg << 16)
245				    | ((spd.nbanks == 8 ? 1 : 0) << 14)
246				    | ((spd.nrow_addr - 12) << 8)
247				    | (spd.ncol_addr - 8) );
248		debug("cs1_bnds = 0x%08x\n",ddr->csbnds[1].csbnds);
249		debug("cs1_config = 0x%08x\n",ddr->cs_config[1]);
250	}
251
252#else
253	ddr->csbnds[2].csbnds = (banksize(spd.row_dens) >> 24) - 1;
254	ddr->cs_config[2] = ( 1 << 31
255			    | (odt_rd_cfg << 20)
256			    | (odt_wr_cfg << 16)
257			    | ((spd.nbanks == 8 ? 1 : 0) << 14)
258			    | ((spd.nrow_addr - 12) << 8)
259			    | (spd.ncol_addr - 8) );
260	debug("\n");
261	debug("cs2_bnds = 0x%08x\n",ddr->csbnds[2].csbnds);
262	debug("cs2_config = 0x%08x\n",ddr->cs_config[2]);
263
264	if (n_ranks == 2) {
265		ddr->csbnds[3].csbnds = ( (banksize(spd.row_dens) >> 8)
266				  | ((banksize(spd.row_dens) >> 23) - 1) );
267		ddr->cs_config[3] = ( 1<<31
268				    | (odt_rd_cfg << 20)
269				    | (odt_wr_cfg << 16)
270				    | ((spd.nbanks == 8 ? 1 : 0) << 14)
271				    | ((spd.nrow_addr - 12) << 8)
272				    | (spd.ncol_addr - 8) );
273		debug("cs3_bnds = 0x%08x\n",ddr->csbnds[3].csbnds);
274		debug("cs3_config = 0x%08x\n",ddr->cs_config[3]);
275	}
276#endif
277
278	/*
279	 * Figure out memory size in Megabytes.
280	 */
281	memsize = n_ranks * banksize(spd.row_dens) / 0x100000;
282
283	/*
284	 * First supported LAW size is 16M, at LAWAR_SIZE_16M == 23.
285	 */
286	law_size = 19 + __ilog2(memsize);
287
288	/*
289	 * Set up LAWBAR for all of DDR.
290	 */
291	ecm->bar = CFG_SYS_SDRAM_BASE & 0xfffff000;
292	ecm->ar  = (LAWAR_EN | LAWAR_TRGT_IF_DDR | (LAWAR_SIZE & law_size));
293	debug("DDR:bar=0x%08x\n", ecm->bar);
294	debug("DDR:ar=0x%08x\n", ecm->ar);
295
296	/*
297	 * Find the largest CAS by locating the highest 1 bit
298	 * in the spd.cas_lat field.  Translate it to a DDR
299	 * controller field value:
300	 *
301	 *	CAS Lat	DDR I	DDR II	Ctrl
302	 *	Clocks	SPD Bit	SPD Bit	Value
303	 *	-------	-------	-------	-----
304	 *	1.0	0		0001
305	 *	1.5	1		0010
306	 *	2.0	2	2	0011
307	 *	2.5	3		0100
308	 *	3.0	4	3	0101
309	 *	3.5	5		0110
310	 *	4.0	6	4	0111
311	 *	4.5			1000
312	 *	5.0		5	1001
313	 */
314	caslat = __ilog2(spd.cas_lat);
315	if ((spd.mem_type == SPD_MEMTYPE_DDR)
316	    && (caslat > 6)) {
317		printf("DDR I: Invalid SPD CAS Latency: 0x%x.\n", spd.cas_lat);
318		return 0;
319	} else if (spd.mem_type == SPD_MEMTYPE_DDR2
320		   && (caslat < 2 || caslat > 5)) {
321		printf("DDR II: Invalid SPD CAS Latency: 0x%x.\n",
322		       spd.cas_lat);
323		return 0;
324	}
325	debug("DDR: caslat SPD bit is %d\n", caslat);
326
327	max_bus_clk = 1000 *10 / (((spd.clk_cycle & 0xF0) >> 4) * 10
328			+ (spd.clk_cycle & 0x0f));
329	max_data_rate = max_bus_clk * 2;
330
331	debug("DDR:Module maximum data rate is: %d MHz\n", max_data_rate);
332
333	ddrc_clk = gd->mem_clk / 1000000;
334	effective_data_rate = 0;
335
336	if (max_data_rate >= 460) { /* it is DDR2-800, 667, 533 */
337		if (spd.cas_lat & 0x08)
338			caslat = 3;
339		else
340			caslat = 4;
341		if (ddrc_clk <= 460 && ddrc_clk > 350)
342			effective_data_rate = 400;
343		else if (ddrc_clk <=350 && ddrc_clk > 280)
344			effective_data_rate = 333;
345		else if (ddrc_clk <= 280 && ddrc_clk > 230)
346			effective_data_rate = 266;
347		else
348			effective_data_rate = 200;
349	} else if (max_data_rate >= 390 && max_data_rate < 460) { /* it is DDR 400 */
350		if (ddrc_clk <= 460 && ddrc_clk > 350) {
351			/* DDR controller clk at 350~460 */
352			effective_data_rate = 400; /* 5ns */
353			caslat = caslat;
354		} else if (ddrc_clk <= 350 && ddrc_clk > 280) {
355			/* DDR controller clk at 280~350 */
356			effective_data_rate = 333; /* 6ns */
357			if (spd.clk_cycle2 == 0x60)
358				caslat = caslat - 1;
359			else
360				caslat = caslat;
361		} else if (ddrc_clk <= 280 && ddrc_clk > 230) {
362			/* DDR controller clk at 230~280 */
363			effective_data_rate = 266; /* 7.5ns */
364			if (spd.clk_cycle3 == 0x75)
365				caslat = caslat - 2;
366			else if (spd.clk_cycle2 == 0x75)
367				caslat = caslat - 1;
368			else
369				caslat = caslat;
370		} else if (ddrc_clk <= 230 && ddrc_clk > 90) {
371			/* DDR controller clk at 90~230 */
372			effective_data_rate = 200; /* 10ns */
373			if (spd.clk_cycle3 == 0xa0)
374				caslat = caslat - 2;
375			else if (spd.clk_cycle2 == 0xa0)
376				caslat = caslat - 1;
377			else
378				caslat = caslat;
379		}
380	} else if (max_data_rate >= 323) { /* it is DDR 333 */
381		if (ddrc_clk <= 350 && ddrc_clk > 280) {
382			/* DDR controller clk at 280~350 */
383			effective_data_rate = 333; /* 6ns */
384			caslat = caslat;
385		} else if (ddrc_clk <= 280 && ddrc_clk > 230) {
386			/* DDR controller clk at 230~280 */
387			effective_data_rate = 266; /* 7.5ns */
388			if (spd.clk_cycle2 == 0x75)
389				caslat = caslat - 1;
390			else
391				caslat = caslat;
392		} else if (ddrc_clk <= 230 && ddrc_clk > 90) {
393			/* DDR controller clk at 90~230 */
394			effective_data_rate = 200; /* 10ns */
395			if (spd.clk_cycle3 == 0xa0)
396				caslat = caslat - 2;
397			else if (spd.clk_cycle2 == 0xa0)
398				caslat = caslat - 1;
399			else
400				caslat = caslat;
401		}
402	} else if (max_data_rate >= 256) { /* it is DDR 266 */
403		if (ddrc_clk <= 350 && ddrc_clk > 280) {
404			/* DDR controller clk at 280~350 */
405			printf("DDR: DDR controller freq is more than "
406				"max data rate of the module\n");
407			return 0;
408		} else if (ddrc_clk <= 280 && ddrc_clk > 230) {
409			/* DDR controller clk at 230~280 */
410			effective_data_rate = 266; /* 7.5ns */
411			caslat = caslat;
412		} else if (ddrc_clk <= 230 && ddrc_clk > 90) {
413			/* DDR controller clk at 90~230 */
414			effective_data_rate = 200; /* 10ns */
415			if (spd.clk_cycle2 == 0xa0)
416				caslat = caslat - 1;
417		}
418	} else if (max_data_rate >= 190) { /* it is DDR 200 */
419		if (ddrc_clk <= 350 && ddrc_clk > 230) {
420			/* DDR controller clk at 230~350 */
421			printf("DDR: DDR controller freq is more than "
422				"max data rate of the module\n");
423			return 0;
424		} else if (ddrc_clk <= 230 && ddrc_clk > 90) {
425			/* DDR controller clk at 90~230 */
426			effective_data_rate = 200; /* 10ns */
427			caslat = caslat;
428		}
429	}
430
431	debug("DDR:Effective data rate is: %dMHz\n", effective_data_rate);
432	debug("DDR:The MSB 1 of CAS Latency is: %d\n", caslat);
433
434	/*
435	 * Errata DDR6 work around: input enable 2 cycles earlier.
436	 * including MPC834X Rev1.0/1.1 and MPC8360 Rev1.1/1.2.
437	 */
438	if(PVR_MAJ(pvr) <= 1 && spd.mem_type == SPD_MEMTYPE_DDR){
439		if (caslat == 2)
440			ddr->debug_reg = 0x201c0000; /* CL=2 */
441		else if (caslat == 3)
442			ddr->debug_reg = 0x202c0000; /* CL=2.5 */
443		else if (caslat == 4)
444			ddr->debug_reg = 0x202c0000; /* CL=3.0 */
445
446		sync();
447
448		debug("Errata DDR6 (debug_reg=0x%08x)\n", ddr->debug_reg);
449	}
450
451	/*
452	 * Convert caslat clocks to DDR controller value.
453	 * Force caslat_ctrl to be DDR Controller field-sized.
454	 */
455	if (spd.mem_type == SPD_MEMTYPE_DDR) {
456		caslat_ctrl = (caslat + 1) & 0x07;
457	} else {
458		caslat_ctrl =  (2 * caslat - 1) & 0x0f;
459	}
460
461	debug("DDR: effective data rate is %d MHz\n", effective_data_rate);
462	debug("DDR: caslat SPD bit is %d, controller field is 0x%x\n",
463	      caslat, caslat_ctrl);
464
465	/*
466	 * Timing Config 0.
467	 * Avoid writing for DDR I.
468	 */
469	if (spd.mem_type == SPD_MEMTYPE_DDR2) {
470		unsigned char taxpd_clk = 8;		/* By the book. */
471		unsigned char tmrd_clk = 2;		/* By the book. */
472		unsigned char act_pd_exit = 2;		/* Empirical? */
473		unsigned char pre_pd_exit = 6;		/* Empirical? */
474
475		ddr->timing_cfg_0 = (0
476			| ((act_pd_exit & 0x7) << 20)	/* ACT_PD_EXIT */
477			| ((pre_pd_exit & 0x7) << 16)	/* PRE_PD_EXIT */
478			| ((taxpd_clk & 0xf) << 8)	/* ODT_PD_EXIT */
479			| ((tmrd_clk & 0xf) << 0)	/* MRS_CYC */
480			);
481		debug("DDR: timing_cfg_0 = 0x%08x\n", ddr->timing_cfg_0);
482	}
483
484	/*
485	 * For DDR I, WRREC(Twr) and WRTORD(Twtr) are not in SPD,
486	 * use conservative value.
487	 * For DDR II, they are bytes 36 and 37, in quarter nanos.
488	 */
489
490	if (spd.mem_type == SPD_MEMTYPE_DDR) {
491		twr_clk = 3;	/* Clocks */
492		twtr_clk = 1;	/* Clocks */
493	} else {
494		twr_clk = picos_to_clk(spd.twr * 250);
495		twtr_clk = picos_to_clk(spd.twtr * 250);
496		if (twtr_clk < 2)
497			twtr_clk = 2;
498	}
499
500	/*
501	 * Calculate Trfc, in picos.
502	 * DDR I:  Byte 42 straight up in ns.
503	 * DDR II: Byte 40 and 42 swizzled some, in ns.
504	 */
505	if (spd.mem_type == SPD_MEMTYPE_DDR) {
506		trfc = spd.trfc * 1000;		/* up to ps */
507	} else {
508		unsigned int byte40_table_ps[8] = {
509			0,
510			250,
511			330,
512			500,
513			660,
514			750,
515			0,
516			0
517		};
518
519		trfc = (((spd.trctrfc_ext & 0x1) * 256) + spd.trfc) * 1000
520			+ byte40_table_ps[(spd.trctrfc_ext >> 1) & 0x7];
521	}
522	trfc_clk = picos_to_clk(trfc);
523
524	/*
525	 * Trcd, Byte 29, from quarter nanos to ps and clocks.
526	 */
527	trcd_clk = picos_to_clk(spd.trcd * 250) & 0x7;
528
529	/*
530	 * Convert trfc_clk to DDR controller fields.  DDR I should
531	 * fit in the REFREC field (16-19) of TIMING_CFG_1, but the
532	 * 83xx controller has an extended REFREC field of three bits.
533	 * The controller automatically adds 8 clocks to this value,
534	 * so preadjust it down 8 first before splitting it up.
535	 */
536	trfc_low = (trfc_clk - 8) & 0xf;
537
538	ddr->timing_cfg_1 =
539	    (((picos_to_clk(spd.trp * 250) & 0x07) << 28 ) |	/* PRETOACT */
540	     ((picos_to_clk(spd.tras * 1000) & 0x0f ) << 24 ) | /* ACTTOPRE */
541	     (trcd_clk << 20 ) |				/* ACTTORW */
542	     (caslat_ctrl << 16 ) |				/* CASLAT */
543	     (trfc_low << 12 ) |				/* REFEC */
544	     ((twr_clk & 0x07) << 8) |				/* WRRREC */
545	     ((picos_to_clk(spd.trrd * 250) & 0x07) << 4) |	/* ACTTOACT */
546	     ((twtr_clk & 0x07) << 0)				/* WRTORD */
547	    );
548
549	/*
550	 * Additive Latency
551	 * For DDR I, 0.
552	 * For DDR II, with ODT enabled, use "a value" less than ACTTORW,
553	 * which comes from Trcd, and also note that:
554	 *	add_lat + caslat must be >= 4
555	 */
556	add_lat = 0;
557	if (spd.mem_type == SPD_MEMTYPE_DDR2
558	    && (odt_wr_cfg || odt_rd_cfg)
559	    && (caslat < 4)) {
560		add_lat = 4 - caslat;
561		if ((add_lat + caslat) < 4) {
562			add_lat = 0;
563		}
564	}
565
566	/*
567	 * Write Data Delay
568	 * Historically 0x2 == 4/8 clock delay.
569	 * Empirically, 0x3 == 6/8 clock delay is suggested for DDR I 266.
570	 */
571	wr_data_delay = 2;
572#ifdef CONFIG_SYS_DDR_WRITE_DATA_DELAY
573	wr_data_delay = CONFIG_SYS_DDR_WRITE_DATA_DELAY;
574#endif
575
576	/*
577	 * Write Latency
578	 * Read to Precharge
579	 * Minimum CKE Pulse Width.
580	 * Four Activate Window
581	 */
582	if (spd.mem_type == SPD_MEMTYPE_DDR) {
583		/*
584		 * This is a lie.  It should really be 1, but if it is
585		 * set to 1, bits overlap into the old controller's
586		 * otherwise unused ACSM field.  If we leave it 0, then
587		 * the HW will magically treat it as 1 for DDR 1.  Oh Yea.
588		 */
589		wr_lat = 0;
590
591		trtp_clk = 2;		/* By the book. */
592		cke_min_clk = 1;	/* By the book. */
593		four_act = 1;		/* By the book. */
594
595	} else {
596		wr_lat = caslat - 1;
597
598		/* Convert SPD value from quarter nanos to picos. */
599		trtp_clk = picos_to_clk(spd.trtp * 250);
600		if (trtp_clk < 2)
601			trtp_clk = 2;
602		trtp_clk += add_lat;
603
604		cke_min_clk = 3;	/* By the book. */
605		four_act = picos_to_clk(37500);	/* By the book. 1k pages? */
606	}
607
608	/*
609	 * Empirically set ~MCAS-to-preamble override for DDR 2.
610	 * Your mileage will vary.
611	 */
612	cpo = 0;
613	if (spd.mem_type == SPD_MEMTYPE_DDR2) {
614#ifdef CONFIG_SYS_DDR_CPO
615		cpo = CONFIG_SYS_DDR_CPO;
616#else
617		if (effective_data_rate == 266) {
618			cpo = 0x4;		/* READ_LAT + 1/2 */
619		} else if (effective_data_rate == 333) {
620			cpo = 0x6;		/* READ_LAT + 1 */
621		} else if (effective_data_rate == 400) {
622			cpo = 0x7;		/* READ_LAT + 5/4 */
623		} else {
624			/* Automatic calibration */
625			cpo = 0x1f;
626		}
627#endif
628	}
629
630	ddr->timing_cfg_2 = (0
631		| ((add_lat & 0x7) << 28)		/* ADD_LAT */
632		| ((cpo & 0x1f) << 23)			/* CPO */
633		| ((wr_lat & 0x7) << 19)		/* WR_LAT */
634		| ((trtp_clk & 0x7) << 13)		/* RD_TO_PRE */
635		| ((wr_data_delay & 0x7) << 10)		/* WR_DATA_DELAY */
636		| ((cke_min_clk & 0x7) << 6)		/* CKE_PLS */
637		| ((four_act & 0x1f) << 0)		/* FOUR_ACT */
638		);
639
640	debug("DDR:timing_cfg_1=0x%08x\n", ddr->timing_cfg_1);
641	debug("DDR:timing_cfg_2=0x%08x\n", ddr->timing_cfg_2);
642
643	/* Check DIMM data bus width */
644	if (spd.dataw_lsb < 64) {
645		if (spd.mem_type == SPD_MEMTYPE_DDR)
646			burstlen = 0x03; /* 32 bit data bus, burst len is 8 */
647		else
648			burstlen = 0x02; /* 32 bit data bus, burst len is 4 */
649		debug("\n   DDR DIMM: data bus width is 32 bit");
650	} else {
651		burstlen = 0x02; /* Others act as 64 bit bus, burst len is 4 */
652		debug("\n   DDR DIMM: data bus width is 64 bit");
653	}
654
655	/* Is this an ECC DDR chip? */
656	if (spd.config == 0x02)
657		debug(" with ECC\n");
658	else
659		debug(" without ECC\n");
660
661	/* Burst length is always 4 for 64 bit data bus, 8 for 32 bit data bus,
662	   Burst type is sequential
663	 */
664	if (spd.mem_type == SPD_MEMTYPE_DDR) {
665		switch (caslat) {
666		case 1:
667			ddr->sdram_mode = 0x50 | burstlen; /* CL=1.5 */
668			break;
669		case 2:
670			ddr->sdram_mode = 0x20 | burstlen; /* CL=2.0 */
671			break;
672		case 3:
673			ddr->sdram_mode = 0x60 | burstlen; /* CL=2.5 */
674			break;
675		case 4:
676			ddr->sdram_mode = 0x30 | burstlen; /* CL=3.0 */
677			break;
678		default:
679			printf("DDR:only CL 1.5, 2.0, 2.5, 3.0 is supported\n");
680			return 0;
681		}
682	} else {
683		mode_odt_enable = 0x0;                  /* Default disabled */
684		if (odt_wr_cfg || odt_rd_cfg) {
685			/*
686			 * Bits 6 and 2 in Extended MRS(1)
687			 * Bit 2 == 0x04 == 75 Ohm, with 2 DIMM modules.
688			 * Bit 6 == 0x40 == 150 Ohm, with 1 DIMM module.
689			 */
690			mode_odt_enable = 0x40;         /* 150 Ohm */
691		}
692
693		ddr->sdram_mode =
694			(0
695			 | (1 << (16 + 10))             /* DQS Differential disable */
696#ifdef CFG_SYS_DDR_MODE_WEAK
697			 | (1 << (16 + 1))		/* weak driver (~60%) */
698#endif
699			 | (add_lat << (16 + 3))        /* Additive Latency in EMRS1 */
700			 | (mode_odt_enable << 16)      /* ODT Enable in EMRS1 */
701			 | ((twr_clk - 1) << 9)         /* Write Recovery Autopre */
702			 | (caslat << 4)                /* caslat */
703			 | (burstlen << 0)              /* Burst length */
704			);
705	}
706	debug("DDR:sdram_mode=0x%08x\n", ddr->sdram_mode);
707
708	/*
709	 * Clear EMRS2 and EMRS3.
710	 */
711	ddr->sdram_mode2 = 0;
712	debug("DDR: sdram_mode2 = 0x%08x\n", ddr->sdram_mode2);
713
714	switch (spd.refresh) {
715		case 0x00:
716		case 0x80:
717			refresh_clk = picos_to_clk(15625000);
718			break;
719		case 0x01:
720		case 0x81:
721			refresh_clk = picos_to_clk(3900000);
722			break;
723		case 0x02:
724		case 0x82:
725			refresh_clk = picos_to_clk(7800000);
726			break;
727		case 0x03:
728		case 0x83:
729			refresh_clk = picos_to_clk(31300000);
730			break;
731		case 0x04:
732		case 0x84:
733			refresh_clk = picos_to_clk(62500000);
734			break;
735		case 0x05:
736		case 0x85:
737			refresh_clk = picos_to_clk(125000000);
738			break;
739		default:
740			refresh_clk = 0x512;
741			break;
742	}
743
744	/*
745	 * Set BSTOPRE to 0x100 for page mode
746	 * If auto-charge is used, set BSTOPRE = 0
747	 */
748	ddr->sdram_interval = ((refresh_clk & 0x3fff) << 16) | 0x100;
749	debug("DDR:sdram_interval=0x%08x\n", ddr->sdram_interval);
750
751	/*
752	 * SDRAM Cfg 2
753	 */
754	odt_cfg = 0;
755#ifndef CONFIG_NEVER_ASSERT_ODT_TO_CPU
756	if (odt_rd_cfg | odt_wr_cfg) {
757		odt_cfg = 0x2;		/* ODT to IOs during reads */
758	}
759#endif
760	if (spd.mem_type == SPD_MEMTYPE_DDR2) {
761		ddr->sdram_cfg2 = (0
762			    | (0 << 26)	/* True DQS */
763			    | (odt_cfg << 21)	/* ODT only read */
764			    | (1 << 12)	/* 1 refresh at a time */
765			    );
766
767		debug("DDR: sdram_cfg2  = 0x%08x\n", ddr->sdram_cfg2);
768	}
769
770#ifdef CFG_SYS_DDR_SDRAM_CLK_CNTL	/* Optional platform specific value */
771	ddr->sdram_clk_cntl = CFG_SYS_DDR_SDRAM_CLK_CNTL;
772#endif
773	debug("DDR:sdram_clk_cntl=0x%08x\n", ddr->sdram_clk_cntl);
774
775	sync();
776	isync();
777
778	udelay(600);
779
780	/*
781	 * Figure out the settings for the sdram_cfg register. Build up
782	 * the value in 'sdram_cfg' before writing since the write into
783	 * the register will actually enable the memory controller, and all
784	 * settings must be done before enabling.
785	 *
786	 * sdram_cfg[0]   = 1 (ddr sdram logic enable)
787	 * sdram_cfg[1]   = 1 (self-refresh-enable)
788	 * sdram_cfg[5:7] = (SDRAM type = DDR SDRAM)
789	 *			010 DDR 1 SDRAM
790	 *			011 DDR 2 SDRAM
791	 * sdram_cfg[12] = 0 (32_BE =0 , 64 bit bus mode)
792	 * sdram_cfg[13] = 0 (8_BE =0, 4-beat bursts)
793	 */
794	if (spd.mem_type == SPD_MEMTYPE_DDR)
795		sdram_type = SDRAM_CFG_SDRAM_TYPE_DDR1;
796	else
797		sdram_type = SDRAM_CFG_SDRAM_TYPE_DDR2;
798
799	sdram_cfg = (0
800		     | SDRAM_CFG_MEM_EN		/* DDR enable */
801		     | SDRAM_CFG_SREN		/* Self refresh */
802		     | sdram_type		/* SDRAM type */
803		     );
804
805	/* sdram_cfg[3] = RD_EN - registered DIMM enable */
806	if (spd.mod_attr & 0x02)
807		sdram_cfg |= SDRAM_CFG_RD_EN;
808
809	/* The DIMM is 32bit width */
810	if (spd.dataw_lsb < 64) {
811		if (spd.mem_type == SPD_MEMTYPE_DDR)
812			sdram_cfg |= SDRAM_CFG_32_BE | SDRAM_CFG_8_BE;
813		if (spd.mem_type == SPD_MEMTYPE_DDR2)
814			sdram_cfg |= SDRAM_CFG_32_BE;
815	}
816
817	ddrc_ecc_enable = 0;
818
819#if defined(CONFIG_DDR_ECC)
820	/* Enable ECC with sdram_cfg[2] */
821	if (spd.config == 0x02) {
822		sdram_cfg |= 0x20000000;
823		ddrc_ecc_enable = 1;
824		/* disable error detection */
825		ddr->err_disable = ~ECC_ERROR_ENABLE;
826		/* set single bit error threshold to maximum value,
827		 * reset counter to zero */
828		ddr->err_sbe = (255 << ECC_ERROR_MAN_SBET_SHIFT) |
829				(0 << ECC_ERROR_MAN_SBEC_SHIFT);
830	}
831
832	debug("DDR:err_disable=0x%08x\n", ddr->err_disable);
833	debug("DDR:err_sbe=0x%08x\n", ddr->err_sbe);
834#endif
835	debug("   DDRC ECC mode: %s\n", ddrc_ecc_enable ? "ON":"OFF");
836
837	/* Enable controller, and GO! */
838	ddr->sdram_cfg = sdram_cfg;
839	sync();
840	isync();
841	udelay(500);
842
843	debug("DDR:sdram_cfg=0x%08x\n", ddr->sdram_cfg);
844	return memsize; /*in MBytes*/
845}
846#endif /* CONFIG_SPD_EEPROM */
847
848#if defined(CONFIG_DDR_ECC) && !defined(CONFIG_ECC_INIT_VIA_DDRCONTROLLER)
849static inline u32 mftbu(void)
850{
851	u32 rval;
852
853	asm volatile("mftbu %0" : "=r" (rval));
854	return rval;
855}
856
857static inline u32 mftb(void)
858{
859	u32 rval;
860
861	asm volatile("mftb %0" : "=r" (rval));
862	return rval;
863}
864
865/*
866 * Use timebase counter, get_timer() is not available
867 * at this point of initialization yet.
868 */
869static __inline__ unsigned long get_tbms (void)
870{
871	unsigned long tbl;
872	unsigned long tbu1, tbu2;
873	unsigned long ms;
874	unsigned long long tmp;
875
876	ulong tbclk = get_tbclk();
877
878	/* get the timebase ticks */
879	do {
880		tbu1 = mftbu();
881		tbl = mftb();
882		tbu2 = mftbu();
883	} while (tbu1 != tbu2);
884
885	/* convert ticks to ms */
886	tmp = (unsigned long long)(tbu1);
887	tmp = (tmp << 32);
888	tmp += (unsigned long long)(tbl);
889	ms = tmp/(tbclk/1000);
890
891	return ms;
892}
893
894/*
895 * Initialize all of memory for ECC, then enable errors.
896 */
897void ddr_enable_ecc(unsigned int dram_size)
898{
899	volatile immap_t *immap = (immap_t *)CONFIG_SYS_IMMR;
900	volatile ddr83xx_t *ddr= &immap->ddr;
901	unsigned long t_start, t_end;
902	register u64 *p;
903	register uint size;
904	unsigned int pattern[2];
905
906	icache_enable();
907	t_start = get_tbms();
908	pattern[0] = 0xdeadbeef;
909	pattern[1] = 0xdeadbeef;
910
911	debug("ddr init: CPU FP write method\n");
912	size = dram_size;
913	for (p = 0; p < (u64*)(size); p++) {
914		ppcDWstore((u32*)p, pattern);
915	}
916	sync();
917
918	t_end = get_tbms();
919	icache_disable();
920
921	debug("\nREADY!!\n");
922	debug("ddr init duration: %ld ms\n", t_end - t_start);
923
924	/* Clear All ECC Errors */
925	if ((ddr->err_detect & ECC_ERROR_DETECT_MME) == ECC_ERROR_DETECT_MME)
926		ddr->err_detect |= ECC_ERROR_DETECT_MME;
927	if ((ddr->err_detect & ECC_ERROR_DETECT_MBE) == ECC_ERROR_DETECT_MBE)
928		ddr->err_detect |= ECC_ERROR_DETECT_MBE;
929	if ((ddr->err_detect & ECC_ERROR_DETECT_SBE) == ECC_ERROR_DETECT_SBE)
930		ddr->err_detect |= ECC_ERROR_DETECT_SBE;
931	if ((ddr->err_detect & ECC_ERROR_DETECT_MSE) == ECC_ERROR_DETECT_MSE)
932		ddr->err_detect |= ECC_ERROR_DETECT_MSE;
933
934	/* Disable ECC-Interrupts */
935	ddr->err_int_en &= ECC_ERR_INT_DISABLE;
936
937	/* Enable errors for ECC */
938	ddr->err_disable &= ECC_ERROR_ENABLE;
939
940	sync();
941	isync();
942}
943#endif	/* CONFIG_DDR_ECC */
944
945#endif /* !CONFIG_MPC83XX_SDRAM */
946