board/netstal/hcu5/sdram.c

   1 /*
   2  * (C) Copyright 2007
   3  * Niklaus Giger (Niklaus.Giger@netstal.com)
   4  * (C) Copyright 2006
   5  * Sylvie Gohl,             AMCC/IBM, gohl.sylvie@fr.ibm.com
   6  * Jacqueline Pira-Ferriol, AMCC/IBM, jpira-ferriol@fr.ibm.com
   7  * Thierry Roman,           AMCC/IBM, thierry_roman@fr.ibm.com
   8  * Alain Saurel,            AMCC/IBM, alain.saurel@fr.ibm.com
   9  * Robert Snyder,           AMCC/IBM, rob.snyder@fr.ibm.com
  10  *
  11  * (C) Copyright 2006
  12  * Stefan Roese, DENX Software Engineering, sr@denx.de.
  13  *
  14  * This program is free software; you can redistribute it and/or
  15  * modify it under the terms of the GNU General Public License as
  16  * published by the Free Software Foundation; either version 2 of
  17  * the License, or (at your option) any later version.
  18  *
  19  * This program is distributed in the hope that it will be useful,
  20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22  * GNU General Public License for more details.
  23  *
  24  * You should have received a copy of the GNU General Public License
  25  * along with this program; if not, write to the Free Software
  26  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  27  * MA 02111-1307 USA
  28  */
  29
  30 /* define DEBUG for debug output */
  31 #undef DEBUG
  32
  33 #include <common.h>
  34 #include <asm/processor.h>
  35 #include <asm/io.h>
  36 #include <asm/mmu.h>
  37 #include <ppc440.h>
  38
  39 void hcu_led_set(u32 value);
  40 void dcbz_area(u32 start_address, u32 num_bytes);
  41 void dflush(void);
  42
  43 #define DDR_DCR_BASE 0x10
  44 #define ddrcfga  (DDR_DCR_BASE+0x0)   /* DDR configuration address reg */
  45 #define ddrcfgd  (DDR_DCR_BASE+0x1)   /* DDR configuration data reg    */
  46
  47 #define DDR0_01_INT_MASK_MASK             0x000000FF
  48 #define DDR0_00_INT_ACK_ALL               0x7F000000
  49 #define DDR0_01_INT_MASK_ALL_ON           0x000000FF
  50 #define DDR0_01_INT_MASK_ALL_OFF          0x00000000
  51
  52 #define DDR0_17_DLLLOCKREG_MASK           0x00010000 /* Read only */
  53 #define DDR0_17_DLLLOCKREG_UNLOCKED       0x00000000
  54 #define DDR0_17_DLLLOCKREG_LOCKED         0x00010000
  55
  56 #define DDR0_22                         0x16
  57 /* ECC */
  58 #define DDR0_22_CTRL_RAW_MASK             0x03000000
  59 #define DDR0_22_CTRL_RAW_ECC_DISABLE      0x00000000 /* ECC not enabled */
  60 #define DDR0_22_CTRL_RAW_ECC_CHECK_ONLY   0x01000000 /* ECC no correction */
  61 #define DDR0_22_CTRL_RAW_NO_ECC_RAM       0x02000000 /* Not a ECC RAM*/
  62 #define DDR0_22_CTRL_RAW_ECC_ENABLE       0x03000000 /* ECC correcting on */
  63 #define DDR0_03_CASLAT_DECODE(n)            ((((unsigned long)(n))>>16)&0x7)
  64
  65 #define ECC_RAM                         0x03267F0B
  66 #define NO_ECC_RAM                      0x00267F0B
  67
  68 #define HCU_HW_SDRAM_CONFIG_MASK        0x7
  69
  70 #define MY_TLB_WORD2_I_ENABLE TLB_WORD2_I_ENABLE
  71         /* disable caching on DDR2 */
  72
  73 void program_tlb(u32 phys_addr, u32 virt_addr, u32 size, u32 tlb_word2_i_value);
  74
  75 void board_add_ram_info(int use_default)
  76 {
  77         PPC4xx_SYS_INFO board_cfg;
  78         u32 val;
  79
  80         mfsdram(DDR0_22, val);
  81         val &= DDR0_22_CTRL_RAW_MASK;
  82         switch (val) {
  83         case DDR0_22_CTRL_RAW_ECC_DISABLE:
  84                 puts(" (ECC disabled");
  85                 break;
  86         case DDR0_22_CTRL_RAW_ECC_CHECK_ONLY:
  87                 puts(" (ECC check only");
  88                 break;
  89         case DDR0_22_CTRL_RAW_NO_ECC_RAM:
  90                 puts(" (no ECC ram");
  91                 break;
  92         case DDR0_22_CTRL_RAW_ECC_ENABLE:
  93                 puts(" (ECC enabled");
  94                 break;
  95         }
  96
  97         get_sys_info(&board_cfg);
  98         printf(", %d MHz", (board_cfg.freqPLB * 2) / 1000000);
  99
 100         mfsdram(DDR0_03, val);
 101         val = DDR0_03_CASLAT_DECODE(val);
 102         printf(", CL%d)", val);
 103 }
 104
 105 /*--------------------------------------------------------------------
 106  * wait_for_dlllock.
 107  *--------------------------------------------------------------------*/
 108 static int wait_for_dlllock(void)
 109 {
 110         unsigned long val;
 111         int wait = 0;
 112
 113         /* -----------------------------------------------------------+
 114          * Wait for the DCC master delay line to finish calibration
 115          * ----------------------------------------------------------*/
 116         mtdcr(ddrcfga, DDR0_17);
 117         val = DDR0_17_DLLLOCKREG_UNLOCKED;
 118
 119         while (wait != 0xffff) {
 120                 val = mfdcr(ddrcfgd);
 121                 if ((val & DDR0_17_DLLLOCKREG_MASK) ==
 122                     DDR0_17_DLLLOCKREG_LOCKED)
 123                         /* dlllockreg bit on */
 124                         return 0;
 125                 else
 126                         wait++;
 127         }
 128         debug("0x%04x: DDR0_17 Value (dlllockreg bit): 0x%08x\n", wait, val);
 129         debug("Waiting for dlllockreg bit to raise\n");
 130
 131         return -1;
 132 }
 133
 134 /***********************************************************************
 135  *
 136  * sdram_panic -- Panic if we cannot configure the sdram correctly
 137  *
 138  ************************************************************************/
 139 void sdram_panic(const char *reason)
 140 {
 141         printf("\n%s: reason %s",  __FUNCTION__,  reason);
 142         hcu_led_set(0xff);
 143         while (1) {
 144         }
 145         /* Never return */
 146 }
 147
 148 #ifdef CONFIG_DDR_ECC
 149 static void blank_string(int size)
 150 {
 151         int i;
 152
 153         for (i=0; i<size; i++)
 154                 putc('\b');
 155         for (i=0; i<size; i++)
 156                 putc(' ');
 157         for (i=0; i<size; i++)
 158                 putc('\b');
 159 }
 160 /*---------------------------------------------------------------------------+
 161  * program_ecc.
 162  *---------------------------------------------------------------------------*/
 163 static void program_ecc(unsigned long start_address, unsigned long num_bytes)
 164 {
 165         u32 val;
 166         char str[] = "ECC generation -";
 167 #if defined(CONFIG_PRAM)
 168         u32 *magicPtr;
 169         u32 magic;
 170
 171         if ((mfspr(dbcr0) & 0x80000000) == 0) {
 172                 /* only if no external debugger is alive!
 173                  * Check whether vxWorks is using EDR logging, if yes zero
 174                  * also PostMortem and user reserved memory
 175                  */
 176                 magicPtr = (u32 *)(start_address + num_bytes -
 177                                 (CONFIG_PRAM*1024) + sizeof(u32));
 178                 magic = in_be32(magicPtr);
 179                 debug("%s:  CONFIG_PRAM %d kB magic 0x%x 0x%p\n",
 180                       __FUNCTION__, CONFIG_PRAM,
 181                       magicPtr, magic);
 182                 if (magic == 0xbeefbabe) {
 183                         printf("%s: preserving at %p\n", __FUNCTION__, magicPtr);
 184                         num_bytes -= (CONFIG_PRAM*1024) - PM_RESERVED_MEM;
 185                 }
 186         }
 187 #endif
 188
 189         sync();
 190         eieio();
 191
 192         puts(str);
 193
 194         /* ECC bit set method for cached memory */
 195         /* Fast method, no noticeable delay */
 196         dcbz_area(start_address, num_bytes);
 197         dflush();
 198         blank_string(strlen(str));
 199
 200         /* Clear error status */
 201         mfsdram(DDR0_00, val);
 202         mtsdram(DDR0_00, val | DDR0_00_INT_ACK_ALL);
 203
 204         /*
 205          * Clear possible ECC errors
 206          * If not done, then we could get an interrupt later on when
 207          * exceptions are enabled.
 208          */
 209         mtspr(mcsr, mfspr(mcsr));
 210
 211         /* Set 'int_mask' parameter to functionnal value */
 212         mfsdram(DDR0_01, val);
 213         mtsdram(DDR0_01, ((val &~ DDR0_01_INT_MASK_MASK) |
 214                           DDR0_01_INT_MASK_ALL_OFF));
 215
 216         return;
 217 }
 218 #endif
 219
 220
 221 /***********************************************************************
 222  *
 223  * initdram -- 440EPx's DDR controller is a DENALI Core
 224  *
 225  ************************************************************************/
 226 long int initdram (int board_type)
 227 {
 228         unsigned int dram_size = 0;
 229
 230         mtsdram(DDR0_02, 0x00000000);
 231
 232         /* Values must be kept in sync with Excel-table <<A0001492.>> ! */
 233         mtsdram(DDR0_00, 0x0000190A);
 234         mtsdram(DDR0_01, 0x01000000);
 235         mtsdram(DDR0_03, 0x02030602);
 236         mtsdram(DDR0_04, 0x0A020200);
 237         mtsdram(DDR0_05, 0x02020307);
 238         switch (in_be16((u16 *)HCU_HW_VERSION_REGISTER) & HCU_HW_SDRAM_CONFIG_MASK) {
 239         case 1:
 240                 dram_size = 256 * 1024 * 1024 ;
 241                 mtsdram(DDR0_06, 0x0102C812);  /* 256MB RAM */
 242                 mtsdram(DDR0_11, 0x0014C800);  /* 256MB RAM */
 243                 mtsdram(DDR0_43, 0x030A0200);  /* 256MB RAM */
 244                 break;
 245         case 0:
 246         default:
 247                 dram_size = 128 * 1024 * 1024 ;
 248                 mtsdram(DDR0_06, 0x0102C80D);  /* 128MB RAM */
 249                 mtsdram(DDR0_11, 0x000FC800);  /* 128MB RAM */
 250                 mtsdram(DDR0_43, 0x030A0300);  /* 128MB RAM */
 251                 break;
 252         }
 253         mtsdram(DDR0_07, 0x00090100);
 254
 255         /*
 256          * TCPD=200 cycles of clock input is required to lock the DLL.
 257          * CKE must be HIGH the entire time.mtsdram(DDR0_08, 0x02C80001);
 258          */
 259         mtsdram(DDR0_08, 0x02C80001);
 260         mtsdram(DDR0_09, 0x00011D5F);
 261         mtsdram(DDR0_10, 0x00000100);
 262         mtsdram(DDR0_12, 0x00000003);
 263         mtsdram(DDR0_14, 0x00000000);
 264         mtsdram(DDR0_17, 0x1D000000);
 265         mtsdram(DDR0_18, 0x1D1D1D1D);
 266         mtsdram(DDR0_19, 0x1D1D1D1D);
 267         mtsdram(DDR0_20, 0x0B0B0B0B);
 268         mtsdram(DDR0_21, 0x0B0B0B0B);
 269 #ifdef CONFIG_DDR_ECC
 270         mtsdram(DDR0_22, ECC_RAM);
 271 #else
 272         mtsdram(DDR0_22, NO_ECC_RAM);
 273 #endif
 274
 275         mtsdram(DDR0_23, 0x00000000);
 276         mtsdram(DDR0_24, 0x01020001);
 277         mtsdram(DDR0_26, 0x2D930517);
 278         mtsdram(DDR0_27, 0x00008236);
 279         mtsdram(DDR0_28, 0x00000000);
 280         mtsdram(DDR0_31, 0x00000000);
 281         mtsdram(DDR0_42, 0x01000006);
 282         mtsdram(DDR0_44, 0x00000003);
 283         mtsdram(DDR0_02, 0x00000001);
 284         wait_for_dlllock();
 285         mtsdram(DDR0_00, 0x40000000);  /* Zero init bit */
 286
 287         /*
 288          * Program tlb entries for this size (dynamic)
 289          */
 290         remove_tlb(CFG_SDRAM_BASE, 256 << 20);
 291         program_tlb(0, 0, dram_size, TLB_WORD2_W_ENABLE | TLB_WORD2_I_ENABLE);
 292
 293         /*
 294          * Setup 2nd TLB with same physical address but different virtual
 295          * address with cache enabled. This is done for fast ECC generation.
 296          */
 297         program_tlb(0, CFG_DDR_CACHED_ADDR, dram_size, 0);
 298
 299 #ifdef CONFIG_DDR_ECC
 300         /*
 301          * If ECC is enabled, initialize the parity bits.
 302          */
 303         program_ecc(CFG_DDR_CACHED_ADDR, dram_size);
 304 #endif
 305
 306         return (dram_size);
 307 }