/*
 * 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) 2004, 2010, Oracle and/or its affiliates. All rights reserved.
 * Copyright (c) 2013 by Delphix. All rights reserved.
 */

#include <inet/ip.h>
#include <inet/ip6.h>
#include <inet/sctp/sctp_stack.h>
#include <inet/sctp/sctp_impl.h>
#include <sys/sunddi.h>

/* Max size IP datagram is 64k - 1 */
#define SCTP_MSS_MAX_IPV4 (IP_MAXPACKET - (sizeof (ipha_t) + \
                                        sizeof (sctp_hdr_t)))
#define SCTP_MSS_MAX_IPV6 (IP_MAXPACKET - (sizeof (ip6_t) + \
                                        sizeof (sctp_hdr_t)))
/* Max of the above */
#define SCTP_MSS_MAX    SCTP_MSS_MAX_IPV4

/*
 * returns the current list of listener limit configuration.
 */
/* ARGSUSED */
static int
sctp_listener_conf_get(netstack_t *stack, mod_prop_info_t *pinfo,
    const char *ifname, void *val, uint_t psize, uint_t flags)
{
        sctp_stack_t    *sctps = stack->netstack_sctp;
        sctp_listener_t *sl;
        char            *pval = val;
        size_t          nbytes = 0, tbytes = 0;
        uint_t          size;
        int             err = 0;

        bzero(pval, psize);
        size = psize;

        if (flags & (MOD_PROP_DEFAULT|MOD_PROP_PERM|MOD_PROP_POSSIBLE))
                return (0);

        mutex_enter(&sctps->sctps_listener_conf_lock);
        for (sl = list_head(&sctps->sctps_listener_conf); sl != NULL;
            sl = list_next(&sctps->sctps_listener_conf, sl)) {
                if (psize == size)
                        nbytes = snprintf(pval, size, "%d:%d",  sl->sl_port,
                            sl->sl_ratio);
                else
                        nbytes = snprintf(pval, size, ",%d:%d",  sl->sl_port,
                            sl->sl_ratio);
                size -= nbytes;
                pval += nbytes;
                tbytes += nbytes;
                if (tbytes >= psize) {
                        /* Buffer overflow, stop copying information */
                        err = ENOBUFS;
                        break;
                }
        }

        mutex_exit(&sctps->sctps_listener_conf_lock);
        return (err);
}

/*
 * add a new listener limit configuration.
 */
/* ARGSUSED */
static int
sctp_listener_conf_add(netstack_t *stack, cred_t *cr, mod_prop_info_t *pinfo,
    const char *ifname, const void* pval, uint_t flags)
{
        sctp_listener_t *new_sl;
        sctp_listener_t *sl;
        long            lport;
        long            ratio;
        char            *colon;
        sctp_stack_t    *sctps = stack->netstack_sctp;

        if (flags & MOD_PROP_DEFAULT)
                return (ENOTSUP);

        if (ddi_strtol(pval, &colon, 10, &lport) != 0 || lport <= 0 ||
            lport > USHRT_MAX || *colon != ':') {
                return (EINVAL);
        }
        if (ddi_strtol(colon + 1, NULL, 10, &ratio) != 0 || ratio <= 0)
                return (EINVAL);

        mutex_enter(&sctps->sctps_listener_conf_lock);
        for (sl = list_head(&sctps->sctps_listener_conf); sl != NULL;
            sl = list_next(&sctps->sctps_listener_conf, sl)) {
                /* There is an existing entry, so update its ratio value. */
                if (sl->sl_port == lport) {
                        sl->sl_ratio = ratio;
                        mutex_exit(&sctps->sctps_listener_conf_lock);
                        return (0);
                }
        }

        if ((new_sl = kmem_alloc(sizeof (sctp_listener_t), KM_NOSLEEP)) ==
            NULL) {
                mutex_exit(&sctps->sctps_listener_conf_lock);
                return (ENOMEM);
        }

        new_sl->sl_port = lport;
        new_sl->sl_ratio = ratio;
        list_insert_tail(&sctps->sctps_listener_conf, new_sl);
        mutex_exit(&sctps->sctps_listener_conf_lock);
        return (0);
}

/*
 * remove a listener limit configuration.
 */
/* ARGSUSED */
static int
sctp_listener_conf_del(netstack_t *stack, cred_t *cr, mod_prop_info_t *pinfo,
    const char *ifname, const void* pval, uint_t flags)
{
        sctp_listener_t *sl;
        long            lport;
        sctp_stack_t    *sctps = stack->netstack_sctp;

        if (flags & MOD_PROP_DEFAULT)
                return (ENOTSUP);

        if (ddi_strtol(pval, NULL, 10, &lport) != 0 || lport <= 0 ||
            lport > USHRT_MAX) {
                return (EINVAL);
        }
        mutex_enter(&sctps->sctps_listener_conf_lock);
        for (sl = list_head(&sctps->sctps_listener_conf); sl != NULL;
            sl = list_next(&sctps->sctps_listener_conf, sl)) {
                if (sl->sl_port == lport) {
                        list_remove(&sctps->sctps_listener_conf, sl);
                        mutex_exit(&sctps->sctps_listener_conf_lock);
                        kmem_free(sl, sizeof (sctp_listener_t));
                        return (0);
                }
        }
        mutex_exit(&sctps->sctps_listener_conf_lock);
        return (ESRCH);
}

static int
sctp_set_buf_prop(netstack_t *stack, cred_t *cr, mod_prop_info_t *pinfo,
    const char *ifname, const void *pval, uint_t flags)
{
        return (mod_set_buf_prop(stack->netstack_sctp->sctps_propinfo_tbl,
            stack, cr, pinfo, ifname, pval, flags));
}

static int
sctp_get_buf_prop(netstack_t *stack, mod_prop_info_t *pinfo, const char *ifname,
    void *val, uint_t psize, uint_t flags)
{
        return (mod_get_buf_prop(stack->netstack_sctp->sctps_propinfo_tbl,
            stack, pinfo, ifname, val, psize, flags));
}

/*
 * All of these are alterable, within the min/max values given, at run time.
 *
 * Note: All those tunables which do not start with "_" are Committed and
 * therefore are public. See PSARC 2010/080.
 */
mod_prop_info_t sctp_propinfo_tbl[] = {
        { "_max_init_retr", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {0, 128, 8}, {8} },

        { "_pa_max_retr", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1, 128, 10}, {10} },

        { "_pp_max_retr", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1, 128, 5}, {5} },

        { "_cwnd_max", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {128, ULP_MAX_BUF, 1024*1024}, {1024*1024} },

        { "smallest_nonpriv_port", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1024, (32*1024), 1024}, {1024} },

        { "_ipv4_ttl", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1, 255, 64}, {64} },

        { "_heartbeat_interval", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {0, 1*DAYS, 30*SECONDS}, {30*SECONDS} },

        { "_initial_mtu", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {68, 65535, 1500}, {1500} },

        { "_mtu_probe_interval", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {0, 1*DAYS, 10*MINUTES}, {10*MINUTES} },

        { "_new_secret_interval", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {0, 1*DAYS, 2*MINUTES}, {2*MINUTES} },

        /* tunable - 10 */
        { "_deferred_ack_interval", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {10*MS, 1*MINUTES, 100*MS}, {100*MS} },

        { "_snd_lowat_fraction", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {0, 16, 0}, {0} },

        { "_ignore_path_mtu", MOD_PROTO_SCTP,
            mod_set_boolean, mod_get_boolean,
            {B_FALSE}, {B_FALSE} },

        { "_initial_ssthresh", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1024, UINT32_MAX, SCTP_RECV_HIWATER}, { SCTP_RECV_HIWATER} },

        { "smallest_anon_port", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1024, ULP_MAX_PORT, 32*1024}, {32*1024} },

        { "largest_anon_port", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1024, ULP_MAX_PORT, ULP_MAX_PORT}, {ULP_MAX_PORT} },

        { "send_buf", MOD_PROTO_SCTP,
            sctp_set_buf_prop, sctp_get_buf_prop,
            {SCTP_XMIT_LOWATER,  ULP_MAX_BUF,  SCTP_XMIT_HIWATER},
            {SCTP_XMIT_HIWATER} },

        { "_xmit_lowat", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {SCTP_XMIT_LOWATER,  ULP_MAX_BUF,  SCTP_XMIT_LOWATER},
            {SCTP_XMIT_LOWATER} },

        { "recv_buf", MOD_PROTO_SCTP,
            sctp_set_buf_prop, sctp_get_buf_prop,
            {SCTP_RECV_LOWATER,  ULP_MAX_BUF,  SCTP_RECV_HIWATER},
            {SCTP_RECV_HIWATER} },

        { "max_buf", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {8192, ULP_MAX_BUF, 1024*1024}, {1024*1024} },

        /* tunable - 20 */
        { "_rtt_updates", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {0, 65536, 20}, {20} },

        { "_ipv6_hoplimit", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {0, IPV6_MAX_HOPS, IPV6_DEFAULT_HOPS}, {IPV6_DEFAULT_HOPS} },

        { "_rto_min", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {500*MS, 60*SECONDS, 1*SECONDS}, {1*SECONDS} },

        { "_rto_max", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1*SECONDS, 60000*SECONDS, 60*SECONDS}, {60*SECONDS} },

        { "_rto_initial", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1*SECONDS, 60000*SECONDS, 3*SECONDS}, {3*SECONDS} },

        { "_cookie_life", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {10*MS, 60000*SECONDS, 60*SECONDS}, {60*SECONDS} },

        { "_max_in_streams", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1, UINT16_MAX, 32}, {32} },

        { "_initial_out_streams", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1, UINT16_MAX, 32}, {32} },

        { "_shutack_wait_bound", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {0, 300*SECONDS, 60*SECONDS}, {60*SECONDS} },

        { "_maxburst", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {2, 8, 4}, {4} },

        /* tunable - 30 */
        { "_addip_enabled", MOD_PROTO_SCTP,
            mod_set_boolean, mod_get_boolean,
            {B_FALSE}, {B_FALSE} },

        { "_recv_hiwat_minmss", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1, 65536, 4}, {4} },

        { "_slow_start_initial", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1, 16, 4}, {4} },

        { "_slow_start_after_idle", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1, 16384, 4}, {4} },

        { "_prsctp_enabled", MOD_PROTO_SCTP,
            mod_set_boolean, mod_get_boolean,
            {B_TRUE}, {B_TRUE} },

        { "_fast_rxt_thresh", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            {1, 10000, 3}, {3} },

        { "_deferred_acks_max", MOD_PROTO_SCTP,
            mod_set_uint32, mod_get_uint32,
            { 1, 16, 2}, {2} },

        /*
         * sctp_wroff_xtra is the extra space in front of SCTP/IP header
         * for link layer header.  It has to be a multiple of 8.
         */
        { "_wroff_xtra", MOD_PROTO_SCTP,
            mod_set_aligned, mod_get_uint32,
            {0, 256, 32}, {32} },

        { "extra_priv_ports", MOD_PROTO_SCTP,
            mod_set_extra_privports, mod_get_extra_privports,
            {1, ULP_MAX_PORT, 0}, {0} },

        { "_listener_limit_conf", MOD_PROTO_SCTP,
            NULL, sctp_listener_conf_get, {0}, {0} },

        { "_listener_limit_conf_add", MOD_PROTO_SCTP,
            sctp_listener_conf_add, NULL, {0}, {0} },

        { "_listener_limit_conf_del", MOD_PROTO_SCTP,
            sctp_listener_conf_del, NULL, {0}, {0} },

        { "?", MOD_PROTO_SCTP, NULL, mod_get_allprop, {0}, {0} },

        { NULL, 0, NULL, NULL, {0}, {0} }
};

int sctp_propinfo_count = A_CNT(sctp_propinfo_tbl);