arch/ppc/syslib/ppc85xx_rio.c

   1 /*
   2  * MPC85xx RapidIO support
   3  *
   4  * Copyright 2005 MontaVista Software, Inc.
   5  * Matt Porter <mporter@kernel.crashing.org>
   6  *
   7  * This program is free software; you can redistribute  it and/or modify it
   8  * under  the terms of  the GNU General  Public License as published by the
   9  * Free Software Foundation;  either version 2 of the  License, or (at your
  10  * option) any later version.
  11  */
  12
  13 #include <linux/init.h>
  14 #include <linux/module.h>
  15 #include <linux/types.h>
  16 #include <linux/dma-mapping.h>
  17 #include <linux/interrupt.h>
  18 #include <linux/rio.h>
  19 #include <linux/rio_drv.h>
  20
  21 #include <asm/io.h>
  22
  23 #define RIO_REGS_BASE           (CCSRBAR + 0xc0000)
  24 #define RIO_ATMU_REGS_OFFSET    0x10c00
  25 #define RIO_MSG_REGS_OFFSET     0x11000
  26 #define RIO_MAINT_WIN_SIZE      0x400000
  27 #define RIO_DBELL_WIN_SIZE      0x1000
  28
  29 #define RIO_MSG_OMR_MUI         0x00000002
  30 #define RIO_MSG_OSR_TE          0x00000080
  31 #define RIO_MSG_OSR_QOI         0x00000020
  32 #define RIO_MSG_OSR_QFI         0x00000010
  33 #define RIO_MSG_OSR_MUB         0x00000004
  34 #define RIO_MSG_OSR_EOMI        0x00000002
  35 #define RIO_MSG_OSR_QEI         0x00000001
  36
  37 #define RIO_MSG_IMR_MI          0x00000002
  38 #define RIO_MSG_ISR_TE          0x00000080
  39 #define RIO_MSG_ISR_QFI         0x00000010
  40 #define RIO_MSG_ISR_DIQI        0x00000001
  41
  42 #define RIO_MSG_DESC_SIZE       32
  43 #define RIO_MSG_BUFFER_SIZE     4096
  44 #define RIO_MIN_TX_RING_SIZE    2
  45 #define RIO_MAX_TX_RING_SIZE    2048
  46 #define RIO_MIN_RX_RING_SIZE    2
  47 #define RIO_MAX_RX_RING_SIZE    2048
  48
  49 #define DOORBELL_DMR_DI         0x00000002
  50 #define DOORBELL_DSR_TE         0x00000080
  51 #define DOORBELL_DSR_QFI        0x00000010
  52 #define DOORBELL_DSR_DIQI       0x00000001
  53 #define DOORBELL_TID_OFFSET     0x03
  54 #define DOORBELL_SID_OFFSET     0x05
  55 #define DOORBELL_INFO_OFFSET    0x06
  56
  57 #define DOORBELL_MESSAGE_SIZE   0x08
  58 #define DBELL_SID(x)            (*(u8 *)(x + DOORBELL_SID_OFFSET))
  59 #define DBELL_TID(x)            (*(u8 *)(x + DOORBELL_TID_OFFSET))
  60 #define DBELL_INF(x)            (*(u16 *)(x + DOORBELL_INFO_OFFSET))
  61
  62 #define is_power_of_2(x)        (((x) & ((x) - 1)) == 0)
  63
  64 struct rio_atmu_regs {
  65         u32 rowtar;
  66         u32 pad1;
  67         u32 rowbar;
  68         u32 pad2;
  69         u32 rowar;
  70         u32 pad3[3];
  71 };
  72
  73 struct rio_msg_regs {
  74         u32 omr;
  75         u32 osr;
  76         u32 pad1;
  77         u32 odqdpar;
  78         u32 pad2;
  79         u32 osar;
  80         u32 odpr;
  81         u32 odatr;
  82         u32 odcr;
  83         u32 pad3;
  84         u32 odqepar;
  85         u32 pad4[13];
  86         u32 imr;
  87         u32 isr;
  88         u32 pad5;
  89         u32 ifqdpar;
  90         u32 pad6;
  91         u32 ifqepar;
  92         u32 pad7[250];
  93         u32 dmr;
  94         u32 dsr;
  95         u32 pad8;
  96         u32 dqdpar;
  97         u32 pad9;
  98         u32 dqepar;
  99         u32 pad10[26];
 100         u32 pwmr;
 101         u32 pwsr;
 102         u32 pad11;
 103         u32 pwqbar;
 104 };
 105
 106 struct rio_tx_desc {
 107         u32 res1;
 108         u32 saddr;
 109         u32 dport;
 110         u32 dattr;
 111         u32 res2;
 112         u32 res3;
 113         u32 dwcnt;
 114         u32 res4;
 115 };
 116
 117 static u32 regs_win;
 118 static struct rio_atmu_regs *atmu_regs;
 119 static struct rio_atmu_regs *maint_atmu_regs;
 120 static struct rio_atmu_regs *dbell_atmu_regs;
 121 static u32 dbell_win;
 122 static u32 maint_win;
 123 static struct rio_msg_regs *msg_regs;
 124
 125 static struct rio_dbell_ring {
 126         void *virt;
 127         dma_addr_t phys;
 128 } dbell_ring;
 129
 130 static struct rio_msg_tx_ring {
 131         void *virt;
 132         dma_addr_t phys;
 133         void *virt_buffer[RIO_MAX_TX_RING_SIZE];
 134         dma_addr_t phys_buffer[RIO_MAX_TX_RING_SIZE];
 135         int tx_slot;
 136         int size;
 137         void *dev_id;
 138 } msg_tx_ring;
 139
 140 static struct rio_msg_rx_ring {
 141         void *virt;
 142         dma_addr_t phys;
 143         void *virt_buffer[RIO_MAX_RX_RING_SIZE];
 144         int rx_slot;
 145         int size;
 146         void *dev_id;
 147 } msg_rx_ring;
 148
 149 /**
 150  * mpc85xx_rio_doorbell_send - Send a MPC85xx doorbell message
 151  * @index: ID of RapidIO interface
 152  * @destid: Destination ID of target device
 153  * @data: 16-bit info field of RapidIO doorbell message
 154  *
 155  * Sends a MPC85xx doorbell message. Returns %0 on success or
 156  * %-EINVAL on failure.
 157  */
 158 static int mpc85xx_rio_doorbell_send(int index, u16 destid, u16 data)
 159 {
 160         pr_debug("mpc85xx_doorbell_send: index %d destid %4.4x data %4.4x\n",
 161                  index, destid, data);
 162         out_be32((void *)&dbell_atmu_regs->rowtar, destid << 22);
 163         out_be16((void *)(dbell_win), data);
 164
 165         return 0;
 166 }
 167
 168 /**
 169  * mpc85xx_local_config_read - Generate a MPC85xx local config space read
 170  * @index: ID of RapdiIO interface
 171  * @offset: Offset into configuration space
 172  * @len: Length (in bytes) of the maintenance transaction
 173  * @data: Value to be read into
 174  *
 175  * Generates a MPC85xx local configuration space read. Returns %0 on
 176  * success or %-EINVAL on failure.
 177  */
 178 static int mpc85xx_local_config_read(int index, u32 offset, int len, u32 * data)
 179 {
 180         pr_debug("mpc85xx_local_config_read: index %d offset %8.8x\n", index,
 181                  offset);
 182         *data = in_be32((void *)(regs_win + offset));
 183
 184         return 0;
 185 }
 186
 187 /**
 188  * mpc85xx_local_config_write - Generate a MPC85xx local config space write
 189  * @index: ID of RapdiIO interface
 190  * @offset: Offset into configuration space
 191  * @len: Length (in bytes) of the maintenance transaction
 192  * @data: Value to be written
 193  *
 194  * Generates a MPC85xx local configuration space write. Returns %0 on
 195  * success or %-EINVAL on failure.
 196  */
 197 static int mpc85xx_local_config_write(int index, u32 offset, int len, u32 data)
 198 {
 199         pr_debug
 200             ("mpc85xx_local_config_write: index %d offset %8.8x data %8.8x\n",
 201              index, offset, data);
 202         out_be32((void *)(regs_win + offset), data);
 203
 204         return 0;
 205 }
 206
 207 /**
 208  * mpc85xx_rio_config_read - Generate a MPC85xx read maintenance transaction
 209  * @index: ID of RapdiIO interface
 210  * @destid: Destination ID of transaction
 211  * @hopcount: Number of hops to target device
 212  * @offset: Offset into configuration space
 213  * @len: Length (in bytes) of the maintenance transaction
 214  * @val: Location to be read into
 215  *
 216  * Generates a MPC85xx read maintenance transaction. Returns %0 on
 217  * success or %-EINVAL on failure.
 218  */
 219 static int
 220 mpc85xx_rio_config_read(int index, u16 destid, u8 hopcount, u32 offset, int len,
 221                         u32 * val)
 222 {
 223         u8 *data;
 224
 225         pr_debug
 226             ("mpc85xx_rio_config_read: index %d destid %d hopcount %d offset %8.8x len %d\n",
 227              index, destid, hopcount, offset, len);
 228         out_be32((void *)&maint_atmu_regs->rowtar,
 229                  (destid << 22) | (hopcount << 12) | ((offset & ~0x3) >> 9));
 230
 231         data = (u8 *) maint_win + offset;
 232         switch (len) {
 233         case 1:
 234                 *val = in_8((u8 *) data);
 235                 break;
 236         case 2:
 237                 *val = in_be16((u16 *) data);
 238                 break;
 239         default:
 240                 *val = in_be32((u32 *) data);
 241                 break;
 242         }
 243
 244         return 0;
 245 }
 246
 247 /**
 248  * mpc85xx_rio_config_write - Generate a MPC85xx write maintenance transaction
 249  * @index: ID of RapdiIO interface
 250  * @destid: Destination ID of transaction
 251  * @hopcount: Number of hops to target device
 252  * @offset: Offset into configuration space
 253  * @len: Length (in bytes) of the maintenance transaction
 254  * @val: Value to be written
 255  *
 256  * Generates an MPC85xx write maintenance transaction. Returns %0 on
 257  * success or %-EINVAL on failure.
 258  */
 259 static int
 260 mpc85xx_rio_config_write(int index, u16 destid, u8 hopcount, u32 offset,
 261                          int len, u32 val)
 262 {
 263         u8 *data;
 264         pr_debug
 265             ("mpc85xx_rio_config_write: index %d destid %d hopcount %d offset %8.8x len %d val %8.8x\n",
 266              index, destid, hopcount, offset, len, val);
 267         out_be32((void *)&maint_atmu_regs->rowtar,
 268                  (destid << 22) | (hopcount << 12) | ((offset & ~0x3) >> 9));
 269
 270         data = (u8 *) maint_win + offset;
 271         switch (len) {
 272         case 1:
 273                 out_8((u8 *) data, val);
 274                 break;
 275         case 2:
 276                 out_be16((u16 *) data, val);
 277                 break;
 278         default:
 279                 out_be32((u32 *) data, val);
 280                 break;
 281         }
 282
 283         return 0;
 284 }
 285
 286 /**
 287  * rio_hw_add_outb_message - Add message to the MPC85xx outbound message queue
 288  * @mport: Master port with outbound message queue
 289  * @rdev: Target of outbound message
 290  * @mbox: Outbound mailbox
 291  * @buffer: Message to add to outbound queue
 292  * @len: Length of message
 293  *
 294  * Adds the @buffer message to the MPC85xx outbound message queue. Returns
 295  * %0 on success or %-EINVAL on failure.
 296  */
 297 int
 298 rio_hw_add_outb_message(struct rio_mport *mport, struct rio_dev *rdev, int mbox,
 299                         void *buffer, size_t len)
 300 {
 301         u32 omr;
 302         struct rio_tx_desc *desc =
 303             (struct rio_tx_desc *)msg_tx_ring.virt + msg_tx_ring.tx_slot;
 304         int ret = 0;
 305
 306         pr_debug
 307             ("RIO: rio_hw_add_outb_message(): destid %4.4x mbox %d buffer %8.8x len %8.8x\n",
 308              rdev->destid, mbox, (int)buffer, len);
 309
 310         if ((len < 8) || (len > RIO_MAX_MSG_SIZE)) {
 311                 ret = -EINVAL;
 312                 goto out;
 313         }
 314
 315         /* Copy and clear rest of buffer */
 316         memcpy(msg_tx_ring.virt_buffer[msg_tx_ring.tx_slot], buffer, len);
 317         if (len < (RIO_MAX_MSG_SIZE - 4))
 318                 memset((void *)((u32) msg_tx_ring.
 319                                 virt_buffer[msg_tx_ring.tx_slot] + len), 0,
 320                        RIO_MAX_MSG_SIZE - len);
 321
 322         /* Set mbox field for message */
 323         desc->dport = mbox & 0x3;
 324
 325         /* Enable EOMI interrupt, set priority, and set destid */
 326         desc->dattr = 0x28000000 | (rdev->destid << 2);
 327
 328         /* Set transfer size aligned to next power of 2 (in double words) */
 329         desc->dwcnt = is_power_of_2(len) ? len : 1 << get_bitmask_order(len);
 330
 331         /* Set snooping and source buffer address */
 332         desc->saddr = 0x00000004 | msg_tx_ring.phys_buffer[msg_tx_ring.tx_slot];
 333
 334         /* Increment enqueue pointer */
 335         omr = in_be32((void *)&msg_regs->omr);
 336         out_be32((void *)&msg_regs->omr, omr | RIO_MSG_OMR_MUI);
 337
 338         /* Go to next descriptor */
 339         if (++msg_tx_ring.tx_slot == msg_tx_ring.size)
 340                 msg_tx_ring.tx_slot = 0;
 341
 342       out:
 343         return ret;
 344 }
 345
 346 EXPORT_SYMBOL_GPL(rio_hw_add_outb_message);
 347
 348 /**
 349  * mpc85xx_rio_tx_handler - MPC85xx outbound message interrupt handler
 350  * @irq: Linux interrupt number
 351  * @dev_instance: Pointer to interrupt-specific data
 352  * @regs: Register context
 353  *
 354  * Handles outbound message interrupts. Executes a register outbound
 355  * mailbox event handler and acks the interrupt occurence.
 356  */
 357 static irqreturn_t
 358 mpc85xx_rio_tx_handler(int irq, void *dev_instance, struct pt_regs *regs)
 359 {
 360         int osr;
 361         struct rio_mport *port = (struct rio_mport *)dev_instance;
 362
 363         osr = in_be32((void *)&msg_regs->osr);
 364
 365         if (osr & RIO_MSG_OSR_TE) {
 366                 pr_info("RIO: outbound message transmission error\n");
 367                 out_be32((void *)&msg_regs->osr, RIO_MSG_OSR_TE);
 368                 goto out;
 369         }
 370
 371         if (osr & RIO_MSG_OSR_QOI) {
 372                 pr_info("RIO: outbound message queue overflow\n");
 373                 out_be32((void *)&msg_regs->osr, RIO_MSG_OSR_QOI);
 374                 goto out;
 375         }
 376
 377         if (osr & RIO_MSG_OSR_EOMI) {
 378                 u32 dqp = in_be32((void *)&msg_regs->odqdpar);
 379                 int slot = (dqp - msg_tx_ring.phys) >> 5;
 380                 port->outb_msg[0].mcback(port, msg_tx_ring.dev_id, -1, slot);
 381
 382                 /* Ack the end-of-message interrupt */
 383                 out_be32((void *)&msg_regs->osr, RIO_MSG_OSR_EOMI);
 384         }
 385
 386       out:
 387         return IRQ_HANDLED;
 388 }
 389
 390 /**
 391  * rio_open_outb_mbox - Initialize MPC85xx outbound mailbox
 392  * @mport: Master port implementing the outbound message unit
 393  * @dev_id: Device specific pointer to pass on event
 394  * @mbox: Mailbox to open
 395  * @entries: Number of entries in the outbound mailbox ring
 396  *
 397  * Initializes buffer ring, request the outbound message interrupt,
 398  * and enables the outbound message unit. Returns %0 on success and
 399  * %-EINVAL or %-ENOMEM on failure.
 400  */
 401 int rio_open_outb_mbox(struct rio_mport *mport, void *dev_id, int mbox, int entries)
 402 {
 403         int i, j, rc = 0;
 404
 405         if ((entries < RIO_MIN_TX_RING_SIZE) ||
 406             (entries > RIO_MAX_TX_RING_SIZE) || (!is_power_of_2(entries))) {
 407                 rc = -EINVAL;
 408                 goto out;
 409         }
 410
 411         /* Initialize shadow copy ring */
 412         msg_tx_ring.dev_id = dev_id;
 413         msg_tx_ring.size = entries;
 414
 415         for (i = 0; i < msg_tx_ring.size; i++) {
 416                 if (!
 417                     (msg_tx_ring.virt_buffer[i] =
 418                      dma_alloc_coherent(NULL, RIO_MSG_BUFFER_SIZE,
 419                                         &msg_tx_ring.phys_buffer[i],
 420                                         GFP_KERNEL))) {
 421                         rc = -ENOMEM;
 422                         for (j = 0; j < msg_tx_ring.size; j++)
 423                                 if (msg_tx_ring.virt_buffer[j])
 424                                         dma_free_coherent(NULL,
 425                                                           RIO_MSG_BUFFER_SIZE,
 426                                                           msg_tx_ring.
 427                                                           virt_buffer[j],
 428                                                           msg_tx_ring.
 429                                                           phys_buffer[j]);
 430                         goto out;
 431                 }
 432         }
 433
 434         /* Initialize outbound message descriptor ring */
 435         if (!(msg_tx_ring.virt = dma_alloc_coherent(NULL,
 436                                                     msg_tx_ring.size *
 437                                                     RIO_MSG_DESC_SIZE,
 438                                                     &msg_tx_ring.phys,
 439                                                     GFP_KERNEL))) {
 440                 rc = -ENOMEM;
 441                 goto out_dma;
 442         }
 443         memset(msg_tx_ring.virt, 0, msg_tx_ring.size * RIO_MSG_DESC_SIZE);
 444         msg_tx_ring.tx_slot = 0;
 445
 446         /* Point dequeue/enqueue pointers at first entry in ring */
 447         out_be32((void *)&msg_regs->odqdpar, msg_tx_ring.phys);
 448         out_be32((void *)&msg_regs->odqepar, msg_tx_ring.phys);
 449
 450         /* Configure for snooping */
 451         out_be32((void *)&msg_regs->osar, 0x00000004);
 452
 453         /* Clear interrupt status */
 454         out_be32((void *)&msg_regs->osr, 0x000000b3);
 455
 456         /* Hook up outbound message handler */
 457         if ((rc =
 458              request_irq(MPC85xx_IRQ_RIO_TX, mpc85xx_rio_tx_handler, 0,
 459                          "msg_tx", (void *)mport)) < 0)
 460                 goto out_irq;
 461
 462         /*
 463          * Configure outbound message unit
 464          *      Snooping
 465          *      Interrupts (all enabled, except QEIE)
 466          *      Chaining mode
 467          *      Disable
 468          */
 469         out_be32((void *)&msg_regs->omr, 0x00100220);
 470
 471         /* Set number of entries */
 472         out_be32((void *)&msg_regs->omr,
 473                  in_be32((void *)&msg_regs->omr) |
 474                  ((get_bitmask_order(entries) - 2) << 12));
 475
 476         /* Now enable the unit */
 477         out_be32((void *)&msg_regs->omr, in_be32((void *)&msg_regs->omr) | 0x1);
 478
 479       out:
 480         return rc;
 481
 482       out_irq:
 483         dma_free_coherent(NULL, msg_tx_ring.size * RIO_MSG_DESC_SIZE,
 484                           msg_tx_ring.virt, msg_tx_ring.phys);
 485
 486       out_dma:
 487         for (i = 0; i < msg_tx_ring.size; i++)
 488                 dma_free_coherent(NULL, RIO_MSG_BUFFER_SIZE,
 489                                   msg_tx_ring.virt_buffer[i],
 490                                   msg_tx_ring.phys_buffer[i]);
 491
 492         return rc;
 493 }
 494
 495 /**
 496  * rio_close_outb_mbox - Shut down MPC85xx outbound mailbox
 497  * @mport: Master port implementing the outbound message unit
 498  * @mbox: Mailbox to close
 499  *
 500  * Disables the outbound message unit, free all buffers, and
 501  * frees the outbound message interrupt.
 502  */
 503 void rio_close_outb_mbox(struct rio_mport *mport, int mbox)
 504 {
 505         /* Disable inbound message unit */
 506         out_be32((void *)&msg_regs->omr, 0);
 507
 508         /* Free ring */
 509         dma_free_coherent(NULL, msg_tx_ring.size * RIO_MSG_DESC_SIZE,
 510                           msg_tx_ring.virt, msg_tx_ring.phys);
 511
 512         /* Free interrupt */
 513         free_irq(MPC85xx_IRQ_RIO_TX, (void *)mport);
 514 }
 515
 516 /**
 517  * mpc85xx_rio_rx_handler - MPC85xx inbound message interrupt handler
 518  * @irq: Linux interrupt number
 519  * @dev_instance: Pointer to interrupt-specific data
 520  * @regs: Register context
 521  *
 522  * Handles inbound message interrupts. Executes a registered inbound
 523  * mailbox event handler and acks the interrupt occurence.
 524  */
 525 static irqreturn_t
 526 mpc85xx_rio_rx_handler(int irq, void *dev_instance, struct pt_regs *regs)
 527 {
 528         int isr;
 529         struct rio_mport *port = (struct rio_mport *)dev_instance;
 530
 531         isr = in_be32((void *)&msg_regs->isr);
 532
 533         if (isr & RIO_MSG_ISR_TE) {
 534                 pr_info("RIO: inbound message reception error\n");
 535                 out_be32((void *)&msg_regs->isr, RIO_MSG_ISR_TE);
 536                 goto out;
 537         }
 538
 539         /* XXX Need to check/dispatch until queue empty */
 540         if (isr & RIO_MSG_ISR_DIQI) {
 541                 /*
 542                  * We implement *only* mailbox 0, but can receive messages
 543                  * for any mailbox/letter to that mailbox destination. So,
 544                  * make the callback with an unknown/invalid mailbox number
 545                  * argument.
 546                  */
 547                 port->inb_msg[0].mcback(port, msg_rx_ring.dev_id, -1, -1);
 548
 549                 /* Ack the queueing interrupt */
 550                 out_be32((void *)&msg_regs->isr, RIO_MSG_ISR_DIQI);
 551         }
 552
 553       out:
 554         return IRQ_HANDLED;
 555 }
 556
 557 /**
 558  * rio_open_inb_mbox - Initialize MPC85xx inbound mailbox
 559  * @mport: Master port implementing the inbound message unit
 560  * @dev_id: Device specific pointer to pass on event
 561  * @mbox: Mailbox to open
 562  * @entries: Number of entries in the inbound mailbox ring
 563  *
 564  * Initializes buffer ring, request the inbound message interrupt,
 565  * and enables the inbound message unit. Returns %0 on success
 566  * and %-EINVAL or %-ENOMEM on failure.
 567  */
 568 int rio_open_inb_mbox(struct rio_mport *mport, void *dev_id, int mbox, int entries)
 569 {
 570         int i, rc = 0;
 571
 572         if ((entries < RIO_MIN_RX_RING_SIZE) ||
 573             (entries > RIO_MAX_RX_RING_SIZE) || (!is_power_of_2(entries))) {
 574                 rc = -EINVAL;
 575                 goto out;
 576         }
 577
 578         /* Initialize client buffer ring */
 579         msg_rx_ring.dev_id = dev_id;
 580         msg_rx_ring.size = entries;
 581         msg_rx_ring.rx_slot = 0;
 582         for (i = 0; i < msg_rx_ring.size; i++)
 583                 msg_rx_ring.virt_buffer[i] = NULL;
 584
 585         /* Initialize inbound message ring */
 586         if (!(msg_rx_ring.virt = dma_alloc_coherent(NULL,
 587                                                     msg_rx_ring.size *
 588                                                     RIO_MAX_MSG_SIZE,
 589                                                     &msg_rx_ring.phys,
 590                                                     GFP_KERNEL))) {
 591                 rc = -ENOMEM;
 592                 goto out;
 593         }
 594
 595         /* Point dequeue/enqueue pointers at first entry in ring */
 596         out_be32((void *)&msg_regs->ifqdpar, (u32) msg_rx_ring.phys);
 597         out_be32((void *)&msg_regs->ifqepar, (u32) msg_rx_ring.phys);
 598
 599         /* Clear interrupt status */
 600         out_be32((void *)&msg_regs->isr, 0x00000091);
 601
 602         /* Hook up inbound message handler */
 603         if ((rc =
 604              request_irq(MPC85xx_IRQ_RIO_RX, mpc85xx_rio_rx_handler, 0,
 605                          "msg_rx", (void *)mport)) < 0) {
 606                 dma_free_coherent(NULL, RIO_MSG_BUFFER_SIZE,
 607                                   msg_tx_ring.virt_buffer[i],
 608                                   msg_tx_ring.phys_buffer[i]);
 609                 goto out;
 610         }
 611
 612         /*
 613          * Configure inbound message unit:
 614          *      Snooping
 615          *      4KB max message size
 616          *      Unmask all interrupt sources
 617          *      Disable
 618          */
 619         out_be32((void *)&msg_regs->imr, 0x001b0060);
 620
 621         /* Set number of queue entries */
 622         out_be32((void *)&msg_regs->imr,
 623                  in_be32((void *)&msg_regs->imr) |
 624                  ((get_bitmask_order(entries) - 2) << 12));
 625
 626         /* Now enable the unit */
 627         out_be32((void *)&msg_regs->imr, in_be32((void *)&msg_regs->imr) | 0x1);
 628
 629       out:
 630         return rc;
 631 }
 632
 633 /**
 634  * rio_close_inb_mbox - Shut down MPC85xx inbound mailbox
 635  * @mport: Master port implementing the inbound message unit
 636  * @mbox: Mailbox to close
 637  *
 638  * Disables the inbound message unit, free all buffers, and
 639  * frees the inbound message interrupt.
 640  */
 641 void rio_close_inb_mbox(struct rio_mport *mport, int mbox)
 642 {
 643         /* Disable inbound message unit */
 644         out_be32((void *)&msg_regs->imr, 0);
 645
 646         /* Free ring */
 647         dma_free_coherent(NULL, msg_rx_ring.size * RIO_MAX_MSG_SIZE,
 648                           msg_rx_ring.virt, msg_rx_ring.phys);
 649
 650         /* Free interrupt */
 651         free_irq(MPC85xx_IRQ_RIO_RX, (void *)mport);
 652 }
 653
 654 /**
 655  * rio_hw_add_inb_buffer - Add buffer to the MPC85xx inbound message queue
 656  * @mport: Master port implementing the inbound message unit
 657  * @mbox: Inbound mailbox number
 658  * @buf: Buffer to add to inbound queue
 659  *
 660  * Adds the @buf buffer to the MPC85xx inbound message queue. Returns
 661  * %0 on success or %-EINVAL on failure.
 662  */
 663 int rio_hw_add_inb_buffer(struct rio_mport *mport, int mbox, void *buf)
 664 {
 665         int rc = 0;
 666
 667         pr_debug("RIO: rio_hw_add_inb_buffer(), msg_rx_ring.rx_slot %d\n",
 668                  msg_rx_ring.rx_slot);
 669
 670         if (msg_rx_ring.virt_buffer[msg_rx_ring.rx_slot]) {
 671                 printk(KERN_ERR
 672                        "RIO: error adding inbound buffer %d, buffer exists\n",
 673                        msg_rx_ring.rx_slot);
 674                 rc = -EINVAL;
 675                 goto out;
 676         }
 677
 678         msg_rx_ring.virt_buffer[msg_rx_ring.rx_slot] = buf;
 679         if (++msg_rx_ring.rx_slot == msg_rx_ring.size)
 680                 msg_rx_ring.rx_slot = 0;
 681
 682       out:
 683         return rc;
 684 }
 685
 686 EXPORT_SYMBOL_GPL(rio_hw_add_inb_buffer);
 687
 688 /**
 689  * rio_hw_get_inb_message - Fetch inbound message from the MPC85xx message unit
 690  * @mport: Master port implementing the inbound message unit
 691  * @mbox: Inbound mailbox number
 692  *
 693  * Gets the next available inbound message from the inbound message queue.
 694  * A pointer to the message is returned on success or NULL on failure.
 695  */
 696 void *rio_hw_get_inb_message(struct rio_mport *mport, int mbox)
 697 {
 698         u32 imr;
 699         u32 phys_buf, virt_buf;
 700         void *buf = NULL;
 701         int buf_idx;
 702
 703         phys_buf = in_be32((void *)&msg_regs->ifqdpar);
 704
 705         /* If no more messages, then bail out */
 706         if (phys_buf == in_be32((void *)&msg_regs->ifqepar))
 707                 goto out2;
 708
 709         virt_buf = (u32) msg_rx_ring.virt + (phys_buf - msg_rx_ring.phys);
 710         buf_idx = (phys_buf - msg_rx_ring.phys) / RIO_MAX_MSG_SIZE;
 711         buf = msg_rx_ring.virt_buffer[buf_idx];
 712
 713         if (!buf) {
 714                 printk(KERN_ERR
 715                        "RIO: inbound message copy failed, no buffers\n");
 716                 goto out1;
 717         }
 718
 719         /* Copy max message size, caller is expected to allocate that big */
 720         memcpy(buf, (void *)virt_buf, RIO_MAX_MSG_SIZE);
 721
 722         /* Clear the available buffer */
 723         msg_rx_ring.virt_buffer[buf_idx] = NULL;
 724
 725       out1:
 726         imr = in_be32((void *)&msg_regs->imr);
 727         out_be32((void *)&msg_regs->imr, imr | RIO_MSG_IMR_MI);
 728
 729       out2:
 730         return buf;
 731 }
 732
 733 EXPORT_SYMBOL_GPL(rio_hw_get_inb_message);
 734
 735 /**
 736  * mpc85xx_rio_dbell_handler - MPC85xx doorbell interrupt handler
 737  * @irq: Linux interrupt number
 738  * @dev_instance: Pointer to interrupt-specific data
 739  * @regs: Register context
 740  *
 741  * Handles doorbell interrupts. Parses a list of registered
 742  * doorbell event handlers and executes a matching event handler.
 743  */
 744 static irqreturn_t
 745 mpc85xx_rio_dbell_handler(int irq, void *dev_instance, struct pt_regs *regs)
 746 {
 747         int dsr;
 748         struct rio_mport *port = (struct rio_mport *)dev_instance;
 749
 750         dsr = in_be32((void *)&msg_regs->dsr);
 751
 752         if (dsr & DOORBELL_DSR_TE) {
 753                 pr_info("RIO: doorbell reception error\n");
 754                 out_be32((void *)&msg_regs->dsr, DOORBELL_DSR_TE);
 755                 goto out;
 756         }
 757
 758         if (dsr & DOORBELL_DSR_QFI) {
 759                 pr_info("RIO: doorbell queue full\n");
 760                 out_be32((void *)&msg_regs->dsr, DOORBELL_DSR_QFI);
 761                 goto out;
 762         }
 763
 764         /* XXX Need to check/dispatch until queue empty */
 765         if (dsr & DOORBELL_DSR_DIQI) {
 766                 u32 dmsg =
 767                     (u32) dbell_ring.virt +
 768                     (in_be32((void *)&msg_regs->dqdpar) & 0xfff);
 769                 u32 dmr;
 770                 struct rio_dbell *dbell;
 771                 int found = 0;
 772
 773                 pr_debug
 774                     ("RIO: processing doorbell, sid %2.2x tid %2.2x info %4.4x\n",
 775                      DBELL_SID(dmsg), DBELL_TID(dmsg), DBELL_INF(dmsg));
 776
 777                 list_for_each_entry(dbell, &port->dbells, node) {
 778                         if ((dbell->res->start <= DBELL_INF(dmsg)) &&
 779                             (dbell->res->end >= DBELL_INF(dmsg))) {
 780                                 found = 1;
 781                                 break;
 782                         }
 783                 }
 784                 if (found) {
 785                         dbell->dinb(port, dbell->dev_id, DBELL_SID(dmsg), DBELL_TID(dmsg),
 786                                     DBELL_INF(dmsg));
 787                 } else {
 788                         pr_debug
 789                             ("RIO: spurious doorbell, sid %2.2x tid %2.2x info %4.4x\n",
 790                              DBELL_SID(dmsg), DBELL_TID(dmsg), DBELL_INF(dmsg));
 791                 }
 792                 dmr = in_be32((void *)&msg_regs->dmr);
 793                 out_be32((void *)&msg_regs->dmr, dmr | DOORBELL_DMR_DI);
 794                 out_be32((void *)&msg_regs->dsr, DOORBELL_DSR_DIQI);
 795         }
 796
 797       out:
 798         return IRQ_HANDLED;
 799 }
 800
 801 /**
 802  * mpc85xx_rio_doorbell_init - MPC85xx doorbell interface init
 803  * @mport: Master port implementing the inbound doorbell unit
 804  *
 805  * Initializes doorbell unit hardware and inbound DMA buffer
 806  * ring. Called from mpc85xx_rio_setup(). Returns %0 on success
 807  * or %-ENOMEM on failure.
 808  */
 809 static int mpc85xx_rio_doorbell_init(struct rio_mport *mport)
 810 {
 811         int rc = 0;
 812
 813         /* Map outbound doorbell window immediately after maintenance window */
 814         if (!(dbell_win =
 815               (u32) ioremap(mport->iores.start + RIO_MAINT_WIN_SIZE,
 816                             RIO_DBELL_WIN_SIZE))) {
 817                 printk(KERN_ERR
 818                        "RIO: unable to map outbound doorbell window\n");
 819                 rc = -ENOMEM;
 820                 goto out;
 821         }
 822
 823         /* Initialize inbound doorbells */
 824         if (!(dbell_ring.virt = dma_alloc_coherent(NULL,
 825                                                    512 * DOORBELL_MESSAGE_SIZE,
 826                                                    &dbell_ring.phys,
 827                                                    GFP_KERNEL))) {
 828                 printk(KERN_ERR "RIO: unable allocate inbound doorbell ring\n");
 829                 rc = -ENOMEM;
 830                 iounmap((void *)dbell_win);
 831                 goto out;
 832         }
 833
 834         /* Point dequeue/enqueue pointers at first entry in ring */
 835         out_be32((void *)&msg_regs->dqdpar, (u32) dbell_ring.phys);
 836         out_be32((void *)&msg_regs->dqepar, (u32) dbell_ring.phys);
 837
 838         /* Clear interrupt status */
 839         out_be32((void *)&msg_regs->dsr, 0x00000091);
 840
 841         /* Hook up doorbell handler */
 842         if ((rc =
 843              request_irq(MPC85xx_IRQ_RIO_BELL, mpc85xx_rio_dbell_handler, 0,
 844                          "dbell_rx", (void *)mport) < 0)) {
 845                 iounmap((void *)dbell_win);
 846                 dma_free_coherent(NULL, 512 * DOORBELL_MESSAGE_SIZE,
 847                                   dbell_ring.virt, dbell_ring.phys);
 848                 printk(KERN_ERR
 849                        "MPC85xx RIO: unable to request inbound doorbell irq");
 850                 goto out;
 851         }
 852
 853         /* Configure doorbells for snooping, 512 entries, and enable */
 854         out_be32((void *)&msg_regs->dmr, 0x00108161);
 855
 856       out:
 857         return rc;
 858 }
 859
 860 static char *cmdline = NULL;
 861
 862 static int mpc85xx_rio_get_hdid(int index)
 863 {
 864         /* XXX Need to parse multiple entries in some format */
 865         if (!cmdline)
 866                 return -1;
 867
 868         return simple_strtol(cmdline, NULL, 0);
 869 }
 870
 871 static int mpc85xx_rio_get_cmdline(char *s)
 872 {
 873         if (!s)
 874                 return 0;
 875
 876         cmdline = s;
 877         return 1;
 878 }
 879
 880 __setup("riohdid=", mpc85xx_rio_get_cmdline);
 881
 882 /**
 883  * mpc85xx_rio_setup - Setup MPC85xx RapidIO interface
 884  * @law_start: Starting physical address of RapidIO LAW
 885  * @law_size: Size of RapidIO LAW
 886  *
 887  * Initializes MPC85xx RapidIO hardware interface, configures
 888  * master port with system-specific info, and registers the
 889  * master port with the RapidIO subsystem.
 890  */
 891 void mpc85xx_rio_setup(int law_start, int law_size)
 892 {
 893         struct rio_ops *ops;
 894         struct rio_mport *port;
 895
 896         ops = kmalloc(sizeof(struct rio_ops), GFP_KERNEL);
 897         ops->lcread = mpc85xx_local_config_read;
 898         ops->lcwrite = mpc85xx_local_config_write;
 899         ops->cread = mpc85xx_rio_config_read;
 900         ops->cwrite = mpc85xx_rio_config_write;
 901         ops->dsend = mpc85xx_rio_doorbell_send;
 902
 903         port = kmalloc(sizeof(struct rio_mport), GFP_KERNEL);
 904         port->id = 0;
 905         port->index = 0;
 906         INIT_LIST_HEAD(&port->dbells);
 907         port->iores.start = law_start;
 908         port->iores.end = law_start + law_size;
 909         port->iores.flags = IORESOURCE_MEM;
 910
 911         rio_init_dbell_res(&port->riores[RIO_DOORBELL_RESOURCE], 0, 0xffff);
 912         rio_init_mbox_res(&port->riores[RIO_INB_MBOX_RESOURCE], 0, 0);
 913         rio_init_mbox_res(&port->riores[RIO_OUTB_MBOX_RESOURCE], 0, 0);
 914         strcpy(port->name, "RIO0 mport");
 915
 916         port->ops = ops;
 917         port->host_deviceid = mpc85xx_rio_get_hdid(port->id);
 918
 919         rio_register_mport(port);
 920
 921         regs_win = (u32) ioremap(RIO_REGS_BASE, 0x20000);
 922         atmu_regs = (struct rio_atmu_regs *)(regs_win + RIO_ATMU_REGS_OFFSET);
 923         maint_atmu_regs = atmu_regs + 1;
 924         dbell_atmu_regs = atmu_regs + 2;
 925         msg_regs = (struct rio_msg_regs *)(regs_win + RIO_MSG_REGS_OFFSET);
 926
 927         /* Configure maintenance transaction window */
 928         out_be32((void *)&maint_atmu_regs->rowbar, 0x000c0000);
 929         out_be32((void *)&maint_atmu_regs->rowar, 0x80077015);
 930
 931         maint_win = (u32) ioremap(law_start, RIO_MAINT_WIN_SIZE);
 932
 933         /* Configure outbound doorbell window */
 934         out_be32((void *)&dbell_atmu_regs->rowbar, 0x000c0400);
 935         out_be32((void *)&dbell_atmu_regs->rowar, 0x8004200b);
 936         mpc85xx_rio_doorbell_init(port);
 937 }