Quelle  pvrdma_verbs.c   Sprache: C

/*
 * Copyright (c) 2012-2016 VMware, Inc.  All rights reserved.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of EITHER the GNU General Public License
 * version 2 as published by the Free Software Foundation or the BSD
 * 2-Clause License. This program is distributed in the hope that it
 * will be useful, but WITHOUT ANY WARRANTY; WITHOUT EVEN THE IMPLIED
 * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.
 * See the GNU General Public License version 2 for more details at
 * http://www.gnu.org/licenses/old-licenses/gpl-2.0.en.html.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program available in the file COPYING in the main
 * directory of this source tree.
 *
 * The BSD 2-Clause License
 *
 *     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.
 *
 * 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 HOLDER 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 <asm/page.h>
#include <linux/inet.h>
#include <linux/io.h>
#include <rdma/ib_addr.h>
#include <rdma/ib_smi.h>
#include <rdma/ib_user_verbs.h>
#include <rdma/vmw_pvrdma-abi.h>
#include <rdma/uverbs_ioctl.h>

#include "pvrdma.h"

/**
 * pvrdma_query_device - query device
 * @ibdev: the device to query
 * @props: the device properties
 * @uhw: user data
 *
 * @return: 0 on success, otherwise negative errno
 */
int pvrdma_query_device(struct ib_device *ibdev,
   struct ib_device_attr *props,
   struct ib_udata *uhw)
{
 struct pvrdma_dev *dev = to_vdev(ibdev);

 if (uhw->inlen || uhw->outlen)
  return -EINVAL;

 props->fw_ver = dev->dsr->caps.fw_ver;
 props->sys_image_guid = dev->dsr->caps.sys_image_guid;
 props->max_mr_size = dev->dsr->caps.max_mr_size;
 props->page_size_cap = dev->dsr->caps.page_size_cap;
 props->vendor_id = dev->dsr->caps.vendor_id;
 props->vendor_part_id = dev->pdev->device;
 props->hw_ver = dev->dsr->caps.hw_ver;
 props->max_qp = dev->dsr->caps.max_qp;
 props->max_qp_wr = dev->dsr->caps.max_qp_wr;
 props->device_cap_flags = dev->dsr->caps.device_cap_flags;
 props->max_send_sge = dev->dsr->caps.max_sge;
 props->max_recv_sge = dev->dsr->caps.max_sge;
 props->max_sge_rd = PVRDMA_GET_CAP(dev, dev->dsr->caps.max_sge,
        dev->dsr->caps.max_sge_rd);
 props->max_srq = dev->dsr->caps.max_srq;
 props->max_srq_wr = dev->dsr->caps.max_srq_wr;
 props->max_srq_sge = dev->dsr->caps.max_srq_sge;
 props->max_cq = dev->dsr->caps.max_cq;
 props->max_cqe = dev->dsr->caps.max_cqe;
 props->max_mr = dev->dsr->caps.max_mr;
 props->max_pd = dev->dsr->caps.max_pd;
 props->max_qp_rd_atom = dev->dsr->caps.max_qp_rd_atom;
 props->max_qp_init_rd_atom = dev->dsr->caps.max_qp_init_rd_atom;
 props->atomic_cap =
  dev->dsr->caps.atomic_ops &
  (PVRDMA_ATOMIC_OP_COMP_SWAP | PVRDMA_ATOMIC_OP_FETCH_ADD) ?
  IB_ATOMIC_HCA : IB_ATOMIC_NONE;
 props->masked_atomic_cap = props->atomic_cap;
 props->max_ah = dev->dsr->caps.max_ah;
 props->max_pkeys = dev->dsr->caps.max_pkeys;
 props->local_ca_ack_delay = dev->dsr->caps.local_ca_ack_delay;
 if ((dev->dsr->caps.bmme_flags & PVRDMA_BMME_FLAG_LOCAL_INV) &&
     (dev->dsr->caps.bmme_flags & PVRDMA_BMME_FLAG_REMOTE_INV) &&
     (dev->dsr->caps.bmme_flags & PVRDMA_BMME_FLAG_FAST_REG_WR)) {
  props->device_cap_flags |= IB_DEVICE_MEM_MGT_EXTENSIONS;
  props->max_fast_reg_page_list_len = PVRDMA_GET_CAP(dev,
    PVRDMA_MAX_FAST_REG_PAGES,
    dev->dsr->caps.max_fast_reg_page_list_len);
 }

 props->device_cap_flags |= IB_DEVICE_PORT_ACTIVE_EVENT |
       IB_DEVICE_RC_RNR_NAK_GEN;

 return 0;
}

/**
 * pvrdma_query_port - query device port attributes
 * @ibdev: the device to query
 * @port: the port number
 * @props: the device properties
 *
 * @return: 0 on success, otherwise negative errno
 */
int pvrdma_query_port(struct ib_device *ibdev, u32 port,
        struct ib_port_attr *props)
{
 struct pvrdma_dev *dev = to_vdev(ibdev);
 union pvrdma_cmd_req req;
 union pvrdma_cmd_resp rsp;
 struct pvrdma_cmd_query_port *cmd = &req.query_port;
 struct pvrdma_cmd_query_port_resp *resp = &rsp.query_port_resp;
 int err;

 memset(cmd, 0, sizeof(*cmd));
 cmd->hdr.cmd = PVRDMA_CMD_QUERY_PORT;
 cmd->port_num = port;

 err = pvrdma_cmd_post(dev, &req, &rsp, PVRDMA_CMD_QUERY_PORT_RESP);
 if (err < 0) {
  dev_warn(&dev->pdev->dev,
    "could not query port, error: %d\n", err);
  return err;
 }

 /* props being zeroed by the caller, avoid zeroing it here */

 props->state = pvrdma_port_state_to_ib(resp->attrs.state);
 props->max_mtu = pvrdma_mtu_to_ib(resp->attrs.max_mtu);
 props->active_mtu = pvrdma_mtu_to_ib(resp->attrs.active_mtu);
 props->gid_tbl_len = resp->attrs.gid_tbl_len;
 props->port_cap_flags =
  pvrdma_port_cap_flags_to_ib(resp->attrs.port_cap_flags);
 props->port_cap_flags |= IB_PORT_CM_SUP;
 props->ip_gids = true;
 props->max_msg_sz = resp->attrs.max_msg_sz;
 props->bad_pkey_cntr = resp->attrs.bad_pkey_cntr;
 props->qkey_viol_cntr = resp->attrs.qkey_viol_cntr;
 props->pkey_tbl_len = resp->attrs.pkey_tbl_len;
 props->lid = resp->attrs.lid;
 props->sm_lid = resp->attrs.sm_lid;
 props->lmc = resp->attrs.lmc;
 props->max_vl_num = resp->attrs.max_vl_num;
 props->sm_sl = resp->attrs.sm_sl;
 props->subnet_timeout = resp->attrs.subnet_timeout;
 props->init_type_reply = resp->attrs.init_type_reply;
 props->active_width = pvrdma_port_width_to_ib(resp->attrs.active_width);
 props->active_speed = pvrdma_port_speed_to_ib(resp->attrs.active_speed);
 props->phys_state = resp->attrs.phys_state;

 return 0;
}

/**
 * pvrdma_query_gid - query device gid
 * @ibdev: the device to query
 * @port: the port number
 * @index: the index
 * @gid: the device gid value
 *
 * @return: 0 on success, otherwise negative errno
 */
int pvrdma_query_gid(struct ib_device *ibdev, u32 port, int index,
       union ib_gid *gid)
{
 struct pvrdma_dev *dev = to_vdev(ibdev);

 if (index >= dev->dsr->caps.gid_tbl_len)
  return -EINVAL;

 memcpy(gid, &dev->sgid_tbl[index], sizeof(union ib_gid));

 return 0;
}

/**
 * pvrdma_query_pkey - query device port's P_Key table
 * @ibdev: the device to query
 * @port: the port number
 * @index: the index
 * @pkey: the device P_Key value
 *
 * @return: 0 on success, otherwise negative errno
 */
int pvrdma_query_pkey(struct ib_device *ibdev, u32 port, u16 index,
        u16 *pkey)
{
 int err = 0;
 union pvrdma_cmd_req req;
 union pvrdma_cmd_resp rsp;
 struct pvrdma_cmd_query_pkey *cmd = &req.query_pkey;

 memset(cmd, 0, sizeof(*cmd));
 cmd->hdr.cmd = PVRDMA_CMD_QUERY_PKEY;
 cmd->port_num = port;
 cmd->index = index;

 err = pvrdma_cmd_post(to_vdev(ibdev), &req, &rsp,
         PVRDMA_CMD_QUERY_PKEY_RESP);
 if (err < 0) {
  dev_warn(&to_vdev(ibdev)->pdev->dev,
    "could not query pkey, error: %d\n", err);
  return err;
 }

 *pkey = rsp.query_pkey_resp.pkey;

 return 0;
}

enum rdma_link_layer pvrdma_port_link_layer(struct ib_device *ibdev,
         u32 port)
{
 return IB_LINK_LAYER_ETHERNET;
}

/**
 * pvrdma_modify_port - modify device port attributes
 * @ibdev: the device to modify
 * @port: the port number
 * @mask: attributes to modify
 * @props: the device properties
 *
 * @return: 0 on success, otherwise negative errno
 */
int pvrdma_modify_port(struct ib_device *ibdev, u32 port, int mask,
         struct ib_port_modify *props)
{
 struct ib_port_attr attr;
 struct pvrdma_dev *vdev = to_vdev(ibdev);
 int ret;

 if (mask & ~IB_PORT_SHUTDOWN) {
  dev_warn(&vdev->pdev->dev,
    "unsupported port modify mask %#x\n", mask);
  return -EOPNOTSUPP;
 }

 mutex_lock(&vdev->port_mutex);
 ret = ib_query_port(ibdev, port, &attr);
 if (ret)
  goto out;

 vdev->port_cap_mask |= props->set_port_cap_mask;
 vdev->port_cap_mask &= ~props->clr_port_cap_mask;

 if (mask & IB_PORT_SHUTDOWN)
  vdev->ib_active = false;

out:
 mutex_unlock(&vdev->port_mutex);
 return ret;
}

/**
 * pvrdma_alloc_ucontext - allocate ucontext
 * @uctx: the uverbs countext
 * @udata: user data
 *
 * @return:  zero on success, otherwise errno.
 */
int pvrdma_alloc_ucontext(struct ib_ucontext *uctx, struct ib_udata *udata)
{
 struct ib_device *ibdev = uctx->device;
 struct pvrdma_dev *vdev = to_vdev(ibdev);
 struct pvrdma_ucontext *context = to_vucontext(uctx);
 union pvrdma_cmd_req req = {};
 union pvrdma_cmd_resp rsp = {};
 struct pvrdma_cmd_create_uc *cmd = &req.create_uc;
 struct pvrdma_cmd_create_uc_resp *resp = &rsp.create_uc_resp;
 struct pvrdma_alloc_ucontext_resp uresp = {};
 int ret;

 if (!vdev->ib_active)
  return -EAGAIN;

 context->dev = vdev;
 ret = pvrdma_uar_alloc(vdev, &context->uar);
 if (ret)
  return -ENOMEM;

 /* get ctx_handle from host */
 if (vdev->dsr_version < PVRDMA_PPN64_VERSION)
  cmd->pfn = context->uar.pfn;
 else
  cmd->pfn64 = context->uar.pfn;

 cmd->hdr.cmd = PVRDMA_CMD_CREATE_UC;
 ret = pvrdma_cmd_post(vdev, &req, &rsp, PVRDMA_CMD_CREATE_UC_RESP);
 if (ret < 0) {
  dev_warn(&vdev->pdev->dev,
    "could not create ucontext, error: %d\n", ret);
  goto err;
 }

 context->ctx_handle = resp->ctx_handle;

 /* copy back to user */
 uresp.qp_tab_size = vdev->dsr->caps.max_qp;
 ret = ib_copy_to_udata(udata, &uresp, sizeof(uresp));
 if (ret) {
  pvrdma_uar_free(vdev, &context->uar);
  pvrdma_dealloc_ucontext(&context->ibucontext);
  return -EFAULT;
 }

 return 0;

err:
 pvrdma_uar_free(vdev, &context->uar);
 return ret;
}

/**
 * pvrdma_dealloc_ucontext - deallocate ucontext
 * @ibcontext: the ucontext
 */
void pvrdma_dealloc_ucontext(struct ib_ucontext *ibcontext)
{
 struct pvrdma_ucontext *context = to_vucontext(ibcontext);
 union pvrdma_cmd_req req = {};
 struct pvrdma_cmd_destroy_uc *cmd = &req.destroy_uc;
 int ret;

 cmd->hdr.cmd = PVRDMA_CMD_DESTROY_UC;
 cmd->ctx_handle = context->ctx_handle;

 ret = pvrdma_cmd_post(context->dev, &req, NULL, 0);
 if (ret < 0)
  dev_warn(&context->dev->pdev->dev,
    "destroy ucontext failed, error: %d\n", ret);

 /* Free the UAR even if the device command failed */
 pvrdma_uar_free(to_vdev(ibcontext->device), &context->uar);
}

/**
 * pvrdma_mmap - create mmap region
 * @ibcontext: the user context
 * @vma: the VMA
 *
 * @return: 0 on success, otherwise errno.
 */
int pvrdma_mmap(struct ib_ucontext *ibcontext, struct vm_area_struct *vma)
{
 struct pvrdma_ucontext *context = to_vucontext(ibcontext);
 unsigned long start = vma->vm_start;
 unsigned long size = vma->vm_end - vma->vm_start;
 unsigned long offset = vma->vm_pgoff << PAGE_SHIFT;

 dev_dbg(&context->dev->pdev->dev, "create mmap region\n");

 if ((size != PAGE_SIZE) || (offset & ~PAGE_MASK)) {
  dev_warn(&context->dev->pdev->dev,
    "invalid params for mmap region\n");
  return -EINVAL;
 }

 /* Map UAR to kernel space, VM_LOCKED? */
 vm_flags_set(vma, VM_DONTCOPY | VM_DONTEXPAND);
 vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);
 if (io_remap_pfn_range(vma, start, context->uar.pfn, size,
          vma->vm_page_prot))
  return -EAGAIN;

 return 0;
}

/**
 * pvrdma_alloc_pd - allocate protection domain
 * @ibpd: PD pointer
 * @udata: user data
 *
 * @return: the ib_pd protection domain pointer on success, otherwise errno.
 */
int pvrdma_alloc_pd(struct ib_pd *ibpd, struct ib_udata *udata)
{
 struct ib_device *ibdev = ibpd->device;
 struct pvrdma_pd *pd = to_vpd(ibpd);
 struct pvrdma_dev *dev = to_vdev(ibdev);
 union pvrdma_cmd_req req = {};
 union pvrdma_cmd_resp rsp = {};
 struct pvrdma_cmd_create_pd *cmd = &req.create_pd;
 struct pvrdma_cmd_create_pd_resp *resp = &rsp.create_pd_resp;
 struct pvrdma_alloc_pd_resp pd_resp = {0};
 int ret;
 struct pvrdma_ucontext *context = rdma_udata_to_drv_context(
  udata, struct pvrdma_ucontext, ibucontext);

 /* Check allowed max pds */
 if (!atomic_add_unless(&dev->num_pds, 1, dev->dsr->caps.max_pd))
  return -ENOMEM;

 cmd->hdr.cmd = PVRDMA_CMD_CREATE_PD;
 cmd->ctx_handle = context ? context->ctx_handle : 0;
 ret = pvrdma_cmd_post(dev, &req, &rsp, PVRDMA_CMD_CREATE_PD_RESP);
 if (ret < 0) {
  dev_warn(&dev->pdev->dev,
    "failed to allocate protection domain, error: %d\n",
    ret);
  goto err;
 }

 pd->privileged = !udata;
 pd->pd_handle = resp->pd_handle;
 pd->pdn = resp->pd_handle;
 pd_resp.pdn = resp->pd_handle;

 if (udata) {
  if (ib_copy_to_udata(udata, &pd_resp, sizeof(pd_resp))) {
   dev_warn(&dev->pdev->dev,
     "failed to copy back protection domain\n");
   pvrdma_dealloc_pd(&pd->ibpd, udata);
   return -EFAULT;
  }
 }

 /* u32 pd handle */
 return 0;

err:
 atomic_dec(&dev->num_pds);
 return ret;
}

/**
 * pvrdma_dealloc_pd - deallocate protection domain
 * @pd: the protection domain to be released
 * @udata: user data or null for kernel object
 *
 * @return: Always 0
 */
int pvrdma_dealloc_pd(struct ib_pd *pd, struct ib_udata *udata)
{
 struct pvrdma_dev *dev = to_vdev(pd->device);
 union pvrdma_cmd_req req = {};
 struct pvrdma_cmd_destroy_pd *cmd = &req.destroy_pd;
 int ret;

 cmd->hdr.cmd = PVRDMA_CMD_DESTROY_PD;
 cmd->pd_handle = to_vpd(pd)->pd_handle;

 ret = pvrdma_cmd_post(dev, &req, NULL, 0);
 if (ret)
  dev_warn(&dev->pdev->dev,
    "could not dealloc protection domain, error: %d\n",
    ret);

 atomic_dec(&dev->num_pds);
 return 0;
}

/**
 * pvrdma_create_ah - create an address handle
 * @ibah: the IB address handle
 * @init_attr: the attributes of the AH
 * @udata: pointer to user data
 *
 * @return: 0 on success, otherwise errno.
 */
int pvrdma_create_ah(struct ib_ah *ibah, struct rdma_ah_init_attr *init_attr,
       struct ib_udata *udata)
{
 struct rdma_ah_attr *ah_attr = init_attr->ah_attr;
 struct pvrdma_dev *dev = to_vdev(ibah->device);
 struct pvrdma_ah *ah = to_vah(ibah);
 const struct ib_global_route *grh;
 u32 port_num = rdma_ah_get_port_num(ah_attr);

 if (!(rdma_ah_get_ah_flags(ah_attr) & IB_AH_GRH))
  return -EINVAL;

 grh = rdma_ah_read_grh(ah_attr);
 if ((ah_attr->type != RDMA_AH_ATTR_TYPE_ROCE)  ||
     rdma_is_multicast_addr((struct in6_addr *)grh->dgid.raw))
  return -EINVAL;

 if (!atomic_add_unless(&dev->num_ahs, 1, dev->dsr->caps.max_ah))
  return -ENOMEM;

 ah->av.port_pd = to_vpd(ibah->pd)->pd_handle | (port_num << 24);
 ah->av.src_path_bits = rdma_ah_get_path_bits(ah_attr);
 ah->av.src_path_bits |= 0x80;
 ah->av.gid_index = grh->sgid_index;
 ah->av.hop_limit = grh->hop_limit;
 ah->av.sl_tclass_flowlabel = (grh->traffic_class << 20) |
          grh->flow_label;
 memcpy(ah->av.dgid, grh->dgid.raw, 16);
 memcpy(ah->av.dmac, ah_attr->roce.dmac, ETH_ALEN);

 return 0;
}

/**
 * pvrdma_destroy_ah - destroy an address handle
 * @ah: the address handle to destroyed
 * @flags: destroy address handle flags (see enum rdma_destroy_ah_flags)
 *
 */
int pvrdma_destroy_ah(struct ib_ah *ah, u32 flags)
{
 struct pvrdma_dev *dev = to_vdev(ah->device);

 atomic_dec(&dev->num_ahs);
 return 0;
}