1 /* 2 * Copyright (C) 2007,2008 Freescale Semiconductor, Inc. All rights reserved. 3 * 4 * Author: John Rigby <jrigby@freescale.com> 5 * 6 * Description: 7 * MPC512x Shared code 8 * 9 * This is free software; you can redistribute it and/or modify it 10 * under the terms of the GNU General Public License as published by 11 * the Free Software Foundation; either version 2 of the License, or 12 * (at your option) any later version. 13 */ 14 15 #include <linux/kernel.h> 16 #include <linux/io.h> 17 #include <linux/irq.h> 18 #include <linux/of_platform.h> 19 #include <linux/fsl-diu-fb.h> 20 #include <linux/bootmem.h> 21 #include <sysdev/fsl_soc.h> 22 23 #include <asm/cacheflush.h> 24 #include <asm/machdep.h> 25 #include <asm/ipic.h> 26 #include <asm/prom.h> 27 #include <asm/time.h> 28 #include <asm/mpc5121.h> 29 #include <asm/mpc52xx_psc.h> 30 31 #include "mpc512x.h" 32 33 static struct mpc512x_reset_module __iomem *reset_module_base; 34 35 static void __init mpc512x_restart_init(void) 36 { 37 struct device_node *np; 38 39 np = of_find_compatible_node(NULL, NULL, "fsl,mpc5121-reset"); 40 if (!np) 41 return; 42 43 reset_module_base = of_iomap(np, 0); 44 of_node_put(np); 45 } 46 47 void mpc512x_restart(char *cmd) 48 { 49 if (reset_module_base) { 50 /* Enable software reset "RSTE" */ 51 out_be32(&reset_module_base->rpr, 0x52535445); 52 /* Set software hard reset */ 53 out_be32(&reset_module_base->rcr, 0x2); 54 } else { 55 pr_err("Restart module not mapped.\n"); 56 } 57 for (;;) 58 ; 59 } 60 61 #if defined(CONFIG_FB_FSL_DIU) || defined(CONFIG_FB_FSL_DIU_MODULE) 62 63 struct fsl_diu_shared_fb { 64 u8 gamma[0x300]; /* 32-bit aligned! */ 65 struct diu_ad ad0; /* 32-bit aligned! */ 66 phys_addr_t fb_phys; 67 size_t fb_len; 68 bool in_use; 69 }; 70 71 #define DIU_DIV_MASK 0x000000ff 72 void mpc512x_set_pixel_clock(unsigned int pixclock) 73 { 74 unsigned long bestval, bestfreq, speed, busfreq; 75 unsigned long minpixclock, maxpixclock, pixval; 76 struct mpc512x_ccm __iomem *ccm; 77 struct device_node *np; 78 u32 temp; 79 long err; 80 int i; 81 82 np = of_find_compatible_node(NULL, NULL, "fsl,mpc5121-clock"); 83 if (!np) { 84 pr_err("Can't find clock control module.\n"); 85 return; 86 } 87 88 ccm = of_iomap(np, 0); 89 of_node_put(np); 90 if (!ccm) { 91 pr_err("Can't map clock control module reg.\n"); 92 return; 93 } 94 95 np = of_find_node_by_type(NULL, "cpu"); 96 if (np) { 97 const unsigned int *prop = 98 of_get_property(np, "bus-frequency", NULL); 99 100 of_node_put(np); 101 if (prop) { 102 busfreq = *prop; 103 } else { 104 pr_err("Can't get bus-frequency property\n"); 105 return; 106 } 107 } else { 108 pr_err("Can't find 'cpu' node.\n"); 109 return; 110 } 111 112 /* Pixel Clock configuration */ 113 pr_debug("DIU: Bus Frequency = %lu\n", busfreq); 114 speed = busfreq * 4; /* DIU_DIV ratio is 4 * CSB_CLK / DIU_CLK */ 115 116 /* Calculate the pixel clock with the smallest error */ 117 /* calculate the following in steps to avoid overflow */ 118 pr_debug("DIU pixclock in ps - %d\n", pixclock); 119 temp = (1000000000 / pixclock) * 1000; 120 pixclock = temp; 121 pr_debug("DIU pixclock freq - %u\n", pixclock); 122 123 temp = temp / 20; /* pixclock * 0.05 */ 124 pr_debug("deviation = %d\n", temp); 125 minpixclock = pixclock - temp; 126 maxpixclock = pixclock + temp; 127 pr_debug("DIU minpixclock - %lu\n", minpixclock); 128 pr_debug("DIU maxpixclock - %lu\n", maxpixclock); 129 pixval = speed/pixclock; 130 pr_debug("DIU pixval = %lu\n", pixval); 131 132 err = LONG_MAX; 133 bestval = pixval; 134 pr_debug("DIU bestval = %lu\n", bestval); 135 136 bestfreq = 0; 137 for (i = -1; i <= 1; i++) { 138 temp = speed / (pixval+i); 139 pr_debug("DIU test pixval i=%d, pixval=%lu, temp freq. = %u\n", 140 i, pixval, temp); 141 if ((temp < minpixclock) || (temp > maxpixclock)) 142 pr_debug("DIU exceeds monitor range (%lu to %lu)\n", 143 minpixclock, maxpixclock); 144 else if (abs(temp - pixclock) < err) { 145 pr_debug("Entered the else if block %d\n", i); 146 err = abs(temp - pixclock); 147 bestval = pixval + i; 148 bestfreq = temp; 149 } 150 } 151 152 pr_debug("DIU chose = %lx\n", bestval); 153 pr_debug("DIU error = %ld\n NomPixClk ", err); 154 pr_debug("DIU: Best Freq = %lx\n", bestfreq); 155 /* Modify DIU_DIV in CCM SCFR1 */ 156 temp = in_be32(&ccm->scfr1); 157 pr_debug("DIU: Current value of SCFR1: 0x%08x\n", temp); 158 temp &= ~DIU_DIV_MASK; 159 temp |= (bestval & DIU_DIV_MASK); 160 out_be32(&ccm->scfr1, temp); 161 pr_debug("DIU: Modified value of SCFR1: 0x%08x\n", temp); 162 iounmap(ccm); 163 } 164 165 enum fsl_diu_monitor_port 166 mpc512x_valid_monitor_port(enum fsl_diu_monitor_port port) 167 { 168 return FSL_DIU_PORT_DVI; 169 } 170 171 static struct fsl_diu_shared_fb __attribute__ ((__aligned__(8))) diu_shared_fb; 172 173 static inline void mpc512x_free_bootmem(struct page *page) 174 { 175 BUG_ON(PageTail(page)); 176 BUG_ON(atomic_read(&page->_count) > 1); 177 free_reserved_page(page); 178 } 179 180 void mpc512x_release_bootmem(void) 181 { 182 unsigned long addr = diu_shared_fb.fb_phys & PAGE_MASK; 183 unsigned long size = diu_shared_fb.fb_len; 184 unsigned long start, end; 185 186 if (diu_shared_fb.in_use) { 187 start = PFN_UP(addr); 188 end = PFN_DOWN(addr + size); 189 190 for (; start < end; start++) 191 mpc512x_free_bootmem(pfn_to_page(start)); 192 193 diu_shared_fb.in_use = false; 194 } 195 diu_ops.release_bootmem = NULL; 196 } 197 198 /* 199 * Check if DIU was pre-initialized. If so, perform steps 200 * needed to continue displaying through the whole boot process. 201 * Move area descriptor and gamma table elsewhere, they are 202 * destroyed by bootmem allocator otherwise. The frame buffer 203 * address range will be reserved in setup_arch() after bootmem 204 * allocator is up. 205 */ 206 void __init mpc512x_init_diu(void) 207 { 208 struct device_node *np; 209 struct diu __iomem *diu_reg; 210 phys_addr_t desc; 211 void __iomem *vaddr; 212 unsigned long mode, pix_fmt, res, bpp; 213 unsigned long dst; 214 215 np = of_find_compatible_node(NULL, NULL, "fsl,mpc5121-diu"); 216 if (!np) { 217 pr_err("No DIU node\n"); 218 return; 219 } 220 221 diu_reg = of_iomap(np, 0); 222 of_node_put(np); 223 if (!diu_reg) { 224 pr_err("Can't map DIU\n"); 225 return; 226 } 227 228 mode = in_be32(&diu_reg->diu_mode); 229 if (mode == MFB_MODE0) { 230 pr_info("%s: DIU OFF\n", __func__); 231 goto out; 232 } 233 234 desc = in_be32(&diu_reg->desc[0]); 235 vaddr = ioremap(desc, sizeof(struct diu_ad)); 236 if (!vaddr) { 237 pr_err("Can't map DIU area desc.\n"); 238 goto out; 239 } 240 memcpy(&diu_shared_fb.ad0, vaddr, sizeof(struct diu_ad)); 241 /* flush fb area descriptor */ 242 dst = (unsigned long)&diu_shared_fb.ad0; 243 flush_dcache_range(dst, dst + sizeof(struct diu_ad) - 1); 244 245 res = in_be32(&diu_reg->disp_size); 246 pix_fmt = in_le32(vaddr); 247 bpp = ((pix_fmt >> 16) & 0x3) + 1; 248 diu_shared_fb.fb_phys = in_le32(vaddr + 4); 249 diu_shared_fb.fb_len = ((res & 0xfff0000) >> 16) * (res & 0xfff) * bpp; 250 diu_shared_fb.in_use = true; 251 iounmap(vaddr); 252 253 desc = in_be32(&diu_reg->gamma); 254 vaddr = ioremap(desc, sizeof(diu_shared_fb.gamma)); 255 if (!vaddr) { 256 pr_err("Can't map DIU area desc.\n"); 257 diu_shared_fb.in_use = false; 258 goto out; 259 } 260 memcpy(&diu_shared_fb.gamma, vaddr, sizeof(diu_shared_fb.gamma)); 261 /* flush gamma table */ 262 dst = (unsigned long)&diu_shared_fb.gamma; 263 flush_dcache_range(dst, dst + sizeof(diu_shared_fb.gamma) - 1); 264 265 iounmap(vaddr); 266 out_be32(&diu_reg->gamma, virt_to_phys(&diu_shared_fb.gamma)); 267 out_be32(&diu_reg->desc[1], 0); 268 out_be32(&diu_reg->desc[2], 0); 269 out_be32(&diu_reg->desc[0], virt_to_phys(&diu_shared_fb.ad0)); 270 271 out: 272 iounmap(diu_reg); 273 } 274 275 void __init mpc512x_setup_diu(void) 276 { 277 int ret; 278 279 /* 280 * We do not allocate and configure new area for bitmap buffer 281 * because it would requere copying bitmap data (splash image) 282 * and so negatively affect boot time. Instead we reserve the 283 * already configured frame buffer area so that it won't be 284 * destroyed. The starting address of the area to reserve and 285 * also it's length is passed to reserve_bootmem(). It will be 286 * freed later on first open of fbdev, when splash image is not 287 * needed any more. 288 */ 289 if (diu_shared_fb.in_use) { 290 ret = reserve_bootmem(diu_shared_fb.fb_phys, 291 diu_shared_fb.fb_len, 292 BOOTMEM_EXCLUSIVE); 293 if (ret) { 294 pr_err("%s: reserve bootmem failed\n", __func__); 295 diu_shared_fb.in_use = false; 296 } 297 } 298 299 diu_ops.set_pixel_clock = mpc512x_set_pixel_clock; 300 diu_ops.valid_monitor_port = mpc512x_valid_monitor_port; 301 diu_ops.release_bootmem = mpc512x_release_bootmem; 302 } 303 304 #endif 305 306 void __init mpc512x_init_IRQ(void) 307 { 308 struct device_node *np; 309 310 np = of_find_compatible_node(NULL, NULL, "fsl,mpc5121-ipic"); 311 if (!np) 312 return; 313 314 ipic_init(np, 0); 315 of_node_put(np); 316 317 /* 318 * Initialize the default interrupt mapping priorities, 319 * in case the boot rom changed something on us. 320 */ 321 ipic_set_default_priority(); 322 } 323 324 /* 325 * Nodes to do bus probe on, soc and localbus 326 */ 327 static struct of_device_id __initdata of_bus_ids[] = { 328 { .compatible = "fsl,mpc5121-immr", }, 329 { .compatible = "fsl,mpc5121-localbus", }, 330 { .compatible = "fsl,mpc5121-mbx", }, 331 { .compatible = "fsl,mpc5121-nfc", }, 332 { .compatible = "fsl,mpc5121-sram", }, 333 { .compatible = "fsl,mpc5121-pci", }, 334 { .compatible = "gpio-leds", }, 335 {}, 336 }; 337 338 void __init mpc512x_declare_of_platform_devices(void) 339 { 340 if (of_platform_bus_probe(NULL, of_bus_ids, NULL)) 341 printk(KERN_ERR __FILE__ ": " 342 "Error while probing of_platform bus\n"); 343 } 344 345 #define DEFAULT_FIFO_SIZE 16 346 347 const char *mpc512x_select_psc_compat(void) 348 { 349 if (of_machine_is_compatible("fsl,mpc5121")) 350 return "fsl,mpc5121-psc"; 351 352 if (of_machine_is_compatible("fsl,mpc5125")) 353 return "fsl,mpc5125-psc"; 354 355 return NULL; 356 } 357 358 static unsigned int __init get_fifo_size(struct device_node *np, 359 char *prop_name) 360 { 361 const unsigned int *fp; 362 363 fp = of_get_property(np, prop_name, NULL); 364 if (fp) 365 return *fp; 366 367 pr_warning("no %s property in %s node, defaulting to %d\n", 368 prop_name, np->full_name, DEFAULT_FIFO_SIZE); 369 370 return DEFAULT_FIFO_SIZE; 371 } 372 373 #define FIFOC(_base) ((struct mpc512x_psc_fifo __iomem *) \ 374 ((u32)(_base) + sizeof(struct mpc52xx_psc))) 375 376 /* Init PSC FIFO space for TX and RX slices */ 377 void __init mpc512x_psc_fifo_init(void) 378 { 379 struct device_node *np; 380 void __iomem *psc; 381 unsigned int tx_fifo_size; 382 unsigned int rx_fifo_size; 383 const char *psc_compat; 384 int fifobase = 0; /* current fifo address in 32 bit words */ 385 386 psc_compat = mpc512x_select_psc_compat(); 387 if (!psc_compat) { 388 pr_err("%s: no compatible devices found\n", __func__); 389 return; 390 } 391 392 for_each_compatible_node(np, NULL, psc_compat) { 393 tx_fifo_size = get_fifo_size(np, "fsl,tx-fifo-size"); 394 rx_fifo_size = get_fifo_size(np, "fsl,rx-fifo-size"); 395 396 /* size in register is in 4 byte units */ 397 tx_fifo_size /= 4; 398 rx_fifo_size /= 4; 399 if (!tx_fifo_size) 400 tx_fifo_size = 1; 401 if (!rx_fifo_size) 402 rx_fifo_size = 1; 403 404 psc = of_iomap(np, 0); 405 if (!psc) { 406 pr_err("%s: Can't map %s device\n", 407 __func__, np->full_name); 408 continue; 409 } 410 411 /* FIFO space is 4KiB, check if requested size is available */ 412 if ((fifobase + tx_fifo_size + rx_fifo_size) > 0x1000) { 413 pr_err("%s: no fifo space available for %s\n", 414 __func__, np->full_name); 415 iounmap(psc); 416 /* 417 * chances are that another device requests less 418 * fifo space, so we continue. 419 */ 420 continue; 421 } 422 423 /* set tx and rx fifo size registers */ 424 out_be32(&FIFOC(psc)->txsz, (fifobase << 16) | tx_fifo_size); 425 fifobase += tx_fifo_size; 426 out_be32(&FIFOC(psc)->rxsz, (fifobase << 16) | rx_fifo_size); 427 fifobase += rx_fifo_size; 428 429 /* reset and enable the slices */ 430 out_be32(&FIFOC(psc)->txcmd, 0x80); 431 out_be32(&FIFOC(psc)->txcmd, 0x01); 432 out_be32(&FIFOC(psc)->rxcmd, 0x80); 433 out_be32(&FIFOC(psc)->rxcmd, 0x01); 434 435 iounmap(psc); 436 } 437 } 438 439 void __init mpc512x_init(void) 440 { 441 mpc5121_clk_init(); 442 mpc512x_declare_of_platform_devices(); 443 mpc512x_restart_init(); 444 mpc512x_psc_fifo_init(); 445 } 446 447 /** 448 * mpc512x_cs_config - Setup chip select configuration 449 * @cs: chip select number 450 * @val: chip select configuration value 451 * 452 * Perform chip select configuration for devices on LocalPlus Bus. 453 * Intended to dynamically reconfigure the chip select parameters 454 * for configurable devices on the bus. 455 */ 456 int mpc512x_cs_config(unsigned int cs, u32 val) 457 { 458 static struct mpc512x_lpc __iomem *lpc; 459 struct device_node *np; 460 461 if (cs > 7) 462 return -EINVAL; 463 464 if (!lpc) { 465 np = of_find_compatible_node(NULL, NULL, "fsl,mpc5121-lpc"); 466 lpc = of_iomap(np, 0); 467 of_node_put(np); 468 if (!lpc) 469 return -ENOMEM; 470 } 471 472 out_be32(&lpc->cs_cfg[cs], val); 473 return 0; 474 } 475 EXPORT_SYMBOL(mpc512x_cs_config); 476