SAFE public projects git trees. - safe/jmp/linux-2.6/blob - arch/mips/kernel/smp_mt.c

   1 /*
   2  * Copyright (C) 2004, 2005 MIPS Technologies, Inc.  All rights reserved.
   3  *
   4  *  Elizabeth Clarke (beth@mips.com)
   5  *
   6  *  This program is free software; you can distribute it and/or modify it
   7  *  under the terms of the GNU General Public License (Version 2) as
   8  *  published by the Free Software Foundation.
   9  *
  10  *  This program is distributed in the hope it will be useful, but WITHOUT
  11  *  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  12  *  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  13  *  for more details.
  14  *
  15  *  You should have received a copy of the GNU General Public License along
  16  *  with this program; if not, write to the Free Software Foundation, Inc.,
  17  *  59 Temple Place - Suite 330, Boston MA 02111-1307, USA.
  18  *
  19  */
  20 #include <linux/kernel.h>
  21 #include <linux/sched.h>
  22 #include <linux/cpumask.h>
  23 #include <linux/interrupt.h>
  24 #include <linux/compiler.h>
  25
  26 #include <asm/atomic.h>
  27 #include <asm/cpu.h>
  28 #include <asm/processor.h>
  29 #include <asm/system.h>
  30 #include <asm/hardirq.h>
  31 #include <asm/mmu_context.h>
  32 #include <asm/smp.h>
  33 #include <asm/time.h>
  34 #include <asm/mipsregs.h>
  35 #include <asm/mipsmtregs.h>
  36 #include <asm/cacheflush.h>
  37 #include <asm/mips-boards/maltaint.h>
  38
  39 #define MIPS_CPU_IPI_RESCHED_IRQ 0
  40 #define MIPS_CPU_IPI_CALL_IRQ 1
  41
  42 static int cpu_ipi_resched_irq, cpu_ipi_call_irq;
  43
  44 #if 0
  45 static void dump_mtregisters(int vpe, int tc)
  46 {
  47         printk("vpe %d tc %d\n", vpe, tc);
  48
  49         settc(tc);
  50
  51         printk("  c0 status  0x%lx\n", read_vpe_c0_status());
  52         printk("  vpecontrol 0x%lx\n", read_vpe_c0_vpecontrol());
  53         printk("  vpeconf0    0x%lx\n", read_vpe_c0_vpeconf0());
  54         printk("  tcstatus 0x%lx\n", read_tc_c0_tcstatus());
  55         printk("  tcrestart 0x%lx\n", read_tc_c0_tcrestart());
  56         printk("  tcbind 0x%lx\n", read_tc_c0_tcbind());
  57         printk("  tchalt 0x%lx\n", read_tc_c0_tchalt());
  58 }
  59 #endif
  60
  61 void __init sanitize_tlb_entries(void)
  62 {
  63         int i, tlbsiz;
  64         unsigned long mvpconf0, ncpu;
  65
  66         if (!cpu_has_mipsmt)
  67                 return;
  68
  69         set_c0_mvpcontrol(MVPCONTROL_VPC);
  70
  71         /* Disable TLB sharing */
  72         clear_c0_mvpcontrol(MVPCONTROL_STLB);
  73
  74         mvpconf0 = read_c0_mvpconf0();
  75
  76         printk(KERN_INFO "MVPConf0 0x%lx TLBS %lx PTLBE %ld\n", mvpconf0,
  77                    (mvpconf0 & MVPCONF0_TLBS) >> MVPCONF0_TLBS_SHIFT,
  78                            (mvpconf0 & MVPCONF0_PTLBE) >> MVPCONF0_PTLBE_SHIFT);
  79
  80         tlbsiz = (mvpconf0 & MVPCONF0_PTLBE) >> MVPCONF0_PTLBE_SHIFT;
  81         ncpu = ((mvpconf0 & MVPCONF0_PVPE) >> MVPCONF0_PVPE_SHIFT) + 1;
  82
  83         printk(" tlbsiz %d ncpu %ld\n", tlbsiz, ncpu);
  84
  85         if (tlbsiz > 0) {
  86                 /* share them out across the vpe's */
  87                 tlbsiz /= ncpu;
  88
  89                 printk(KERN_INFO "setting Config1.MMU_size to %d\n", tlbsiz);
  90
  91                 for (i = 0; i < ncpu; i++) {
  92                         settc(i);
  93
  94                         if (i == 0)
  95                                 write_c0_config1((read_c0_config1() & ~(0x3f << 25)) | (tlbsiz << 25));
  96                         else
  97                                 write_vpe_c0_config1((read_vpe_c0_config1() & ~(0x3f << 25)) |
  98                                                    (tlbsiz << 25));
  99                 }
 100         }
 101
 102         clear_c0_mvpcontrol(MVPCONTROL_VPC);
 103 }
 104
 105 static void ipi_resched_dispatch (struct pt_regs *regs)
 106 {
 107         do_IRQ(MIPS_CPU_IPI_RESCHED_IRQ, regs);
 108 }
 109
 110 static void ipi_call_dispatch (struct pt_regs *regs)
 111 {
 112         do_IRQ(MIPS_CPU_IPI_CALL_IRQ, regs);
 113 }
 114
 115 irqreturn_t ipi_resched_interrupt(int irq, void *dev_id, struct pt_regs *regs)
 116 {
 117         return IRQ_HANDLED;
 118 }
 119
 120 irqreturn_t ipi_call_interrupt(int irq, void *dev_id, struct pt_regs *regs)
 121 {
 122         smp_call_function_interrupt();
 123
 124         return IRQ_HANDLED;
 125 }
 126
 127 static struct irqaction irq_resched = {
 128         .handler        = ipi_resched_interrupt,
 129         .flags          = SA_INTERRUPT,
 130         .name           = "IPI_resched"
 131 };
 132
 133 static struct irqaction irq_call = {
 134         .handler        = ipi_call_interrupt,
 135         .flags          = SA_INTERRUPT,
 136         .name           = "IPI_call"
 137 };
 138
 139 /*
 140  * Common setup before any secondaries are started
 141  * Make sure all CPU's are in a sensible state before we boot any of the
 142  * secondarys
 143  */
 144 void prom_prepare_cpus(unsigned int max_cpus)
 145 {
 146         unsigned long val;
 147         int i, num;
 148
 149         if (!cpu_has_mipsmt)
 150                 return;
 151
 152         /* disable MT so we can configure */
 153         dvpe();
 154         dmt();
 155
 156         /* Put MVPE's into 'configuration state' */
 157         set_c0_mvpcontrol(MVPCONTROL_VPC);
 158
 159         val = read_c0_mvpconf0();
 160
 161         /* we'll always have more TC's than VPE's, so loop setting everything
 162            to a sensible state */
 163         for (i = 0, num = 0; i <= ((val & MVPCONF0_PTC) >> MVPCONF0_PTC_SHIFT); i++) {
 164                 settc(i);
 165
 166                 /* VPE's */
 167                 if (i <= ((val & MVPCONF0_PVPE) >> MVPCONF0_PVPE_SHIFT)) {
 168
 169                         /* deactivate all but vpe0 */
 170                         if (i != 0) {
 171                                 unsigned long tmp = read_vpe_c0_vpeconf0();
 172
 173                                 tmp &= ~VPECONF0_VPA;
 174
 175                                 /* master VPE */
 176                                 tmp |= VPECONF0_MVP;
 177                                 write_vpe_c0_vpeconf0(tmp);
 178
 179                                 /* Record this as available CPU */
 180                                 if (i < max_cpus) {
 181                                         cpu_set(i, phys_cpu_present_map);
 182                                         __cpu_number_map[i]     = ++num;
 183                                         __cpu_logical_map[num]  = i;
 184                                 }
 185                         }
 186
 187                         /* disable multi-threading with TC's */
 188                         write_vpe_c0_vpecontrol(read_vpe_c0_vpecontrol() & ~VPECONTROL_TE);
 189
 190                         if (i != 0) {
 191                                 write_vpe_c0_status((read_c0_status() & ~(ST0_IM | ST0_IE | ST0_KSU)) | ST0_CU0);
 192                                 write_vpe_c0_cause(read_vpe_c0_cause() & ~CAUSEF_IP);
 193
 194                                 /* set config to be the same as vpe0, particularly kseg0 coherency alg */
 195                                 write_vpe_c0_config( read_c0_config());
 196                         }
 197
 198                 }
 199
 200                 /* TC's */
 201
 202                 if (i != 0) {
 203                         unsigned long tmp;
 204
 205                         /* bind a TC to each VPE, May as well put all excess TC's
 206                            on the last VPE */
 207                         if ( i >= (((val & MVPCONF0_PVPE) >> MVPCONF0_PVPE_SHIFT)+1) )
 208                                 write_tc_c0_tcbind(read_tc_c0_tcbind() | ((val & MVPCONF0_PVPE) >> MVPCONF0_PVPE_SHIFT) );
 209                         else {
 210                                 write_tc_c0_tcbind( read_tc_c0_tcbind() | i);
 211
 212                                 /* and set XTC */
 213                                 write_vpe_c0_vpeconf0( read_vpe_c0_vpeconf0() | (i << VPECONF0_XTC_SHIFT));
 214                         }
 215
 216                         tmp = read_tc_c0_tcstatus();
 217
 218                         /* mark not allocated and not dynamically allocatable */
 219                         tmp &= ~(TCSTATUS_A | TCSTATUS_DA);
 220                         tmp |= TCSTATUS_IXMT;           /* interrupt exempt */
 221                         write_tc_c0_tcstatus(tmp);
 222
 223                         write_tc_c0_tchalt(TCHALT_H);
 224                 }
 225         }
 226
 227         /* Release config state */
 228         clear_c0_mvpcontrol(MVPCONTROL_VPC);
 229
 230         /* We'll wait until starting the secondaries before starting MVPE */
 231
 232         printk(KERN_INFO "Detected %i available secondary CPU(s)\n", num);
 233
 234         /* set up ipi interrupts */
 235         if (cpu_has_vint) {
 236                 set_vi_handler (MIPS_CPU_IPI_RESCHED_IRQ, ipi_resched_dispatch);
 237                 set_vi_handler (MIPS_CPU_IPI_CALL_IRQ, ipi_call_dispatch);
 238         }
 239
 240         cpu_ipi_resched_irq = MIPSCPU_INT_BASE + MIPS_CPU_IPI_RESCHED_IRQ;
 241         cpu_ipi_call_irq = MIPSCPU_INT_BASE + MIPS_CPU_IPI_CALL_IRQ;
 242
 243         setup_irq(cpu_ipi_resched_irq, &irq_resched);
 244         setup_irq(cpu_ipi_call_irq, &irq_call);
 245
 246         /* need to mark IPI's as IRQ_PER_CPU */
 247         irq_desc[cpu_ipi_resched_irq].status |= IRQ_PER_CPU;
 248         irq_desc[cpu_ipi_call_irq].status |= IRQ_PER_CPU;
 249 }
 250
 251 /*
 252  * Setup the PC, SP, and GP of a secondary processor and start it
 253  * running!
 254  * smp_bootstrap is the place to resume from
 255  * __KSTK_TOS(idle) is apparently the stack pointer
 256  * (unsigned long)idle->thread_info the gp
 257  * assumes a 1:1 mapping of TC => VPE
 258  */
 259 void prom_boot_secondary(int cpu, struct task_struct *idle)
 260 {
 261         struct thread_info *gp = task_thread_info(idle);
 262         dvpe();
 263         set_c0_mvpcontrol(MVPCONTROL_VPC);
 264
 265         settc(cpu);
 266
 267         /* restart */
 268         write_tc_c0_tcrestart((unsigned long)&smp_bootstrap);
 269
 270         /* enable the tc this vpe/cpu will be running */
 271         write_tc_c0_tcstatus((read_tc_c0_tcstatus() & ~TCSTATUS_IXMT) | TCSTATUS_A);
 272
 273         write_tc_c0_tchalt(0);
 274
 275         /* enable the VPE */
 276         write_vpe_c0_vpeconf0(read_vpe_c0_vpeconf0() | VPECONF0_VPA);
 277
 278         /* stack pointer */
 279         write_tc_gpr_sp( __KSTK_TOS(idle));
 280
 281         /* global pointer */
 282         write_tc_gpr_gp((unsigned long)gp);
 283
 284         flush_icache_range((unsigned long)gp, (unsigned long)(gp + 1));
 285
 286         /* finally out of configuration and into chaos */
 287         clear_c0_mvpcontrol(MVPCONTROL_VPC);
 288
 289         evpe(EVPE_ENABLE);
 290 }
 291
 292 void prom_init_secondary(void)
 293 {
 294         write_c0_status((read_c0_status() & ~ST0_IM ) |
 295                         (STATUSF_IP0 | STATUSF_IP1 | STATUSF_IP7));
 296 }
 297
 298 void prom_smp_finish(void)
 299 {
 300         write_c0_compare(read_c0_count() + (8* mips_hpt_frequency/HZ));
 301
 302         local_irq_enable();
 303 }
 304
 305 void prom_cpus_done(void)
 306 {
 307 }
 308
 309 void core_send_ipi(int cpu, unsigned int action)
 310 {
 311         int i;
 312         unsigned long flags;
 313         int vpflags;
 314
 315         local_irq_save (flags);
 316
 317         vpflags = dvpe();       /* cant access the other CPU's registers whilst MVPE enabled */
 318
 319         switch (action) {
 320         case SMP_CALL_FUNCTION:
 321                 i = C_SW1;
 322                 break;
 323
 324         case SMP_RESCHEDULE_YOURSELF:
 325         default:
 326                 i = C_SW0;
 327                 break;
 328         }
 329
 330         /* 1:1 mapping of vpe and tc... */
 331         settc(cpu);
 332         write_vpe_c0_cause(read_vpe_c0_cause() | i);
 333         evpe(vpflags);
 334
 335         local_irq_restore(flags);
 336 }