arch/blackfin/mach-common/smp.c

   1 /*
   2  * File:         arch/blackfin/kernel/smp.c
   3  * Author:       Philippe Gerum <rpm@xenomai.org>
   4  * IPI management based on arch/arm/kernel/smp.c.
   5  *
   6  *               Copyright 2007 Analog Devices Inc.
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, see the file COPYING, or write
  20  * to the Free Software Foundation, Inc.,
  21  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  22  */
  23
  24 #include <linux/module.h>
  25 #include <linux/delay.h>
  26 #include <linux/init.h>
  27 #include <linux/spinlock.h>
  28 #include <linux/sched.h>
  29 #include <linux/interrupt.h>
  30 #include <linux/cache.h>
  31 #include <linux/profile.h>
  32 #include <linux/errno.h>
  33 #include <linux/mm.h>
  34 #include <linux/cpu.h>
  35 #include <linux/smp.h>
  36 #include <linux/seq_file.h>
  37 #include <linux/irq.h>
  38 #include <asm/atomic.h>
  39 #include <asm/cacheflush.h>
  40 #include <asm/mmu_context.h>
  41 #include <asm/pgtable.h>
  42 #include <asm/pgalloc.h>
  43 #include <asm/processor.h>
  44 #include <asm/ptrace.h>
  45 #include <asm/cpu.h>
  46 #include <linux/err.h>
  47
  48 struct corelock_slot corelock __attribute__ ((__section__(".l2.bss")));
  49
  50 void __cpuinitdata *init_retx_coreb, *init_saved_retx_coreb,
  51         *init_saved_seqstat_coreb, *init_saved_icplb_fault_addr_coreb,
  52         *init_saved_dcplb_fault_addr_coreb;
  53
  54 cpumask_t cpu_possible_map;
  55 EXPORT_SYMBOL(cpu_possible_map);
  56
  57 cpumask_t cpu_online_map;
  58 EXPORT_SYMBOL(cpu_online_map);
  59
  60 #define BFIN_IPI_RESCHEDULE   0
  61 #define BFIN_IPI_CALL_FUNC    1
  62 #define BFIN_IPI_CPU_STOP     2
  63
  64 struct blackfin_flush_data {
  65         unsigned long start;
  66         unsigned long end;
  67 };
  68
  69 void *secondary_stack;
  70
  71
  72 struct smp_call_struct {
  73         void (*func)(void *info);
  74         void *info;
  75         int wait;
  76         cpumask_t pending;
  77         cpumask_t waitmask;
  78 };
  79
  80 static struct blackfin_flush_data smp_flush_data;
  81
  82 static DEFINE_SPINLOCK(stop_lock);
  83
  84 struct ipi_message {
  85         struct list_head list;
  86         unsigned long type;
  87         struct smp_call_struct call_struct;
  88 };
  89
  90 struct ipi_message_queue {
  91         struct list_head head;
  92         spinlock_t lock;
  93         unsigned long count;
  94 };
  95
  96 static DEFINE_PER_CPU(struct ipi_message_queue, ipi_msg_queue);
  97
  98 static void ipi_cpu_stop(unsigned int cpu)
  99 {
 100         spin_lock(&stop_lock);
 101         printk(KERN_CRIT "CPU%u: stopping\n", cpu);
 102         dump_stack();
 103         spin_unlock(&stop_lock);
 104
 105         cpu_clear(cpu, cpu_online_map);
 106
 107         local_irq_disable();
 108
 109         while (1)
 110                 SSYNC();
 111 }
 112
 113 static void ipi_flush_icache(void *info)
 114 {
 115         struct blackfin_flush_data *fdata = info;
 116
 117         /* Invalidate the memory holding the bounds of the flushed region. */
 118         blackfin_dcache_invalidate_range((unsigned long)fdata,
 119                                          (unsigned long)fdata + sizeof(*fdata));
 120
 121         blackfin_icache_flush_range(fdata->start, fdata->end);
 122 }
 123
 124 static void ipi_call_function(unsigned int cpu, struct ipi_message *msg)
 125 {
 126         int wait;
 127         void (*func)(void *info);
 128         void *info;
 129         func = msg->call_struct.func;
 130         info = msg->call_struct.info;
 131         wait = msg->call_struct.wait;
 132         cpu_clear(cpu, msg->call_struct.pending);
 133         func(info);
 134         if (wait)
 135                 cpu_clear(cpu, msg->call_struct.waitmask);
 136         else
 137                 kfree(msg);
 138 }
 139
 140 static irqreturn_t ipi_handler(int irq, void *dev_instance)
 141 {
 142         struct ipi_message *msg, *mg;
 143         struct ipi_message_queue *msg_queue;
 144         unsigned int cpu = smp_processor_id();
 145
 146         platform_clear_ipi(cpu);
 147
 148         msg_queue = &__get_cpu_var(ipi_msg_queue);
 149         msg_queue->count++;
 150
 151         spin_lock(&msg_queue->lock);
 152         list_for_each_entry_safe(msg, mg, &msg_queue->head, list) {
 153                 list_del(&msg->list);
 154                 switch (msg->type) {
 155                 case BFIN_IPI_RESCHEDULE:
 156                         /* That's the easiest one; leave it to
 157                          * return_from_int. */
 158                         kfree(msg);
 159                         break;
 160                 case BFIN_IPI_CALL_FUNC:
 161                         spin_unlock(&msg_queue->lock);
 162                         ipi_call_function(cpu, msg);
 163                         spin_lock(&msg_queue->lock);
 164                         break;
 165                 case BFIN_IPI_CPU_STOP:
 166                         spin_unlock(&msg_queue->lock);
 167                         ipi_cpu_stop(cpu);
 168                         spin_lock(&msg_queue->lock);
 169                         kfree(msg);
 170                         break;
 171                 default:
 172                         printk(KERN_CRIT "CPU%u: Unknown IPI message \
 173                         0x%lx\n", cpu, msg->type);
 174                         kfree(msg);
 175                         break;
 176                 }
 177         }
 178         spin_unlock(&msg_queue->lock);
 179         return IRQ_HANDLED;
 180 }
 181
 182 static void ipi_queue_init(void)
 183 {
 184         unsigned int cpu;
 185         struct ipi_message_queue *msg_queue;
 186         for_each_possible_cpu(cpu) {
 187                 msg_queue = &per_cpu(ipi_msg_queue, cpu);
 188                 INIT_LIST_HEAD(&msg_queue->head);
 189                 spin_lock_init(&msg_queue->lock);
 190                 msg_queue->count = 0;
 191         }
 192 }
 193
 194 int smp_call_function(void (*func)(void *info), void *info, int wait)
 195 {
 196         unsigned int cpu;
 197         cpumask_t callmap;
 198         unsigned long flags;
 199         struct ipi_message_queue *msg_queue;
 200         struct ipi_message *msg;
 201
 202         callmap = cpu_online_map;
 203         cpu_clear(smp_processor_id(), callmap);
 204         if (cpus_empty(callmap))
 205                 return 0;
 206
 207         msg = kmalloc(sizeof(*msg), GFP_ATOMIC);
 208         INIT_LIST_HEAD(&msg->list);
 209         msg->call_struct.func = func;
 210         msg->call_struct.info = info;
 211         msg->call_struct.wait = wait;
 212         msg->call_struct.pending = callmap;
 213         msg->call_struct.waitmask = callmap;
 214         msg->type = BFIN_IPI_CALL_FUNC;
 215
 216         for_each_cpu_mask(cpu, callmap) {
 217                 msg_queue = &per_cpu(ipi_msg_queue, cpu);
 218                 spin_lock_irqsave(&msg_queue->lock, flags);
 219                 list_add(&msg->list, &msg_queue->head);
 220                 spin_unlock_irqrestore(&msg_queue->lock, flags);
 221                 platform_send_ipi_cpu(cpu);
 222         }
 223         if (wait) {
 224                 while (!cpus_empty(msg->call_struct.waitmask))
 225                         blackfin_dcache_invalidate_range(
 226                                 (unsigned long)(&msg->call_struct.waitmask),
 227                                 (unsigned long)(&msg->call_struct.waitmask));
 228                 kfree(msg);
 229         }
 230         return 0;
 231 }
 232 EXPORT_SYMBOL_GPL(smp_call_function);
 233
 234 int smp_call_function_single(int cpuid, void (*func) (void *info), void *info,
 235                                 int wait)
 236 {
 237         unsigned int cpu = cpuid;
 238         cpumask_t callmap;
 239         unsigned long flags;
 240         struct ipi_message_queue *msg_queue;
 241         struct ipi_message *msg;
 242
 243         if (cpu_is_offline(cpu))
 244                 return 0;
 245         cpus_clear(callmap);
 246         cpu_set(cpu, callmap);
 247
 248         msg = kmalloc(sizeof(*msg), GFP_ATOMIC);
 249         INIT_LIST_HEAD(&msg->list);
 250         msg->call_struct.func = func;
 251         msg->call_struct.info = info;
 252         msg->call_struct.wait = wait;
 253         msg->call_struct.pending = callmap;
 254         msg->call_struct.waitmask = callmap;
 255         msg->type = BFIN_IPI_CALL_FUNC;
 256
 257         msg_queue = &per_cpu(ipi_msg_queue, cpu);
 258         spin_lock_irqsave(&msg_queue->lock, flags);
 259         list_add(&msg->list, &msg_queue->head);
 260         spin_unlock_irqrestore(&msg_queue->lock, flags);
 261         platform_send_ipi_cpu(cpu);
 262
 263         if (wait) {
 264                 while (!cpus_empty(msg->call_struct.waitmask))
 265                         blackfin_dcache_invalidate_range(
 266                                 (unsigned long)(&msg->call_struct.waitmask),
 267                                 (unsigned long)(&msg->call_struct.waitmask));
 268                 kfree(msg);
 269         }
 270         return 0;
 271 }
 272 EXPORT_SYMBOL_GPL(smp_call_function_single);
 273
 274 void smp_send_reschedule(int cpu)
 275 {
 276         unsigned long flags;
 277         struct ipi_message_queue *msg_queue;
 278         struct ipi_message *msg;
 279
 280         if (cpu_is_offline(cpu))
 281                 return;
 282
 283         msg = kmalloc(sizeof(*msg), GFP_ATOMIC);
 284         memset(msg, 0, sizeof(msg));
 285         INIT_LIST_HEAD(&msg->list);
 286         msg->type = BFIN_IPI_RESCHEDULE;
 287
 288         msg_queue = &per_cpu(ipi_msg_queue, cpu);
 289         spin_lock_irqsave(&msg_queue->lock, flags);
 290         list_add(&msg->list, &msg_queue->head);
 291         spin_unlock_irqrestore(&msg_queue->lock, flags);
 292         platform_send_ipi_cpu(cpu);
 293
 294         return;
 295 }
 296
 297 void smp_send_stop(void)
 298 {
 299         unsigned int cpu;
 300         cpumask_t callmap;
 301         unsigned long flags;
 302         struct ipi_message_queue *msg_queue;
 303         struct ipi_message *msg;
 304
 305         callmap = cpu_online_map;
 306         cpu_clear(smp_processor_id(), callmap);
 307         if (cpus_empty(callmap))
 308                 return;
 309
 310         msg = kmalloc(sizeof(*msg), GFP_ATOMIC);
 311         memset(msg, 0, sizeof(msg));
 312         INIT_LIST_HEAD(&msg->list);
 313         msg->type = BFIN_IPI_CPU_STOP;
 314
 315         for_each_cpu_mask(cpu, callmap) {
 316                 msg_queue = &per_cpu(ipi_msg_queue, cpu);
 317                 spin_lock_irqsave(&msg_queue->lock, flags);
 318                 list_add(&msg->list, &msg_queue->head);
 319                 spin_unlock_irqrestore(&msg_queue->lock, flags);
 320                 platform_send_ipi_cpu(cpu);
 321         }
 322         return;
 323 }
 324
 325 int __cpuinit __cpu_up(unsigned int cpu)
 326 {
 327         struct task_struct *idle;
 328         int ret;
 329
 330         idle = fork_idle(cpu);
 331         if (IS_ERR(idle)) {
 332                 printk(KERN_ERR "CPU%u: fork() failed\n", cpu);
 333                 return PTR_ERR(idle);
 334         }
 335
 336         secondary_stack = task_stack_page(idle) + THREAD_SIZE;
 337         smp_wmb();
 338
 339         ret = platform_boot_secondary(cpu, idle);
 340
 341         if (ret) {
 342                 cpu_clear(cpu, cpu_present_map);
 343                 printk(KERN_CRIT "CPU%u: processor failed to boot (%d)\n", cpu, ret);
 344                 free_task(idle);
 345         } else
 346                 cpu_set(cpu, cpu_online_map);
 347
 348         secondary_stack = NULL;
 349
 350         return ret;
 351 }
 352
 353 static void __cpuinit setup_secondary(unsigned int cpu)
 354 {
 355 #if !(defined(CONFIG_TICK_SOURCE_SYSTMR0) || defined(CONFIG_IPIPE))
 356         struct irq_desc *timer_desc;
 357 #endif
 358         unsigned long ilat;
 359
 360         bfin_write_IMASK(0);
 361         CSYNC();
 362         ilat = bfin_read_ILAT();
 363         CSYNC();
 364         bfin_write_ILAT(ilat);
 365         CSYNC();
 366
 367         /* Reserve the PDA space for the secondary CPU. */
 368         reserve_pda();
 369
 370         /* Enable interrupt levels IVG7-15. IARs have been already
 371          * programmed by the boot CPU.  */
 372         bfin_irq_flags |= IMASK_IVG15 |
 373             IMASK_IVG14 | IMASK_IVG13 | IMASK_IVG12 | IMASK_IVG11 |
 374             IMASK_IVG10 | IMASK_IVG9 | IMASK_IVG8 | IMASK_IVG7 | IMASK_IVGHW;
 375
 376 #if defined(CONFIG_TICK_SOURCE_SYSTMR0) || defined(CONFIG_IPIPE)
 377         /* Power down the core timer, just to play safe. */
 378         bfin_write_TCNTL(0);
 379
 380         /* system timer0 has been setup by CoreA. */
 381 #else
 382         timer_desc = irq_desc + IRQ_CORETMR;
 383         setup_core_timer();
 384         timer_desc->chip->enable(IRQ_CORETMR);
 385 #endif
 386 }
 387
 388 void __cpuinit secondary_start_kernel(void)
 389 {
 390         unsigned int cpu = smp_processor_id();
 391         struct mm_struct *mm = &init_mm;
 392
 393         if (_bfin_swrst & SWRST_DBL_FAULT_B) {
 394                 printk(KERN_EMERG "CoreB Recovering from DOUBLE FAULT event\n");
 395 #ifdef CONFIG_DEBUG_DOUBLEFAULT
 396                 printk(KERN_EMERG " While handling exception (EXCAUSE = 0x%x) at %pF\n",
 397                         (int)init_saved_seqstat_coreb & SEQSTAT_EXCAUSE, init_saved_retx_coreb);
 398                 printk(KERN_NOTICE "   DCPLB_FAULT_ADDR: %pF\n", init_saved_dcplb_fault_addr_coreb);
 399                 printk(KERN_NOTICE "   ICPLB_FAULT_ADDR: %pF\n", init_saved_icplb_fault_addr_coreb);
 400 #endif
 401                 printk(KERN_NOTICE " The instruction at %pF caused a double exception\n",
 402                         init_retx_coreb);
 403         }
 404
 405         /*
 406          * We want the D-cache to be enabled early, in case the atomic
 407          * support code emulates cache coherence (see
 408          * __ARCH_SYNC_CORE_DCACHE).
 409          */
 410         init_exception_vectors();
 411
 412         bfin_setup_caches(cpu);
 413
 414         local_irq_disable();
 415
 416         /* Attach the new idle task to the global mm. */
 417         atomic_inc(&mm->mm_users);
 418         atomic_inc(&mm->mm_count);
 419         current->active_mm = mm;
 420         BUG_ON(current->mm);    /* Can't be, but better be safe than sorry. */
 421
 422         preempt_disable();
 423
 424         setup_secondary(cpu);
 425
 426         local_irq_enable();
 427
 428         platform_secondary_init(cpu);
 429
 430         cpu_idle();
 431 }
 432
 433 void __init smp_prepare_boot_cpu(void)
 434 {
 435 }
 436
 437 void __init smp_prepare_cpus(unsigned int max_cpus)
 438 {
 439         platform_prepare_cpus(max_cpus);
 440         ipi_queue_init();
 441         platform_request_ipi(&ipi_handler);
 442 }
 443
 444 void __init smp_cpus_done(unsigned int max_cpus)
 445 {
 446         unsigned long bogosum = 0;
 447         unsigned int cpu;
 448
 449         for_each_online_cpu(cpu)
 450                 bogosum += per_cpu(cpu_data, cpu).loops_per_jiffy;
 451
 452         printk(KERN_INFO "SMP: Total of %d processors activated "
 453                "(%lu.%02lu BogoMIPS).\n",
 454                num_online_cpus(),
 455                bogosum / (500000/HZ),
 456                (bogosum / (5000/HZ)) % 100);
 457 }
 458
 459 void smp_icache_flush_range_others(unsigned long start, unsigned long end)
 460 {
 461         smp_flush_data.start = start;
 462         smp_flush_data.end = end;
 463
 464         if (smp_call_function(&ipi_flush_icache, &smp_flush_data, 0))
 465                 printk(KERN_WARNING "SMP: failed to run I-cache flush request on other CPUs\n");
 466 }
 467 EXPORT_SYMBOL_GPL(smp_icache_flush_range_others);
 468
 469 #ifdef __ARCH_SYNC_CORE_DCACHE
 470 unsigned long barrier_mask __attribute__ ((__section__(".l2.bss")));
 471
 472 void resync_core_dcache(void)
 473 {
 474         unsigned int cpu = get_cpu();
 475         blackfin_invalidate_entire_dcache();
 476         ++per_cpu(cpu_data, cpu).dcache_invld_count;
 477         put_cpu();
 478 }
 479 EXPORT_SYMBOL(resync_core_dcache);
 480 #endif