/*
 * This file implement the Wireless Extensions core API.
 *
 * Authors :    Jean Tourrilhes - HPL - <jt@hpl.hp.com>
 * Copyright (c) 1997-2007 Jean Tourrilhes, All Rights Reserved.
 * Copyright    2009 Johannes Berg <johannes@sipsolutions.net>
 * Copyright (C) 2024 Intel Corporation
 *
 * (As all part of the Linux kernel, this file is GPL)
 */
#include <linux/kernel.h>
#include <linux/netdevice.h>
#include <linux/rtnetlink.h>
#include <linux/slab.h>
#include <linux/wireless.h>
#include <linux/uaccess.h>
#include <linux/export.h>
#include <net/cfg80211.h>
#include <net/iw_handler.h>
#include <net/netlink.h>
#include <net/wext.h>
#include <net/net_namespace.h>

typedef int (*wext_ioctl_func)(struct net_device *, struct iwreq *,
                               unsigned int, struct iw_request_info *,
                               iw_handler);


/*
 * Meta-data about all the standard Wireless Extension request we
 * know about.
 */
static const struct iw_ioctl_description standard_ioctl[] = {
        [IW_IOCTL_IDX(SIOCSIWCOMMIT)] = {
                .header_type    = IW_HEADER_TYPE_NULL,
        },
        [IW_IOCTL_IDX(SIOCGIWNAME)] = {
                .header_type    = IW_HEADER_TYPE_CHAR,
                .flags          = IW_DESCR_FLAG_DUMP,
        },
        [IW_IOCTL_IDX(SIOCSIWNWID)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
                .flags          = IW_DESCR_FLAG_EVENT,
        },
        [IW_IOCTL_IDX(SIOCGIWNWID)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
                .flags          = IW_DESCR_FLAG_DUMP,
        },
        [IW_IOCTL_IDX(SIOCSIWFREQ)] = {
                .header_type    = IW_HEADER_TYPE_FREQ,
                .flags          = IW_DESCR_FLAG_EVENT,
        },
        [IW_IOCTL_IDX(SIOCGIWFREQ)] = {
                .header_type    = IW_HEADER_TYPE_FREQ,
                .flags          = IW_DESCR_FLAG_DUMP,
        },
        [IW_IOCTL_IDX(SIOCSIWMODE)] = {
                .header_type    = IW_HEADER_TYPE_UINT,
                .flags          = IW_DESCR_FLAG_EVENT,
        },
        [IW_IOCTL_IDX(SIOCGIWMODE)] = {
                .header_type    = IW_HEADER_TYPE_UINT,
                .flags          = IW_DESCR_FLAG_DUMP,
        },
        [IW_IOCTL_IDX(SIOCSIWSENS)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCGIWSENS)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCSIWRANGE)] = {
                .header_type    = IW_HEADER_TYPE_NULL,
        },
        [IW_IOCTL_IDX(SIOCGIWRANGE)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = sizeof(struct iw_range),
                .flags          = IW_DESCR_FLAG_DUMP,
        },
        [IW_IOCTL_IDX(SIOCSIWPRIV)] = {
                .header_type    = IW_HEADER_TYPE_NULL,
        },
        [IW_IOCTL_IDX(SIOCGIWPRIV)] = { /* (handled directly by us) */
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = sizeof(struct iw_priv_args),
                .max_tokens     = 16,
                .flags          = IW_DESCR_FLAG_NOMAX,
        },
        [IW_IOCTL_IDX(SIOCSIWSTATS)] = {
                .header_type    = IW_HEADER_TYPE_NULL,
        },
        [IW_IOCTL_IDX(SIOCGIWSTATS)] = { /* (handled directly by us) */
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = sizeof(struct iw_statistics),
                .flags          = IW_DESCR_FLAG_DUMP,
        },
        [IW_IOCTL_IDX(SIOCSIWSPY)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = sizeof(struct sockaddr),
                .max_tokens     = IW_MAX_SPY,
        },
        [IW_IOCTL_IDX(SIOCGIWSPY)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = sizeof(struct sockaddr) +
                                  sizeof(struct iw_quality),
                .max_tokens     = IW_MAX_SPY,
        },
        [IW_IOCTL_IDX(SIOCSIWTHRSPY)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = sizeof(struct iw_thrspy),
                .min_tokens     = 1,
                .max_tokens     = 1,
        },
        [IW_IOCTL_IDX(SIOCGIWTHRSPY)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = sizeof(struct iw_thrspy),
                .min_tokens     = 1,
                .max_tokens     = 1,
        },
        [IW_IOCTL_IDX(SIOCSIWAP)] = {
                .header_type    = IW_HEADER_TYPE_ADDR,
        },
        [IW_IOCTL_IDX(SIOCGIWAP)] = {
                .header_type    = IW_HEADER_TYPE_ADDR,
                .flags          = IW_DESCR_FLAG_DUMP,
        },
        [IW_IOCTL_IDX(SIOCSIWMLME)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .min_tokens     = sizeof(struct iw_mlme),
                .max_tokens     = sizeof(struct iw_mlme),
        },
        [IW_IOCTL_IDX(SIOCGIWAPLIST)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = sizeof(struct sockaddr) +
                                  sizeof(struct iw_quality),
                .max_tokens     = IW_MAX_AP,
                .flags          = IW_DESCR_FLAG_NOMAX,
        },
        [IW_IOCTL_IDX(SIOCSIWSCAN)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .min_tokens     = 0,
                .max_tokens     = sizeof(struct iw_scan_req),
        },
        [IW_IOCTL_IDX(SIOCGIWSCAN)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_SCAN_MAX_DATA,
                .flags          = IW_DESCR_FLAG_NOMAX,
        },
        [IW_IOCTL_IDX(SIOCSIWESSID)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_ESSID_MAX_SIZE,
                .flags          = IW_DESCR_FLAG_EVENT,
        },
        [IW_IOCTL_IDX(SIOCGIWESSID)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_ESSID_MAX_SIZE,
                .flags          = IW_DESCR_FLAG_DUMP,
        },
        [IW_IOCTL_IDX(SIOCSIWNICKN)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_ESSID_MAX_SIZE,
        },
        [IW_IOCTL_IDX(SIOCGIWNICKN)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_ESSID_MAX_SIZE,
        },
        [IW_IOCTL_IDX(SIOCSIWRATE)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCGIWRATE)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCSIWRTS)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCGIWRTS)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCSIWFRAG)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCGIWFRAG)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCSIWTXPOW)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCGIWTXPOW)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCSIWRETRY)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCGIWRETRY)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCSIWENCODE)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_ENCODING_TOKEN_MAX,
                .flags          = IW_DESCR_FLAG_EVENT | IW_DESCR_FLAG_RESTRICT,
        },
        [IW_IOCTL_IDX(SIOCGIWENCODE)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_ENCODING_TOKEN_MAX,
                .flags          = IW_DESCR_FLAG_DUMP | IW_DESCR_FLAG_RESTRICT,
        },
        [IW_IOCTL_IDX(SIOCSIWPOWER)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCGIWPOWER)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCSIWGENIE)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_GENERIC_IE_MAX,
        },
        [IW_IOCTL_IDX(SIOCGIWGENIE)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_GENERIC_IE_MAX,
        },
        [IW_IOCTL_IDX(SIOCSIWAUTH)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCGIWAUTH)] = {
                .header_type    = IW_HEADER_TYPE_PARAM,
        },
        [IW_IOCTL_IDX(SIOCSIWENCODEEXT)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .min_tokens     = sizeof(struct iw_encode_ext),
                .max_tokens     = sizeof(struct iw_encode_ext) +
                                  IW_ENCODING_TOKEN_MAX,
        },
        [IW_IOCTL_IDX(SIOCGIWENCODEEXT)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .min_tokens     = sizeof(struct iw_encode_ext),
                .max_tokens     = sizeof(struct iw_encode_ext) +
                                  IW_ENCODING_TOKEN_MAX,
        },
        [IW_IOCTL_IDX(SIOCSIWPMKSA)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .min_tokens     = sizeof(struct iw_pmksa),
                .max_tokens     = sizeof(struct iw_pmksa),
        },
};
static const unsigned int standard_ioctl_num = ARRAY_SIZE(standard_ioctl);

/*
 * Meta-data about all the additional standard Wireless Extension events
 * we know about.
 */
static const struct iw_ioctl_description standard_event[] = {
        [IW_EVENT_IDX(IWEVTXDROP)] = {
                .header_type    = IW_HEADER_TYPE_ADDR,
        },
        [IW_EVENT_IDX(IWEVQUAL)] = {
                .header_type    = IW_HEADER_TYPE_QUAL,
        },
        [IW_EVENT_IDX(IWEVCUSTOM)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_CUSTOM_MAX,
        },
        [IW_EVENT_IDX(IWEVREGISTERED)] = {
                .header_type    = IW_HEADER_TYPE_ADDR,
        },
        [IW_EVENT_IDX(IWEVEXPIRED)] = {
                .header_type    = IW_HEADER_TYPE_ADDR,
        },
        [IW_EVENT_IDX(IWEVGENIE)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_GENERIC_IE_MAX,
        },
        [IW_EVENT_IDX(IWEVMICHAELMICFAILURE)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = sizeof(struct iw_michaelmicfailure),
        },
        [IW_EVENT_IDX(IWEVASSOCREQIE)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_GENERIC_IE_MAX,
        },
        [IW_EVENT_IDX(IWEVASSOCRESPIE)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = IW_GENERIC_IE_MAX,
        },
        [IW_EVENT_IDX(IWEVPMKIDCAND)] = {
                .header_type    = IW_HEADER_TYPE_POINT,
                .token_size     = 1,
                .max_tokens     = sizeof(struct iw_pmkid_cand),
        },
};
static const unsigned int standard_event_num = ARRAY_SIZE(standard_event);

/* Size (in bytes) of various events */
static const int event_type_size[] = {
        IW_EV_LCP_LEN,                  /* IW_HEADER_TYPE_NULL */
        0,
        IW_EV_CHAR_LEN,                 /* IW_HEADER_TYPE_CHAR */
        0,
        IW_EV_UINT_LEN,                 /* IW_HEADER_TYPE_UINT */
        IW_EV_FREQ_LEN,                 /* IW_HEADER_TYPE_FREQ */
        IW_EV_ADDR_LEN,                 /* IW_HEADER_TYPE_ADDR */
        0,
        IW_EV_POINT_LEN,                /* Without variable payload */
        IW_EV_PARAM_LEN,                /* IW_HEADER_TYPE_PARAM */
        IW_EV_QUAL_LEN,                 /* IW_HEADER_TYPE_QUAL */
};

#ifdef CONFIG_COMPAT
static const int compat_event_type_size[] = {
        IW_EV_COMPAT_LCP_LEN,           /* IW_HEADER_TYPE_NULL */
        0,
        IW_EV_COMPAT_CHAR_LEN,          /* IW_HEADER_TYPE_CHAR */
        0,
        IW_EV_COMPAT_UINT_LEN,          /* IW_HEADER_TYPE_UINT */
        IW_EV_COMPAT_FREQ_LEN,          /* IW_HEADER_TYPE_FREQ */
        IW_EV_COMPAT_ADDR_LEN,          /* IW_HEADER_TYPE_ADDR */
        0,
        IW_EV_COMPAT_POINT_LEN,         /* Without variable payload */
        IW_EV_COMPAT_PARAM_LEN,         /* IW_HEADER_TYPE_PARAM */
        IW_EV_COMPAT_QUAL_LEN,          /* IW_HEADER_TYPE_QUAL */
};
#endif


/* IW event code */

void wireless_nlevent_flush(void)
{
        struct sk_buff *skb;
        struct net *net;

        down_read(&net_rwsem);
        for_each_net(net) {
                while ((skb = skb_dequeue(&net->wext_nlevents)))
                        rtnl_notify(skb, net, 0, RTNLGRP_LINK, NULL,
                                    GFP_KERNEL);
        }
        up_read(&net_rwsem);
}
EXPORT_SYMBOL_GPL(wireless_nlevent_flush);

static int wext_netdev_notifier_call(struct notifier_block *nb,
                                     unsigned long state, void *ptr)
{
        /*
         * When a netdev changes state in any way, flush all pending messages
         * to avoid them going out in a strange order, e.g. RTM_NEWLINK after
         * RTM_DELLINK, or with IFF_UP after without IFF_UP during dev_close()
         * or similar - all of which could otherwise happen due to delays from
         * schedule_work().
         */
        wireless_nlevent_flush();

        return NOTIFY_OK;
}

static struct notifier_block wext_netdev_notifier = {
        .notifier_call = wext_netdev_notifier_call,
};

static int __net_init wext_pernet_init(struct net *net)
{
        skb_queue_head_init(&net->wext_nlevents);
        return 0;
}

static void __net_exit wext_pernet_exit(struct net *net)
{
        skb_queue_purge(&net->wext_nlevents);
}

static struct pernet_operations wext_pernet_ops = {
        .init = wext_pernet_init,
        .exit = wext_pernet_exit,
};

static int __init wireless_nlevent_init(void)
{
        int err = register_pernet_subsys(&wext_pernet_ops);

        if (err)
                return err;

        err = register_netdevice_notifier(&wext_netdev_notifier);
        if (err)
                unregister_pernet_subsys(&wext_pernet_ops);
        return err;
}

subsys_initcall(wireless_nlevent_init);

/* Process events generated by the wireless layer or the driver. */
static void wireless_nlevent_process(struct work_struct *work)
{
        wireless_nlevent_flush();
}

static DECLARE_WORK(wireless_nlevent_work, wireless_nlevent_process);

static struct nlmsghdr *rtnetlink_ifinfo_prep(struct net_device *dev,
                                              struct sk_buff *skb)
{
        struct ifinfomsg *r;
        struct nlmsghdr  *nlh;

        nlh = nlmsg_put(skb, 0, 0, RTM_NEWLINK, sizeof(*r), 0);
        if (!nlh)
                return NULL;

        r = nlmsg_data(nlh);
        r->ifi_family = AF_UNSPEC;
        r->__ifi_pad = 0;
        r->ifi_type = dev->type;
        r->ifi_index = dev->ifindex;
        r->ifi_flags = netif_get_flags(dev);
        r->ifi_change = 0;      /* Wireless changes don't affect those flags */

        if (nla_put_string(skb, IFLA_IFNAME, dev->name))
                goto nla_put_failure;

        return nlh;
 nla_put_failure:
        nlmsg_cancel(skb, nlh);
        return NULL;
}


/*
 * Main event dispatcher. Called from other parts and drivers.
 * Send the event on the appropriate channels.
 * May be called from interrupt context.
 */
void wireless_send_event(struct net_device *    dev,
                         unsigned int           cmd,
                         union iwreq_data *     wrqu,
                         const char *           extra)
{
        const struct iw_ioctl_description *     descr = NULL;
        int extra_len = 0;
        struct iw_event  *event;                /* Mallocated whole event */
        int event_len;                          /* Its size */
        int hdr_len;                            /* Size of the event header */
        int wrqu_off = 0;                       /* Offset in wrqu */
        /* Don't "optimise" the following variable, it will crash */
        unsigned int    cmd_index;              /* *MUST* be unsigned */
        struct sk_buff *skb;
        struct nlmsghdr *nlh;
        struct nlattr *nla;
#ifdef CONFIG_COMPAT
        struct __compat_iw_event *compat_event;
        struct compat_iw_point compat_wrqu;
        struct sk_buff *compskb;
        int ptr_len;
#endif

        /*
         * Nothing in the kernel sends scan events with data, be safe.
         * This is necessary because we cannot fix up scan event data
         * for compat, due to being contained in 'extra', but normally
         * applications are required to retrieve the scan data anyway
         * and no data is included in the event, this codifies that
         * practice.
         */
        if (WARN_ON(cmd == SIOCGIWSCAN && extra))
                extra = NULL;

        /* Get the description of the Event */
        if (cmd <= SIOCIWLAST) {
                cmd_index = IW_IOCTL_IDX(cmd);
                if (cmd_index < standard_ioctl_num)
                        descr = &(standard_ioctl[cmd_index]);
        } else {
                cmd_index = IW_EVENT_IDX(cmd);
                if (cmd_index < standard_event_num)
                        descr = &(standard_event[cmd_index]);
        }
        /* Don't accept unknown events */
        if (descr == NULL) {
                /* Note : we don't return an error to the driver, because
                 * the driver would not know what to do about it. It can't
                 * return an error to the user, because the event is not
                 * initiated by a user request.
                 * The best the driver could do is to log an error message.
                 * We will do it ourselves instead...
                 */
                netdev_err(dev, "(WE) : Invalid/Unknown Wireless Event (0x%04X)\n",
                           cmd);
                return;
        }

        /* Check extra parameters and set extra_len */
        if (descr->header_type == IW_HEADER_TYPE_POINT) {
                /* Check if number of token fits within bounds */
                if (wrqu->data.length > descr->max_tokens) {
                        netdev_err(dev, "(WE) : Wireless Event (cmd=0x%04X) too big (%d)\n",
                                   cmd, wrqu->data.length);
                        return;
                }
                if (wrqu->data.length < descr->min_tokens) {
                        netdev_err(dev, "(WE) : Wireless Event (cmd=0x%04X) too small (%d)\n",
                                   cmd, wrqu->data.length);
                        return;
                }
                /* Calculate extra_len - extra is NULL for restricted events */
                if (extra != NULL)
                        extra_len = wrqu->data.length * descr->token_size;
                /* Always at an offset in wrqu */
                wrqu_off = IW_EV_POINT_OFF;
        }

        /* Total length of the event */
        hdr_len = event_type_size[descr->header_type];
        event_len = hdr_len + extra_len;

        /*
         * The problem for 64/32 bit.
         *
         * On 64-bit, a regular event is laid out as follows:
         *      |  0  |  1  |  2  |  3  |  4  |  5  |  6  |  7  |
         *      | event.len | event.cmd |     p a d d i n g     |
         *      | wrqu data ... (with the correct size)         |
         *
         * This padding exists because we manipulate event->u,
         * and 'event' is not packed.
         *
         * An iw_point event is laid out like this instead:
         *      |  0  |  1  |  2  |  3  |  4  |  5  |  6  |  7  |
         *      | event.len | event.cmd |     p a d d i n g     |
         *      | iwpnt.len | iwpnt.flg |     p a d d i n g     |
         *      | extra data  ...
         *
         * The second padding exists because struct iw_point is extended,
         * but this depends on the platform...
         *
         * On 32-bit, all the padding shouldn't be there.
         */

        skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_ATOMIC);
        if (!skb)
                return;

        /* Send via the RtNetlink event channel */
        nlh = rtnetlink_ifinfo_prep(dev, skb);
        if (WARN_ON(!nlh)) {
                kfree_skb(skb);
                return;
        }

        /* Add the wireless events in the netlink packet */
        nla = nla_reserve(skb, IFLA_WIRELESS, event_len);
        if (!nla) {
                kfree_skb(skb);
                return;
        }
        event = nla_data(nla);

        /* Fill event - first clear to avoid data leaking */
        memset(event, 0, hdr_len);
        event->len = event_len;
        event->cmd = cmd;
        memcpy(&event->u, ((char *) wrqu) + wrqu_off, hdr_len - IW_EV_LCP_LEN);
        if (extra_len)
                memcpy(((char *) event) + hdr_len, extra, extra_len);

        nlmsg_end(skb, nlh);
#ifdef CONFIG_COMPAT
        hdr_len = compat_event_type_size[descr->header_type];

        /* ptr_len is remaining size in event header apart from LCP */
        ptr_len = hdr_len - IW_EV_COMPAT_LCP_LEN;
        event_len = hdr_len + extra_len;

        compskb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_ATOMIC);
        if (!compskb) {
                kfree_skb(skb);
                return;
        }

        /* Send via the RtNetlink event channel */
        nlh = rtnetlink_ifinfo_prep(dev, compskb);
        if (WARN_ON(!nlh)) {
                kfree_skb(skb);
                kfree_skb(compskb);
                return;
        }

        /* Add the wireless events in the netlink packet */
        nla = nla_reserve(compskb, IFLA_WIRELESS, event_len);
        if (!nla) {
                kfree_skb(skb);
                kfree_skb(compskb);
                return;
        }
        compat_event = nla_data(nla);

        compat_event->len = event_len;
        compat_event->cmd = cmd;
        if (descr->header_type == IW_HEADER_TYPE_POINT) {
                compat_wrqu.length = wrqu->data.length;
                compat_wrqu.flags = wrqu->data.flags;
                memcpy(compat_event->ptr_bytes,
                       ((char *)&compat_wrqu) + IW_EV_COMPAT_POINT_OFF,
                        ptr_len);
                if (extra_len)
                        memcpy(&compat_event->ptr_bytes[ptr_len],
                               extra, extra_len);
        } else {
                /* extra_len must be zero, so no if (extra) needed */
                memcpy(compat_event->ptr_bytes, wrqu, ptr_len);
        }

        nlmsg_end(compskb, nlh);

        skb_shinfo(skb)->frag_list = compskb;
#endif
        skb_queue_tail(&dev_net(dev)->wext_nlevents, skb);
        schedule_work(&wireless_nlevent_work);
}
EXPORT_SYMBOL(wireless_send_event);

#ifdef CONFIG_CFG80211_WEXT
static void wireless_warn_cfg80211_wext(void)
{
        pr_warn_once("warning: `%s' uses wireless extensions which will stop working for Wi-Fi 7 hardware; use nl80211\n",
                     current->comm);
}
#endif

/* IW handlers */

struct iw_statistics *get_wireless_stats(struct net_device *dev)
{
#ifdef CONFIG_WIRELESS_EXT
        if ((dev->wireless_handlers != NULL) &&
           (dev->wireless_handlers->get_wireless_stats != NULL))
                return dev->wireless_handlers->get_wireless_stats(dev);
#endif

#ifdef CONFIG_CFG80211_WEXT
        if (dev->ieee80211_ptr &&
            dev->ieee80211_ptr->wiphy &&
            dev->ieee80211_ptr->wiphy->wext &&
            dev->ieee80211_ptr->wiphy->wext->get_wireless_stats) {
                wireless_warn_cfg80211_wext();
                if (dev->ieee80211_ptr->wiphy->flags & (WIPHY_FLAG_SUPPORTS_MLO |
                                                        WIPHY_FLAG_DISABLE_WEXT))
                        return NULL;
                return dev->ieee80211_ptr->wiphy->wext->get_wireless_stats(dev);
        }
#endif

        /* not found */
        return NULL;
}

/* noinline to avoid a bogus warning with -O3 */
static noinline int iw_handler_get_iwstats(struct net_device *  dev,
                                  struct iw_request_info *      info,
                                  union iwreq_data *            wrqu,
                                  char *                        extra)
{
        /* Get stats from the driver */
        struct iw_statistics *stats;

        stats = get_wireless_stats(dev);
        if (stats) {
                /* Copy statistics to extra */
                memcpy(extra, stats, sizeof(struct iw_statistics));
                wrqu->data.length = sizeof(struct iw_statistics);

                /* Check if we need to clear the updated flag */
                if (wrqu->data.flags != 0)
                        stats->qual.updated &= ~IW_QUAL_ALL_UPDATED;
                return 0;
        } else
                return -EOPNOTSUPP;
}

static iw_handler get_handler(struct net_device *dev, unsigned int cmd)
{
        /* Don't "optimise" the following variable, it will crash */
        unsigned int    index;          /* *MUST* be unsigned */
        const struct iw_handler_def *handlers = NULL;

#ifdef CONFIG_CFG80211_WEXT
        if (dev->ieee80211_ptr && dev->ieee80211_ptr->wiphy) {
                wireless_warn_cfg80211_wext();
                if (dev->ieee80211_ptr->wiphy->flags & (WIPHY_FLAG_SUPPORTS_MLO |
                                                        WIPHY_FLAG_DISABLE_WEXT))
                        return NULL;
                handlers = dev->ieee80211_ptr->wiphy->wext;
        }
#endif
#ifdef CONFIG_WIRELESS_EXT
        if (dev->wireless_handlers)
                handlers = dev->wireless_handlers;
#endif

        if (!handlers)
                return NULL;

        /* Try as a standard command */
        index = IW_IOCTL_IDX(cmd);
        if (index < handlers->num_standard)
                return handlers->standard[index];

#ifdef CONFIG_WEXT_PRIV
        /* Try as a private command */
        index = cmd - SIOCIWFIRSTPRIV;
        if (index < handlers->num_private)
                return handlers->private[index];
#endif

        /* Not found */
        return NULL;
}

static int ioctl_standard_iw_point(struct iw_point *iwp, unsigned int cmd,
                                   const struct iw_ioctl_description *descr,
                                   iw_handler handler, struct net_device *dev,
                                   struct iw_request_info *info)
{
        int err, extra_size, user_length = 0, essid_compat = 0;
        char *extra;

        /* Calculate space needed by arguments. Always allocate
         * for max space.
         */
        extra_size = descr->max_tokens * descr->token_size;

        /* Check need for ESSID compatibility for WE < 21 */
        switch (cmd) {
        case SIOCSIWESSID:
        case SIOCGIWESSID:
        case SIOCSIWNICKN:
        case SIOCGIWNICKN:
                if (iwp->length == descr->max_tokens + 1)
                        essid_compat = 1;
                else if (IW_IS_SET(cmd) && (iwp->length != 0)) {
                        char essid[IW_ESSID_MAX_SIZE + 1];
                        unsigned int len;
                        len = iwp->length * descr->token_size;

                        if (len > IW_ESSID_MAX_SIZE)
                                return -EFAULT;

                        err = copy_from_user(essid, iwp->pointer, len);
                        if (err)
                                return -EFAULT;

                        if (essid[iwp->length - 1] == '\0')
                                essid_compat = 1;
                }
                break;
        default:
                break;
        }

        iwp->length -= essid_compat;

        /* Check what user space is giving us */
        if (IW_IS_SET(cmd)) {
                /* Check NULL pointer */
                if (!iwp->pointer && iwp->length != 0)
                        return -EFAULT;
                /* Check if number of token fits within bounds */
                if (iwp->length > descr->max_tokens)
                        return -E2BIG;
                if (iwp->length < descr->min_tokens)
                        return -EINVAL;
        } else {
                /* Check NULL pointer */
                if (!iwp->pointer)
                        return -EFAULT;
                /* Save user space buffer size for checking */
                user_length = iwp->length;

                /* Don't check if user_length > max to allow forward
                 * compatibility. The test user_length < min is
                 * implied by the test at the end.
                 */

                /* Support for very large requests */
                if ((descr->flags & IW_DESCR_FLAG_NOMAX) &&
                    (user_length > descr->max_tokens)) {
                        /* Allow userspace to GET more than max so
                         * we can support any size GET requests.
                         * There is still a limit : -ENOMEM.
                         */
                        extra_size = user_length * descr->token_size;

                        /* Note : user_length is originally a __u16,
                         * and token_size is controlled by us,
                         * so extra_size won't get negative and
                         * won't overflow...
                         */
                }
        }

        /* Sanity-check to ensure we never end up _allocating_ zero
         * bytes of data for extra.
         */
        if (extra_size <= 0)
                return -EFAULT;

        /* kzalloc() ensures NULL-termination for essid_compat. */
        extra = kzalloc(extra_size, GFP_KERNEL);
        if (!extra)
                return -ENOMEM;

        /* If it is a SET, get all the extra data in here */
        if (IW_IS_SET(cmd) && (iwp->length != 0)) {
                if (copy_from_user(extra, iwp->pointer,
                                   iwp->length *
                                   descr->token_size)) {
                        err = -EFAULT;
                        goto out;
                }

                if (cmd == SIOCSIWENCODEEXT) {
                        struct iw_encode_ext *ee = (void *) extra;

                        if (iwp->length < sizeof(*ee) + ee->key_len) {
                                err = -EFAULT;
                                goto out;
                        }
                }
        }

        if (IW_IS_GET(cmd) && !(descr->flags & IW_DESCR_FLAG_NOMAX)) {
                /*
                 * If this is a GET, but not NOMAX, it means that the extra
                 * data is not bounded by userspace, but by max_tokens. Thus
                 * set the length to max_tokens. This matches the extra data
                 * allocation.
                 * The driver should fill it with the number of tokens it
                 * provided, and it may check iwp->length rather than having
                 * knowledge of max_tokens. If the driver doesn't change the
                 * iwp->length, this ioctl just copies back max_token tokens
                 * filled with zeroes. Hopefully the driver isn't claiming
                 * them to be valid data.
                 */
                iwp->length = descr->max_tokens;
        }

        err = handler(dev, info, (union iwreq_data *) iwp, extra);

        iwp->length += essid_compat;

        /* If we have something to return to the user */
        if (!err && IW_IS_GET(cmd)) {
                /* Check if there is enough buffer up there */
                if (user_length < iwp->length) {
                        err = -E2BIG;
                        goto out;
                }

                if (copy_to_user(iwp->pointer, extra,
                                 iwp->length *
                                 descr->token_size)) {
                        err = -EFAULT;
                        goto out;
                }
        }

        /* Generate an event to notify listeners of the change */
        if ((descr->flags & IW_DESCR_FLAG_EVENT) &&
            ((err == 0) || (err == -EIWCOMMIT))) {
                union iwreq_data *data = (union iwreq_data *) iwp;

                if (descr->flags & IW_DESCR_FLAG_RESTRICT)
                        /* If the event is restricted, don't
                         * export the payload.
                         */
                        wireless_send_event(dev, cmd, data, NULL);
                else
                        wireless_send_event(dev, cmd, data, extra);
        }

out:
        kfree(extra);
        return err;
}

/*
 * Call the commit handler in the driver
 * (if exist and if conditions are right)
 *
 * Note : our current commit strategy is currently pretty dumb,
 * but we will be able to improve on that...
 * The goal is to try to agreagate as many changes as possible
 * before doing the commit. Drivers that will define a commit handler
 * are usually those that need a reset after changing parameters, so
 * we want to minimise the number of reset.
 * A cool idea is to use a timer : at each "set" command, we re-set the
 * timer, when the timer eventually fires, we call the driver.
 * Hopefully, more on that later.
 *
 * Also, I'm waiting to see how many people will complain about the
 * netif_running(dev) test. I'm open on that one...
 * Hopefully, the driver will remember to do a commit in "open()" ;-)
 */
int call_commit_handler(struct net_device *dev)
{
#ifdef CONFIG_WIRELESS_EXT
        if (netif_running(dev) &&
            dev->wireless_handlers &&
            dev->wireless_handlers->standard[0])
                /* Call the commit handler on the driver */
                return dev->wireless_handlers->standard[0](dev, NULL,
                                                           NULL, NULL);
        else
                return 0;               /* Command completed successfully */
#else
        /* cfg80211 has no commit */
        return 0;
#endif
}

/*
 * Main IOCTl dispatcher.
 * Check the type of IOCTL and call the appropriate wrapper...
 */
static int wireless_process_ioctl(struct net *net, struct iwreq *iwr,
                                  unsigned int cmd,
                                  struct iw_request_info *info,
                                  wext_ioctl_func standard,
                                  wext_ioctl_func private)
{
        struct net_device *dev;
        iw_handler      handler;

        /* Permissions are already checked in dev_ioctl() before calling us.
         * The copy_to/from_user() of ifr is also dealt with in there */

        /* Make sure the device exist */
        if ((dev = __dev_get_by_name(net, iwr->ifr_name)) == NULL)
                return -ENODEV;

        /* A bunch of special cases, then the generic case...
         * Note that 'cmd' is already filtered in dev_ioctl() with
         * (cmd >= SIOCIWFIRST && cmd <= SIOCIWLAST) */
        if (cmd == SIOCGIWSTATS)
                return standard(dev, iwr, cmd, info,
                                &iw_handler_get_iwstats);

#ifdef CONFIG_WEXT_PRIV
        if (cmd == SIOCGIWPRIV && dev->wireless_handlers)
                return standard(dev, iwr, cmd, info,
                                iw_handler_get_private);
#endif

        /* Basic check */
        if (!netif_device_present(dev))
                return -ENODEV;

        /* New driver API : try to find the handler */
        handler = get_handler(dev, cmd);
        if (handler) {
                /* Standard and private are not the same */
                if (cmd < SIOCIWFIRSTPRIV)
                        return standard(dev, iwr, cmd, info, handler);
                else if (private)
                        return private(dev, iwr, cmd, info, handler);
        }
        return -EOPNOTSUPP;
}

/* If command is `set a parameter', or `get the encoding parameters',
 * check if the user has the right to do it.
 */
static int wext_permission_check(unsigned int cmd)
{
        if ((IW_IS_SET(cmd) || cmd == SIOCGIWENCODE ||
             cmd == SIOCGIWENCODEEXT) &&
            !capable(CAP_NET_ADMIN))
                return -EPERM;

        return 0;
}

/* entry point from dev ioctl */
static int wext_ioctl_dispatch(struct net *net, struct iwreq *iwr,
                               unsigned int cmd, struct iw_request_info *info,
                               wext_ioctl_func standard,
                               wext_ioctl_func private)
{
        int ret = wext_permission_check(cmd);

        if (ret)
                return ret;

        dev_load(net, iwr->ifr_name);
        rtnl_lock();
        ret = wireless_process_ioctl(net, iwr, cmd, info, standard, private);
        rtnl_unlock();

        return ret;
}

/*
 * Wrapper to call a standard Wireless Extension handler.
 * We do various checks and also take care of moving data between
 * user space and kernel space.
 */
static int ioctl_standard_call(struct net_device *      dev,
                               struct iwreq             *iwr,
                               unsigned int             cmd,
                               struct iw_request_info   *info,
                               iw_handler               handler)
{
        const struct iw_ioctl_description *     descr;
        int                                     ret = -EINVAL;

        /* Get the description of the IOCTL */
        if (IW_IOCTL_IDX(cmd) >= standard_ioctl_num)
                return -EOPNOTSUPP;
        descr = &(standard_ioctl[IW_IOCTL_IDX(cmd)]);

        /* Check if we have a pointer to user space data or not */
        if (descr->header_type != IW_HEADER_TYPE_POINT) {

                /* No extra arguments. Trivial to handle */
                ret = handler(dev, info, &(iwr->u), NULL);

                /* Generate an event to notify listeners of the change */
                if ((descr->flags & IW_DESCR_FLAG_EVENT) &&
                   ((ret == 0) || (ret == -EIWCOMMIT)))
                        wireless_send_event(dev, cmd, &(iwr->u), NULL);
        } else {
                ret = ioctl_standard_iw_point(&iwr->u.data, cmd, descr,
                                              handler, dev, info);
        }

        /* Call commit handler if needed and defined */
        if (ret == -EIWCOMMIT)
                ret = call_commit_handler(dev);

        /* Here, we will generate the appropriate event if needed */

        return ret;
}


int wext_handle_ioctl(struct net *net, unsigned int cmd, void __user *arg)
{
        struct iw_request_info info = { .cmd = cmd, .flags = 0 };
        struct iwreq iwr;
        int ret;

        if (copy_from_user(&iwr, arg, sizeof(iwr)))
                return -EFAULT;

        iwr.ifr_name[sizeof(iwr.ifr_name) - 1] = 0;

        ret = wext_ioctl_dispatch(net, &iwr, cmd, &info,
                                  ioctl_standard_call,
                                  ioctl_private_call);
        if (ret >= 0 &&
            IW_IS_GET(cmd) &&
            copy_to_user(arg, &iwr, sizeof(struct iwreq)))
                return -EFAULT;

        return ret;
}

#ifdef CONFIG_COMPAT
static int compat_standard_call(struct net_device       *dev,
                                struct iwreq            *iwr,
                                unsigned int            cmd,
                                struct iw_request_info  *info,
                                iw_handler              handler)
{
        const struct iw_ioctl_description *descr;
        struct compat_iw_point *iwp_compat;
        struct iw_point iwp;
        int err;

        descr = standard_ioctl + IW_IOCTL_IDX(cmd);

        if (descr->header_type != IW_HEADER_TYPE_POINT)
                return ioctl_standard_call(dev, iwr, cmd, info, handler);

        iwp_compat = (struct compat_iw_point *) &iwr->u.data;

        /* struct iw_point has a 32bit hole on 64bit arches. */
        memset(&iwp, 0, sizeof(iwp));

        iwp.pointer = compat_ptr(iwp_compat->pointer);
        iwp.length = iwp_compat->length;
        iwp.flags = iwp_compat->flags;

        err = ioctl_standard_iw_point(&iwp, cmd, descr, handler, dev, info);

        iwp_compat->pointer = ptr_to_compat(iwp.pointer);
        iwp_compat->length = iwp.length;
        iwp_compat->flags = iwp.flags;

        return err;
}

int compat_wext_handle_ioctl(struct net *net, unsigned int cmd,
                             unsigned long arg)
{
        void __user *argp = (void __user *)arg;
        struct iw_request_info info;
        struct iwreq iwr;
        char *colon;
        int ret;

        if (copy_from_user(&iwr, argp, sizeof(struct iwreq)))
                return -EFAULT;

        iwr.ifr_name[IFNAMSIZ-1] = 0;
        colon = strchr(iwr.ifr_name, ':');
        if (colon)
                *colon = 0;

        info.cmd = cmd;
        info.flags = IW_REQUEST_FLAG_COMPAT;

        ret = wext_ioctl_dispatch(net, &iwr, cmd, &info,
                                  compat_standard_call,
                                  compat_private_call);

        if (ret >= 0 &&
            IW_IS_GET(cmd) &&
            copy_to_user(argp, &iwr, sizeof(struct iwreq)))
                return -EFAULT;

        return ret;
}
#endif

char *iwe_stream_add_event(struct iw_request_info *info, char *stream,
                           char *ends, struct iw_event *iwe, int event_len)
{
        int lcp_len = iwe_stream_lcp_len(info);

        event_len = iwe_stream_event_len_adjust(info, event_len);

        /* Check if it's possible */
        if (likely((stream + event_len) < ends)) {
                iwe->len = event_len;
                /* Beware of alignment issues on 64 bits */
                memcpy(stream, (char *) iwe, IW_EV_LCP_PK_LEN);
                memcpy(stream + lcp_len, &iwe->u,
                       event_len - lcp_len);
                stream += event_len;
        }

        return stream;
}
EXPORT_SYMBOL(iwe_stream_add_event);

char *iwe_stream_add_point(struct iw_request_info *info, char *stream,
                           char *ends, struct iw_event *iwe, char *extra)
{
        int event_len = iwe_stream_point_len(info) + iwe->u.data.length;
        int point_len = iwe_stream_point_len(info);
        int lcp_len   = iwe_stream_lcp_len(info);

        /* Check if it's possible */
        if (likely((stream + event_len) < ends)) {
                iwe->len = event_len;
                memcpy(stream, (char *) iwe, IW_EV_LCP_PK_LEN);
                memcpy(stream + lcp_len,
                       ((char *) &iwe->u) + IW_EV_POINT_OFF,
                       IW_EV_POINT_PK_LEN - IW_EV_LCP_PK_LEN);
                if (iwe->u.data.length && extra)
                        memcpy(stream + point_len, extra, iwe->u.data.length);
                stream += event_len;
        }

        return stream;
}
EXPORT_SYMBOL(iwe_stream_add_point);

char *iwe_stream_add_value(struct iw_request_info *info, char *event,
                           char *value, char *ends, struct iw_event *iwe,
                           int event_len)
{
        int lcp_len = iwe_stream_lcp_len(info);

        /* Don't duplicate LCP */
        event_len -= IW_EV_LCP_LEN;

        /* Check if it's possible */
        if (likely((value + event_len) < ends)) {
                /* Add new value */
                memcpy(value, &iwe->u, event_len);
                value += event_len;
                /* Patch LCP */
                iwe->len = value - event;
                memcpy(event, (char *) iwe, lcp_len);
        }

        return value;
}
EXPORT_SYMBOL(iwe_stream_add_value);