/*
   *  Copyright (C) 2000 Takashi Iwai <tiwai@suse.de>
   *
   *  Proc interface for Emu8k/Emu10k1 WaveTable synth
   *
   *   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.
   *
   *   This program is distributed in the hope that it will be useful,
   *   but WITHOUT ANY WARRANTY; without even the implied warranty of
   *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   *   GNU General Public License for more details.
   *
   *   You should have received a copy of the GNU General Public License
   *   along with this program; if not, write to the Free Software
   *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
   */

  #include <linux/wait.h>

  #include <sound/core.h>
  #include <sound/emux_synth.h>
  #include <sound/info.h>
  #include "emux_voice.h"

  static void

  snd_emux_proc_info_read(struct snd_info_entry *entry, 
  			struct snd_info_buffer *buf)

  {

  	struct snd_emux *emu;

  	int i;
  
  	emu = entry->private_data;

  	mutex_lock(&emu->register_mutex);

  	if (emu->name)
  		snd_iprintf(buf, "Device: %s
  ", emu->name);
  	snd_iprintf(buf, "Ports: %d
  ", emu->num_ports);
  	snd_iprintf(buf, "Addresses:");
  	for (i = 0; i < emu->num_ports; i++)
  		snd_iprintf(buf, " %d:%d", emu->client, emu->ports[i]);
  	snd_iprintf(buf, "
  ");
  	snd_iprintf(buf, "Use Counter: %d
  ", emu->used);
  	snd_iprintf(buf, "Max Voices: %d
  ", emu->max_voices);
  	snd_iprintf(buf, "Allocated Voices: %d
  ", emu->num_voices);
  	if (emu->memhdr) {
  		snd_iprintf(buf, "Memory Size: %d
  ", emu->memhdr->size);
  		snd_iprintf(buf, "Memory Available: %d
  ", snd_util_mem_avail(emu->memhdr));
  		snd_iprintf(buf, "Allocated Blocks: %d
  ", emu->memhdr->nblocks);
  	} else {
  		snd_iprintf(buf, "Memory Size: 0
  ");
  	}
  	if (emu->sflist) {

  		mutex_lock(&emu->sflist->presets_mutex);

  		snd_iprintf(buf, "SoundFonts: %d
  ", emu->sflist->fonts_size);
  		snd_iprintf(buf, "Instruments: %d
  ", emu->sflist->zone_counter);
  		snd_iprintf(buf, "Samples: %d
  ", emu->sflist->sample_counter);
  		snd_iprintf(buf, "Locked Instruments: %d
  ", emu->sflist->zone_locked);
  		snd_iprintf(buf, "Locked Samples: %d
  ", emu->sflist->sample_locked);

  		mutex_unlock(&emu->sflist->presets_mutex);

  	}
  #if 0  /* debug */
  	if (emu->voices[0].state != SNDRV_EMUX_ST_OFF && emu->voices[0].ch >= 0) {

  		struct snd_emux_voice *vp = &emu->voices[0];

  		snd_iprintf(buf, "voice 0: on
  ");
  		snd_iprintf(buf, "mod delay=%x, atkhld=%x, dcysus=%x, rel=%x
  ",
  			    vp->reg.parm.moddelay,
  			    vp->reg.parm.modatkhld,
  			    vp->reg.parm.moddcysus,
  			    vp->reg.parm.modrelease);
  		snd_iprintf(buf, "vol delay=%x, atkhld=%x, dcysus=%x, rel=%x
  ",
  			    vp->reg.parm.voldelay,
  			    vp->reg.parm.volatkhld,
  			    vp->reg.parm.voldcysus,
  			    vp->reg.parm.volrelease);
  		snd_iprintf(buf, "lfo1 delay=%x, lfo2 delay=%x, pefe=%x
  ",
  			    vp->reg.parm.lfo1delay,
  			    vp->reg.parm.lfo2delay,
  			    vp->reg.parm.pefe);
  		snd_iprintf(buf, "fmmod=%x, tremfrq=%x, fm2frq2=%x
  ",
  			    vp->reg.parm.fmmod,
  			    vp->reg.parm.tremfrq,
  			    vp->reg.parm.fm2frq2);
  		snd_iprintf(buf, "cutoff=%x, filterQ=%x, chorus=%x, reverb=%x
  ",
  			    vp->reg.parm.cutoff,
  			    vp->reg.parm.filterQ,
  			    vp->reg.parm.chorus,
  			    vp->reg.parm.reverb);
  		snd_iprintf(buf, "avol=%x, acutoff=%x, apitch=%x
  ",
  			    vp->avol, vp->acutoff, vp->apitch);
  		snd_iprintf(buf, "apan=%x, aaux=%x, ptarget=%x, vtarget=%x, ftarget=%x
  ",
  			    vp->apan, vp->aaux,
  			    vp->ptarget,
  			    vp->vtarget,
  			    vp->ftarget);
  		snd_iprintf(buf, "start=%x, end=%x, loopstart=%x, loopend=%x
  ",
  			    vp->reg.start, vp->reg.end, vp->reg.loopstart, vp->reg.loopend);
  		snd_iprintf(buf, "sample_mode=%x, rate=%x
  ", vp->reg.sample_mode, vp->reg.rate_offset);
  	}
  #endif

  	mutex_unlock(&emu->register_mutex);

  }

  void snd_emux_proc_init(struct snd_emux *emu, struct snd_card *card, int device)

  {

  	struct snd_info_entry *entry;

  	char name[64];
  
  	sprintf(name, "wavetableD%d", device);
  	entry = snd_info_create_card_entry(card, name, card->proc_root);
  	if (entry == NULL)
  		return;
  
  	entry->content = SNDRV_INFO_CONTENT_TEXT;
  	entry->private_data = emu;

  	entry->c.text.read = snd_emux_proc_info_read;
  	if (snd_info_register(entry) < 0)
  		snd_info_free_entry(entry);
  	else
  		emu->proc = entry;
  }

  void snd_emux_proc_free(struct snd_emux *emu)

  {

  	snd_info_free_entry(emu->proc);
  	emu->proc = NULL;

  }