1 /* $NetBSD: syncicache.c,v 1.2 2012/11/24 07:16:04 christos 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
48 static 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
60 size_t __getcachelinesize (void);
61
62 static int _cachelinesize = 0;
63
64 static struct cache_info _cache_info;
65 #define CACHEINFO _cache_info
66
67 size_t
__getcachelinesize(void)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
102 void
__syncicache(void * from,size_t len)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