1/*	$NetBSD: syncicache.c,v 1.1 2006/07/01 16:37:20 ross Exp $	*/
2
3/*
4 * Copyright (C) 1995-1997, 1999 Wolfgang Solfrank.
5 * Copyright (C) 1995-1997, 1999 TooLs GmbH.
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 by TooLs GmbH.
19 * 4. The name of TooLs GmbH may not be used to endorse or promote products
20 *    derived from this software without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
26 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
27 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
28 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
30 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
31 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 */
33#include <sys/param.h>
34#if	defined(_KERNEL) || defined(_STANDALONE)
35#include <sys/time.h>
36#include <sys/proc.h>
37#include <uvm/uvm_extern.h>
38#endif
39#include <sys/sysctl.h>
40
41#include <machine/cpu.h>
42
43
44#if defined(_STANDALONE)
45#ifndef	CACHELINESIZE
46#error "Must know the size of a cache line"
47#endif
48static struct cache_info _cache_info = {
49	CACHELINESIZE,
50	CACHELINESIZE,
51	CACHELINESIZE,
52	CACHELINESIZE
53};
54#define CACHEINFO	_cache_info
55#elif defined(_KERNEL)
56#define	CACHEINFO	(curcpu()->ci_ci)
57#else
58#include <stdlib.h>
59
60size_t __getcachelinesize (void);
61
62static int _cachelinesize = 0;
63
64static struct cache_info _cache_info;
65#define CACHEINFO	_cache_info
66
67size_t
68__getcachelinesize(void)
69{
70	static int cachemib[] = { CTL_MACHDEP, CPU_CACHELINE };
71	static int cacheinfomib[] = { CTL_MACHDEP, CPU_CACHEINFO };
72	size_t clen = sizeof(_cache_info);
73
74	if (_cachelinesize)
75		return _cachelinesize;
76
77	if (sysctl(cacheinfomib, (u_int)__arraycount(cacheinfomib),
78	    &_cache_info, &clen, NULL, 0) == 0) {
79		_cachelinesize = _cache_info.dcache_line_size;
80		return _cachelinesize;
81	}
82
83	/* Try older deprecated sysctl */
84	clen = sizeof(_cachelinesize);
85	if (sysctl(cachemib, (u_int)__arraycount(cachemib),
86	    &_cachelinesize, &clen, NULL, 0) < 0 || !_cachelinesize)
87		abort();
88
89	_cache_info.dcache_size = _cachelinesize;
90	_cache_info.dcache_line_size = _cachelinesize;
91	_cache_info.icache_size = _cachelinesize;
92	_cache_info.icache_line_size = _cachelinesize;
93
94	/* If there is no cache, indicate we have issued the sysctl. */
95	if (!_cachelinesize)
96		_cachelinesize = 1;
97
98	return _cachelinesize;
99}
100#endif
101
102void
103__syncicache(void *from, size_t len)
104{
105	size_t l, off;
106	size_t linesz;
107	char *p;
108
109#if	!defined(_KERNEL) && !defined(_STANDALONE)
110	if (!_cachelinesize)
111		__getcachelinesize();
112#endif
113
114	if (CACHEINFO.dcache_size > 0) {
115		linesz = CACHEINFO.dcache_line_size;
116		off = (uintptr_t)from & (linesz - 1);
117		l = (len + off + linesz - 1) & ~(linesz - 1);
118		p = (char *)from - off;
119		do {
120			__asm volatile ("dcbst 0,%0" :: "r"(p));
121			p += linesz;
122		} while ((l -= linesz) != 0);
123	}
124	__asm volatile ("sync");
125
126	if (CACHEINFO.icache_size > 0 ) {
127		linesz = CACHEINFO.icache_line_size;
128		off = (uintptr_t)from & (linesz - 1);
129		l = (len + off + linesz - 1) & ~(linesz - 1);
130		p = (char *)from - off;
131		do {
132			__asm volatile ("icbi 0,%0" :: "r"(p));
133			p += linesz;
134		} while ((l -= linesz) != 0);
135	}
136	__asm volatile ("sync; isync");
137}
138