/*

 * pfmlib_priv.c: set of internal utility functions for all architectures

 *

 * Copyright (c) 2006 Hewlett-Packard Development Company, L.P.

 * Contributed by Stephane Eranian <eranian@hpl.hp.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 <sys/types.h>

#include <ctype.h>

#include <string.h>

#include <stdio.h>

#include <stdlib.h>

#include <stdarg.h>

#include <limits.h>

#include <perfmon/pfmlib.h>

#include "pfmlib_priv.h"

/*

 * file for all libpfm verbose and debug output

 *

 * By default, it is set to stderr, unless the

 * PFMLIB_DEBUG_STDOUT environment variable is set

 */

FILE *libpfm_fp;

/*

 * by convention all internal utility function must be prefixed by __

 */

/*

 * debug printf

 */

void

__pfm_vbprintf(const char *fmt, ...)

{

	va_list ap;

	if (pfm_config.options.pfm_verbose == 0)

		return;

	va_start(ap, fmt);

	vfprintf(libpfm_fp, fmt, ap);

	va_end(ap);

}

int

__pfm_check_event(pfmlib_event_t *e)

{

	unsigned int n, j;

	if (e->event >= pfm_current->pme_count)

		return PFMLIB_ERR_INVAL;

	n = pfm_num_masks(e->event);

	if (n == 0 && e->num_masks)

		return PFMLIB_ERR_UMASK;

	for(j=0; j < e->num_masks; j++) {

		if (e->unit_masks[j] >= n)

			return PFMLIB_ERR_UMASK;

	}

	/*

	 * if event has umask, but non specified by user, then

	 * return:

	 *   - error if no default umask is defined

	 *   - success if default umask exists for event

	 */

	if (n && j == 0) {

		if (pfm_current->has_umask_default

		    && pfm_current->has_umask_default(e->event))

			return PFMLIB_SUCCESS;

		return PFMLIB_ERR_UMASK;

	}

	return PFMLIB_SUCCESS;

}