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