* Copyright (c) 2000 Tsubai Masanari. All rights reserved.

/* $NetBSD: awacs.c,v 1.52 2023/08/30 08:38:51 macallan Exp $ */

/*-
* Copyright (c) 2000 Tsubai Masanari. All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. The name of the author may not be used to endorse or promote products
* derived from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
* OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: awacs.c,v 1.52 2023/08/30 08:38:51 macallan Exp $");

#include <sys/param.h>
#include <sys/audioio.h>
#include <sys/device.h>
#include <sys/systm.h>
#include <sys/kthread.h>
#include <sys/kernel.h>
#include <sys/mutex.h>
#include <sys/condvar.h>

#include <dev/audio/audio_if.h>

#include <uvm/uvm_extern.h>
#include <machine/autoconf.h>
#include <machine/pio.h>

#include <dev/ofw/openfirm.h>
#include <macppc/dev/dbdma.h>

#include <dev/i2c/sgsmixvar.h>
#include "sgsmix.h"
#include "opt_awacs.h"

#ifdef AWACS_DEBUG
# define DPRINTF printf
#else
# define DPRINTF while (0) printf
#endif

struct awacs_softc {
device_t sc_dev;
bus_space_tag_t sc_tag;
bus_space_handle_t sc_regh;
bus_space_handle_t sc_idmah;
bus_space_handle_t sc_odmah;
void (*sc_ointr)(void *); /* DMA completion intr handler */
void *sc_oarg; /* arg for sc_ointr() */
int sc_opages; /* # of output pages */

void (*sc_iintr)(void *); /* DMA completion intr handler */
void *sc_iarg; /* arg for sc_iintr() */

uint32_t sc_record_source; /* recording source mask */
uint32_t sc_output_mask; /* output mask */
uint32_t sc_headphones_mask; /* which reading of the gpio means */
uint32_t sc_headphones_in; /* headphones are present */

int sc_screamer;
int sc_have_perch;
int vol_l, vol_r;
int sc_bass, sc_treble;
lwp_t *sc_thread;
kcondvar_t sc_event;
int sc_output_wanted;
int sc_need_parallel_output;
#if NSGSMIX > 0
device_t sc_sgsmix;
#endif

u_int sc_codecctl0;
u_int sc_codecctl1;
u_int sc_codecctl2;
u_int sc_codecctl4;
u_int sc_codecctl5;
u_int sc_codecctl6;
u_int sc_codecctl7;
u_int sc_soundctl;

struct dbdma_regmap *sc_odma;
struct dbdma_regmap *sc_idma;
struct dbdma_command *sc_odmacmd;
struct dbdma_command *sc_idmacmd;

kmutex_t sc_lock;
kmutex_t sc_event_lock;
kmutex_t sc_intr_lock;
};

static int awacs_match(device_t, struct cfdata *, void *);
static void awacs_attach(device_t, device_t, void *);
static int awacs_intr(void *);
static int awacs_status_intr(void *);

static int awacs_query_format(void *, audio_format_query_t *);
static int awacs_set_format(void *, int,
const audio_params_t *, const audio_params_t *,
audio_filter_reg_t *, audio_filter_reg_t *);

static int awacs_round_blocksize(void *, int, int, const audio_params_t *);
static int awacs_trigger_output(void *, void *, void *, int, void (*)(void *),
void *, const audio_params_t *);
static int awacs_trigger_input(void *, void *, void *, int, void (*)(void *),
void *, const audio_params_t *);
static int awacs_halt_output(void *);
static int awacs_halt_input(void *);
static int awacs_getdev(void *, struct audio_device *);
static int awacs_set_port(void *, mixer_ctrl_t *);
static int awacs_get_port(void *, mixer_ctrl_t *);
static int awacs_query_devinfo(void *, mixer_devinfo_t *);
static size_t awacs_round_buffersize(void *, int, size_t);
static int awacs_get_props(void *);
static void awacs_get_locks(void *, kmutex_t **, kmutex_t **);

static inline u_int awacs_read_reg(struct awacs_softc *, int);
static inline void awacs_write_reg(struct awacs_softc *, int, int);
static void awacs_write_codec(struct awacs_softc *, int);

void awacs_set_volume(struct awacs_softc *, int, int);
static void awacs_set_speaker_volume(struct awacs_softc *, int, int);
static void awacs_set_ext_volume(struct awacs_softc *, int, int);
static void awacs_set_loopthrough_volume(struct awacs_softc *, int, int);
static int awacs_set_rate(struct awacs_softc *, const audio_params_t *);
static void awacs_select_output(struct awacs_softc *, int);
static int awacs_check_headphones(struct awacs_softc *);
static void awacs_thread(void *);

#if NSGSMIX > 0
static void awacs_set_bass(struct awacs_softc *, int);
static void awacs_set_treble(struct awacs_softc *, int);
#endif
static int awacs_setup_sgsmix(device_t);

CFATTACH_DECL_NEW(awacs, sizeof(struct awacs_softc),
awacs_match, awacs_attach, NULL, NULL);

const struct audio_hw_if awacs_hw_if = {
.query_format = awacs_query_format,
.set_format = awacs_set_format,
.round_blocksize = awacs_round_blocksize,
.halt_output = awacs_halt_output,
.halt_input = awacs_halt_input,
.getdev = awacs_getdev,
.set_port = awacs_set_port,
.get_port = awacs_get_port,
.query_devinfo = awacs_query_devinfo,
.round_buffersize = awacs_round_buffersize,
.get_props = awacs_get_props,
.trigger_output = awacs_trigger_output,
.trigger_input = awacs_trigger_input,
.get_locks = awacs_get_locks,
};

struct audio_device awacs_device = {
"AWACS",
"",
"awacs"
};

static const struct audio_format awacs_formats[] = {
{
.mode = AUMODE_PLAY | AUMODE_RECORD,
.encoding = AUDIO_ENCODING_SLINEAR_BE,
.validbits = 16,
.precision = 16,
.channels = 2,
.channel_mask = AUFMT_STEREO,
.frequency_type = 8,
.frequency =
{ 7350, 8820, 11025, 14700, 17640, 22050, 29400, 44100 },
}
};
#define AWACS_NFORMATS __arraycount(awacs_formats)

/* register offset */
#define AWACS_SOUND_CTRL 0x00
#define AWACS_CODEC_CTRL 0x10
#define AWACS_CODEC_STATUS 0x20
#define AWACS_CLIP_COUNT 0x30
#define AWACS_BYTE_SWAP 0x40

/* sound control */
#define AWACS_INPUT_SUBFRAME0 0x00000001
#define AWACS_INPUT_SUBFRAME1 0x00000002
#define AWACS_INPUT_SUBFRAME2 0x00000004
#define AWACS_INPUT_SUBFRAME3 0x00000008

#define AWACS_OUTPUT_SUBFRAME0 0x00000010
#define AWACS_OUTPUT_SUBFRAME1 0x00000020
#define AWACS_OUTPUT_SUBFRAME2 0x00000040
#define AWACS_OUTPUT_SUBFRAME3 0x00000080

#define AWACS_RATE_44100 0x00000000
#define AWACS_RATE_29400 0x00000100
#define AWACS_RATE_22050 0x00000200
#define AWACS_RATE_17640 0x00000300
#define AWACS_RATE_14700 0x00000400
#define AWACS_RATE_11025 0x00000500
#define AWACS_RATE_8820 0x00000600
#define AWACS_RATE_7350 0x00000700
#define AWACS_RATE_MASK 0x00000700

#define AWACS_ERROR 0x00000800
#define AWACS_PORTCHG 0x00001000
#define AWACS_INTR_ERROR 0x00002000 /* interrupt on error */
#define AWACS_INTR_PORTCHG 0x00004000 /* interrupt on port change */

#define AWACS_STATUS_SUBFRAME 0x00018000 /* mask */

/* codec control */
#define AWACS_CODEC_ADDR0 0x00000000
#define AWACS_CODEC_ADDR1 0x00001000
#define AWACS_CODEC_ADDR2 0x00002000
#define AWACS_CODEC_ADDR4 0x00004000
#define AWACS_CODEC_ADDR5 0x00005000
#define AWACS_CODEC_ADDR6 0x00006000
#define AWACS_CODEC_ADDR7 0x00007000
#define AWACS_CODEC_EMSEL0 0x00000000
#define AWACS_CODEC_EMSEL1 0x00400000
#define AWACS_CODEC_EMSEL2 0x00800000
#define AWACS_CODEC_EMSEL4 0x00c00000
#define AWACS_CODEC_BUSY 0x01000000

/* cc0 */
#define AWACS_DEFAULT_CD_GAIN 0x000000bb
#define AWACS_INPUT_CD 0x00000200
#define AWACS_INPUT_LINE 0x00000400
#define AWACS_INPUT_MICROPHONE 0x00000800
#define AWACS_INPUT_MASK 0x00000e00

/* cc1 */
#define AWACS_LOOP_THROUGH 0x00000040
#define AWACS_MUTE_SPEAKER 0x00000080
#define AWACS_MUTE_HEADPHONE 0x00000200
#define AWACS_PARALLEL_OUTPUT 0x00000c00

/* output */
#define OUTPUT_SPEAKER 1
#define OUTPUT_HEADPHONES 2

/* codec status */

static const char *screamer[] = {"screamer", NULL};

/*
* list machines that have the headphone detect GPIO reversed here.
* so far the only known case is the PowerBook 3400c and similar machines
*/
static const char *detect_reversed[] = {"AAPL,3400/2400",
"AAPL,3500",
NULL};

static const char *use_gpio4[] = { "PowerMac3,1",
"PowerMac3,2",
"PowerMac3,3",
NULL};

/*
* list of machines that do not require AWACS_PARALLEL_OUTPUT
*/
static const char *no_parallel_output[] = { "PowerBook3,1",
NULL};

static int
awacs_match(device_t parent, struct cfdata *match, void *aux)
{
struct confargs *ca;

ca = aux;

if (strcmp(ca->ca_name, "awacs") == 0 ||
strcmp(ca->ca_name, "davbus") == 0)
return 100;

if (ca->ca_nreg < 24 || ca->ca_nintr < 12)
return 0;

if (strcmp(ca->ca_name, "i2s") == 0)
return 1;

return 0;
}

static void
awacs_attach(device_t parent, device_t self, void *aux)
{
struct awacs_softc *sc;
struct confargs *ca = aux;
int cirq, oirq, iirq, cirq_type, oirq_type, iirq_type;
int len = -1, perch;
int root_node;
char compat[256], intr_xname[INTRDEVNAMEBUF];

sc = device_private(self);
sc->sc_dev = self;
sc->sc_tag = ca->ca_tag;

if (bus_space_map(sc->sc_tag, ca->ca_baseaddr + ca->ca_reg[0],
ca->ca_reg[1], 0, &sc->sc_regh) != 0)
printf("couldn't map codec registers\n");
if (bus_space_map(sc->sc_tag, ca->ca_baseaddr + ca->ca_reg[2],
ca->ca_reg[3], BUS_SPACE_MAP_LINEAR, &sc->sc_odmah) != 0)
printf("couldn't map DMA out registers\n");
if (bus_space_map(sc->sc_tag, ca->ca_baseaddr + ca->ca_reg[4],
ca->ca_reg[5], BUS_SPACE_MAP_LINEAR, &sc->sc_idmah) != 0)
printf("couldn't map DMA in registers\n");

sc->sc_odma = bus_space_vaddr(sc->sc_tag, sc->sc_odmah);
sc->sc_idma = bus_space_vaddr(sc->sc_tag, sc->sc_idmah);
sc->sc_odmacmd = dbdma_alloc(20 * sizeof(struct dbdma_command), NULL);
sc->sc_idmacmd = dbdma_alloc(20 * sizeof(struct dbdma_command), NULL);

if (strcmp(ca->ca_name, "i2s") == 0) {
int node, intr[6];

node = OF_child(ca->ca_node);
if (node == 0) {
printf("no i2s-a child\n");
return;
}
if (OF_getprop(node, "interrupts", intr, sizeof(intr)) == -1) {
printf("no interrupt property\n");
return;
}

cirq = intr[0];
oirq = intr[2];
iirq = intr[4];
cirq_type = intr[1] ? IST_LEVEL : IST_EDGE;
oirq_type = intr[3] ? IST_LEVEL : IST_EDGE;
iirq_type = intr[5] ? IST_LEVEL : IST_EDGE;
} else if (ca->ca_nintr == 24) {
cirq = ca->ca_intr[0];
oirq = ca->ca_intr[2];
iirq = ca->ca_intr[4];
cirq_type = ca->ca_intr[1] ? IST_LEVEL : IST_EDGE;
oirq_type = ca->ca_intr[3] ? IST_LEVEL : IST_EDGE;
iirq_type = ca->ca_intr[5] ? IST_LEVEL : IST_EDGE;
} else {
cirq = ca->ca_intr[0];
oirq = ca->ca_intr[1];
iirq = ca->ca_intr[2];
cirq_type = oirq_type = iirq_type = IST_EDGE;
}

snprintf(intr_xname, sizeof(intr_xname), "%s status",
device_xname(self));
intr_establish_xname(cirq, cirq_type, IPL_BIO, awacs_status_intr, sc,
intr_xname);

snprintf(intr_xname, sizeof(intr_xname), "%s out", device_xname(self));
intr_establish_xname(oirq, oirq_type, IPL_AUDIO, awacs_intr, sc,
intr_xname);

snprintf(intr_xname, sizeof(intr_xname), "%s in", device_xname(self));
intr_establish_xname(iirq, iirq_type, IPL_AUDIO, awacs_intr, sc,
intr_xname);

mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
mutex_init(&sc->sc_event_lock, MUTEX_DEFAULT, IPL_NONE);
mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_AUDIO);

cv_init(&sc->sc_event, "awacs_wait");

/* check if the chip is a screamer */
sc->sc_screamer = of_compatible(ca->ca_node, screamer);
if (!sc->sc_screamer) {
/* look for 'sound' child node */
int sound_node;

sound_node = OF_child(ca->ca_node);
while ((sound_node != 0) && (!sc->sc_screamer)) {

sc->sc_screamer = of_compatible(sound_node, screamer);
sound_node = OF_peer(sound_node);
}
}

if (sc->sc_screamer) {
printf(" Screamer");
}

printf(": irq %d,%d,%d\n", cirq, oirq, iirq);

sc->vol_l = 0;
sc->vol_r = 0;

sc->sc_soundctl = AWACS_INPUT_SUBFRAME0 | AWACS_OUTPUT_SUBFRAME0 |
AWACS_RATE_44100 | AWACS_INTR_PORTCHG;
awacs_write_reg(sc, AWACS_SOUND_CTRL, sc->sc_soundctl);

sc->sc_codecctl0 = AWACS_CODEC_ADDR0 | AWACS_CODEC_EMSEL0;
sc->sc_codecctl1 = AWACS_CODEC_ADDR1 | AWACS_CODEC_EMSEL0;
sc->sc_codecctl2 = AWACS_CODEC_ADDR2 | AWACS_CODEC_EMSEL0;
sc->sc_codecctl4 = AWACS_CODEC_ADDR4 | AWACS_CODEC_EMSEL0;
sc->sc_codecctl5 = AWACS_CODEC_ADDR5 | AWACS_CODEC_EMSEL0;
sc->sc_codecctl6 = AWACS_CODEC_ADDR6 | AWACS_CODEC_EMSEL0;
sc->sc_codecctl7 = AWACS_CODEC_ADDR7 | AWACS_CODEC_EMSEL0;

sc->sc_codecctl0 |= AWACS_INPUT_CD | AWACS_DEFAULT_CD_GAIN;
awacs_write_codec(sc, sc->sc_codecctl0);

/* Set loopthrough for external mixer on beige G3 */
sc->sc_codecctl1 |= AWACS_LOOP_THROUGH;

printf("%s: ", device_xname(sc->sc_dev));

/*
* all(?) awacs have GPIOs to detect if there's something plugged into
* the headphone jack. The other GPIOs are either used for other jacks
* ( the PB3400c's microphone jack for instance ) or unused.
* The problem is that there are at least three different ways how
* those GPIOs are wired to the actual jacks.
* For now we bother only with headphone detection
*/
perch = OF_finddevice("/perch");
root_node = OF_finddevice("/");
if (of_compatible(root_node, detect_reversed)) {

/* 0x02 is for the microphone jack, high active */
/*
* for some reason the gpio for the headphones jack is low
* active on the PB3400 and similar machines
*/
sc->sc_headphones_mask = 0x8;
sc->sc_headphones_in = 0x0;
} else if ((perch != -1) || of_compatible(root_node, use_gpio4)) {
/*
* this is for the beige G3's 'personality card' which uses
* yet another wiring of the headphone detect GPIOs
* some G4s use it as well
*/
sc->sc_headphones_mask = 0x04;
sc->sc_headphones_in = 0x04;
} else {
/* while on most machines it's high active as well */
sc->sc_headphones_mask = 0x8;
sc->sc_headphones_in = 0x8;
}

if (of_compatible(root_node, no_parallel_output))
sc->sc_need_parallel_output = 0;
else {
sc->sc_need_parallel_output = 1;
sc->sc_codecctl1 |= AWACS_PARALLEL_OUTPUT;
}

if (awacs_check_headphones(sc)) {

/* default output to headphones */
printf("headphones\n");
sc->sc_output_mask = OUTPUT_HEADPHONES;
} else {

/* default output to speakers */
printf("speaker\n");
sc->sc_output_mask = OUTPUT_SPEAKER;
}
sc->sc_output_wanted = sc->sc_output_mask;
awacs_select_output(sc, sc->sc_output_mask);

delay(100);
if (sc->sc_screamer) {
awacs_write_codec(sc, sc->sc_codecctl6);
awacs_write_codec(sc, sc->sc_codecctl5);
delay(2);
awacs_write_codec(sc, sc->sc_codecctl1);
awacs_write_codec(sc, sc->sc_codecctl7);
}

/* default input from CD */
sc->sc_record_source = 1 << 0;
sc->sc_codecctl0 &= ~AWACS_INPUT_MASK;
sc->sc_codecctl0 |= AWACS_INPUT_CD;
awacs_write_codec(sc, sc->sc_codecctl0);

/* Enable interrupts and looping mode. */
/* XXX ... */

sc->sc_codecctl1 |= AWACS_LOOP_THROUGH;
if (sc->sc_need_parallel_output)
sc->sc_codecctl1 |= AWACS_PARALLEL_OUTPUT;
awacs_write_codec(sc, sc->sc_codecctl1);

#if NSGSMIX > 0
sc->sc_sgsmix = NULL;
#endif
sc->sc_have_perch = 0;
if (perch != -1) {

len = OF_getprop(perch, "compatible", compat, 255);
if (len > 0) {
printf("%s: found '%s' personality card\n",
device_xname(sc->sc_dev), compat);
sc->sc_have_perch = 1;
config_finalize_register(sc->sc_dev,
awacs_setup_sgsmix);
}
}

/* Set initial volume[s] */
awacs_set_volume(sc, 144, 144);
awacs_set_loopthrough_volume(sc, 0, 0);

audio_attach_mi(&awacs_hw_if, sc, sc->sc_dev);

if (kthread_create(PRI_NONE, 0, NULL, awacs_thread, sc,
&sc->sc_thread, "%s", "awacs") != 0) {
printf("awacs: unable to create event kthread");
}
pmf_device_register(sc->sc_dev, NULL, NULL);
}

static int
awacs_setup_sgsmix(device_t cookie)
{
struct awacs_softc *sc = device_private(cookie);
#if NSGSMIX > 0
device_t dv;
deviter_t di;
#endif

if (!sc->sc_have_perch)
return 0;
#if NSGSMIX > 0
/* look for sgsmix */
for (dv = deviter_first(&di, DEVITER_F_ROOT_FIRST);
dv != NULL;
dv = deviter_next(&di)) {
if (device_is_a(dv, "sgsmix")) {
sc->sc_sgsmix = dv;
break;
}
}
deviter_release(&di);
if (sc->sc_sgsmix == NULL)
return 0;

printf("%s: using %s\n", device_xname(sc->sc_dev),
device_xname(sc->sc_sgsmix));

sc->sc_codecctl1 &= ~AWACS_MUTE_HEADPHONE;
awacs_write_codec(sc, sc->sc_codecctl1);

awacs_select_output(sc, sc->sc_output_mask);
awacs_set_volume(sc, sc->vol_l, sc->vol_r);
awacs_set_bass(sc, 128);
awacs_set_treble(sc, 128);
cv_signal(&sc->sc_event);
#endif
return 0;
}

static inline u_int
awacs_read_reg(struct awacs_softc *sc, int reg)
{

return bus_space_read_4(sc->sc_tag, sc->sc_regh, reg);
}

static inline void
awacs_write_reg(struct awacs_softc *sc, int reg, int val)
{

bus_space_write_4(sc->sc_tag, sc->sc_regh, reg, val);
}

static void
awacs_write_codec(struct awacs_softc *sc, int value)
{

do {
delay(100);
} while (awacs_read_reg(sc, AWACS_CODEC_CTRL) & AWACS_CODEC_BUSY);

awacs_write_reg(sc, AWACS_CODEC_CTRL, value);

do {
delay(100);
} while (awacs_read_reg(sc, AWACS_CODEC_CTRL) & AWACS_CODEC_BUSY);
}

static int
awacs_intr(void *v)
{
struct awacs_softc *sc;
struct dbdma_command *cmd;
int count;
int status;

sc = v;
mutex_spin_enter(&sc->sc_intr_lock);
cmd = sc->sc_odmacmd;
count = sc->sc_opages;
/* Fill used buffer(s). */
while (count-- > 0) {
/* if DBDMA_INT_ALWAYS */
if (in16rb(&cmd->d_command) & 0x30) { /* XXX */
status = in16rb(&cmd->d_status);
cmd->d_status = 0;
if (status) /* status == 0x8400 */
if (sc->sc_ointr)
(*sc->sc_ointr)(sc->sc_oarg);
}
cmd++;
}
mutex_spin_exit(&sc->sc_intr_lock);

return 1;
}

static int
awacs_query_format(void *h, audio_format_query_t *afp)
{

return audio_query_format(awacs_formats, AWACS_NFORMATS, afp);
}

static int
awacs_set_format(void *h, int setmode,
const audio_params_t *play, const audio_params_t *rec,
audio_filter_reg_t *pfil, audio_filter_reg_t *rfil)
{
struct awacs_softc *sc;

sc = h;

/* *play and *rec are the identical because !AUDIO_PROP_INDEPENDENT. */

awacs_write_reg(sc, AWACS_BYTE_SWAP, 0);

if (awacs_set_rate(sc, play))
return EINVAL;
return 0;
}

static int
awacs_round_blocksize(void *h, int size, int mode, const audio_params_t *param)
{

if (size < PAGE_SIZE)
size = PAGE_SIZE;
return size & ~PGOFSET;
}

static int
awacs_halt_output(void *h)
{
struct awacs_softc *sc;

sc = h;
dbdma_stop(sc->sc_odma);
dbdma_reset(sc->sc_odma);
sc->sc_ointr = NULL;
return 0;
}

static int
awacs_halt_input(void *h)
{
struct awacs_softc *sc;

sc = h;
dbdma_stop(sc->sc_idma);
dbdma_reset(sc->sc_idma);
sc->sc_iintr = NULL;
return 0;
}

static int
awacs_getdev(void *h, struct audio_device *retp)
{

*retp = awacs_device;
return 0;
}

enum {
AWACS_MONITOR_CLASS,
AWACS_OUTPUT_CLASS,
AWACS_RECORD_CLASS,
AWACS_OUTPUT_SELECT,
AWACS_VOL_MASTER,
AWACS_INPUT_SELECT,
AWACS_VOL_INPUT,
AWACS_VOL_MONITOR,
AWACS_BASS,
AWACS_TREBLE,
AWACS_ENUM_LAST
};

static int
awacs_set_port(void *h, mixer_ctrl_t *mc)
{
struct awacs_softc *sc;
int l, r;

DPRINTF("awacs_set_port dev = %d, type = %d\n", mc->dev, mc->type);
sc = h;
l = mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT];
r = mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT];

switch (mc->dev) {
case AWACS_OUTPUT_SELECT:
/* No change necessary? */
if (mc->un.mask == sc->sc_output_mask)
return 0;
awacs_select_output(sc, mc->un.mask);
return 0;

case AWACS_VOL_MASTER:
awacs_set_volume(sc, l, r);
return 0;

case AWACS_INPUT_SELECT:
/* no change necessary? */
if (mc->un.mask == sc->sc_record_source)
return 0;
switch (mc->un.mask) {
case 1 << 0: /* CD */
sc->sc_codecctl0 &= ~AWACS_INPUT_MASK;
sc->sc_codecctl0 |= AWACS_INPUT_CD;
awacs_write_codec(sc, sc->sc_codecctl0);
break;
case 1 << 1: /* microphone */
sc->sc_codecctl0 &= ~AWACS_INPUT_MASK;
sc->sc_codecctl0 |= AWACS_INPUT_MICROPHONE;
awacs_write_codec(sc, sc->sc_codecctl0);
break;
case 1 << 2: /* line in */
sc->sc_codecctl0 &= ~AWACS_INPUT_MASK;
sc->sc_codecctl0 |= AWACS_INPUT_LINE;
awacs_write_codec(sc, sc->sc_codecctl0);
break;
default: /* invalid argument */
return EINVAL;
}
sc->sc_record_source = mc->un.mask;
return 0;

case AWACS_VOL_INPUT:
sc->sc_codecctl0 &= ~0xff;
sc->sc_codecctl0 |= (l & 0xf0) | (r >> 4);
awacs_write_codec(sc, sc->sc_codecctl0);
return 0;

case AWACS_VOL_MONITOR:
awacs_set_loopthrough_volume(sc, l, r);
return 0;

#if NSGSMIX > 0
case AWACS_BASS:
awacs_set_bass(sc, l);
return 0;

case AWACS_TREBLE:
awacs_set_treble(sc, l);
return 0;
#endif
}

return ENXIO;
}

static int
awacs_get_port(void *h, mixer_ctrl_t *mc)
{
struct awacs_softc *sc;
int l, r, vol;

sc = h;
switch (mc->dev) {
case AWACS_OUTPUT_SELECT:
mc->un.mask = sc->sc_output_mask;
return 0;

case AWACS_VOL_MASTER:
mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT] = sc->vol_l;
mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] = sc->vol_r;
return 0;

case AWACS_INPUT_SELECT:
mc->un.mask = sc->sc_record_source;
return 0;

case AWACS_VOL_INPUT:
vol = sc->sc_codecctl0 & 0xff;
l = (vol & 0xf0);
r = (vol & 0x0f) << 4;
mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT] = l;
mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] = r;
return 0;

case AWACS_VOL_MONITOR:
vol = sc->sc_codecctl5 & 0x3cf;
l = (vol & 0x3c0) >> 6;
r = vol & 0xf;
mc->un.value.level[AUDIO_MIXER_LEVEL_LEFT] = (15 - l) << 4;
mc->un.value.level[AUDIO_MIXER_LEVEL_RIGHT] = (15 - r) << 4;
return 0;

#if NSGSMIX > 0
case AWACS_BASS:
mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_bass;
return 0;

case AWACS_TREBLE:
mc->un.value.level[AUDIO_MIXER_LEVEL_MONO] = sc->sc_treble;
return 0;
#endif

default:
return ENXIO;
}

return 0;
}

static int
awacs_query_devinfo(void *h, mixer_devinfo_t *dip)
{
#if NSGSMIX > 0
struct awacs_softc *sc = h;
#endif

switch (dip->index) {

case AWACS_OUTPUT_SELECT:
dip->mixer_class = AWACS_OUTPUT_CLASS;
strcpy(dip->label.name, AudioNoutput);
dip->type = AUDIO_MIXER_SET;
dip->prev = dip->next = AUDIO_MIXER_LAST;
dip->un.s.num_mem = 2;
strcpy(dip->un.s.member[0].label.name, AudioNspeaker);
dip->un.s.member[0].mask = 1 << 0;
strcpy(dip->un.s.member[1].label.name, AudioNheadphone);
dip->un.s.member[1].mask = 1 << 1;
return 0;

case AWACS_VOL_MASTER:
dip->mixer_class = AWACS_OUTPUT_CLASS;
strcpy(dip->label.name, AudioNmaster);
dip->type = AUDIO_MIXER_VALUE;
dip->prev = dip->next = AUDIO_MIXER_LAST;
dip->un.v.num_channels = 2;
dip->un.v.delta = 16;
strcpy(dip->un.v.units.name, AudioNvolume);
return 0;

case AWACS_VOL_MONITOR:
dip->mixer_class = AWACS_MONITOR_CLASS;
strcpy(dip->label.name, AudioNmonitor);
dip->type = AUDIO_MIXER_VALUE;
dip->prev = dip->next = AUDIO_MIXER_LAST;
dip->un.v.num_channels = 2;
strcpy(dip->un.v.units.name, AudioNvolume);
return 0;

#if NSGSMIX > 0
case AWACS_BASS:
if (sc->sc_sgsmix == NULL)
return ENXIO;
dip->mixer_class = AWACS_OUTPUT_CLASS;
strcpy(dip->label.name, AudioNbass);
dip->type = AUDIO_MIXER_VALUE;
dip->prev = dip->next = AUDIO_MIXER_LAST;
dip->un.v.num_channels = 1;
strcpy(dip->un.v.units.name, AudioNbass);
return 0;

case AWACS_TREBLE:
if (sc->sc_sgsmix == NULL)
return ENXIO;
dip->mixer_class = AWACS_OUTPUT_CLASS;
strcpy(dip->label.name, AudioNtreble);
dip->type = AUDIO_MIXER_VALUE;
dip->prev = dip->next = AUDIO_MIXER_LAST;
dip->un.v.num_channels = 1;
strcpy(dip->un.v.units.name, AudioNtreble);
return 0;
#endif

case AWACS_INPUT_SELECT:
dip->mixer_class = AWACS_RECORD_CLASS;
strcpy(dip->label.name, AudioNsource);
dip->type = AUDIO_MIXER_SET;
dip->prev = dip->next = AUDIO_MIXER_LAST;
dip->un.s.num_mem = 3;
strcpy(dip->un.s.member[0].label.name, AudioNcd);
dip->un.s.member[0].mask = 1 << 0;
strcpy(dip->un.s.member[1].label.name, AudioNmicrophone);
dip->un.s.member[1].mask = 1 << 1;
strcpy(dip->un.s.member[2].label.name, AudioNline);
dip->un.s.member[2].mask = 1 << 2;
return 0;

case AWACS_VOL_INPUT:
dip->mixer_class = AWACS_RECORD_CLASS;
strcpy(dip->label.name, AudioNrecord);
dip->type = AUDIO_MIXER_VALUE;
dip->prev = dip->next = AUDIO_MIXER_LAST;
dip->un.v.num_channels = 2;
strcpy(dip->un.v.units.name, AudioNvolume);
return 0;

case AWACS_MONITOR_CLASS:
dip->mixer_class = AWACS_MONITOR_CLASS;
strcpy(dip->label.name, AudioCmonitor);
dip->type = AUDIO_MIXER_CLASS;
dip->next = dip->prev = AUDIO_MIXER_LAST;
return 0;

case AWACS_OUTPUT_CLASS:
dip->mixer_class = AWACS_OUTPUT_CLASS;
strcpy(dip->label.name, AudioCoutputs);
dip->type = AUDIO_MIXER_CLASS;
dip->next = dip->prev = AUDIO_MIXER_LAST;
return 0;

case AWACS_RECORD_CLASS:
dip->mixer_class = AWACS_RECORD_CLASS;
strcpy(dip->label.name, AudioCrecord);
dip->type = AUDIO_MIXER_CLASS;
dip->next = dip->prev = AUDIO_MIXER_LAST;
return 0;
}

return ENXIO;
}

static size_t
awacs_round_buffersize(void *h, int dir, size_t size)
{

if (size > 65536)
size = 65536;
return size;
}

static int
awacs_get_props(void *h)
{

return AUDIO_PROP_PLAYBACK | AUDIO_PROP_CAPTURE |
AUDIO_PROP_FULLDUPLEX;
}

static int
awacs_trigger_output(void *h, void *start, void *end, int bsize,
void (*intr)(void *), void *arg,
const audio_params_t *param)
{
struct awacs_softc *sc;
struct dbdma_command *cmd;
vaddr_t va;
int i, len, intmode;

DPRINTF("trigger_output %p %p 0x%x\n", start, end, bsize);
sc = h;
cmd = sc->sc_odmacmd;
sc->sc_ointr = intr;
sc->sc_oarg = arg;
sc->sc_opages = ((char *)end - (char *)start) / PAGE_SIZE;

#ifdef DIAGNOSTIC
if (sc->sc_opages > 16)
panic("awacs_trigger_output");
#endif

va = (vaddr_t)start;
len = 0;
for (i = sc->sc_opages; i > 0; i--) {
len += PAGE_SIZE;
if (len < bsize)
intmode = DBDMA_INT_NEVER;
else {
len = 0;
intmode = DBDMA_INT_ALWAYS;
}

DBDMA_BUILD(cmd, DBDMA_CMD_OUT_MORE, 0, PAGE_SIZE, vtophys(va),
intmode, DBDMA_WAIT_NEVER, DBDMA_BRANCH_NEVER);
va += PAGE_SIZE;
cmd++;
}

DBDMA_BUILD(cmd, DBDMA_CMD_NOP, 0, 0, 0,
DBDMA_INT_NEVER, DBDMA_WAIT_NEVER, DBDMA_BRANCH_ALWAYS);
out32rb(&cmd->d_cmddep, vtophys((vaddr_t)sc->sc_odmacmd));

dbdma_start(sc->sc_odma, sc->sc_odmacmd);

return 0;
}

static int
awacs_trigger_input(void *h, void *start, void *end, int bsize,
void (*intr)(void *), void *arg,
const audio_params_t *param)
{

DPRINTF("awacs_trigger_input called\n");
return 1;
}

static void
awacs_get_locks(void *opaque, kmutex_t **intr, kmutex_t **thread)
{
struct awacs_softc *sc = opaque;

*intr = &sc->sc_intr_lock;
*thread = &sc->sc_lock;
}

static void
awacs_select_output(struct awacs_softc *sc, int mask)
{

#if NSGSMIX > 0
if (sc->sc_sgsmix) {
if (mask & OUTPUT_HEADPHONES) {
/* mute speakers */
sgsmix_set_speaker_vol(sc->sc_sgsmix, 0, 0);
sgsmix_set_headphone_vol(sc->sc_sgsmix,
sc->vol_l, sc->vol_r);
}
if (mask & OUTPUT_SPEAKER) {
/* mute headphones */
sgsmix_set_speaker_vol(sc->sc_sgsmix,
sc->vol_l, sc->vol_r);
sgsmix_set_headphone_vol(sc->sc_sgsmix, 0, 0);
}
} else {
#endif
sc->sc_codecctl1 |= AWACS_MUTE_SPEAKER | AWACS_MUTE_HEADPHONE;
if ((sc->vol_l > 0) || (sc->vol_r > 0)) {
if (mask & OUTPUT_SPEAKER)
sc->sc_codecctl1 &= ~AWACS_MUTE_SPEAKER;
if (mask & OUTPUT_HEADPHONES)
sc->sc_codecctl1 &= ~AWACS_MUTE_HEADPHONE;
}
awacs_write_codec(sc, sc->sc_codecctl1);
#if NSGSMIX > 0
}
#endif
sc->sc_output_mask = mask;
}

static void
awacs_set_speaker_volume(struct awacs_softc *sc, int left, int right)
{

#if NSGSMIX > 0
if (sc->sc_sgsmix) {
if (sc->sc_output_mask & OUTPUT_SPEAKER)
sgsmix_set_speaker_vol(sc->sc_sgsmix, left, right);
} else
#endif
{
int lval;
int rval;
uint32_t codecctl = sc->sc_codecctl1;

lval = 15 - ((left & 0xf0) >> 4);
rval = 15 - ((right & 0xf0) >> 4);
DPRINTF("speaker_volume %d %d\n", lval, rval);

sc->sc_codecctl4 &= ~0x3cf;
sc->sc_codecctl4 |= (lval << 6) | rval;
awacs_write_codec(sc, sc->sc_codecctl4);
if ((left == 0) && (right == 0)) {
/*
* max. attenuation doesn't mean silence so we need to
* mute the output channel here
*/
codecctl |= AWACS_MUTE_SPEAKER;
} else if (sc->sc_output_mask & OUTPUT_SPEAKER) {
codecctl &= ~AWACS_MUTE_SPEAKER;
}

if (codecctl != sc->sc_codecctl1) {

sc->sc_codecctl1 = codecctl;
awacs_write_codec(sc, sc->sc_codecctl1);
}
}
}

static void
awacs_set_ext_volume(struct awacs_softc *sc, int left, int right)
{

#if NSGSMIX > 0
if (sc->sc_sgsmix) {
if (sc->sc_output_mask & OUTPUT_HEADPHONES)
sgsmix_set_headphone_vol(sc->sc_sgsmix, left, right);
} else
#endif
{
int lval;
int rval;
uint32_t codecctl = sc->sc_codecctl1;

lval = 15 - ((left & 0xf0) >> 4);
rval = 15 - ((right & 0xf0) >> 4);
DPRINTF("ext_volume %d %d\n", lval, rval);

sc->sc_codecctl2 &= ~0x3cf;
sc->sc_codecctl2 |= (lval << 6) | rval;
awacs_write_codec(sc, sc->sc_codecctl2);

if ((left == 0) && (right == 0)) {
/*
* max. attenuation doesn't mean silence so we need to
* mute the output channel here
*/
codecctl |= AWACS_MUTE_HEADPHONE;
} else if (sc->sc_output_mask & OUTPUT_HEADPHONES) {

codecctl &= ~AWACS_MUTE_HEADPHONE;
}

if (codecctl != sc->sc_codecctl1) {

sc->sc_codecctl1 = codecctl;
awacs_write_codec(sc, sc->sc_codecctl1);
}
}
}

void
awacs_set_volume(struct awacs_softc *sc, int left, int right)
{

awacs_set_ext_volume(sc, left, right);
awacs_set_speaker_volume(sc, left, right);

sc->vol_l = left;
sc->vol_r = right;
}

#if NSGSMIX > 0
static void
awacs_set_bass(struct awacs_softc *sc, int bass)
{

if (sc->sc_bass == bass)
return;

sc->sc_bass = bass;
if (sc->sc_sgsmix)
sgsmix_set_bass_treble(sc->sc_sgsmix, sc->sc_bass,
sc->sc_treble);
}

static void
awacs_set_treble(struct awacs_softc *sc, int treble)
{

if (sc->sc_treble == treble)
return;

sc->sc_treble = treble;
if (sc->sc_sgsmix)
sgsmix_set_bass_treble(sc->sc_sgsmix, sc->sc_bass,
sc->sc_treble);
}
#endif

void
awacs_set_loopthrough_volume(struct awacs_softc *sc, int left, int right)
{
int lval;
int rval;

lval = 15 - ((left & 0xff) >> 4);
rval = 15 - ((right & 0xff) >> 4);
DPRINTF("loopthrough_volume %d %d\n", lval, rval);

sc->sc_codecctl5 &= ~0x3cf;
sc->sc_codecctl5 |= (lval << 6) | rval;
awacs_write_codec(sc, sc->sc_codecctl5);
}

int
awacs_set_rate(struct awacs_softc *sc, const audio_params_t *p)
{
int c;

switch (p->sample_rate) {
case 44100:
c = AWACS_RATE_44100;
break;
case 29400:
c = AWACS_RATE_29400;
break;
case 22050:
c = AWACS_RATE_22050;
break;
case 17640:
c = AWACS_RATE_17640;
break;
case 14700:
c = AWACS_RATE_14700;
break;
case 11025:
c = AWACS_RATE_11025;
break;
case 8820:
c = AWACS_RATE_8820;
break;
case 7350:
c = AWACS_RATE_7350;
break;
default:
return -1;
}

sc->sc_soundctl &= ~AWACS_RATE_MASK;
sc->sc_soundctl |= c;
awacs_write_reg(sc, AWACS_SOUND_CTRL, sc->sc_soundctl);

return 0;
}

static int
awacs_check_headphones(struct awacs_softc *sc)
{
uint32_t reg;
reg = awacs_read_reg(sc, AWACS_CODEC_STATUS);
DPRINTF("%s: codec status reg %08x\n", device_xname(sc->sc_dev), reg);
return ((reg & sc->sc_headphones_mask) == sc->sc_headphones_in);
}

static int
awacs_status_intr(void *cookie)
{
struct awacs_softc *sc = cookie;
int mask;

mutex_spin_enter(&sc->sc_intr_lock);
mask = awacs_check_headphones(sc) ? OUTPUT_HEADPHONES : OUTPUT_SPEAKER;
if (mask != sc->sc_output_mask) {

sc->sc_output_wanted = mask;
cv_signal(&sc->sc_event);
}
/* clear the interrupt */
awacs_write_reg(sc, AWACS_SOUND_CTRL, sc->sc_soundctl | AWACS_PORTCHG);
mutex_spin_exit(&sc->sc_intr_lock);
return 1;
}

static void
awacs_thread(void *cookie)
{
struct awacs_softc *sc = cookie;

while (1) {
mutex_enter(&sc->sc_event_lock);
cv_timedwait(&sc->sc_event, &sc->sc_event_lock, hz);
mutex_exit(&sc->sc_event_lock);
if (sc->sc_output_wanted == sc->sc_output_mask)
continue;

awacs_select_output(sc, sc->sc_output_wanted);
DPRINTF("%s: switching to %s\n", device_xname(sc->sc_dev),
(sc->sc_output_wanted & OUTPUT_SPEAKER) ?
"speaker" : "headphones");
}
}