Pileus Git - ~andy/linux/blob - arch/powerpc/platforms/512x/mpc512x_shared.c

   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         {},
 331 };
 332
 333 void __init mpc512x_declare_of_platform_devices(void)
 334 {
 335         struct device_node *np;
 336
 337         if (of_platform_bus_probe(NULL, of_bus_ids, NULL))
 338                 printk(KERN_ERR __FILE__ ": "
 339                         "Error while probing of_platform bus\n");
 340
 341         np = of_find_compatible_node(NULL, NULL, "fsl,mpc5121-nfc");
 342         if (np) {
 343                 of_platform_device_create(np, NULL, NULL);
 344                 of_node_put(np);
 345         }
 346 }
 347
 348 #define DEFAULT_FIFO_SIZE 16
 349
 350 static unsigned int __init get_fifo_size(struct device_node *np,
 351                                          char *prop_name)
 352 {
 353         const unsigned int *fp;
 354
 355         fp = of_get_property(np, prop_name, NULL);
 356         if (fp)
 357                 return *fp;
 358
 359         pr_warning("no %s property in %s node, defaulting to %d\n",
 360                    prop_name, np->full_name, DEFAULT_FIFO_SIZE);
 361
 362         return DEFAULT_FIFO_SIZE;
 363 }
 364
 365 #define FIFOC(_base) ((struct mpc512x_psc_fifo __iomem *) \
 366                     ((u32)(_base) + sizeof(struct mpc52xx_psc)))
 367
 368 /* Init PSC FIFO space for TX and RX slices */
 369 void __init mpc512x_psc_fifo_init(void)
 370 {
 371         struct device_node *np;
 372         void __iomem *psc;
 373         unsigned int tx_fifo_size;
 374         unsigned int rx_fifo_size;
 375         int fifobase = 0; /* current fifo address in 32 bit words */
 376
 377         for_each_compatible_node(np, NULL, "fsl,mpc5121-psc") {
 378                 tx_fifo_size = get_fifo_size(np, "fsl,tx-fifo-size");
 379                 rx_fifo_size = get_fifo_size(np, "fsl,rx-fifo-size");
 380
 381                 /* size in register is in 4 byte units */
 382                 tx_fifo_size /= 4;
 383                 rx_fifo_size /= 4;
 384                 if (!tx_fifo_size)
 385                         tx_fifo_size = 1;
 386                 if (!rx_fifo_size)
 387                         rx_fifo_size = 1;
 388
 389                 psc = of_iomap(np, 0);
 390                 if (!psc) {
 391                         pr_err("%s: Can't map %s device\n",
 392                                 __func__, np->full_name);
 393                         continue;
 394                 }
 395
 396                 /* FIFO space is 4KiB, check if requested size is available */
 397                 if ((fifobase + tx_fifo_size + rx_fifo_size) > 0x1000) {
 398                         pr_err("%s: no fifo space available for %s\n",
 399                                 __func__, np->full_name);
 400                         iounmap(psc);
 401                         /*
 402                          * chances are that another device requests less
 403                          * fifo space, so we continue.
 404                          */
 405                         continue;
 406                 }
 407
 408                 /* set tx and rx fifo size registers */
 409                 out_be32(&FIFOC(psc)->txsz, (fifobase << 16) | tx_fifo_size);
 410                 fifobase += tx_fifo_size;
 411                 out_be32(&FIFOC(psc)->rxsz, (fifobase << 16) | rx_fifo_size);
 412                 fifobase += rx_fifo_size;
 413
 414                 /* reset and enable the slices */
 415                 out_be32(&FIFOC(psc)->txcmd, 0x80);
 416                 out_be32(&FIFOC(psc)->txcmd, 0x01);
 417                 out_be32(&FIFOC(psc)->rxcmd, 0x80);
 418                 out_be32(&FIFOC(psc)->rxcmd, 0x01);
 419
 420                 iounmap(psc);
 421         }
 422 }
 423
 424 void __init mpc512x_init(void)
 425 {
 426         mpc5121_clk_init();
 427         mpc512x_declare_of_platform_devices();
 428         mpc512x_restart_init();
 429         mpc512x_psc_fifo_init();
 430 }
 431
 432 /**
 433  * mpc512x_cs_config - Setup chip select configuration
 434  * @cs: chip select number
 435  * @val: chip select configuration value
 436  *
 437  * Perform chip select configuration for devices on LocalPlus Bus.
 438  * Intended to dynamically reconfigure the chip select parameters
 439  * for configurable devices on the bus.
 440  */
 441 int mpc512x_cs_config(unsigned int cs, u32 val)
 442 {
 443         static struct mpc512x_lpc __iomem *lpc;
 444         struct device_node *np;
 445
 446         if (cs > 7)
 447                 return -EINVAL;
 448
 449         if (!lpc) {
 450                 np = of_find_compatible_node(NULL, NULL, "fsl,mpc5121-lpc");
 451                 lpc = of_iomap(np, 0);
 452                 of_node_put(np);
 453                 if (!lpc)
 454                         return -ENOMEM;
 455         }
 456
 457         out_be32(&lpc->cs_cfg[cs], val);
 458         return 0;
 459 }
 460 EXPORT_SYMBOL(mpc512x_cs_config);