/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */

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

#include <sys/types.h>
#include <sys/kmem.h>
#include <sys/conf.h>
#include <sys/ddi.h>
#include <sys/sunddi.h>
#include <sys/ksynch.h>

#include <sys/ib/clients/eoib/eib_impl.h>

eib_chan_t *
eib_chan_init(void)
{
	eib_chan_t *chan;

	/*
	 * Allocate a eib_chan_t to store stuff about admin qp and
	 * initialize some basic stuff
	 */
	chan = kmem_zalloc(sizeof (eib_chan_t), KM_SLEEP);

	mutex_init(&chan->ch_pkey_lock, NULL, MUTEX_DRIVER, NULL);
	mutex_init(&chan->ch_cep_lock, NULL, MUTEX_DRIVER, NULL);
	mutex_init(&chan->ch_tx_lock, NULL, MUTEX_DRIVER, NULL);
	mutex_init(&chan->ch_rx_lock, NULL, MUTEX_DRIVER, NULL);
	mutex_init(&chan->ch_vhub_lock, NULL, MUTEX_DRIVER, NULL);

	cv_init(&chan->ch_cep_cv, NULL, CV_DEFAULT, NULL);
	cv_init(&chan->ch_tx_cv, NULL, CV_DEFAULT, NULL);
	cv_init(&chan->ch_rx_cv, NULL, CV_DEFAULT, NULL);

	return (chan);
}

void
eib_chan_fini(eib_chan_t *chan)
{
	if (chan) {
		cv_destroy(&chan->ch_rx_cv);
		cv_destroy(&chan->ch_tx_cv);
		cv_destroy(&chan->ch_cep_cv);

		mutex_destroy(&chan->ch_vhub_lock);
		mutex_destroy(&chan->ch_rx_lock);
		mutex_destroy(&chan->ch_tx_lock);
		mutex_destroy(&chan->ch_cep_lock);
		mutex_destroy(&chan->ch_pkey_lock);

		kmem_free(chan, sizeof (eib_chan_t));
	}
}

int
eib_chan_post_rx(eib_t *ss, eib_chan_t *chan, uint_t *n_posted)
{
	eib_wqe_t *rwqes[EIB_RWR_CHUNK_SZ];
	ibt_status_t ret;
	uint_t n_got = 0;
	uint_t n_good = 0;
	uint_t limit = 0;
	uint_t room = 0;
	uint_t chunk_sz;
	int wndx;
	int i;

	/*
	 * We don't want to post beyond the maximum rwqe size for this channel
	 */
	room = chan->ch_max_rwqes - chan->ch_rx_posted;
	limit = (room > chan->ch_rwqe_bktsz) ? chan->ch_rwqe_bktsz : room;

	for (wndx = 0; wndx < limit; wndx += chunk_sz) {
		/*
		 * Grab a chunk of rwqes
		 */
		chunk_sz = ((limit - wndx) < EIB_RWR_CHUNK_SZ) ?
		    (limit - wndx) : EIB_RWR_CHUNK_SZ;

		/*
		 * When eib_chan_post_rx() is called to post a bunch of rwqes,
		 * it is either during the vnic setup or when we're refilling
		 * the data channel.  Neither situation is important enough for
		 * us to grab the wqes reserved for sending keepalives of
		 * previously established vnics.
		 */
		ret = eib_rsrc_grab_rwqes(ss, rwqes, chunk_sz, &n_got,
		    EIB_WPRI_LO);
		if (ret != EIB_E_SUCCESS)
			break;

		/*
		 * Post work requests from the rwqes we just grabbed
		 */
		for (i = 0; i < n_got; i++) {
			eib_wqe_t *rwqe = rwqes[i];

			ret = eib_chan_post_recv(ss, chan, rwqe);
			if (ret == EIB_E_SUCCESS) {
				n_good++;
			} else if (rwqe->qe_mp) {
				freemsg(rwqe->qe_mp);
			} else {
				eib_rsrc_return_rwqe(ss, rwqe, NULL);
			}
		}

		/*
		 * If we got less rwqes than we asked for during the grab
		 * earlier, we'll stop asking for more and quit now.
		 */
		if (n_got < chunk_sz)
			break;
	}

	/*
	 * If we posted absolutely nothing, we return failure; otherwise
	 * return success.
	 */
	if (n_good == 0)
		return (EIB_E_FAILURE);

	if (n_posted)
		*n_posted = n_good;

	return (EIB_E_SUCCESS);
}

/*ARGSUSED*/
int
eib_chan_post_recv(eib_t *ss, eib_chan_t *chan, eib_wqe_t *rwqe)
{
	ibt_status_t ret;
	uint8_t *mp_base;
	size_t mp_len;

	rwqe->qe_sgl.ds_va = (ib_vaddr_t)(uintptr_t)rwqe->qe_cpbuf;
	rwqe->qe_sgl.ds_len = rwqe->qe_bufsz;

	/*
	 * If this channel has receive buffer alignment restrictions, make
	 * sure the requirements are met
	 */
	if (chan->ch_ip_hdr_align) {
		rwqe->qe_sgl.ds_va += chan->ch_ip_hdr_align;
		rwqe->qe_sgl.ds_len -= chan->ch_ip_hdr_align;
	}

	/*
	 * If the receive buffer for this channel needs to have an mblk
	 * allocated, do it
	 */
	if (chan->ch_alloc_mp) {
		mp_base = (uint8_t *)(uintptr_t)(rwqe->qe_sgl.ds_va);
		mp_len = rwqe->qe_sgl.ds_len;

		rwqe->qe_mp = desballoc(mp_base, mp_len, 0, &rwqe->qe_frp);
		if (rwqe->qe_mp == NULL) {
			EIB_DPRINTF_ERR(ss->ei_instance, "eib_chan_post_recv: "
			    "desballoc(base=0x%llx, len=0x%llx) failed",
			    mp_base, mp_len);
			return (EIB_E_FAILURE);
		}
	}

	/*
	 * Check if the recv queue is already full or if we can post one more
	 */
	mutex_enter(&chan->ch_rx_lock);
	if (chan->ch_rx_posted > (chan->ch_max_rwqes - 1)) {
		EIB_DPRINTF_ERR(ss->ei_instance, "eib_chan_post_recv: "
		    "too many rwqes posted already, posted=0x%lx, max=0x%lx",
		    chan->ch_rx_posted, chan->ch_max_rwqes);
		mutex_exit(&chan->ch_rx_lock);
		return (EIB_E_FAILURE);
	}

	rwqe->qe_vnic_inst = chan->ch_vnic_inst;
	rwqe->qe_chan = chan;
	rwqe->qe_info |= EIB_WQE_FLG_POSTED_TO_HCA;

	ret = ibt_post_recv(chan->ch_chan, &(rwqe->qe_wr.recv), 1, NULL);
	if (ret != IBT_SUCCESS) {
		EIB_DPRINTF_ERR(ss->ei_instance, "eib_chan_post_recv: "
		    "ibt_post_recv() failed, ret=%d", ret);
		mutex_exit(&chan->ch_rx_lock);
		return (EIB_E_FAILURE);
	}
	chan->ch_rx_posted++;
	mutex_exit(&chan->ch_rx_lock);

	return (EIB_E_SUCCESS);
}