arch/mips/jmr3927/rbhma3100/irq.c

   1 /*
   2  * Copyright 2001 MontaVista Software Inc.
   3  * Author: MontaVista Software, Inc.
   4  *              ahennessy@mvista.com
   5  *
   6  * This file is subject to the terms and conditions of the GNU General Public
   7  * License.  See the file "COPYING" in the main directory of this archive
   8  * for more details.
   9  *
  10  * Copyright (C) 2000-2001 Toshiba Corporation
  11  *
  12  *  This program is free software; you can redistribute  it and/or modify it
  13  *  under  the terms of  the GNU General  Public License as published by the
  14  *  Free Software Foundation;  either version 2 of the  License, or (at your
  15  *  option) any later version.
  16  *
  17  *  THIS  SOFTWARE  IS PROVIDED   ``AS  IS'' AND   ANY  EXPRESS OR IMPLIED
  18  *  WARRANTIES,   INCLUDING, BUT NOT  LIMITED  TO, THE IMPLIED WARRANTIES OF
  19  *  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN
  20  *  NO  EVENT  SHALL   THE AUTHOR  BE    LIABLE FOR ANY   DIRECT, INDIRECT,
  21  *  INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22  *  NOT LIMITED   TO, PROCUREMENT OF  SUBSTITUTE GOODS  OR SERVICES; LOSS OF
  23  *  USE, DATA,  OR PROFITS; OR  BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
  24  *  ANY THEORY OF LIABILITY, WHETHER IN  CONTRACT, STRICT LIABILITY, OR TORT
  25  *  (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26  *  THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27  *
  28  *  You should have received a copy of the  GNU General Public License along
  29  *  with this program; if not, write  to the Free Software Foundation, Inc.,
  30  *  675 Mass Ave, Cambridge, MA 02139, USA.
  31  */
  32 #include <linux/init.h>
  33
  34 #include <linux/errno.h>
  35 #include <linux/irq.h>
  36 #include <linux/kernel_stat.h>
  37 #include <linux/signal.h>
  38 #include <linux/sched.h>
  39 #include <linux/types.h>
  40 #include <linux/interrupt.h>
  41 #include <linux/ioport.h>
  42 #include <linux/timex.h>
  43 #include <linux/slab.h>
  44 #include <linux/random.h>
  45 #include <linux/smp.h>
  46 #include <linux/smp_lock.h>
  47 #include <linux/bitops.h>
  48
  49 #include <asm/io.h>
  50 #include <asm/mipsregs.h>
  51 #include <asm/system.h>
  52
  53 #include <asm/ptrace.h>
  54 #include <asm/processor.h>
  55 #include <asm/jmr3927/irq.h>
  56 #include <asm/debug.h>
  57 #include <asm/jmr3927/jmr3927.h>
  58
  59 #if JMR3927_IRQ_END > NR_IRQS
  60 #error JMR3927_IRQ_END > NR_IRQS
  61 #endif
  62
  63 struct tb_irq_space* tb_irq_spaces;
  64
  65 static int jmr3927_irq_base = -1;
  66
  67 #ifdef CONFIG_PCI
  68 static int jmr3927_gen_iack(void)
  69 {
  70         /* generate ACK cycle */
  71 #ifdef __BIG_ENDIAN
  72         return (tx3927_pcicptr->iiadp >> 24) & 0xff;
  73 #else
  74         return tx3927_pcicptr->iiadp & 0xff;
  75 #endif
  76 }
  77 #endif
  78
  79 #define irc_dlevel      0
  80 #define irc_elevel      1
  81
  82 static unsigned char irc_level[TX3927_NUM_IR] = {
  83         5, 5, 5, 5, 5, 5,       /* INT[5:0] */
  84         7, 7,                   /* SIO */
  85         5, 5, 5, 0, 0,          /* DMA, PIO, PCI */
  86         6, 6, 6                 /* TMR */
  87 };
  88
  89 static void jmr3927_irq_disable(unsigned int irq_nr);
  90 static void jmr3927_irq_enable(unsigned int irq_nr);
  91
  92 static DEFINE_SPINLOCK(jmr3927_irq_lock);
  93
  94 static unsigned int jmr3927_irq_startup(unsigned int irq)
  95 {
  96         jmr3927_irq_enable(irq);
  97
  98         return 0;
  99 }
 100
 101 #define jmr3927_irq_shutdown    jmr3927_irq_disable
 102
 103 static void jmr3927_irq_ack(unsigned int irq)
 104 {
 105         if (irq == JMR3927_IRQ_IRC_TMR0)
 106                 jmr3927_tmrptr->tisr = 0;       /* ack interrupt */
 107
 108         jmr3927_irq_disable(irq);
 109 }
 110
 111 static void jmr3927_irq_end(unsigned int irq)
 112 {
 113         if (!(irq_desc[irq].status & (IRQ_DISABLED | IRQ_INPROGRESS)))
 114                 jmr3927_irq_enable(irq);
 115 }
 116
 117 static void jmr3927_irq_disable(unsigned int irq_nr)
 118 {
 119         struct tb_irq_space* sp;
 120         unsigned long flags;
 121
 122         spin_lock_irqsave(&jmr3927_irq_lock, flags);
 123         for (sp = tb_irq_spaces; sp; sp = sp->next) {
 124                 if (sp->start_irqno <= irq_nr &&
 125                     irq_nr < sp->start_irqno + sp->nr_irqs) {
 126                         if (sp->mask_func)
 127                                 sp->mask_func(irq_nr - sp->start_irqno,
 128                                               sp->space_id);
 129                         break;
 130                 }
 131         }
 132         spin_unlock_irqrestore(&jmr3927_irq_lock, flags);
 133 }
 134
 135 static void jmr3927_irq_enable(unsigned int irq_nr)
 136 {
 137         struct tb_irq_space* sp;
 138         unsigned long flags;
 139
 140         spin_lock_irqsave(&jmr3927_irq_lock, flags);
 141         for (sp = tb_irq_spaces; sp; sp = sp->next) {
 142                 if (sp->start_irqno <= irq_nr &&
 143                     irq_nr < sp->start_irqno + sp->nr_irqs) {
 144                         if (sp->unmask_func)
 145                                 sp->unmask_func(irq_nr - sp->start_irqno,
 146                                                 sp->space_id);
 147                         break;
 148                 }
 149         }
 150         spin_unlock_irqrestore(&jmr3927_irq_lock, flags);
 151 }
 152
 153 /*
 154  * CP0_STATUS is a thread's resource (saved/restored on context switch).
 155  * So disable_irq/enable_irq MUST handle IOC/ISAC/IRC registers.
 156  */
 157 static void mask_irq_isac(int irq_nr, int space_id)
 158 {
 159         /* 0: mask */
 160         unsigned char imask =
 161                 jmr3927_isac_reg_in(JMR3927_ISAC_INTM_ADDR);
 162         unsigned int bit  = 1 << irq_nr;
 163         jmr3927_isac_reg_out(imask & ~bit, JMR3927_ISAC_INTM_ADDR);
 164         /* flush write buffer */
 165         (void)jmr3927_ioc_reg_in(JMR3927_IOC_REV_ADDR);
 166 }
 167 static void unmask_irq_isac(int irq_nr, int space_id)
 168 {
 169         /* 0: mask */
 170         unsigned char imask = jmr3927_isac_reg_in(JMR3927_ISAC_INTM_ADDR);
 171         unsigned int bit  = 1 << irq_nr;
 172         jmr3927_isac_reg_out(imask | bit, JMR3927_ISAC_INTM_ADDR);
 173         /* flush write buffer */
 174         (void)jmr3927_ioc_reg_in(JMR3927_IOC_REV_ADDR);
 175 }
 176
 177 static void mask_irq_ioc(int irq_nr, int space_id)
 178 {
 179         /* 0: mask */
 180         unsigned char imask = jmr3927_ioc_reg_in(JMR3927_IOC_INTM_ADDR);
 181         unsigned int bit = 1 << irq_nr;
 182         jmr3927_ioc_reg_out(imask & ~bit, JMR3927_IOC_INTM_ADDR);
 183         /* flush write buffer */
 184         (void)jmr3927_ioc_reg_in(JMR3927_IOC_REV_ADDR);
 185 }
 186 static void unmask_irq_ioc(int irq_nr, int space_id)
 187 {
 188         /* 0: mask */
 189         unsigned char imask = jmr3927_ioc_reg_in(JMR3927_IOC_INTM_ADDR);
 190         unsigned int bit = 1 << irq_nr;
 191         jmr3927_ioc_reg_out(imask | bit, JMR3927_IOC_INTM_ADDR);
 192         /* flush write buffer */
 193         (void)jmr3927_ioc_reg_in(JMR3927_IOC_REV_ADDR);
 194 }
 195
 196 static void mask_irq_irc(int irq_nr, int space_id)
 197 {
 198         volatile unsigned long *ilrp = &tx3927_ircptr->ilr[irq_nr / 2];
 199         if (irq_nr & 1)
 200                 *ilrp = (*ilrp & 0x00ff) | (irc_dlevel << 8);
 201         else
 202                 *ilrp = (*ilrp & 0xff00) | irc_dlevel;
 203         /* update IRCSR */
 204         tx3927_ircptr->imr = 0;
 205         tx3927_ircptr->imr = irc_elevel;
 206         /* flush write buffer */
 207         (void)tx3927_ircptr->ssr;
 208 }
 209
 210 static void unmask_irq_irc(int irq_nr, int space_id)
 211 {
 212         volatile unsigned long *ilrp = &tx3927_ircptr->ilr[irq_nr / 2];
 213         if (irq_nr & 1)
 214                 *ilrp = (*ilrp & 0x00ff) | (irc_level[irq_nr] << 8);
 215         else
 216                 *ilrp = (*ilrp & 0xff00) | irc_level[irq_nr];
 217         /* update IRCSR */
 218         tx3927_ircptr->imr = 0;
 219         tx3927_ircptr->imr = irc_elevel;
 220 }
 221
 222 struct tb_irq_space jmr3927_isac_irqspace = {
 223         .next = NULL,
 224         .start_irqno = JMR3927_IRQ_ISAC,
 225         nr_irqs : JMR3927_NR_IRQ_ISAC,
 226         .mask_func = mask_irq_isac,
 227         .unmask_func = unmask_irq_isac,
 228         .name = "ISAC",
 229         .space_id = 0,
 230         can_share : 0
 231 };
 232 struct tb_irq_space jmr3927_ioc_irqspace = {
 233         .next = NULL,
 234         .start_irqno = JMR3927_IRQ_IOC,
 235         nr_irqs : JMR3927_NR_IRQ_IOC,
 236         .mask_func = mask_irq_ioc,
 237         .unmask_func = unmask_irq_ioc,
 238         .name = "IOC",
 239         .space_id = 0,
 240         can_share : 1
 241 };
 242 struct tb_irq_space jmr3927_irc_irqspace = {
 243         .next = NULL,
 244         .start_irqno = JMR3927_IRQ_IRC,
 245         nr_irqs : JMR3927_NR_IRQ_IRC,
 246         .mask_func = mask_irq_irc,
 247         .unmask_func = unmask_irq_irc,
 248         .name = "on-chip",
 249         .space_id = 0,
 250         can_share : 0
 251 };
 252
 253 void jmr3927_spurious(struct pt_regs *regs)
 254 {
 255 #ifdef CONFIG_TX_BRANCH_LIKELY_BUG_WORKAROUND
 256         tx_branch_likely_bug_fixup(regs);
 257 #endif
 258         printk(KERN_WARNING "spurious interrupt (cause 0x%lx, pc 0x%lx, ra 0x%lx).\n",
 259                regs->cp0_cause, regs->cp0_epc, regs->regs[31]);
 260 }
 261
 262 asmlinkage void plat_irq_dispatch(struct pt_regs *regs)
 263 {
 264         int irq;
 265
 266 #ifdef CONFIG_TX_BRANCH_LIKELY_BUG_WORKAROUND
 267         tx_branch_likely_bug_fixup(regs);
 268 #endif
 269         if ((regs->cp0_cause & CAUSEF_IP7) == 0) {
 270 #if 0
 271                 jmr3927_spurious(regs);
 272 #endif
 273                 return;
 274         }
 275         irq = (regs->cp0_cause >> CAUSEB_IP2) & 0x0f;
 276
 277         do_IRQ(irq + JMR3927_IRQ_IRC, regs);
 278 }
 279
 280 static irqreturn_t jmr3927_ioc_interrupt(int irq, void *dev_id, struct pt_regs *regs)
 281 {
 282         unsigned char istat = jmr3927_ioc_reg_in(JMR3927_IOC_INTS2_ADDR);
 283         int i;
 284
 285         for (i = 0; i < JMR3927_NR_IRQ_IOC; i++) {
 286                 if (istat & (1 << i)) {
 287                         irq = JMR3927_IRQ_IOC + i;
 288                         do_IRQ(irq, regs);
 289                 }
 290         }
 291         return IRQ_HANDLED;
 292 }
 293
 294 static struct irqaction ioc_action = {
 295         jmr3927_ioc_interrupt, 0, CPU_MASK_NONE, "IOC", NULL, NULL,
 296 };
 297
 298 static irqreturn_t jmr3927_isac_interrupt(int irq, void *dev_id, struct pt_regs *regs)
 299 {
 300         unsigned char istat = jmr3927_isac_reg_in(JMR3927_ISAC_INTS2_ADDR);
 301         int i;
 302
 303         for (i = 0; i < JMR3927_NR_IRQ_ISAC; i++) {
 304                 if (istat & (1 << i)) {
 305                         irq = JMR3927_IRQ_ISAC + i;
 306                         do_IRQ(irq, regs);
 307                 }
 308         }
 309         return IRQ_HANDLED;
 310 }
 311
 312 static struct irqaction isac_action = {
 313         jmr3927_isac_interrupt, 0, CPU_MASK_NONE, "ISAC", NULL, NULL,
 314 };
 315
 316
 317 static irqreturn_t jmr3927_isaerr_interrupt(int irq, void * dev_id, struct pt_regs * regs)
 318 {
 319         printk(KERN_WARNING "ISA error interrupt (irq 0x%x).\n", irq);
 320
 321         return IRQ_HANDLED;
 322 }
 323 static struct irqaction isaerr_action = {
 324         jmr3927_isaerr_interrupt, 0, CPU_MASK_NONE, "ISA error", NULL, NULL,
 325 };
 326
 327 static irqreturn_t jmr3927_pcierr_interrupt(int irq, void * dev_id, struct pt_regs * regs)
 328 {
 329         printk(KERN_WARNING "PCI error interrupt (irq 0x%x).\n", irq);
 330         printk(KERN_WARNING "pcistat:%02x, lbstat:%04lx\n",
 331                tx3927_pcicptr->pcistat, tx3927_pcicptr->lbstat);
 332
 333         return IRQ_HANDLED;
 334 }
 335 static struct irqaction pcierr_action = {
 336         jmr3927_pcierr_interrupt, 0, CPU_MASK_NONE, "PCI error", NULL, NULL,
 337 };
 338
 339 int jmr3927_ether1_irq = 0;
 340
 341 void jmr3927_irq_init(u32 irq_base);
 342
 343 void __init arch_init_irq(void)
 344 {
 345         /* look for io board's presence */
 346         int have_isac = jmr3927_have_isac();
 347
 348         /* Now, interrupt control disabled, */
 349         /* all IRC interrupts are masked, */
 350         /* all IRC interrupt mode are Low Active. */
 351
 352         if (have_isac) {
 353
 354                 /* ETHER1 (NE2000 compatible 10M-Ether) parameter setup */
 355                 /* temporary enable interrupt control */
 356                 tx3927_ircptr->cer = 1;
 357                 /* ETHER1 Int. Is High-Active. */
 358                 if (tx3927_ircptr->ssr & (1 << 0))
 359                         jmr3927_ether1_irq = JMR3927_IRQ_IRC_INT0;
 360 #if 0   /* INT3 may be asserted by ether0 (even after reboot...) */
 361                 else if (tx3927_ircptr->ssr & (1 << 3))
 362                         jmr3927_ether1_irq = JMR3927_IRQ_IRC_INT3;
 363 #endif
 364                 /* disable interrupt control */
 365                 tx3927_ircptr->cer = 0;
 366
 367                 /* Ether1: High Active */
 368                 if (jmr3927_ether1_irq) {
 369                         int ether1_irc = jmr3927_ether1_irq - JMR3927_IRQ_IRC;
 370                         tx3927_ircptr->cr[ether1_irc / 8] |=
 371                                 TX3927_IRCR_HIGH << ((ether1_irc % 8) * 2);
 372                 }
 373         }
 374
 375         /* mask all IOC interrupts */
 376         jmr3927_ioc_reg_out(0, JMR3927_IOC_INTM_ADDR);
 377         /* setup IOC interrupt mode (SOFT:High Active, Others:Low Active) */
 378         jmr3927_ioc_reg_out(JMR3927_IOC_INTF_SOFT, JMR3927_IOC_INTP_ADDR);
 379
 380         if (have_isac) {
 381                 /* mask all ISAC interrupts */
 382                 jmr3927_isac_reg_out(0, JMR3927_ISAC_INTM_ADDR);
 383                 /* setup ISAC interrupt mode (ISAIRQ3,ISAIRQ5:Low Active ???) */
 384                 jmr3927_isac_reg_out(JMR3927_ISAC_INTF_IRQ3|JMR3927_ISAC_INTF_IRQ5, JMR3927_ISAC_INTP_ADDR);
 385         }
 386
 387         /* clear PCI Soft interrupts */
 388         jmr3927_ioc_reg_out(0, JMR3927_IOC_INTS1_ADDR);
 389         /* clear PCI Reset interrupts */
 390         jmr3927_ioc_reg_out(0, JMR3927_IOC_RESET_ADDR);
 391
 392         /* enable interrupt control */
 393         tx3927_ircptr->cer = TX3927_IRCER_ICE;
 394         tx3927_ircptr->imr = irc_elevel;
 395
 396         jmr3927_irq_init(NR_ISA_IRQS);
 397
 398         /* setup irq space */
 399         add_tb_irq_space(&jmr3927_isac_irqspace);
 400         add_tb_irq_space(&jmr3927_ioc_irqspace);
 401         add_tb_irq_space(&jmr3927_irc_irqspace);
 402
 403         /* setup IOC interrupt 1 (PCI, MODEM) */
 404         setup_irq(JMR3927_IRQ_IOCINT, &ioc_action);
 405
 406         if (have_isac) {
 407                 setup_irq(JMR3927_IRQ_ISACINT, &isac_action);
 408                 setup_irq(JMR3927_IRQ_ISAC_ISAER, &isaerr_action);
 409         }
 410
 411 #ifdef CONFIG_PCI
 412         setup_irq(JMR3927_IRQ_IRC_PCI, &pcierr_action);
 413 #endif
 414
 415         /* enable all CPU interrupt bits. */
 416         set_c0_status(ST0_IM);  /* IE bit is still 0. */
 417 }
 418
 419 static hw_irq_controller jmr3927_irq_controller = {
 420         .typename = "jmr3927_irq",
 421         .startup = jmr3927_irq_startup,
 422         .shutdown = jmr3927_irq_shutdown,
 423         .enable = jmr3927_irq_enable,
 424         .disable = jmr3927_irq_disable,
 425         .ack = jmr3927_irq_ack,
 426         .end = jmr3927_irq_end,
 427 };
 428
 429 void jmr3927_irq_init(u32 irq_base)
 430 {
 431         u32 i;
 432
 433         for (i= irq_base; i< irq_base + JMR3927_NR_IRQ_IRC + JMR3927_NR_IRQ_IOC; i++) {
 434                 irq_desc[i].status = IRQ_DISABLED;
 435                 irq_desc[i].action = NULL;
 436                 irq_desc[i].depth = 1;
 437                 irq_desc[i].chip = &jmr3927_irq_controller;
 438         }
 439
 440         jmr3927_irq_base = irq_base;
 441 }
 442
 443 #ifdef CONFIG_TX_BRANCH_LIKELY_BUG_WORKAROUND
 444 static int tx_branch_likely_bug_count = 0;
 445 static int have_tx_branch_likely_bug = 0;
 446 void tx_branch_likely_bug_fixup(struct pt_regs *regs)
 447 {
 448         /* TX39/49-BUG: Under this condition, the insn in delay slot
 449            of the branch likely insn is executed (not nullified) even
 450            the branch condition is false. */
 451         if (!have_tx_branch_likely_bug)
 452                 return;
 453         if ((regs->cp0_epc & 0xfff) == 0xffc &&
 454             KSEGX(regs->cp0_epc) != KSEG0 &&
 455             KSEGX(regs->cp0_epc) != KSEG1) {
 456                 unsigned int insn = *(unsigned int*)(regs->cp0_epc - 4);
 457                 /* beql,bnel,blezl,bgtzl */
 458                 /* bltzl,bgezl,blezall,bgezall */
 459                 /* bczfl, bcztl */
 460                 if ((insn & 0xf0000000) == 0x50000000 ||
 461                     (insn & 0xfc0e0000) == 0x04020000 ||
 462                     (insn & 0xf3fe0000) == 0x41020000) {
 463                         regs->cp0_epc -= 4;
 464                         tx_branch_likely_bug_count++;
 465                         printk(KERN_INFO
 466                                "fix branch-likery bug in %s (insn %08x)\n",
 467                                current->comm, insn);
 468                 }
 469         }
 470 }
 471 #endif