559 lines
15 KiB
C
559 lines
15 KiB
C
/*
|
|
* Copyright (C) 1996 David S. Miller (dm@engr.sgi.com)
|
|
* Copyright (C) 1997, 2001 Ralf Baechle (ralf@gnu.org)
|
|
* Copyright (C) 2000, 2001, 2002, 2003 Broadcom Corporation
|
|
* Copyright (C) 2004 Maciej W. Rozycki
|
|
*
|
|
* This program is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version 2
|
|
* of the License, or (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
*/
|
|
#include <linux/config.h>
|
|
#include <linux/init.h>
|
|
|
|
#include <asm/asm.h>
|
|
#include <asm/bootinfo.h>
|
|
#include <asm/cacheops.h>
|
|
#include <asm/cpu.h>
|
|
#include <asm/mipsregs.h>
|
|
#include <asm/mmu_context.h>
|
|
#include <asm/uaccess.h>
|
|
|
|
extern void sb1_dma_init(void);
|
|
|
|
/* These are probed at ld_mmu time */
|
|
static unsigned long icache_size;
|
|
static unsigned long dcache_size;
|
|
|
|
static unsigned short icache_line_size;
|
|
static unsigned short dcache_line_size;
|
|
|
|
static unsigned int icache_index_mask;
|
|
static unsigned int dcache_index_mask;
|
|
|
|
static unsigned short icache_assoc;
|
|
static unsigned short dcache_assoc;
|
|
|
|
static unsigned short icache_sets;
|
|
static unsigned short dcache_sets;
|
|
|
|
static unsigned int icache_range_cutoff;
|
|
static unsigned int dcache_range_cutoff;
|
|
|
|
/*
|
|
* The dcache is fully coherent to the system, with one
|
|
* big caveat: the instruction stream. In other words,
|
|
* if we miss in the icache, and have dirty data in the
|
|
* L1 dcache, then we'll go out to memory (or the L2) and
|
|
* get the not-as-recent data.
|
|
*
|
|
* So the only time we have to flush the dcache is when
|
|
* we're flushing the icache. Since the L2 is fully
|
|
* coherent to everything, including I/O, we never have
|
|
* to flush it
|
|
*/
|
|
|
|
#define cache_set_op(op, addr) \
|
|
__asm__ __volatile__( \
|
|
" .set noreorder \n" \
|
|
" .set mips64\n\t \n" \
|
|
" cache %0, (0<<13)(%1) \n" \
|
|
" cache %0, (1<<13)(%1) \n" \
|
|
" cache %0, (2<<13)(%1) \n" \
|
|
" cache %0, (3<<13)(%1) \n" \
|
|
" .set mips0 \n" \
|
|
" .set reorder" \
|
|
: \
|
|
: "i" (op), "r" (addr))
|
|
|
|
#define sync() \
|
|
__asm__ __volatile( \
|
|
" .set mips64\n\t \n" \
|
|
" sync \n" \
|
|
" .set mips0")
|
|
|
|
#define mispredict() \
|
|
__asm__ __volatile__( \
|
|
" bnezl $0, 1f \n" /* Force mispredict */ \
|
|
"1: \n");
|
|
|
|
/*
|
|
* Writeback and invalidate the entire dcache
|
|
*/
|
|
static inline void __sb1_writeback_inv_dcache_all(void)
|
|
{
|
|
unsigned long addr = 0;
|
|
|
|
while (addr < dcache_line_size * dcache_sets) {
|
|
cache_set_op(Index_Writeback_Inv_D, addr);
|
|
addr += dcache_line_size;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Writeback and invalidate a range of the dcache. The addresses are
|
|
* virtual, and since we're using index ops and bit 12 is part of both
|
|
* the virtual frame and physical index, we have to clear both sets
|
|
* (bit 12 set and cleared).
|
|
*/
|
|
static inline void __sb1_writeback_inv_dcache_range(unsigned long start,
|
|
unsigned long end)
|
|
{
|
|
unsigned long index;
|
|
|
|
start &= ~(dcache_line_size - 1);
|
|
end = (end + dcache_line_size - 1) & ~(dcache_line_size - 1);
|
|
|
|
while (start != end) {
|
|
index = start & dcache_index_mask;
|
|
cache_set_op(Index_Writeback_Inv_D, index);
|
|
cache_set_op(Index_Writeback_Inv_D, index ^ (1<<12));
|
|
start += dcache_line_size;
|
|
}
|
|
sync();
|
|
}
|
|
|
|
/*
|
|
* Writeback and invalidate a range of the dcache. With physical
|
|
* addresseses, we don't have to worry about possible bit 12 aliasing.
|
|
* XXXKW is it worth turning on KX and using hit ops with xkphys?
|
|
*/
|
|
static inline void __sb1_writeback_inv_dcache_phys_range(unsigned long start,
|
|
unsigned long end)
|
|
{
|
|
start &= ~(dcache_line_size - 1);
|
|
end = (end + dcache_line_size - 1) & ~(dcache_line_size - 1);
|
|
|
|
while (start != end) {
|
|
cache_set_op(Index_Writeback_Inv_D, start & dcache_index_mask);
|
|
start += dcache_line_size;
|
|
}
|
|
sync();
|
|
}
|
|
|
|
|
|
/*
|
|
* Invalidate the entire icache
|
|
*/
|
|
static inline void __sb1_flush_icache_all(void)
|
|
{
|
|
unsigned long addr = 0;
|
|
|
|
while (addr < icache_line_size * icache_sets) {
|
|
cache_set_op(Index_Invalidate_I, addr);
|
|
addr += icache_line_size;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Flush the icache for a given physical page. Need to writeback the
|
|
* dcache first, then invalidate the icache. If the page isn't
|
|
* executable, nothing is required.
|
|
*/
|
|
static void local_sb1_flush_cache_page(struct vm_area_struct *vma, unsigned long addr, unsigned long pfn)
|
|
{
|
|
int cpu = smp_processor_id();
|
|
|
|
#ifndef CONFIG_SMP
|
|
if (!(vma->vm_flags & VM_EXEC))
|
|
return;
|
|
#endif
|
|
|
|
__sb1_writeback_inv_dcache_range(addr, addr + PAGE_SIZE);
|
|
|
|
/*
|
|
* Bumping the ASID is probably cheaper than the flush ...
|
|
*/
|
|
if (cpu_context(cpu, vma->vm_mm) != 0)
|
|
drop_mmu_context(vma->vm_mm, cpu);
|
|
}
|
|
|
|
#ifdef CONFIG_SMP
|
|
struct flush_cache_page_args {
|
|
struct vm_area_struct *vma;
|
|
unsigned long addr;
|
|
unsigned long pfn;
|
|
};
|
|
|
|
static void sb1_flush_cache_page_ipi(void *info)
|
|
{
|
|
struct flush_cache_page_args *args = info;
|
|
|
|
local_sb1_flush_cache_page(args->vma, args->addr, args->pfn);
|
|
}
|
|
|
|
/* Dirty dcache could be on another CPU, so do the IPIs */
|
|
static void sb1_flush_cache_page(struct vm_area_struct *vma, unsigned long addr, unsigned long pfn)
|
|
{
|
|
struct flush_cache_page_args args;
|
|
|
|
if (!(vma->vm_flags & VM_EXEC))
|
|
return;
|
|
|
|
addr &= PAGE_MASK;
|
|
args.vma = vma;
|
|
args.addr = addr;
|
|
args.pfn = pfn;
|
|
on_each_cpu(sb1_flush_cache_page_ipi, (void *) &args, 1, 1);
|
|
}
|
|
#else
|
|
void sb1_flush_cache_page(struct vm_area_struct *vma, unsigned long addr, unsigned long pfn)
|
|
__attribute__((alias("local_sb1_flush_cache_page")));
|
|
#endif
|
|
|
|
/*
|
|
* Invalidate a range of the icache. The addresses are virtual, and
|
|
* the cache is virtually indexed and tagged. However, we don't
|
|
* necessarily have the right ASID context, so use index ops instead
|
|
* of hit ops.
|
|
*/
|
|
static inline void __sb1_flush_icache_range(unsigned long start,
|
|
unsigned long end)
|
|
{
|
|
start &= ~(icache_line_size - 1);
|
|
end = (end + icache_line_size - 1) & ~(icache_line_size - 1);
|
|
|
|
while (start != end) {
|
|
cache_set_op(Index_Invalidate_I, start & icache_index_mask);
|
|
start += icache_line_size;
|
|
}
|
|
mispredict();
|
|
sync();
|
|
}
|
|
|
|
|
|
/*
|
|
* Invalidate all caches on this CPU
|
|
*/
|
|
static void local_sb1___flush_cache_all(void)
|
|
{
|
|
__sb1_writeback_inv_dcache_all();
|
|
__sb1_flush_icache_all();
|
|
}
|
|
|
|
#ifdef CONFIG_SMP
|
|
void sb1___flush_cache_all_ipi(void *ignored)
|
|
__attribute__((alias("local_sb1___flush_cache_all")));
|
|
|
|
static void sb1___flush_cache_all(void)
|
|
{
|
|
on_each_cpu(sb1___flush_cache_all_ipi, 0, 1, 1);
|
|
}
|
|
#else
|
|
void sb1___flush_cache_all(void)
|
|
__attribute__((alias("local_sb1___flush_cache_all")));
|
|
#endif
|
|
|
|
/*
|
|
* When flushing a range in the icache, we have to first writeback
|
|
* the dcache for the same range, so new ifetches will see any
|
|
* data that was dirty in the dcache.
|
|
*
|
|
* The start/end arguments are Kseg addresses (possibly mapped Kseg).
|
|
*/
|
|
|
|
static void local_sb1_flush_icache_range(unsigned long start,
|
|
unsigned long end)
|
|
{
|
|
/* Just wb-inv the whole dcache if the range is big enough */
|
|
if ((end - start) > dcache_range_cutoff)
|
|
__sb1_writeback_inv_dcache_all();
|
|
else
|
|
__sb1_writeback_inv_dcache_range(start, end);
|
|
|
|
/* Just flush the whole icache if the range is big enough */
|
|
if ((end - start) > icache_range_cutoff)
|
|
__sb1_flush_icache_all();
|
|
else
|
|
__sb1_flush_icache_range(start, end);
|
|
}
|
|
|
|
#ifdef CONFIG_SMP
|
|
struct flush_icache_range_args {
|
|
unsigned long start;
|
|
unsigned long end;
|
|
};
|
|
|
|
static void sb1_flush_icache_range_ipi(void *info)
|
|
{
|
|
struct flush_icache_range_args *args = info;
|
|
|
|
local_sb1_flush_icache_range(args->start, args->end);
|
|
}
|
|
|
|
void sb1_flush_icache_range(unsigned long start, unsigned long end)
|
|
{
|
|
struct flush_icache_range_args args;
|
|
|
|
args.start = start;
|
|
args.end = end;
|
|
on_each_cpu(sb1_flush_icache_range_ipi, &args, 1, 1);
|
|
}
|
|
#else
|
|
void sb1_flush_icache_range(unsigned long start, unsigned long end)
|
|
__attribute__((alias("local_sb1_flush_icache_range")));
|
|
#endif
|
|
|
|
/*
|
|
* Flush the icache for a given physical page. Need to writeback the
|
|
* dcache first, then invalidate the icache. If the page isn't
|
|
* executable, nothing is required.
|
|
*/
|
|
static void local_sb1_flush_icache_page(struct vm_area_struct *vma,
|
|
struct page *page)
|
|
{
|
|
unsigned long start;
|
|
int cpu = smp_processor_id();
|
|
|
|
#ifndef CONFIG_SMP
|
|
if (!(vma->vm_flags & VM_EXEC))
|
|
return;
|
|
#endif
|
|
|
|
/* Need to writeback any dirty data for that page, we have the PA */
|
|
start = (unsigned long)(page-mem_map) << PAGE_SHIFT;
|
|
__sb1_writeback_inv_dcache_phys_range(start, start + PAGE_SIZE);
|
|
/*
|
|
* If there's a context, bump the ASID (cheaper than a flush,
|
|
* since we don't know VAs!)
|
|
*/
|
|
if (cpu_context(cpu, vma->vm_mm) != 0) {
|
|
drop_mmu_context(vma->vm_mm, cpu);
|
|
}
|
|
}
|
|
|
|
#ifdef CONFIG_SMP
|
|
struct flush_icache_page_args {
|
|
struct vm_area_struct *vma;
|
|
struct page *page;
|
|
};
|
|
|
|
static void sb1_flush_icache_page_ipi(void *info)
|
|
{
|
|
struct flush_icache_page_args *args = info;
|
|
local_sb1_flush_icache_page(args->vma, args->page);
|
|
}
|
|
|
|
/* Dirty dcache could be on another CPU, so do the IPIs */
|
|
static void sb1_flush_icache_page(struct vm_area_struct *vma,
|
|
struct page *page)
|
|
{
|
|
struct flush_icache_page_args args;
|
|
|
|
if (!(vma->vm_flags & VM_EXEC))
|
|
return;
|
|
args.vma = vma;
|
|
args.page = page;
|
|
on_each_cpu(sb1_flush_icache_page_ipi, (void *) &args, 1, 1);
|
|
}
|
|
#else
|
|
void sb1_flush_icache_page(struct vm_area_struct *vma, struct page *page)
|
|
__attribute__((alias("local_sb1_flush_icache_page")));
|
|
#endif
|
|
|
|
/*
|
|
* A signal trampoline must fit into a single cacheline.
|
|
*/
|
|
static void local_sb1_flush_cache_sigtramp(unsigned long addr)
|
|
{
|
|
cache_set_op(Index_Writeback_Inv_D, addr & dcache_index_mask);
|
|
cache_set_op(Index_Writeback_Inv_D, (addr ^ (1<<12)) & dcache_index_mask);
|
|
cache_set_op(Index_Invalidate_I, addr & icache_index_mask);
|
|
mispredict();
|
|
}
|
|
|
|
#ifdef CONFIG_SMP
|
|
static void sb1_flush_cache_sigtramp_ipi(void *info)
|
|
{
|
|
unsigned long iaddr = (unsigned long) info;
|
|
local_sb1_flush_cache_sigtramp(iaddr);
|
|
}
|
|
|
|
static void sb1_flush_cache_sigtramp(unsigned long addr)
|
|
{
|
|
on_each_cpu(sb1_flush_cache_sigtramp_ipi, (void *) addr, 1, 1);
|
|
}
|
|
#else
|
|
void sb1_flush_cache_sigtramp(unsigned long addr)
|
|
__attribute__((alias("local_sb1_flush_cache_sigtramp")));
|
|
#endif
|
|
|
|
|
|
/*
|
|
* Anything that just flushes dcache state can be ignored, as we're always
|
|
* coherent in dcache space. This is just a dummy function that all the
|
|
* nop'ed routines point to
|
|
*/
|
|
static void sb1_nop(void)
|
|
{
|
|
}
|
|
|
|
/*
|
|
* Cache set values (from the mips64 spec)
|
|
* 0 - 64
|
|
* 1 - 128
|
|
* 2 - 256
|
|
* 3 - 512
|
|
* 4 - 1024
|
|
* 5 - 2048
|
|
* 6 - 4096
|
|
* 7 - Reserved
|
|
*/
|
|
|
|
static unsigned int decode_cache_sets(unsigned int config_field)
|
|
{
|
|
if (config_field == 7) {
|
|
/* JDCXXX - Find a graceful way to abort. */
|
|
return 0;
|
|
}
|
|
return (1<<(config_field + 6));
|
|
}
|
|
|
|
/*
|
|
* Cache line size values (from the mips64 spec)
|
|
* 0 - No cache present.
|
|
* 1 - 4 bytes
|
|
* 2 - 8 bytes
|
|
* 3 - 16 bytes
|
|
* 4 - 32 bytes
|
|
* 5 - 64 bytes
|
|
* 6 - 128 bytes
|
|
* 7 - Reserved
|
|
*/
|
|
|
|
static unsigned int decode_cache_line_size(unsigned int config_field)
|
|
{
|
|
if (config_field == 0) {
|
|
return 0;
|
|
} else if (config_field == 7) {
|
|
/* JDCXXX - Find a graceful way to abort. */
|
|
return 0;
|
|
}
|
|
return (1<<(config_field + 1));
|
|
}
|
|
|
|
/*
|
|
* Relevant bits of the config1 register format (from the MIPS32/MIPS64 specs)
|
|
*
|
|
* 24:22 Icache sets per way
|
|
* 21:19 Icache line size
|
|
* 18:16 Icache Associativity
|
|
* 15:13 Dcache sets per way
|
|
* 12:10 Dcache line size
|
|
* 9:7 Dcache Associativity
|
|
*/
|
|
|
|
static char *way_string[] = {
|
|
"direct mapped", "2-way", "3-way", "4-way",
|
|
"5-way", "6-way", "7-way", "8-way",
|
|
};
|
|
|
|
static __init void probe_cache_sizes(void)
|
|
{
|
|
u32 config1;
|
|
|
|
config1 = read_c0_config1();
|
|
icache_line_size = decode_cache_line_size((config1 >> 19) & 0x7);
|
|
dcache_line_size = decode_cache_line_size((config1 >> 10) & 0x7);
|
|
icache_sets = decode_cache_sets((config1 >> 22) & 0x7);
|
|
dcache_sets = decode_cache_sets((config1 >> 13) & 0x7);
|
|
icache_assoc = ((config1 >> 16) & 0x7) + 1;
|
|
dcache_assoc = ((config1 >> 7) & 0x7) + 1;
|
|
icache_size = icache_line_size * icache_sets * icache_assoc;
|
|
dcache_size = dcache_line_size * dcache_sets * dcache_assoc;
|
|
/* Need to remove non-index bits for index ops */
|
|
icache_index_mask = (icache_sets - 1) * icache_line_size;
|
|
dcache_index_mask = (dcache_sets - 1) * dcache_line_size;
|
|
/*
|
|
* These are for choosing range (index ops) versus all.
|
|
* icache flushes all ways for each set, so drop icache_assoc.
|
|
* dcache flushes all ways and each setting of bit 12 for each
|
|
* index, so drop dcache_assoc and halve the dcache_sets.
|
|
*/
|
|
icache_range_cutoff = icache_sets * icache_line_size;
|
|
dcache_range_cutoff = (dcache_sets / 2) * icache_line_size;
|
|
|
|
printk("Primary instruction cache %ldkB, %s, linesize %d bytes.\n",
|
|
icache_size >> 10, way_string[icache_assoc - 1],
|
|
icache_line_size);
|
|
printk("Primary data cache %ldkB, %s, linesize %d bytes.\n",
|
|
dcache_size >> 10, way_string[dcache_assoc - 1],
|
|
dcache_line_size);
|
|
}
|
|
|
|
/*
|
|
* This is called from loadmmu.c. We have to set up all the
|
|
* memory management function pointers, as well as initialize
|
|
* the caches and tlbs
|
|
*/
|
|
void ld_mmu_sb1(void)
|
|
{
|
|
extern char except_vec2_sb1;
|
|
extern char handle_vec2_sb1;
|
|
|
|
/* Special cache error handler for SB1 */
|
|
memcpy((void *)(CAC_BASE + 0x100), &except_vec2_sb1, 0x80);
|
|
memcpy((void *)(UNCAC_BASE + 0x100), &except_vec2_sb1, 0x80);
|
|
memcpy((void *)CKSEG1ADDR(&handle_vec2_sb1), &handle_vec2_sb1, 0x80);
|
|
|
|
probe_cache_sizes();
|
|
|
|
#ifdef CONFIG_SIBYTE_DMA_PAGEOPS
|
|
sb1_dma_init();
|
|
#endif
|
|
|
|
/*
|
|
* None of these are needed for the SB1 - the Dcache is
|
|
* physically indexed and tagged, so no virtual aliasing can
|
|
* occur
|
|
*/
|
|
flush_cache_range = (void *) sb1_nop;
|
|
flush_cache_mm = (void (*)(struct mm_struct *))sb1_nop;
|
|
flush_cache_all = sb1_nop;
|
|
|
|
/* These routines are for Icache coherence with the Dcache */
|
|
flush_icache_range = sb1_flush_icache_range;
|
|
flush_icache_page = sb1_flush_icache_page;
|
|
flush_icache_all = __sb1_flush_icache_all; /* local only */
|
|
|
|
/* This implies an Icache flush too, so can't be nop'ed */
|
|
flush_cache_page = sb1_flush_cache_page;
|
|
|
|
flush_cache_sigtramp = sb1_flush_cache_sigtramp;
|
|
flush_data_cache_page = (void *) sb1_nop;
|
|
|
|
/* Full flush */
|
|
__flush_cache_all = sb1___flush_cache_all;
|
|
|
|
change_c0_config(CONF_CM_CMASK, CONF_CM_DEFAULT);
|
|
|
|
/*
|
|
* This is the only way to force the update of K0 to complete
|
|
* before subsequent instruction fetch.
|
|
*/
|
|
__asm__ __volatile__(
|
|
".set push \n"
|
|
" .set noat \n"
|
|
" .set noreorder \n"
|
|
" .set mips3 \n"
|
|
" " STR(PTR_LA) " $1, 1f \n"
|
|
" " STR(MTC0) " $1, $14 \n"
|
|
" eret \n"
|
|
"1: .set pop"
|
|
:
|
|
:
|
|
: "memory");
|
|
|
|
flush_cache_all();
|
|
}
|