arch/mips/mm/c-sb1.c

   1 /*
   2  * Copyright (C) 1996 David S. Miller (dm@engr.sgi.com)
   3  * Copyright (C) 1997, 2001 Ralf Baechle (ralf@gnu.org)
   4  * Copyright (C) 2000, 2001, 2002, 2003 Broadcom Corporation
   5  * Copyright (C) 2004  Maciej W. Rozycki
   6  *
   7  * This program is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU General Public License
   9  * as published by the Free Software Foundation; either version 2
  10  * of the License, or (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  20  */
  21 #include <linux/config.h>
  22 #include <linux/init.h>
  23
  24 #include <asm/asm.h>
  25 #include <asm/bootinfo.h>
  26 #include <asm/cacheops.h>
  27 #include <asm/cpu.h>
  28 #include <asm/mipsregs.h>
  29 #include <asm/mmu_context.h>
  30 #include <asm/uaccess.h>
  31
  32 extern void sb1_dma_init(void);
  33
  34 /* These are probed at ld_mmu time */
  35 static unsigned long icache_size;
  36 static unsigned long dcache_size;
  37
  38 static unsigned short icache_line_size;
  39 static unsigned short dcache_line_size;
  40
  41 static unsigned int icache_index_mask;
  42 static unsigned int dcache_index_mask;
  43
  44 static unsigned short icache_assoc;
  45 static unsigned short dcache_assoc;
  46
  47 static unsigned short icache_sets;
  48 static unsigned short dcache_sets;
  49
  50 static unsigned int icache_range_cutoff;
  51 static unsigned int dcache_range_cutoff;
  52
  53 /*
  54  * The dcache is fully coherent to the system, with one
  55  * big caveat:  the instruction stream.  In other words,
  56  * if we miss in the icache, and have dirty data in the
  57  * L1 dcache, then we'll go out to memory (or the L2) and
  58  * get the not-as-recent data.
  59  *
  60  * So the only time we have to flush the dcache is when
  61  * we're flushing the icache.  Since the L2 is fully
  62  * coherent to everything, including I/O, we never have
  63  * to flush it
  64  */
  65
  66 #define cache_set_op(op, addr)                                          \
  67         __asm__ __volatile__(                                           \
  68         "       .set    noreorder               \n"                     \
  69         "       .set    mips64\n\t              \n"                     \
  70         "       cache   %0, (0<<13)(%1)         \n"                     \
  71         "       cache   %0, (1<<13)(%1)         \n"                     \
  72         "       cache   %0, (2<<13)(%1)         \n"                     \
  73         "       cache   %0, (3<<13)(%1)         \n"                     \
  74         "       .set    mips0                   \n"                     \
  75         "       .set    reorder"                                        \
  76         :                                                               \
  77         : "i" (op), "r" (addr))
  78
  79 #define sync()                                                          \
  80         __asm__ __volatile(                                             \
  81         "       .set    mips64\n\t              \n"                     \
  82         "       sync                            \n"                     \
  83         "       .set    mips0")
  84
  85 #define mispredict()                                                    \
  86         __asm__ __volatile__(                                           \
  87         "       bnezl  $0, 1f           \n" /* Force mispredict */      \
  88         "1:                             \n");
  89
  90 /*
  91  * Writeback and invalidate the entire dcache
  92  */
  93 static inline void __sb1_writeback_inv_dcache_all(void)
  94 {
  95         unsigned long addr = 0;
  96
  97         while (addr < dcache_line_size * dcache_sets) {
  98                 cache_set_op(Index_Writeback_Inv_D, addr);
  99                 addr += dcache_line_size;
 100         }
 101 }
 102
 103 /*
 104  * Writeback and invalidate a range of the dcache.  The addresses are
 105  * virtual, and since we're using index ops and bit 12 is part of both
 106  * the virtual frame and physical index, we have to clear both sets
 107  * (bit 12 set and cleared).
 108  */
 109 static inline void __sb1_writeback_inv_dcache_range(unsigned long start,
 110         unsigned long end)
 111 {
 112         unsigned long index;
 113
 114         start &= ~(dcache_line_size - 1);
 115         end = (end + dcache_line_size - 1) & ~(dcache_line_size - 1);
 116
 117         while (start != end) {
 118                 index = start & dcache_index_mask;
 119                 cache_set_op(Index_Writeback_Inv_D, index);
 120                 cache_set_op(Index_Writeback_Inv_D, index ^ (1<<12));
 121                 start += dcache_line_size;
 122         }
 123         sync();
 124 }
 125
 126 /*
 127  * Writeback and invalidate a range of the dcache.  With physical
 128  * addresseses, we don't have to worry about possible bit 12 aliasing.
 129  * XXXKW is it worth turning on KX and using hit ops with xkphys?
 130  */
 131 static inline void __sb1_writeback_inv_dcache_phys_range(unsigned long start,
 132         unsigned long end)
 133 {
 134         start &= ~(dcache_line_size - 1);
 135         end = (end + dcache_line_size - 1) & ~(dcache_line_size - 1);
 136
 137         while (start != end) {
 138                 cache_set_op(Index_Writeback_Inv_D, start & dcache_index_mask);
 139                 start += dcache_line_size;
 140         }
 141         sync();
 142 }
 143
 144
 145 /*
 146  * Invalidate the entire icache
 147  */
 148 static inline void __sb1_flush_icache_all(void)
 149 {
 150         unsigned long addr = 0;
 151
 152         while (addr < icache_line_size * icache_sets) {
 153                 cache_set_op(Index_Invalidate_I, addr);
 154                 addr += icache_line_size;
 155         }
 156 }
 157
 158 /*
 159  * Flush the icache for a given physical page.  Need to writeback the
 160  * dcache first, then invalidate the icache.  If the page isn't
 161  * executable, nothing is required.
 162  */
 163 static void local_sb1_flush_cache_page(struct vm_area_struct *vma, unsigned long addr, unsigned long pfn)
 164 {
 165         int cpu = smp_processor_id();
 166
 167 #ifndef CONFIG_SMP
 168         if (!(vma->vm_flags & VM_EXEC))
 169                 return;
 170 #endif
 171
 172         __sb1_writeback_inv_dcache_range(addr, addr + PAGE_SIZE);
 173
 174         /*
 175          * Bumping the ASID is probably cheaper than the flush ...
 176          */
 177         if (cpu_context(cpu, vma->vm_mm) != 0)
 178                 drop_mmu_context(vma->vm_mm, cpu);
 179 }
 180
 181 #ifdef CONFIG_SMP
 182 struct flush_cache_page_args {
 183         struct vm_area_struct *vma;
 184         unsigned long addr;
 185         unsigned long pfn;
 186 };
 187
 188 static void sb1_flush_cache_page_ipi(void *info)
 189 {
 190         struct flush_cache_page_args *args = info;
 191
 192         local_sb1_flush_cache_page(args->vma, args->addr, args->pfn);
 193 }
 194
 195 /* Dirty dcache could be on another CPU, so do the IPIs */
 196 static void sb1_flush_cache_page(struct vm_area_struct *vma, unsigned long addr, unsigned long pfn)
 197 {
 198         struct flush_cache_page_args args;
 199
 200         if (!(vma->vm_flags & VM_EXEC))
 201                 return;
 202
 203         addr &= PAGE_MASK;
 204         args.vma = vma;
 205         args.addr = addr;
 206         args.pfn = pfn;
 207         on_each_cpu(sb1_flush_cache_page_ipi, (void *) &args, 1, 1);
 208 }
 209 #else
 210 void sb1_flush_cache_page(struct vm_area_struct *vma, unsigned long addr, unsigned long pfn)
 211         __attribute__((alias("local_sb1_flush_cache_page")));
 212 #endif
 213
 214 /*
 215  * Invalidate a range of the icache.  The addresses are virtual, and
 216  * the cache is virtually indexed and tagged.  However, we don't
 217  * necessarily have the right ASID context, so use index ops instead
 218  * of hit ops.
 219  */
 220 static inline void __sb1_flush_icache_range(unsigned long start,
 221         unsigned long end)
 222 {
 223         start &= ~(icache_line_size - 1);
 224         end = (end + icache_line_size - 1) & ~(icache_line_size - 1);
 225
 226         while (start != end) {
 227                 cache_set_op(Index_Invalidate_I, start & icache_index_mask);
 228                 start += icache_line_size;
 229         }
 230         mispredict();
 231         sync();
 232 }
 233
 234
 235 /*
 236  * Invalidate all caches on this CPU
 237  */
 238 static void __attribute_used__ local_sb1___flush_cache_all(void)
 239 {
 240         __sb1_writeback_inv_dcache_all();
 241         __sb1_flush_icache_all();
 242 }
 243
 244 #ifdef CONFIG_SMP
 245 void sb1___flush_cache_all_ipi(void *ignored)
 246         __attribute__((alias("local_sb1___flush_cache_all")));
 247
 248 static void sb1___flush_cache_all(void)
 249 {
 250         on_each_cpu(sb1___flush_cache_all_ipi, 0, 1, 1);
 251 }
 252 #else
 253 void sb1___flush_cache_all(void)
 254         __attribute__((alias("local_sb1___flush_cache_all")));
 255 #endif
 256
 257 /*
 258  * When flushing a range in the icache, we have to first writeback
 259  * the dcache for the same range, so new ifetches will see any
 260  * data that was dirty in the dcache.
 261  *
 262  * The start/end arguments are Kseg addresses (possibly mapped Kseg).
 263  */
 264
 265 static void local_sb1_flush_icache_range(unsigned long start,
 266         unsigned long end)
 267 {
 268         /* Just wb-inv the whole dcache if the range is big enough */
 269         if ((end - start) > dcache_range_cutoff)
 270                 __sb1_writeback_inv_dcache_all();
 271         else
 272                 __sb1_writeback_inv_dcache_range(start, end);
 273
 274         /* Just flush the whole icache if the range is big enough */
 275         if ((end - start) > icache_range_cutoff)
 276                 __sb1_flush_icache_all();
 277         else
 278                 __sb1_flush_icache_range(start, end);
 279 }
 280
 281 #ifdef CONFIG_SMP
 282 struct flush_icache_range_args {
 283         unsigned long start;
 284         unsigned long end;
 285 };
 286
 287 static void sb1_flush_icache_range_ipi(void *info)
 288 {
 289         struct flush_icache_range_args *args = info;
 290
 291         local_sb1_flush_icache_range(args->start, args->end);
 292 }
 293
 294 void sb1_flush_icache_range(unsigned long start, unsigned long end)
 295 {
 296         struct flush_icache_range_args args;
 297
 298         args.start = start;
 299         args.end = end;
 300         on_each_cpu(sb1_flush_icache_range_ipi, &args, 1, 1);
 301 }
 302 #else
 303 void sb1_flush_icache_range(unsigned long start, unsigned long end)
 304         __attribute__((alias("local_sb1_flush_icache_range")));
 305 #endif
 306
 307 /*
 308  * Flush the icache for a given physical page.  Need to writeback the
 309  * dcache first, then invalidate the icache.  If the page isn't
 310  * executable, nothing is required.
 311  */
 312 static void local_sb1_flush_icache_page(struct vm_area_struct *vma,
 313         struct page *page)
 314 {
 315         unsigned long start;
 316         int cpu = smp_processor_id();
 317
 318 #ifndef CONFIG_SMP
 319         if (!(vma->vm_flags & VM_EXEC))
 320                 return;
 321 #endif
 322
 323         /* Need to writeback any dirty data for that page, we have the PA */
 324         start = (unsigned long)(page-mem_map) << PAGE_SHIFT;
 325         __sb1_writeback_inv_dcache_phys_range(start, start + PAGE_SIZE);
 326         /*
 327          * If there's a context, bump the ASID (cheaper than a flush,
 328          * since we don't know VAs!)
 329          */
 330         if (cpu_context(cpu, vma->vm_mm) != 0) {
 331                 drop_mmu_context(vma->vm_mm, cpu);
 332         }
 333 }
 334
 335 #ifdef CONFIG_SMP
 336 struct flush_icache_page_args {
 337         struct vm_area_struct *vma;
 338         struct page *page;
 339 };
 340
 341 static void sb1_flush_icache_page_ipi(void *info)
 342 {
 343         struct flush_icache_page_args *args = info;
 344         local_sb1_flush_icache_page(args->vma, args->page);
 345 }
 346
 347 /* Dirty dcache could be on another CPU, so do the IPIs */
 348 static void sb1_flush_icache_page(struct vm_area_struct *vma,
 349         struct page *page)
 350 {
 351         struct flush_icache_page_args args;
 352
 353         if (!(vma->vm_flags & VM_EXEC))
 354                 return;
 355         args.vma = vma;
 356         args.page = page;
 357         on_each_cpu(sb1_flush_icache_page_ipi, (void *) &args, 1, 1);
 358 }
 359 #else
 360 void sb1_flush_icache_page(struct vm_area_struct *vma, struct page *page)
 361         __attribute__((alias("local_sb1_flush_icache_page")));
 362 #endif
 363
 364 /*
 365  * A signal trampoline must fit into a single cacheline.
 366  */
 367 static void local_sb1_flush_cache_sigtramp(unsigned long addr)
 368 {
 369         cache_set_op(Index_Writeback_Inv_D, addr & dcache_index_mask);
 370         cache_set_op(Index_Writeback_Inv_D, (addr ^ (1<<12)) & dcache_index_mask);
 371         cache_set_op(Index_Invalidate_I, addr & icache_index_mask);
 372         mispredict();
 373 }
 374
 375 #ifdef CONFIG_SMP
 376 static void sb1_flush_cache_sigtramp_ipi(void *info)
 377 {
 378         unsigned long iaddr = (unsigned long) info;
 379         local_sb1_flush_cache_sigtramp(iaddr);
 380 }
 381
 382 static void sb1_flush_cache_sigtramp(unsigned long addr)
 383 {
 384         on_each_cpu(sb1_flush_cache_sigtramp_ipi, (void *) addr, 1, 1);
 385 }
 386 #else
 387 void sb1_flush_cache_sigtramp(unsigned long addr)
 388         __attribute__((alias("local_sb1_flush_cache_sigtramp")));
 389 #endif
 390
 391
 392 /*
 393  * Anything that just flushes dcache state can be ignored, as we're always
 394  * coherent in dcache space.  This is just a dummy function that all the
 395  * nop'ed routines point to
 396  */
 397 static void sb1_nop(void)
 398 {
 399 }
 400
 401 /*
 402  *  Cache set values (from the mips64 spec)
 403  * 0 - 64
 404  * 1 - 128
 405  * 2 - 256
 406  * 3 - 512
 407  * 4 - 1024
 408  * 5 - 2048
 409  * 6 - 4096
 410  * 7 - Reserved
 411  */
 412
 413 static unsigned int decode_cache_sets(unsigned int config_field)
 414 {
 415         if (config_field == 7) {
 416                 /* JDCXXX - Find a graceful way to abort. */
 417                 return 0;
 418         }
 419         return (1<<(config_field + 6));
 420 }
 421
 422 /*
 423  *  Cache line size values (from the mips64 spec)
 424  * 0 - No cache present.
 425  * 1 - 4 bytes
 426  * 2 - 8 bytes
 427  * 3 - 16 bytes
 428  * 4 - 32 bytes
 429  * 5 - 64 bytes
 430  * 6 - 128 bytes
 431  * 7 - Reserved
 432  */
 433
 434 static unsigned int decode_cache_line_size(unsigned int config_field)
 435 {
 436         if (config_field == 0) {
 437                 return 0;
 438         } else if (config_field == 7) {
 439                 /* JDCXXX - Find a graceful way to abort. */
 440                 return 0;
 441         }
 442         return (1<<(config_field + 1));
 443 }
 444
 445 /*
 446  * Relevant bits of the config1 register format (from the MIPS32/MIPS64 specs)
 447  *
 448  * 24:22 Icache sets per way
 449  * 21:19 Icache line size
 450  * 18:16 Icache Associativity
 451  * 15:13 Dcache sets per way
 452  * 12:10 Dcache line size
 453  * 9:7   Dcache Associativity
 454  */
 455
 456 static char *way_string[] = {
 457         "direct mapped", "2-way", "3-way", "4-way",
 458         "5-way", "6-way", "7-way", "8-way",
 459 };
 460
 461 static __init void probe_cache_sizes(void)
 462 {
 463         u32 config1;
 464
 465         config1 = read_c0_config1();
 466         icache_line_size = decode_cache_line_size((config1 >> 19) & 0x7);
 467         dcache_line_size = decode_cache_line_size((config1 >> 10) & 0x7);
 468         icache_sets = decode_cache_sets((config1 >> 22) & 0x7);
 469         dcache_sets = decode_cache_sets((config1 >> 13) & 0x7);
 470         icache_assoc = ((config1 >> 16) & 0x7) + 1;
 471         dcache_assoc = ((config1 >> 7) & 0x7) + 1;
 472         icache_size = icache_line_size * icache_sets * icache_assoc;
 473         dcache_size = dcache_line_size * dcache_sets * dcache_assoc;
 474         /* Need to remove non-index bits for index ops */
 475         icache_index_mask = (icache_sets - 1) * icache_line_size;
 476         dcache_index_mask = (dcache_sets - 1) * dcache_line_size;
 477         /*
 478          * These are for choosing range (index ops) versus all.
 479          * icache flushes all ways for each set, so drop icache_assoc.
 480          * dcache flushes all ways and each setting of bit 12 for each
 481          * index, so drop dcache_assoc and halve the dcache_sets.
 482          */
 483         icache_range_cutoff = icache_sets * icache_line_size;
 484         dcache_range_cutoff = (dcache_sets / 2) * icache_line_size;
 485
 486         printk("Primary instruction cache %ldkB, %s, linesize %d bytes.\n",
 487                icache_size >> 10, way_string[icache_assoc - 1],
 488                icache_line_size);
 489         printk("Primary data cache %ldkB, %s, linesize %d bytes.\n",
 490                dcache_size >> 10, way_string[dcache_assoc - 1],
 491                dcache_line_size);
 492 }
 493
 494 /*
 495  * This is called from cache.c.  We have to set up all the
 496  * memory management function pointers, as well as initialize
 497  * the caches and tlbs
 498  */
 499 void sb1_cache_init(void)
 500 {
 501         extern char except_vec2_sb1;
 502         extern char handle_vec2_sb1;
 503
 504         /* Special cache error handler for SB1 */
 505         set_uncached_handler (0x100, &except_vec2_sb1, 0x80);
 506
 507         probe_cache_sizes();
 508
 509 #ifdef CONFIG_SIBYTE_DMA_PAGEOPS
 510         sb1_dma_init();
 511 #endif
 512
 513         /*
 514          * None of these are needed for the SB1 - the Dcache is
 515          * physically indexed and tagged, so no virtual aliasing can
 516          * occur
 517          */
 518         flush_cache_range = (void *) sb1_nop;
 519         flush_cache_mm = (void (*)(struct mm_struct *))sb1_nop;
 520         flush_cache_all = sb1_nop;
 521
 522         /* These routines are for Icache coherence with the Dcache */
 523         flush_icache_range = sb1_flush_icache_range;
 524         flush_icache_page = sb1_flush_icache_page;
 525         flush_icache_all = __sb1_flush_icache_all; /* local only */
 526
 527         /* This implies an Icache flush too, so can't be nop'ed */
 528         flush_cache_page = sb1_flush_cache_page;
 529
 530         flush_cache_sigtramp = sb1_flush_cache_sigtramp;
 531         local_flush_data_cache_page = (void *) sb1_nop;
 532         flush_data_cache_page = (void *) sb1_nop;
 533
 534         /* Full flush */
 535         __flush_cache_all = sb1___flush_cache_all;
 536
 537         change_c0_config(CONF_CM_CMASK, CONF_CM_DEFAULT);
 538
 539         /*
 540          * This is the only way to force the update of K0 to complete
 541          * before subsequent instruction fetch.
 542          */
 543         __asm__ __volatile__(
 544                 ".set   push                    \n"
 545         "       .set    noat                    \n"
 546         "       .set    noreorder               \n"
 547         "       .set    mips3                   \n"
 548         "       " STR(PTR_LA) " $1, 1f          \n"
 549         "       " STR(MTC0) "   $1, $14         \n"
 550         "       eret                            \n"
 551         "1:     .set    pop"
 552         :
 553         :
 554         : "memory");
 555
 556         flush_cache_all();
 557 }