/*
 * Copyright (c) 2007 Mellanox Technologies. 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 <linux/kernel.h>
#include <linux/ethtool.h>
#include <linux/netdevice.h>

#include "ipoib.h"

struct ipoib_stats {
        char stat_string[ETH_GSTRING_LEN];
        int stat_offset;
};

#define IPOIB_NETDEV_STAT(m) { \
                .stat_string = #m, \
                .stat_offset = offsetof(struct rtnl_link_stats64, m) }

static const struct ipoib_stats ipoib_gstrings_stats[] = {
        IPOIB_NETDEV_STAT(rx_packets),
        IPOIB_NETDEV_STAT(tx_packets),
        IPOIB_NETDEV_STAT(rx_bytes),
        IPOIB_NETDEV_STAT(tx_bytes),
        IPOIB_NETDEV_STAT(tx_errors),
        IPOIB_NETDEV_STAT(rx_dropped),
        IPOIB_NETDEV_STAT(tx_dropped),
        IPOIB_NETDEV_STAT(multicast),
};

#define IPOIB_GLOBAL_STATS_LEN  ARRAY_SIZE(ipoib_gstrings_stats)

static void ipoib_get_drvinfo(struct net_device *netdev,
                              struct ethtool_drvinfo *drvinfo)
{
        struct ipoib_dev_priv *priv = ipoib_priv(netdev);

        ib_get_device_fw_str(priv->ca, drvinfo->fw_version);

        strscpy(drvinfo->bus_info, dev_name(priv->ca->dev.parent),
                sizeof(drvinfo->bus_info));

        strscpy(drvinfo->driver, "ib_ipoib", sizeof(drvinfo->driver));
}

static int ipoib_get_coalesce(struct net_device *dev,
                              struct ethtool_coalesce *coal,
                              struct kernel_ethtool_coalesce *kernel_coal,
                              struct netlink_ext_ack *extack)
{
        struct ipoib_dev_priv *priv = ipoib_priv(dev);

        coal->rx_coalesce_usecs = priv->ethtool.coalesce_usecs;
        coal->rx_max_coalesced_frames = priv->ethtool.max_coalesced_frames;

        return 0;
}

static int ipoib_set_coalesce(struct net_device *dev,
                              struct ethtool_coalesce *coal,
                              struct kernel_ethtool_coalesce *kernel_coal,
                              struct netlink_ext_ack *extack)
{
        struct ipoib_dev_priv *priv = ipoib_priv(dev);
        int ret;

        /*
         * These values are saved in the private data and returned
         * when ipoib_get_coalesce() is called
         */
        if (coal->rx_coalesce_usecs       > 0xffff ||
            coal->rx_max_coalesced_frames > 0xffff)
                return -EINVAL;

        ret = rdma_set_cq_moderation(priv->recv_cq,
                                     coal->rx_max_coalesced_frames,
                                     coal->rx_coalesce_usecs);
        if (ret && ret != -EOPNOTSUPP) {
                ipoib_warn(priv, "failed modifying CQ (%d)\n", ret);
                return ret;
        }

        priv->ethtool.coalesce_usecs       = coal->rx_coalesce_usecs;
        priv->ethtool.max_coalesced_frames = coal->rx_max_coalesced_frames;

        return 0;
}
static void ipoib_get_ethtool_stats(struct net_device *dev,
                                    struct ethtool_stats __always_unused *stats,
                                    u64 *data)
{
        int i;
        struct net_device_stats *net_stats = &dev->stats;
        u8 *p = (u8 *)net_stats;

        for (i = 0; i < IPOIB_GLOBAL_STATS_LEN; i++)
                data[i] = *(u64 *)(p + ipoib_gstrings_stats[i].stat_offset);

}
static void ipoib_get_strings(struct net_device __always_unused *dev,
                              u32 stringset, u8 *data)
{
        int i;

        switch (stringset) {
        case ETH_SS_STATS:
                for (i = 0; i < IPOIB_GLOBAL_STATS_LEN; i++)
                        ethtool_puts(&data,
                                     ipoib_gstrings_stats[i].stat_string);
                break;
        default:
                break;
        }
}
static int ipoib_get_sset_count(struct net_device __always_unused *dev,
                                 int sset)
{
        switch (sset) {
        case ETH_SS_STATS:
                return IPOIB_GLOBAL_STATS_LEN;
        default:
                break;
        }
        return -EOPNOTSUPP;
}

/* Return lane speed in unit of 1e6 bit/sec */
static inline int ib_speed_enum_to_int(int speed)
{
        switch (speed) {
        case IB_SPEED_SDR:
                return SPEED_2500;
        case IB_SPEED_DDR:
                return SPEED_5000;
        case IB_SPEED_QDR:
        case IB_SPEED_FDR10:
                return SPEED_10000;
        case IB_SPEED_FDR:
                return SPEED_14000;
        case IB_SPEED_EDR:
                return SPEED_25000;
        case IB_SPEED_HDR:
                return SPEED_50000;
        case IB_SPEED_NDR:
                return SPEED_100000;
        case IB_SPEED_XDR:
                return SPEED_200000;
        }

        return SPEED_UNKNOWN;
}

static int ipoib_get_link_ksettings(struct net_device *netdev,
                                    struct ethtool_link_ksettings *cmd)
{
        struct ipoib_dev_priv *priv = ipoib_priv(netdev);
        struct ib_port_attr attr;
        int ret, speed, width;

        if (!netif_carrier_ok(netdev)) {
                cmd->base.speed = SPEED_UNKNOWN;
                cmd->base.duplex = DUPLEX_UNKNOWN;
                return 0;
        }

        ret = ib_query_port(priv->ca, priv->port, &attr);
        if (ret < 0)
                return -EINVAL;

        speed = ib_speed_enum_to_int(attr.active_speed);
        width = ib_width_enum_to_int(attr.active_width);

        if (speed < 0 || width < 0)
                return -EINVAL;

        /* Except the following are set, the other members of
         * the struct ethtool_link_settings are initialized to
         * zero in the function __ethtool_get_link_ksettings.
         */
        cmd->base.speed          = speed * width;
        cmd->base.duplex         = DUPLEX_FULL;

        cmd->base.phy_address    = 0xFF;

        cmd->base.autoneg        = AUTONEG_ENABLE;
        cmd->base.port           = PORT_OTHER;

        return 0;
}

static const struct ethtool_ops ipoib_ethtool_ops = {
        .supported_coalesce_params = ETHTOOL_COALESCE_RX_USECS |
                                     ETHTOOL_COALESCE_RX_MAX_FRAMES,
        .get_link_ksettings     = ipoib_get_link_ksettings,
        .get_drvinfo            = ipoib_get_drvinfo,
        .get_coalesce           = ipoib_get_coalesce,
        .set_coalesce           = ipoib_set_coalesce,
        .get_strings            = ipoib_get_strings,
        .get_ethtool_stats      = ipoib_get_ethtool_stats,
        .get_sset_count         = ipoib_get_sset_count,
        .get_link               = ethtool_op_get_link,
};

void ipoib_set_ethtool_ops(struct net_device *dev)
{
        dev->ethtool_ops = &ipoib_ethtool_ops;
}