Merge branch 'from-linus' into upstream
[linux-2.6] / 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 }