/*      $NetBSD: zz9k_ax.c,v 1.1 2023/05/03 13:49:30 phx Exp $ */

/*
* Copyright (c) 2020 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Alain Runa.
*
* 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.
*
* 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: zz9k_ax.c,v 1.1 2023/05/03 13:49:30 phx Exp $");

/* miscellaneous */
#include <sys/types.h>                  /* size_t */
#include <sys/stdint.h>                 /* uintXX_t */
#include <sys/stdbool.h>                /* bool */

/* driver(9) */
#include <sys/param.h>                  /* NODEV */
#include <sys/device.h>                 /* CFATTACH_DECL_NEW(), device_priv() */
#include <sys/errno.h>                  /* . */

/* bus_space(9) and zorro bus */
#include <sys/bus.h>                    /* bus_space_xxx(), bus_space_xxx_t */
#include <sys/cpu.h>                    /* kvtop() */
#include <sys/systm.h>                  /* aprint_xxx() */

/* mutex(9) */
#include <sys/mutex.h>

/* Interrupt related */
#include <sys/intr.h>
#include <amiga/amiga/isr.h>            /* isr */

/* audio(9) */
#include <sys/audioio.h>
#include <dev/audio/audio_if.h>

/* zz9k related */
#include <amiga/dev/zz9kvar.h>          /* zz9kbus_attach_args */
#include <amiga/dev/zz9kreg.h>          /* ZZ9000 registers */
#include "zz9k_ax.h"                    /* NZZ9K_AX */


/* The allmighty softc structure */
struct zzax_softc {
       device_t sc_dev;
       struct bus_space_tag sc_bst;
       bus_space_tag_t sc_iot;
       bus_space_handle_t sc_regh;
       bus_space_handle_t sc_txbufh;
       size_t sc_txbufsize;

       struct isr sc_isr;

       kmutex_t  sc_lock;
       kmutex_t  sc_intr_lock;
};

static int zzax_intr(void *arg);
static void zzax_set_param(struct zzax_softc *sc, uint16_t param, uint16_t val);

/* audio_hw_if */
static int zzax_open(void *hdl, int flags);
static void zzax_close(void *hdl);
static int zzax_query_format(void *hdl, audio_format_query_t *afp);
static int zzax_set_format(void *hdl, int setmode,
   const audio_params_t *play, const audio_params_t *rec,
   audio_filter_reg_t *pfil, audio_filter_reg_t *rfil);
static int zzax_round_blocksize(void *hdl, int bs, int mode,
   const audio_params_t *param);
static int zzax_commit_settings(void *hdl);
static int zzax_init_output(void *hdl, void *buffer, int size);
static int zzax_init_input(void *hdl, void *buffer, int size);
static int zzax_start_output(void *hdl, void *block, int blksize,
   void (*intr)(void*), void *intrarg);
static int zzax_start_input(void *hdl, void *block, int blksize,
   void (*intr)(void*), void *intrarg);
static int zzax_halt_output(void *hdl);
static int zzax_halt_input(void *hdl);
static int zzax_speaker_ctl(void *hdl, int on);
static int zzax_getdev(void *hdl, struct audio_device *ret);
static int zzax_set_port(void *hdl, mixer_ctrl_t *mc);
static int zzax_get_port(void *hdl, mixer_ctrl_t *mc);
static int zzax_query_devinfo(void *hdl, mixer_devinfo_t *di);
#if 0
static void *zzax_allocm(void *hdl, int direction, size_t size);
static void zzax_freem(void *hdl, void *addr, size_t size);
#endif
static size_t zzax_round_buffersize(void *hdl, int direction, size_t bufsize);
static int zzax_get_props(void *hdl);
static int zzax_trigger_output(void *hdl, void *start, void *end, int blksize,
   void (*intr)(void*), void *intrarg, const audio_params_t *param);
static int zzax_trigger_input(void *hdl, void *start, void *end, int blksize,
   void (*intr)(void*), void *intrarg, const audio_params_t *param);
static int zzax_dev_ioctl(void *hdl, u_long cmd, void *addr, int flag,
   struct lwp *l);
static void zzax_get_locks(void *hdl, kmutex_t **intr, kmutex_t **thread);

static const struct audio_hw_if zzax_hw_if = {
       .open                   = zzax_open,
       .close                  = zzax_close,
       .query_format           = zzax_query_format,
       .set_format             = zzax_set_format,
       .round_blocksize        = zzax_round_blocksize,
       .commit_settings        = zzax_commit_settings,
       .init_output            = zzax_init_output,
       .init_input             = zzax_init_input,
       .start_output           = zzax_start_output,
       .start_input            = zzax_start_input,
       .halt_output            = zzax_halt_output,
       .halt_input             = zzax_halt_input,
       .speaker_ctl            = zzax_speaker_ctl,
       .getdev                 = zzax_getdev,
       .set_port               = zzax_set_port,
       .get_port               = zzax_get_port,
       .query_devinfo          = zzax_query_devinfo,
#if 0
       .allocm                 = zzax_allocm,
       .freem                  = zzax_freem,
#endif
       .round_buffersize       = zzax_round_buffersize,
       .get_props              = zzax_get_props,
       .trigger_output         = zzax_trigger_output,
       .trigger_input          = zzax_trigger_input,
       .dev_ioctl              = zzax_dev_ioctl,
       .get_locks              = zzax_get_locks
};

static const struct audio_format zzax_format = {
       .mode           = AUMODE_PLAY,
       .encoding       = AUDIO_ENCODING_SLINEAR_BE,
       .validbits      = 16,
       .precision      = 16,
       .channels       = 2,
       .channel_mask   = AUFMT_STEREO,
       .frequency_type = 0,
       .frequency      = {8000, 12000, 24000, 32000, 44100, 48000},
       .priority       = 0
};

static const struct audio_device zzax_device = {
       .name           = "ZZ9000AX",
       .version        = "1.13",
       .config         = "zzax"
};

/* mixer sets */
#define ZZAX_CHANNELS 0

/* mixer values */
#define ZZAX_VOLUME 1
#define ZZAX_OUTPUT_CLASS 2


/* driver(9) essentials */
static int zzax_match(device_t parent, cfdata_t match, void *aux);
static void zzax_attach(device_t parent, device_t self, void *aux);
CFATTACH_DECL_NEW(zz9k_ax, sizeof(struct zzax_softc),
   zzax_match, zzax_attach, NULL, NULL);


/* Go ahead, make my day. */

static int
zzax_match(device_t parent, cfdata_t match, void *aux)
{
       struct zz9kbus_attach_args *bap = aux;

       if (strcmp(bap->zzaa_name, "zz9k_ax") != 0)
               return 0;

       return 1;
}

static void
zzax_attach(device_t parent, device_t self, void *aux)
{
       struct zz9kbus_attach_args *bap = aux;
       struct zzax_softc *sc = device_private(self);
       struct zz9k_softc *psc = device_private(parent);

       sc->sc_dev = self;
       sc->sc_bst.base = bap->zzaa_base;
       sc->sc_bst.absm = &amiga_bus_stride_1;
       sc->sc_iot = &sc->sc_bst;
       sc->sc_regh = psc->sc_regh;

       uint16_t config = ZZREG_R(ZZ9K_AUDIO_CONFIG);
       aprint_normal(": ZZ9000AX %sdetected.\n",
           (config == 0) ? "not " : "");
       aprint_normal_dev(sc->sc_dev,
           "MNT ZZ9000AX driver is not functional yet.\n");

       aprint_debug_dev(sc->sc_dev, "[DEBUG] registers at %p/%p (pa/va)\n",
           (void *)kvtop((void *)sc->sc_regh),
           bus_space_vaddr(sc->sc_iot, sc->sc_regh));

       sc->sc_txbufsize = 0x10000;
       uint32_t tx_buffer = psc->sc_zsize - sc->sc_txbufsize;
       if (bus_space_map(sc->sc_iot, tx_buffer, sc->sc_txbufsize,
           BUS_SPACE_MAP_LINEAR, &sc->sc_txbufh)) {
               aprint_error(": Failed to map MNT ZZ9000AX audio tx buffer.\n");
               return;
       }

       aprint_normal_dev(sc->sc_dev, "base: %p/%p size: %i\n",
           (void *)kvtop((void *)sc->sc_txbufh),
           bus_space_vaddr(sc->sc_iot, sc->sc_txbufh),
           sc->sc_txbufsize);

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

       sc->sc_isr.isr_intr = zzax_intr;
       sc->sc_isr.isr_arg  = sc;
       sc->sc_isr.isr_ipl  = 6;
       add_isr(&sc->sc_isr);

       audio_attach_mi(&zzax_hw_if, sc, self);

       uint16_t conf = ZZREG_R(ZZ9K_AUDIO_CONFIG); /* enable interrupt */
       ZZREG_W(ZZ9K_AUDIO_CONFIG, conf | ZZ9K_AUDIO_CONFIG_INT_AUDIO);
}

static int
zzax_intr(void *arg)
{
       struct zzax_softc *sc = arg;

       uint16_t conf = ZZREG_R(ZZ9K_CONFIG);
       if ((conf & ZZ9K_CONFIG_INT_AUDIO) == 0)
               return 0;

#if 0
       uint16_t conf = ZZREG_R(ZZ9K_AUDIO_CONFIG); /* disable interrupt */
       ZZREG_W(ZZ9K_AUDIO_CONFIG, conf & ~ZZ9K_AUDIO_CONFIG_INT_AUDIO);
#endif
       ZZREG_W(ZZ9K_CONFIG, ZZ9K_CONFIG_INT_ACK | ZZ9K_CONFIG_INT_ACK_AUDIO);

       mutex_spin_enter(&sc->sc_intr_lock);
       /* do stuff */
       mutex_spin_exit(&sc->sc_intr_lock);

#if 0
       uint16_t conf = ZZREG_R(ZZ9K_AUDIO_CONFIG); /* enable interrupt */
       ZZREG_W(ZZ9K_AUDIO_CONFIG, conf | ZZ9K_AUDIO_CONFIG_INT_AUDIO);
#endif

       return 1;
}

static void
zzax_set_param(struct zzax_softc *sc, uint16_t param, uint16_t val)
{
       ZZREG_W(ZZ9K_AUDIO_PARAM, param);
       ZZREG_W(ZZ9K_AUDIO_VAL, val);
       ZZREG_W(ZZ9K_AUDIO_PARAM, 0);
}

int
zzax_open(void *hdl, int flags)
{
       struct zzax_softc *sc = hdl;
       uint32_t buffer = (uint32_t)bus_space_vaddr(sc->sc_iot, sc->sc_txbufh);
       zzax_set_param(sc, ZZ9K_AP_TX_BUF_OFFS_HI, buffer >> 16);
       zzax_set_param(sc, ZZ9K_AP_TX_BUF_OFFS_HI, buffer & 0xFFFF);
       printf("zzax_open: %X\n", buffer);
       return 0;
}

static void
zzax_close(void *hdl)
{
       printf("zzax_close:\n");
}

static int
zzax_query_format(void *hdl, audio_format_query_t *afp)
{
       printf("zzax_query_format:\n");
       return audio_query_format(&zzax_format, 1, afp);
}

static int
zzax_set_format(void *hdl, int setmode,
   const audio_params_t *play, const audio_params_t *rec,
   audio_filter_reg_t *pfil, audio_filter_reg_t *rfil)
{
       struct zzax_softc *sc = hdl;

       printf("zzax_set_format:\n");
       if (setmode & AUMODE_PLAY) {
               zzax_set_param(sc, ZZ9K_AP_DSP_SET_LOWPASS, 23900);
               printf("::play->sample_rate: %i\n", play->sample_rate);
               printf("::play->encoding: %i\n", play->encoding);
               printf("::play->precision: %i\n", play->precision);
               printf("::play->validbits: %i\n", play->validbits);
               printf("::play->channels: %i\n", play->channels);
       }

       if (setmode & AUMODE_RECORD) {
               printf("::rec->sample_rate: %i\n", rec->sample_rate);
               printf("::rec->encoding: %i\n", rec->encoding);
               printf("::rec->precision: %i\n", rec->precision);
               printf("::rec->validbits: %i\n", rec->validbits);
               printf("::rec->channels: %i\n", rec->channels);
       }

       return 0;
}

static int
zzax_round_blocksize(void *hdl, int bs, int mode, const audio_params_t *param)
{
       printf("zzax_round_blocksize:\n");
       printf("::bs: %i\n", bs);
       printf("::mode: %i\n", mode);
       printf("::param->sample_rate: %i\n", param->sample_rate);
       printf("::param->encoding: %i\n", param->encoding);
       printf("::param->precision: %i\n", param->precision);
       printf("::param->validbits: %i\n", param->validbits);
       printf("::param->channels: %i\n", param->channels);

       return bs;
}

static int
zzax_commit_settings(void *hdl)
{
       printf("zzax_commit_settings:\n");
       return 0;
}

static int
zzax_init_output(void *hdl, void *buffer, int size)
{
       printf("zzax_init_output:\n");
       return 0;
}

static int
zzax_init_input(void *hdl, void *buffer, int size)
{
       printf("zzax_init_input:\n");
       return 0;
}

static int
zzax_start_output(void *hdl, void *block, int blksize,
   void (*intr)(void*), void *intrarg)
{
       printf("zzax_start_output:\n");
       return 0;
}

static int
zzax_start_input(void *hdl, void *block, int blksize,
   void (*intr)(void*), void *intrarg)
{
       printf("zzax_start_input:\n");
       return ENXIO;
}

static int
zzax_halt_output(void *hdl)
{
       printf("zzax_halt_output:\n");
       return 0;
}

static int
zzax_halt_input(void *hdl)
{
       printf("zzax_halt_input:\n");
       return ENXIO;
}

static int
zzax_speaker_ctl(void *hdl, int on)
{
       printf("zzax_speaker_ctl:\n");
       return 0;
}

static int
zzax_getdev(void *hdl, struct audio_device *ret)
{
       *ret = zzax_device;
       printf("zzax_getdev: %p\n", ret);
       return 0;
}

static int
zzax_set_port(void *hdl, mixer_ctrl_t *mc)
{
       printf("zzax_set_port:\n");
       return 0;
}

static int
zzax_get_port(void *hdl, mixer_ctrl_t *mc)
{
       printf("zzax_get_port:\n");
       return 0;
}

static int
zzax_query_devinfo(void *hdl, mixer_devinfo_t *di)
{
       switch(di->index) {
       case ZZAX_CHANNELS:
               strcpy(di->label.name, "speaker");
               di->type = AUDIO_MIXER_SET;
               di->mixer_class = ZZAX_OUTPUT_CLASS;
               di->prev = AUDIO_MIXER_LAST;
               di->next = AUDIO_MIXER_LAST;
               di->un.s.num_mem = 1;
               strcpy(di->un.s.member[0].label.name, "channel0");
               di->un.s.member[0].mask = 0;
       case ZZAX_VOLUME:
               strcpy(di->label.name, "master");
               di->type = AUDIO_MIXER_VALUE;
               di->mixer_class = ZZAX_OUTPUT_CLASS;
               di->prev = AUDIO_MIXER_LAST;
               di->next = AUDIO_MIXER_LAST;
               di->un.v.num_channels = 1;
               strcpy(di->un.v.units.name, "volume");
               break;
       case ZZAX_OUTPUT_CLASS:
               strcpy(di->label.name, "outputs");
               di->type = AUDIO_MIXER_CLASS;
               di->mixer_class = ZZAX_OUTPUT_CLASS;
               di->prev = AUDIO_MIXER_LAST;
               di->next = AUDIO_MIXER_LAST;
               break;
       default:
               return ENXIO;
       }

       printf("zzax_query_devinfo: %s\n", di->label.name);

       return 0;
}

#if 0
static void*
zzax_allocm(void *hdl, int direction, size_t size)
{

}

static void
zzax_freem(void *hdl, void *addr, size_t size)
{

}
#endif

static size_t
zzax_round_buffersize(void *hdl, int direction, size_t bufsize)
{
       printf("zzax_round_buffersize:\n");
       printf("::direction: %i\n", direction);
       printf("::bufsize: %zu\n", bufsize);
       return bufsize;
}

static int
zzax_get_props(void *hdl)
{
       return AUDIO_PROP_PLAYBACK;
}

static int
zzax_trigger_output(void *hdl, void *start, void *end, int blksize,
   void (*intr)(void*), void *intrarg, const audio_params_t *param)
{
       printf("zzax_trigger_output:\n");
       return 0;
}

static int
zzax_trigger_input(void *hdl, void *start, void *end, int blksize,
   void (*intr)(void*), void *intrarg, const audio_params_t *param)
{
       return 0;
}

static int
zzax_dev_ioctl(void *hdl, u_long cmd, void *addr, int flag, struct lwp *l)
{
       printf("zzax_dev_ioctl: %lu\n", cmd);
       return 0;
}

static void
zzax_get_locks(void *hdl, kmutex_t **intr, kmutex_t **thread)
{
       struct zzax_softc *sc = hdl;
       *intr = &sc->sc_intr_lock;
       *thread = &sc->sc_lock;
}

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.