// Copyright(c) 2018-2020, Intel Corporation

//

// Redistribution  and  use  in source  and  binary  forms,  with  or  without

// modification, are permitted provided that the following conditions are met:

//

// * Redistributions of  source code  must retain the  above copyright notice,

//   this list of conditions and the following disclaimer.

// * Redistributions in binary form must reproduce the above copyright notice,

//   this list of conditions and the following disclaimer in the documentation

//   and/or other materials provided with the distribution.

// * Neither the name  of Intel Corporation  nor the names of its contributors

//   may be used to  endorse or promote  products derived  from this  software

//   without specific prior written permission.

//

// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"

// AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING,  BUT NOT LIMITED TO,  THE

// IMPLIED WARRANTIES OF  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE

// ARE DISCLAIMED.  IN NO EVENT  SHALL THE COPYRIGHT OWNER  OR CONTRIBUTORS BE

// LIABLE  FOR  ANY  DIRECT,  INDIRECT,  INCIDENTAL,  SPECIAL,  EXEMPLARY,  OR

// CONSEQUENTIAL  DAMAGES  (INCLUDING,  BUT  NOT LIMITED  TO,  PROCUREMENT  OF

// SUBSTITUTE GOODS OR SERVICES;  LOSS OF USE,  DATA, OR PROFITS;  OR BUSINESS

// INTERRUPTION)  HOWEVER CAUSED  AND ON ANY THEORY  OF LIABILITY,  WHETHER IN

// CONTRACT,  STRICT LIABILITY,  OR TORT  (INCLUDING NEGLIGENCE  OR OTHERWISE)

// ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,  EVEN IF ADVISED OF THE

// POSSIBILITY OF SUCH DAMAGE.

#include "fpgainfo.h"

#include "bmcdata.h"

#include <unistd.h>

#include <stdlib.h>

#include <string.h>

#include <inttypes.h>

fpga_result get_metrics(fpga_token token,

			metrics_inquiry inquiry,

			fpga_metric_info *metrics_info,

			uint64_t *num_metrics_info,

			fpga_metric *metrics,

			uint64_t *num_metrics)

{

	if (!metrics_info || !metrics || !num_metrics || !num_metrics_info) {

	    return FPGA_INVALID_PARAM;

	}

	fpga_result res = FPGA_OK;

	fpga_result ret = FPGA_OK;

	fpga_handle handle;

	/* open FPGA */

	res = fpgaOpen(token, &handle, FPGA_OPEN_SHARED);

	ON_FPGAINFO_ERR_GOTO(res, out_exit, "opening FPGA");

	res = fpgaGetNumMetrics(handle, num_metrics_info);

	ON_FPGAINFO_ERR_GOTO(res, out_close,

			     "getting number of metrics");

	res = fpgaGetMetricsInfo(handle, metrics_info, num_metrics_info);

	ON_FPGAINFO_ERR_GOTO(res, out_close,

			     "getting metrics info");

	/* get metrics */

	uint64_t id_array[METRICS_MAX_NUM];

	uint64_t i = 0;

	uint64_t j = 0;

	switch (inquiry) {

	case FPGA_ALL:

	    for (i = 0; i < *num_metrics_info; ++i) {

		id_array[j++] = i;

	    }

	    break;

	case FPGA_POWER:

	    for (i = 0; i < *num_metrics_info; ++i) {

		if (metrics_info[i].metric_type == FPGA_METRIC_TYPE_POWER) {

			id_array[j++] = i;

		}

	    }

	    break;

	case FPGA_THERMAL:

	    for (i = 0; i < *num_metrics_info; ++i) {

		if (metrics_info[i].metric_type == FPGA_METRIC_TYPE_THERMAL) {

			id_array[j++] = i;

		}

	    }

	    break;

	case FPGA_PERF:

	    for (i = 0; i < *num_metrics_info; ++i) {

		if (metrics_info[i].metric_type == FPGA_METRIC_TYPE_PERFORMANCE_CTR) {

		    id_array[j++] = i;

		}

	    }

	    break;

	}

	*num_metrics = j;

	if (*num_metrics == 0) {

		goto out_close;

	}

	res = fpgaGetMetricsByIndex(handle, id_array, *num_metrics, metrics);

	ON_FPGAINFO_ERR_GOTO(res, out_close, "getting metrics");

out_close:

	/* close FPGA */

	ret = (res != FPGA_OK) ? res : ret;

	res = fpgaClose(handle);

	ON_FPGAINFO_ERR_GOTO(res, out_exit, "closing FPGA");

out_exit:

	ret = (res != FPGA_OK) ? res : ret;

	return ret;

}

void print_metrics(const fpga_metric_info *metrics_info,

		   uint64_t num_metrics_info,

		   const fpga_metric *metrics, uint64_t num_metrics)

{

	uint64_t i = 0;

	for (i = 0; i < num_metrics; ++i) {

		uint64_t idx = metrics[i].metric_num;

		if (metrics[i].isvalid) {

			if (idx < num_metrics_info) {

				printf("(%2ld) %-27s : ", i + 1, metrics_info[idx].metric_name);

				switch (metrics_info[idx].metric_datatype) {

				case FPGA_METRIC_DATATYPE_INT:

					printf("%" PRId64 "", metrics[i].value.ivalue);

					break;

				case FPGA_METRIC_DATATYPE_DOUBLE: /* FALLTHROUGH */

				case FPGA_METRIC_DATATYPE_FLOAT:

					printf("%0.2f", metrics[i].value.dvalue);

					break;

				case FPGA_METRIC_DATATYPE_BOOL:

					printf("%d", metrics[i].value.bvalue);

					break;

				default:

					OPAE_ERR("Metrics Invalid datatype");

					break;

				}

				printf(" %s\n", metrics_info[idx].metric_units);

			}

		} else {

			// Failed to read metric value

			fprintf(stdout, "(%2ld) %-27s : %s\n", i + 1, metrics_info[idx].metric_name, "N/A");

		}

	}

}