/*

 * evt2raw.c - example which converts an event string (event + modifiers) to

 * a raw event code usable by the perf tool.

 *

 * Copyright (c) 2010 IBM Corp.

 * Contributed by Corey Ashford <cjashfor@us.ibm.com>

 *

 * Permission is hereby granted, free of charge, to any person obtaining a copy

 * of this software and associated documentation files (the "Software"), to deal

 * in the Software without restriction, including without limitation the rights

 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies

 * of the Software, and to permit persons to whom the Software is furnished to do so,

 * subject to the following conditions:

 *

 * The above copyright notice and this permission notice shall be included in all

 * copies or substantial portions of the Software.

 *

 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED,

 * INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A

 * PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT

 * HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF

 * CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE

 * OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

 */

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <unistd.h>

#include <err.h>

#include <perfmon/pfmlib_perf_event.h>

static void

usage(void)

{

	printf("usage: evt2raw [-v] <event>\n"

		"<event> is the symbolic event, including modifiers, to "

		"translate to a raw code.\n");

}

#define MAX_MODIFIER_CHARS 5  /* u,k,h plus the colon and null terminator */

int

main(int argc, char **argv)

{

	int ret, c, verbose = 0;

	struct perf_event_attr pea;

	char *event_str, *fstr = NULL;

	char modifiers[MAX_MODIFIER_CHARS];

	if (argc < 2) {

		usage();

		return 1;

	}

	while ( (c=getopt(argc, argv, "hv")) != -1) {

		switch(c) {

		case 'h':

			usage();

			exit(0);

		case 'v':

			verbose = 1;

			break;

		default:

			exit(1);

		}

	}

	event_str = argv[optind];

	ret = pfm_initialize();

	if (ret != PFM_SUCCESS)

		errx(1, "Internal error: pfm_initialize returned %s",

			pfm_strerror(ret));

	pea.size = sizeof(struct perf_event_attr);

	ret = pfm_get_perf_event_encoding(event_str, PFM_PLM0|PFM_PLM3|PFM_PLMH, &pea,

		&fstr, NULL);

	if (ret != PFM_SUCCESS)

		errx(1, "Error: pfm_get_perf_encoding returned %s",

			pfm_strerror(ret));

	if (pea.type != PERF_TYPE_RAW)

		errx(1, "Error: %s is not a raw hardware event", event_str);

	modifiers[0] = '\0';

	if (pea.exclude_user | pea.exclude_kernel | pea.exclude_hv) {

		strcat(modifiers, ":");

		if (!pea.exclude_user)

			strcat(modifiers, "u");

		if (!pea.exclude_kernel)

			strcat(modifiers, "k");

		if (!pea.exclude_hv)

			strcat(modifiers, "h");

	}

	if (verbose)

		printf("r%"PRIx64"%s\t%s\n", pea.config, modifiers, fstr);

	else

		printf("r%"PRIx64"%s\n", pea.config, modifiers);

	if (fstr)

		free(fstr);

	return 0;

}