// SPDX-License-Identifier: GPL-2.0-or-later
/*
 * Universal Interface for Intel High Definition Audio Codec
 *
 * Copyright (c) 2004 Takashi Iwai <tiwai@suse.de>
 */

#include <linux/init.h>
#include <linux/delay.h>
#include <linux/slab.h>
#include <linux/mutex.h>
#include <linux/module.h>
#include <linux/pm.h>
#include <linux/pm_runtime.h>
#include <sound/core.h>
#include <sound/hda_codec.h>
#include <sound/asoundef.h>
#include <sound/tlv.h>
#include <sound/initval.h>
#include <sound/jack.h>
#include "hda_local.h"
#include "hda_beep.h"
#include "hda_jack.h"
#include <sound/hda_hwdep.h>
#include <sound/hda_component.h>

#define codec_in_pm(codec)              snd_hdac_is_in_pm(&codec->core)
#define hda_codec_is_power_on(codec)    snd_hdac_is_power_on(&codec->core)
#define codec_has_epss(codec) \
        ((codec)->core.power_caps & AC_PWRST_EPSS)
#define codec_has_clkstop(codec) \
        ((codec)->core.power_caps & AC_PWRST_CLKSTOP)

/*
 * Send and receive a verb - passed to exec_verb override for hdac_device
 */
static int codec_exec_verb(struct hdac_device *dev, unsigned int cmd,
                           unsigned int flags, unsigned int *res)
{
        struct hda_codec *codec = container_of(dev, struct hda_codec, core);
        struct hda_bus *bus = codec->bus;
        int err;

        if (cmd == ~0)
                return -1;

 again:
        snd_hda_power_up_pm(codec);
        mutex_lock(&bus->core.cmd_mutex);
        if (flags & HDA_RW_NO_RESPONSE_FALLBACK)
                bus->no_response_fallback = 1;
        err = snd_hdac_bus_exec_verb_unlocked(&bus->core, codec->core.addr,
                                              cmd, res);
        bus->no_response_fallback = 0;
        mutex_unlock(&bus->core.cmd_mutex);
        snd_hda_power_down_pm(codec);
        if (!codec_in_pm(codec) && res && err == -EAGAIN) {
                if (bus->response_reset) {
                        codec_dbg(codec,
                                  "resetting BUS due to fatal communication error\n");
                        snd_hda_bus_reset(bus);
                }
                goto again;
        }
        /* clear reset-flag when the communication gets recovered */
        if (!err || codec_in_pm(codec))
                bus->response_reset = 0;
        return err;
}

/**
 * snd_hda_sequence_write - sequence writes
 * @codec: the HDA codec
 * @seq: VERB array to send
 *
 * Send the commands sequentially from the given array.
 * The array must be terminated with NID=0.
 */
void snd_hda_sequence_write(struct hda_codec *codec, const struct hda_verb *seq)
{
        for (; seq->nid; seq++)
                snd_hda_codec_write(codec, seq->nid, 0, seq->verb, seq->param);
}
EXPORT_SYMBOL_GPL(snd_hda_sequence_write);

/* connection list element */
struct hda_conn_list {
        struct list_head list;
        int len;
        hda_nid_t nid;
        hda_nid_t conns[];
};

/* look up the cached results */
static struct hda_conn_list *
lookup_conn_list(struct hda_codec *codec, hda_nid_t nid)
{
        struct hda_conn_list *p;
        list_for_each_entry(p, &codec->conn_list, list) {
                if (p->nid == nid)
                        return p;
        }
        return NULL;
}

static int add_conn_list(struct hda_codec *codec, hda_nid_t nid, int len,
                         const hda_nid_t *list)
{
        struct hda_conn_list *p;

        p = kmalloc(struct_size(p, conns, len), GFP_KERNEL);
        if (!p)
                return -ENOMEM;
        p->len = len;
        p->nid = nid;
        memcpy(p->conns, list, len * sizeof(hda_nid_t));
        list_add(&p->list, &codec->conn_list);
        return 0;
}

static void remove_conn_list(struct hda_codec *codec)
{
        while (!list_empty(&codec->conn_list)) {
                struct hda_conn_list *p;
                p = list_first_entry(&codec->conn_list, typeof(*p), list);
                list_del(&p->list);
                kfree(p);
        }
}

/* read the connection and add to the cache */
static int read_and_add_raw_conns(struct hda_codec *codec, hda_nid_t nid)
{
        hda_nid_t list[32];
        hda_nid_t *result = list;
        int len;

        len = snd_hda_get_raw_connections(codec, nid, list, ARRAY_SIZE(list));
        if (len == -ENOSPC) {
                len = snd_hda_get_num_raw_conns(codec, nid);
                result = kmalloc_array(len, sizeof(hda_nid_t), GFP_KERNEL);
                if (!result)
                        return -ENOMEM;
                len = snd_hda_get_raw_connections(codec, nid, result, len);
        }
        if (len >= 0)
                len = snd_hda_override_conn_list(codec, nid, len, result);
        if (result != list)
                kfree(result);
        return len;
}

/**
 * snd_hda_get_conn_list - get connection list
 * @codec: the HDA codec
 * @nid: NID to parse
 * @listp: the pointer to store NID list
 *
 * Parses the connection list of the given widget and stores the pointer
 * to the list of NIDs.
 *
 * Returns the number of connections, or a negative error code.
 *
 * Note that the returned pointer isn't protected against the list
 * modification.  If snd_hda_override_conn_list() might be called
 * concurrently, protect with a mutex appropriately.
 */
int snd_hda_get_conn_list(struct hda_codec *codec, hda_nid_t nid,
                          const hda_nid_t **listp)
{
        bool added = false;

        for (;;) {
                int err;
                const struct hda_conn_list *p;

                /* if the connection-list is already cached, read it */
                p = lookup_conn_list(codec, nid);
                if (p) {
                        if (listp)
                                *listp = p->conns;
                        return p->len;
                }
                if (snd_BUG_ON(added))
                        return -EINVAL;

                err = read_and_add_raw_conns(codec, nid);
                if (err < 0)
                        return err;
                added = true;
        }
}
EXPORT_SYMBOL_GPL(snd_hda_get_conn_list);

/**
 * snd_hda_get_connections - copy connection list
 * @codec: the HDA codec
 * @nid: NID to parse
 * @conn_list: connection list array; when NULL, checks only the size
 * @max_conns: max. number of connections to store
 *
 * Parses the connection list of the given widget and stores the list
 * of NIDs.
 *
 * Returns the number of connections, or a negative error code.
 */
int snd_hda_get_connections(struct hda_codec *codec, hda_nid_t nid,
                            hda_nid_t *conn_list, int max_conns)
{
        const hda_nid_t *list;
        int len = snd_hda_get_conn_list(codec, nid, &list);

        if (len > 0 && conn_list) {
                if (len > max_conns) {
                        codec_err(codec, "Too many connections %d for NID 0x%x\n",
                                   len, nid);
                        return -EINVAL;
                }
                memcpy(conn_list, list, len * sizeof(hda_nid_t));
        }

        return len;
}
EXPORT_SYMBOL_GPL(snd_hda_get_connections);

/**
 * snd_hda_override_conn_list - add/modify the connection-list to cache
 * @codec: the HDA codec
 * @nid: NID to parse
 * @len: number of connection list entries
 * @list: the list of connection entries
 *
 * Add or modify the given connection-list to the cache.  If the corresponding
 * cache already exists, invalidate it and append a new one.
 *
 * Returns zero or a negative error code.
 */
int snd_hda_override_conn_list(struct hda_codec *codec, hda_nid_t nid, int len,
                               const hda_nid_t *list)
{
        struct hda_conn_list *p;

        p = lookup_conn_list(codec, nid);
        if (p) {
                list_del(&p->list);
                kfree(p);
        }

        return add_conn_list(codec, nid, len, list);
}
EXPORT_SYMBOL_GPL(snd_hda_override_conn_list);

/**
 * snd_hda_get_conn_index - get the connection index of the given NID
 * @codec: the HDA codec
 * @mux: NID containing the list
 * @nid: NID to select
 * @recursive: 1 when searching NID recursively, otherwise 0
 *
 * Parses the connection list of the widget @mux and checks whether the
 * widget @nid is present.  If it is, return the connection index.
 * Otherwise it returns -1.
 */
int snd_hda_get_conn_index(struct hda_codec *codec, hda_nid_t mux,
                           hda_nid_t nid, int recursive)
{
        const hda_nid_t *conn;
        int i, nums;

        nums = snd_hda_get_conn_list(codec, mux, &conn);
        for (i = 0; i < nums; i++)
                if (conn[i] == nid)
                        return i;
        if (!recursive)
                return -1;
        if (recursive > 10) {
                codec_dbg(codec, "too deep connection for 0x%x\n", nid);
                return -1;
        }
        recursive++;
        for (i = 0; i < nums; i++) {
                unsigned int type = get_wcaps_type(get_wcaps(codec, conn[i]));
                if (type == AC_WID_PIN || type == AC_WID_AUD_OUT)
                        continue;
                if (snd_hda_get_conn_index(codec, conn[i], nid, recursive) >= 0)
                        return i;
        }
        return -1;
}
EXPORT_SYMBOL_GPL(snd_hda_get_conn_index);

/**
 * snd_hda_get_num_devices - get DEVLIST_LEN parameter of the given widget
 *  @codec: the HDA codec
 *  @nid: NID of the pin to parse
 *
 * Get the device entry number on the given widget. This is a feature of
 * DP MST audio. Each pin can have several device entries in it.
 */
unsigned int snd_hda_get_num_devices(struct hda_codec *codec, hda_nid_t nid)
{
        unsigned int wcaps = get_wcaps(codec, nid);
        unsigned int parm;

        if (!codec->dp_mst || !(wcaps & AC_WCAP_DIGITAL) ||
            get_wcaps_type(wcaps) != AC_WID_PIN)
                return 0;

        parm = snd_hdac_read_parm_uncached(&codec->core, nid, AC_PAR_DEVLIST_LEN);
        if (parm == -1)
                parm = 0;
        return parm & AC_DEV_LIST_LEN_MASK;
}
EXPORT_SYMBOL_GPL(snd_hda_get_num_devices);

/**
 * snd_hda_get_devices - copy device list without cache
 * @codec: the HDA codec
 * @nid: NID of the pin to parse
 * @dev_list: device list array
 * @max_devices: max. number of devices to store
 *
 * Copy the device list. This info is dynamic and so not cached.
 * Currently called only from hda_proc.c, so not exported.
 */
int snd_hda_get_devices(struct hda_codec *codec, hda_nid_t nid,
                        u8 *dev_list, int max_devices)
{
        unsigned int parm;
        int i, dev_len, devices;

        parm = snd_hda_get_num_devices(codec, nid);
        if (!parm)      /* not multi-stream capable */
                return 0;

        dev_len = parm + 1;
        dev_len = dev_len < max_devices ? dev_len : max_devices;

        devices = 0;
        while (devices < dev_len) {
                if (snd_hdac_read(&codec->core, nid,
                                  AC_VERB_GET_DEVICE_LIST, devices, &parm))
                        break; /* error */

                for (i = 0; i < 8; i++) {
                        dev_list[devices] = (u8)parm;
                        parm >>= 4;
                        devices++;
                        if (devices >= dev_len)
                                break;
                }
        }
        return devices;
}

/**
 * snd_hda_get_dev_select - get device entry select on the pin
 * @codec: the HDA codec
 * @nid: NID of the pin to get device entry select
 *
 * Get the devcie entry select on the pin. Return the device entry
 * id selected on the pin. Return 0 means the first device entry
 * is selected or MST is not supported.
 */
int snd_hda_get_dev_select(struct hda_codec *codec, hda_nid_t nid)
{
        /* not support dp_mst will always return 0, using first dev_entry */
        if (!codec->dp_mst)
                return 0;

        return snd_hda_codec_read(codec, nid, 0, AC_VERB_GET_DEVICE_SEL, 0);
}
EXPORT_SYMBOL_GPL(snd_hda_get_dev_select);

/**
 * snd_hda_set_dev_select - set device entry select on the pin
 * @codec: the HDA codec
 * @nid: NID of the pin to set device entry select
 * @dev_id: device entry id to be set
 *
 * Set the device entry select on the pin nid.
 */
int snd_hda_set_dev_select(struct hda_codec *codec, hda_nid_t nid, int dev_id)
{
        int ret, num_devices;

        /* not support dp_mst will always return 0, using first dev_entry */
        if (!codec->dp_mst)
                return 0;

        /* AC_PAR_DEVLIST_LEN is 0 based. */
        num_devices = snd_hda_get_num_devices(codec, nid) + 1;
        /* If Device List Length is 0 (num_device = 1),
         * the pin is not multi stream capable.
         * Do nothing in this case.
         */
        if (num_devices == 1)
                return 0;

        /* Behavior of setting index being equal to or greater than
         * Device List Length is not predictable
         */
        if (num_devices <= dev_id)
                return -EINVAL;

        ret = snd_hda_codec_write(codec, nid, 0,
                        AC_VERB_SET_DEVICE_SEL, dev_id);

        return ret;
}
EXPORT_SYMBOL_GPL(snd_hda_set_dev_select);

/*
 * read widget caps for each widget and store in cache
 */
static int read_widget_caps(struct hda_codec *codec, hda_nid_t fg_node)
{
        int i;
        hda_nid_t nid;

        codec->wcaps = kmalloc_array(codec->core.num_nodes, 4, GFP_KERNEL);
        if (!codec->wcaps)
                return -ENOMEM;
        nid = codec->core.start_nid;
        for (i = 0; i < codec->core.num_nodes; i++, nid++)
                codec->wcaps[i] = snd_hdac_read_parm_uncached(&codec->core,
                                        nid, AC_PAR_AUDIO_WIDGET_CAP);
        return 0;
}

/* read all pin default configurations and save codec->init_pins */
static int read_pin_defaults(struct hda_codec *codec)
{
        hda_nid_t nid;

        for_each_hda_codec_node(nid, codec) {
                struct hda_pincfg *pin;
                unsigned int wcaps = get_wcaps(codec, nid);
                unsigned int wid_type = get_wcaps_type(wcaps);
                if (wid_type != AC_WID_PIN)
                        continue;
                pin = snd_array_new(&codec->init_pins);
                if (!pin)
                        return -ENOMEM;
                pin->nid = nid;
                pin->cfg = snd_hda_codec_read(codec, nid, 0,
                                              AC_VERB_GET_CONFIG_DEFAULT, 0);
                /*
                 * all device entries are the same widget control so far
                 * fixme: if any codec is different, need fix here
                 */
                pin->ctrl = snd_hda_codec_read(codec, nid, 0,
                                               AC_VERB_GET_PIN_WIDGET_CONTROL,
                                               0);
        }
        return 0;
}

/* look up the given pin config list and return the item matching with NID */
static struct hda_pincfg *look_up_pincfg(struct hda_codec *codec,
                                         struct snd_array *array,
                                         hda_nid_t nid)
{
        struct hda_pincfg *pin;
        int i;

        snd_array_for_each(array, i, pin) {
                if (pin->nid == nid)
                        return pin;
        }
        return NULL;
}

/* set the current pin config value for the given NID.
 * the value is cached, and read via snd_hda_codec_get_pincfg()
 */
int snd_hda_add_pincfg(struct hda_codec *codec, struct snd_array *list,
                       hda_nid_t nid, unsigned int cfg)
{
        struct hda_pincfg *pin;

        /* the check below may be invalid when pins are added by a fixup
         * dynamically (e.g. via snd_hda_codec_update_widgets()), so disabled
         * for now
         */
        /*
        if (get_wcaps_type(get_wcaps(codec, nid)) != AC_WID_PIN)
                return -EINVAL;
        */

        pin = look_up_pincfg(codec, list, nid);
        if (!pin) {
                pin = snd_array_new(list);
                if (!pin)
                        return -ENOMEM;
                pin->nid = nid;
        }
        pin->cfg = cfg;
        return 0;
}

/**
 * snd_hda_codec_set_pincfg - Override a pin default configuration
 * @codec: the HDA codec
 * @nid: NID to set the pin config
 * @cfg: the pin default config value
 *
 * Override a pin default configuration value in the cache.
 * This value can be read by snd_hda_codec_get_pincfg() in a higher
 * priority than the real hardware value.
 */
int snd_hda_codec_set_pincfg(struct hda_codec *codec,
                             hda_nid_t nid, unsigned int cfg)
{
        return snd_hda_add_pincfg(codec, &codec->driver_pins, nid, cfg);
}
EXPORT_SYMBOL_GPL(snd_hda_codec_set_pincfg);

/**
 * snd_hda_codec_get_pincfg - Obtain a pin-default configuration
 * @codec: the HDA codec
 * @nid: NID to get the pin config
 *
 * Get the current pin config value of the given pin NID.
 * If the pincfg value is cached or overridden via sysfs or driver,
 * returns the cached value.
 */
unsigned int snd_hda_codec_get_pincfg(struct hda_codec *codec, hda_nid_t nid)
{
        struct hda_pincfg *pin;

#ifdef CONFIG_SND_HDA_RECONFIG
        {
                unsigned int cfg = 0;
                mutex_lock(&codec->user_mutex);
                pin = look_up_pincfg(codec, &codec->user_pins, nid);
                if (pin)
                        cfg = pin->cfg;
                mutex_unlock(&codec->user_mutex);
                if (cfg)
                        return cfg;
        }
#endif
        pin = look_up_pincfg(codec, &codec->driver_pins, nid);
        if (pin)
                return pin->cfg;
        pin = look_up_pincfg(codec, &codec->init_pins, nid);
        if (pin)
                return pin->cfg;
        return 0;
}
EXPORT_SYMBOL_GPL(snd_hda_codec_get_pincfg);

/**
 * snd_hda_codec_set_pin_target - remember the current pinctl target value
 * @codec: the HDA codec
 * @nid: pin NID
 * @val: assigned pinctl value
 *
 * This function stores the given value to a pinctl target value in the
 * pincfg table.  This isn't always as same as the actually written value
 * but can be referred at any time via snd_hda_codec_get_pin_target().
 */
int snd_hda_codec_set_pin_target(struct hda_codec *codec, hda_nid_t nid,
                                 unsigned int val)
{
        struct hda_pincfg *pin;

        pin = look_up_pincfg(codec, &codec->init_pins, nid);
        if (!pin)
                return -EINVAL;
        pin->target = val;
        return 0;
}
EXPORT_SYMBOL_GPL(snd_hda_codec_set_pin_target);

/**
 * snd_hda_codec_get_pin_target - return the current pinctl target value
 * @codec: the HDA codec
 * @nid: pin NID
 */
int snd_hda_codec_get_pin_target(struct hda_codec *codec, hda_nid_t nid)
{
        struct hda_pincfg *pin;

        pin = look_up_pincfg(codec, &codec->init_pins, nid);
        if (!pin)
                return 0;
        return pin->target;
}
EXPORT_SYMBOL_GPL(snd_hda_codec_get_pin_target);

/**
 * snd_hda_shutup_pins - Shut up all pins
 * @codec: the HDA codec
 *
 * Clear all pin controls to shup up before suspend for avoiding click noise.
 * The controls aren't cached so that they can be resumed properly.
 */
void snd_hda_shutup_pins(struct hda_codec *codec)
{
        const struct hda_pincfg *pin;
        int i;

        /* don't shut up pins when unloading the driver; otherwise it breaks
         * the default pin setup at the next load of the driver
         */
        if (codec->bus->shutdown)
                return;
        snd_array_for_each(&codec->init_pins, i, pin) {
                /* use read here for syncing after issuing each verb */
                snd_hda_codec_read(codec, pin->nid, 0,
                                   AC_VERB_SET_PIN_WIDGET_CONTROL, 0);
        }
        codec->pins_shutup = 1;
}
EXPORT_SYMBOL_GPL(snd_hda_shutup_pins);

#ifdef CONFIG_PM
/* Restore the pin controls cleared previously via snd_hda_shutup_pins() */
static void restore_shutup_pins(struct hda_codec *codec)
{
        const struct hda_pincfg *pin;
        int i;

        if (!codec->pins_shutup)
                return;
        if (codec->bus->shutdown)
                return;
        snd_array_for_each(&codec->init_pins, i, pin) {
                snd_hda_codec_write(codec, pin->nid, 0,
                                    AC_VERB_SET_PIN_WIDGET_CONTROL,
                                    pin->ctrl);
        }
        codec->pins_shutup = 0;
}
#endif

static void hda_jackpoll_work(struct work_struct *work)
{
        struct hda_codec *codec =
                container_of(work, struct hda_codec, jackpoll_work.work);

        /* for non-polling trigger: we need nothing if already powered on */
        if (!codec->jackpoll_interval && snd_hdac_is_power_on(&codec->core))
                return;

        /* the power-up/down sequence triggers the runtime resume */
        snd_hda_power_up_pm(codec);
        /* update jacks manually if polling is required, too */
        if (codec->jackpoll_interval) {
                snd_hda_jack_set_dirty_all(codec);
                snd_hda_jack_poll_all(codec);
        }
        snd_hda_power_down_pm(codec);

        if (!codec->jackpoll_interval)
                return;

        schedule_delayed_work(&codec->jackpoll_work,
                              codec->jackpoll_interval);
}

/* release all pincfg lists */
static void free_init_pincfgs(struct hda_codec *codec)
{
        snd_array_free(&codec->driver_pins);
#ifdef CONFIG_SND_HDA_RECONFIG
        snd_array_free(&codec->user_pins);
#endif
        snd_array_free(&codec->init_pins);
}

/*
 * audio-converter setup caches
 */
struct hda_cvt_setup {
        hda_nid_t nid;
        u8 stream_tag;
        u8 channel_id;
        u16 format_id;
        unsigned char active;   /* cvt is currently used */
        unsigned char dirty;    /* setups should be cleared */
};

/* get or create a cache entry for the given audio converter NID */
static struct hda_cvt_setup *
get_hda_cvt_setup(struct hda_codec *codec, hda_nid_t nid)
{
        struct hda_cvt_setup *p;
        int i;

        snd_array_for_each(&codec->cvt_setups, i, p) {
                if (p->nid == nid)
                        return p;
        }
        p = snd_array_new(&codec->cvt_setups);
        if (p)
                p->nid = nid;
        return p;
}

/*
 * PCM device
 */
static void release_pcm(struct kref *kref)
{
        struct hda_pcm *pcm = container_of(kref, struct hda_pcm, kref);

        if (pcm->pcm)
                snd_device_free(pcm->codec->card, pcm->pcm);
        clear_bit(pcm->device, pcm->codec->bus->pcm_dev_bits);
        kfree(pcm->name);
        kfree(pcm);
}

void snd_hda_codec_pcm_put(struct hda_pcm *pcm)
{
        kref_put(&pcm->kref, release_pcm);
}
EXPORT_SYMBOL_GPL(snd_hda_codec_pcm_put);

struct hda_pcm *snd_hda_codec_pcm_new(struct hda_codec *codec,
                                      const char *fmt, ...)
{
        struct hda_pcm *pcm;
        va_list args;

        pcm = kzalloc(sizeof(*pcm), GFP_KERNEL);
        if (!pcm)
                return NULL;

        pcm->codec = codec;
        kref_init(&pcm->kref);
        va_start(args, fmt);
        pcm->name = kvasprintf(GFP_KERNEL, fmt, args);
        va_end(args);
        if (!pcm->name) {
                kfree(pcm);
                return NULL;
        }

        list_add_tail(&pcm->list, &codec->pcm_list_head);
        return pcm;
}
EXPORT_SYMBOL_GPL(snd_hda_codec_pcm_new);

/*
 * codec destructor
 */
static void codec_release_pcms(struct hda_codec *codec)
{
        struct hda_pcm *pcm, *n;

        list_for_each_entry_safe(pcm, n, &codec->pcm_list_head, list) {
                list_del_init(&pcm->list);
                if (pcm->pcm)
                        snd_device_disconnect(codec->card, pcm->pcm);
                snd_hda_codec_pcm_put(pcm);
        }
}

void snd_hda_codec_cleanup_for_unbind(struct hda_codec *codec)
{
        if (codec->registered) {
                /* pm_runtime_put() is called in snd_hdac_device_exit() */
                pm_runtime_get_noresume(hda_codec_dev(codec));
                pm_runtime_disable(hda_codec_dev(codec));
                codec->registered = 0;
        }

        cancel_delayed_work_sync(&codec->jackpoll_work);
        if (!codec->in_freeing)
                snd_hda_ctls_clear(codec);
        codec_release_pcms(codec);
        snd_hda_detach_beep_device(codec);
        memset(&codec->patch_ops, 0, sizeof(codec->patch_ops));
        snd_hda_jack_tbl_clear(codec);
        codec->proc_widget_hook = NULL;
        codec->spec = NULL;

        /* free only driver_pins so that init_pins + user_pins are restored */
        snd_array_free(&codec->driver_pins);
        snd_array_free(&codec->cvt_setups);
        snd_array_free(&codec->spdif_out);
        snd_array_free(&codec->verbs);
        codec->preset = NULL;
        codec->follower_dig_outs = NULL;
        codec->spdif_status_reset = 0;
        snd_array_free(&codec->mixers);
        snd_array_free(&codec->nids);
        remove_conn_list(codec);
        snd_hdac_regmap_exit(&codec->core);
}
EXPORT_SYMBOL_GPL(snd_hda_codec_cleanup_for_unbind);

static unsigned int hda_set_power_state(struct hda_codec *codec,
                                unsigned int power_state);

/* enable/disable display power per codec */
void snd_hda_codec_display_power(struct hda_codec *codec, bool enable)
{
        if (codec->display_power_control)
                snd_hdac_display_power(&codec->bus->core, codec->addr, enable);
}

/* also called from hda_bind.c */
void snd_hda_codec_register(struct hda_codec *codec)
{
        if (codec->registered)
                return;
        if (device_is_registered(hda_codec_dev(codec))) {
                snd_hda_codec_display_power(codec, true);
                pm_runtime_enable(hda_codec_dev(codec));
                /* it was powered up in snd_hda_codec_new(), now all done */
                snd_hda_power_down(codec);
                codec->registered = 1;
        }
}

static int snd_hda_codec_dev_register(struct snd_device *device)
{
        snd_hda_codec_register(device->device_data);
        return 0;
}

static int snd_hda_codec_dev_free(struct snd_device *device)
{
        struct hda_codec *codec = device->device_data;

        codec->in_freeing = 1;
        /*
         * snd_hda_codec_device_new() is used by legacy HDA and ASoC driver.
         * We can't unregister ASoC device since it will be unregistered in
         * snd_hdac_ext_bus_device_remove().
         */
        if (codec->core.type == HDA_DEV_LEGACY)
                snd_hdac_device_unregister(&codec->core);
        snd_hda_codec_display_power(codec, false);

        /*
         * In the case of ASoC HD-audio bus, the device refcount is released in
         * snd_hdac_ext_bus_device_remove() explicitly.
         */
        if (codec->core.type == HDA_DEV_LEGACY)
                put_device(hda_codec_dev(codec));

        return 0;
}

static void snd_hda_codec_dev_release(struct device *dev)
{
        struct hda_codec *codec = dev_to_hda_codec(dev);

        free_init_pincfgs(codec);
        snd_hdac_device_exit(&codec->core);
        snd_hda_sysfs_clear(codec);
        kfree(codec->modelname);
        kfree(codec->wcaps);

        /*
         * In the case of ASoC HD-audio, hda_codec is device managed.
         * It will be freed when the ASoC device is removed.
         */
        if (codec->core.type == HDA_DEV_LEGACY)
                kfree(codec);
}

#define DEV_NAME_LEN 31

static int snd_hda_codec_device_init(struct hda_bus *bus, struct snd_card *card,
                        unsigned int codec_addr, struct hda_codec **codecp)
{
        char name[DEV_NAME_LEN];
        struct hda_codec *codec;
        int err;

        dev_dbg(card->dev, "%s: entry\n", __func__);

        if (snd_BUG_ON(!bus))
                return -EINVAL;
        if (snd_BUG_ON(codec_addr > HDA_MAX_CODEC_ADDRESS))
                return -EINVAL;

        codec = kzalloc(sizeof(*codec), GFP_KERNEL);
        if (!codec)
                return -ENOMEM;

        sprintf(name, "hdaudioC%dD%d", card->number, codec_addr);
        err = snd_hdac_device_init(&codec->core, &bus->core, name, codec_addr);
        if (err < 0) {
                kfree(codec);
                return err;
        }

        codec->core.type = HDA_DEV_LEGACY;
        *codecp = codec;

        return err;
}

/**
 * snd_hda_codec_new - create a HDA codec
 * @bus: the bus to assign
 * @card: card for this codec
 * @codec_addr: the codec address
 * @codecp: the pointer to store the generated codec
 *
 * Returns 0 if successful, or a negative error code.
 */
int snd_hda_codec_new(struct hda_bus *bus, struct snd_card *card,
                      unsigned int codec_addr, struct hda_codec **codecp)
{
        int ret;

        ret = snd_hda_codec_device_init(bus, card, codec_addr, codecp);
        if (ret < 0)
                return ret;

        return snd_hda_codec_device_new(bus, card, codec_addr, *codecp);
}
EXPORT_SYMBOL_GPL(snd_hda_codec_new);

int snd_hda_codec_device_new(struct hda_bus *bus, struct snd_card *card,
                        unsigned int codec_addr, struct hda_codec *codec)
{
        char component[31];
        hda_nid_t fg;
        int err;
        static const struct snd_device_ops dev_ops = {
                .dev_register = snd_hda_codec_dev_register,
                .dev_free = snd_hda_codec_dev_free,
        };

        dev_dbg(card->dev, "%s: entry\n", __func__);

        if (snd_BUG_ON(!bus))
                return -EINVAL;
        if (snd_BUG_ON(codec_addr > HDA_MAX_CODEC_ADDRESS))
                return -EINVAL;

        codec->core.dev.release = snd_hda_codec_dev_release;
        codec->core.exec_verb = codec_exec_verb;

        codec->bus = bus;
        codec->card = card;
        codec->addr = codec_addr;
        mutex_init(&codec->spdif_mutex);
        mutex_init(&codec->control_mutex);
        snd_array_init(&codec->mixers, sizeof(struct hda_nid_item), 32);
        snd_array_init(&codec->nids, sizeof(struct hda_nid_item), 32);
        snd_array_init(&codec->init_pins, sizeof(struct hda_pincfg), 16);
        snd_array_init(&codec->driver_pins, sizeof(struct hda_pincfg), 16);
        snd_array_init(&codec->cvt_setups, sizeof(struct hda_cvt_setup), 8);
        snd_array_init(&codec->spdif_out, sizeof(struct hda_spdif_out), 16);
        snd_array_init(&codec->jacktbl, sizeof(struct hda_jack_tbl), 16);
        snd_array_init(&codec->verbs, sizeof(struct hda_verb *), 8);
        INIT_LIST_HEAD(&codec->conn_list);
        INIT_LIST_HEAD(&codec->pcm_list_head);

        INIT_DELAYED_WORK(&codec->jackpoll_work, hda_jackpoll_work);
        codec->depop_delay = -1;
        codec->fixup_id = HDA_FIXUP_ID_NOT_SET;

#ifdef CONFIG_PM
        codec->power_jiffies = jiffies;
#endif

        snd_hda_sysfs_init(codec);

        if (codec->bus->modelname) {
                codec->modelname = kstrdup(codec->bus->modelname, GFP_KERNEL);
                if (!codec->modelname) {
                        err = -ENOMEM;
                        goto error;
                }
        }

        fg = codec->core.afg ? codec->core.afg : codec->core.mfg;
        err = read_widget_caps(codec, fg);
        if (err < 0)
                goto error;
        err = read_pin_defaults(codec);
        if (err < 0)
                goto error;

        /* power-up all before initialization */
        hda_set_power_state(codec, AC_PWRST_D0);
        codec->core.dev.power.power_state = PMSG_ON;

        snd_hda_codec_proc_new(codec);

        snd_hda_create_hwdep(codec);

        sprintf(component, "HDA:%08x,%08x,%08x", codec->core.vendor_id,
                codec->core.subsystem_id, codec->core.revision_id);
        snd_component_add(card, component);

        err = snd_device_new(card, SNDRV_DEV_CODEC, codec, &dev_ops);
        if (err < 0)

                goto error;

        /* PM runtime needs to be enabled later after binding codec */
        pm_runtime_forbid(&codec->core.dev);

        return 0;

 error:
        put_device(hda_codec_dev(codec));
        return err;
}
EXPORT_SYMBOL_GPL(snd_hda_codec_device_new);

/**
 * snd_hda_codec_update_widgets - Refresh widget caps and pin defaults
 * @codec: the HDA codec
 *
 * Forcibly refresh the all widget caps and the init pin configurations of
 * the given codec.
 */
int snd_hda_codec_update_widgets(struct hda_codec *codec)
{
        hda_nid_t fg;
        int err;

        err = snd_hdac_refresh_widgets(&codec->core);
        if (err < 0)
                return err;

        /* Assume the function group node does not change,
         * only the widget nodes may change.
         */
        kfree(codec->wcaps);
        fg = codec->core.afg ? codec->core.afg : codec->core.mfg;
        err = read_widget_caps(codec, fg);
        if (err < 0)
                return err;

        snd_array_free(&codec->init_pins);
        err = read_pin_defaults(codec);

        return err;
}
EXPORT_SYMBOL_GPL(snd_hda_codec_update_widgets);

/* update the stream-id if changed */
static void update_pcm_stream_id(struct hda_codec *codec,
                                 struct hda_cvt_setup *p, hda_nid_t nid,
                                 u32 stream_tag, int channel_id)
{
        unsigned int oldval, newval;

        if (p->stream_tag != stream_tag || p->channel_id != channel_id) {
                oldval = snd_hda_codec_read(codec, nid, 0, AC_VERB_GET_CONV, 0);
                newval = (stream_tag << 4) | channel_id;
                if (oldval != newval)
                        snd_hda_codec_write(codec, nid, 0,
                                            AC_VERB_SET_CHANNEL_STREAMID,
                                            newval);
                p->stream_tag = stream_tag;
                p->channel_id = channel_id;
        }
}

/* update the format-id if changed */
static void update_pcm_format(struct hda_codec *codec, struct hda_cvt_setup *p,
                              hda_nid_t nid, int format)
{
        unsigned int oldval;

        if (p->format_id != format) {
                oldval = snd_hda_codec_read(codec, nid, 0,
                                            AC_VERB_GET_STREAM_FORMAT, 0);
                if (oldval != format) {
                        msleep(1);
                        snd_hda_codec_write(codec, nid, 0,
                                            AC_VERB_SET_STREAM_FORMAT,
                                            format);
                }
                p->format_id = format;
        }
}

/**
 * snd_hda_codec_setup_stream - set up the codec for streaming
 * @codec: the CODEC to set up
 * @nid: the NID to set up
 * @stream_tag: stream tag to pass, it's between 0x1 and 0xf.
 * @channel_id: channel id to pass, zero based.
 * @format: stream format.
 */
void snd_hda_codec_setup_stream(struct hda_codec *codec, hda_nid_t nid,
                                u32 stream_tag,
                                int channel_id, int format)
{
        struct hda_codec *c;
        struct hda_cvt_setup *p;
        int type;
        int i;

        if (!nid)
                return;

        codec_dbg(codec,
                  "hda_codec_setup_stream: NID=0x%x, stream=0x%x, channel=%d, format=0x%x\n",
                  nid, stream_tag, channel_id, format);
        p = get_hda_cvt_setup(codec, nid);
        if (!p)
                return;

        if (codec->patch_ops.stream_pm)
                codec->patch_ops.stream_pm(codec, nid, true);
        if (codec->pcm_format_first)
                update_pcm_format(codec, p, nid, format);
        update_pcm_stream_id(codec, p, nid, stream_tag, channel_id);
        if (!codec->pcm_format_first)
                update_pcm_format(codec, p, nid, format);

        p->active = 1;
        p->dirty = 0;

        /* make other inactive cvts with the same stream-tag dirty */
        type = get_wcaps_type(get_wcaps(codec, nid));
        list_for_each_codec(c, codec->bus) {
                snd_array_for_each(&c->cvt_setups, i, p) {
                        if (!p->active && p->stream_tag == stream_tag &&
                            get_wcaps_type(get_wcaps(c, p->nid)) == type)
                                p->dirty = 1;
                }
        }
}
EXPORT_SYMBOL_GPL(snd_hda_codec_setup_stream);

static void really_cleanup_stream(struct hda_codec *codec,
                                  struct hda_cvt_setup *q);

/**
 * __snd_hda_codec_cleanup_stream - clean up the codec for closing
 * @codec: the CODEC to clean up
 * @nid: the NID to clean up
 * @do_now: really clean up the stream instead of clearing the active flag
 */
void __snd_hda_codec_cleanup_stream(struct hda_codec *codec, hda_nid_t nid,
                                    int do_now)
{
        struct hda_cvt_setup *p;

        if (!nid)
                return;

        if (codec->no_sticky_stream)
                do_now = 1;

        codec_dbg(codec, "hda_codec_cleanup_stream: NID=0x%x\n", nid);
        p = get_hda_cvt_setup(codec, nid);
        if (p) {
                /* here we just clear the active flag when do_now isn't set;
                 * actual clean-ups will be done later in
                 * purify_inactive_streams() called from snd_hda_codec_prpapre()
                 */
                if (do_now)
                        really_cleanup_stream(codec, p);
                else
                        p->active = 0;
        }
}
EXPORT_SYMBOL_GPL(__snd_hda_codec_cleanup_stream);

static void really_cleanup_stream(struct hda_codec *codec,
                                  struct hda_cvt_setup *q)
{
        hda_nid_t nid = q->nid;
        if (q->stream_tag || q->channel_id)
                snd_hda_codec_write(codec, nid, 0, AC_VERB_SET_CHANNEL_STREAMID, 0);
        if (q->format_id)
                snd_hda_codec_write(codec, nid, 0, AC_VERB_SET_STREAM_FORMAT, 0
);
        memset(q, 0, sizeof(*q));
        q->nid = nid;
        if (codec->patch_ops.stream_pm)
                codec->patch_ops.stream_pm(codec, nid, false);
}

/* clean up the all conflicting obsolete streams */
static void purify_inactive_streams(struct hda_codec *codec)
{
        struct hda_codec *c;
        struct hda_cvt_setup *p;
        int i;

        list_for_each_codec(c, codec->bus) {
                snd_array_for_each(&c->cvt_setups, i, p) {
                        if (p->dirty)
                                really_cleanup_stream(c, p);
                }
        }
}

#ifdef CONFIG_PM
/* clean up all streams; called from suspend */
static void hda_cleanup_all_streams(struct hda_codec *codec)
{
        struct hda_cvt_setup *p;
        int i;

        snd_array_for_each(&codec->cvt_setups, i, p) {
                if (p->stream_tag)
                        really_cleanup_stream(codec, p);
        }
}
#endif

/*
 * amp access functions
 */

/**
 * query_amp_caps - query AMP capabilities
 * @codec: the HD-auio codec
 * @nid: the NID to query
 * @direction: either #HDA_INPUT or #HDA_OUTPUT
 *
 * Query AMP capabilities for the given widget and direction.
 * Returns the obtained capability bits.
 *
 * When cap bits have been already read, this doesn't read again but
 * returns the cached value.
 */
u32 query_amp_caps(struct hda_codec *codec, hda_nid_t nid, int direction)
{
        if (!(get_wcaps(codec, nid) & AC_WCAP_AMP_OVRD))
                nid = codec->core.afg;
        return snd_hda_param_read(codec, nid,
                                  direction == HDA_OUTPUT ?
                                  AC_PAR_AMP_OUT_CAP : AC_PAR_AMP_IN_CAP);
}
EXPORT_SYMBOL_GPL(query_amp_caps);

/**
 * snd_hda_check_amp_caps - query AMP capabilities
 * @codec: the HD-audio codec
 * @nid: the NID to query
 * @dir: either #HDA_INPUT or #HDA_OUTPUT
 * @bits: bit mask to check the result
 *
 * Check whether the widget has the given amp capability for the direction.
 */
bool snd_hda_check_amp_caps(struct hda_codec *codec, hda_nid_t nid,
                           int dir, unsigned int bits)
{
        if (!nid)
                return false;
        if (get_wcaps(codec, nid) & (1 << (dir + 1)))
                if (query_amp_caps(codec, nid, dir) & bits)
                        return true;
        return false;
}
EXPORT_SYMBOL_GPL(snd_hda_check_amp_caps);

/**
 * snd_hda_override_amp_caps - Override the AMP capabilities
 * @codec: the CODEC to clean up
 * @nid: the NID to clean up
 * @dir: either #HDA_INPUT or #HDA_OUTPUT
 * @caps: the capability bits to set
 *
 * Override the cached AMP caps bits value by the given one.
 * This function is useful if the driver needs to adjust the AMP ranges,
 * e.g. limit to 0dB, etc.
 *
 * Returns zero if successful or a negative error code.
 */
int snd_hda_override_amp_caps(struct hda_codec *codec, hda_nid_t nid, int dir,
                              unsigned int caps)
{
        unsigned int parm;

        snd_hda_override_wcaps(codec, nid,
                               get_wcaps(codec, nid) | AC_WCAP_AMP_OVRD);
        parm = dir == HDA_OUTPUT ? AC_PAR_AMP_OUT_CAP : AC_PAR_AMP_IN_CAP;
        return snd_hdac_override_parm(&codec->core, nid, parm, caps);
}
EXPORT_SYMBOL_GPL(snd_hda_override_amp_caps);

static unsigned int encode_amp(struct hda_codec *codec, hda_nid_t nid,
                               int ch, int dir, int idx)
{
        unsigned int cmd = snd_hdac_regmap_encode_amp(nid, ch, dir, idx);

        /* enable fake mute if no h/w mute but min=mute */
        if ((query_amp_caps(codec, nid, dir) &
             (AC_AMPCAP_MUTE | AC_AMPCAP_MIN_MUTE)) == AC_AMPCAP_MIN_MUTE)
                cmd |= AC_AMP_FAKE_MUTE;
        return cmd;
}

/**
 * snd_hda_codec_amp_update - update the AMP mono value
 * @codec: HD-audio codec
 * @nid: NID to read the AMP value
 * @ch: channel to update (0 or 1)
 * @dir: #HDA_INPUT or #HDA_OUTPUT
 * @idx: the index value (only for input direction)
 * @mask: bit mask to set
 * @val: the bits value to set
 *
 * Update the AMP values for the given channel, direction and index.
 */
int snd_hda_codec_amp_update(struct hda_codec *codec, hda_nid_t nid,
                             int ch, int dir, int idx, int mask, int val)
{
        unsigned int cmd = encode_amp(codec, nid, ch, dir, idx);

        return snd_hdac_regmap_update_raw(&codec->core, cmd, mask, val);
}
EXPORT_SYMBOL_GPL(snd_hda_codec_amp_update);

/**
 * snd_hda_codec_amp_stereo - update the AMP stereo values
 * @codec: HD-audio codec
 * @nid: NID to read the AMP value
 * @direction: #HDA_INPUT or #HDA_OUTPUT
 * @idx: the index value (only for input direction)
 * @mask: bit mask to set
 * @val: the bits value to set
 *
 * Update the AMP values like snd_hda_codec_amp_update(), but for a
 * stereo widget with the same mask and value.
 */
int snd_hda_codec_amp_stereo(struct hda_codec *codec, hda_nid_t nid,
                             int direction, int idx, int mask, int val)
{
        int ch, ret = 0;

        if (snd_BUG_ON(mask & ~0xff))
                mask &= 0xff;
        for (ch = 0; ch < 2; ch++)
                ret |= snd_hda_codec_amp_update(codec, nid, ch, direction,
                                                idx, mask, val);
        return ret;
}
EXPORT_SYMBOL_GPL(snd_hda_codec_amp_stereo);

/**
 * snd_hda_codec_amp_init - initialize the AMP value
 * @codec: the HDA codec
 * @nid: NID to read the AMP value
 * @ch: channel (left=0 or right=1)
 * @dir: #HDA_INPUT or #HDA_OUTPUT
 * @idx: the index value (only for input direction)
 * @mask: bit mask to set
 * @val: the bits value to set
 *
 * Works like snd_hda_codec_amp_update() but it writes the value only at
 * the first access.  If the amp was already initialized / updated beforehand,
 * this does nothing.
 */
int snd_hda_codec_amp_init(struct hda_codec *codec, hda_nid_t nid, int ch,
                           int dir, int idx, int mask, int val)
{
        unsigned int cmd = encode_amp(codec, nid, ch, dir, idx);

        if (!codec->core.regmap)
                return -EINVAL;
        return snd_hdac_regmap_update_raw_once(&codec->core, cmd, mask, val);
}
EXPORT_SYMBOL_GPL(snd_hda_codec_amp_init);

/**
 * snd_hda_codec_amp_init_stereo - initialize the stereo AMP value
 * @codec: the HDA codec
 * @nid: NID to read the AMP value
 * @dir: #HDA_INPUT or #HDA_OUTPUT
 * @idx: the index value (only for input direction)
 * @mask: bit mask to set
 * @val: the bits value to set
 *
 * Call snd_hda_codec_amp_init() for both stereo channels.
 */
int snd_hda_codec_amp_init_stereo(struct hda_codec *codec, hda_nid_t nid,
                                  int dir, int idx, int mask, int val)
{
        int ch, ret = 0;

        if (snd_BUG_ON(mask & ~0xff))
                mask &= 0xff;
        for (ch = 0; ch < 2; ch++)
                ret |= snd_hda_codec_amp_init(codec, nid, ch, dir,
                                              idx, mask, val);
        return ret;
}
EXPORT_SYMBOL_GPL(snd_hda_codec_amp_init_stereo);

static u32 get_amp_max_value(struct hda_codec *codec, hda_nid_t nid, int dir,
                             unsigned int ofs)
{
        u32 caps = query_amp_caps(codec, nid, dir);
        /* get num steps */
        caps = (caps & AC_AMPCAP_NUM_STEPS) >> AC_AMPCAP_NUM_STEPS_SHIFT;
        if (ofs < caps)
                caps -= ofs;
        return caps;
}

/**
 * snd_hda_mixer_amp_volume_info - Info callback for a standard AMP mixer
 * @kcontrol: referred ctl element
 * @uinfo: pointer to get/store the data
 *
 * The control element is supposed to have the private_value field
 * set up via HDA_COMPOSE_AMP_VAL*() or related macros.
 */
int snd_hda_mixer_amp_volume_info(struct snd_kcontrol *kcontrol,
                                  struct snd_ctl_elem_info *uinfo)
{
        struct hda_codec *codec = snd_kcontrol_chip(kcontrol);
        u16 nid = get_amp_nid(kcontrol);
        u8 chs = get_amp_channels(kcontrol);
        int dir = get_amp_direction(kcontrol);
        unsigned int ofs = get_amp_offset(kcontrol);

        uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
        uinfo->count = chs == 3 ? 2 : 1;
        uinfo->value.integer.min = 0;
        uinfo->value.integer.max = get_amp_max_value(codec, nid, dir, ofs);
        if (!uinfo->value.integer.max) {
                codec_warn(codec,
                           "num_steps = 0 for NID=0x%x (ctl = %s)\n",
                           nid, kcontrol->id.name);
                return -EINVAL;
        }
        return 0;
}
EXPORT_SYMBOL_GPL(snd_hda_mixer_amp_volume_info);


static inline unsigned int
read_amp_value(struct hda_codec *codec, hda_nid_t nid,
               int ch, int dir, int idx, unsigned int ofs)
{
        unsigned int val;
        val = snd_hda_codec_amp_read(codec, nid, ch, dir, idx);
        val &= HDA_AMP_VOLMASK;
        if (val >= ofs)
                val -= ofs;
        else
                val = 0;
        return val;
}

static inline int
update_amp_value(struct hda_codec *codec, hda_nid_t nid,
                 int ch, int dir, int idx, unsigned int ofs,
                 unsigned int val)
{
        unsigned int maxval;

        if (val > 0)
                val += ofs;
        /* ofs = 0: raw max value */
        maxval = get_amp_max_value(codec, nid, dir, 0);
        if (val > maxval)
                val = maxval;
        return snd_hda_codec_amp_update(codec, nid, ch, dir, idx,
                                        HDA_AMP_VOLMASK, val);
}

/**
 * snd_hda_mixer_amp_volume_get - Get callback for a standard AMP mixer volume
 * @kcontrol: ctl element
 * @ucontrol: pointer to get/store the data
 *
 * The control element is supposed to have the private_value field
 * set up via HDA_COMPOSE_AMP_VAL*() or related macros.
 */
int snd_hda_mixer_amp_volume_get(struct snd_kcontrol *kcontrol,
                                 struct snd_ctl_elem_value *ucontrol)
{
        struct hda_codec *codec = snd_kcontrol_chip(kcontrol);
        hda_nid_t nid = get_amp_nid(kcontrol);
        int chs = get_amp_channels(kcontrol);
        int dir = get_amp_direction(kcontrol);
        int idx = get_amp_index(kcontrol);
        unsigned int ofs = get_amp_offset(kcontrol);
        long *valp = ucontrol->value.integer.value;

        if (chs & 1)
                *valp++ = read_amp_value(codec, nid, 0, dir, idx, ofs);
        if (chs & 2)
                *valp = read_amp_value(codec, nid, 1, dir, idx, ofs);
        return 0;
}
EXPORT_SYMBOL_GPL(snd_hda_mixer_amp_volume_get);

/**
 * snd_hda_mixer_amp_volume_put - Put callback for a standard AMP mixer volume
 * @kcontrol: ctl element
 * @ucontrol: pointer to get/store the data
 *
 * The control element is supposed to have the private_value field
 * set up via HDA_COMPOSE_AMP_VAL*() or related macros.
 */
int snd_hda_mixer_amp_volume_put(struct snd_kcontrol *kcontrol,
                                 struct snd_ctl_elem_value *ucontrol)
{
        struct hda_codec *codec = snd_kcontrol_chip(kcontrol);
        hda_nid_t nid = get_amp_nid(kcontrol);
        int chs = get_amp_channels(kcontrol);
        int dir = get_amp_direction(kcontrol);
        int idx = get_amp_index(kcontrol);
        unsigned int ofs = get_amp_offset(kcontrol);
        long *valp = ucontrol->value.integer.value;
        int change = 0;

        if (chs & 1) {
                change = update_amp_value(codec, nid, 0, dir, idx, ofs, *valp);
                valp++;
        }
        if (chs & 2)
                change |= update_amp_value(codec, nid, 1, dir, idx, ofs, *valp);
        return change;
}
EXPORT_SYMBOL_GPL(snd_hda_mixer_amp_volume_put);

/* inquiry the amp caps and convert to TLV */
static void get_ctl_amp_tlv(struct snd_kcontrol *kcontrol, unsigned int *tlv)
{
        struct hda_codec *codec = snd_kcontrol_chip(kcontrol);
        hda_nid_t nid = get_amp_nid(kcontrol);
        int dir = get_amp_direction(kcontrol);
        unsigned int ofs = get_amp_offset(kcontrol);
        bool min_mute = get_amp_min_mute(kcontrol);
        u32 caps, val1, val2;

        caps = query_amp_caps(codec, nid, dir);
        val2 = (caps & AC_AMPCAP_STEP_SIZE) >> AC_AMPCAP_STEP_SIZE_SHIFT;
        val2 = (val2 + 1) * 25;
        val1 = -((caps & AC_AMPCAP_OFFSET) >> AC_AMPCAP_OFFSET_SHIFT);
        val1 += ofs;
        val1 = ((int)val1) * ((int)val2);
        if (min_mute || (caps & AC_AMPCAP_MIN_MUTE))
                val2 |= TLV_DB_SCALE_MUTE;
        tlv[SNDRV_CTL_TLVO_TYPE] = SNDRV_CTL_TLVT_DB_SCALE;
        tlv[SNDRV_CTL_TLVO_LEN] = 2 * sizeof(unsigned int);
        tlv[SNDRV_CTL_TLVO_DB_SCALE_MIN] = val1;
        tlv[SNDRV_CTL_TLVO_DB_SCALE_MUTE_AND_STEP] = val2;
}

/**
 * snd_hda_mixer_amp_tlv - TLV callback for a standard AMP mixer volume
 * @kcontrol: ctl element
 * @op_flag: operation flag
 * @size: byte size of input TLV
 * @_tlv: TLV data
 *
 * The control element is supposed to have the private_value field
 * set up via HDA_COMPOSE_AMP_VAL*() or related macros.
 */
int snd_hda_mixer_amp_tlv(struct snd_kcontrol *kcontrol, int op_flag,
                          unsigned int size, unsigned int __user *_tlv)
{
        unsigned int tlv[4];

        if (size < 4 * sizeof(unsigned int))
                return -ENOMEM;
        get_ctl_amp_tlv(kcontrol, tlv);
        if (copy_to_user(_tlv, tlv, sizeof(tlv)))
                return -EFAULT;
        return 0;
}
EXPORT_SYMBOL_GPL(snd_hda_mixer_amp_tlv);

/**
 * snd_hda_set_vmaster_tlv - Set TLV for a virtual master control
 * @codec: HD-audio codec
 * @nid: NID of a reference widget
 * @dir: #HDA_INPUT or #HDA_OUTPUT
 * @tlv: TLV data to be stored, at least 4 elements
 *
 * Set (static) TLV data for a virtual master volume using the AMP caps
 * obtained from the reference NID.
 * The volume range is recalculated as if the max volume is 0dB.
 */
void snd_hda_set_vmaster_tlv(struct hda_codec *codec, hda_nid_t nid, int dir,
                             unsigned int *tlv)
{
        u32 caps;
        int nums, step;

        caps = query_amp_caps(codec, nid, dir);
        nums = (caps & AC_AMPCAP_NUM_STEPS) >> AC_AMPCAP_NUM_STEPS_SHIFT;
        step = (caps & AC_AMPCAP_STEP_SIZE) >> AC_AMPCAP_STEP_SIZE_SHIFT;
        step = (step + 1) * 25;
        tlv[SNDRV_CTL_TLVO_TYPE] = SNDRV_CTL_TLVT_DB_SCALE;
        tlv[SNDRV_CTL_TLVO_LEN] = 2 * sizeof(unsigned int);
        tlv[SNDRV_CTL_TLVO_DB_SCALE_MIN] = -nums * step;
        tlv[SNDRV_CTL_TLVO_DB_SCALE_MUTE_AND_STEP] = step;
}
EXPORT_SYMBOL_GPL(snd_hda_set_vmaster_tlv);

/* find a mixer control element with the given name */
static struct snd_kcontrol *
find_mixer_ctl(struct hda_codec *codec, const char *name, int dev, int idx)
{
        struct snd_ctl_elem_id id;
        memset(&id, 0, sizeof(id));
        id.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
        id.device = dev;
        id.index = idx;
        if (snd_BUG_ON(strlen(name) >= sizeof(id.name)))
                return NULL;
        strcpy(id.name, name);
        return snd_ctl_find_id(codec->card, &id);
}

/**
 * snd_hda_find_mixer_ctl - Find a mixer control element with the given name
 * @codec: HD-audio codec
 * @name: ctl id name string
 *
 * Get the control element with the given id string and IFACE_MIXER.
 */
struct snd_kcontrol *snd_hda_find_mixer_ctl(struct hda_codec *codec,
                                            const char *name)
{
        return find_mixer_ctl(codec, name, 0, 0);
}
EXPORT_SYMBOL_GPL(snd_hda_find_mixer_ctl);

static int find_empty_mixer_ctl_idx(struct hda_codec *codec, const char *name,
                                    int start_idx)
{
        int i, idx;
        /* 16 ctlrs should be large enough */
        for (i = 0, idx = start_idx; i < 16; i++, idx++) {
                if (!find_mixer_ctl(codec, name, 0, idx))
                        return idx;
        }
        return -EBUSY;
}

/**
 * snd_hda_ctl_add - Add a control element and assign to the codec
 * @codec: HD-audio codec
 * @nid: corresponding NID (optional)
 * @kctl: the control element to assign
 *
 * Add the given control element to an array inside the codec instance.
 * All control elements belonging to a codec are supposed to be added
 * by this function so that a proper clean-up works at the free or
 * reconfiguration time.
 *
 * If non-zero @nid is passed, the NID is assigned to the control element.
 * The assignment is shown in the codec proc file.
 *
 * snd_hda_ctl_add() checks the control subdev id field whether
 * #HDA_SUBDEV_NID_FLAG bit is set.  If set (and @nid is zero), the lower
 * bits value is taken as the NID to assign. The #HDA_NID_ITEM_AMP bit
 * specifies if kctl->private_value is a HDA amplifier value.
 */
int snd_hda_ctl_add(struct hda_codec *codec, hda_nid_t nid,
                    struct snd_kcontrol *kctl)
{
        int err;
        unsigned short flags = 0;
        struct hda_nid_item *item;

        if (kctl->id.subdevice & HDA_SUBDEV_AMP_FLAG) {
                flags |= HDA_NID_ITEM_AMP;
                if (nid == 0)
                        nid = get_amp_nid_(kctl->private_value);
        }
        if ((kctl->id.subdevice & HDA_SUBDEV_NID_FLAG) != 0 && nid == 0)
                nid = kctl->id.subdevice & 0xffff;
        if (kctl->id.subdevice & (HDA_SUBDEV_NID_FLAG|HDA_SUBDEV_AMP_FLAG))
                kctl->id.subdevice = 0;
        err = snd_ctl_add(codec->card, kctl);
        if (err < 0)
                return err;
        item = snd_array_new(&codec->mixers);
        if (!item)
                return -ENOMEM;
        item->kctl = kctl;
        item->nid = nid;
        item->flags = flags;
        return 0;
}
EXPORT_SYMBOL_GPL(snd_hda_ctl_add);

/**
 * snd_hda_add_nid - Assign a NID to a control element
 * @codec: HD-audio codec
 * @nid: corresponding NID (optional)
 * @kctl: the control element to assign
 * @index: index to kctl
 *
 * Add the given control element to an array inside the codec instance.
 * This function is used when #snd_hda_ctl_add cannot be used for 1:1
 * NID:KCTL mapping - for example "Capture Source" selector.
 */
int snd_hda_add_nid(struct hda_codec *codec, struct snd_kcontrol *kctl,
                    unsigned int index, hda_nid_t nid)
{
        struct hda_nid_item *item;

        if (nid > 0) {
                item = snd_array_new(&codec->nids);
                if (!item)
                        return -ENOMEM;
                item->kctl = kctl;
                item->index = index;
                item->nid = nid;
                return 0;
        }
        codec_err(codec, "no NID for mapping control %s:%d:%d\n",
                  kctl->id.name, kctl->id.index, index);
        return -EINVAL;
}
EXPORT_SYMBOL_GPL(snd_hda_add_nid);

/**
 * snd_hda_ctls_clear - Clear all controls assigned to the given codec
 * @codec: HD-audio codec
 */
void snd_hda_ctls_clear(struct hda_codec *codec)
{
        int i;
        struct hda_nid_item *items = codec->mixers.list;
        for (i = 0; i < codec->mixers.used; i++)
                snd_ctl_remove(codec->card, items[i].kctl);
        snd_array_free(&codec->mixers);
        snd_array_free(&codec->nids);
}

/**
 * snd_hda_lock_devices - pseudo device locking
 * @bus: the BUS
 *
 * toggle card->shutdown to allow/disallow the device access (as a hack)
 */
int snd_hda_lock_devices(struct hda_bus *bus)
{
        struct snd_card *card = bus->card;
        struct hda_codec *codec;

        spin_lock(&card->files_lock);
        if (card->shutdown)
                goto err_unlock;
        card->shutdown = 1;
        if (!list_empty(&card->ctl_files))
                goto err_clear;

        list_for_each_codec(codec, bus) {
                struct hda_pcm *cpcm;
                list_for_each_entry(cpcm, &codec->pcm_list_head, list) {
                        if (!cpcm->pcm)
                                continue;
                        if (cpcm->pcm->streams[0].substream_opened ||
                            cpcm->pcm->streams[1].substream_opened)
                                goto err_clear;
                }
        }
        spin_unlock(&card->files_lock);
        return 0;

 err_clear:
        card->shutdown = 0;
 err_unlock:
        spin_unlock(&card->files_lock);
        return -EINVAL;
}
EXPORT_SYMBOL_GPL(snd_hda_lock_devices);

/**
 * snd_hda_unlock_devices - pseudo device unlocking
 * @bus: the BUS
 */
void snd_hda_unlock_devices(struct hda_bus *bus)
{
        struct snd_card *card = bus->card;

        spin_lock(&card->files_lock);
        card->shutdown = 0;
        spin_unlock(&card->files_lock);
}
EXPORT_SYMBOL_GPL(snd_hda_unlock_devices);

/**
 * snd_hda_codec_reset - Clear all objects assigned to the codec
 * @codec: HD-audio codec
 *
 * This frees the all PCM and control elements assigned to the codec, and
 * clears the caches and restores the pin default configurations.
 *
 * When a device is being used, it returns -EBSY.  If successfully freed,
 * returns zero.
 */
int snd_hda_codec_reset(struct hda_codec *codec)
{
        struct hda_bus *bus = codec->bus;

        if (snd_hda_lock_devices(bus) < 0)
                return -EBUSY;

        /* OK, let it free */
        device_release_driver(hda_codec_dev(codec));

        /* allow device access again */
        snd_hda_unlock_devices(bus);
        return 0;
}

typedef int (*map_follower_func_t)(struct hda_codec *, void *, struct snd_kcontrol *);

/* apply the function to all matching follower ctls in the mixer list */
static int map_followers(struct hda_codec *codec, const char * const *followers,
                         const char *suffix, map_follower_func_t func, void *data)
{
        struct hda_nid_item *items;
        const char * const *s;
        int i, err;

        items = codec->mixers.list;
        for (i = 0; i < codec->mixers.used; i++) {
                struct snd_kcontrol *sctl = items[i].kctl;
                if (!sctl || sctl->id.iface != SNDRV_CTL_ELEM_IFACE_MIXER)
                        continue;
                for (s = followers; *s; s++) {
                        char tmpname[sizeof(sctl->id.name)];
                        const char *name = *s;
                        if (suffix) {
                                snprintf(tmpname, sizeof(tmpname), "%s %s",
                                         name, suffix);
                                name = tmpname;
                        }
                        if (!strcmp(sctl->id.name, name)) {
                                err = func(codec, data, sctl);
                                if (err)
                                        return err;
                                break;
                        }
                }
        }
        return 0;
}

static int check_follower_present(struct hda_codec *codec,
                                  void *data, struct snd_kcontrol *sctl)
{
        return 1;
}

/* call kctl->put with the given value(s) */
static int put_kctl_with_value(struct snd_kcontrol *kctl, int val)
{
        struct snd_ctl_elem_value *ucontrol;
        ucontrol = kzalloc(sizeof(*ucontrol), GFP_KERNEL);
        if (!ucontrol)
                return -ENOMEM;
        ucontrol->value.integer.value[0] = val;
        ucontrol->value.integer.value[1] = val;
        kctl->put(kctl, ucontrol);
        kfree(ucontrol);
        return 0;
}

struct follower_init_arg {
        struct hda_codec *codec;
        int step;
};

/* initialize the follower volume with 0dB via snd_ctl_apply_vmaster_followers() */
static int init_follower_0dB(struct snd_kcontrol *follower,
                             struct snd_kcontrol *kctl,
                             void *_arg)
{
        struct follower_init_arg *arg = _arg;
        int _tlv[4];
        const int *tlv = NULL;
        int step;
        int val;

        if (kctl->vd[0].access & SNDRV_CTL_ELEM_ACCESS_TLV_CALLBACK) {
                if (kctl->tlv.c != snd_hda_mixer_amp_tlv) {
                        codec_err(arg->codec,
                                  "Unexpected TLV callback for follower %s:%d\n",
                                  kctl->id.name, kctl->id.index);
                        return 0; /* ignore */
                }
                get_ctl_amp_tlv(kctl, _tlv);
                tlv = _tlv;
        } else if (kctl->vd[0].access & SNDRV_CTL_ELEM_ACCESS_TLV_READ)
                tlv = kctl->tlv.p;

        if (!tlv || tlv[SNDRV_CTL_TLVO_TYPE] != SNDRV_CTL_TLVT_DB_SCALE)
                return 0;

        step = tlv[SNDRV_CTL_TLVO_DB_SCALE_MUTE_AND_STEP];
        step &= ~TLV_DB_SCALE_MUTE;
        if (!step)
                return 0;
        if (arg->step && arg->step != step) {
                codec_err(arg->codec,
                          "Mismatching dB step for vmaster follower (%d!=%d)\n",
                          arg->step, step);
                return 0;
        }

        arg->step = step;
        val = -tlv[SNDRV_CTL_TLVO_DB_SCALE_MIN] / step;
        if (val > 0) {
                put_kctl_with_value(follower, val);
                return val;
        }

        return 0;
}

/* unmute the follower via snd_ctl_apply_vmaster_followers() */
static int init_follower_unmute(struct snd_kcontrol *follower,
                                struct snd_kcontrol *kctl,
                                void *_arg)
{
        return put_kctl_with_value(follower, 1);
}

static int add_follower(struct hda_codec *codec,
                        void *data, struct snd_kcontrol *follower)
{
        return snd_ctl_add_follower(data, follower);
}

/**
 * __snd_hda_add_vmaster - create a virtual master control and add followers
 * @codec: HD-audio codec
 * @name: vmaster control name
 * @tlv: TLV data (optional)
 * @followers: follower control names (optional)
 * @suffix: suffix string to each follower name (optional)
 * @init_follower_vol: initialize followers to unmute/0dB
 * @access: kcontrol access rights
 * @ctl_ret: store the vmaster kcontrol in return
 *
 * Create a virtual master control with the given name.  The TLV data
 * must be either NULL or a valid data.
 *
 * @followers is a NULL-terminated array of strings, each of which is a
 * follower control name.  All controls with these names are assigned to
 * the new virtual master control.
 *
 * This function returns zero if successful or a negative error code.
 */
int __snd_hda_add_vmaster(struct hda_codec *codec, char *name,
                          unsigned int *tlv, const char * const *followers,
                          const char *suffix, bool init_follower_vol,
                          unsigned int access, struct snd_kcontrol **ctl_ret)
{
        struct snd_kcontrol *kctl;
        int err;

        if (ctl_ret)
                *ctl_ret = NULL;

        err = map_followers(codec, followers, suffix, check_follower_present, NULL);
        if (err != 1) {
                codec_dbg(codec, "No follower found for %s\n", name);
                return 0;
        }
        kctl = snd_ctl_make_virtual_master(name, tlv);
        if (!kctl)
                return -ENOMEM;
        kctl->vd[0].access |= access;
        err = snd_hda_ctl_add(codec, 0, kctl);
        if (err < 0)
                return err;

        err = map_followers(codec, followers, suffix, add_follower, kctl);
        if (err < 0)
                return err;

        /* init with master mute & zero volume */
        put_kctl_with_value(kctl, 0);
        if (init_follower_vol) {
                struct follower_init_arg arg = {
                        .codec = codec,
                        .step = 0,
                };
                snd_ctl_apply_vmaster_followers(kctl,
                                                tlv ? init_follower_0dB : init_follower_unmute,
                                                &arg);
        }

        if (ctl_ret)
                *ctl_ret = kctl;
        return 0;
}
EXPORT_SYMBOL_GPL(__snd_hda_add_vmaster);

/* meta hook to call each driver's vmaster hook */
static void vmaster_hook(void *private_data, int enabled)