tools/perf/builtin-periodic.c - android_kernel_htc_msm8960 - Gitiles

 /*
  * Copyright (c) 2011-2012, Code Aurora Forum. All rights reserved.
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License version 2 and
  * only version 2 as published by the Free Software Foundation.
  *
  * This program is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  * GNU General Public License for more details.
  */

 /*
  *	A very simple perf program to periodically print the performance
  *	counter reqested on the command line to standard out at the rate
  *	specified.
  *
  *	This is valuable for showing the output in a simple plot or
  *	exporting the counter data for post processing.  No attempt
  *	to process the data is made.
  *
  *	Scaling is not supported, use only as many counters as are
  *	provided by the hardware.
  *
  *	Math functions are support to combine counter results by using
  *	the -m flag.
  *
  *	The -r -w flags supports user signalling for input. This assumes
  *	that a pipe/fifo is needed so the -rw cmd line arg is a string
  *	that is the name of the named pipe to open for read/write.  User
  *	sends data on the read pipe to the process to collect a sample.
  *	Commands are also supported on the pipe.
  *
  */

 #include "perf.h"
 #include "builtin.h"
 #include "util/util.h"
 #include "util/parse-options.h"
 #include "util/parse-events.h"
 #include "util/event.h"
 #include "util/evsel.h"
 #include "util/evlist.h"
 #include "util/debug.h"
 #include "util/header.h"
 #include "util/cpumap.h"
 #include "util/thread.h"
 #include <signal.h>
 #include <sys/types.h>

 #define PERF_PERIODIC_ERROR -1

 /* number of pieces of data on each read. */
 #define DATA_SIZE 2

 #define DEFAULT_FIFO_NAME "xxbadFiFo"
 #define MAX_NAMELEN 50

 struct perf_evlist *evsel_list;

 /*
  * command line variables and settings
  * Default to current process, no_inherit, process
  */
 static pid_t target_pid = -1; /* all */
 static bool system_wide;
 static int cpumask = -1;  /* all */
 static int ncounts;
 static int ms_sleep = 1000;  /* 1 second */
 static char const *operations = "nnnnnnnnnnnnnnnn";  /* nop */
 static bool math_enabled;
 static bool calc_delta;
 static double old_accum, accum;
 static int math_op_index;
 static char const *wfifo_name = DEFAULT_FIFO_NAME;
 static char const *rfifo_name = DEFAULT_FIFO_NAME;
 static bool use_fifo;
 static bool is_ratio;
 static FILE *fd_in, *fd_out;

 static FILE *tReadFifo, *tWriteFifo;

 /*
  * Raw results from perf, we track the current value and
  * the old value.
  */
 struct perf_raw_results_s {
 	u64 values;
 	u64 old_value;
 };

 /*
  * Everything we need to support a perf counter across multiple
  * CPUs.  We need to support multiple file descriptors (perf_fd)
  * because perf requires a fd per counter, so 1 per core enabled.
  *
  * Raw results values are calculated across all the cores as they
  * are read.
  */
 struct perf_setup_s {
 	int event_index;
 	struct perf_event_attr *attr;
 	int perf_fd[MAX_NR_CPUS];
 	pid_t pid;
 	int cpu;
 	int flags;
 	int group;
 	struct perf_raw_results_s data;
 	struct perf_raw_results_s totals;
 	struct perf_raw_results_s output;
 };

 static void do_cleanup(void)
 {
 	if (fd_in) {
 		if (0 != fclose(fd_in))
 			error("Error closing fd_in\n");
 	}
 	if (fd_out) {
 		if (0 != fclose(fd_out))
 			error("Error closing fd_out\n");
 	}
 	if (use_fifo) {
 		if (0 != unlink(rfifo_name))
 			error("Error unlinking rfifo\n");
 		if (0 != unlink(wfifo_name))
 			error("Error unlinking wfifo\n");
 	}
 }

 /*
  * Unexpected signal for error indication, cleanup
  */
 static int sig_dummy;
 static void sig_do_cleanup(int sig)
 {
 	sig_dummy = sig;
 	do_cleanup();
 	exit(0);
 }

 #define PERIODIC_MAX_STRLEN 100
 /*
  * Delay for either a timed period or the wait on the read_fifo
  */
 static void delay(unsigned long milli)
 {
 	char tmp_stg[PERIODIC_MAX_STRLEN];
 	int done;
 	int ret;

 	if (use_fifo) {
 		do {
 			done = true;
 			ret = fscanf(tReadFifo, "%s", tmp_stg);
 			if (ret == 0)
 				return;
 			/*
 			 * Look for a command request, and if we get a command
 			 * Need to process and then wait again w/o sending data.
 			 */
 			if (strncmp(tmp_stg, "PID", strnlen(tmp_stg,
 				PERIODIC_MAX_STRLEN)) == 0) {
 				fprintf(fd_out, " %u\n", getpid());
 				fflush(fd_out);
 				done = false;
 			} else if (strncmp(tmp_stg, "EXIT",
 					strnlen(tmp_stg, PERIODIC_MAX_STRLEN))
 						== 0) {
 				do_cleanup();
 				exit(0);
 			}

 		} while (done != true);
 	} else
 		usleep(milli*1000);
 }

 /*
  * Create a perf counter event.
  * Some interesting behaviour that is not documented anywhere else:
  * the CPU will not work if out of range.
  * The CPU will only work for a single CPU, so to collect the counts
  * on the system in SMP based systems a counter needs to be created
  * for each CPU.
  */
 static int create_perf_counter(struct perf_setup_s *p)
 {
 	struct cpu_map *cpus;
 	int cpu;

 	cpus = cpu_map__new(NULL);
 	if (p == NULL)
 		return PERF_PERIODIC_ERROR;
 	for (cpu = 0; cpu < cpus->nr; cpu++) {
 		if (((1 << cpu) & cpumask) == 0)
 			continue;
 		p->perf_fd[cpu] = sys_perf_event_open(p->attr, target_pid, cpu,
 					-1, 0);
 		if (p->perf_fd[cpu] < 0)
 			return PERF_PERIODIC_ERROR;
 	}
 	return 0;
 }

 /*
  * Perf init setup
  */
 static int perf_setup_init(struct perf_setup_s *p)
 {
 	if (p == NULL)
 		return PERF_PERIODIC_ERROR;

 	bzero(p, sizeof(struct perf_setup_s));
 	p->group = -1;
 	p->flags = 0;

 	p->output.values = 0;
 	p->output.old_value = 0;
 	p->data.values = 0;
 	p->data.old_value = 0;
 	p->totals.old_value = 0;
 	p->totals.values = 0;

 	return 0;
 }

 /*
  * Read in ALL the performance counters configured for the CPU,
  * one performance monitor per core that was configured during
  * "all" mode
  */
 static int perf_setup_read(struct perf_setup_s *p)
 {
 	u64 data[DATA_SIZE];
 	int i, status;

 	p->totals.values = 0;
 	p->data.values = 0;
 	for (i = 0; i < MAX_NR_CPUS; i++) {
 		if (p->perf_fd[i] == 0)
 			continue;
 		status = read(p->perf_fd[i], &data, sizeof(data));
 		p->data.values += data[0];
 		p->totals.values += data[0];
 	}

 	/*
 	 * Normally we show totals, we want to support
 	 * showing deltas from the previous value so external apps do not have
 	 * to do this...
 	 */
 	if (calc_delta) {
 		p->output.values = p->data.values - p->data.old_value;
 		p->data.old_value = p->data.values;
 	} else
 		p->output.values = p->totals.values;
 	return 0;
 }

 static int perf_setup_show(struct perf_setup_s *p)
 {
 	if (p == NULL)
 		return PERF_PERIODIC_ERROR;
 	fprintf(fd_out, " %llu", p->output.values);
 	return 0;
 }


 static const char * const periodic_usage[] = {
 	"perf periodic [<options>]",
 	NULL
 };

 static const struct option options[] = {
 	OPT_CALLBACK('e', "event", &evsel_list, "event",
 	"event selector. use 'perf list' to list available events",
 	 parse_events_option),
 	OPT_STRING('m', "math-operations", &operations, "nnnnnn",
 	"math operation to perform on values collected asmd in order"),
 	OPT_STRING('r', "readpipe", &rfifo_name, "xxbadFiFo",
 	"wait for a user input fifo - will be created"),
 	OPT_STRING('w', "writepipe", &wfifo_name, "xxbadFifo",
 	"write data out on this pipe - pipe is created"),
 	OPT_INTEGER('i', "increment", &ncounts,
 	"number of times periods to count/iterate (default 0-forever)"),
 	OPT_INTEGER('p', "pid", &target_pid,
 	"stat events on existing process id"),
 	OPT_INTEGER('c', "cpumask", &cpumask,
 	"cpumask to enable counters, default all (-1)"),
 	OPT_INTEGER('s', "sleep", &ms_sleep,
 	"how long to sleep in ms between each sample (default 1000)"),
 	OPT_BOOLEAN('a', "all-cpus", &system_wide,
 	"system-wide collection from all CPUs overrides cpumask"),
 	OPT_BOOLEAN('d', "delta", &calc_delta,
 	"calculate and display the delta values math funcs will use delta"),
 	OPT_INCR('v', "verbose", &verbose,
 	"be more verbose (show counter open errors, etc)"),
 	OPT_END()
 };

 /*
  * After every period we reset any math that was performed.
  */
 static void reset_math(void)
 {
 	math_op_index = 0;
 	old_accum = accum;
 	accum = 0;
 }

 static void do_math_op(struct perf_setup_s *p)
 {
 	if (!math_enabled)
 		return;
 	switch (operations[math_op_index++]) {
 	case 'm':
 		accum *= (double)p->output.values; break;
 	case 'a':
 		accum += (double)p->output.values; break;
 	case 's':
 		accum -= (double)p->output.values; break;
 	case 'd':
 		accum /= (double)p->output.values; break;
 	case 'z':
 		accum =  0; break;
 	case 't':
 		accum =  (double)p->output.values; break; /*transfer*/
 	case 'T':
 		accum +=  old_accum; break; /*total*/
 	case 'i':	/* ignore */
 	default:
 		break;
 	}
 }

 int cmd_periodic(int argc, const char **argv, const char *prefix __used)
 {
 	int status = 0;
 	int c, i;
 	struct perf_setup_s *p[MAX_COUNTERS];
 	struct perf_evsel *counter;
 	FILE *fp;
 	int nr_counters = 0;

 	evsel_list = perf_evlist__new(NULL, NULL);
 	if (evsel_list == NULL)
 		return -ENOMEM;

 	argc = parse_options(argc, argv, options, periodic_usage,
 		PARSE_OPT_STOP_AT_NON_OPTION);

 	if (system_wide)
 		cpumask = -1;

 	/*
 	 * The r & w option redirects stdout to a newly created pipe and
 	 * waits for input on the read pipe before continuing
 	 */
 	fd_in = stdin;
 	fd_out = stdout;
 	if (strncmp(rfifo_name, DEFAULT_FIFO_NAME,
 				strnlen(rfifo_name, MAX_NAMELEN))) {
 		fp = fopen(rfifo_name, "r");
 		if (fp != NULL) {
 			fclose(fp);
 			remove(rfifo_name);
 		}
 		if (mkfifo(rfifo_name, 0777) == -1) {
 			error("Could not open read fifo\n");
 			do_cleanup();
 			return PERF_PERIODIC_ERROR;
 		}
 		tReadFifo = fopen(rfifo_name, "r+");
 		if (tReadFifo == 0) {
 			do_cleanup();
 			error("Could not open read fifo file\n");
 			return PERF_PERIODIC_ERROR;
 		}
 		use_fifo = true;
 	}
 	if (strncmp(wfifo_name, DEFAULT_FIFO_NAME,
 				strnlen(wfifo_name, MAX_NAMELEN)))  {
 		fp = fopen(wfifo_name, "r");
 		if (fp != NULL) {
 			fclose(fp);
 			remove(wfifo_name);
 		}
 		if (mkfifo(wfifo_name, 0777) == -1) {
 			do_cleanup();
 			error("Could not open write fifo\n");
 			return PERF_PERIODIC_ERROR;
 		}
 		fd_out = fopen(wfifo_name, "w+");
 		if (fd_out == 0) {
 			do_cleanup();
 			error("Could not open write fifo file\n");
 			return PERF_PERIODIC_ERROR;
 		}
 		tWriteFifo = fd_out;
 	}

 	math_enabled = (operations[0] != 'n');

 	/*
 	 * If we don't ignore SIG_PIPE then when the other side
 	 * of a pipe closes we shutdown too...
 	 */
 	signal(SIGPIPE, SIG_IGN);
 	signal(SIGINT, sig_do_cleanup);
 	signal(SIGQUIT, sig_do_cleanup);
 	signal(SIGKILL, sig_do_cleanup);
 	signal(SIGTERM, sig_do_cleanup);

 	i = 0;
 	list_for_each_entry(counter, &evsel_list->entries, node) {
 		p[i] = malloc(sizeof(struct perf_setup_s));
 		if (p[i] == NULL) {
 			error("Error allocating perf_setup_s\n");
 			do_cleanup();
 			return PERF_PERIODIC_ERROR;
 		}
 		bzero(p[i], sizeof(struct perf_setup_s));
 		perf_setup_init(p[i]);
 		p[i]->attr = &(counter->attr);
 		p[i]->event_index = counter->idx;
 		if (create_perf_counter(p[i]) < 0) {
 			do_cleanup();
 			die("Not all events could be opened.\n");
 			return PERF_PERIODIC_ERROR;
 		}
 		i++;
 		nr_counters++;
 	}
 	i = 0;
 	while (1) {

 		/*
 		 * Wait first otherwise single sample will print w/o signal
 		 * when using the -u (user signal) flag
 		 */
 		delay(ms_sleep);

 		/*
 		 * Do the collection, read and then perform any math operations
 		 */
 		for (c = 0; c < nr_counters; c++) {
 			status = perf_setup_read(p[c]);
 			do_math_op(p[c]);
 		}

 		/*
 		 * After all collection and math, we perform one last math
 		 * to allow totaling, if enabled etc, then either printout
 		 * a single float value when the math is enabled or ...
 		 */
 		if (math_enabled) {
 			do_math_op(p[c]);
 			if (is_ratio)
 				fprintf(fd_out, "%#f\n", accum*100);
 			else
 				fprintf(fd_out, "%#f\n", accum);
 		} else {
 			/*
 			 * ... print out one integer value for each counter
 			 */
 			for (c = 0; c < nr_counters; c++)
 				status = perf_setup_show(p[c]);
 			fprintf(fd_out, "\n");
 		}

 		/*
 		 * Did the user give us an iteration count?
 		 */
 		if ((ncounts != 0) && (++i >= ncounts))
 			break;
 		reset_math();
 		fflush(fd_out); /* make sure data is flushed out the pipe*/
 	}

 	do_cleanup();

 	return status;
 }
	/*
	* Copyright (c) 2011-2012, Code Aurora Forum. All rights reserved.
	*
	* This program is free software; you can redistribute it and/or modify
	* it under the terms of the GNU General Public License version 2 and
	* only version 2 as published by the Free Software Foundation.
	*
	* This program is distributed in the hope that it will be useful,
	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	* GNU General Public License for more details.
	*/

	/*
	* A very simple perf program to periodically print the performance
	* counter reqested on the command line to standard out at the rate
	* specified.
	*
	* This is valuable for showing the output in a simple plot or
	* exporting the counter data for post processing. No attempt
	* to process the data is made.
	*
	* Scaling is not supported, use only as many counters as are
	* provided by the hardware.
	*
	* Math functions are support to combine counter results by using
	* the -m flag.
	*
	* The -r -w flags supports user signalling for input. This assumes
	* that a pipe/fifo is needed so the -rw cmd line arg is a string
	* that is the name of the named pipe to open for read/write. User
	* sends data on the read pipe to the process to collect a sample.
	* Commands are also supported on the pipe.
	*
	*/

	#include "perf.h"
	#include "builtin.h"
	#include "util/util.h"
	#include "util/parse-options.h"
	#include "util/parse-events.h"
	#include "util/event.h"
	#include "util/evsel.h"
	#include "util/evlist.h"
	#include "util/debug.h"
	#include "util/header.h"
	#include "util/cpumap.h"
	#include "util/thread.h"
	#include <signal.h>
	#include <sys/types.h>

	#define PERF_PERIODIC_ERROR -1

	/* number of pieces of data on each read. */
	#define DATA_SIZE 2

	#define DEFAULT_FIFO_NAME "xxbadFiFo"
	#define MAX_NAMELEN 50

	struct perf_evlist *evsel_list;

	/*
	* command line variables and settings
	* Default to current process, no_inherit, process
	*/
	static pid_t target_pid = -1; /* all */
	static bool system_wide;
	static int cpumask = -1; /* all */
	static int ncounts;
	static int ms_sleep = 1000; /* 1 second */
	static char const operations = "nnnnnnnnnnnnnnnn"; / nop */
	static bool math_enabled;
	static bool calc_delta;
	static double old_accum, accum;
	static int math_op_index;
	static char const *wfifo_name = DEFAULT_FIFO_NAME;
	static char const *rfifo_name = DEFAULT_FIFO_NAME;
	static bool use_fifo;
	static bool is_ratio;
	static FILE fd_in, fd_out;

	static FILE tReadFifo, tWriteFifo;

	/*
	* Raw results from perf, we track the current value and
	* the old value.
	*/
	struct perf_raw_results_s {
	u64 values;
	u64 old_value;
	};

	/*
	* Everything we need to support a perf counter across multiple
	* CPUs. We need to support multiple file descriptors (perf_fd)
	* because perf requires a fd per counter, so 1 per core enabled.
	*
	* Raw results values are calculated across all the cores as they
	* are read.
	*/
	struct perf_setup_s {
	int event_index;
	struct perf_event_attr *attr;
	int perf_fd[MAX_NR_CPUS];
	pid_t pid;
	int cpu;
	int flags;
	int group;
	struct perf_raw_results_s data;
	struct perf_raw_results_s totals;
	struct perf_raw_results_s output;
	};

	static void do_cleanup(void)
	{
	if (fd_in) {
	if (0 != fclose(fd_in))
	error("Error closing fd_in\n");
	}
	if (fd_out) {
	if (0 != fclose(fd_out))
	error("Error closing fd_out\n");
	}
	if (use_fifo) {
	if (0 != unlink(rfifo_name))
	error("Error unlinking rfifo\n");
	if (0 != unlink(wfifo_name))
	error("Error unlinking wfifo\n");
	}
	}

	/*
	* Unexpected signal for error indication, cleanup
	*/
	static int sig_dummy;
	static void sig_do_cleanup(int sig)
	{
	sig_dummy = sig;
	do_cleanup();
	exit(0);
	}

	#define PERIODIC_MAX_STRLEN 100
	/*
	* Delay for either a timed period or the wait on the read_fifo
	*/
	static void delay(unsigned long milli)
	{
	char tmp_stg[PERIODIC_MAX_STRLEN];
	int done;
	int ret;

	if (use_fifo) {
	do {
	done = true;
	ret = fscanf(tReadFifo, "%s", tmp_stg);
	if (ret == 0)
	return;
	/*
	* Look for a command request, and if we get a command
	* Need to process and then wait again w/o sending data.
	*/
	if (strncmp(tmp_stg, "PID", strnlen(tmp_stg,
	PERIODIC_MAX_STRLEN)) == 0) {
	fprintf(fd_out, " %u\n", getpid());
	fflush(fd_out);
	done = false;
	} else if (strncmp(tmp_stg, "EXIT",
	strnlen(tmp_stg, PERIODIC_MAX_STRLEN))
	== 0) {
	do_cleanup();
	exit(0);
	}

	} while (done != true);
	} else
	usleep(milli*1000);
	}

	/*
	* Create a perf counter event.
	* Some interesting behaviour that is not documented anywhere else:
	* the CPU will not work if out of range.
	* The CPU will only work for a single CPU, so to collect the counts
	* on the system in SMP based systems a counter needs to be created
	* for each CPU.
	*/
	static int create_perf_counter(struct perf_setup_s *p)
	{
	struct cpu_map *cpus;
	int cpu;

	cpus = cpu_map__new(NULL);
	if (p == NULL)
	return PERF_PERIODIC_ERROR;
	for (cpu = 0; cpu < cpus->nr; cpu++) {
	if (((1 << cpu) & cpumask) == 0)
	continue;
	p->perf_fd[cpu] = sys_perf_event_open(p->attr, target_pid, cpu,
	-1, 0);
	if (p->perf_fd[cpu] < 0)
	return PERF_PERIODIC_ERROR;
	}
	return 0;
	}

	/*
	* Perf init setup
	*/
	static int perf_setup_init(struct perf_setup_s *p)
	{
	if (p == NULL)
	return PERF_PERIODIC_ERROR;

	bzero(p, sizeof(struct perf_setup_s));
	p->group = -1;
	p->flags = 0;

	p->output.values = 0;
	p->output.old_value = 0;
	p->data.values = 0;
	p->data.old_value = 0;
	p->totals.old_value = 0;
	p->totals.values = 0;

	return 0;
	}

	/*
	* Read in ALL the performance counters configured for the CPU,
	* one performance monitor per core that was configured during
	* "all" mode
	*/
	static int perf_setup_read(struct perf_setup_s *p)
	{
	u64 data[DATA_SIZE];
	int i, status;

	p->totals.values = 0;
	p->data.values = 0;
	for (i = 0; i < MAX_NR_CPUS; i++) {
	if (p->perf_fd[i] == 0)
	continue;
	status = read(p->perf_fd[i], &data, sizeof(data));
	p->data.values += data[0];
	p->totals.values += data[0];
	}

	/*
	* Normally we show totals, we want to support
	* showing deltas from the previous value so external apps do not have
	* to do this...
	*/
	if (calc_delta) {
	p->output.values = p->data.values - p->data.old_value;
	p->data.old_value = p->data.values;
	} else
	p->output.values = p->totals.values;
	return 0;
	}

	static int perf_setup_show(struct perf_setup_s *p)
	{
	if (p == NULL)
	return PERF_PERIODIC_ERROR;
	fprintf(fd_out, " %llu", p->output.values);
	return 0;
	}


	static const char * const periodic_usage[] = {
	"perf periodic [<options>]",
	NULL
	};

	static const struct option options[] = {
	OPT_CALLBACK('e', "event", &evsel_list, "event",
	"event selector. use 'perf list' to list available events",
	parse_events_option),
	OPT_STRING('m', "math-operations", &operations, "nnnnnn",
	"math operation to perform on values collected asmd in order"),
	OPT_STRING('r', "readpipe", &rfifo_name, "xxbadFiFo",
	"wait for a user input fifo - will be created"),
	OPT_STRING('w', "writepipe", &wfifo_name, "xxbadFifo",
	"write data out on this pipe - pipe is created"),
	OPT_INTEGER('i', "increment", &ncounts,
	"number of times periods to count/iterate (default 0-forever)"),
	OPT_INTEGER('p', "pid", &target_pid,
	"stat events on existing process id"),
	OPT_INTEGER('c', "cpumask", &cpumask,
	"cpumask to enable counters, default all (-1)"),
	OPT_INTEGER('s', "sleep", &ms_sleep,
	"how long to sleep in ms between each sample (default 1000)"),
	OPT_BOOLEAN('a', "all-cpus", &system_wide,
	"system-wide collection from all CPUs overrides cpumask"),
	OPT_BOOLEAN('d', "delta", &calc_delta,
	"calculate and display the delta values math funcs will use delta"),
	OPT_INCR('v', "verbose", &verbose,
	"be more verbose (show counter open errors, etc)"),
	OPT_END()
	};

	/*
	* After every period we reset any math that was performed.
	*/
	static void reset_math(void)
	{
	math_op_index = 0;
	old_accum = accum;
	accum = 0;
	}

	static void do_math_op(struct perf_setup_s *p)
	{
	if (!math_enabled)
	return;
	switch (operations[math_op_index++]) {
	case 'm':
	accum *= (double)p->output.values; break;
	case 'a':
	accum += (double)p->output.values; break;
	case 's':
	accum -= (double)p->output.values; break;
	case 'd':
	accum /= (double)p->output.values; break;
	case 'z':
	accum = 0; break;
	case 't':
	accum = (double)p->output.values; break; /transfer/
	case 'T':
	accum += old_accum; break; /total/
	case 'i': /* ignore */
	default:
	break;
	}
	}

	int cmd_periodic(int argc, const char *argv, const char prefix __used)
	{
	int status = 0;
	int c, i;
	struct perf_setup_s *p[MAX_COUNTERS];
	struct perf_evsel *counter;
	FILE *fp;
	int nr_counters = 0;

	evsel_list = perf_evlist__new(NULL, NULL);
	if (evsel_list == NULL)
	return -ENOMEM;

	argc = parse_options(argc, argv, options, periodic_usage,
	PARSE_OPT_STOP_AT_NON_OPTION);

	if (system_wide)
	cpumask = -1;

	/*
	* The r & w option redirects stdout to a newly created pipe and
	* waits for input on the read pipe before continuing
	*/
	fd_in = stdin;
	fd_out = stdout;
	if (strncmp(rfifo_name, DEFAULT_FIFO_NAME,
	strnlen(rfifo_name, MAX_NAMELEN))) {
	fp = fopen(rfifo_name, "r");
	if (fp != NULL) {
	fclose(fp);
	remove(rfifo_name);
	}
	if (mkfifo(rfifo_name, 0777) == -1) {
	error("Could not open read fifo\n");
	do_cleanup();
	return PERF_PERIODIC_ERROR;
	}
	tReadFifo = fopen(rfifo_name, "r+");
	if (tReadFifo == 0) {
	do_cleanup();
	error("Could not open read fifo file\n");
	return PERF_PERIODIC_ERROR;
	}
	use_fifo = true;
	}
	if (strncmp(wfifo_name, DEFAULT_FIFO_NAME,
	strnlen(wfifo_name, MAX_NAMELEN))) {
	fp = fopen(wfifo_name, "r");
	if (fp != NULL) {
	fclose(fp);
	remove(wfifo_name);
	}
	if (mkfifo(wfifo_name, 0777) == -1) {
	do_cleanup();
	error("Could not open write fifo\n");
	return PERF_PERIODIC_ERROR;
	}
	fd_out = fopen(wfifo_name, "w+");
	if (fd_out == 0) {
	do_cleanup();
	error("Could not open write fifo file\n");
	return PERF_PERIODIC_ERROR;
	}
	tWriteFifo = fd_out;
	}

	math_enabled = (operations[0] != 'n');

	/*
	* If we don't ignore SIG_PIPE then when the other side
	* of a pipe closes we shutdown too...
	*/
	signal(SIGPIPE, SIG_IGN);
	signal(SIGINT, sig_do_cleanup);
	signal(SIGQUIT, sig_do_cleanup);
	signal(SIGKILL, sig_do_cleanup);
	signal(SIGTERM, sig_do_cleanup);

	i = 0;
	list_for_each_entry(counter, &evsel_list->entries, node) {
	p[i] = malloc(sizeof(struct perf_setup_s));
	if (p[i] == NULL) {
	error("Error allocating perf_setup_s\n");
	do_cleanup();
	return PERF_PERIODIC_ERROR;
	}
	bzero(p[i], sizeof(struct perf_setup_s));
	perf_setup_init(p[i]);
	p[i]->attr = &(counter->attr);
	p[i]->event_index = counter->idx;
	if (create_perf_counter(p[i]) < 0) {
	do_cleanup();
	die("Not all events could be opened.\n");
	return PERF_PERIODIC_ERROR;
	}
	i++;
	nr_counters++;
	}
	i = 0;
	while (1) {

	/*
	* Wait first otherwise single sample will print w/o signal
	* when using the -u (user signal) flag
	*/
	delay(ms_sleep);

	/*
	* Do the collection, read and then perform any math operations
	*/
	for (c = 0; c < nr_counters; c++) {
	status = perf_setup_read(p[c]);
	do_math_op(p[c]);
	}

	/*
	* After all collection and math, we perform one last math
	* to allow totaling, if enabled etc, then either printout
	* a single float value when the math is enabled or ...
	*/
	if (math_enabled) {
	do_math_op(p[c]);
	if (is_ratio)
	fprintf(fd_out, "%#f\n", accum*100);
	else
	fprintf(fd_out, "%#f\n", accum);
	} else {
	/*
	* ... print out one integer value for each counter
	*/
	for (c = 0; c < nr_counters; c++)
	status = perf_setup_show(p[c]);
	fprintf(fd_out, "\n");
	}

	/*
	* Did the user give us an iteration count?
	*/
	if ((ncounts != 0) && (++i >= ncounts))
	break;
	reset_math();
	fflush(fd_out); /* make sure data is flushed out the pipe*/
	}

	do_cleanup();

	return status;
	}