/*
 * Copyright (c) 2010, Oracle and/or its affiliates. All rights reserved.
 */

/*
 * This file contains code imported from the OFED rds source file stats.c
 * Oracle elects to have and use the contents of stats.c under and governed
 * by the OpenIB.org BSD license (see below for full license text). However,
 * the following notice accompanied the original version of this file:
 */

/*
 * Copyright (c) 2006 Oracle.  All rights reserved.
 *
 * This software is available to you under a choice of one of two
 * licenses.  You may choose to be licensed under the terms of the GNU
 * General Public License (GPL) Version 2, available from the file
 * COPYING in the main directory of this source tree, or the
 * OpenIB.org BSD license below:
 *
 *     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.
 *
 * 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/rds.h>

#include <sys/ib/clients/rdsv3/rdsv3.h>

struct rdsv3_statistics *rdsv3_stats = NULL;
uint_t	nr_cpus;

static char *rdsv3_stat_names[] = {
	"conn_reset",
	"recv_drop_bad_checksum",
	"recv_drop_old_seq",
	"recv_drop_no_sock",
	"recv_drop_dead_sock",
	"recv_deliver_raced",
	"recv_delivered",
	"recv_queued",
	"recv_immediate_retry",
	"recv_delayed_retry",
	"recv_ack_required",
	"recv_rdma_bytes",
	"recv_ping",
	"send_queue_empty",
	"send_queue_full",
	"send_sem_contention",
	"send_sem_queue_raced",
	"send_immediate_retry",
	"send_delayed_retry",
	"send_drop_acked",
	"send_ack_required",
	"send_queued",
	"send_rdma",
	"send_rdma_bytes",
	"send_pong",
	"page_remainder_hit",
	"page_remainder_miss",
	"copy_to_user",
	"copy_from_user",
	"cong_update_queued",
	"cong_update_received",
	"cong_send_error",
	"cong_send_blocked",
};

void
rdsv3_stats_info_copy(struct rdsv3_info_iterator *iter,
    uint64_t *values, char **names, size_t nr)
{
	struct rds_info_counter ctr;
	size_t i;

	for (i = 0; i < nr; i++) {
		ASSERT(!(strlen(names[i]) >= sizeof (ctr.name)));
		(void) strncpy((char *)ctr.name, names[i],
		    sizeof (ctr.name) - 1);
		ctr.value = values[i];

		rdsv3_info_copy(iter, &ctr, sizeof (ctr));
	}
}

/*
 * This gives global counters across all the transports.  The strings
 * are copied in so that the tool doesn't need knowledge of the specific
 * stats that we're exporting.  Some are pretty implementation dependent
 * and may change over time.  That doesn't stop them from being useful.
 *
 * This is the only function in the chain that knows about the byte granular
 * length in userspace.  It converts it to number of stat entries that the
 * rest of the functions operate in.
 */
/* ARGSUSED */
static void
rdsv3_stats_info(struct rsock *sock, unsigned int len,
    struct rdsv3_info_iterator *iter,
    struct rdsv3_info_lengths *lens)
{
	struct rdsv3_statistics stats;
	uint64_t *src;
	uint64_t *sum;
	size_t i;
	int cpu;
	unsigned int avail;

	avail = len / sizeof (struct rds_info_counter);

	if (avail < ARRAY_SIZE(rdsv3_stat_names)) {
		avail = 0;
		goto trans;
	}

	bzero(&stats, sizeof (struct rdsv3_statistics));

	for (cpu = 0; cpu < nr_cpus; cpu++) {
		src = (uint64_t *)&(rdsv3_per_cpu(rdsv3_stats, cpu));
		sum = (uint64_t *)&stats;
		for (i = 0;
		    i < sizeof (struct rdsv3_statistics) / sizeof (uint64_t);
		    i++)
			*(sum++) += *(src++);
	}

	rdsv3_stats_info_copy(iter, (uint64_t *)&stats, rdsv3_stat_names,
	    ARRAY_SIZE(rdsv3_stat_names));
	avail -= ARRAY_SIZE(rdsv3_stat_names);

trans:
	lens->each = sizeof (struct rds_info_counter);
	lens->nr = rdsv3_trans_stats_info_copy(iter, avail) +
	    ARRAY_SIZE(rdsv3_stat_names);
}

void
rdsv3_stats_exit(void)
{
	rdsv3_info_deregister_func(RDS_INFO_COUNTERS, rdsv3_stats_info);

	ASSERT(rdsv3_stats);
	kmem_free(rdsv3_stats,
	    nr_cpus * sizeof (struct rdsv3_statistics));
	rdsv3_stats = NULL;
}

int
rdsv3_stats_init(void)
{
	/*
	 * Note the max number of cpus that this system can have at most.
	 */
	nr_cpus = max_ncpus;
	ASSERT(rdsv3_stats == NULL);
	rdsv3_stats = kmem_zalloc(nr_cpus *
	    sizeof (struct rdsv3_statistics), KM_SLEEP);

	rdsv3_info_register_func(RDS_INFO_COUNTERS, rdsv3_stats_info);
	return (0);
}