/*
   * soc-dapm.c  --  ALSA SoC Dynamic Audio Power Management
   *
   * Copyright 2005 Wolfson Microelectronics PLC.

   * Author: Liam Girdwood <lrg@slimlogic.co.uk>

   *
   *  This program is free software; you can redistribute  it and/or modify it
   *  under  the terms of  the GNU General  Public License as published by the
   *  Free Software Foundation;  either version 2 of the  License, or (at your
   *  option) any later version.
   *

   *  Features:
   *    o Changes power status of internal codec blocks depending on the
   *      dynamic configuration of codec internal audio paths and active

   *      DACs/ADCs.

   *    o Platform power domain - can support external components i.e. amps and
   *      mic/meadphone insertion events.
   *    o Automatic Mic Bias support
   *    o Jack insertion power event initiation - e.g. hp insertion will enable
   *      sinks, dacs, etc

   *    o Delayed powerdown of audio susbsystem to reduce pops between a quick

   *      device reopen.
   *
   *  Todo:
   *    o DAPM power change sequencing - allow for configurable per
   *      codec sequences.
   *    o Support for analogue bias optimisation.
   *    o Support for reduced codec oversampling rates.
   *    o Support for reduced codec bias currents.
   */
  
  #include <linux/module.h>
  #include <linux/moduleparam.h>
  #include <linux/init.h>

  #include <linux/async.h>

  #include <linux/delay.h>
  #include <linux/pm.h>
  #include <linux/bitops.h>
  #include <linux/platform_device.h>
  #include <linux/jiffies.h>

  #include <linux/debugfs.h>

  #include <linux/pm_runtime.h>

  #include <linux/slab.h>

  #include <sound/core.h>
  #include <sound/pcm.h>
  #include <sound/pcm_params.h>

  #include <sound/soc.h>

  #include <sound/initval.h>

  #include <trace/events/asoc.h>

  #define DAPM_UPDATE_STAT(widget, val) widget->dapm->card->dapm_stats.val++;

  /* dapm power sequences - make this per codec in the future */
  static int dapm_up_seq[] = {

  	[snd_soc_dapm_pre] = 0,
  	[snd_soc_dapm_supply] = 1,
  	[snd_soc_dapm_micbias] = 2,

  	[snd_soc_dapm_aif_in] = 3,
  	[snd_soc_dapm_aif_out] = 3,
  	[snd_soc_dapm_mic] = 4,
  	[snd_soc_dapm_mux] = 5,

  	[snd_soc_dapm_virt_mux] = 5,

  	[snd_soc_dapm_value_mux] = 5,
  	[snd_soc_dapm_dac] = 6,
  	[snd_soc_dapm_mixer] = 7,
  	[snd_soc_dapm_mixer_named_ctl] = 7,
  	[snd_soc_dapm_pga] = 8,
  	[snd_soc_dapm_adc] = 9,

  	[snd_soc_dapm_out_drv] = 10,

  	[snd_soc_dapm_hp] = 10,
  	[snd_soc_dapm_spk] = 10,
  	[snd_soc_dapm_post] = 11,

  };

  static int dapm_down_seq[] = {

  	[snd_soc_dapm_pre] = 0,
  	[snd_soc_dapm_adc] = 1,
  	[snd_soc_dapm_hp] = 2,

  	[snd_soc_dapm_spk] = 2,

  	[snd_soc_dapm_out_drv] = 2,

  	[snd_soc_dapm_pga] = 4,
  	[snd_soc_dapm_mixer_named_ctl] = 5,

  	[snd_soc_dapm_mixer] = 5,
  	[snd_soc_dapm_dac] = 6,
  	[snd_soc_dapm_mic] = 7,
  	[snd_soc_dapm_micbias] = 8,
  	[snd_soc_dapm_mux] = 9,

  	[snd_soc_dapm_virt_mux] = 9,

  	[snd_soc_dapm_value_mux] = 9,

  	[snd_soc_dapm_aif_in] = 10,
  	[snd_soc_dapm_aif_out] = 10,
  	[snd_soc_dapm_supply] = 11,
  	[snd_soc_dapm_post] = 12,

  };

  static void pop_wait(u32 pop_time)

  {
  	if (pop_time)
  		schedule_timeout_uninterruptible(msecs_to_jiffies(pop_time));
  }

  static void pop_dbg(struct device *dev, u32 pop_time, const char *fmt, ...)

  {
  	va_list args;

  	char *buf;

  	if (!pop_time)
  		return;

  	buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
  	if (buf == NULL)
  		return;

  	va_start(args, fmt);
  	vsnprintf(buf, PAGE_SIZE, fmt, args);

  	dev_info(dev, "%s", buf);

  	va_end(args);

  
  	kfree(buf);

  }

  static bool dapm_dirty_widget(struct snd_soc_dapm_widget *w)
  {
  	return !list_empty(&w->dirty);
  }

  void dapm_mark_dirty(struct snd_soc_dapm_widget *w, const char *reason)

  {

  	if (!dapm_dirty_widget(w)) {
  		dev_vdbg(w->dapm->dev, "Marking %s dirty due to %s
  ",
  			 w->name, reason);

  		list_add_tail(&w->dirty, &w->dapm->card->dapm_dirty);

  	}

  }

  EXPORT_SYMBOL_GPL(dapm_mark_dirty);

  /* create a new dapm widget */

  static inline struct snd_soc_dapm_widget *dapm_cnew_widget(

  	const struct snd_soc_dapm_widget *_widget)
  {

  	return kmemdup(_widget, sizeof(*_widget), GFP_KERNEL);

  }

  /* get snd_card from DAPM context */
  static inline struct snd_card *dapm_get_snd_card(
  	struct snd_soc_dapm_context *dapm)
  {
  	if (dapm->codec)
  		return dapm->codec->card->snd_card;
  	else if (dapm->platform)
  		return dapm->platform->card->snd_card;
  	else
  		BUG();
  
  	/* unreachable */
  	return NULL;
  }
  
  /* get soc_card from DAPM context */
  static inline struct snd_soc_card *dapm_get_soc_card(
  		struct snd_soc_dapm_context *dapm)
  {
  	if (dapm->codec)
  		return dapm->codec->card;
  	else if (dapm->platform)
  		return dapm->platform->card;
  	else
  		BUG();
  
  	/* unreachable */
  	return NULL;
  }

  static int soc_widget_read(struct snd_soc_dapm_widget *w, int reg)
  {
  	if (w->codec)
  		return snd_soc_read(w->codec, reg);

  	else if (w->platform)
  		return snd_soc_platform_read(w->platform, reg);
  
  	dev_err(w->dapm->dev, "no valid widget read method
  ");
  	return -1;

  }
  
  static int soc_widget_write(struct snd_soc_dapm_widget *w, int reg, int val)
  {
  	if (w->codec)
  		return snd_soc_write(w->codec, reg, val);

  	else if (w->platform)
  		return snd_soc_platform_write(w->platform, reg, val);
  
  	dev_err(w->dapm->dev, "no valid widget write method
  ");
  	return -1;

  }
  
  static int soc_widget_update_bits(struct snd_soc_dapm_widget *w,
  	unsigned short reg, unsigned int mask, unsigned int value)
  {
  	int change;
  	unsigned int old, new;
  	int ret;
  
  	ret = soc_widget_read(w, reg);
  	if (ret < 0)
  		return ret;
  
  	old = ret;
  	new = (old & ~mask) | (value & mask);
  	change = old != new;
  	if (change) {
  		ret = soc_widget_write(w, reg, new);
  		if (ret < 0)
  			return ret;
  	}
  
  	return change;
  }

  /**
   * snd_soc_dapm_set_bias_level - set the bias level for the system

   * @dapm: DAPM context

   * @level: level to configure
   *
   * Configure the bias (power) levels for the SoC audio device.
   *
   * Returns 0 for success else error.
   */

  static int snd_soc_dapm_set_bias_level(struct snd_soc_dapm_context *dapm,

  				       enum snd_soc_bias_level level)

  {

  	struct snd_soc_card *card = dapm->card;

  	int ret = 0;

  	trace_snd_soc_bias_level_start(card, level);

  	if (card && card->set_bias_level)

  		ret = card->set_bias_level(card, dapm, level);

  	if (ret != 0)
  		goto out;

  	if (dapm->codec) {
  		if (dapm->codec->driver->set_bias_level)
  			ret = dapm->codec->driver->set_bias_level(dapm->codec,
  								  level);
  		else
  			dapm->bias_level = level;
  	}

  	if (ret != 0)
  		goto out;
  
  	if (card && card->set_bias_level_post)

  		ret = card->set_bias_level_post(card, dapm, level);

  out:

  	trace_snd_soc_bias_level_done(card, level);

  	return ret;
  }

  /* set up initial codec paths */
  static void dapm_set_path_status(struct snd_soc_dapm_widget *w,
  	struct snd_soc_dapm_path *p, int i)
  {
  	switch (w->id) {
  	case snd_soc_dapm_switch:

  	case snd_soc_dapm_mixer:
  	case snd_soc_dapm_mixer_named_ctl: {

  		int val;

  		struct soc_mixer_control *mc = (struct soc_mixer_control *)

  			w->kcontrol_news[i].private_value;

  		unsigned int reg = mc->reg;
  		unsigned int shift = mc->shift;

  		int max = mc->max;

  		unsigned int mask = (1 << fls(max)) - 1;
  		unsigned int invert = mc->invert;

  		val = soc_widget_read(w, reg);

  		val = (val >> shift) & mask;
  
  		if ((invert && !val) || (!invert && val))
  			p->connect = 1;
  		else
  			p->connect = 0;
  	}
  	break;
  	case snd_soc_dapm_mux: {

  		struct soc_enum *e = (struct soc_enum *)
  			w->kcontrol_news[i].private_value;

  		int val, item, bitmask;

  		for (bitmask = 1; bitmask < e->max; bitmask <<= 1)

  			;

  		val = soc_widget_read(w, e->reg);

  		item = (val >> e->shift_l) & (bitmask - 1);
  
  		p->connect = 0;

  		for (i = 0; i < e->max; i++) {

  			if (!(strcmp(p->name, e->texts[i])) && item == i)
  				p->connect = 1;
  		}
  	}
  	break;

  	case snd_soc_dapm_virt_mux: {

  		struct soc_enum *e = (struct soc_enum *)
  			w->kcontrol_news[i].private_value;

  
  		p->connect = 0;
  		/* since a virtual mux has no backing registers to
  		 * decide which path to connect, it will try to match
  		 * with the first enumeration.  This is to ensure
  		 * that the default mux choice (the first) will be
  		 * correctly powered up during initialization.
  		 */
  		if (!strcmp(p->name, e->texts[0]))
  			p->connect = 1;
  	}
  	break;

  	case snd_soc_dapm_value_mux: {

  		struct soc_enum *e = (struct soc_enum *)

  			w->kcontrol_news[i].private_value;

  		int val, item;

  		val = soc_widget_read(w, e->reg);

  		val = (val >> e->shift_l) & e->mask;
  		for (item = 0; item < e->max; item++) {
  			if (val == e->values[item])
  				break;
  		}
  
  		p->connect = 0;
  		for (i = 0; i < e->max; i++) {
  			if (!(strcmp(p->name, e->texts[i])) && item == i)
  				p->connect = 1;
  		}
  	}
  	break;

  	/* does not affect routing - always connected */

  	case snd_soc_dapm_pga:

  	case snd_soc_dapm_out_drv:

  	case snd_soc_dapm_output:
  	case snd_soc_dapm_adc:
  	case snd_soc_dapm_input:

  	case snd_soc_dapm_siggen:

  	case snd_soc_dapm_dac:
  	case snd_soc_dapm_micbias:
  	case snd_soc_dapm_vmid:

  	case snd_soc_dapm_supply:

  	case snd_soc_dapm_aif_in:
  	case snd_soc_dapm_aif_out:

  	case snd_soc_dapm_hp:
  	case snd_soc_dapm_mic:
  	case snd_soc_dapm_spk:
  	case snd_soc_dapm_line:

  		p->connect = 1;
  	break;
  	/* does affect routing - dynamically connected */

  	case snd_soc_dapm_pre:
  	case snd_soc_dapm_post:
  		p->connect = 0;
  	break;
  	}
  }

  /* connect mux widget to its interconnecting audio paths */

  static int dapm_connect_mux(struct snd_soc_dapm_context *dapm,

  	struct snd_soc_dapm_widget *src, struct snd_soc_dapm_widget *dest,
  	struct snd_soc_dapm_path *path, const char *control_name,
  	const struct snd_kcontrol_new *kcontrol)
  {
  	struct soc_enum *e = (struct soc_enum *)kcontrol->private_value;
  	int i;

  	for (i = 0; i < e->max; i++) {

  		if (!(strcmp(control_name, e->texts[i]))) {

  			list_add(&path->list, &dapm->card->paths);

  			list_add(&path->list_sink, &dest->sources);
  			list_add(&path->list_source, &src->sinks);
  			path->name = (char*)e->texts[i];
  			dapm_set_path_status(dest, path, 0);
  			return 0;
  		}
  	}
  
  	return -ENODEV;
  }

  /* connect mixer widget to its interconnecting audio paths */

  static int dapm_connect_mixer(struct snd_soc_dapm_context *dapm,

  	struct snd_soc_dapm_widget *src, struct snd_soc_dapm_widget *dest,
  	struct snd_soc_dapm_path *path, const char *control_name)
  {
  	int i;
  
  	/* search for mixer kcontrol */
  	for (i = 0; i < dest->num_kcontrols; i++) {

  		if (!strcmp(control_name, dest->kcontrol_news[i].name)) {

  			list_add(&path->list, &dapm->card->paths);

  			list_add(&path->list_sink, &dest->sources);
  			list_add(&path->list_source, &src->sinks);

  			path->name = dest->kcontrol_news[i].name;

  			dapm_set_path_status(dest, path, i);
  			return 0;
  		}
  	}
  	return -ENODEV;
  }

  static int dapm_is_shared_kcontrol(struct snd_soc_dapm_context *dapm,

  	struct snd_soc_dapm_widget *kcontrolw,

  	const struct snd_kcontrol_new *kcontrol_new,
  	struct snd_kcontrol **kcontrol)
  {
  	struct snd_soc_dapm_widget *w;
  	int i;
  
  	*kcontrol = NULL;
  
  	list_for_each_entry(w, &dapm->card->widgets, list) {

  		if (w == kcontrolw || w->dapm != kcontrolw->dapm)
  			continue;

  		for (i = 0; i < w->num_kcontrols; i++) {
  			if (&w->kcontrol_news[i] == kcontrol_new) {
  				if (w->kcontrols)
  					*kcontrol = w->kcontrols[i];
  				return 1;
  			}
  		}
  	}
  
  	return 0;
  }

  /* create new dapm mixer control */

  static int dapm_new_mixer(struct snd_soc_dapm_widget *w)

  {

  	struct snd_soc_dapm_context *dapm = w->dapm;

  	int i, ret = 0;

  	size_t name_len, prefix_len;

  	struct snd_soc_dapm_path *path;

  	struct snd_card *card = dapm->card->snd_card;

  	const char *prefix;

  	struct snd_soc_dapm_widget_list *wlist;
  	size_t wlistsize;

  
  	if (dapm->codec)
  		prefix = dapm->codec->name_prefix;
  	else
  		prefix = NULL;

  	if (prefix)
  		prefix_len = strlen(prefix) + 1;
  	else
  		prefix_len = 0;

  	/* add kcontrol */
  	for (i = 0; i < w->num_kcontrols; i++) {
  
  		/* match name */
  		list_for_each_entry(path, &w->sources, list_sink) {
  
  			/* mixer/mux paths name must match control name */

  			if (path->name != (char *)w->kcontrol_news[i].name)

  				continue;

  			if (w->kcontrols[i]) {
  				path->kcontrol = w->kcontrols[i];
  				continue;
  			}

  			wlistsize = sizeof(struct snd_soc_dapm_widget_list) +
  				    sizeof(struct snd_soc_dapm_widget *),
  			wlist = kzalloc(wlistsize, GFP_KERNEL);
  			if (wlist == NULL) {
  				dev_err(dapm->dev,
  					"asoc: can't allocate widget list for %s
  ",
  					w->name);
  				return -ENOMEM;
  			}
  			wlist->num_widgets = 1;
  			wlist->widgets[0] = w;

  			/* add dapm control with long name.
  			 * for dapm_mixer this is the concatenation of the
  			 * mixer and kcontrol name.
  			 * for dapm_mixer_named_ctl this is simply the
  			 * kcontrol name.
  			 */

  			name_len = strlen(w->kcontrol_news[i].name) + 1;

  			if (w->id != snd_soc_dapm_mixer_named_ctl)

  				name_len += 1 + strlen(w->name);

  			path->long_name = kmalloc(name_len, GFP_KERNEL);

  			if (path->long_name == NULL) {
  				kfree(wlist);

  				return -ENOMEM;

  			}

  			switch (w->id) {

  			default:

  				/* The control will get a prefix from
  				 * the control creation process but
  				 * we're also using the same prefix
  				 * for widgets so cut the prefix off
  				 * the front of the widget name.
  				 */

  				snprintf(path->long_name, name_len, "%s %s",

  					 w->name + prefix_len,

  					 w->kcontrol_news[i].name);

  				break;

  			case snd_soc_dapm_mixer_named_ctl:
  				snprintf(path->long_name, name_len, "%s",

  					 w->kcontrol_news[i].name);

  				break;

  			}

  			path->long_name[name_len - 1] = '\0';

  			path->kcontrol = snd_soc_cnew(&w->kcontrol_news[i],
  						      wlist, path->long_name,
  						      prefix);

  			ret = snd_ctl_add(card, path->kcontrol);

  			if (ret < 0) {

  				dev_err(dapm->dev,
  					"asoc: failed to add dapm kcontrol %s: %d
  ",
  					path->long_name, ret);

  				kfree(wlist);

  				kfree(path->long_name);
  				path->long_name = NULL;
  				return ret;
  			}

  			w->kcontrols[i] = path->kcontrol;

  		}
  	}
  	return ret;
  }
  
  /* create new dapm mux control */

  static int dapm_new_mux(struct snd_soc_dapm_widget *w)

  {

  	struct snd_soc_dapm_context *dapm = w->dapm;

  	struct snd_soc_dapm_path *path = NULL;
  	struct snd_kcontrol *kcontrol;

  	struct snd_card *card = dapm->card->snd_card;

  	const char *prefix;

  	size_t prefix_len;

  	int ret;

  	struct snd_soc_dapm_widget_list *wlist;

  	int shared, wlistentries;

  	size_t wlistsize;

  	char *name;

  	if (w->num_kcontrols != 1) {
  		dev_err(dapm->dev,
  			"asoc: mux %s has incorrect number of controls
  ",
  			w->name);

  		return -EINVAL;
  	}

  	shared = dapm_is_shared_kcontrol(dapm, w, &w->kcontrol_news[0],

  					 &kcontrol);
  	if (kcontrol) {
  		wlist = kcontrol->private_data;
  		wlistentries = wlist->num_widgets + 1;
  	} else {
  		wlist = NULL;
  		wlistentries = 1;
  	}

  	wlistsize = sizeof(struct snd_soc_dapm_widget_list) +

  		wlistentries * sizeof(struct snd_soc_dapm_widget *),
  	wlist = krealloc(wlist, wlistsize, GFP_KERNEL);

  	if (wlist == NULL) {
  		dev_err(dapm->dev,
  			"asoc: can't allocate widget list for %s
  ", w->name);
  		return -ENOMEM;
  	}

  	wlist->num_widgets = wlistentries;
  	wlist->widgets[wlistentries - 1] = w;

  	if (!kcontrol) {
  		if (dapm->codec)
  			prefix = dapm->codec->name_prefix;
  		else
  			prefix = NULL;
  
  		if (shared) {
  			name = w->kcontrol_news[0].name;
  			prefix_len = 0;
  		} else {
  			name = w->name;
  			if (prefix)
  				prefix_len = strlen(prefix) + 1;
  			else
  				prefix_len = 0;
  		}

  		/*
  		 * The control will get a prefix from the control creation
  		 * process but we're also using the same prefix for widgets so
  		 * cut the prefix off the front of the widget name.
  		 */
  		kcontrol = snd_soc_cnew(&w->kcontrol_news[0], wlist,
  					name + prefix_len, prefix);
  		ret = snd_ctl_add(card, kcontrol);
  		if (ret < 0) {

  			dev_err(dapm->dev, "failed to add kcontrol %s: %d
  ",
  				w->name, ret);

  			kfree(wlist);
  			return ret;
  		}
  	}

  	kcontrol->private_data = wlist;

  	w->kcontrols[0] = kcontrol;

  	list_for_each_entry(path, &w->sources, list_sink)
  		path->kcontrol = kcontrol;

  	return 0;

  }
  
  /* create new dapm volume control */

  static int dapm_new_pga(struct snd_soc_dapm_widget *w)

  {

  	if (w->num_kcontrols)

  		dev_err(w->dapm->dev,
  			"asoc: PGA controls not supported: '%s'
  ", w->name);

  	return 0;

  }
  
  /* reset 'walked' bit for each dapm path */

  static inline void dapm_clear_walk(struct snd_soc_dapm_context *dapm)

  {
  	struct snd_soc_dapm_path *p;

  	list_for_each_entry(p, &dapm->card->paths, list)

  		p->walked = 0;
  }

  /* We implement power down on suspend by checking the power state of
   * the ALSA card - when we are suspending the ALSA state for the card
   * is set to D3.
   */
  static int snd_soc_dapm_suspend_check(struct snd_soc_dapm_widget *widget)
  {

  	int level = snd_power_get_state(widget->dapm->card->snd_card);

  	switch (level) {

  	case SNDRV_CTL_POWER_D3hot:
  	case SNDRV_CTL_POWER_D3cold:

  		if (widget->ignore_suspend)

  			dev_dbg(widget->dapm->dev, "%s ignoring suspend
  ",
  				widget->name);

  		return widget->ignore_suspend;

  	default:
  		return 1;
  	}
  }

  /*
   * Recursively check for a completed path to an active or physically connected
   * output widget. Returns number of complete paths.
   */
  static int is_connected_output_ep(struct snd_soc_dapm_widget *widget)
  {
  	struct snd_soc_dapm_path *path;
  	int con = 0;

  	if (widget->outputs >= 0)
  		return widget->outputs;

  	DAPM_UPDATE_STAT(widget, path_checks);

  	if (widget->id == snd_soc_dapm_supply)
  		return 0;

  	switch (widget->id) {
  	case snd_soc_dapm_adc:
  	case snd_soc_dapm_aif_out:

  		if (widget->active) {
  			widget->outputs = snd_soc_dapm_suspend_check(widget);
  			return widget->outputs;
  		}

  	default:
  		break;
  	}

  
  	if (widget->connected) {
  		/* connected pin ? */

  		if (widget->id == snd_soc_dapm_output && !widget->ext) {
  			widget->outputs = snd_soc_dapm_suspend_check(widget);
  			return widget->outputs;
  		}

  
  		/* connected jack or spk ? */

  		if (widget->id == snd_soc_dapm_hp ||
  		    widget->id == snd_soc_dapm_spk ||
  		    (widget->id == snd_soc_dapm_line &&
  		     !list_empty(&widget->sources))) {
  			widget->outputs = snd_soc_dapm_suspend_check(widget);
  			return widget->outputs;
  		}

  	}
  
  	list_for_each_entry(path, &widget->sinks, list_source) {

  		DAPM_UPDATE_STAT(widget, neighbour_checks);

  		if (path->weak)
  			continue;

  		if (path->walked)
  			continue;
  
  		if (path->sink && path->connect) {
  			path->walked = 1;
  			con += is_connected_output_ep(path->sink);
  		}
  	}

  	widget->outputs = con;

  	return con;
  }
  
  /*
   * Recursively check for a completed path to an active or physically connected
   * input widget. Returns number of complete paths.
   */
  static int is_connected_input_ep(struct snd_soc_dapm_widget *widget)
  {
  	struct snd_soc_dapm_path *path;
  	int con = 0;

  	if (widget->inputs >= 0)
  		return widget->inputs;

  	DAPM_UPDATE_STAT(widget, path_checks);

  	if (widget->id == snd_soc_dapm_supply)
  		return 0;

  	/* active stream ? */

  	switch (widget->id) {
  	case snd_soc_dapm_dac:
  	case snd_soc_dapm_aif_in:

  		if (widget->active) {
  			widget->inputs = snd_soc_dapm_suspend_check(widget);
  			return widget->inputs;
  		}

  	default:
  		break;
  	}

  
  	if (widget->connected) {
  		/* connected pin ? */

  		if (widget->id == snd_soc_dapm_input && !widget->ext) {
  			widget->inputs = snd_soc_dapm_suspend_check(widget);
  			return widget->inputs;
  		}

  
  		/* connected VMID/Bias for lower pops */

  		if (widget->id == snd_soc_dapm_vmid) {
  			widget->inputs = snd_soc_dapm_suspend_check(widget);
  			return widget->inputs;
  		}

  
  		/* connected jack ? */

  		if (widget->id == snd_soc_dapm_mic ||

  		    (widget->id == snd_soc_dapm_line &&
  		     !list_empty(&widget->sinks))) {
  			widget->inputs = snd_soc_dapm_suspend_check(widget);
  			return widget->inputs;
  		}

  		/* signal generator */
  		if (widget->id == snd_soc_dapm_siggen) {
  			widget->inputs = snd_soc_dapm_suspend_check(widget);
  			return widget->inputs;
  		}

  	}
  
  	list_for_each_entry(path, &widget->sources, list_sink) {

  		DAPM_UPDATE_STAT(widget, neighbour_checks);

  		if (path->weak)
  			continue;

  		if (path->walked)
  			continue;
  
  		if (path->source && path->connect) {
  			path->walked = 1;
  			con += is_connected_input_ep(path->source);
  		}
  	}

  	widget->inputs = con;

  	return con;
  }
  
  /*

   * Handler for generic register modifier widget.
   */
  int dapm_reg_event(struct snd_soc_dapm_widget *w,
  		   struct snd_kcontrol *kcontrol, int event)
  {
  	unsigned int val;
  
  	if (SND_SOC_DAPM_EVENT_ON(event))
  		val = w->on_val;
  	else
  		val = w->off_val;

  	soc_widget_update_bits(w, -(w->reg + 1),

  			    w->mask << w->shift, val << w->shift);
  
  	return 0;
  }

  EXPORT_SYMBOL_GPL(dapm_reg_event);

  static int dapm_widget_power_check(struct snd_soc_dapm_widget *w)
  {

  	if (w->power_checked)
  		return w->new_power;

  	if (w->force)

  		w->new_power = 1;

  	else

  		w->new_power = w->power_check(w);
  
  	w->power_checked = true;
  
  	return w->new_power;

  }

  /* Generic check to see if a widget should be powered.
   */
  static int dapm_generic_check_power(struct snd_soc_dapm_widget *w)
  {
  	int in, out;

  	DAPM_UPDATE_STAT(w, power_checks);

  	in = is_connected_input_ep(w);

  	dapm_clear_walk(w->dapm);

  	out = is_connected_output_ep(w);

  	dapm_clear_walk(w->dapm);

  	return out != 0 && in != 0;
  }

  /* Check to see if an ADC has power */
  static int dapm_adc_check_power(struct snd_soc_dapm_widget *w)
  {
  	int in;

  	DAPM_UPDATE_STAT(w, power_checks);

  	if (w->active) {
  		in = is_connected_input_ep(w);

  		dapm_clear_walk(w->dapm);

  		return in != 0;
  	} else {
  		return dapm_generic_check_power(w);
  	}
  }
  
  /* Check to see if a DAC has power */
  static int dapm_dac_check_power(struct snd_soc_dapm_widget *w)
  {
  	int out;

  	DAPM_UPDATE_STAT(w, power_checks);

  	if (w->active) {
  		out = is_connected_output_ep(w);

  		dapm_clear_walk(w->dapm);

  		return out != 0;
  	} else {
  		return dapm_generic_check_power(w);
  	}
  }

  /* Check to see if a power supply is needed */
  static int dapm_supply_check_power(struct snd_soc_dapm_widget *w)
  {
  	struct snd_soc_dapm_path *path;

  	DAPM_UPDATE_STAT(w, power_checks);

  	/* Check if one of our outputs is connected */
  	list_for_each_entry(path, &w->sinks, list_source) {

  		DAPM_UPDATE_STAT(w, neighbour_checks);

  		if (path->weak)
  			continue;

  		if (path->connected &&
  		    !path->connected(path->source, path->sink))
  			continue;

  		if (!path->sink)
  			continue;

  		if (dapm_widget_power_check(path->sink))
  			return 1;

  	}

  	dapm_clear_walk(w->dapm);

  	return 0;

  }

  static int dapm_always_on_check_power(struct snd_soc_dapm_widget *w)
  {
  	return 1;
  }

  static int dapm_seq_compare(struct snd_soc_dapm_widget *a,
  			    struct snd_soc_dapm_widget *b,

  			    bool power_up)

  {

  	int *sort;
  
  	if (power_up)
  		sort = dapm_up_seq;
  	else
  		sort = dapm_down_seq;

  	if (sort[a->id] != sort[b->id])
  		return sort[a->id] - sort[b->id];

  	if (a->subseq != b->subseq) {
  		if (power_up)
  			return a->subseq - b->subseq;
  		else
  			return b->subseq - a->subseq;
  	}

  	if (a->reg != b->reg)
  		return a->reg - b->reg;

  	if (a->dapm != b->dapm)
  		return (unsigned long)a->dapm - (unsigned long)b->dapm;

  	return 0;
  }

  /* Insert a widget in order into a DAPM power sequence. */
  static void dapm_seq_insert(struct snd_soc_dapm_widget *new_widget,
  			    struct list_head *list,

  			    bool power_up)

  {
  	struct snd_soc_dapm_widget *w;
  
  	list_for_each_entry(w, list, power_list)

  		if (dapm_seq_compare(new_widget, w, power_up) < 0) {

  			list_add_tail(&new_widget->power_list, &w->power_list);
  			return;
  		}
  
  	list_add_tail(&new_widget->power_list, list);
  }

  static void dapm_seq_check_event(struct snd_soc_dapm_context *dapm,
  				 struct snd_soc_dapm_widget *w, int event)
  {
  	struct snd_soc_card *card = dapm->card;
  	const char *ev_name;
  	int power, ret;
  
  	switch (event) {
  	case SND_SOC_DAPM_PRE_PMU:
  		ev_name = "PRE_PMU";
  		power = 1;
  		break;
  	case SND_SOC_DAPM_POST_PMU:
  		ev_name = "POST_PMU";
  		power = 1;
  		break;
  	case SND_SOC_DAPM_PRE_PMD:
  		ev_name = "PRE_PMD";
  		power = 0;
  		break;
  	case SND_SOC_DAPM_POST_PMD:
  		ev_name = "POST_PMD";
  		power = 0;
  		break;
  	default:
  		BUG();
  		return;
  	}
  
  	if (w->power != power)
  		return;
  
  	if (w->event && (w->event_flags & event)) {
  		pop_dbg(dapm->dev, card->pop_time, "pop test : %s %s
  ",
  			w->name, ev_name);

  		trace_snd_soc_dapm_widget_event_start(w, event);

  		ret = w->event(w, NULL, event);

  		trace_snd_soc_dapm_widget_event_done(w, event);

  		if (ret < 0)
  			pr_err("%s: %s event failed: %d
  ",
  			       ev_name, w->name, ret);
  	}
  }

  /* Apply the coalesced changes from a DAPM sequence */

  static void dapm_seq_run_coalesced(struct snd_soc_dapm_context *dapm,

  				   struct list_head *pending)

  {

  	struct snd_soc_card *card = dapm->card;

  	struct snd_soc_dapm_widget *w;
  	int reg, power;

  	unsigned int value = 0;
  	unsigned int mask = 0;
  	unsigned int cur_mask;
  
  	reg = list_first_entry(pending, struct snd_soc_dapm_widget,
  			       power_list)->reg;
  
  	list_for_each_entry(w, pending, power_list) {
  		cur_mask = 1 << w->shift;
  		BUG_ON(reg != w->reg);
  
  		if (w->invert)
  			power = !w->power;
  		else
  			power = w->power;
  
  		mask |= cur_mask;
  		if (power)
  			value |= cur_mask;

  		pop_dbg(dapm->dev, card->pop_time,

  			"pop test : Queue %s: reg=0x%x, 0x%x/0x%x
  ",
  			w->name, reg, value, mask);

  		/* Check for events */
  		dapm_seq_check_event(dapm, w, SND_SOC_DAPM_PRE_PMU);
  		dapm_seq_check_event(dapm, w, SND_SOC_DAPM_PRE_PMD);

  	}
  
  	if (reg >= 0) {

  		/* Any widget will do, they should all be updating the
  		 * same register.
  		 */
  		w = list_first_entry(pending, struct snd_soc_dapm_widget,
  				     power_list);

  		pop_dbg(dapm->dev, card->pop_time,

  			"pop test : Applying 0x%x/0x%x to %x in %dms
  ",

  			value, mask, reg, card->pop_time);
  		pop_wait(card->pop_time);

  		soc_widget_update_bits(w, reg, mask, value);

  	}

  	list_for_each_entry(w, pending, power_list) {

  		dapm_seq_check_event(dapm, w, SND_SOC_DAPM_POST_PMU);
  		dapm_seq_check_event(dapm, w, SND_SOC_DAPM_POST_PMD);

  	}

  }

  /* Apply a DAPM power sequence.
   *
   * We walk over a pre-sorted list of widgets to apply power to.  In
   * order to minimise the number of writes to the device required
   * multiple widgets will be updated in a single write where possible.
   * Currently anything that requires more than a single write is not
   * handled.
   */

  static void dapm_seq_run(struct snd_soc_dapm_context *dapm,

  			 struct list_head *list, int event, bool power_up)

  {
  	struct snd_soc_dapm_widget *w, *n;
  	LIST_HEAD(pending);
  	int cur_sort = -1;

  	int cur_subseq = -1;

  	int cur_reg = SND_SOC_NOPM;

  	struct snd_soc_dapm_context *cur_dapm = NULL;

  	int ret, i;

  	int *sort;
  
  	if (power_up)
  		sort = dapm_up_seq;
  	else
  		sort = dapm_down_seq;

  	list_for_each_entry_safe(w, n, list, power_list) {
  		ret = 0;
  
  		/* Do we need to apply any queued changes? */

  		if (sort[w->id] != cur_sort || w->reg != cur_reg ||

  		    w->dapm != cur_dapm || w->subseq != cur_subseq) {

  			if (!list_empty(&pending))

  				dapm_seq_run_coalesced(cur_dapm, &pending);

  			if (cur_dapm && cur_dapm->seq_notifier) {
  				for (i = 0; i < ARRAY_SIZE(dapm_up_seq); i++)
  					if (sort[i] == cur_sort)
  						cur_dapm->seq_notifier(cur_dapm,

  								       i,
  								       cur_subseq);

  			}

  			INIT_LIST_HEAD(&pending);
  			cur_sort = -1;

  			cur_subseq = INT_MIN;

  			cur_reg = SND_SOC_NOPM;

  			cur_dapm = NULL;

  		}

  		switch (w->id) {
  		case snd_soc_dapm_pre:
  			if (!w->event)

  				list_for_each_entry_safe_continue(w, n, list,
  								  power_list);

  			if (event == SND_SOC_DAPM_STREAM_START)

  				ret = w->event(w,
  					       NULL, SND_SOC_DAPM_PRE_PMU);

  			else if (event == SND_SOC_DAPM_STREAM_STOP)

  				ret = w->event(w,
  					       NULL, SND_SOC_DAPM_PRE_PMD);

  			break;
  
  		case snd_soc_dapm_post:
  			if (!w->event)

  				list_for_each_entry_safe_continue(w, n, list,
  								  power_list);

  			if (event == SND_SOC_DAPM_STREAM_START)

  				ret = w->event(w,
  					       NULL, SND_SOC_DAPM_POST_PMU);

  			else if (event == SND_SOC_DAPM_STREAM_STOP)

  				ret = w->event(w,
  					       NULL, SND_SOC_DAPM_POST_PMD);

  			break;

  		default:

  			/* Queue it up for application */
  			cur_sort = sort[w->id];

  			cur_subseq = w->subseq;

  			cur_reg = w->reg;

  			cur_dapm = w->dapm;

  			list_move(&w->power_list, &pending);
  			break;

  		}

  
  		if (ret < 0)

  			dev_err(w->dapm->dev,
  				"Failed to apply widget power: %d
  ", ret);

  	}

  
  	if (!list_empty(&pending))

  		dapm_seq_run_coalesced(cur_dapm, &pending);

  
  	if (cur_dapm && cur_dapm->seq_notifier) {
  		for (i = 0; i < ARRAY_SIZE(dapm_up_seq); i++)
  			if (sort[i] == cur_sort)
  				cur_dapm->seq_notifier(cur_dapm,

  						       i, cur_subseq);

  	}

  }

  static void dapm_widget_update(struct snd_soc_dapm_context *dapm)
  {
  	struct snd_soc_dapm_update *update = dapm->update;
  	struct snd_soc_dapm_widget *w;
  	int ret;
  
  	if (!update)
  		return;
  
  	w = update->widget;
  
  	if (w->event &&
  	    (w->event_flags & SND_SOC_DAPM_PRE_REG)) {
  		ret = w->event(w, update->kcontrol, SND_SOC_DAPM_PRE_REG);
  		if (ret != 0)
  			pr_err("%s DAPM pre-event failed: %d
  ",
  			       w->name, ret);
  	}
  
  	ret = snd_soc_update_bits(w->codec, update->reg, update->mask,
  				  update->val);
  	if (ret < 0)
  		pr_err("%s DAPM update failed: %d
  ", w->name, ret);
  
  	if (w->event &&
  	    (w->event_flags & SND_SOC_DAPM_POST_REG)) {
  		ret = w->event(w, update->kcontrol, SND_SOC_DAPM_POST_REG);
  		if (ret != 0)
  			pr_err("%s DAPM post-event failed: %d
  ",
  			       w->name, ret);
  	}
  }

  /* Async callback run prior to DAPM sequences - brings to _PREPARE if
   * they're changing state.
   */
  static void dapm_pre_sequence_async(void *data, async_cookie_t cookie)
  {
  	struct snd_soc_dapm_context *d = data;
  	int ret;

  	/* If we're off and we're not supposed to be go into STANDBY */
  	if (d->bias_level == SND_SOC_BIAS_OFF &&
  	    d->target_bias_level != SND_SOC_BIAS_OFF) {

  		if (d->dev)
  			pm_runtime_get_sync(d->dev);

  		ret = snd_soc_dapm_set_bias_level(d, SND_SOC_BIAS_STANDBY);
  		if (ret != 0)
  			dev_err(d->dev,
  				"Failed to turn on bias: %d
  ", ret);
  	}

  	/* Prepare for a STADDBY->ON or ON->STANDBY transition */
  	if (d->bias_level != d->target_bias_level) {

  		ret = snd_soc_dapm_set_bias_level(d, SND_SOC_BIAS_PREPARE);
  		if (ret != 0)
  			dev_err(d->dev,
  				"Failed to prepare bias: %d
  ", ret);
  	}
  }
  
  /* Async callback run prior to DAPM sequences - brings to their final
   * state.
   */
  static void dapm_post_sequence_async(void *data, async_cookie_t cookie)
  {
  	struct snd_soc_dapm_context *d = data;
  	int ret;
  
  	/* If we just powered the last thing off drop to standby bias */

  	if (d->bias_level == SND_SOC_BIAS_PREPARE &&
  	    (d->target_bias_level == SND_SOC_BIAS_STANDBY ||
  	     d->target_bias_level == SND_SOC_BIAS_OFF)) {

  		ret = snd_soc_dapm_set_bias_level(d, SND_SOC_BIAS_STANDBY);
  		if (ret != 0)
  			dev_err(d->dev, "Failed to apply standby bias: %d
  ",
  				ret);
  	}

  	/* If we're in standby and can support bias off then do that */

  	if (d->bias_level == SND_SOC_BIAS_STANDBY &&
  	    d->target_bias_level == SND_SOC_BIAS_OFF) {

  		ret = snd_soc_dapm_set_bias_level(d, SND_SOC_BIAS_OFF);
  		if (ret != 0)
  			dev_err(d->dev, "Failed to turn off bias: %d
  ", ret);

  
  		if (d->dev)
  			pm_runtime_put_sync(d->dev);

  	}
  
  	/* If we just powered up then move to active bias */

  	if (d->bias_level == SND_SOC_BIAS_PREPARE &&
  	    d->target_bias_level == SND_SOC_BIAS_ON) {

  		ret = snd_soc_dapm_set_bias_level(d, SND_SOC_BIAS_ON);
  		if (ret != 0)
  			dev_err(d->dev, "Failed to apply active bias: %d
  ",
  				ret);
  	}
  }

  static void dapm_widget_set_peer_power(struct snd_soc_dapm_widget *peer,
  				       bool power, bool connect)
  {
  	/* If a connection is being made or broken then that update
  	 * will have marked the peer dirty, otherwise the widgets are
  	 * not connected and this update has no impact. */
  	if (!connect)
  		return;
  
  	/* If the peer is already in the state we're moving to then we
  	 * won't have an impact on it. */
  	if (power != peer->power)

  		dapm_mark_dirty(peer, "peer state change");

  }

  static void dapm_widget_set_power(struct snd_soc_dapm_widget *w, bool power,
  				  struct list_head *up_list,
  				  struct list_head *down_list)
  {

  	struct snd_soc_dapm_path *path;

  	if (w->power == power)
  		return;
  
  	trace_snd_soc_dapm_widget_power(w, power);

  	/* If we changed our power state perhaps our neigbours changed

  	 * also.

  	 */
  	list_for_each_entry(path, &w->sources, list_sink) {
  		if (path->source) {

  			dapm_widget_set_peer_power(path->source, power,
  						   path->connect);

  		}
  	}

  	switch (w->id) {
  	case snd_soc_dapm_supply:
  		/* Supplies can't affect their outputs, only their inputs */
  		break;
  	default:
  		list_for_each_entry(path, &w->sinks, list_source) {
  			if (path->sink) {
  				dapm_widget_set_peer_power(path->sink, power,
  							   path->connect);
  			}

  		}

  		break;

  	}

  	if (power)
  		dapm_seq_insert(w, up_list, true);
  	else
  		dapm_seq_insert(w, down_list, false);
  
  	w->power = power;
  }

  static void dapm_power_one_widget(struct snd_soc_dapm_widget *w,
  				  struct list_head *up_list,
  				  struct list_head *down_list)
  {

  	int power;
  
  	switch (w->id) {
  	case snd_soc_dapm_pre:
  		dapm_seq_insert(w, down_list, false);
  		break;
  	case snd_soc_dapm_post:
  		dapm_seq_insert(w, up_list, true);
  		break;
  
  	default:

  		power = dapm_widget_power_check(w);

  		dapm_widget_set_power(w, power, up_list, down_list);

  		break;
  	}
  }

  /*

   * Scan each dapm widget for complete audio path.
   * A complete path is a route that has valid endpoints i.e.:-
   *
   *  o DAC to output pin.
   *  o Input Pin to ADC.
   *  o Input pin to Output pin (bypass, sidetone)
   *  o DAC to ADC (loopback).
   */

  static int dapm_power_widgets(struct snd_soc_dapm_context *dapm, int event)

  {

  	struct snd_soc_card *card = dapm->card;

  	struct snd_soc_dapm_widget *w;

  	struct snd_soc_dapm_context *d;

  	LIST_HEAD(up_list);
  	LIST_HEAD(down_list);

  	LIST_HEAD(async_domain);

  	enum snd_soc_bias_level bias;

  	trace_snd_soc_dapm_start(card);

  	list_for_each_entry(d, &card->dapm_list, list) {
  		if (d->n_widgets || d->codec == NULL) {
  			if (d->idle_bias_off)
  				d->target_bias_level = SND_SOC_BIAS_OFF;
  			else
  				d->target_bias_level = SND_SOC_BIAS_STANDBY;
  		}
  	}

  	memset(&card->dapm_stats, 0, sizeof(card->dapm_stats));

  	list_for_each_entry(w, &card->widgets, list) {
  		w->power_checked = false;

  		w->inputs = -1;
  		w->outputs = -1;

  	}

  	/* Check which widgets we need to power and store them in

  	 * lists indicating if they should be powered up or down.  We
  	 * only check widgets that have been flagged as dirty but note
  	 * that new widgets may be added to the dirty list while we
  	 * iterate.

  	 */

  	list_for_each_entry(w, &card->dapm_dirty, dirty) {

  		dapm_power_one_widget(w, &up_list, &down_list);

  	}

  	list_for_each_entry(w, &card->widgets, list) {

  		list_del_init(&w->dirty);

  		if (w->power) {
  			d = w->dapm;
  
  			/* Supplies and micbiases only bring the
  			 * context up to STANDBY as unless something
  			 * else is active and passing audio they
  			 * generally don't require full power.
  			 */
  			switch (w->id) {
  			case snd_soc_dapm_supply:
  			case snd_soc_dapm_micbias:
  				if (d->target_bias_level < SND_SOC_BIAS_STANDBY)
  					d->target_bias_level = SND_SOC_BIAS_STANDBY;
  				break;
  			default:
  				d->target_bias_level = SND_SOC_BIAS_ON;
  				break;
  			}
  		}
  
  	}

  	/* If there are no DAPM widgets then try to figure out power from the
  	 * event type.
  	 */

  	if (!dapm->n_widgets) {

  		switch (event) {
  		case SND_SOC_DAPM_STREAM_START:
  		case SND_SOC_DAPM_STREAM_RESUME:

  			dapm->target_bias_level = SND_SOC_BIAS_ON;

  			break;

  		case SND_SOC_DAPM_STREAM_STOP:

  			if (dapm->codec->active)
  				dapm->target_bias_level = SND_SOC_BIAS_ON;
  			else
  				dapm->target_bias_level = SND_SOC_BIAS_STANDBY;

  			break;

  		case SND_SOC_DAPM_STREAM_SUSPEND:

  			dapm->target_bias_level = SND_SOC_BIAS_STANDBY;

  			break;

  		case SND_SOC_DAPM_STREAM_NOP:

  			dapm->target_bias_level = dapm->bias_level;

  			break;

  		default:
  			break;
  		}
  	}

  	/* Force all contexts in the card to the same bias state if
  	 * they're not ground referenced.
  	 */

  	bias = SND_SOC_BIAS_OFF;

  	list_for_each_entry(d, &card->dapm_list, list)

  		if (d->target_bias_level > bias)
  			bias = d->target_bias_level;

  	list_for_each_entry(d, &card->dapm_list, list)

  		if (!d->idle_bias_off)
  			d->target_bias_level = bias;

  	trace_snd_soc_dapm_walk_done(card);

  	/* Run all the bias changes in parallel */
  	list_for_each_entry(d, &dapm->card->dapm_list, list)
  		async_schedule_domain(dapm_pre_sequence_async, d,
  					&async_domain);
  	async_synchronize_full_domain(&async_domain);

  	/* Power down widgets first; try to avoid amplifying pops. */

  	dapm_seq_run(dapm, &down_list, event, false);

  	dapm_widget_update(dapm);

  	/* Now power up. */

  	dapm_seq_run(dapm, &up_list, event, true);

  	/* Run all the bias changes in parallel */
  	list_for_each_entry(d, &dapm->card->dapm_list, list)
  		async_schedule_domain(dapm_post_sequence_async, d,
  					&async_domain);
  	async_synchronize_full_domain(&async_domain);

  	pop_dbg(dapm->dev, card->pop_time,
  		"DAPM sequencing finished, waiting %dms
  ", card->pop_time);

  	pop_wait(card->pop_time);

  	trace_snd_soc_dapm_done(card);

  	return 0;

  }

  #ifdef CONFIG_DEBUG_FS
  static int dapm_widget_power_open_file(struct inode *inode, struct file *file)
  {
  	file->private_data = inode->i_private;
  	return 0;
  }
  
  static ssize_t dapm_widget_power_read_file(struct file *file,
  					   char __user *user_buf,
  					   size_t count, loff_t *ppos)
  {
  	struct snd_soc_dapm_widget *w = file->private_data;
  	char *buf;
  	int in, out;
  	ssize_t ret;
  	struct snd_soc_dapm_path *p = NULL;
  
  	buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
  	if (!buf)
  		return -ENOMEM;
  
  	in = is_connected_input_ep(w);

  	dapm_clear_walk(w->dapm);

  	out = is_connected_output_ep(w);

  	dapm_clear_walk(w->dapm);

  	ret = snprintf(buf, PAGE_SIZE, "%s: %s  in %d out %d",

  		       w->name, w->power ? "On" : "Off", in, out);

  	if (w->reg >= 0)
  		ret += snprintf(buf + ret, PAGE_SIZE - ret,
  				" - R%d(0x%x) bit %d",
  				w->reg, w->reg, w->shift);
  
  	ret += snprintf(buf + ret, PAGE_SIZE - ret, "
  ");

  	if (w->sname)
  		ret += snprintf(buf + ret, PAGE_SIZE - ret, " stream %s %s
  ",
  				w->sname,
  				w->active ? "active" : "inactive");

  
  	list_for_each_entry(p, &w->sources, list_sink) {

  		if (p->connected && !p->connected(w, p->sink))
  			continue;

  		if (p->connect)
  			ret += snprintf(buf + ret, PAGE_SIZE - ret,

  					" in  \"%s\" \"%s\"
  ",

  					p->name ? p->name : "static",
  					p->source->name);
  	}
  	list_for_each_entry(p, &w->sinks, list_source) {

  		if (p->connected && !p->connected(w, p->sink))
  			continue;

  		if (p->connect)
  			ret += snprintf(buf + ret, PAGE_SIZE - ret,

  					" out \"%s\" \"%s\"
  ",

  					p->name ? p->name : "static",
  					p->sink->name);
  	}
  
  	ret = simple_read_from_buffer(user_buf, count, ppos, buf, ret);
  
  	kfree(buf);
  	return ret;
  }
  
  static const struct file_operations dapm_widget_power_fops = {
  	.open = dapm_widget_power_open_file,
  	.read = dapm_widget_power_read_file,

  	.llseek = default_llseek,

  };

  static int dapm_bias_open_file(struct inode *inode, struct file *file)
  {
  	file->private_data = inode->i_private;
  	return 0;
  }
  
  static ssize_t dapm_bias_read_file(struct file *file, char __user *user_buf,
  				   size_t count, loff_t *ppos)
  {
  	struct snd_soc_dapm_context *dapm = file->private_data;
  	char *level;
  
  	switch (dapm->bias_level) {
  	case SND_SOC_BIAS_ON:
  		level = "On
  ";
  		break;
  	case SND_SOC_BIAS_PREPARE:
  		level = "Prepare
  ";
  		break;
  	case SND_SOC_BIAS_STANDBY:
  		level = "Standby
  ";
  		break;
  	case SND_SOC_BIAS_OFF:
  		level = "Off
  ";
  		break;
  	default:
  		BUG();
  		level = "Unknown
  ";
  		break;
  	}
  
  	return simple_read_from_buffer(user_buf, count, ppos, level,
  				       strlen(level));
  }
  
  static const struct file_operations dapm_bias_fops = {
  	.open = dapm_bias_open_file,
  	.read = dapm_bias_read_file,
  	.llseek = default_llseek,
  };

  void snd_soc_dapm_debugfs_init(struct snd_soc_dapm_context *dapm,
  	struct dentry *parent)

  {

  	struct dentry *d;

  	dapm->debugfs_dapm = debugfs_create_dir("dapm", parent);
  
  	if (!dapm->debugfs_dapm) {
  		printk(KERN_WARNING
  		       "Failed to create DAPM debugfs directory
  ");

  		return;

  	}

  	d = debugfs_create_file("bias_level", 0444,
  				dapm->debugfs_dapm, dapm,
  				&dapm_bias_fops);
  	if (!d)
  		dev_warn(dapm->dev,
  			 "ASoC: Failed to create bias level debugfs file
  ");

  }

  static void dapm_debugfs_add_widget(struct snd_soc_dapm_widget *w)
  {
  	struct snd_soc_dapm_context *dapm = w->dapm;
  	struct dentry *d;

  	if (!dapm->debugfs_dapm || !w->name)
  		return;
  
  	d = debugfs_create_file(w->name, 0444,
  				dapm->debugfs_dapm, w,
  				&dapm_widget_power_fops);
  	if (!d)
  		dev_warn(w->dapm->dev,
  			"ASoC: Failed to create %s debugfs file
  ",
  			w->name);

  }

  static void dapm_debugfs_cleanup(struct snd_soc_dapm_context *dapm)
  {
  	debugfs_remove_recursive(dapm->debugfs_dapm);
  }

  #else

  void snd_soc_dapm_debugfs_init(struct snd_soc_dapm_context *dapm,
  	struct dentry *parent)

  {
  }

  
  static inline void dapm_debugfs_add_widget(struct snd_soc_dapm_widget *w)
  {
  }

  static inline void dapm_debugfs_cleanup(struct snd_soc_dapm_context *dapm)
  {
  }

  #endif

  /* test and update the power status of a mux widget */

  static int dapm_mux_update_power(struct snd_soc_dapm_widget *widget,

  				 struct snd_kcontrol *kcontrol, int change,
  				 int mux, struct soc_enum *e)

  {
  	struct snd_soc_dapm_path *path;
  	int found = 0;

  	if (widget->id != snd_soc_dapm_mux &&

  	    widget->id != snd_soc_dapm_virt_mux &&

  	    widget->id != snd_soc_dapm_value_mux)

  		return -ENODEV;

  	if (!change)

  		return 0;
  
  	/* find dapm widget path assoc with kcontrol */

  	list_for_each_entry(path, &widget->dapm->card->paths, list) {

  		if (path->kcontrol != kcontrol)
  			continue;

  		if (!path->name || !e->texts[mux])

  			continue;
  
  		found = 1;
  		/* we now need to match the string in the enum to the path */

  		if (!(strcmp(path->name, e->texts[mux]))) {

  			path->connect = 1; /* new connection */

  			dapm_mark_dirty(path->source, "mux connection");

  		} else {
  			if (path->connect)

  				dapm_mark_dirty(path->source,
  						"mux disconnection");

  			path->connect = 0; /* old connection must be powered down */

  		}

  	}

  	if (found) {

  		dapm_mark_dirty(widget, "mux change");

  		dapm_power_widgets(widget->dapm, SND_SOC_DAPM_STREAM_NOP);

  	}

  
  	return 0;
  }

  /* test and update the power status of a mixer or switch widget */

  static int dapm_mixer_update_power(struct snd_soc_dapm_widget *widget,

  				   struct snd_kcontrol *kcontrol, int connect)

  {
  	struct snd_soc_dapm_path *path;
  	int found = 0;

  	if (widget->id != snd_soc_dapm_mixer &&

  	    widget->id != snd_soc_dapm_mixer_named_ctl &&

  	    widget->id != snd_soc_dapm_switch)

  		return -ENODEV;

  	/* find dapm widget path assoc with kcontrol */

  	list_for_each_entry(path, &widget->dapm->card->paths, list) {

  		if (path->kcontrol != kcontrol)
  			continue;
  
  		/* found, now check type */
  		found = 1;

  		path->connect = connect;

  		dapm_mark_dirty(path->source, "mixer connection");

  	}

  	if (found) {

  		dapm_mark_dirty(widget, "mixer update");

  		dapm_power_widgets(widget->dapm, SND_SOC_DAPM_STREAM_NOP);

  	}

  
  	return 0;
  }

  
  /* show dapm widget status in sys fs */
  static ssize_t dapm_widget_show(struct device *dev,
  	struct device_attribute *attr, char *buf)
  {

  	struct snd_soc_pcm_runtime *rtd = dev_get_drvdata(dev);

  	struct snd_soc_codec *codec =rtd->codec;

  	struct snd_soc_dapm_widget *w;
  	int count = 0;
  	char *state = "not set";

  	list_for_each_entry(w, &codec->card->widgets, list) {
  		if (w->dapm != &codec->dapm)
  			continue;

  
  		/* only display widgets that burnm power */
  		switch (w->id) {
  		case snd_soc_dapm_hp:
  		case snd_soc_dapm_mic:
  		case snd_soc_dapm_spk:
  		case snd_soc_dapm_line:
  		case snd_soc_dapm_micbias:
  		case snd_soc_dapm_dac:
  		case snd_soc_dapm_adc:
  		case snd_soc_dapm_pga:

  		case snd_soc_dapm_out_drv:

  		case snd_soc_dapm_mixer:

  		case snd_soc_dapm_mixer_named_ctl:

  		case snd_soc_dapm_supply:

  			if (w->name)
  				count += sprintf(buf + count, "%s: %s
  ",
  					w->name, w->power ? "On":"Off");
  		break;
  		default:
  		break;
  		}
  	}

  	switch (codec->dapm.bias_level) {

  	case SND_SOC_BIAS_ON:
  		state = "On";

  		break;

  	case SND_SOC_BIAS_PREPARE:
  		state = "Prepare";

  		break;

  	case SND_SOC_BIAS_STANDBY:
  		state = "Standby";

  		break;

  	case SND_SOC_BIAS_OFF:
  		state = "Off";

  		break;
  	}
  	count += sprintf(buf + count, "PM State: %s
  ", state);
  
  	return count;
  }
  
  static DEVICE_ATTR(dapm_widget, 0444, dapm_widget_show, NULL);
  
  int snd_soc_dapm_sys_add(struct device *dev)
  {

  	return device_create_file(dev, &dev_attr_dapm_widget);

  }
  
  static void snd_soc_dapm_sys_remove(struct device *dev)
  {

  	device_remove_file(dev, &dev_attr_dapm_widget);

  }
  
  /* free all dapm widgets and resources */

  static void dapm_free_widgets(struct snd_soc_dapm_context *dapm)

  {
  	struct snd_soc_dapm_widget *w, *next_w;
  	struct snd_soc_dapm_path *p, *next_p;

  	list_for_each_entry_safe(w, next_w, &dapm->card->widgets, list) {
  		if (w->dapm != dapm)
  			continue;

  		list_del(&w->list);

  		/*
  		 * remove source and sink paths associated to this widget.
  		 * While removing the path, remove reference to it from both
  		 * source and sink widgets so that path is removed only once.
  		 */
  		list_for_each_entry_safe(p, next_p, &w->sources, list_sink) {
  			list_del(&p->list_sink);
  			list_del(&p->list_source);
  			list_del(&p->list);
  			kfree(p->long_name);
  			kfree(p);
  		}
  		list_for_each_entry_safe(p, next_p, &w->sinks, list_source) {
  			list_del(&p->list_sink);
  			list_del(&p->list_source);
  			list_del(&p->list);
  			kfree(p->long_name);
  			kfree(p);
  		}

  		kfree(w->kcontrols);

  		kfree(w->name);

  		kfree(w);
  	}

  }

  static struct snd_soc_dapm_widget *dapm_find_widget(
  			struct snd_soc_dapm_context *dapm, const char *pin,
  			bool search_other_contexts)