Home | History | Annotate | Line # | Download | only in vax 
      1 /*	$NetBSD: ka660.c,v 1.12 2017/05/22 16:46:15 ragge Exp $	*/
      2 /*
      3  * Copyright (c) 2000 Ludd, University of Lule}, Sweden.
      4  * All rights reserved.
      5  *
      6  * Redistribution and use in source and binary forms, with or without
      7  * modification, are permitted provided that the following conditions
      8  * are met:
      9  * 1. Redistributions of source code must retain the above copyright
     10  *    notice, this list of conditions and the following disclaimer.
     11  * 2. Redistributions in binary form must reproduce the above copyright
     12  *    notice, this list of conditions and the following disclaimer in the
     13  *    documentation and/or other materials provided with the distribution.
     14  *
     15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     18  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     20  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     21  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     22  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     24  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     25  */
     26 
     27 #include <sys/cdefs.h>
     28 __KERNEL_RCSID(0, "$NetBSD: ka660.c,v 1.12 2017/05/22 16:46:15 ragge Exp $");
     29 
     30 #include <sys/param.h>
     31 #include <sys/systm.h>
     32 #include <sys/cpu.h>
     33 #include <sys/device.h>
     34 #include <sys/kernel.h>
     35 
     36 #include <machine/sid.h>
     37 #include <machine/nexus.h>
     38 #include <machine/ka410.h>
     39 #include <machine/ka420.h>
     40 #include <machine/clock.h>
     41 #include <machine/vsbus.h>
     42 
     43 #define KA660_CCR	37		/* Cache Control Register */
     44 #define KA660_CTAG	0x20150000	/* Cache Tags */
     45 #define KA660_CDATA	0x20150400	/* Cache Data */
     46 #define KA660_BEHR	0x20150800	/* Bank Enable/Hit Register */
     47 #define CCR_WWP		8	/* Write Wrong Parity */
     48 #define CCR_ENA		4	/* Cache Enable */
     49 #define CCR_FLU 2	/* Cache Flush */
     50 #define CCR_DIA 1	/* Diagnostic mode */
     51 
     52 static void ka660_conf(void);
     53 static void ka660_memerr(void);
     54 static void ka660_cache_enable(void);
     55 static void ka660_attach_cpu(device_t);
     56 static int ka660_mchk(void *);
     57 
     58 static const char * const ka660_devs[] = { "cpu", "sgec", "shac", "uba", NULL };
     59 
     60 /*
     61  * Declaration of 660-specific calls.
     62  */
     63 const struct cpu_dep ka660_calls = {
     64 	.cpu_steal_pages = ka660_cache_enable,	/* ewww */
     65 	.cpu_mchk	= ka660_mchk,
     66 	.cpu_memerr	= ka660_memerr,
     67 	.cpu_conf	= ka660_conf,
     68 	.cpu_gettime	= generic_gettime,
     69 	.cpu_settime	= generic_settime,
     70 	.cpu_vups	= 6,	/* ~VUPS */
     71 	.cpu_scbsz	= 2,	/* SCB pages */
     72 	.cpu_halt	= generic_halt,
     73 	.cpu_reboot	= generic_reboot,
     74 	.cpu_devs	= ka660_devs,
     75 	.cpu_attach_cpu	= ka660_attach_cpu,
     76 };
     77 
     78 
     79 void
     80 ka660_conf(void)
     81 {
     82 	cpmbx = (struct cpmbx *)vax_map_physmem(0x20140400, 1);
     83 }
     84 
     85 void
     86 ka660_attach_cpu(device_t self)
     87 {
     88 	aprint_normal(
     89 	    ": %s, SOC (ucode rev. %d), 6KB L1 cache\n",
     90 	    "KA660",
     91 	    vax_cpudata & 0377);
     92 }
     93 
     94 void
     95 ka660_cache_enable(void)
     96 {
     97 	unsigned int *p;
     98 	int cnt, bnk, behrtmp;
     99 
    100 	mtpr(0, KA660_CCR);	/* Disable cache */
    101 	mtpr(CCR_DIA, KA660_CCR);	/* Switch to diag mode */
    102 	bnk = 1;
    103 	behrtmp = 0;
    104 	while(bnk <= 0x80)
    105 	{
    106 		*(int *)KA660_BEHR = bnk;
    107 		p = (int *)KA660_CDATA;
    108 		*p = 0x55aaff00L;
    109 		if(*p == 0x55aaff00L) behrtmp |= bnk;
    110 		*p = 0xffaa0055L;
    111 		if(*p != 0xffaa0055L) behrtmp &= ~bnk;
    112 		cnt = 256;
    113 		while(cnt--) *p++ = 0L;
    114 		p = (int *) KA660_CTAG;
    115 		cnt =128;
    116 		while(cnt--) { *p++ = 0x80000000L; p++; }
    117 		bnk <<= 1;
    118 	}
    119 	*(int *)KA660_BEHR = behrtmp;
    120 
    121 	mtpr(CCR_DIA|CCR_FLU, KA660_CCR);	/* Flush tags */
    122 	mtpr(CCR_ENA, KA660_CCR);	/* Enable cache */
    123 }
    124 
    125 void
    126 ka660_memerr(void)
    127 {
    128 	printf("Memory err!\n");
    129 }
    130 
    131 int
    132 ka660_mchk(void *addr)
    133 {
    134 	panic("Machine check");
    135 	return 0;
    136 }
    137