Home | History | Annotate | Line # | Download | only in dev
crime.c revision 1.26
      1  1.26  macallan /*	$NetBSD: crime.c,v 1.26 2007/09/26 05:48:37 macallan Exp $	*/
      2   1.1     soren 
      3   1.1     soren /*
      4  1.17    sekiya  * Copyright (c) 2004 Christopher SEKIYA
      5   1.1     soren  * Copyright (c) 2000 Soren S. Jorvang
      6   1.1     soren  * All rights reserved.
      7   1.5    simonb  *
      8   1.1     soren  * Redistribution and use in source and binary forms, with or without
      9   1.1     soren  * modification, are permitted provided that the following conditions
     10   1.1     soren  * are met:
     11   1.1     soren  * 1. Redistributions of source code must retain the above copyright
     12   1.1     soren  *    notice, this list of conditions and the following disclaimer.
     13   1.1     soren  * 2. Redistributions in binary form must reproduce the above copyright
     14   1.1     soren  *    notice, this list of conditions and the following disclaimer in the
     15   1.1     soren  *    documentation and/or other materials provided with the distribution.
     16   1.1     soren  * 3. All advertising materials mentioning features or use of this software
     17   1.1     soren  *    must display the following acknowledgement:
     18   1.1     soren  *          This product includes software developed for the
     19  1.14    keihan  *          NetBSD Project.  See http://www.NetBSD.org/ for
     20   1.1     soren  *          information about NetBSD.
     21   1.1     soren  * 4. The name of the author may not be used to endorse or promote products
     22   1.1     soren  *    derived from this software without specific prior written permission.
     23   1.5    simonb  *
     24   1.1     soren  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     25   1.1     soren  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     26   1.1     soren  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     27   1.1     soren  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     28   1.1     soren  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     29   1.1     soren  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     30   1.1     soren  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     31   1.1     soren  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     32   1.1     soren  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     33   1.1     soren  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     34   1.1     soren  */
     35   1.1     soren 
     36   1.1     soren /*
     37   1.1     soren  * O2 CRIME
     38   1.1     soren  */
     39  1.12     lukem 
     40  1.12     lukem #include <sys/cdefs.h>
     41  1.26  macallan __KERNEL_RCSID(0, "$NetBSD: crime.c,v 1.26 2007/09/26 05:48:37 macallan Exp $");
     42   1.1     soren 
     43   1.1     soren #include <sys/param.h>
     44   1.1     soren #include <sys/device.h>
     45   1.1     soren #include <sys/systm.h>
     46  1.17    sekiya #include <sys/kernel.h>
     47  1.25      yamt #include <sys/cpu.h>
     48   1.1     soren 
     49   1.1     soren #include <machine/locore.h>
     50   1.1     soren #include <machine/autoconf.h>
     51   1.1     soren #include <machine/bus.h>
     52   1.2     soren #include <machine/intr.h>
     53   1.4   thorpej #include <machine/machtype.h>
     54  1.16    sekiya #include <machine/sysconf.h>
     55   1.1     soren 
     56  1.13   tsutsui #include <sgimips/dev/crimevar.h>
     57   1.1     soren #include <sgimips/dev/crimereg.h>
     58  1.18    sekiya #include <sgimips/mace/macevar.h>
     59   1.1     soren 
     60   1.1     soren #include "locators.h"
     61   1.1     soren 
     62  1.23  jmcneill #define CRIME_DISABLE_WATCHDOG
     63  1.23  jmcneill 
     64   1.1     soren static int	crime_match(struct device *, struct cfdata *, void *);
     65   1.1     soren static void	crime_attach(struct device *, struct device *, void *);
     66  1.17    sekiya void		crime_bus_reset(void);
     67  1.17    sekiya void		crime_watchdog_reset(void);
     68  1.17    sekiya void		crime_watchdog_disable(void);
     69  1.17    sekiya void		crime_intr(u_int32_t, u_int32_t, u_int32_t, u_int32_t);
     70  1.17    sekiya void		*crime_intr_establish(int, int, int (*)(void *), void *);
     71  1.17    sekiya extern	void  mace_intr(int); /* XXX */
     72   1.1     soren 
     73  1.17    sekiya static bus_space_tag_t crm_iot;
     74  1.17    sekiya static bus_space_handle_t crm_ioh;
     75  1.13   tsutsui 
     76  1.13   tsutsui CFATTACH_DECL(crime, sizeof(struct crime_softc),
     77   1.8   thorpej     crime_match, crime_attach, NULL, NULL);
     78   1.1     soren 
     79  1.10     rafal #define CRIME_NINTR 32 	/* XXX */
     80  1.10     rafal 
     81  1.10     rafal struct {
     82  1.10     rafal 	int	(*func)(void *);
     83  1.10     rafal 	void	*arg;
     84  1.10     rafal } crime[CRIME_NINTR];
     85  1.10     rafal 
     86   1.1     soren static int
     87  1.17    sekiya crime_match(struct device *parent, struct cfdata *match, void *aux)
     88   1.1     soren {
     89   1.1     soren 
     90   1.1     soren 	/*
     91   1.1     soren 	 * The CRIME is in the O2.
     92   1.1     soren 	 */
     93   1.4   thorpej 	if (mach_type == MACH_SGI_IP32)
     94   1.4   thorpej 		return (1);
     95   1.4   thorpej 
     96   1.4   thorpej 	return (0);
     97   1.1     soren }
     98   1.1     soren 
     99   1.1     soren static void
    100  1.17    sekiya crime_attach(struct device *parent, struct device *self, void *aux)
    101   1.1     soren {
    102   1.1     soren 	struct mainbus_attach_args *ma = aux;
    103   1.9     rafal 	u_int64_t crm_id;
    104  1.17    sekiya 	u_int64_t baseline;
    105  1.17    sekiya 	u_int32_t cps;
    106   1.1     soren 
    107  1.17    sekiya 	crm_iot = SGIMIPS_BUS_SPACE_CRIME;
    108  1.13   tsutsui 
    109  1.17    sekiya 	if (bus_space_map(crm_iot, ma->ma_addr, 0 /* XXX */,
    110  1.17    sekiya 	    BUS_SPACE_MAP_LINEAR, &crm_ioh))
    111  1.13   tsutsui 		panic("crime_attach: can't map I/O space");
    112  1.13   tsutsui 
    113  1.17    sekiya 	crm_id = bus_space_read_8(crm_iot, crm_ioh, CRIME_REV);
    114   1.1     soren 
    115  1.10     rafal 	aprint_naive(": system ASIC");
    116  1.10     rafal 
    117  1.11     rafal 	switch ((crm_id & CRIME_ID_IDBITS) >> CRIME_ID_IDSHIFT) {
    118   1.9     rafal 	case 0x0b:
    119   1.9     rafal 		aprint_normal(": rev 1.5");
    120   1.9     rafal 		break;
    121   1.1     soren 
    122   1.9     rafal 	case 0x0a:
    123   1.9     rafal 		if ((crm_id >> 32) == 0)
    124   1.9     rafal 			aprint_normal(": rev 1.1");
    125   1.9     rafal 		else if ((crm_id >> 32) == 1)
    126   1.9     rafal 			aprint_normal(": rev 1.3");
    127   1.9     rafal 		else
    128   1.9     rafal 			aprint_normal(": rev 1.4");
    129   1.9     rafal 		break;
    130   1.9     rafal 
    131   1.9     rafal 	case 0x00:
    132   1.9     rafal 		aprint_normal(": Petty CRIME");
    133   1.9     rafal 		break;
    134   1.1     soren 
    135   1.9     rafal 	default:
    136   1.9     rafal 		aprint_normal(": Unknown CRIME");
    137   1.9     rafal 		break;
    138   1.9     rafal 	}
    139   1.9     rafal 
    140   1.9     rafal 	aprint_normal(" (CRIME_ID: %llx)\n", crm_id);
    141  1.10     rafal 
    142  1.17    sekiya 	/* reset CRIME CPU & memory error registers */
    143  1.17    sekiya 	crime_bus_reset();
    144  1.17    sekiya 
    145  1.22   tsutsui 	bus_space_write_8(crm_iot, crm_ioh, CRIME_WATCHDOG, 0);
    146  1.22   tsutsui 	bus_space_write_8(crm_iot, crm_ioh, CRIME_CONTROL, 0);
    147  1.22   tsutsui 
    148  1.17    sekiya 	baseline = bus_space_read_8(crm_iot, crm_ioh, CRIME_TIME) & CRIME_TIME_MASK;
    149  1.17    sekiya 	cps = mips3_cp0_count_read();
    150  1.17    sekiya 
    151  1.17    sekiya 	while (((bus_space_read_8(crm_iot, crm_ioh, CRIME_TIME) & CRIME_TIME_MASK)
    152  1.17    sekiya 		- baseline) < 50 * 1000000 / 15)
    153  1.17    sekiya 		continue;
    154  1.17    sekiya 	cps = mips3_cp0_count_read() - cps;
    155  1.21   tsutsui 	cps = cps / 5;
    156  1.21   tsutsui 
    157  1.17    sekiya 	/* Counter on R4k/R4400/R4600/R5k counts at half the CPU frequency */
    158  1.17    sekiya 	curcpu()->ci_cpu_freq = cps * 2 * hz;
    159  1.17    sekiya 	curcpu()->ci_cycles_per_hz = curcpu()->ci_cpu_freq / (2 * hz);
    160  1.17    sekiya 	curcpu()->ci_divisor_delay = curcpu()->ci_cpu_freq / (2 * 1000000);
    161  1.21   tsutsui 	MIPS_SET_CI_RECIPRICAL(curcpu());
    162  1.17    sekiya 
    163  1.13   tsutsui 	/* Turn on memory error and crime error interrupts.
    164  1.13   tsutsui 	   All others turned on as devices are registered. */
    165  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_INTMASK,
    166  1.13   tsutsui 	    CRIME_INT_MEMERR |
    167  1.13   tsutsui 	    CRIME_INT_CRMERR |
    168  1.13   tsutsui 	    CRIME_INT_VICE |
    169  1.13   tsutsui 	    CRIME_INT_VID_OUT |
    170  1.13   tsutsui 	    CRIME_INT_VID_IN2 |
    171  1.13   tsutsui 	    CRIME_INT_VID_IN1);
    172  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_INTSTAT, 0);
    173  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_SOFTINT, 0);
    174  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_HARDINT, 0);
    175  1.17    sekiya 
    176  1.17    sekiya 	platform.bus_reset = crime_bus_reset;
    177  1.17    sekiya 	platform.watchdog_reset = crime_watchdog_reset;
    178  1.17    sekiya 	platform.watchdog_disable = crime_watchdog_disable;
    179  1.17    sekiya 	platform.watchdog_enable = crime_watchdog_reset;
    180  1.17    sekiya 	platform.intr_establish = crime_intr_establish;
    181  1.17    sekiya 	platform.intr0 = crime_intr;
    182   1.2     soren }
    183   1.2     soren 
    184   1.2     soren /*
    185  1.10     rafal  * XXX: sharing interrupts?
    186   1.2     soren  */
    187   1.2     soren 
    188   1.5    simonb void *
    189  1.17    sekiya crime_intr_establish(int irq, int level, int (*func)(void *), void *arg)
    190   1.2     soren {
    191  1.19    sekiya 	if (irq < 16)
    192  1.18    sekiya 		return mace_intr_establish(irq, level, func, arg);
    193  1.21   tsutsui 
    194  1.10     rafal 	if (crime[irq].func != NULL)
    195  1.10     rafal 		return NULL;	/* panic("Cannot share CRIME interrupts!"); */
    196   1.2     soren 
    197  1.10     rafal 	crime[irq].func = func;
    198  1.10     rafal 	crime[irq].arg = arg;
    199   1.2     soren 
    200  1.13   tsutsui 	crime_intr_mask(irq);
    201  1.13   tsutsui 
    202  1.10     rafal 	return (void *)&crime[irq];
    203   1.2     soren }
    204   1.2     soren 
    205   1.9     rafal void
    206  1.17    sekiya crime_intr(u_int32_t status, u_int32_t cause, u_int32_t pc, u_int32_t ipending)
    207   1.2     soren {
    208  1.17    sekiya 	u_int64_t crime_intmask;
    209  1.17    sekiya 	u_int64_t crime_intstat;
    210  1.17    sekiya 	u_int64_t crime_ipending;
    211   1.2     soren 	int i;
    212   1.2     soren 
    213  1.17    sekiya 	crime_intmask = bus_space_read_8(crm_iot, crm_ioh, CRIME_INTMASK);
    214  1.17    sekiya 	crime_intstat = bus_space_read_8(crm_iot, crm_ioh, CRIME_INTSTAT);
    215  1.17    sekiya 	crime_ipending = (crime_intstat & crime_intmask);
    216  1.17    sekiya 
    217  1.19    sekiya 	if (crime_ipending & 0xffff)
    218  1.19    sekiya 		mace_intr(crime_ipending & 0xffff);
    219  1.17    sekiya 
    220  1.21   tsutsui 	if (crime_ipending & 0xffff0000) {
    221  1.17    sekiya 	/*
    222  1.17    sekiya 	 * CRIME interrupts for CPU and memory errors
    223  1.17    sekiya 	 */
    224  1.17    sekiya 		if (crime_ipending & CRIME_INT_MEMERR) {
    225  1.17    sekiya 			u_int64_t address =
    226  1.17    sekiya 				bus_space_read_8(crm_iot, crm_ioh, CRIME_MEM_ERROR_ADDR);
    227  1.20    martin 			u_int64_t status1 =
    228  1.17    sekiya 				bus_space_read_8(crm_iot, crm_ioh, CRIME_MEM_ERROR_STAT);
    229  1.17    sekiya 			printf("crime: memory error address %llx"
    230  1.20    martin 				" status %llx\n", address << 2, status1);
    231  1.17    sekiya 			crime_bus_reset();
    232  1.17    sekiya 		}
    233  1.17    sekiya 
    234  1.17    sekiya 		if (crime_ipending & CRIME_INT_CRMERR) {
    235  1.17    sekiya 			u_int64_t stat =
    236  1.17    sekiya 				bus_space_read_8(crm_iot, crm_ioh, CRIME_CPU_ERROR_STAT);
    237  1.17    sekiya 				printf("crime: cpu error %llx at"
    238  1.17    sekiya 					" address %llx\n", stat,
    239  1.17    sekiya 					bus_space_read_8(crm_iot, crm_ioh, CRIME_CPU_ERROR_ADDR));
    240  1.17    sekiya 			crime_bus_reset();
    241  1.17    sekiya 		}
    242   1.2     soren 	}
    243  1.17    sekiya 
    244  1.24  jmcneill 	crime_ipending &= ~0xffff;
    245  1.17    sekiya 
    246  1.17    sekiya 	if (crime_ipending)
    247  1.24  jmcneill 		for (i = 16; i < CRIME_NINTR; i++) {
    248  1.17    sekiya 			if ((crime_ipending & (1 << i)) && crime[i].func != NULL)
    249  1.17    sekiya 				(*crime[i].func)(crime[i].arg);
    250  1.17    sekiya 		}
    251   1.9     rafal }
    252   1.2     soren 
    253  1.13   tsutsui void
    254  1.13   tsutsui crime_intr_mask(unsigned int intr)
    255  1.13   tsutsui {
    256  1.13   tsutsui 	u_int64_t mask;
    257  1.13   tsutsui 
    258  1.17    sekiya 	mask = bus_space_read_8(crm_iot, crm_ioh, CRIME_INTMASK);
    259  1.13   tsutsui 	mask |= (1 << intr);
    260  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_INTMASK, mask);
    261  1.17    sekiya }
    262  1.17    sekiya 
    263  1.17    sekiya void
    264  1.19    sekiya crime_intr_unmask(unsigned int intr)
    265  1.19    sekiya {
    266  1.19    sekiya 	u_int64_t mask;
    267  1.19    sekiya 
    268  1.19    sekiya 	mask = bus_space_read_8(crm_iot, crm_ioh, CRIME_INTMASK);
    269  1.19    sekiya 	mask &= ~(1 << intr);
    270  1.19    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_INTMASK, mask);
    271  1.19    sekiya }
    272  1.19    sekiya 
    273  1.19    sekiya void
    274  1.17    sekiya crime_bus_reset(void)
    275  1.17    sekiya {
    276  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_CPU_ERROR_STAT, 0);
    277  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_MEM_ERROR_STAT, 0);
    278  1.13   tsutsui }
    279  1.16    sekiya 
    280  1.16    sekiya void
    281  1.17    sekiya crime_watchdog_reset(void)
    282  1.16    sekiya {
    283  1.23  jmcneill #ifdef CRIME_WATCHDOG_DISABLE
    284  1.23  jmcneill 	bus_space_write_8(crm_iot, crm_ioh, CRIME_WATCHDOG, 0);
    285  1.23  jmcneill #else
    286  1.16    sekiya 	/* enable watchdog timer, clear it */
    287  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh,
    288  1.16    sekiya 		CRIME_CONTROL, CRIME_CONTROL_DOG_ENABLE);
    289  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_WATCHDOG, 0);
    290  1.23  jmcneill #endif
    291  1.16    sekiya }
    292  1.16    sekiya 
    293  1.17    sekiya void
    294  1.17    sekiya crime_watchdog_disable(void)
    295  1.17    sekiya {
    296  1.17    sekiya 	u_int64_t reg;
    297  1.17    sekiya 
    298  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_WATCHDOG, 0);
    299  1.21   tsutsui 	reg = bus_space_read_8(crm_iot, crm_ioh, CRIME_CONTROL)
    300  1.17    sekiya 			& ~CRIME_CONTROL_DOG_ENABLE;
    301  1.17    sekiya 	bus_space_write_8(crm_iot, crm_ioh, CRIME_CONTROL, reg);
    302  1.17    sekiya }
    303  1.26  macallan 
    304  1.26  macallan void
    305  1.26  macallan crime_reboot()
    306  1.26  macallan {
    307  1.26  macallan 
    308  1.26  macallan 	bus_space_write_8(crm_iot, crm_ioh,  CRIME_CONTROL,
    309  1.26  macallan 	    CRIME_CONTROL_HARD_RESET);
    310  1.26  macallan 	while(1);
    311  1.26  macallan }
    312