NetBSD/sys/arch/powerpc/ibm4xx/cpu.c

301 lines
8.1 KiB
C

/* $NetBSD: cpu.c,v 1.19 2005/06/03 11:59:17 scw Exp $ */
/*
* Copyright 2001 Wasabi Systems, Inc.
* All rights reserved.
*
* Written by Eduardo Horvath and Simon Burge for Wasabi Systems, Inc.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed for the NetBSD Project by
* Wasabi Systems, Inc.
* 4. The name of Wasabi Systems, Inc. may not be used to endorse
* or promote products derived from this software without specific prior
* written permission.
*
* THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: cpu.c,v 1.19 2005/06/03 11:59:17 scw Exp $");
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/device.h>
#include <sys/properties.h>
#include <uvm/uvm_extern.h>
#include <machine/cpu.h>
#include <powerpc/ibm4xx/dev/plbvar.h>
struct cputab {
int version;
const char *name;
};
static struct cputab models[] = {
{ PVR_401A1 >> 16, "401A1" },
{ PVR_401B2 >> 16, "401B21" },
{ PVR_401C2 >> 16, "401C2" },
{ PVR_401D2 >> 16, "401D2" },
{ PVR_401E2 >> 16, "401E2" },
{ PVR_401F2 >> 16, "401F2" },
{ PVR_401G2 >> 16, "401G2" },
{ PVR_403 >> 16, "403" },
{ PVR_405GP >> 16, "405GP" },
{ PVR_405GPR >> 16, "405GPr" },
{ 0, NULL }
};
static int cpumatch(struct device *, struct cfdata *, void *);
static void cpuattach(struct device *, struct device *, void *);
CFATTACH_DECL(cpu, sizeof(struct device),
cpumatch, cpuattach, NULL, NULL);
int ncpus;
struct cpu_info cpu_info[1];
char cpu_model[80];
int cpufound = 0;
static int
cpumatch(struct device *parent, struct cfdata *cf, void *aux)
{
struct plb_attach_args *paa = aux;
/* make sure that we're looking for a CPU */
if (strcmp(paa->plb_name, cf->cf_name) != 0)
return (0);
return !cpufound;
}
static void
cpuattach(struct device *parent, struct device *self, void *aux)
{
int pvr, cpu;
int own, pcf, cas, pcl, aid;
struct cputab *cp = models;
unsigned int processor_freq;
if (board_info_get("processor-frequency",
&processor_freq, sizeof(processor_freq)) == -1)
panic("no processor-frequency");
cpufound++;
ncpus++;
asm ("mfpvr %0" : "=r"(pvr));
cpu = pvr >> 16;
/* Break PVR up into separate fields and print them out. */
own = (pvr >> 20) & 0xfff;
pcf = (pvr >> 16) & 0xf;
cas = (pvr >> 10) & 0x3f;
pcl = (pvr >> 6) & 0xf;
aid = pvr & 0x3f;
while (cp->name) {
if (cp->version == cpu)
break;
cp++;
}
if (cp->name)
strcpy(cpu_model, cp->name);
else
sprintf(cpu_model, "Version 0x%x", cpu);
sprintf(cpu_model + strlen(cpu_model), " (Revision %d.%d)",
(pvr >> 8) & 0xff, pvr & 0xff);
#if 1
printf(": %dMHz %s\n", processor_freq / 1000 / 1000,
cpu_model);
#endif
cpu_probe_cache();
printf("Instruction cache size %d line size %d\n",
curcpu()->ci_ci.icache_size, curcpu()->ci_ci.icache_line_size);
printf("Data cache size %d line size %d\n",
curcpu()->ci_ci.dcache_size, curcpu()->ci_ci.dcache_line_size);
#ifdef DEBUG
/* It sux that the cache info here is useless. */
printf("PVR: owner %x core family %x cache %x version %x asic %x\n",
own, pcf, cas, pcl, aid);
#endif
}
/*
* This routine must be explicitly called to initialize the
* CPU cache information so cache flushe and memcpy operation
* work.
*/
void
cpu_probe_cache()
{
int pvr;
/*
* First we need to identify the CPU and determine the
* cache line size, or things like memset/memcpy may lose
* badly.
*/
__asm __volatile("mfpvr %0" : "=r" (pvr));
switch (pvr & 0xffff0000) {
case PVR_401A1:
curcpu()->ci_ci.dcache_size = 1024;
curcpu()->ci_ci.dcache_line_size = 16;
curcpu()->ci_ci.icache_size = 2848;
curcpu()->ci_ci.icache_line_size = 16;
break;
case PVR_401B2:
curcpu()->ci_ci.dcache_size = 8192;
curcpu()->ci_ci.dcache_line_size = 16;
curcpu()->ci_ci.icache_size = 16384;
curcpu()->ci_ci.icache_line_size = 16;
break;
case PVR_401C2:
curcpu()->ci_ci.dcache_size = 8192;
curcpu()->ci_ci.dcache_line_size = 16;
curcpu()->ci_ci.icache_size = 0;
curcpu()->ci_ci.icache_line_size = 16;
break;
case PVR_401D2:
curcpu()->ci_ci.dcache_size = 2848;
curcpu()->ci_ci.dcache_line_size = 16;
curcpu()->ci_ci.icache_size = 4096;
curcpu()->ci_ci.icache_line_size = 16;
break;
case PVR_401E2:
curcpu()->ci_ci.dcache_size = 0;
curcpu()->ci_ci.dcache_line_size = 16;
curcpu()->ci_ci.icache_size = 0;
curcpu()->ci_ci.icache_line_size = 16;
break;
case PVR_401F2:
curcpu()->ci_ci.dcache_size = 2048;
curcpu()->ci_ci.dcache_line_size = 16;
curcpu()->ci_ci.icache_size = 2848;
curcpu()->ci_ci.icache_line_size = 16;
break;
case PVR_401G2:
curcpu()->ci_ci.dcache_size = 2848;
curcpu()->ci_ci.dcache_line_size = 16;
curcpu()->ci_ci.icache_size = 8192;
curcpu()->ci_ci.icache_line_size = 16;
break;
case PVR_403:
curcpu()->ci_ci.dcache_size = 8192;
curcpu()->ci_ci.dcache_line_size = 16;
curcpu()->ci_ci.icache_size = 16384;
curcpu()->ci_ci.icache_line_size = 16;
break;
case PVR_405GP:
curcpu()->ci_ci.dcache_size = 8192;
curcpu()->ci_ci.dcache_line_size = 32;
curcpu()->ci_ci.icache_size = 8192;
curcpu()->ci_ci.icache_line_size = 32;
break;
case PVR_405GPR:
curcpu()->ci_ci.dcache_size = 16384;
curcpu()->ci_ci.dcache_line_size = 32;
curcpu()->ci_ci.icache_size = 16384;
curcpu()->ci_ci.icache_line_size = 32;
break;
default:
/*
* Unknown CPU type. For safety we'll specify a
* cache with a 4-byte line size. That way cache
* flush routines won't miss any lines.
*/
curcpu()->ci_ci.dcache_line_size = 4;
curcpu()->ci_ci.icache_line_size = 4;
break;
}
}
/*
* These small routines may have to be replaced,
* if/when we support processors other that the 604.
*/
void
dcache_flush_page(vaddr_t va)
{
int i;
if (curcpu()->ci_ci.dcache_line_size)
for (i = 0; i < PAGE_SIZE;
i += curcpu()->ci_ci.dcache_line_size)
asm volatile("dcbf %0,%1" : : "r" (va), "r" (i));
asm volatile("sync;isync" : : );
}
void
icache_flush_page(vaddr_t va)
{
int i;
if (curcpu()->ci_ci.icache_line_size)
for (i = 0; i < PAGE_SIZE;
i += curcpu()->ci_ci.icache_line_size)
asm volatile("icbi %0,%1" : : "r" (va), "r" (i));
asm volatile("sync;isync" : : );
}
void
dcache_flush(vaddr_t va, vsize_t len)
{
int i;
if (len == 0)
return;
/* Make sure we flush all cache lines */
len += va & (curcpu()->ci_ci.dcache_line_size-1);
if (curcpu()->ci_ci.dcache_line_size)
for (i = 0; i < len; i += curcpu()->ci_ci.dcache_line_size)
asm volatile("dcbf %0,%1" : : "r" (va), "r" (i));
asm volatile("sync;isync" : : );
}
void
icache_flush(vaddr_t va, vsize_t len)
{
int i;
if (len == 0)
return;
/* Make sure we flush all cache lines */
len += va & (curcpu()->ci_ci.icache_line_size-1);
if (curcpu()->ci_ci.icache_line_size)
for (i = 0; i < len; i += curcpu()->ci_ci.icache_line_size)
asm volatile("icbi %0,%1" : : "r" (va), "r" (i));
asm volatile("sync;isync" : : );
}