arch/powerpc/sysdev/fsl_rio.c

   1 /*
   2  * Freescale MPC85xx/MPC86xx RapidIO support
   3  *
   4  * Copyright 2009 Sysgo AG
   5  * Thomas Moll <thomas.moll@sysgo.com>
   6  * - fixed maintenance access routines, check for aligned access
   7  *
   8  * Copyright 2009 Integrated Device Technology, Inc.
   9  * Alex Bounine <alexandre.bounine@idt.com>
  10  * - Added Port-Write message handling
  11  * - Added Machine Check exception handling
  12  *
  13  * Copyright (C) 2007, 2008 Freescale Semiconductor, Inc.
  14  * Zhang Wei <wei.zhang@freescale.com>
  15  *
  16  * Copyright 2005 MontaVista Software, Inc.
  17  * Matt Porter <mporter@kernel.crashing.org>
  18  *
  19  * This program is free software; you can redistribute  it and/or modify it
  20  * under  the terms of  the GNU General  Public License as published by the
  21  * Free Software Foundation;  either version 2 of the  License, or (at your
  22  * option) any later version.
  23  */
  24
  25 #include <linux/init.h>
  26 #include <linux/module.h>
  27 #include <linux/types.h>
  28 #include <linux/dma-mapping.h>
  29 #include <linux/interrupt.h>
  30 #include <linux/device.h>
  31 #include <linux/rio.h>
  32 #include <linux/rio_drv.h>
  33 #include <linux/of_platform.h>
  34 #include <linux/delay.h>
  35 #include <linux/slab.h>
  36 #include <linux/kfifo.h>
  37
  38 #include <asm/io.h>
  39 #include <asm/machdep.h>
  40 #include <asm/uaccess.h>
  41
  42 #undef DEBUG_PW /* Port-Write debugging */
  43
  44 /* RapidIO definition irq, which read from OF-tree */
  45 #define IRQ_RIO_BELL(m)         (((struct rio_priv *)(m->priv))->bellirq)
  46 #define IRQ_RIO_TX(m)           (((struct rio_priv *)(m->priv))->txirq)
  47 #define IRQ_RIO_RX(m)           (((struct rio_priv *)(m->priv))->rxirq)
  48 #define IRQ_RIO_PW(m)           (((struct rio_priv *)(m->priv))->pwirq)
  49
  50 #define RIO_ATMU_REGS_OFFSET    0x10c00
  51 #define RIO_P_MSG_REGS_OFFSET   0x11000
  52 #define RIO_S_MSG_REGS_OFFSET   0x13000
  53 #define RIO_GCCSR               0x13c
  54 #define RIO_ESCSR               0x158
  55 #define RIO_CCSR                0x15c
  56 #define RIO_LTLEDCSR            0x0608
  57 #define  RIO_LTLEDCSR_IER       0x80000000
  58 #define  RIO_LTLEDCSR_PRT       0x01000000
  59 #define RIO_LTLEECSR            0x060c
  60 #define RIO_EPWISR              0x10010
  61 #define RIO_ISR_AACR            0x10120
  62 #define RIO_ISR_AACR_AA         0x1     /* Accept All ID */
  63 #define RIO_MAINT_WIN_SIZE      0x400000
  64 #define RIO_DBELL_WIN_SIZE      0x1000
  65
  66 #define RIO_MSG_OMR_MUI         0x00000002
  67 #define RIO_MSG_OSR_TE          0x00000080
  68 #define RIO_MSG_OSR_QOI         0x00000020
  69 #define RIO_MSG_OSR_QFI         0x00000010
  70 #define RIO_MSG_OSR_MUB         0x00000004
  71 #define RIO_MSG_OSR_EOMI        0x00000002
  72 #define RIO_MSG_OSR_QEI         0x00000001
  73
  74 #define RIO_MSG_IMR_MI          0x00000002
  75 #define RIO_MSG_ISR_TE          0x00000080
  76 #define RIO_MSG_ISR_QFI         0x00000010
  77 #define RIO_MSG_ISR_DIQI        0x00000001
  78
  79 #define RIO_IPWMR_SEN           0x00100000
  80 #define RIO_IPWMR_QFIE          0x00000100
  81 #define RIO_IPWMR_EIE           0x00000020
  82 #define RIO_IPWMR_CQ            0x00000002
  83 #define RIO_IPWMR_PWE           0x00000001
  84
  85 #define RIO_IPWSR_QF            0x00100000
  86 #define RIO_IPWSR_TE            0x00000080
  87 #define RIO_IPWSR_QFI           0x00000010
  88 #define RIO_IPWSR_PWD           0x00000008
  89 #define RIO_IPWSR_PWB           0x00000004
  90
  91 #define RIO_EPWISR_PINT         0x80000000
  92 #define RIO_EPWISR_PW           0x00000001
  93
  94 #define RIO_MSG_DESC_SIZE       32
  95 #define RIO_MSG_BUFFER_SIZE     4096
  96 #define RIO_MIN_TX_RING_SIZE    2
  97 #define RIO_MAX_TX_RING_SIZE    2048
  98 #define RIO_MIN_RX_RING_SIZE    2
  99 #define RIO_MAX_RX_RING_SIZE    2048
 100
 101 #define DOORBELL_DMR_DI         0x00000002
 102 #define DOORBELL_DSR_TE         0x00000080
 103 #define DOORBELL_DSR_QFI        0x00000010
 104 #define DOORBELL_DSR_DIQI       0x00000001
 105 #define DOORBELL_TID_OFFSET     0x02
 106 #define DOORBELL_SID_OFFSET     0x04
 107 #define DOORBELL_INFO_OFFSET    0x06
 108
 109 #define DOORBELL_MESSAGE_SIZE   0x08
 110 #define DBELL_SID(x)            (*(u16 *)(x + DOORBELL_SID_OFFSET))
 111 #define DBELL_TID(x)            (*(u16 *)(x + DOORBELL_TID_OFFSET))
 112 #define DBELL_INF(x)            (*(u16 *)(x + DOORBELL_INFO_OFFSET))
 113
 114 struct rio_atmu_regs {
 115         u32 rowtar;
 116         u32 rowtear;
 117         u32 rowbar;
 118         u32 pad2;
 119         u32 rowar;
 120         u32 pad3[3];
 121 };
 122
 123 struct rio_msg_regs {
 124         u32 omr;        /* 0xD_3000 - Outbound message 0 mode register */
 125         u32 osr;        /* 0xD_3004 - Outbound message 0 status register */
 126         u32 pad1;
 127         u32 odqdpar;    /* 0xD_300C - Outbound message 0 descriptor queue
 128                            dequeue pointer address register */
 129         u32 pad2;
 130         u32 osar;       /* 0xD_3014 - Outbound message 0 source address
 131                            register */
 132         u32 odpr;       /* 0xD_3018 - Outbound message 0 destination port
 133                            register */
 134         u32 odatr;      /* 0xD_301C - Outbound message 0 destination attributes
 135                            Register*/
 136         u32 odcr;       /* 0xD_3020 - Outbound message 0 double-word count
 137                            register */
 138         u32 pad3;
 139         u32 odqepar;    /* 0xD_3028 - Outbound message 0 descriptor queue
 140                            enqueue pointer address register */
 141         u32 pad4[13];
 142         u32 imr;        /* 0xD_3060 - Inbound message 0 mode register */
 143         u32 isr;        /* 0xD_3064 - Inbound message 0 status register */
 144         u32 pad5;
 145         u32 ifqdpar;    /* 0xD_306C - Inbound message 0 frame queue dequeue
 146                            pointer address register*/
 147         u32 pad6;
 148         u32 ifqepar;    /* 0xD_3074 - Inbound message 0 frame queue enqueue
 149                            pointer address register */
 150         u32 pad7[226];
 151         u32 odmr;       /* 0xD_3400 - Outbound doorbell mode register */
 152         u32 odsr;       /* 0xD_3404 - Outbound doorbell status register */
 153         u32 res0[4];
 154         u32 oddpr;      /* 0xD_3418 - Outbound doorbell destination port
 155                            register */
 156         u32 oddatr;     /* 0xD_341c - Outbound doorbell destination attributes
 157                            register */
 158         u32 res1[3];
 159         u32 odretcr;    /* 0xD_342C - Outbound doorbell retry error threshold
 160                            configuration register */
 161         u32 res2[12];
 162         u32 dmr;        /* 0xD_3460 - Inbound doorbell mode register */
 163         u32 dsr;        /* 0xD_3464 - Inbound doorbell status register */
 164         u32 pad8;
 165         u32 dqdpar;     /* 0xD_346C - Inbound doorbell queue dequeue Pointer
 166                            address register */
 167         u32 pad9;
 168         u32 dqepar;     /* 0xD_3474 - Inbound doorbell Queue enqueue pointer
 169                            address register */
 170         u32 pad10[26];
 171         u32 pwmr;       /* 0xD_34E0 - Inbound port-write mode register */
 172         u32 pwsr;       /* 0xD_34E4 - Inbound port-write status register */
 173         u32 epwqbar;    /* 0xD_34E8 - Extended Port-Write Queue Base Address
 174                            register */
 175         u32 pwqbar;     /* 0xD_34EC - Inbound port-write queue base address
 176                            register */
 177 };
 178
 179 struct rio_tx_desc {
 180         u32 res1;
 181         u32 saddr;
 182         u32 dport;
 183         u32 dattr;
 184         u32 res2;
 185         u32 res3;
 186         u32 dwcnt;
 187         u32 res4;
 188 };
 189
 190 struct rio_dbell_ring {
 191         void *virt;
 192         dma_addr_t phys;
 193 };
 194
 195 struct rio_msg_tx_ring {
 196         void *virt;
 197         dma_addr_t phys;
 198         void *virt_buffer[RIO_MAX_TX_RING_SIZE];
 199         dma_addr_t phys_buffer[RIO_MAX_TX_RING_SIZE];
 200         int tx_slot;
 201         int size;
 202         void *dev_id;
 203 };
 204
 205 struct rio_msg_rx_ring {
 206         void *virt;
 207         dma_addr_t phys;
 208         void *virt_buffer[RIO_MAX_RX_RING_SIZE];
 209         int rx_slot;
 210         int size;
 211         void *dev_id;
 212 };
 213
 214 struct rio_port_write_msg {
 215         void *virt;
 216         dma_addr_t phys;
 217         u32 msg_count;
 218         u32 err_count;
 219         u32 discard_count;
 220 };
 221
 222 struct rio_priv {
 223         struct device *dev;
 224         void __iomem *regs_win;
 225         struct rio_atmu_regs __iomem *atmu_regs;
 226         struct rio_atmu_regs __iomem *maint_atmu_regs;
 227         struct rio_atmu_regs __iomem *dbell_atmu_regs;
 228         void __iomem *dbell_win;
 229         void __iomem *maint_win;
 230         struct rio_msg_regs __iomem *msg_regs;
 231         struct rio_dbell_ring dbell_ring;
 232         struct rio_msg_tx_ring msg_tx_ring;
 233         struct rio_msg_rx_ring msg_rx_ring;
 234         struct rio_port_write_msg port_write_msg;
 235         int bellirq;
 236         int txirq;
 237         int rxirq;
 238         int pwirq;
 239         struct work_struct pw_work;
 240         struct kfifo pw_fifo;
 241         spinlock_t pw_fifo_lock;
 242 };
 243
 244 #define __fsl_read_rio_config(x, addr, err, op)         \
 245         __asm__ __volatile__(                           \
 246                 "1:     "op" %1,0(%2)\n"                \
 247                 "       eieio\n"                        \
 248                 "2:\n"                                  \
 249                 ".section .fixup,\"ax\"\n"              \
 250                 "3:     li %1,-1\n"                     \
 251                 "       li %0,%3\n"                     \
 252                 "       b 2b\n"                         \
 253                 ".section __ex_table,\"a\"\n"           \
 254                 "       .align 2\n"                     \
 255                 "       .long 1b,3b\n"                  \
 256                 ".text"                                 \
 257                 : "=r" (err), "=r" (x)                  \
 258                 : "b" (addr), "i" (-EFAULT), "0" (err))
 259
 260 static void __iomem *rio_regs_win;
 261
 262 #ifdef CONFIG_E500
 263 static int (*saved_mcheck_exception)(struct pt_regs *regs);
 264
 265 static int fsl_rio_mcheck_exception(struct pt_regs *regs)
 266 {
 267         const struct exception_table_entry *entry = NULL;
 268         unsigned long reason = mfspr(SPRN_MCSR);
 269
 270         if (reason & MCSR_BUS_RBERR) {
 271                 reason = in_be32((u32 *)(rio_regs_win + RIO_LTLEDCSR));
 272                 if (reason & (RIO_LTLEDCSR_IER | RIO_LTLEDCSR_PRT)) {
 273                         /* Check if we are prepared to handle this fault */
 274                         entry = search_exception_tables(regs->nip);
 275                         if (entry) {
 276                                 pr_debug("RIO: %s - MC Exception handled\n",
 277                                          __func__);
 278                                 out_be32((u32 *)(rio_regs_win + RIO_LTLEDCSR),
 279                                          0);
 280                                 regs->msr |= MSR_RI;
 281                                 regs->nip = entry->fixup;
 282                                 return 1;
 283                         }
 284                 }
 285         }
 286
 287         if (saved_mcheck_exception)
 288                 return saved_mcheck_exception(regs);
 289         else
 290                 return cur_cpu_spec->machine_check(regs);
 291 }
 292 #endif
 293
 294 /**
 295  * fsl_rio_doorbell_send - Send a MPC85xx doorbell message
 296  * @mport: RapidIO master port info
 297  * @index: ID of RapidIO interface
 298  * @destid: Destination ID of target device
 299  * @data: 16-bit info field of RapidIO doorbell message
 300  *
 301  * Sends a MPC85xx doorbell message. Returns %0 on success or
 302  * %-EINVAL on failure.
 303  */
 304 static int fsl_rio_doorbell_send(struct rio_mport *mport,
 305                                 int index, u16 destid, u16 data)
 306 {
 307         struct rio_priv *priv = mport->priv;
 308         pr_debug("fsl_doorbell_send: index %d destid %4.4x data %4.4x\n",
 309                  index, destid, data);
 310         switch (mport->phy_type) {
 311         case RIO_PHY_PARALLEL:
 312                 out_be32(&priv->dbell_atmu_regs->rowtar, destid << 22);
 313                 out_be16(priv->dbell_win, data);
 314                 break;
 315         case RIO_PHY_SERIAL:
 316                 /* In the serial version silicons, such as MPC8548, MPC8641,
 317                  * below operations is must be.
 318                  */
 319                 out_be32(&priv->msg_regs->odmr, 0x00000000);
 320                 out_be32(&priv->msg_regs->odretcr, 0x00000004);
 321                 out_be32(&priv->msg_regs->oddpr, destid << 16);
 322                 out_be32(&priv->msg_regs->oddatr, data);
 323                 out_be32(&priv->msg_regs->odmr, 0x00000001);
 324                 break;
 325         }
 326
 327         return 0;
 328 }
 329
 330 /**
 331  * fsl_local_config_read - Generate a MPC85xx local config space read
 332  * @mport: RapidIO master port info
 333  * @index: ID of RapdiIO interface
 334  * @offset: Offset into configuration space
 335  * @len: Length (in bytes) of the maintenance transaction
 336  * @data: Value to be read into
 337  *
 338  * Generates a MPC85xx local configuration space read. Returns %0 on
 339  * success or %-EINVAL on failure.
 340  */
 341 static int fsl_local_config_read(struct rio_mport *mport,
 342                                 int index, u32 offset, int len, u32 *data)
 343 {
 344         struct rio_priv *priv = mport->priv;
 345         pr_debug("fsl_local_config_read: index %d offset %8.8x\n", index,
 346                  offset);
 347         *data = in_be32(priv->regs_win + offset);
 348
 349         return 0;
 350 }
 351
 352 /**
 353  * fsl_local_config_write - Generate a MPC85xx local config space write
 354  * @mport: RapidIO master port info
 355  * @index: ID of RapdiIO interface
 356  * @offset: Offset into configuration space
 357  * @len: Length (in bytes) of the maintenance transaction
 358  * @data: Value to be written
 359  *
 360  * Generates a MPC85xx local configuration space write. Returns %0 on
 361  * success or %-EINVAL on failure.
 362  */
 363 static int fsl_local_config_write(struct rio_mport *mport,
 364                                 int index, u32 offset, int len, u32 data)
 365 {
 366         struct rio_priv *priv = mport->priv;
 367         pr_debug
 368             ("fsl_local_config_write: index %d offset %8.8x data %8.8x\n",
 369              index, offset, data);
 370         out_be32(priv->regs_win + offset, data);
 371
 372         return 0;
 373 }
 374
 375 /**
 376  * fsl_rio_config_read - Generate a MPC85xx read maintenance transaction
 377  * @mport: RapidIO master port info
 378  * @index: ID of RapdiIO interface
 379  * @destid: Destination ID of transaction
 380  * @hopcount: Number of hops to target device
 381  * @offset: Offset into configuration space
 382  * @len: Length (in bytes) of the maintenance transaction
 383  * @val: Location to be read into
 384  *
 385  * Generates a MPC85xx read maintenance transaction. Returns %0 on
 386  * success or %-EINVAL on failure.
 387  */
 388 static int
 389 fsl_rio_config_read(struct rio_mport *mport, int index, u16 destid,
 390                         u8 hopcount, u32 offset, int len, u32 *val)
 391 {
 392         struct rio_priv *priv = mport->priv;
 393         u8 *data;
 394         u32 rval, err = 0;
 395
 396         pr_debug
 397             ("fsl_rio_config_read: index %d destid %d hopcount %d offset %8.8x len %d\n",
 398              index, destid, hopcount, offset, len);
 399
 400         /* 16MB maintenance window possible */
 401         /* allow only aligned access to maintenance registers */
 402         if (offset > (0x1000000 - len) || !IS_ALIGNED(offset, len))
 403                 return -EINVAL;
 404
 405         out_be32(&priv->maint_atmu_regs->rowtar,
 406                  (destid << 22) | (hopcount << 12) | (offset >> 12));
 407         out_be32(&priv->maint_atmu_regs->rowtear,  (destid >> 10));
 408
 409         data = (u8 *) priv->maint_win + (offset & (RIO_MAINT_WIN_SIZE - 1));
 410         switch (len) {
 411         case 1:
 412                 __fsl_read_rio_config(rval, data, err, "lbz");
 413                 break;
 414         case 2:
 415                 __fsl_read_rio_config(rval, data, err, "lhz");
 416                 break;
 417         case 4:
 418                 __fsl_read_rio_config(rval, data, err, "lwz");
 419                 break;
 420         default:
 421                 return -EINVAL;
 422         }
 423
 424         if (err) {
 425                 pr_debug("RIO: cfg_read error %d for %x:%x:%x\n",
 426                          err, destid, hopcount, offset);
 427         }
 428
 429         *val = rval;
 430
 431         return err;
 432 }
 433
 434 /**
 435  * fsl_rio_config_write - Generate a MPC85xx write maintenance transaction
 436  * @mport: RapidIO master port info
 437  * @index: ID of RapdiIO interface
 438  * @destid: Destination ID of transaction
 439  * @hopcount: Number of hops to target device
 440  * @offset: Offset into configuration space
 441  * @len: Length (in bytes) of the maintenance transaction
 442  * @val: Value to be written
 443  *
 444  * Generates an MPC85xx write maintenance transaction. Returns %0 on
 445  * success or %-EINVAL on failure.
 446  */
 447 static int
 448 fsl_rio_config_write(struct rio_mport *mport, int index, u16 destid,
 449                         u8 hopcount, u32 offset, int len, u32 val)
 450 {
 451         struct rio_priv *priv = mport->priv;
 452         u8 *data;
 453         pr_debug
 454             ("fsl_rio_config_write: index %d destid %d hopcount %d offset %8.8x len %d val %8.8x\n",
 455              index, destid, hopcount, offset, len, val);
 456
 457         /* 16MB maintenance windows possible */
 458         /* allow only aligned access to maintenance registers */
 459         if (offset > (0x1000000 - len) || !IS_ALIGNED(offset, len))
 460                 return -EINVAL;
 461
 462         out_be32(&priv->maint_atmu_regs->rowtar,
 463                  (destid << 22) | (hopcount << 12) | (offset >> 12));
 464         out_be32(&priv->maint_atmu_regs->rowtear,  (destid >> 10));
 465
 466         data = (u8 *) priv->maint_win + (offset & (RIO_MAINT_WIN_SIZE - 1));
 467         switch (len) {
 468         case 1:
 469                 out_8((u8 *) data, val);
 470                 break;
 471         case 2:
 472                 out_be16((u16 *) data, val);
 473                 break;
 474         case 4:
 475                 out_be32((u32 *) data, val);
 476                 break;
 477         default:
 478                 return -EINVAL;
 479         }
 480
 481         return 0;
 482 }
 483
 484 /**
 485  * rio_hw_add_outb_message - Add message to the MPC85xx outbound message queue
 486  * @mport: Master port with outbound message queue
 487  * @rdev: Target of outbound message
 488  * @mbox: Outbound mailbox
 489  * @buffer: Message to add to outbound queue
 490  * @len: Length of message
 491  *
 492  * Adds the @buffer message to the MPC85xx outbound message queue. Returns
 493  * %0 on success or %-EINVAL on failure.
 494  */
 495 int
 496 rio_hw_add_outb_message(struct rio_mport *mport, struct rio_dev *rdev, int mbox,
 497                         void *buffer, size_t len)
 498 {
 499         struct rio_priv *priv = mport->priv;
 500         u32 omr;
 501         struct rio_tx_desc *desc = (struct rio_tx_desc *)priv->msg_tx_ring.virt
 502                                         + priv->msg_tx_ring.tx_slot;
 503         int ret = 0;
 504
 505         pr_debug
 506             ("RIO: rio_hw_add_outb_message(): destid %4.4x mbox %d buffer %8.8x len %8.8x\n",
 507              rdev->destid, mbox, (int)buffer, len);
 508
 509         if ((len < 8) || (len > RIO_MAX_MSG_SIZE)) {
 510                 ret = -EINVAL;
 511                 goto out;
 512         }
 513
 514         /* Copy and clear rest of buffer */
 515         memcpy(priv->msg_tx_ring.virt_buffer[priv->msg_tx_ring.tx_slot], buffer,
 516                         len);
 517         if (len < (RIO_MAX_MSG_SIZE - 4))
 518                 memset(priv->msg_tx_ring.virt_buffer[priv->msg_tx_ring.tx_slot]
 519                                 + len, 0, RIO_MAX_MSG_SIZE - len);
 520
 521         switch (mport->phy_type) {
 522         case RIO_PHY_PARALLEL:
 523                 /* Set mbox field for message */
 524                 desc->dport = mbox & 0x3;
 525
 526                 /* Enable EOMI interrupt, set priority, and set destid */
 527                 desc->dattr = 0x28000000 | (rdev->destid << 2);
 528                 break;
 529         case RIO_PHY_SERIAL:
 530                 /* Set mbox field for message, and set destid */
 531                 desc->dport = (rdev->destid << 16) | (mbox & 0x3);
 532
 533                 /* Enable EOMI interrupt and priority */
 534                 desc->dattr = 0x28000000;
 535                 break;
 536         }
 537
 538         /* Set transfer size aligned to next power of 2 (in double words) */
 539         desc->dwcnt = is_power_of_2(len) ? len : 1 << get_bitmask_order(len);
 540
 541         /* Set snooping and source buffer address */
 542         desc->saddr = 0x00000004
 543                 | priv->msg_tx_ring.phys_buffer[priv->msg_tx_ring.tx_slot];
 544
 545         /* Increment enqueue pointer */
 546         omr = in_be32(&priv->msg_regs->omr);
 547         out_be32(&priv->msg_regs->omr, omr | RIO_MSG_OMR_MUI);
 548
 549         /* Go to next descriptor */
 550         if (++priv->msg_tx_ring.tx_slot == priv->msg_tx_ring.size)
 551                 priv->msg_tx_ring.tx_slot = 0;
 552
 553       out:
 554         return ret;
 555 }
 556
 557 EXPORT_SYMBOL_GPL(rio_hw_add_outb_message);
 558
 559 /**
 560  * fsl_rio_tx_handler - MPC85xx outbound message interrupt handler
 561  * @irq: Linux interrupt number
 562  * @dev_instance: Pointer to interrupt-specific data
 563  *
 564  * Handles outbound message interrupts. Executes a register outbound
 565  * mailbox event handler and acks the interrupt occurrence.
 566  */
 567 static irqreturn_t
 568 fsl_rio_tx_handler(int irq, void *dev_instance)
 569 {
 570         int osr;
 571         struct rio_mport *port = (struct rio_mport *)dev_instance;
 572         struct rio_priv *priv = port->priv;
 573
 574         osr = in_be32(&priv->msg_regs->osr);
 575
 576         if (osr & RIO_MSG_OSR_TE) {
 577                 pr_info("RIO: outbound message transmission error\n");
 578                 out_be32(&priv->msg_regs->osr, RIO_MSG_OSR_TE);
 579                 goto out;
 580         }
 581
 582         if (osr & RIO_MSG_OSR_QOI) {
 583                 pr_info("RIO: outbound message queue overflow\n");
 584                 out_be32(&priv->msg_regs->osr, RIO_MSG_OSR_QOI);
 585                 goto out;
 586         }
 587
 588         if (osr & RIO_MSG_OSR_EOMI) {
 589                 u32 dqp = in_be32(&priv->msg_regs->odqdpar);
 590                 int slot = (dqp - priv->msg_tx_ring.phys) >> 5;
 591                 port->outb_msg[0].mcback(port, priv->msg_tx_ring.dev_id, -1,
 592                                 slot);
 593
 594                 /* Ack the end-of-message interrupt */
 595                 out_be32(&priv->msg_regs->osr, RIO_MSG_OSR_EOMI);
 596         }
 597
 598       out:
 599         return IRQ_HANDLED;
 600 }
 601
 602 /**
 603  * rio_open_outb_mbox - Initialize MPC85xx outbound mailbox
 604  * @mport: Master port implementing the outbound message unit
 605  * @dev_id: Device specific pointer to pass on event
 606  * @mbox: Mailbox to open
 607  * @entries: Number of entries in the outbound mailbox ring
 608  *
 609  * Initializes buffer ring, request the outbound message interrupt,
 610  * and enables the outbound message unit. Returns %0 on success and
 611  * %-EINVAL or %-ENOMEM on failure.
 612  */
 613 int rio_open_outb_mbox(struct rio_mport *mport, void *dev_id, int mbox, int entries)
 614 {
 615         int i, j, rc = 0;
 616         struct rio_priv *priv = mport->priv;
 617
 618         if ((entries < RIO_MIN_TX_RING_SIZE) ||
 619             (entries > RIO_MAX_TX_RING_SIZE) || (!is_power_of_2(entries))) {
 620                 rc = -EINVAL;
 621                 goto out;
 622         }
 623
 624         /* Initialize shadow copy ring */
 625         priv->msg_tx_ring.dev_id = dev_id;
 626         priv->msg_tx_ring.size = entries;
 627
 628         for (i = 0; i < priv->msg_tx_ring.size; i++) {
 629                 priv->msg_tx_ring.virt_buffer[i] =
 630                         dma_alloc_coherent(priv->dev, RIO_MSG_BUFFER_SIZE,
 631                                 &priv->msg_tx_ring.phys_buffer[i], GFP_KERNEL);
 632                 if (!priv->msg_tx_ring.virt_buffer[i]) {
 633                         rc = -ENOMEM;
 634                         for (j = 0; j < priv->msg_tx_ring.size; j++)
 635                                 if (priv->msg_tx_ring.virt_buffer[j])
 636                                         dma_free_coherent(priv->dev,
 637                                                         RIO_MSG_BUFFER_SIZE,
 638                                                         priv->msg_tx_ring.
 639                                                         virt_buffer[j],
 640                                                         priv->msg_tx_ring.
 641                                                         phys_buffer[j]);
 642                         goto out;
 643                 }
 644         }
 645
 646         /* Initialize outbound message descriptor ring */
 647         priv->msg_tx_ring.virt = dma_alloc_coherent(priv->dev,
 648                                 priv->msg_tx_ring.size * RIO_MSG_DESC_SIZE,
 649                                 &priv->msg_tx_ring.phys, GFP_KERNEL);
 650         if (!priv->msg_tx_ring.virt) {
 651                 rc = -ENOMEM;
 652                 goto out_dma;
 653         }
 654         memset(priv->msg_tx_ring.virt, 0,
 655                         priv->msg_tx_ring.size * RIO_MSG_DESC_SIZE);
 656         priv->msg_tx_ring.tx_slot = 0;
 657
 658         /* Point dequeue/enqueue pointers at first entry in ring */
 659         out_be32(&priv->msg_regs->odqdpar, priv->msg_tx_ring.phys);
 660         out_be32(&priv->msg_regs->odqepar, priv->msg_tx_ring.phys);
 661
 662         /* Configure for snooping */
 663         out_be32(&priv->msg_regs->osar, 0x00000004);
 664
 665         /* Clear interrupt status */
 666         out_be32(&priv->msg_regs->osr, 0x000000b3);
 667
 668         /* Hook up outbound message handler */
 669         rc = request_irq(IRQ_RIO_TX(mport), fsl_rio_tx_handler, 0,
 670                          "msg_tx", (void *)mport);
 671         if (rc < 0)
 672                 goto out_irq;
 673
 674         /*
 675          * Configure outbound message unit
 676          *      Snooping
 677          *      Interrupts (all enabled, except QEIE)
 678          *      Chaining mode
 679          *      Disable
 680          */
 681         out_be32(&priv->msg_regs->omr, 0x00100220);
 682
 683         /* Set number of entries */
 684         out_be32(&priv->msg_regs->omr,
 685                  in_be32(&priv->msg_regs->omr) |
 686                  ((get_bitmask_order(entries) - 2) << 12));
 687
 688         /* Now enable the unit */
 689         out_be32(&priv->msg_regs->omr, in_be32(&priv->msg_regs->omr) | 0x1);
 690
 691       out:
 692         return rc;
 693
 694       out_irq:
 695         dma_free_coherent(priv->dev,
 696                           priv->msg_tx_ring.size * RIO_MSG_DESC_SIZE,
 697                           priv->msg_tx_ring.virt, priv->msg_tx_ring.phys);
 698
 699       out_dma:
 700         for (i = 0; i < priv->msg_tx_ring.size; i++)
 701                 dma_free_coherent(priv->dev, RIO_MSG_BUFFER_SIZE,
 702                                   priv->msg_tx_ring.virt_buffer[i],
 703                                   priv->msg_tx_ring.phys_buffer[i]);
 704
 705         return rc;
 706 }
 707
 708 /**
 709  * rio_close_outb_mbox - Shut down MPC85xx outbound mailbox
 710  * @mport: Master port implementing the outbound message unit
 711  * @mbox: Mailbox to close
 712  *
 713  * Disables the outbound message unit, free all buffers, and
 714  * frees the outbound message interrupt.
 715  */
 716 void rio_close_outb_mbox(struct rio_mport *mport, int mbox)
 717 {
 718         struct rio_priv *priv = mport->priv;
 719         /* Disable inbound message unit */
 720         out_be32(&priv->msg_regs->omr, 0);
 721
 722         /* Free ring */
 723         dma_free_coherent(priv->dev,
 724                           priv->msg_tx_ring.size * RIO_MSG_DESC_SIZE,
 725                           priv->msg_tx_ring.virt, priv->msg_tx_ring.phys);
 726
 727         /* Free interrupt */
 728         free_irq(IRQ_RIO_TX(mport), (void *)mport);
 729 }
 730
 731 /**
 732  * fsl_rio_rx_handler - MPC85xx inbound message interrupt handler
 733  * @irq: Linux interrupt number
 734  * @dev_instance: Pointer to interrupt-specific data
 735  *
 736  * Handles inbound message interrupts. Executes a registered inbound
 737  * mailbox event handler and acks the interrupt occurrence.
 738  */
 739 static irqreturn_t
 740 fsl_rio_rx_handler(int irq, void *dev_instance)
 741 {
 742         int isr;
 743         struct rio_mport *port = (struct rio_mport *)dev_instance;
 744         struct rio_priv *priv = port->priv;
 745
 746         isr = in_be32(&priv->msg_regs->isr);
 747
 748         if (isr & RIO_MSG_ISR_TE) {
 749                 pr_info("RIO: inbound message reception error\n");
 750                 out_be32((void *)&priv->msg_regs->isr, RIO_MSG_ISR_TE);
 751                 goto out;
 752         }
 753
 754         /* XXX Need to check/dispatch until queue empty */
 755         if (isr & RIO_MSG_ISR_DIQI) {
 756                 /*
 757                  * We implement *only* mailbox 0, but can receive messages
 758                  * for any mailbox/letter to that mailbox destination. So,
 759                  * make the callback with an unknown/invalid mailbox number
 760                  * argument.
 761                  */
 762                 port->inb_msg[0].mcback(port, priv->msg_rx_ring.dev_id, -1, -1);
 763
 764                 /* Ack the queueing interrupt */
 765                 out_be32(&priv->msg_regs->isr, RIO_MSG_ISR_DIQI);
 766         }
 767
 768       out:
 769         return IRQ_HANDLED;
 770 }
 771
 772 /**
 773  * rio_open_inb_mbox - Initialize MPC85xx inbound mailbox
 774  * @mport: Master port implementing the inbound message unit
 775  * @dev_id: Device specific pointer to pass on event
 776  * @mbox: Mailbox to open
 777  * @entries: Number of entries in the inbound mailbox ring
 778  *
 779  * Initializes buffer ring, request the inbound message interrupt,
 780  * and enables the inbound message unit. Returns %0 on success
 781  * and %-EINVAL or %-ENOMEM on failure.
 782  */
 783 int rio_open_inb_mbox(struct rio_mport *mport, void *dev_id, int mbox, int entries)
 784 {
 785         int i, rc = 0;
 786         struct rio_priv *priv = mport->priv;
 787
 788         if ((entries < RIO_MIN_RX_RING_SIZE) ||
 789             (entries > RIO_MAX_RX_RING_SIZE) || (!is_power_of_2(entries))) {
 790                 rc = -EINVAL;
 791                 goto out;
 792         }
 793
 794         /* Initialize client buffer ring */
 795         priv->msg_rx_ring.dev_id = dev_id;
 796         priv->msg_rx_ring.size = entries;
 797         priv->msg_rx_ring.rx_slot = 0;
 798         for (i = 0; i < priv->msg_rx_ring.size; i++)
 799                 priv->msg_rx_ring.virt_buffer[i] = NULL;
 800
 801         /* Initialize inbound message ring */
 802         priv->msg_rx_ring.virt = dma_alloc_coherent(priv->dev,
 803                                 priv->msg_rx_ring.size * RIO_MAX_MSG_SIZE,
 804                                 &priv->msg_rx_ring.phys, GFP_KERNEL);
 805         if (!priv->msg_rx_ring.virt) {
 806                 rc = -ENOMEM;
 807                 goto out;
 808         }
 809
 810         /* Point dequeue/enqueue pointers at first entry in ring */
 811         out_be32(&priv->msg_regs->ifqdpar, (u32) priv->msg_rx_ring.phys);
 812         out_be32(&priv->msg_regs->ifqepar, (u32) priv->msg_rx_ring.phys);
 813
 814         /* Clear interrupt status */
 815         out_be32(&priv->msg_regs->isr, 0x00000091);
 816
 817         /* Hook up inbound message handler */
 818         rc = request_irq(IRQ_RIO_RX(mport), fsl_rio_rx_handler, 0,
 819                          "msg_rx", (void *)mport);
 820         if (rc < 0) {
 821                 dma_free_coherent(priv->dev, RIO_MSG_BUFFER_SIZE,
 822                                   priv->msg_tx_ring.virt_buffer[i],
 823                                   priv->msg_tx_ring.phys_buffer[i]);
 824                 goto out;
 825         }
 826
 827         /*
 828          * Configure inbound message unit:
 829          *      Snooping
 830          *      4KB max message size
 831          *      Unmask all interrupt sources
 832          *      Disable
 833          */
 834         out_be32(&priv->msg_regs->imr, 0x001b0060);
 835
 836         /* Set number of queue entries */
 837         setbits32(&priv->msg_regs->imr, (get_bitmask_order(entries) - 2) << 12);
 838
 839         /* Now enable the unit */
 840         setbits32(&priv->msg_regs->imr, 0x1);
 841
 842       out:
 843         return rc;
 844 }
 845
 846 /**
 847  * rio_close_inb_mbox - Shut down MPC85xx inbound mailbox
 848  * @mport: Master port implementing the inbound message unit
 849  * @mbox: Mailbox to close
 850  *
 851  * Disables the inbound message unit, free all buffers, and
 852  * frees the inbound message interrupt.
 853  */
 854 void rio_close_inb_mbox(struct rio_mport *mport, int mbox)
 855 {
 856         struct rio_priv *priv = mport->priv;
 857         /* Disable inbound message unit */
 858         out_be32(&priv->msg_regs->imr, 0);
 859
 860         /* Free ring */
 861         dma_free_coherent(priv->dev, priv->msg_rx_ring.size * RIO_MAX_MSG_SIZE,
 862                           priv->msg_rx_ring.virt, priv->msg_rx_ring.phys);
 863
 864         /* Free interrupt */
 865         free_irq(IRQ_RIO_RX(mport), (void *)mport);
 866 }
 867
 868 /**
 869  * rio_hw_add_inb_buffer - Add buffer to the MPC85xx inbound message queue
 870  * @mport: Master port implementing the inbound message unit
 871  * @mbox: Inbound mailbox number
 872  * @buf: Buffer to add to inbound queue
 873  *
 874  * Adds the @buf buffer to the MPC85xx inbound message queue. Returns
 875  * %0 on success or %-EINVAL on failure.
 876  */
 877 int rio_hw_add_inb_buffer(struct rio_mport *mport, int mbox, void *buf)
 878 {
 879         int rc = 0;
 880         struct rio_priv *priv = mport->priv;
 881
 882         pr_debug("RIO: rio_hw_add_inb_buffer(), msg_rx_ring.rx_slot %d\n",
 883                  priv->msg_rx_ring.rx_slot);
 884
 885         if (priv->msg_rx_ring.virt_buffer[priv->msg_rx_ring.rx_slot]) {
 886                 printk(KERN_ERR
 887                        "RIO: error adding inbound buffer %d, buffer exists\n",
 888                        priv->msg_rx_ring.rx_slot);
 889                 rc = -EINVAL;
 890                 goto out;
 891         }
 892
 893         priv->msg_rx_ring.virt_buffer[priv->msg_rx_ring.rx_slot] = buf;
 894         if (++priv->msg_rx_ring.rx_slot == priv->msg_rx_ring.size)
 895                 priv->msg_rx_ring.rx_slot = 0;
 896
 897       out:
 898         return rc;
 899 }
 900
 901 EXPORT_SYMBOL_GPL(rio_hw_add_inb_buffer);
 902
 903 /**
 904  * rio_hw_get_inb_message - Fetch inbound message from the MPC85xx message unit
 905  * @mport: Master port implementing the inbound message unit
 906  * @mbox: Inbound mailbox number
 907  *
 908  * Gets the next available inbound message from the inbound message queue.
 909  * A pointer to the message is returned on success or NULL on failure.
 910  */
 911 void *rio_hw_get_inb_message(struct rio_mport *mport, int mbox)
 912 {
 913         struct rio_priv *priv = mport->priv;
 914         u32 phys_buf, virt_buf;
 915         void *buf = NULL;
 916         int buf_idx;
 917
 918         phys_buf = in_be32(&priv->msg_regs->ifqdpar);
 919
 920         /* If no more messages, then bail out */
 921         if (phys_buf == in_be32(&priv->msg_regs->ifqepar))
 922                 goto out2;
 923
 924         virt_buf = (u32) priv->msg_rx_ring.virt + (phys_buf
 925                                                 - priv->msg_rx_ring.phys);
 926         buf_idx = (phys_buf - priv->msg_rx_ring.phys) / RIO_MAX_MSG_SIZE;
 927         buf = priv->msg_rx_ring.virt_buffer[buf_idx];
 928
 929         if (!buf) {
 930                 printk(KERN_ERR
 931                        "RIO: inbound message copy failed, no buffers\n");
 932                 goto out1;
 933         }
 934
 935         /* Copy max message size, caller is expected to allocate that big */
 936         memcpy(buf, (void *)virt_buf, RIO_MAX_MSG_SIZE);
 937
 938         /* Clear the available buffer */
 939         priv->msg_rx_ring.virt_buffer[buf_idx] = NULL;
 940
 941       out1:
 942         setbits32(&priv->msg_regs->imr, RIO_MSG_IMR_MI);
 943
 944       out2:
 945         return buf;
 946 }
 947
 948 EXPORT_SYMBOL_GPL(rio_hw_get_inb_message);
 949
 950 /**
 951  * fsl_rio_dbell_handler - MPC85xx doorbell interrupt handler
 952  * @irq: Linux interrupt number
 953  * @dev_instance: Pointer to interrupt-specific data
 954  *
 955  * Handles doorbell interrupts. Parses a list of registered
 956  * doorbell event handlers and executes a matching event handler.
 957  */
 958 static irqreturn_t
 959 fsl_rio_dbell_handler(int irq, void *dev_instance)
 960 {
 961         int dsr;
 962         struct rio_mport *port = (struct rio_mport *)dev_instance;
 963         struct rio_priv *priv = port->priv;
 964
 965         dsr = in_be32(&priv->msg_regs->dsr);
 966
 967         if (dsr & DOORBELL_DSR_TE) {
 968                 pr_info("RIO: doorbell reception error\n");
 969                 out_be32(&priv->msg_regs->dsr, DOORBELL_DSR_TE);
 970                 goto out;
 971         }
 972
 973         if (dsr & DOORBELL_DSR_QFI) {
 974                 pr_info("RIO: doorbell queue full\n");
 975                 out_be32(&priv->msg_regs->dsr, DOORBELL_DSR_QFI);
 976                 goto out;
 977         }
 978
 979         /* XXX Need to check/dispatch until queue empty */
 980         if (dsr & DOORBELL_DSR_DIQI) {
 981                 u32 dmsg =
 982                     (u32) priv->dbell_ring.virt +
 983                     (in_be32(&priv->msg_regs->dqdpar) & 0xfff);
 984                 struct rio_dbell *dbell;
 985                 int found = 0;
 986
 987                 pr_debug
 988                     ("RIO: processing doorbell, sid %2.2x tid %2.2x info %4.4x\n",
 989                      DBELL_SID(dmsg), DBELL_TID(dmsg), DBELL_INF(dmsg));
 990
 991                 list_for_each_entry(dbell, &port->dbells, node) {
 992                         if ((dbell->res->start <= DBELL_INF(dmsg)) &&
 993                             (dbell->res->end >= DBELL_INF(dmsg))) {
 994                                 found = 1;
 995                                 break;
 996                         }
 997                 }
 998                 if (found) {
 999                         dbell->dinb(port, dbell->dev_id, DBELL_SID(dmsg), DBELL_TID(dmsg),
1000                                     DBELL_INF(dmsg));
1001                 } else {
1002                         pr_debug
1003                             ("RIO: spurious doorbell, sid %2.2x tid %2.2x info %4.4x\n",
1004                              DBELL_SID(dmsg), DBELL_TID(dmsg), DBELL_INF(dmsg));
1005                 }
1006                 setbits32(&priv->msg_regs->dmr, DOORBELL_DMR_DI);
1007                 out_be32(&priv->msg_regs->dsr, DOORBELL_DSR_DIQI);
1008         }
1009
1010       out:
1011         return IRQ_HANDLED;
1012 }
1013
1014 /**
1015  * fsl_rio_doorbell_init - MPC85xx doorbell interface init
1016  * @mport: Master port implementing the inbound doorbell unit
1017  *
1018  * Initializes doorbell unit hardware and inbound DMA buffer
1019  * ring. Called from fsl_rio_setup(). Returns %0 on success
1020  * or %-ENOMEM on failure.
1021  */
1022 static int fsl_rio_doorbell_init(struct rio_mport *mport)
1023 {
1024         struct rio_priv *priv = mport->priv;
1025         int rc = 0;
1026
1027         /* Map outbound doorbell window immediately after maintenance window */
1028         priv->dbell_win = ioremap(mport->iores.start + RIO_MAINT_WIN_SIZE,
1029                             RIO_DBELL_WIN_SIZE);
1030         if (!priv->dbell_win) {
1031                 printk(KERN_ERR
1032                        "RIO: unable to map outbound doorbell window\n");
1033                 rc = -ENOMEM;
1034                 goto out;
1035         }
1036
1037         /* Initialize inbound doorbells */
1038         priv->dbell_ring.virt = dma_alloc_coherent(priv->dev, 512 *
1039                     DOORBELL_MESSAGE_SIZE, &priv->dbell_ring.phys, GFP_KERNEL);
1040         if (!priv->dbell_ring.virt) {
1041                 printk(KERN_ERR "RIO: unable allocate inbound doorbell ring\n");
1042                 rc = -ENOMEM;
1043                 iounmap(priv->dbell_win);
1044                 goto out;
1045         }
1046
1047         /* Point dequeue/enqueue pointers at first entry in ring */
1048         out_be32(&priv->msg_regs->dqdpar, (u32) priv->dbell_ring.phys);
1049         out_be32(&priv->msg_regs->dqepar, (u32) priv->dbell_ring.phys);
1050
1051         /* Clear interrupt status */
1052         out_be32(&priv->msg_regs->dsr, 0x00000091);
1053
1054         /* Hook up doorbell handler */
1055         rc = request_irq(IRQ_RIO_BELL(mport), fsl_rio_dbell_handler, 0,
1056                          "dbell_rx", (void *)mport);
1057         if (rc < 0) {
1058                 iounmap(priv->dbell_win);
1059                 dma_free_coherent(priv->dev, 512 * DOORBELL_MESSAGE_SIZE,
1060                                   priv->dbell_ring.virt, priv->dbell_ring.phys);
1061                 printk(KERN_ERR
1062                        "MPC85xx RIO: unable to request inbound doorbell irq");
1063                 goto out;
1064         }
1065
1066         /* Configure doorbells for snooping, 512 entries, and enable */
1067         out_be32(&priv->msg_regs->dmr, 0x00108161);
1068
1069       out:
1070         return rc;
1071 }
1072
1073 /**
1074  * fsl_rio_port_write_handler - MPC85xx port write interrupt handler
1075  * @irq: Linux interrupt number
1076  * @dev_instance: Pointer to interrupt-specific data
1077  *
1078  * Handles port write interrupts. Parses a list of registered
1079  * port write event handlers and executes a matching event handler.
1080  */
1081 static irqreturn_t
1082 fsl_rio_port_write_handler(int irq, void *dev_instance)
1083 {
1084         u32 ipwmr, ipwsr;
1085         struct rio_mport *port = (struct rio_mport *)dev_instance;
1086         struct rio_priv *priv = port->priv;
1087         u32 epwisr, tmp;
1088
1089         epwisr = in_be32(priv->regs_win + RIO_EPWISR);
1090         if (!(epwisr & RIO_EPWISR_PW))
1091                 goto pw_done;
1092
1093         ipwmr = in_be32(&priv->msg_regs->pwmr);
1094         ipwsr = in_be32(&priv->msg_regs->pwsr);
1095
1096 #ifdef DEBUG_PW
1097         pr_debug("PW Int->IPWMR: 0x%08x IPWSR: 0x%08x (", ipwmr, ipwsr);
1098         if (ipwsr & RIO_IPWSR_QF)
1099                 pr_debug(" QF");
1100         if (ipwsr & RIO_IPWSR_TE)
1101                 pr_debug(" TE");
1102         if (ipwsr & RIO_IPWSR_QFI)
1103                 pr_debug(" QFI");
1104         if (ipwsr & RIO_IPWSR_PWD)
1105                 pr_debug(" PWD");
1106         if (ipwsr & RIO_IPWSR_PWB)
1107                 pr_debug(" PWB");
1108         pr_debug(" )\n");
1109 #endif
1110         /* Schedule deferred processing if PW was received */
1111         if (ipwsr & RIO_IPWSR_QFI) {
1112                 /* Save PW message (if there is room in FIFO),
1113                  * otherwise discard it.
1114                  */
1115                 if (kfifo_avail(&priv->pw_fifo) >= RIO_PW_MSG_SIZE) {
1116                         priv->port_write_msg.msg_count++;
1117                         kfifo_in(&priv->pw_fifo, priv->port_write_msg.virt,
1118                                  RIO_PW_MSG_SIZE);
1119                 } else {
1120                         priv->port_write_msg.discard_count++;
1121                         pr_debug("RIO: ISR Discarded Port-Write Msg(s) (%d)\n",
1122                                  priv->port_write_msg.discard_count);
1123                 }
1124                 /* Clear interrupt and issue Clear Queue command. This allows
1125                  * another port-write to be received.
1126                  */
1127                 out_be32(&priv->msg_regs->pwsr, RIO_IPWSR_QFI);
1128                 out_be32(&priv->msg_regs->pwmr, ipwmr | RIO_IPWMR_CQ);
1129
1130                 schedule_work(&priv->pw_work);
1131         }
1132
1133         if ((ipwmr & RIO_IPWMR_EIE) && (ipwsr & RIO_IPWSR_TE)) {
1134                 priv->port_write_msg.err_count++;
1135                 pr_debug("RIO: Port-Write Transaction Err (%d)\n",
1136                          priv->port_write_msg.err_count);
1137                 /* Clear Transaction Error: port-write controller should be
1138                  * disabled when clearing this error
1139                  */
1140                 out_be32(&priv->msg_regs->pwmr, ipwmr & ~RIO_IPWMR_PWE);
1141                 out_be32(&priv->msg_regs->pwsr, RIO_IPWSR_TE);
1142                 out_be32(&priv->msg_regs->pwmr, ipwmr);
1143         }
1144
1145         if (ipwsr & RIO_IPWSR_PWD) {
1146                 priv->port_write_msg.discard_count++;
1147                 pr_debug("RIO: Port Discarded Port-Write Msg(s) (%d)\n",
1148                          priv->port_write_msg.discard_count);
1149                 out_be32(&priv->msg_regs->pwsr, RIO_IPWSR_PWD);
1150         }
1151
1152 pw_done:
1153         if (epwisr & RIO_EPWISR_PINT) {
1154                 tmp = in_be32(priv->regs_win + RIO_LTLEDCSR);
1155                 pr_debug("RIO_LTLEDCSR = 0x%x\n", tmp);
1156                 out_be32(priv->regs_win + RIO_LTLEDCSR, 0);
1157         }
1158
1159         return IRQ_HANDLED;
1160 }
1161
1162 static void fsl_pw_dpc(struct work_struct *work)
1163 {
1164         struct rio_priv *priv = container_of(work, struct rio_priv, pw_work);
1165         unsigned long flags;
1166         u32 msg_buffer[RIO_PW_MSG_SIZE/sizeof(u32)];
1167
1168         /*
1169          * Process port-write messages
1170          */
1171         spin_lock_irqsave(&priv->pw_fifo_lock, flags);
1172         while (kfifo_out(&priv->pw_fifo, (unsigned char *)msg_buffer,
1173                          RIO_PW_MSG_SIZE)) {
1174                 /* Process one message */
1175                 spin_unlock_irqrestore(&priv->pw_fifo_lock, flags);
1176 #ifdef DEBUG_PW
1177                 {
1178                 u32 i;
1179                 pr_debug("%s : Port-Write Message:", __func__);
1180                 for (i = 0; i < RIO_PW_MSG_SIZE/sizeof(u32); i++) {
1181                         if ((i%4) == 0)
1182                                 pr_debug("\n0x%02x: 0x%08x", i*4,
1183                                          msg_buffer[i]);
1184                         else
1185                                 pr_debug(" 0x%08x", msg_buffer[i]);
1186                 }
1187                 pr_debug("\n");
1188                 }
1189 #endif
1190                 /* Pass the port-write message to RIO core for processing */
1191                 rio_inb_pwrite_handler((union rio_pw_msg *)msg_buffer);
1192                 spin_lock_irqsave(&priv->pw_fifo_lock, flags);
1193         }
1194         spin_unlock_irqrestore(&priv->pw_fifo_lock, flags);
1195 }
1196
1197 /**
1198  * fsl_rio_pw_enable - enable/disable port-write interface init
1199  * @mport: Master port implementing the port write unit
1200  * @enable:    1=enable; 0=disable port-write message handling
1201  */
1202 static int fsl_rio_pw_enable(struct rio_mport *mport, int enable)
1203 {
1204         struct rio_priv *priv = mport->priv;
1205         u32 rval;
1206
1207         rval = in_be32(&priv->msg_regs->pwmr);
1208
1209         if (enable)
1210                 rval |= RIO_IPWMR_PWE;
1211         else
1212                 rval &= ~RIO_IPWMR_PWE;
1213
1214         out_be32(&priv->msg_regs->pwmr, rval);
1215
1216         return 0;
1217 }
1218
1219 /**
1220  * fsl_rio_port_write_init - MPC85xx port write interface init
1221  * @mport: Master port implementing the port write unit
1222  *
1223  * Initializes port write unit hardware and DMA buffer
1224  * ring. Called from fsl_rio_setup(). Returns %0 on success
1225  * or %-ENOMEM on failure.
1226  */
1227 static int fsl_rio_port_write_init(struct rio_mport *mport)
1228 {
1229         struct rio_priv *priv = mport->priv;
1230         int rc = 0;
1231
1232         /* Following configurations require a disabled port write controller */
1233         out_be32(&priv->msg_regs->pwmr,
1234                  in_be32(&priv->msg_regs->pwmr) & ~RIO_IPWMR_PWE);
1235
1236         /* Initialize port write */
1237         priv->port_write_msg.virt = dma_alloc_coherent(priv->dev,
1238                                         RIO_PW_MSG_SIZE,
1239                                         &priv->port_write_msg.phys, GFP_KERNEL);
1240         if (!priv->port_write_msg.virt) {
1241                 pr_err("RIO: unable allocate port write queue\n");
1242                 return -ENOMEM;
1243         }
1244
1245         priv->port_write_msg.err_count = 0;
1246         priv->port_write_msg.discard_count = 0;
1247
1248         /* Point dequeue/enqueue pointers at first entry */
1249         out_be32(&priv->msg_regs->epwqbar, 0);
1250         out_be32(&priv->msg_regs->pwqbar, (u32) priv->port_write_msg.phys);
1251
1252         pr_debug("EIPWQBAR: 0x%08x IPWQBAR: 0x%08x\n",
1253                  in_be32(&priv->msg_regs->epwqbar),
1254                  in_be32(&priv->msg_regs->pwqbar));
1255
1256         /* Clear interrupt status IPWSR */
1257         out_be32(&priv->msg_regs->pwsr,
1258                  (RIO_IPWSR_TE | RIO_IPWSR_QFI | RIO_IPWSR_PWD));
1259
1260         /* Configure port write contoller for snooping enable all reporting,
1261            clear queue full */
1262         out_be32(&priv->msg_regs->pwmr,
1263                  RIO_IPWMR_SEN | RIO_IPWMR_QFIE | RIO_IPWMR_EIE | RIO_IPWMR_CQ);
1264
1265
1266         /* Hook up port-write handler */
1267         rc = request_irq(IRQ_RIO_PW(mport), fsl_rio_port_write_handler, 0,
1268                          "port-write", (void *)mport);
1269         if (rc < 0) {
1270                 pr_err("MPC85xx RIO: unable to request inbound doorbell irq");
1271                 goto err_out;
1272         }
1273
1274         INIT_WORK(&priv->pw_work, fsl_pw_dpc);
1275         spin_lock_init(&priv->pw_fifo_lock);
1276         if (kfifo_alloc(&priv->pw_fifo, RIO_PW_MSG_SIZE * 32, GFP_KERNEL)) {
1277                 pr_err("FIFO allocation failed\n");
1278                 rc = -ENOMEM;
1279                 goto err_out_irq;
1280         }
1281
1282         pr_debug("IPWMR: 0x%08x IPWSR: 0x%08x\n",
1283                  in_be32(&priv->msg_regs->pwmr),
1284                  in_be32(&priv->msg_regs->pwsr));
1285
1286         return rc;
1287
1288 err_out_irq:
1289         free_irq(IRQ_RIO_PW(mport), (void *)mport);
1290 err_out:
1291         dma_free_coherent(priv->dev, RIO_PW_MSG_SIZE,
1292                           priv->port_write_msg.virt,
1293                           priv->port_write_msg.phys);
1294         return rc;
1295 }
1296
1297 static char *cmdline = NULL;
1298
1299 static int fsl_rio_get_hdid(int index)
1300 {
1301         /* XXX Need to parse multiple entries in some format */
1302         if (!cmdline)
1303                 return -1;
1304
1305         return simple_strtol(cmdline, NULL, 0);
1306 }
1307
1308 static int fsl_rio_get_cmdline(char *s)
1309 {
1310         if (!s)
1311                 return 0;
1312
1313         cmdline = s;
1314         return 1;
1315 }
1316
1317 __setup("riohdid=", fsl_rio_get_cmdline);
1318
1319 static inline void fsl_rio_info(struct device *dev, u32 ccsr)
1320 {
1321         const char *str;
1322         if (ccsr & 1) {
1323                 /* Serial phy */
1324                 switch (ccsr >> 30) {
1325                 case 0:
1326                         str = "1";
1327                         break;
1328                 case 1:
1329                         str = "4";
1330                         break;
1331                 default:
1332                         str = "Unknown";
1333                         break;
1334                 }
1335                 dev_info(dev, "Hardware port width: %s\n", str);
1336
1337                 switch ((ccsr >> 27) & 7) {
1338                 case 0:
1339                         str = "Single-lane 0";
1340                         break;
1341                 case 1:
1342                         str = "Single-lane 2";
1343                         break;
1344                 case 2:
1345                         str = "Four-lane";
1346                         break;
1347                 default:
1348                         str = "Unknown";
1349                         break;
1350                 }
1351                 dev_info(dev, "Training connection status: %s\n", str);
1352         } else {
1353                 /* Parallel phy */
1354                 if (!(ccsr & 0x80000000))
1355                         dev_info(dev, "Output port operating in 8-bit mode\n");
1356                 if (!(ccsr & 0x08000000))
1357                         dev_info(dev, "Input port operating in 8-bit mode\n");
1358         }
1359 }
1360
1361 /**
1362  * fsl_rio_setup - Setup Freescale PowerPC RapidIO interface
1363  * @dev: platform_device pointer
1364  *
1365  * Initializes MPC85xx RapidIO hardware interface, configures
1366  * master port with system-specific info, and registers the
1367  * master port with the RapidIO subsystem.
1368  */
1369 int fsl_rio_setup(struct platform_device *dev)
1370 {
1371         struct rio_ops *ops;
1372         struct rio_mport *port;
1373         struct rio_priv *priv;
1374         int rc = 0;
1375         const u32 *dt_range, *cell;
1376         struct resource regs;
1377         int rlen;
1378         u32 ccsr;
1379         u64 law_start, law_size;
1380         int paw, aw, sw;
1381
1382         if (!dev->dev.of_node) {
1383                 dev_err(&dev->dev, "Device OF-Node is NULL");
1384                 return -EFAULT;
1385         }
1386
1387         rc = of_address_to_resource(dev->dev.of_node, 0, &regs);
1388         if (rc) {
1389                 dev_err(&dev->dev, "Can't get %s property 'reg'\n",
1390                                 dev->dev.of_node->full_name);
1391                 return -EFAULT;
1392         }
1393         dev_info(&dev->dev, "Of-device full name %s\n", dev->dev.of_node->full_name);
1394         dev_info(&dev->dev, "Regs: %pR\n", &regs);
1395
1396         dt_range = of_get_property(dev->dev.of_node, "ranges", &rlen);
1397         if (!dt_range) {
1398                 dev_err(&dev->dev, "Can't get %s property 'ranges'\n",
1399                                 dev->dev.of_node->full_name);
1400                 return -EFAULT;
1401         }
1402
1403         /* Get node address wide */
1404         cell = of_get_property(dev->dev.of_node, "#address-cells", NULL);
1405         if (cell)
1406                 aw = *cell;
1407         else
1408                 aw = of_n_addr_cells(dev->dev.of_node);
1409         /* Get node size wide */
1410         cell = of_get_property(dev->dev.of_node, "#size-cells", NULL);
1411         if (cell)
1412                 sw = *cell;
1413         else
1414                 sw = of_n_size_cells(dev->dev.of_node);
1415         /* Get parent address wide wide */
1416         paw = of_n_addr_cells(dev->dev.of_node);
1417
1418         law_start = of_read_number(dt_range + aw, paw);
1419         law_size = of_read_number(dt_range + aw + paw, sw);
1420
1421         dev_info(&dev->dev, "LAW start 0x%016llx, size 0x%016llx.\n",
1422                         law_start, law_size);
1423
1424         ops = kzalloc(sizeof(struct rio_ops), GFP_KERNEL);
1425         if (!ops) {
1426                 rc = -ENOMEM;
1427                 goto err_ops;
1428         }
1429         ops->lcread = fsl_local_config_read;
1430         ops->lcwrite = fsl_local_config_write;
1431         ops->cread = fsl_rio_config_read;
1432         ops->cwrite = fsl_rio_config_write;
1433         ops->dsend = fsl_rio_doorbell_send;
1434         ops->pwenable = fsl_rio_pw_enable;
1435
1436         port = kzalloc(sizeof(struct rio_mport), GFP_KERNEL);
1437         if (!port) {
1438                 rc = -ENOMEM;
1439                 goto err_port;
1440         }
1441         port->id = 0;
1442         port->index = 0;
1443
1444         priv = kzalloc(sizeof(struct rio_priv), GFP_KERNEL);
1445         if (!priv) {
1446                 printk(KERN_ERR "Can't alloc memory for 'priv'\n");
1447                 rc = -ENOMEM;
1448                 goto err_priv;
1449         }
1450
1451         INIT_LIST_HEAD(&port->dbells);
1452         port->iores.start = law_start;
1453         port->iores.end = law_start + law_size - 1;
1454         port->iores.flags = IORESOURCE_MEM;
1455         port->iores.name = "rio_io_win";
1456
1457         priv->pwirq   = irq_of_parse_and_map(dev->dev.of_node, 0);
1458         priv->bellirq = irq_of_parse_and_map(dev->dev.of_node, 2);
1459         priv->txirq = irq_of_parse_and_map(dev->dev.of_node, 3);
1460         priv->rxirq = irq_of_parse_and_map(dev->dev.of_node, 4);
1461         dev_info(&dev->dev, "pwirq: %d, bellirq: %d, txirq: %d, rxirq %d\n",
1462                  priv->pwirq, priv->bellirq, priv->txirq, priv->rxirq);
1463
1464         rio_init_dbell_res(&port->riores[RIO_DOORBELL_RESOURCE], 0, 0xffff);
1465         rio_init_mbox_res(&port->riores[RIO_INB_MBOX_RESOURCE], 0, 0);
1466         rio_init_mbox_res(&port->riores[RIO_OUTB_MBOX_RESOURCE], 0, 0);
1467         strcpy(port->name, "RIO0 mport");
1468
1469         priv->dev = &dev->dev;
1470
1471         port->ops = ops;
1472         port->host_deviceid = fsl_rio_get_hdid(port->id);
1473
1474         port->priv = priv;
1475         port->phys_efptr = 0x100;
1476         rio_register_mport(port);
1477
1478         priv->regs_win = ioremap(regs.start, regs.end - regs.start + 1);
1479         rio_regs_win = priv->regs_win;
1480
1481         /* Probe the master port phy type */
1482         ccsr = in_be32(priv->regs_win + RIO_CCSR);
1483         port->phy_type = (ccsr & 1) ? RIO_PHY_SERIAL : RIO_PHY_PARALLEL;
1484         dev_info(&dev->dev, "RapidIO PHY type: %s\n",
1485                         (port->phy_type == RIO_PHY_PARALLEL) ? "parallel" :
1486                         ((port->phy_type == RIO_PHY_SERIAL) ? "serial" :
1487                          "unknown"));
1488         /* Checking the port training status */
1489         if (in_be32((priv->regs_win + RIO_ESCSR)) & 1) {
1490                 dev_err(&dev->dev, "Port is not ready. "
1491                                    "Try to restart connection...\n");
1492                 switch (port->phy_type) {
1493                 case RIO_PHY_SERIAL:
1494                         /* Disable ports */
1495                         out_be32(priv->regs_win + RIO_CCSR, 0);
1496                         /* Set 1x lane */
1497                         setbits32(priv->regs_win + RIO_CCSR, 0x02000000);
1498                         /* Enable ports */
1499                         setbits32(priv->regs_win + RIO_CCSR, 0x00600000);
1500                         break;
1501                 case RIO_PHY_PARALLEL:
1502                         /* Disable ports */
1503                         out_be32(priv->regs_win + RIO_CCSR, 0x22000000);
1504                         /* Enable ports */
1505                         out_be32(priv->regs_win + RIO_CCSR, 0x44000000);
1506                         break;
1507                 }
1508                 msleep(100);
1509                 if (in_be32((priv->regs_win + RIO_ESCSR)) & 1) {
1510                         dev_err(&dev->dev, "Port restart failed.\n");
1511                         rc = -ENOLINK;
1512                         goto err;
1513                 }
1514                 dev_info(&dev->dev, "Port restart success!\n");
1515         }
1516         fsl_rio_info(&dev->dev, ccsr);
1517
1518         port->sys_size = (in_be32((priv->regs_win + RIO_PEF_CAR))
1519                                         & RIO_PEF_CTLS) >> 4;
1520         dev_info(&dev->dev, "RapidIO Common Transport System size: %d\n",
1521                         port->sys_size ? 65536 : 256);
1522
1523         if (port->host_deviceid >= 0)
1524                 out_be32(priv->regs_win + RIO_GCCSR, RIO_PORT_GEN_HOST |
1525                         RIO_PORT_GEN_MASTER | RIO_PORT_GEN_DISCOVERED);
1526         else
1527                 out_be32(priv->regs_win + RIO_GCCSR, 0x00000000);
1528
1529         priv->atmu_regs = (struct rio_atmu_regs *)(priv->regs_win
1530                                         + RIO_ATMU_REGS_OFFSET);
1531         priv->maint_atmu_regs = priv->atmu_regs + 1;
1532         priv->dbell_atmu_regs = priv->atmu_regs + 2;
1533         priv->msg_regs = (struct rio_msg_regs *)(priv->regs_win +
1534                                 ((port->phy_type == RIO_PHY_SERIAL) ?
1535                                 RIO_S_MSG_REGS_OFFSET : RIO_P_MSG_REGS_OFFSET));
1536
1537         /* Set to receive any dist ID for serial RapidIO controller. */
1538         if (port->phy_type == RIO_PHY_SERIAL)
1539                 out_be32((priv->regs_win + RIO_ISR_AACR), RIO_ISR_AACR_AA);
1540
1541         /* Configure maintenance transaction window */
1542         out_be32(&priv->maint_atmu_regs->rowbar, law_start >> 12);
1543         out_be32(&priv->maint_atmu_regs->rowar,
1544                  0x80077000 | (ilog2(RIO_MAINT_WIN_SIZE) - 1));
1545
1546         priv->maint_win = ioremap(law_start, RIO_MAINT_WIN_SIZE);
1547
1548         /* Configure outbound doorbell window */
1549         out_be32(&priv->dbell_atmu_regs->rowbar,
1550                         (law_start + RIO_MAINT_WIN_SIZE) >> 12);
1551         out_be32(&priv->dbell_atmu_regs->rowar, 0x8004200b);    /* 4k */
1552         fsl_rio_doorbell_init(port);
1553         fsl_rio_port_write_init(port);
1554
1555 #ifdef CONFIG_E500
1556         saved_mcheck_exception = ppc_md.machine_check_exception;
1557         ppc_md.machine_check_exception = fsl_rio_mcheck_exception;
1558 #endif
1559         /* Ensure that RFXE is set */
1560         mtspr(SPRN_HID1, (mfspr(SPRN_HID1) | 0x20000));
1561
1562         return 0;
1563 err:
1564         iounmap(priv->regs_win);
1565         kfree(priv);
1566 err_priv:
1567         kfree(port);
1568 err_port:
1569         kfree(ops);
1570 err_ops:
1571         return rc;
1572 }
1573
1574 /* The probe function for RapidIO peer-to-peer network.
1575  */
1576 static int __devinit fsl_of_rio_rpn_probe(struct platform_device *dev,
1577                                      const struct of_device_id *match)
1578 {
1579         int rc;
1580         printk(KERN_INFO "Setting up RapidIO peer-to-peer network %s\n",
1581                         dev->dev.of_node->full_name);
1582
1583         rc = fsl_rio_setup(dev);
1584         if (rc)
1585                 goto out;
1586
1587         /* Enumerate all registered ports */
1588         rc = rio_init_mports();
1589 out:
1590         return rc;
1591 };
1592
1593 static const struct of_device_id fsl_of_rio_rpn_ids[] = {
1594         {
1595                 .compatible = "fsl,rapidio-delta",
1596         },
1597         {},
1598 };
1599
1600 static struct of_platform_driver fsl_of_rio_rpn_driver = {
1601         .driver = {
1602                 .name = "fsl-of-rio",
1603                 .owner = THIS_MODULE,
1604                 .of_match_table = fsl_of_rio_rpn_ids,
1605         },
1606         .probe = fsl_of_rio_rpn_probe,
1607 };
1608
1609 static __init int fsl_of_rio_rpn_init(void)
1610 {
1611         return of_register_platform_driver(&fsl_of_rio_rpn_driver);
1612 }
1613
1614 subsys_initcall(fsl_of_rio_rpn_init);