arch/arm/mach-orion5x/ts78xx-setup.c

   1 /*
   2  * arch/arm/mach-orion5x/ts78xx-setup.c
   3  *
   4  * Maintainer: Alexander Clouter <alex@digriz.org.uk>
   5  *
   6  * This file is licensed under the terms of the GNU General Public
   7  * License version 2.  This program is licensed "as is" without any
   8  * warranty of any kind, whether express or implied.
   9  */
  10
  11 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  12
  13 #include <linux/kernel.h>
  14 #include <linux/init.h>
  15 #include <linux/sysfs.h>
  16 #include <linux/platform_device.h>
  17 #include <linux/mv643xx_eth.h>
  18 #include <linux/ata_platform.h>
  19 #include <linux/m48t86.h>
  20 #include <linux/mtd/nand.h>
  21 #include <linux/mtd/partitions.h>
  22 #include <linux/timeriomem-rng.h>
  23 #include <asm/mach-types.h>
  24 #include <asm/mach/arch.h>
  25 #include <asm/mach/map.h>
  26 #include <mach/orion5x.h>
  27 #include "common.h"
  28 #include "mpp.h"
  29 #include "ts78xx-fpga.h"
  30
  31 /*****************************************************************************
  32  * TS-78xx Info
  33  ****************************************************************************/
  34
  35 /*
  36  * FPGA - lives where the PCI bus would be at ORION5X_PCI_MEM_PHYS_BASE
  37  */
  38 #define TS78XX_FPGA_REGS_PHYS_BASE      0xe8000000
  39 #define TS78XX_FPGA_REGS_VIRT_BASE      IOMEM(0xff900000)
  40 #define TS78XX_FPGA_REGS_SIZE           SZ_1M
  41
  42 static struct ts78xx_fpga_data ts78xx_fpga = {
  43         .id             = 0,
  44         .state          = 1,
  45 /*      .supports       = ... - populated by ts78xx_fpga_supports() */
  46 };
  47
  48 /*****************************************************************************
  49  * I/O Address Mapping
  50  ****************************************************************************/
  51 static struct map_desc ts78xx_io_desc[] __initdata = {
  52         {
  53                 .virtual        = (unsigned long)TS78XX_FPGA_REGS_VIRT_BASE,
  54                 .pfn            = __phys_to_pfn(TS78XX_FPGA_REGS_PHYS_BASE),
  55                 .length         = TS78XX_FPGA_REGS_SIZE,
  56                 .type           = MT_DEVICE,
  57         },
  58 };
  59
  60 static void __init ts78xx_map_io(void)
  61 {
  62         orion5x_map_io();
  63         iotable_init(ts78xx_io_desc, ARRAY_SIZE(ts78xx_io_desc));
  64 }
  65
  66 /*****************************************************************************
  67  * Ethernet
  68  ****************************************************************************/
  69 static struct mv643xx_eth_platform_data ts78xx_eth_data = {
  70         .phy_addr       = MV643XX_ETH_PHY_ADDR(0),
  71 };
  72
  73 /*****************************************************************************
  74  * SATA
  75  ****************************************************************************/
  76 static struct mv_sata_platform_data ts78xx_sata_data = {
  77         .n_ports        = 2,
  78 };
  79
  80 /*****************************************************************************
  81  * RTC M48T86 - nicked^Wborrowed from arch/arm/mach-ep93xx/ts72xx.c
  82  ****************************************************************************/
  83 #define TS_RTC_CTRL     (TS78XX_FPGA_REGS_VIRT_BASE + 0x808)
  84 #define TS_RTC_DATA     (TS78XX_FPGA_REGS_VIRT_BASE + 0x80c)
  85
  86 static unsigned char ts78xx_ts_rtc_readbyte(unsigned long addr)
  87 {
  88         writeb(addr, TS_RTC_CTRL);
  89         return readb(TS_RTC_DATA);
  90 }
  91
  92 static void ts78xx_ts_rtc_writebyte(unsigned char value, unsigned long addr)
  93 {
  94         writeb(addr, TS_RTC_CTRL);
  95         writeb(value, TS_RTC_DATA);
  96 }
  97
  98 static struct m48t86_ops ts78xx_ts_rtc_ops = {
  99         .readbyte       = ts78xx_ts_rtc_readbyte,
 100         .writebyte      = ts78xx_ts_rtc_writebyte,
 101 };
 102
 103 static struct platform_device ts78xx_ts_rtc_device = {
 104         .name           = "rtc-m48t86",
 105         .id             = -1,
 106         .dev            = {
 107                 .platform_data  = &ts78xx_ts_rtc_ops,
 108         },
 109         .num_resources  = 0,
 110 };
 111
 112 /*
 113  * TS uses some of the user storage space on the RTC chip so see if it is
 114  * present; as it's an optional feature at purchase time and not all boards
 115  * will have it present
 116  *
 117  * I've used the method TS use in their rtc7800.c example for the detection
 118  *
 119  * TODO: track down a guinea pig without an RTC to see if we can work out a
 120  *              better RTC detection routine
 121  */
 122 static int ts78xx_ts_rtc_load(void)
 123 {
 124         int rc;
 125         unsigned char tmp_rtc0, tmp_rtc1;
 126
 127         tmp_rtc0 = ts78xx_ts_rtc_readbyte(126);
 128         tmp_rtc1 = ts78xx_ts_rtc_readbyte(127);
 129
 130         ts78xx_ts_rtc_writebyte(0x00, 126);
 131         ts78xx_ts_rtc_writebyte(0x55, 127);
 132         if (ts78xx_ts_rtc_readbyte(127) == 0x55) {
 133                 ts78xx_ts_rtc_writebyte(0xaa, 127);
 134                 if (ts78xx_ts_rtc_readbyte(127) == 0xaa
 135                                 && ts78xx_ts_rtc_readbyte(126) == 0x00) {
 136                         ts78xx_ts_rtc_writebyte(tmp_rtc0, 126);
 137                         ts78xx_ts_rtc_writebyte(tmp_rtc1, 127);
 138
 139                         if (ts78xx_fpga.supports.ts_rtc.init == 0) {
 140                                 rc = platform_device_register(&ts78xx_ts_rtc_device);
 141                                 if (!rc)
 142                                         ts78xx_fpga.supports.ts_rtc.init = 1;
 143                         } else
 144                                 rc = platform_device_add(&ts78xx_ts_rtc_device);
 145
 146                         if (rc)
 147                                 pr_info("RTC could not be registered: %d\n",
 148                                         rc);
 149                         return rc;
 150                 }
 151         }
 152
 153         pr_info("RTC not found\n");
 154         return -ENODEV;
 155 };
 156
 157 static void ts78xx_ts_rtc_unload(void)
 158 {
 159         platform_device_del(&ts78xx_ts_rtc_device);
 160 }
 161
 162 /*****************************************************************************
 163  * NAND Flash
 164  ****************************************************************************/
 165 #define TS_NAND_CTRL    (TS78XX_FPGA_REGS_VIRT_BASE + 0x800)    /* VIRT */
 166 #define TS_NAND_DATA    (TS78XX_FPGA_REGS_PHYS_BASE + 0x804)    /* PHYS */
 167
 168 /*
 169  * hardware specific access to control-lines
 170  *
 171  * ctrl:
 172  * NAND_NCE: bit 0 -> bit 2
 173  * NAND_CLE: bit 1 -> bit 1
 174  * NAND_ALE: bit 2 -> bit 0
 175  */
 176 static void ts78xx_ts_nand_cmd_ctrl(struct mtd_info *mtd, int cmd,
 177                         unsigned int ctrl)
 178 {
 179         struct nand_chip *this = mtd->priv;
 180
 181         if (ctrl & NAND_CTRL_CHANGE) {
 182                 unsigned char bits;
 183
 184                 bits = (ctrl & NAND_NCE) << 2;
 185                 bits |= ctrl & NAND_CLE;
 186                 bits |= (ctrl & NAND_ALE) >> 2;
 187
 188                 writeb((readb(TS_NAND_CTRL) & ~0x7) | bits, TS_NAND_CTRL);
 189         }
 190
 191         if (cmd != NAND_CMD_NONE)
 192                 writeb(cmd, this->IO_ADDR_W);
 193 }
 194
 195 static int ts78xx_ts_nand_dev_ready(struct mtd_info *mtd)
 196 {
 197         return readb(TS_NAND_CTRL) & 0x20;
 198 }
 199
 200 static void ts78xx_ts_nand_write_buf(struct mtd_info *mtd,
 201                         const uint8_t *buf, int len)
 202 {
 203         struct nand_chip *chip = mtd->priv;
 204         void __iomem *io_base = chip->IO_ADDR_W;
 205         unsigned long off = ((unsigned long)buf & 3);
 206         int sz;
 207
 208         if (off) {
 209                 sz = min_t(int, 4 - off, len);
 210                 writesb(io_base, buf, sz);
 211                 buf += sz;
 212                 len -= sz;
 213         }
 214
 215         sz = len >> 2;
 216         if (sz) {
 217                 u32 *buf32 = (u32 *)buf;
 218                 writesl(io_base, buf32, sz);
 219                 buf += sz << 2;
 220                 len -= sz << 2;
 221         }
 222
 223         if (len)
 224                 writesb(io_base, buf, len);
 225 }
 226
 227 static void ts78xx_ts_nand_read_buf(struct mtd_info *mtd,
 228                         uint8_t *buf, int len)
 229 {
 230         struct nand_chip *chip = mtd->priv;
 231         void __iomem *io_base = chip->IO_ADDR_R;
 232         unsigned long off = ((unsigned long)buf & 3);
 233         int sz;
 234
 235         if (off) {
 236                 sz = min_t(int, 4 - off, len);
 237                 readsb(io_base, buf, sz);
 238                 buf += sz;
 239                 len -= sz;
 240         }
 241
 242         sz = len >> 2;
 243         if (sz) {
 244                 u32 *buf32 = (u32 *)buf;
 245                 readsl(io_base, buf32, sz);
 246                 buf += sz << 2;
 247                 len -= sz << 2;
 248         }
 249
 250         if (len)
 251                 readsb(io_base, buf, len);
 252 }
 253
 254 static struct mtd_partition ts78xx_ts_nand_parts[] = {
 255         {
 256                 .name           = "mbr",
 257                 .offset         = 0,
 258                 .size           = SZ_128K,
 259                 .mask_flags     = MTD_WRITEABLE,
 260         }, {
 261                 .name           = "kernel",
 262                 .offset         = MTDPART_OFS_APPEND,
 263                 .size           = SZ_4M,
 264         }, {
 265                 .name           = "initrd",
 266                 .offset         = MTDPART_OFS_APPEND,
 267                 .size           = SZ_4M,
 268         }, {
 269                 .name           = "rootfs",
 270                 .offset         = MTDPART_OFS_APPEND,
 271                 .size           = MTDPART_SIZ_FULL,
 272         }
 273 };
 274
 275 static struct platform_nand_data ts78xx_ts_nand_data = {
 276         .chip   = {
 277                 .nr_chips               = 1,
 278                 .partitions             = ts78xx_ts_nand_parts,
 279                 .nr_partitions          = ARRAY_SIZE(ts78xx_ts_nand_parts),
 280                 .chip_delay             = 15,
 281                 .bbt_options            = NAND_BBT_USE_FLASH,
 282         },
 283         .ctrl   = {
 284                 /*
 285                  * The HW ECC offloading functions, used to give about a 9%
 286                  * performance increase for 'dd if=/dev/mtdblockX' and 5% for
 287                  * nanddump.  This all however was changed by git commit
 288                  * e6cf5df1838c28bb060ac45b5585e48e71bbc740 so now there is
 289                  * no performance advantage to be had so we no longer bother
 290                  */
 291                 .cmd_ctrl               = ts78xx_ts_nand_cmd_ctrl,
 292                 .dev_ready              = ts78xx_ts_nand_dev_ready,
 293                 .write_buf              = ts78xx_ts_nand_write_buf,
 294                 .read_buf               = ts78xx_ts_nand_read_buf,
 295         },
 296 };
 297
 298 static struct resource ts78xx_ts_nand_resources
 299                         = DEFINE_RES_MEM(TS_NAND_DATA, 4);
 300
 301 static struct platform_device ts78xx_ts_nand_device = {
 302         .name           = "gen_nand",
 303         .id             = -1,
 304         .dev            = {
 305                 .platform_data  = &ts78xx_ts_nand_data,
 306         },
 307         .resource       = &ts78xx_ts_nand_resources,
 308         .num_resources  = 1,
 309 };
 310
 311 static int ts78xx_ts_nand_load(void)
 312 {
 313         int rc;
 314
 315         if (ts78xx_fpga.supports.ts_nand.init == 0) {
 316                 rc = platform_device_register(&ts78xx_ts_nand_device);
 317                 if (!rc)
 318                         ts78xx_fpga.supports.ts_nand.init = 1;
 319         } else
 320                 rc = platform_device_add(&ts78xx_ts_nand_device);
 321
 322         if (rc)
 323                 pr_info("NAND could not be registered: %d\n", rc);
 324         return rc;
 325 };
 326
 327 static void ts78xx_ts_nand_unload(void)
 328 {
 329         platform_device_del(&ts78xx_ts_nand_device);
 330 }
 331
 332 /*****************************************************************************
 333  * HW RNG
 334  ****************************************************************************/
 335 #define TS_RNG_DATA     (TS78XX_FPGA_REGS_PHYS_BASE | 0x044)
 336
 337 static struct resource ts78xx_ts_rng_resource
 338                         = DEFINE_RES_MEM(TS_RNG_DATA, 4);
 339
 340 static struct timeriomem_rng_data ts78xx_ts_rng_data = {
 341         .period         = 1000000, /* one second */
 342 };
 343
 344 static struct platform_device ts78xx_ts_rng_device = {
 345         .name           = "timeriomem_rng",
 346         .id             = -1,
 347         .dev            = {
 348                 .platform_data  = &ts78xx_ts_rng_data,
 349         },
 350         .resource       = &ts78xx_ts_rng_resource,
 351         .num_resources  = 1,
 352 };
 353
 354 static int ts78xx_ts_rng_load(void)
 355 {
 356         int rc;
 357
 358         if (ts78xx_fpga.supports.ts_rng.init == 0) {
 359                 rc = platform_device_register(&ts78xx_ts_rng_device);
 360                 if (!rc)
 361                         ts78xx_fpga.supports.ts_rng.init = 1;
 362         } else
 363                 rc = platform_device_add(&ts78xx_ts_rng_device);
 364
 365         if (rc)
 366                 pr_info("RNG could not be registered: %d\n", rc);
 367         return rc;
 368 };
 369
 370 static void ts78xx_ts_rng_unload(void)
 371 {
 372         platform_device_del(&ts78xx_ts_rng_device);
 373 }
 374
 375 /*****************************************************************************
 376  * FPGA 'hotplug' support code
 377  ****************************************************************************/
 378 static void ts78xx_fpga_devices_zero_init(void)
 379 {
 380         ts78xx_fpga.supports.ts_rtc.init = 0;
 381         ts78xx_fpga.supports.ts_nand.init = 0;
 382         ts78xx_fpga.supports.ts_rng.init = 0;
 383 }
 384
 385 static void ts78xx_fpga_supports(void)
 386 {
 387         /* TODO: put this 'table' into ts78xx-fpga.h */
 388         switch (ts78xx_fpga.id) {
 389         case TS7800_REV_1:
 390         case TS7800_REV_2:
 391         case TS7800_REV_3:
 392         case TS7800_REV_4:
 393         case TS7800_REV_5:
 394         case TS7800_REV_6:
 395         case TS7800_REV_7:
 396         case TS7800_REV_8:
 397         case TS7800_REV_9:
 398                 ts78xx_fpga.supports.ts_rtc.present = 1;
 399                 ts78xx_fpga.supports.ts_nand.present = 1;
 400                 ts78xx_fpga.supports.ts_rng.present = 1;
 401                 break;
 402         default:
 403                 /* enable devices if magic matches */
 404                 switch ((ts78xx_fpga.id >> 8) & 0xffffff) {
 405                 case TS7800_FPGA_MAGIC:
 406                         pr_warn("unrecognised FPGA revision 0x%.2x\n",
 407                                 ts78xx_fpga.id & 0xff);
 408                         ts78xx_fpga.supports.ts_rtc.present = 1;
 409                         ts78xx_fpga.supports.ts_nand.present = 1;
 410                         ts78xx_fpga.supports.ts_rng.present = 1;
 411                         break;
 412                 default:
 413                         ts78xx_fpga.supports.ts_rtc.present = 0;
 414                         ts78xx_fpga.supports.ts_nand.present = 0;
 415                         ts78xx_fpga.supports.ts_rng.present = 0;
 416                 }
 417         }
 418 }
 419
 420 static int ts78xx_fpga_load_devices(void)
 421 {
 422         int tmp, ret = 0;
 423
 424         if (ts78xx_fpga.supports.ts_rtc.present == 1) {
 425                 tmp = ts78xx_ts_rtc_load();
 426                 if (tmp)
 427                         ts78xx_fpga.supports.ts_rtc.present = 0;
 428                 ret |= tmp;
 429         }
 430         if (ts78xx_fpga.supports.ts_nand.present == 1) {
 431                 tmp = ts78xx_ts_nand_load();
 432                 if (tmp)
 433                         ts78xx_fpga.supports.ts_nand.present = 0;
 434                 ret |= tmp;
 435         }
 436         if (ts78xx_fpga.supports.ts_rng.present == 1) {
 437                 tmp = ts78xx_ts_rng_load();
 438                 if (tmp)
 439                         ts78xx_fpga.supports.ts_rng.present = 0;
 440                 ret |= tmp;
 441         }
 442
 443         return ret;
 444 }
 445
 446 static int ts78xx_fpga_unload_devices(void)
 447 {
 448         int ret = 0;
 449
 450         if (ts78xx_fpga.supports.ts_rtc.present == 1)
 451                 ts78xx_ts_rtc_unload();
 452         if (ts78xx_fpga.supports.ts_nand.present == 1)
 453                 ts78xx_ts_nand_unload();
 454         if (ts78xx_fpga.supports.ts_rng.present == 1)
 455                 ts78xx_ts_rng_unload();
 456
 457         return ret;
 458 }
 459
 460 static int ts78xx_fpga_load(void)
 461 {
 462         ts78xx_fpga.id = readl(TS78XX_FPGA_REGS_VIRT_BASE);
 463
 464         pr_info("FPGA magic=0x%.6x, rev=0x%.2x\n",
 465                         (ts78xx_fpga.id >> 8) & 0xffffff,
 466                         ts78xx_fpga.id & 0xff);
 467
 468         ts78xx_fpga_supports();
 469
 470         if (ts78xx_fpga_load_devices()) {
 471                 ts78xx_fpga.state = -1;
 472                 return -EBUSY;
 473         }
 474
 475         return 0;
 476 };
 477
 478 static int ts78xx_fpga_unload(void)
 479 {
 480         unsigned int fpga_id;
 481
 482         fpga_id = readl(TS78XX_FPGA_REGS_VIRT_BASE);
 483
 484         /*
 485          * There does not seem to be a feasible way to block access to the GPIO
 486          * pins from userspace (/dev/mem).  This if clause should hopefully warn
 487          * those foolish enough not to follow 'policy' :)
 488          *
 489          * UrJTAG SVN since r1381 can be used to reprogram the FPGA
 490          */
 491         if (ts78xx_fpga.id != fpga_id) {
 492                 pr_err("FPGA magic/rev mismatch\n"
 493                         "TS-78xx FPGA: was 0x%.6x/%.2x but now 0x%.6x/%.2x\n",
 494                         (ts78xx_fpga.id >> 8) & 0xffffff, ts78xx_fpga.id & 0xff,
 495                         (fpga_id >> 8) & 0xffffff, fpga_id & 0xff);
 496                 ts78xx_fpga.state = -1;
 497                 return -EBUSY;
 498         }
 499
 500         if (ts78xx_fpga_unload_devices()) {
 501                 ts78xx_fpga.state = -1;
 502                 return -EBUSY;
 503         }
 504
 505         return 0;
 506 };
 507
 508 static ssize_t ts78xx_fpga_show(struct kobject *kobj,
 509                         struct kobj_attribute *attr, char *buf)
 510 {
 511         if (ts78xx_fpga.state < 0)
 512                 return sprintf(buf, "borked\n");
 513
 514         return sprintf(buf, "%s\n", (ts78xx_fpga.state) ? "online" : "offline");
 515 }
 516
 517 static ssize_t ts78xx_fpga_store(struct kobject *kobj,
 518                         struct kobj_attribute *attr, const char *buf, size_t n)
 519 {
 520         int value, ret;
 521
 522         if (ts78xx_fpga.state < 0) {
 523                 pr_err("FPGA borked, you must powercycle ASAP\n");
 524                 return -EBUSY;
 525         }
 526
 527         if (strncmp(buf, "online", sizeof("online") - 1) == 0)
 528                 value = 1;
 529         else if (strncmp(buf, "offline", sizeof("offline") - 1) == 0)
 530                 value = 0;
 531         else
 532                 return -EINVAL;
 533
 534         if (ts78xx_fpga.state == value)
 535                 return n;
 536
 537         ret = (ts78xx_fpga.state == 0)
 538                 ? ts78xx_fpga_load()
 539                 : ts78xx_fpga_unload();
 540
 541         if (!(ret < 0))
 542                 ts78xx_fpga.state = value;
 543
 544         return n;
 545 }
 546
 547 static struct kobj_attribute ts78xx_fpga_attr =
 548         __ATTR(ts78xx_fpga, 0644, ts78xx_fpga_show, ts78xx_fpga_store);
 549
 550 /*****************************************************************************
 551  * General Setup
 552  ****************************************************************************/
 553 static unsigned int ts78xx_mpp_modes[] __initdata = {
 554         MPP0_UNUSED,
 555         MPP1_GPIO,              /* JTAG Clock */
 556         MPP2_GPIO,              /* JTAG Data In */
 557         MPP3_GPIO,              /* Lat ECP2 256 FPGA - PB2B */
 558         MPP4_GPIO,              /* JTAG Data Out */
 559         MPP5_GPIO,              /* JTAG TMS */
 560         MPP6_GPIO,              /* Lat ECP2 256 FPGA - PB31A_CLK4+ */
 561         MPP7_GPIO,              /* Lat ECP2 256 FPGA - PB22B */
 562         MPP8_UNUSED,
 563         MPP9_UNUSED,
 564         MPP10_UNUSED,
 565         MPP11_UNUSED,
 566         MPP12_UNUSED,
 567         MPP13_UNUSED,
 568         MPP14_UNUSED,
 569         MPP15_UNUSED,
 570         MPP16_UART,
 571         MPP17_UART,
 572         MPP18_UART,
 573         MPP19_UART,
 574         /*
 575          * MPP[20] PCI Clock Out 1
 576          * MPP[21] PCI Clock Out 0
 577          * MPP[22] Unused
 578          * MPP[23] Unused
 579          * MPP[24] Unused
 580          * MPP[25] Unused
 581          */
 582         0,
 583 };
 584
 585 static void __init ts78xx_init(void)
 586 {
 587         int ret;
 588
 589         /*
 590          * Setup basic Orion functions. Need to be called early.
 591          */
 592         orion5x_init();
 593
 594         orion5x_mpp_conf(ts78xx_mpp_modes);
 595
 596         /*
 597          * Configure peripherals.
 598          */
 599         orion5x_ehci0_init();
 600         orion5x_ehci1_init();
 601         orion5x_eth_init(&ts78xx_eth_data);
 602         orion5x_sata_init(&ts78xx_sata_data);
 603         orion5x_uart0_init();
 604         orion5x_uart1_init();
 605         orion5x_xor_init();
 606
 607         /* FPGA init */
 608         ts78xx_fpga_devices_zero_init();
 609         ret = ts78xx_fpga_load();
 610         ret = sysfs_create_file(firmware_kobj, &ts78xx_fpga_attr.attr);
 611         if (ret)
 612                 pr_err("sysfs_create_file failed: %d\n", ret);
 613 }
 614
 615 MACHINE_START(TS78XX, "Technologic Systems TS-78xx SBC")
 616         /* Maintainer: Alexander Clouter <alex@digriz.org.uk> */
 617         .atag_offset    = 0x100,
 618         .init_machine   = ts78xx_init,
 619         .map_io         = ts78xx_map_io,
 620         .init_early     = orion5x_init_early,
 621         .init_irq       = orion5x_init_irq,
 622         .init_time      = orion5x_timer_init,
 623         .restart        = orion5x_restart,
 624 MACHINE_END