arch/x86/kernel/cpu/mtrr/cyrix.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 #include <linux/init.h>
   3 #include <linux/io.h>
   4 #include <linux/mm.h>
   5
   6 #include <asm/processor-cyrix.h>
   7 #include <asm/processor-flags.h>
   8 #include <asm/mtrr.h>
   9 #include <asm/msr.h>
  10
  11 #include "mtrr.h"
  12
  13 static void
  14 cyrix_get_arr(unsigned int reg, unsigned long *base,
  15               unsigned long *size, mtrr_type * type)
  16 {
  17         unsigned char arr, ccr3, rcr, shift;
  18         unsigned long flags;
  19
  20         arr = CX86_ARR_BASE + (reg << 1) + reg; /* avoid multiplication by 3 */
  21
  22         local_irq_save(flags);
  23
  24         ccr3 = getCx86(CX86_CCR3);
  25         setCx86(CX86_CCR3, (ccr3 & 0x0f) | 0x10);       /* enable MAPEN */
  26         ((unsigned char *)base)[3] = getCx86(arr);
  27         ((unsigned char *)base)[2] = getCx86(arr + 1);
  28         ((unsigned char *)base)[1] = getCx86(arr + 2);
  29         rcr = getCx86(CX86_RCR_BASE + reg);
  30         setCx86(CX86_CCR3, ccr3);                       /* disable MAPEN */
  31
  32         local_irq_restore(flags);
  33
  34         shift = ((unsigned char *) base)[1] & 0x0f;
  35         *base >>= PAGE_SHIFT;
  36
  37         /*
  38          * Power of two, at least 4K on ARR0-ARR6, 256K on ARR7
  39          * Note: shift==0xf means 4G, this is unsupported.
  40          */
  41         if (shift)
  42                 *size = (reg < 7 ? 0x1UL : 0x40UL) << (shift - 1);
  43         else
  44                 *size = 0;
  45
  46         /* Bit 0 is Cache Enable on ARR7, Cache Disable on ARR0-ARR6 */
  47         if (reg < 7) {
  48                 switch (rcr) {
  49                 case 1:
  50                         *type = MTRR_TYPE_UNCACHABLE;
  51                         break;
  52                 case 8:
  53                         *type = MTRR_TYPE_WRBACK;
  54                         break;
  55                 case 9:
  56                         *type = MTRR_TYPE_WRCOMB;
  57                         break;
  58                 case 24:
  59                 default:
  60                         *type = MTRR_TYPE_WRTHROUGH;
  61                         break;
  62                 }
  63         } else {
  64                 switch (rcr) {
  65                 case 0:
  66                         *type = MTRR_TYPE_UNCACHABLE;
  67                         break;
  68                 case 8:
  69                         *type = MTRR_TYPE_WRCOMB;
  70                         break;
  71                 case 9:
  72                         *type = MTRR_TYPE_WRBACK;
  73                         break;
  74                 case 25:
  75                 default:
  76                         *type = MTRR_TYPE_WRTHROUGH;
  77                         break;
  78                 }
  79         }
  80 }
  81
  82 /*
  83  * cyrix_get_free_region - get a free ARR.
  84  *
  85  * @base: the starting (base) address of the region.
  86  * @size: the size (in bytes) of the region.
  87  *
  88  * Returns: the index of the region on success, else -1 on error.
  89 */
  90 static int
  91 cyrix_get_free_region(unsigned long base, unsigned long size, int replace_reg)
  92 {
  93         unsigned long lbase, lsize;
  94         mtrr_type ltype;
  95         int i;
  96
  97         switch (replace_reg) {
  98         case 7:
  99                 if (size < 0x40)
 100                         break;
 101         case 6:
 102         case 5:
 103         case 4:
 104                 return replace_reg;
 105         case 3:
 106         case 2:
 107         case 1:
 108         case 0:
 109                 return replace_reg;
 110         }
 111         /* If we are to set up a region >32M then look at ARR7 immediately */
 112         if (size > 0x2000) {
 113                 cyrix_get_arr(7, &lbase, &lsize, &ltype);
 114                 if (lsize == 0)
 115                         return 7;
 116                 /* Else try ARR0-ARR6 first  */
 117         } else {
 118                 for (i = 0; i < 7; i++) {
 119                         cyrix_get_arr(i, &lbase, &lsize, &ltype);
 120                         if (lsize == 0)
 121                                 return i;
 122                 }
 123                 /*
 124                  * ARR0-ARR6 isn't free
 125                  * try ARR7 but its size must be at least 256K
 126                  */
 127                 cyrix_get_arr(i, &lbase, &lsize, &ltype);
 128                 if ((lsize == 0) && (size >= 0x40))
 129                         return i;
 130         }
 131         return -ENOSPC;
 132 }
 133
 134 static u32 cr4, ccr3;
 135
 136 static void prepare_set(void)
 137 {
 138         u32 cr0;
 139
 140         /*  Save value of CR4 and clear Page Global Enable (bit 7)  */
 141         if (boot_cpu_has(X86_FEATURE_PGE)) {
 142                 cr4 = __read_cr4();
 143                 __write_cr4(cr4 & ~X86_CR4_PGE);
 144         }
 145
 146         /*
 147          * Disable and flush caches.
 148          * Note that wbinvd flushes the TLBs as a side-effect
 149          */
 150         cr0 = read_cr0() | X86_CR0_CD;
 151         wbinvd();
 152         write_cr0(cr0);
 153         wbinvd();
 154
 155         /* Cyrix ARRs - everything else was excluded at the top */
 156         ccr3 = getCx86(CX86_CCR3);
 157
 158         /* Cyrix ARRs - everything else was excluded at the top */
 159         setCx86(CX86_CCR3, (ccr3 & 0x0f) | 0x10);
 160 }
 161
 162 static void post_set(void)
 163 {
 164         /* Flush caches and TLBs */
 165         wbinvd();
 166
 167         /* Cyrix ARRs - everything else was excluded at the top */
 168         setCx86(CX86_CCR3, ccr3);
 169
 170         /* Enable caches */
 171         write_cr0(read_cr0() & ~X86_CR0_CD);
 172
 173         /* Restore value of CR4 */
 174         if (boot_cpu_has(X86_FEATURE_PGE))
 175                 __write_cr4(cr4);
 176 }
 177
 178 static void cyrix_set_arr(unsigned int reg, unsigned long base,
 179                           unsigned long size, mtrr_type type)
 180 {
 181         unsigned char arr, arr_type, arr_size;
 182
 183         arr = CX86_ARR_BASE + (reg << 1) + reg; /* avoid multiplication by 3 */
 184
 185         /* count down from 32M (ARR0-ARR6) or from 2G (ARR7) */
 186         if (reg >= 7)
 187                 size >>= 6;
 188
 189         size &= 0x7fff;         /* make sure arr_size <= 14 */
 190         for (arr_size = 0; size; arr_size++, size >>= 1)
 191                 ;
 192
 193         if (reg < 7) {
 194                 switch (type) {
 195                 case MTRR_TYPE_UNCACHABLE:
 196                         arr_type = 1;
 197                         break;
 198                 case MTRR_TYPE_WRCOMB:
 199                         arr_type = 9;
 200                         break;
 201                 case MTRR_TYPE_WRTHROUGH:
 202                         arr_type = 24;
 203                         break;
 204                 default:
 205                         arr_type = 8;
 206                         break;
 207                 }
 208         } else {
 209                 switch (type) {
 210                 case MTRR_TYPE_UNCACHABLE:
 211                         arr_type = 0;
 212                         break;
 213                 case MTRR_TYPE_WRCOMB:
 214                         arr_type = 8;
 215                         break;
 216                 case MTRR_TYPE_WRTHROUGH:
 217                         arr_type = 25;
 218                         break;
 219                 default:
 220                         arr_type = 9;
 221                         break;
 222                 }
 223         }
 224
 225         prepare_set();
 226
 227         base <<= PAGE_SHIFT;
 228         setCx86(arr + 0,  ((unsigned char *)&base)[3]);
 229         setCx86(arr + 1,  ((unsigned char *)&base)[2]);
 230         setCx86(arr + 2, (((unsigned char *)&base)[1]) | arr_size);
 231         setCx86(CX86_RCR_BASE + reg, arr_type);
 232
 233         post_set();
 234 }
 235
 236 typedef struct {
 237         unsigned long   base;
 238         unsigned long   size;
 239         mtrr_type       type;
 240 } arr_state_t;
 241
 242 static arr_state_t arr_state[8] = {
 243         {0UL, 0UL, 0UL}, {0UL, 0UL, 0UL}, {0UL, 0UL, 0UL}, {0UL, 0UL, 0UL},
 244         {0UL, 0UL, 0UL}, {0UL, 0UL, 0UL}, {0UL, 0UL, 0UL}, {0UL, 0UL, 0UL}
 245 };
 246
 247 static unsigned char ccr_state[7] = { 0, 0, 0, 0, 0, 0, 0 };
 248
 249 static void cyrix_set_all(void)
 250 {
 251         int i;
 252
 253         prepare_set();
 254
 255         /* the CCRs are not contiguous */
 256         for (i = 0; i < 4; i++)
 257                 setCx86(CX86_CCR0 + i, ccr_state[i]);
 258         for (; i < 7; i++)
 259                 setCx86(CX86_CCR4 + i, ccr_state[i]);
 260
 261         for (i = 0; i < 8; i++) {
 262                 cyrix_set_arr(i, arr_state[i].base,
 263                               arr_state[i].size, arr_state[i].type);
 264         }
 265
 266         post_set();
 267 }
 268
 269 static const struct mtrr_ops cyrix_mtrr_ops = {
 270         .vendor            = X86_VENDOR_CYRIX,
 271         .set_all           = cyrix_set_all,
 272         .set               = cyrix_set_arr,
 273         .get               = cyrix_get_arr,
 274         .get_free_region   = cyrix_get_free_region,
 275         .validate_add_page = generic_validate_add_page,
 276         .have_wrcomb       = positive_have_wrcomb,
 277 };
 278
 279 int __init cyrix_init_mtrr(void)
 280 {
 281         set_mtrr_ops(&cyrix_mtrr_ops);
 282         return 0;
 283 }