Imported Upstream version 4.2-build2006upstream/4.2-build2006upstream

1 files changed, 547 insertions, 0 deletions

diff --git a/kernel/drv/oss_envy24ht/envy24ht_julia.c b/kernel/drv/oss_envy24ht/envy24ht_julia.c
new file mode 100644
index 0000000..544dd08
--- /dev/null
+++ b/kernel/drv/oss_envy24ht/envy24ht_julia.c
@@ -0,0 +1,547 @@
+/*
+ * Purpose: Low level routines for the ESI (Egosys) Juli@ card
+ */
+/*
+ *
+ * This file is part of Open Sound System.
+ *
+ * Copyright (C) 4Front Technologies 1996-2008.
+ *
+ * This this source file is released under GPL v2 license (no other versions).
+ * See the COPYING file included in the main directory of this source
+ * distribution for the license terms and conditions.
+ *
+ */
+
+#include "oss_envy24ht_cfg.h"
+
+#include "spdif.h"
+#include "envy24ht.h"
+
+#define AK4358_ADDRESS 0x11
+#define AK4114_ADDRESS 0x10
+
+static unsigned char
+i2c_read (envy24ht_devc * devc, unsigned char addr, unsigned char pos)
+{
+  int i;
+  unsigned char data;
+  oss_native_word flags;
+
+  MUTEX_ENTER_IRQDISABLE (devc->low_mutex, flags);
+  OUTB (devc->osdev, pos, devc->ccs_base + 0x11);	/* Offset */
+  OUTB (devc->osdev, addr << 1, devc->ccs_base + 0x10);	/* Read address  */
+
+  for (i = 0; i < 2000; i++)
+    {
+      unsigned char status = INB (devc->osdev, devc->ccs_base + 0x13);
+      if (!(status & 1))
+	break;
+
+    }
+
+  oss_udelay (1);
+  data = INB (devc->osdev, devc->ccs_base + 0x12);
+  MUTEX_EXIT_IRQRESTORE (devc->low_mutex, flags);
+
+  return data;
+}
+
+static void
+i2c_write (envy24ht_devc * devc, unsigned char addr, unsigned char pos,
+	   unsigned char data)
+{
+  int i;
+  oss_native_word flags;
+
+  MUTEX_ENTER_IRQDISABLE (devc->low_mutex, flags);
+
+  for (i = 0; i < 2000; i++)
+    {
+      unsigned char status = INB (devc->osdev, devc->ccs_base + 0x13);
+      if (!(status & 1))
+	break;
+
+    }
+
+  OUTB (devc->osdev, pos, devc->ccs_base + 0x11);	/* Offset */
+  OUTB (devc->osdev, data, devc->ccs_base + 0x12);	/* Data */
+  OUTB (devc->osdev, (addr << 1) | 1, devc->ccs_base + 0x10);	/* Write address  */
+
+  for (i = 0; i < 2000; i++)
+    {
+      unsigned char status = INB (devc->osdev, devc->ccs_base + 0x13);
+      if (!(status & 1))
+	break;
+
+    }
+  MUTEX_EXIT_IRQRESTORE (devc->low_mutex, flags);
+
+  if ((addr == AK4358_ADDRESS) && (pos <= 0x0c))
+    devc->m_DACVolume[pos] = data;
+}
+
+static void
+GPIOWrite (envy24ht_devc * devc, int pos, int bit)
+{
+  int data = INW (devc->osdev, devc->ccs_base + 0x14);
+
+  bit = (bit != 0);
+
+  data &= ~(1 << pos);
+  data |= (bit << pos);
+
+  OUTW (devc->osdev, data, devc->ccs_base + 0x14);
+}
+
+static int
+set_dac (envy24ht_devc * devc, int reg, int level)
+{
+  if (level < 0)
+    level = 0;
+  if (level > 0x7f)
+    level = 0x7f;
+
+  i2c_write (devc, AK4358_ADDRESS, reg, level | 0x80);
+
+  return level;
+}
+
+static struct { 
+    int rate, spdifin, clks;
+} rate_sel[] = {
+    {32000, 0x30, 0x08},
+    {44100, 0x00, 0x09},
+    {48000, 0x20, 0x0A},
+    {88200, 0x80, 0x05},
+    {96000, 0xA0, 0x06},
+    {176400, 0xC0, 0x01},
+    {192000, 0xE0, 0x02},
+    {16000, -1, 0x0C},
+    {22050, -1, 0x0D},
+    {24000, -1, 0x0E},
+    {64000, -1, 0x04},
+    {128000, -1, 0x00},
+    {-1, -1, -1}
+};
+
+static void
+julia_set_deemph (envy24ht_devc * devc, int mode)
+{
+  int deemph = 0x01; /* OFF */
+
+  if (mode == 0) 
+    i2c_write (devc, AK4358_ADDRESS, 0x03, deemph);
+  else {
+
+    if (devc->speed == 44100)
+      deemph = 0x00;
+    else if (devc->speed == 48000)
+      deemph = 0x02;
+    else if (devc->speed == 32000)
+      deemph = 0x03;
+
+    i2c_write (devc, AK4358_ADDRESS, 0x03, deemph);
+  }
+}
+
+static void
+julia_Monitor (envy24ht_devc * devc, int bMonitor, int num)
+{
+  switch (num)
+    {
+    case 0:	/* MUTE */
+	if (bMonitor)
+    	  {
+	    i2c_write (devc, AK4358_ADDRESS, 1, 0x03);
+	    GPIOWrite (devc, 15, 1);
+	  } else {
+    	    i2c_write (devc, AK4358_ADDRESS, 1, 0x01);
+	    GPIOWrite (devc, 15, 0);
+	  }
+	break;
+
+    case 1:	/* LINEIN */
+	if (bMonitor)
+    	    GPIOWrite (devc, 13, 1);
+	else
+    	    GPIOWrite (devc, 13, 0);
+	break;
+
+    case 2:	/* SPDIFOUT */
+	if (bMonitor)
+    	    GPIOWrite (devc, 11, 1);
+	else
+    	    GPIOWrite (devc, 11, 0);
+	break;
+    case 3:	/* SPDIFIN */
+	if (bMonitor)
+    	    GPIOWrite (devc, 12, 1);
+	else
+    	    GPIOWrite (devc, 12, 0);
+	break;
+    case 4:	/* De-emphasis */
+    	julia_set_deemph (devc, bMonitor);
+	break;
+    }
+  devc->monitor[num] = bMonitor;
+}
+
+static void
+ak4114_init (envy24ht_devc * devc)
+{
+  /*
+   * AK4114 S/PDIF interface initialization
+   */
+  i2c_write (devc, AK4114_ADDRESS, 0x00, 0x0f);
+  i2c_write (devc, AK4114_ADDRESS, 0x01, 0x70);
+  i2c_write (devc, AK4114_ADDRESS, 0x02, 0x80);
+  i2c_write (devc, AK4114_ADDRESS, 0x03, 0x49);
+  i2c_write (devc, AK4114_ADDRESS, 0x04, 0x00);
+  i2c_write (devc, AK4114_ADDRESS, 0x05, 0x00);
+
+  i2c_write (devc, AK4114_ADDRESS, 0x0d, 0x41);
+  i2c_write (devc, AK4114_ADDRESS, 0x0e, 0x02);
+  i2c_write (devc, AK4114_ADDRESS, 0x0f, 0x2c);
+  i2c_write (devc, AK4114_ADDRESS, 0x10, 0x00);
+  i2c_write (devc, AK4114_ADDRESS, 0x11, 0x00);
+}
+
+static void
+julia_set_rate (envy24ht_devc * devc)
+{
+  int i, data;
+  int adc = 0x00;
+
+  if (devc->speed <= 48000)
+	devc->m_DACVolume[2] = 0x4f; /* DFS=normal-speed */	
+  else if (devc->speed <= 96000)
+    {
+	adc = 0x04;
+	devc->m_DACVolume[2] = 0x5f; /* DFS=double-speed */
+    }
+  else
+    {
+	adc = 0x03;
+	devc->m_DACVolume[2] = 0x6f; /* DFS=quad-speed */
+    }
+    
+  data = INW (devc->osdev, devc->ccs_base + 0x14);
+  data &= ~0x70f;
+  data |= adc << 8;
+
+  for (i = 0; rate_sel[i].rate; i++)
+    if (rate_sel[i].rate == devc->speed) 
+	data |= rate_sel[i].clks;
+  
+  OUTW (devc->osdev, data, devc->ccs_base + 0x14);
+
+  OUTB (devc->osdev, 0x80, devc->mt_base + 0x05);   /* RESET */
+  OUTB (devc->osdev, 0x00, devc->mt_base + 0x05);
+  
+  if (devc->speed == 8000)
+	OUTB (devc->osdev, 0x06, devc->mt_base + 0x01);
+  else if (devc->speed == 9600)
+	OUTB (devc->osdev, 0x03, devc->mt_base + 0x01);
+  else if (devc->speed == 11025)
+	OUTB (devc->osdev, 0x0a, devc->mt_base + 0x01);
+  else if (devc->speed == 12000)
+	OUTB (devc->osdev, 0x02, devc->mt_base + 0x01);
+  else
+	OUTB (devc->osdev, 0x10, devc->mt_base + 0x01);
+
+    /* Restore ak4358 regs and set DFS */
+  for (i = 0; i <= 0x0c; i++)
+    i2c_write (devc, AK4358_ADDRESS, i, devc->m_DACVolume[i]);
+    /* Restore ak4114 */
+  ak4114_init (devc);
+  if (devc->monitor[4] == 1)
+    julia_set_deemph (devc, 1);
+}
+
+static void
+julia_sync_ak4114 (void *arg)
+{
+  envy24ht_devc *devc = arg;
+  int i;
+  int spdifin = i2c_read (devc, AK4114_ADDRESS, 7);
+
+  for (i = 0; rate_sel[i].rate; i++)
+    if (rate_sel[i].spdifin == spdifin)
+     {
+      if (devc->speed != rate_sel[i].rate)
+       {
+        devc->speed = rate_sel[i].rate;
+        mixer_devs[devc->mixer_dev]->modify_counter++;
+        julia_set_rate (devc);
+       }
+      break;
+     }
+  
+  if (devc->syncsource == 1)
+    devc->timeout_id = timeout (julia_sync_ak4114, devc, OSS_HZ);
+}
+
+static int
+julia_set_syncsource (envy24ht_devc * devc, int value)
+{
+  if (value == 1)
+  {
+    GPIOWrite (devc, 4, 0);
+    devc->timeout_id = timeout (julia_sync_ak4114, devc, OSS_HZ);
+  } else {
+    if (devc->timeout_id != 0)
+       untimeout (devc->timeout_id);
+    devc->timeout_id = 0;
+
+    GPIOWrite (devc, 4, 1);
+    
+    if (devc->speed != devc->pending_speed)
+    {
+      devc->speed = devc->pending_speed;
+      mixer_devs[devc->mixer_dev]->modify_counter++;
+      julia_set_rate (devc);
+    }
+  }
+
+  return 0;
+}
+
+static int
+julia_audio_ioctl (envy24ht_devc * devc, envy24ht_portc * portc, unsigned int cmd,
+		   ioctl_arg arg)
+{
+  int left, right, value;
+
+  switch (cmd)
+    {
+    case SNDCTL_DSP_GETPLAYVOL:
+      if (portc != &devc->play_portc[0])
+	return OSS_EINVAL;
+      left = (devc->gains[0] & 0xff) * 100 / 0x7f;
+      right = ((devc->gains[0] >> 8) & 0xff) * 100 / 0x7f;
+      return *arg = (left | (right << 8));
+      break;
+
+    case SNDCTL_DSP_SETPLAYVOL:
+      if (portc != &devc->play_portc[0])
+	return OSS_EINVAL;
+      value = *arg;
+      left = value & 0xff;
+      right = (value >> 8) & 0xff;
+
+      left = (left * 0x7f) / 100;
+      right = (right * 0x7f) / 100;
+      left = set_dac (devc, 0x04, left);
+      right = set_dac (devc, 0x05, right);
+      devc->gains[0] = left | (right << 8);
+      mixer_devs[devc->mixer_dev]->modify_counter++;
+      return 0;
+      break;
+    }
+  return OSS_EINVAL;
+}
+
+static int
+julia_set_control (int dev, int ctrl, unsigned int cmd, int value)
+{
+  envy24ht_devc *devc = mixer_devs[dev]->hw_devc;
+
+  if (cmd == SNDCTL_MIX_READ)
+    {
+        if (ctrl < 0 || ctrl > 4)
+	    return OSS_EINVAL;
+    
+	return devc->monitor[ctrl];
+    }
+
+  if (cmd == SNDCTL_MIX_WRITE)
+    {
+    	if (ctrl < 0 || ctrl > 4)
+	    return OSS_EINVAL;
+	
+	value = !!value;
+	julia_Monitor (devc, value, ctrl);
+	return devc->monitor[ctrl];
+    }
+
+  return OSS_EINVAL;
+}
+
+static int
+julia_set_ak4358 (int dev, int ctrl, unsigned int cmd, int value)
+{
+  envy24ht_devc *devc = mixer_devs[dev]->hw_devc;
+
+  if (cmd == SNDCTL_MIX_READ)
+    {
+      if (ctrl < 0 || ctrl > 4)
+	return OSS_EIO;
+
+      return devc->gains[ctrl];
+    }
+
+  if (cmd == SNDCTL_MIX_WRITE)
+    {
+      int left, right;
+
+      left = value & 0xff;
+      right = (value >> 8) & 0xff;
+
+      switch (ctrl)
+	{
+	case 0:		/* PCM */
+	  left = set_dac (devc, 0x04, left);
+	  right = set_dac (devc, 0x05, right);
+	  break;
+	case 1:		/* LINEIN */
+	  left = set_dac (devc, 0x06, left);
+	  right = set_dac (devc, 0x07, right);
+	  break;
+	case 2:		/* SPDIFOUT */
+	  left = set_dac (devc, 0x08, left);
+	  right = set_dac (devc, 0x09, right);
+	  break;
+	case 3:		/* SPDIFIN */
+	  left = set_dac (devc, 0x0B, left);
+	  right = set_dac (devc, 0x0C, right);
+	  break;
+
+	default:
+	  return OSS_EINVAL;
+	}
+
+      value = left | (right << 8);
+      return devc->gains[ctrl] = value;
+    }
+
+  return OSS_EINVAL;
+}
+
+ /*ARGSUSED*/ static int
+julia_mixer_init (envy24ht_devc * devc, int dev, int g)
+{
+  int group = g;
+  int err, monitor;
+
+  if ((group = mixer_ext_create_group (dev, g, "VOL")) < 0)
+    return group;
+
+  if ((err = mixer_ext_create_control (dev, group,
+				       0, julia_set_control,
+				       MIXT_ONOFF,
+				       "ENVY24_MUTE", 2,
+				       MIXF_READABLE | MIXF_WRITEABLE)) < 0)
+    return err;
+
+  if ((err = mixer_ext_create_control (dev, group,
+				       0, julia_set_ak4358,
+				       MIXT_STEREOSLIDER,
+				       "ENVY24_PCM", 0x7f,
+				       MIXF_READABLE | MIXF_WRITEABLE)) < 0)
+    return err;
+
+  if ((err = mixer_ext_create_control (dev, group,
+				       1, julia_set_ak4358,
+				       MIXT_STEREOSLIDER,
+				       "ENVY24_LINEIN", 0x7f,
+				       MIXF_READABLE | MIXF_WRITEABLE)) < 0)
+    return err;
+
+  if ((err = mixer_ext_create_control (dev, group,
+				       2, julia_set_ak4358,
+				       MIXT_STEREOSLIDER,
+				       "ENVY24_SPDIFOUT", 0x7f,
+				       MIXF_READABLE | MIXF_WRITEABLE)) < 0)
+    return err;
+
+  if ((err = mixer_ext_create_control (dev, group,
+				       3, julia_set_ak4358,
+				       MIXT_STEREOSLIDER,
+				       "ENVY24_SPDIFIN", 0x7f,
+				       MIXF_READABLE | MIXF_WRITEABLE)) < 0)
+    return err;
+
+  if ((monitor = mixer_ext_create_group (dev, g, "MONITOR")) < 0)
+    return monitor;
+
+  if ((err = mixer_ext_create_control (dev, monitor,
+				       1, julia_set_control,
+				       MIXT_ONOFF,
+				       "ENVY24_LINEIN", 2,
+				       MIXF_READABLE | MIXF_WRITEABLE)) < 0)
+    return err;
+
+  if ((err = mixer_ext_create_control (dev, monitor,
+				       2, julia_set_control,
+				       MIXT_ONOFF,
+				       "ENVY24_SPDIFOUT", 2,
+				       MIXF_READABLE | MIXF_WRITEABLE)) < 0)
+    return err;
+
+  if ((err = mixer_ext_create_control (dev, monitor,
+				       3, julia_set_control,
+				       MIXT_ONOFF,
+				       "ENVY24_SPDIFIN", 2,
+				       MIXF_READABLE | MIXF_WRITEABLE)) < 0)
+    return err;
+  
+  if ((err = mixer_ext_create_control (dev, monitor,
+				       4, julia_set_control,
+		    		       MIXT_ENUM,
+				       "ENVY24_DEEMPH", 2,
+				       MIXF_READABLE | MIXF_WRITEABLE)) < 0)
+   return err;
+  mixer_ext_set_strings (dev, err, "OFF 50/15usec", 0);
+  
+  return 0;
+}
+
+static void
+julia_card_init (envy24ht_devc * devc)
+{
+  ak4114_init (devc);
+/*
+ * AK4358 DAC initialization
+ */
+  i2c_write (devc, AK4358_ADDRESS, 2, 0x00);
+  i2c_write (devc, AK4358_ADDRESS, 2, 0x4E);
+  i2c_write (devc, AK4358_ADDRESS, 0, 0x06);
+  i2c_write (devc, AK4358_ADDRESS, 1, 0x02);
+  i2c_write (devc, AK4358_ADDRESS, 3, 0x01);
+
+  set_dac (devc, 0x04, 0x7f);
+  set_dac (devc, 0x05, 0x7f);
+  set_dac (devc, 0x06, 0x7f);
+  set_dac (devc, 0x07, 0x7f);
+  set_dac (devc, 0x08, 0x7f);
+  set_dac (devc, 0x09, 0x7f);
+  set_dac (devc, 0x0b, 0x7f);
+  set_dac (devc, 0x0c, 0x7f);
+
+  i2c_write (devc, AK4358_ADDRESS, 0xA, 0x00);
+  i2c_write (devc, AK4358_ADDRESS, 0xD, 0x00);
+  i2c_write (devc, AK4358_ADDRESS, 0xE, 0x00);
+  i2c_write (devc, AK4358_ADDRESS, 0xF, 0x00);
+  i2c_write (devc, AK4358_ADDRESS, 2, 0x4F);
+
+  julia_Monitor (devc, 0, 0); /* Unmute */
+}
+
+static void
+julia_card_uninit (envy24ht_devc * devc)
+{
+    if (devc->timeout_id != 0)
+       untimeout (devc->timeout_id);
+}
+
+envy24ht_auxdrv_t envy24ht_julia_auxdrv = {
+  julia_card_init,
+  julia_mixer_init,
+  julia_set_rate,
+  NULL,
+  NULL,
+  julia_set_syncsource,
+  julia_audio_ioctl,
+  julia_card_uninit
+};