ak_codec.cpp

#include "DriverData.h"
#include "ak_codec.h"
#include "regs.h"
#include "misc.h"


#define snd_akm4xxx_get(ak,chip,reg) (ak)->images[(chip) * 16 + (reg)]
#define snd_akm4xxx_set(ak,chip,reg,val) ((ak)->images[(chip) * 16 + (reg)] = (val))
#define snd_akm4xxx_get_ipga(ak,chip,reg) (ak)->ipga_gain[chip][(reg)-4]
#define snd_akm4xxx_set_ipga(ak,chip,reg,val) ((ak)->ipga_gain[chip][(reg)-4] = (val))


void akm4xxx_write(struct CardData *card, struct akm_codec *codec, int chip, unsigned char addr, unsigned char data)
{
   unsigned int tmp;
   int idx;
   unsigned int addrdata = 0;
   IOPCIDevice *dev = card->pci_dev;
   IOMemoryMap* base = card->iobase;

   if (codec->newflag)
   {
      akm4xxx_write_new(card, codec, chip, addr, data);
      return;
   }

   //IExec->DebugPrintF("AKM: m = %x, %x, data = %x\n", dev->InByte(base + 0x1F), dev->InWord(base + 0x16), data);
   //IExec->DebugPrintF("AKM: %x, %x\n", addr, data);

   tmp = GetGPIOData(dev, base);
    
   tmp |= codec->addflags;
   
   if (codec->cif)
   {
        tmp |= codec->csmask;
   }
   else
   {
        tmp &= ~codec->csmask; // cs down
        SetGPIOData(dev, base, tmp); // set CS low
   }

  	MicroDelay(1);
   

	/* build I2C address + data byte */
	addrdata = (codec->caddr << 6) | 0x20 | (addr & 0x1f); // Chip Address in C1/C0 | r/w bit on (=write) | address & 5 left over bit positions
	addrdata = (addrdata << 8) | data;

	for (idx = 15; idx >= 0; idx--) {

		/* drop clock */
		tmp &= ~codec->clockmask;
		SetGPIOData(dev, base, tmp);
      MicroDelay(1);

		/* set data */
		if (addrdata & (1 << idx))
			tmp |= codec->datamask;
		else
			tmp &= ~codec->datamask;

		SetGPIOData(dev, base, tmp);
		MicroDelay(1);
      
		/* raise clock */
		tmp |= codec->clockmask;
		SetGPIOData(dev, base, tmp);
		MicroDelay(1);
	}

	/* assert a cs pulse to trigger */
   //tmp &= ~codec->clockmask;
   
   if (codec->cif)
   {
        tmp &= ~codec->csmask;
        SetGPIOData(dev, base, tmp);
	    MicroDelay(1);
   }

	tmp |= codec->csmask;
	SetGPIOData(dev, base, tmp);
	MicroDelay(1);
}


// with alsa-like flags
void akm4xxx_write_new(struct CardData *card, struct akm_codec *priv, int chip, unsigned char addr, unsigned char data)
{
   unsigned int tmp;
   int idx;
   unsigned int addrdata = 0;
   IOPCIDevice *dev = card->pci_dev;
   IOMemoryMap *base = card->iobase;

   //IExec->DebugPrintF("AKM: %x, %x\n", addr, data);

   tmp = GetGPIOData(dev, base);
   tmp |= priv->addflags;
   tmp &= ~priv->totalmask;
   if (priv->csmask == priv->csaddr) {
		if (priv->cif) {
			tmp |= priv->csmask; /* start without chip select */
		}  else {
			tmp &= ~priv->csmask; /* chip select low */
            SetGPIOData(dev, base, tmp);
            MicroDelay(1);
		}
	} else {
		/* doesn't handle cf=1 yet */
		tmp &= ~priv->csmask;
		tmp |= priv->csaddr;
        SetGPIOData(dev, base, tmp);
        MicroDelay(1);
	}
  

	/* build I2C address + data byte */
	addrdata = (priv->caddr << 6) | 0x20 | (addr & 0x1f); // Chip Address in C1/C0 | r/w bit on (=write) | address & 5 left over bit positions
	addrdata = (addrdata << 8) | data;

	for (idx = 15; idx >= 0; idx--) {

		/* drop clock */
		tmp &= ~priv->clockmask;
		SetGPIOData(dev, base, tmp);
        MicroDelay(1);

		/* set data */
		if (addrdata & (1 << idx))
			tmp |= priv->datamask;
		else
			tmp &= ~priv->datamask;

		SetGPIOData(dev, base, tmp);
		MicroDelay(1);

		/* raise clock */
		tmp |= priv->clockmask;
		SetGPIOData(dev, base, tmp);
		MicroDelay(1);
	}

   if (priv->csmask == priv->csaddr)
   {
      if (priv->cif) {
        tmp &= ~priv->csmask;
        SetGPIOData(dev, base, tmp);
	    MicroDelay(1);
        }
      tmp |= priv->csmask;
   }
   else {
    tmp &= ~priv->csmask;
	tmp |= priv->csnone;
   }

	SetGPIOData(dev, base, tmp);
	MicroDelay(1);
}

static unsigned char inits_ak4524[] = {
		0x00, 0x07, /* 0: all power up */
		0x01, 0x00, /* 1: ADC/DAC reset */
		0x02, 0x60, /* 2: 24bit I2S */
		0x03, 0x19, /* 3: deemphasis off */
		0x01, 0x03, /* 1: ADC/DAC enable */
		0x04, 0x80, /* 4: ADC IPGA gain 0dB */
		0x05, 0x80, /* 5: ADC IPGA gain 0dB */
		0x06, 0x7E, /* 6: DAC left 0dB (or just below, seems to cure noise) */
		0x07, 0x7E, /* 7: DAC right 0dB */
		0xff, 0xff
	};
	static unsigned char inits_ak4528[] = {
		0x00, 0x07, /* 0: all power up */
		0x01, 0x00, /* 1: ADC/DAC reset */
		0x02, 0x60, /* 2: 24bit I2S */
		0x03, 0x0d, /* 3: deemphasis off, turn LR highpass filters on */
		0x01, 0x03, /* 1: ADC/DAC enable */
		0x04, 0x00, /* 4: ADC left muted */
		0x05, 0x00, /* 5: ADC right muted */
		0xff, 0xff
	};
	static unsigned char inits_ak4529[] = {
		0x09, 0x01, /* 9: ATS=0, RSTN=1 */
		0x0a, 0x3f, /* A: all power up, no zero/overflow detection */
		0x00, 0x0c, /* 0: TDM=0, 24bit I2S, SMUTE=0 */
		0x01, 0x00, /* 1: ACKS=0, ADC, loop off */
		0x02, 0xff, /* 2: LOUT1 muted */
		0x03, 0xff, /* 3: ROUT1 muted */
		0x04, 0xff, /* 4: LOUT2 muted */
		0x05, 0xff, /* 5: ROUT2 muted */
		0x06, 0xff, /* 6: LOUT3 muted */
		0x07, 0xff, /* 7: ROUT3 muted */
		0x0b, 0xff, /* B: LOUT4 muted */
		0x0c, 0xff, /* C: ROUT4 muted */
		0x08, 0x55, /* 8: deemphasis all off */
		0xff, 0xff
	};
	static unsigned char inits_ak4355[] = {
      0x01, 0x03, // soft mute, no reset
      0x03, 0x00, // vol mute
      0x04, 0x00, // vol mute
      0x02, 0x01, // power down dacs
      
      0x01, 0x02, // soft mute + reset
      0x01, 0x03, // soft mute, no reset
      
      0x00, 0x87, // auto + I2S + no reset
      0x01, 0x01, // soft mute off
		0x02, 0x1F, /* double speed + all DAC's power up */
		0x03, 0x00, /* 3: de-emphasis 44.1 kHz */
      
		0x04, 0xFF, /* 4: LOUT1 volume */
		0x05, 0xFF, /* 5: ROUT1 volume */
		0x06, 0xFF, /* 6: LOUT2 volume */
		0x07, 0xFF, /* 7: ROUT2 volume */
		0x08, 0xFF, /* 8: LOUT3 volume */
		0x09, 0xFF, /* 9: ROUT3 volume */
		0x0a, 0x00, /* a: DATT speed=0, ignore DZF */
	    0xff, 0xff
	};

    
    static unsigned char inits_ak4358[] = {
		0x01, 0x02, /* 1: reset and soft-mute */
		0x00, 0x87, /* 0: mode3(i2s), auto-clock detect, disable DZF, sharp roll-off, RSTN#=0 */
		0x01, 0x01,
        0x02, 0x4F, /* 2: DA's power up, normal speed, RSTN#=0 */
		// 0x02, 0x2e, /* quad speed */
		0x03, 0x01, /* 3: de-emphasis off */
		0x04, 0xFF, /* 4: LOUT1 volume */
		0x05, 0xFF, /* 5: ROUT1 volume */
		0x06, 0xFF, /* 6: LOUT2 volume */
		0x07, 0xFF, /* 7: ROUT2 volume */
		0x08, 0xFF, /* 8: LOUT3 volume */
		0x09, 0xFF, /* 9: ROUT3 volume */
		0x0b, 0x00, /* b: LOUT4 volume */
		0x0c, 0x00, /* c: ROUT4 volume */
		0x0a, 0x00, /* a: DATT speed=0, ignore DZF */
        0x0d, 0xFF,
		0xff, 0xff
	};
	static unsigned char inits_ak4381[] = {
      0x00, 0x00, // power down
      0x00, 0x8F, /* 0: mode3(i2s), auto-clock detect, power up */
      0x01, 0x0A, // de-emphases off, double speed
      0x03, 0xFF, /* 3: LATT 0 */
		0x04, 0xFF, /* 4: RATT 0 */
   	0xff, 0xff
	};

    static unsigned char inits_ak5365[] = {
		0x00, 0x00, /* power down */
		0x00, 0x01, /* power up */
        0x01, 0x01, /* 1 = line in */
        0x02, 0x08,
		0x03, 0x00, /* */
		0x04, 0x80, /* gain 0 dB */
		0x05, 0x80, /* gain 0 dB */
		0xff, 0xff
	};

/*
 * initialize all the ak4xxx chips
 */
void Init_akm4xxx(struct CardData *card, struct akm_codec *codec)
{
	
	int num_chips;
	unsigned char *ptr, reg, data, *inits;

	switch (codec->type) {
	case AKM4524:
		inits = inits_ak4524;
		num_chips = 1;
		break;
	case AKM4528:
		inits = inits_ak4528;
		num_chips = 8 / 2;
		break;
	case AKM4529:
		inits = inits_ak4529;
		num_chips = 1;
		break;
	case AKM4355:
		inits = inits_ak4355;
		num_chips = 1;
		break;
    case AKM4358:
        inits = inits_ak4358;
        num_chips = 1;
        break;
	case AKM4381:
		inits = inits_ak4381;
		num_chips = 8 / 2;
		break;

    case AKM5365:
         inits = inits_ak5365;
        num_chips = 1;
        break;
	default:
		inits = inits_ak4524;
      num_chips = 8 / 2;
		return;
	}
   
	//for (chip = 0; chip < num_chips; chip++) {
		ptr = inits;
		while (*ptr != 0xff) {
			reg = *ptr++;
			data = *ptr++;
			akm4xxx_write(card, codec, 0, reg, data);
         MicroDelay(5);
		}
	//}
}

#define AK_GET_CHIP(val)		(((val) >> 8) & 0xff)
#define AK_GET_ADDR(val)		((val) & 0xff)
#define AK_GET_SHIFT(val)		(((val) >> 16) & 0x7f)
#define AK_GET_INVERT(val)		(((val) >> 23) & 1)
#define AK_GET_MASK(val)		(((val) >> 24) & 0xff)
#define AK_COMPOSE(chip,addr,shift,mask) (((chip) << 8) | (addr) | ((shift) << 16) | ((mask) << 24))
#define AK_INVERT 			(1<<23)


#if 0
static int akm4xxx_volume_info(kcontrol_t *kcontrol, ctl_elem_info_t * uinfo)
{
	unsigned int mask = AK_GET_MASK(kcontrol->private_value);

	uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
	uinfo->count = 1;
	uinfo->value.integer.min = 0;
	uinfo->value.integer.max = mask;
	return 0;
}

static int akm4xxx_volume_get(kcontrol_t *kcontrol, ctl_elem_value_t *ucontrol)
{
	akm4xxx_t *ak = _kcontrol_chip(kcontrol);
	int chip = AK_GET_CHIP(kcontrol->private_value);
	int addr = AK_GET_ADDR(kcontrol->private_value);
	int invert = AK_GET_INVERT(kcontrol->private_value);
	unsigned int mask = AK_GET_MASK(kcontrol->private_value);
	unsigned char val = akm4xxx_get(ak, chip, addr);
	
	ucontrol->value.integer.value[0] = invert ? mask - val : val;
	return 0;
}

static int akm4xxx_volume_put(kcontrol_t *kcontrol, ctl_elem_value_t *ucontrol)
{
	akm4xxx_t *ak = _kcontrol_chip(kcontrol);
	int chip = AK_GET_CHIP(kcontrol->private_value);
	int addr = AK_GET_ADDR(kcontrol->private_value);
	int invert = AK_GET_INVERT(kcontrol->private_value);
	unsigned int mask = AK_GET_MASK(kcontrol->private_value);
	unsigned char nval = ucontrol->value.integer.value[0] % (mask+1);
	int change;

	if (invert)
		nval = mask - nval;
	change = akm4xxx_get(ak, chip, addr) != nval;
	if (change)
		akm4xxx_write(ak, chip, addr, nval);
	return change;
}

static int akm4xxx_ipga_gain_info(kcontrol_t *kcontrol, ctl_elem_info_t * uinfo)
{
	uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
	uinfo->count = 1;
	uinfo->value.integer.min = 0;
	uinfo->value.integer.max = 36;
	return 0;
}

static int akm4xxx_ipga_gain_get(kcontrol_t *kcontrol, ctl_elem_value_t *ucontrol)
{
	akm4xxx_t *ak = _kcontrol_chip(kcontrol);
	int chip = AK_GET_CHIP(kcontrol->private_value);
	int addr = AK_GET_ADDR(kcontrol->private_value);
	ucontrol->value.integer.value[0] = akm4xxx_get_ipga(ak, chip, addr) & 0x7f;
	return 0;
}

static int akm4xxx_ipga_gain_put(kcontrol_t *kcontrol, ctl_elem_value_t *ucontrol)
{
	akm4xxx_t *ak = _kcontrol_chip(kcontrol);
	int chip = AK_GET_CHIP(kcontrol->private_value);
	int addr = AK_GET_ADDR(kcontrol->private_value);
	unsigned char nval = (ucontrol->value.integer.value[0] % 37) | 0x80;
	int change = akm4xxx_get_ipga(ak, chip, addr) != nval;
	if (change)
		akm4xxx_write(ak, chip, addr, nval);
	return change;
}

static int akm4xxx_deemphasis_info(kcontrol_t *kcontrol, ctl_elem_info_t *uinfo)
{
	static char *texts[4] = {
		"44.1kHz", "Off", "48kHz", "32kHz",
	};
	uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
	uinfo->count = 1;
	uinfo->value.enumerated.items = 4;
	if (uinfo->value.enumerated.item >= 4)
		uinfo->value.enumerated.item = 3;
	strcpy(uinfo->value.enumerated.name, texts[uinfo->value.enumerated.item]);
	return 0;
}

static int akm4xxx_deemphasis_get(kcontrol_t * kcontrol, ctl_elem_value_t *ucontrol)
{
	akm4xxx_t *ak = _kcontrol_chip(kcontrol);
	int chip = AK_GET_CHIP(kcontrol->private_value);
	int addr = AK_GET_ADDR(kcontrol->private_value);
	int shift = AK_GET_SHIFT(kcontrol->private_value);
	ucontrol->value.enumerated.item[0] = (akm4xxx_get(ak, chip, addr) >> shift) & 3;
	return 0;
}

static int akm4xxx_deemphasis_put(kcontrol_t *kcontrol, ctl_elem_value_t *ucontrol)
{
	akm4xxx_t *ak = _kcontrol_chip(kcontrol);
	int chip = AK_GET_CHIP(kcontrol->private_value);
	int addr = AK_GET_ADDR(kcontrol->private_value);
	int shift = AK_GET_SHIFT(kcontrol->private_value);
	unsigned char nval = ucontrol->value.enumerated.item[0] & 3;
	int change;
	
	nval = (nval << shift) | (akm4xxx_get(ak, chip, addr) & ~(3 << shift));
	change = akm4xxx_get(ak, chip, addr) != nval;
	if (change)
		akm4xxx_write(ak, chip, addr, nval);
	return change;
}

/*
 * build AK4xxx controls
 */

int akm4xxx_build_controls(akm4xxx_t *ak)
{
	unsigned int idx, num_emphs;
	int err;

	for (idx = 0; idx < ak->num_dacs; ++idx) {
		kcontrol_t ctl;
		memset(&ctl, 0, sizeof(ctl));
		strcpy(ctl.id.name, "DAC Volume");
		ctl.id.index = idx + ak->idx_offset * 2;
		ctl.id.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
		ctl.count = 1;
		ctl.info = akm4xxx_volume_info;
		ctl.get = akm4xxx_volume_get;
		ctl.put = akm4xxx_volume_put;
		switch (ak->type) {
		case AK4524:
			ctl.private_value = AK_COMPOSE(idx/2, (idx%2) + 6, 0, 127); /* register 6 & 7 */
			break;
		case AK4528:
			ctl.private_value = AK_COMPOSE(idx/2, (idx%2) + 4, 0, 127); /* register 4 & 5 */
			break;
		case AK4529: {
			int val = idx < 6 ? idx + 2 : (idx - 6) + 0xb; /* registers 2-7 and b,c */
			ctl.private_value = AK_COMPOSE(0, val, 0, 255) | AK_INVERT;
			break;
		}
		case AK4355:
			ctl.private_value = AK_COMPOSE(0, idx + 4, 0, 255); /* register 4-9, chip #0 only */
			break;
		case AK4381:
			ctl.private_value = AK_COMPOSE(idx/2, (idx%2) + 3, 0, 255); /* register 3 & 4 */
			break;
		default:
			return -EINVAL;
			}
		ctl.private_data = ak;
		if ((err = ctl_add(ak->card, ctl_new(&ctl, SNDRV_CTL_ELEM_ACCESS_READ|SNDRV_CTL_ELEM_ACCESS_WRITE))) < 0)
			return err;
	}
	for (idx = 0; idx < ak->num_adcs && ak->type == AK4524; ++idx) {
		kcontrol_t ctl;
		memset(&ctl, 0, sizeof(ctl));
		strcpy(ctl.id.name, "ADC Volume");
		ctl.id.index = idx + ak->idx_offset * 2;
		ctl.id.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
		ctl.count = 1;
		ctl.info = akm4xxx_volume_info;
		ctl.get = akm4xxx_volume_get;
		ctl.put = akm4xxx_volume_put;
		ctl.private_value = AK_COMPOSE(idx/2, (idx%2) + 4, 0, 127); /* register 4 & 5 */
		ctl.private_data = ak;
		if ((err = ctl_add(ak->card, ctl_new(&ctl, SNDRV_CTL_ELEM_ACCESS_READ|SNDRV_CTL_ELEM_ACCESS_WRITE))) < 0)
			return err;
		memset(&ctl, 0, sizeof(ctl));
		strcpy(ctl.id.name, "IPGA Analog Capture Volume");
		ctl.id.index = idx + ak->idx_offset * 2;
		ctl.id.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
		ctl.count = 1;
		ctl.info = akm4xxx_ipga_gain_info;
		ctl.get = akm4xxx_ipga_gain_get;
		ctl.put = akm4xxx_ipga_gain_put;
		ctl.private_value = AK_COMPOSE(idx/2, (idx%2) + 4, 0, 0); /* register 4 & 5 */
		ctl.private_data = ak;
		if ((err = ctl_add(ak->card, ctl_new(&ctl, SNDRV_CTL_ELEM_ACCESS_READ|SNDRV_CTL_ELEM_ACCESS_WRITE))) < 0)
			return err;
	}
	if (ak->type == AK4355)
		num_emphs = 1;
	else
		num_emphs = ak->num_dacs / 2;
	for (idx = 0; idx < num_emphs; idx++) {
		kcontrol_t ctl;
		memset(&ctl, 0, sizeof(ctl));
		strcpy(ctl.id.name, "Deemphasis");
		ctl.id.index = idx + ak->idx_offset;
		ctl.id.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
		ctl.count = 1;
		ctl.info = akm4xxx_deemphasis_info;
		ctl.get = akm4xxx_deemphasis_get;
		ctl.put = akm4xxx_deemphasis_put;
		switch (ak->type) {
		case AK4524:
		case AK4528:
			ctl.private_value = AK_COMPOSE(idx, 3, 0, 0); /* register 3 */
			break;
		case AK4529: {
			int shift = idx == 3 ? 6 : (2 - idx) * 2;
			ctl.private_value = AK_COMPOSE(0, 8, shift, 0); /* register 8 with shift */
			break;
		}
		case AK4355:
			ctl.private_value = AK_COMPOSE(idx, 3, 0, 0);
			break;
		case AK4381:
			ctl.private_value = AK_COMPOSE(idx, 1, 1, 0);
			break;
		}
		ctl.private_data = ak;
		if ((err = ctl_add(ak->card, ctl_new(&ctl, SNDRV_CTL_ELEM_ACCESS_READ|SNDRV_CTL_ELEM_ACCESS_WRITE))) < 0)
			return err;
	}
	return 0;
}

static int __init alsa_akm4xxx_module_init(void)
{
	return 0;
}
        
static void __exit alsa_akm4xxx_module_exit(void)
{
}
        
module_init(alsa_akm4xxx_module_init)
module_exit(alsa_akm4xxx_module_exit)

EXPORT_SYMBOL(akm4xxx_write);
EXPORT_SYMBOL(akm4xxx_reset);
EXPORT_SYMBOL(akm4xxx_init);
EXPORT_SYMBOL(akm4xxx_build_controls);
#endif