/*

   * PPC 64 oprofile support:

   * Copyright (C) 2004 Anton Blanchard <anton@au.ibm.com>, IBM

   * PPC 32 oprofile support: (based on PPC 64 support)
   * Copyright (C) Freescale Semiconductor, Inc 2004
   *	Author: Andy Fleming

   *
   * Based on alpha version.
   *
   * This program is free software; you can redistribute it and/or
   * modify it under the terms of the GNU General Public License
   * as published by the Free Software Foundation; either version
   * 2 of the License, or (at your option) any later version.
   */
  
  #include <linux/oprofile.h>
  #include <linux/init.h>
  #include <linux/smp.h>
  #include <linux/errno.h>
  #include <asm/ptrace.h>
  #include <asm/system.h>
  #include <asm/pmc.h>

  #include <asm/cputable.h>

  #include <asm/oprofile_impl.h>

  #include <asm/firmware.h>

  static struct op_powerpc_model *model;

  
  static struct op_counter_config ctr[OP_MAX_COUNTER];
  static struct op_system_config sys;

  static int op_per_cpu_rc;

  static void op_handle_interrupt(struct pt_regs *regs)
  {
  	model->handle_interrupt(regs, ctr);
  }

  static void op_powerpc_cpu_setup(void *dummy)
  {

  	int ret;
  
  	ret = model->cpu_setup(ctr);
  
  	if (ret != 0)
  		op_per_cpu_rc = ret;

  }

  static int op_powerpc_setup(void)

  {
  	int err;

  	op_per_cpu_rc = 0;

  	/* Grab the hardware */
  	err = reserve_pmc_hardware(op_handle_interrupt);
  	if (err)
  		return err;
  
  	/* Pre-compute the values to stuff in the hardware registers.  */

  	op_per_cpu_rc = model->reg_setup(ctr, &sys, model->num_counters);

  	if (op_per_cpu_rc)
  		goto out;
  
  	/* Configure the registers on all cpus.	 If an error occurs on one
  	 * of the cpus, op_per_cpu_rc will be set to the error */

  	on_each_cpu(op_powerpc_cpu_setup, NULL, 1);

  out:	if (op_per_cpu_rc) {
  		/* error on setup release the performance counter hardware */
  		release_pmc_hardware();
  	}
  
  	return op_per_cpu_rc;

  }

  static void op_powerpc_shutdown(void)

  {
  	release_pmc_hardware();
  }

  static void op_powerpc_cpu_start(void *dummy)

  {

  	/* If any of the cpus have return an error, set the
  	 * global flag to the error so it can be returned
  	 * to the generic OProfile caller.
  	 */
  	int ret;
  
  	ret = model->start(ctr);
  	if (ret != 0)
  		op_per_cpu_rc = ret;

  }

  static int op_powerpc_start(void)

  {

  	op_per_cpu_rc = 0;

  	if (model->global_start)

  		return model->global_start(ctr);
  	if (model->start) {

  		on_each_cpu(op_powerpc_cpu_start, NULL, 1);

  		return op_per_cpu_rc;
  	}
  	return -EIO; /* No start function is defined for this
  			power architecture */

  }

  static inline void op_powerpc_cpu_stop(void *dummy)

  {
  	model->stop();
  }

  static void op_powerpc_stop(void)

  {

  	if (model->stop)

  		on_each_cpu(op_powerpc_cpu_stop, NULL, 1);

          if (model->global_stop)
                  model->global_stop();

  }

  static int op_powerpc_create_files(struct super_block *sb, struct dentry *root)

  {
  	int i;

  #ifdef CONFIG_PPC64

  	/*
  	 * There is one mmcr0, mmcr1 and mmcra for setting the events for
  	 * all of the counters.
  	 */
  	oprofilefs_create_ulong(sb, root, "mmcr0", &sys.mmcr0);
  	oprofilefs_create_ulong(sb, root, "mmcr1", &sys.mmcr1);
  	oprofilefs_create_ulong(sb, root, "mmcra", &sys.mmcra);

  #ifdef CONFIG_OPROFILE_CELL
  	/* create a file the user tool can check to see what level of profiling
  	 * support exits with this kernel. Initialize bit mask to indicate
  	 * what support the kernel has:
  	 * bit 0      -  Supports SPU event profiling in addition to PPU
  	 *               event and cycles; and SPU cycle profiling
  	 * bits 1-31  -  Currently unused.
  	 *
  	 * If the file does not exist, then the kernel only supports SPU
  	 * cycle profiling, PPU event and cycle profiling.
  	 */
  	oprofilefs_create_ulong(sb, root, "cell_support", &sys.cell_support);
  	sys.cell_support = 0x1; /* Note, the user OProfile tool must check
  				 * that this bit is set before attempting to
  				 * user SPU event profiling.  Older kernels
  				 * will not have this file, hence the user
  				 * tool is not allowed to do SPU event
  				 * profiling on older kernels.  Older kernels
  				 * will accept SPU events but collected data
  				 * is garbage.
  				 */
  #endif

  #endif

  
  	for (i = 0; i < model->num_counters; ++i) {
  		struct dentry *dir;

  		char buf[4];

  
  		snprintf(buf, sizeof buf, "%d", i);
  		dir = oprofilefs_mkdir(sb, root, buf);
  
  		oprofilefs_create_ulong(sb, dir, "enabled", &ctr[i].enabled);
  		oprofilefs_create_ulong(sb, dir, "event", &ctr[i].event);
  		oprofilefs_create_ulong(sb, dir, "count", &ctr[i].count);

  		/*

  		 * Classic PowerPC doesn't support per-counter
  		 * control like this, but the options are
  		 * expected, so they remain.  For Freescale
  		 * Book-E style performance monitors, we do
  		 * support them.

  		 */
  		oprofilefs_create_ulong(sb, dir, "kernel", &ctr[i].kernel);
  		oprofilefs_create_ulong(sb, dir, "user", &ctr[i].user);

  		oprofilefs_create_ulong(sb, dir, "unit_mask", &ctr[i].unit_mask);
  	}
  
  	oprofilefs_create_ulong(sb, root, "enable_kernel", &sys.enable_kernel);
  	oprofilefs_create_ulong(sb, root, "enable_user", &sys.enable_user);

  
  	/* Default to tracing both kernel and user */
  	sys.enable_kernel = 1;
  	sys.enable_user = 1;

  
  	return 0;
  }
  
  int __init oprofile_arch_init(struct oprofile_operations *ops)
  {

  	if (!cur_cpu_spec->oprofile_cpu_type)

  		return -ENODEV;

  	if (firmware_has_feature(FW_FEATURE_ISERIES))
  		return -ENODEV;

  	switch (cur_cpu_spec->oprofile_type) {

  #ifdef CONFIG_PPC_BOOK3S_64

  #ifdef CONFIG_OPROFILE_CELL

  		case PPC_OPROFILE_CELL:

  			if (firmware_has_feature(FW_FEATURE_LPAR))
  				return -ENODEV;

  			model = &op_model_cell;

  			ops->sync_start = model->sync_start;
  			ops->sync_stop = model->sync_stop;

  			break;
  #endif

  		case PPC_OPROFILE_RS64:

  			model = &op_model_rs64;
  			break;

  		case PPC_OPROFILE_POWER4:

  			model = &op_model_power4;
  			break;

  		case PPC_OPROFILE_PA6T:
  			model = &op_model_pa6t;
  			break;

  #endif
  #ifdef CONFIG_6xx

  		case PPC_OPROFILE_G4:

  			model = &op_model_7450;
  			break;
  #endif

  #if defined(CONFIG_FSL_EMB_PERFMON)
  		case PPC_OPROFILE_FSL_EMB:
  			model = &op_model_fsl_emb;

  			break;
  #endif
  		default:
  			return -ENODEV;
  	}

  	model->num_counters = cur_cpu_spec->num_pmcs;

  
  	ops->cpu_type = cur_cpu_spec->oprofile_cpu_type;

  	ops->create_files = op_powerpc_create_files;
  	ops->setup = op_powerpc_setup;
  	ops->shutdown = op_powerpc_shutdown;
  	ops->start = op_powerpc_start;
  	ops->stop = op_powerpc_stop;

  	ops->backtrace = op_powerpc_backtrace;

  	printk(KERN_DEBUG "oprofile: using %s performance monitoring.
  ",

  	       ops->cpu_type);
  
  	return 0;
  }
  
  void oprofile_arch_exit(void)
  {
  }