Update of /cvsroot/alsa/alsa-driver/parisc
In directory sc8-pr-cvs1:/tmp/cvs-serv2225/parisc
Added Files:
.cvsignore Kconfig Makefile harmony.c
Log Message:
[Patch: harmony.dif]
added PA-RISC harmony sound driver by Laurent Canet <[EMAIL PROTECTED]>.
configure script checks parisc architecture and set CONFIG_PARISC now.
--- NEW FILE: .cvsignore ---
.depend
--- NEW FILE: Kconfig ---
# ALSA PA-RISC drivers
menu "ALSA PA-RISC devices"
depends on SND!=n && PARISC
config SND_HARMONY
tristate "Harmony/Vivace sound chip"
depends on SND
help
Say 'Y' or 'M' to include support for Harmony/Vivace soundchip
on HP712s, 715/new and many other GSC based machines.
--- NEW FILE: Makefile ---
TOPDIR = ../..
include $(TOPDIR)/toplevel.config
include $(TOPDIR)/Makefile.conf
#
#
#
TOPDIR = $(MAINSRCDIR)
snd-harmony-objs := harmony.o
# Toplevel Module Dependency
obj-$(CONFIG_SND_HARMONY) += snd-harmony.o
include $(TOPDIR)/Rules.make
--- NEW FILE: harmony.c ---
/*
* Harmony chipset driver
*
* This is a sound driver for ASP's and Lasi's Harmony sound chip
* and is unlikely to be used for anything other than on a HP PA-RISC.
*
* Harmony is found in HP 712s, 715/new and many other GSC based machines.
* On older 715 machines you'll find the technically identical chip
* called 'Vivace'. Both Harmony and Vicace are supported by this driver.
*
* this ALSA driver is based on OSS driver by:
* Copyright 2000 (c) Linuxcare Canada, Alex deVries <[EMAIL PROTECTED]>
* Copyright 2000-2002 (c) Helge Deller <[EMAIL PROTECTED]>
* Copyright 2001 (c) Matthieu Delahaye <[EMAIL PROTECTED]>
*
* TODO:
* - use generic DMA interface and ioremap()/iounmap()
* - capture is still untested (and probaby non-working)
* - spin locks
* - implement non-consistent DMA pages
* - implement gain meter
* - module parameters
* - correct cleaning sequence
* - better error checking
* - try to have a better quality.
*
*/
/*
* Harmony chipset 'modus operandi'.
* - This chipset is found in some HP 32bit workstations, like 712, or B132 class.
* most of controls are done through registers. Register are found at a fixed offset
* from the hard physical adress, given in struct dev by register_parisc_driver.
*
* Playback and recording use 4kb pages (dma or not, depending on the machine).
*
* Most of PCM playback & capture is done through interrupt. When harmony needs
* a new buffer to put recorded data or read played PCM, it sends an interrupt.
* Bits 2 and 10 of DSTATUS register are '1' when harmony needs respectively
* a new page for recording and playing.
* Interrupt are disabled/enabled by writing to bit 32 of DSTATUS.
* Adresses of next page to be played is put in PNXTADD register, next page
* to be recorded is put in RNXTADD. There is 2 read-only registers, PCURADD and
* RCURADD that provides adress of current page.
*
* Harmony has no way to controll full duplex or half duplex mode. It means
* that we always need to provide adresses of playback and capture data, even
* when this is not needed. That's why we statically alloc one graveyard
* buffer (to put recorded data in play-only mode) and a silence buffer.
*
* Bitrate, number of channels and data format are controlled with
* the CNTL register.
*
* Mixer work is done through one register (GAINCTL). Only input gain,
* output attenuation and general attenuation control is provided. There is
* also controls for enabling/disabling internal speaker and line
* input.
*
* Buffers used by this driver are all DMA consistent. Since harmony is
* not "real" pci device, we use a fake struct pci_dev for
* pci_alloc_consistent().
* (note that some machines -712 for ex.- don't implement DMA consistent
* memory, so we will need to use kmalloc instead)
*/
#include <linux/delay.h>
#include <sound/driver.h>
#include <linux/init.h>
#include <linux/slab.h>
#include <linux/time.h>
#include <linux/wait.h>
#include <sound/core.h>
#include <sound/control.h>
#include <sound/pcm.h>
#include <sound/rawmidi.h>
#define SNDRV_GET_ID
#include <sound/initval.h>
#include <sound/info.h>
#include <asm/hardware.h>
#include <asm/gsc.h>
#include <asm/io.h>
MODULE_AUTHOR("Laurent Canet <[EMAIL PROTECTED]>");
MODULE_DESCRIPTION("ALSA Harmony sound driver");
MODULE_LICENSE("GPL");
MODULE_CLASSES("{sound}");
MODULE_DEVICES("{{ALSA,Harmony soundcard}}");
#undef DEBUG
#ifdef DEBUG
# define DPRINTK printk
#else
# define DPRINTK(x,...)
#endif
#define PFX "harmony: "
#define MAX_PCM_DEVICES 1
#define MAX_PCM_SUBSTREAMS 4
#define MAX_MIDI_DEVICES 0
#define BUFFER_SIZE 4096
#define MAX_BUFS 10
/* number of silence & graveyard buffers */
#define GRAVEYARD_BUFS 3
#define SILENCE_BUFS 3
#define MAX_BUFFER_SIZE (MAX_BUFS * BUFFER_SIZE)
#define HARMONY_BUF_SIZE BUFFER_SIZE
#define HARMONY_CNTL_C 0x80000000
#define HARMONY_DSTATUS_PN 0x00000200
#define HARMONY_DSTATUS_RN 0x00000002
#define HARMONY_DSTATUS_IE 0x80000000
#define HARMONY_DF_16BIT_LINEAR 0x00000000
#define HARMONY_DF_8BIT_ULAW 0x00000001
#define HARMONY_DF_8BIT_ALAW 0x00000002
#define HARMONY_SS_MONO 0x00000000
#define HARMONY_SS_STEREO 0x00000001
/*
* Channels Mask in mixer register
* try some "reasonable" default gain values
*/
#define HARMONY_GAIN_TOTAL_SILENCE 0x00F00FFF
/* the following should be enough (mixer is
* very sensible on harmony)
*/
#define HARMONY_GAIN_DEFAULT 0x0F2FF082
/* useless since only one card is supported ATM */
static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; /* Index 0-MAX */
static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; /* ID for this card */
static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE;
/* Register offset (from base hpa) */
#define REG_ID 0x00
#define REG_RESET 0x04
#define REG_CNTL 0x08
#define REG_GAINCTL 0x0C
#define REG_PNXTADD 0x10
#define REG_PCURADD 0x14
#define REG_RNXTADD 0x18
#define REG_RCURADD 0x1C
#define REG_DSTATUS 0x20
#define REG_OV 0x24
#define REG_PIO 0x28
#define REG_DIAG 0x3C
/*
* main harmony structure
*/
typedef struct snd_card_harmony {
/* spinlocks (To be done) */
spinlock_t mixer_lock;
spinlock_t control_lock;
/* parameters */
int irq;
unsigned long hpa;
int id;
int rev;
u32 current_gain;
int data_format; /* HARMONY_DF_xx_BIT_xxx */
int sample_rate; /* HARMONY_SR_xx_KHZ */
int stereo_select; /* HARMONY_SS_MONO or HARMONY_SS_STEREO */
int format_initialized;
unsigned long ply_buffer;
int ply_buf;
int ply_count;
int ply_size;
int ply_stopped;
int ply_total;
unsigned long cap_buffer;
int cap_buf;
int cap_count;
int cap_size;
int cap_stopped;
int cap_total;
struct pci_dev *fake_pci_dev; /* The fake pci_dev needed for
pci_* functions under ccio. */
/* the graveyard buffer is used as recording buffer when playback,
* because harmony always want a buffer to put recorded data */
unsigned char *graveyard_addr;
dma_addr_t graveyard_dma;
int graveyard_count;
/* same thing for silence buffer */
unsigned char *silence_addr;
dma_addr_t silence_dma;
int silence_count;
/* alsa stuff */
snd_card_t *card;
snd_pcm_t *pcm;
snd_pcm_substream_t *playback_substream;
snd_pcm_substream_t *capture_substream;
snd_info_entry_t *proc_entry;
} snd_card_harmony_t;
#define chip_t snd_card_harmony_t
static snd_card_t *snd_harmony_cards[SNDRV_CARDS] = SNDRV_DEFAULT_PTR;
/* wait to be out of control mode */
static inline void snd_harmony_wait_cntl(snd_card_harmony_t *harmony)
{
int timeout = 5000;
while ( (gsc_readl(harmony->hpa+REG_CNTL) & HARMONY_CNTL_C) && --timeout)
{
/* Wait */ ;
}
if (timeout == 0) DPRINTK(KERN_DEBUG PFX "Error: wait cntl timeouted\n");
}
/*
* sample rate routines
*/
static unsigned int snd_card_harmony_rates[] = {
5125, 6615, 8000, 9600,
11025, 16000, 18900, 22050,
27428, 32000, 33075, 37800,
44100, 48000
};
#define RATES sizeof(snd_card_harmony_rates) / sizeof(snd_card_harmony_rates[0])
static snd_pcm_hw_constraint_list_t hw_constraint_rates = {
.count = RATES,
.list = snd_card_harmony_rates,
.mask = 0,
};
#define HARMONY_SR_8KHZ 0x08
#define HARMONY_SR_16KHZ 0x09
#define HARMONY_SR_27KHZ 0x0A
#define HARMONY_SR_32KHZ 0x0B
#define HARMONY_SR_48KHZ 0x0E
#define HARMONY_SR_9KHZ 0x0F
#define HARMONY_SR_5KHZ 0x10
#define HARMONY_SR_11KHZ 0x11
#define HARMONY_SR_18KHZ 0x12
#define HARMONY_SR_22KHZ 0x13
#define HARMONY_SR_37KHZ 0x14
#define HARMONY_SR_44KHZ 0x15
#define HARMONY_SR_33KHZ 0x16
#define HARMONY_SR_6KHZ 0x17
/* snd_card_harmony_rate_bits
* @rate: index of current data rate in list
* returns: harmony hex code for registers
*/
static unsigned int snd_card_harmony_rate_bits(int rate)
{
unsigned int idx;
for (idx = 0; idx <= RATES; idx++)
if (snd_card_harmony_rates[idx] == rate) break;
switch (idx) {
case 0: return HARMONY_SR_5KHZ;
case 1: return HARMONY_SR_6KHZ;
case 2: return HARMONY_SR_8KHZ;
case 3: return HARMONY_SR_9KHZ;
case 4: return HARMONY_SR_11KHZ;
case 5: return HARMONY_SR_16KHZ;
case 6: return HARMONY_SR_18KHZ;
case 7: return HARMONY_SR_22KHZ;
case 8: return HARMONY_SR_27KHZ;
case 9: return HARMONY_SR_32KHZ;
case 10: return HARMONY_SR_33KHZ;
case 11: return HARMONY_SR_37KHZ;
case 12: return HARMONY_SR_44KHZ;
case 13: return HARMONY_SR_48KHZ;
default: /* fallback */
return HARMONY_SR_44KHZ;
}
}
/*
* update controls (data format, sample rate, number of channels)
* according to value supplied in data structure
*/
void snd_harmony_update_control(snd_card_harmony_t *harmony)
{
u32 default_cntl;
/* Set CNTL */
default_cntl = (HARMONY_CNTL_C | /* The C bit */
(harmony->data_format << 6) | /* Set the data format */
(harmony->stereo_select << 5) | /* Stereo select */
(harmony->sample_rate)); /* Set sample rate */
/* initialize CNTL */
snd_harmony_wait_cntl(harmony);
gsc_writel(default_cntl, harmony->hpa+REG_CNTL);
}
/*
* silence a buffer
* XXX: alsa could probably do this by itself
* XXX: memset hpmc, commented.
*/
void snd_harmony_silence(snd_card_harmony_t *harmony,
void *addr, int length)
{
u8 silence_char;
switch(harmony->data_format) {
case HARMONY_DF_8BIT_ULAW: silence_char = 0x55; break;
case HARMONY_DF_8BIT_ALAW: silence_char = 0xff; break;
case HARMONY_DF_16BIT_LINEAR:
default:
silence_char = 0;
}
//memset(addr, silence_char, length);
}
/*
* interruption controls routines
*/
static void snd_harmony_disable_interrupts(snd_card_harmony_t *chip)
{
snd_harmony_wait_cntl(chip);
gsc_writel(0, chip->hpa+REG_DSTATUS);
}
static void snd_harmony_enable_interrupts(snd_card_harmony_t *chip)
{
snd_harmony_wait_cntl(chip);
gsc_writel(HARMONY_DSTATUS_IE, chip->hpa+REG_DSTATUS);
}
/*
* interruption routine:
* The interrupt routine must provide adresse of next physical pages
* used by harmony
*/
void snd_card_harmony_interrupt(int irq, void *dev, struct pt_regs *regs)
{
snd_card_harmony_t *harmony = (snd_card_harmony_t *)dev;
u32 dstatus = 0;
unsigned long hpa = harmony->hpa;
/* Turn off interrupts */
snd_harmony_disable_interrupts(harmony);
/* wait for control to free */
snd_harmony_wait_cntl(harmony);
/* Read dstatus and pcuradd (the current address) */
dstatus = gsc_readl(hpa+REG_DSTATUS);
/* Check if this is a request to get the next play buffer */
if (dstatus & HARMONY_DSTATUS_PN) {
if (harmony->playback_substream) {
harmony->ply_buf += harmony->ply_count;
harmony->ply_buf %= harmony->ply_size;
gsc_writel(harmony->ply_buffer + harmony->ply_buf,
hpa+REG_PNXTADD);
snd_pcm_period_elapsed(harmony->playback_substream);
harmony->ply_total++;
} else {
gsc_writel(harmony->silence_dma +
(HARMONY_BUF_SIZE*harmony->silence_count),
hpa+REG_PNXTADD);
harmony->silence_count++;
harmony->silence_count %= SILENCE_BUFS;
}
}
/* Check if we're being asked to fill in a recording buffer */
if (dstatus & HARMONY_DSTATUS_RN) {
if (harmony->capture_substream) {
harmony->cap_buf += harmony->cap_count;
harmony->cap_buf %= harmony->cap_size;
gsc_writel(harmony->cap_buffer + harmony->cap_buf,
hpa+REG_RNXTADD);
snd_pcm_period_elapsed(harmony->capture_substream);
harmony->cap_total++;
} else {
/* graveyard buffer */
gsc_writel(harmony->graveyard_dma +
(HARMONY_BUF_SIZE*harmony->graveyard_count),
hpa+REG_RNXTADD);
harmony->graveyard_count++;
harmony->graveyard_count %= GRAVEYARD_BUFS;
}
}
snd_harmony_enable_interrupts(harmony);
}
/*
* proc entry
* this proc file will give some debugging info
*/
static void snd_harmony_proc_read(snd_info_entry_t *entry, snd_info_buffer_t *buffer)
{
snd_card_harmony_t *harmony = (snd_card_harmony_t *)entry->private_data;
snd_iprintf(buffer, "LASI Harmony driver\nLaurent Canet
<[EMAIL PROTECTED]>\n\n");
snd_iprintf(buffer, "IRQ %d, hpa %lx, id %d rev %d\n",
harmony->irq, harmony->hpa,
harmony->id, harmony->rev);
snd_iprintf(buffer, "Current gain %lx\n", (unsigned long)
harmony->current_gain);
snd_iprintf(buffer, "\tsample rate=%d\n", harmony->sample_rate);
snd_iprintf(buffer, "\tstereo select=%d\n", harmony->stereo_select);
snd_iprintf(buffer, "\tbitperchan=%d\n\n", harmony->data_format);
snd_iprintf(buffer, "Play status:\n");
snd_iprintf(buffer, "\tstopped %d\n", harmony->ply_stopped);
snd_iprintf(buffer, "\tbuffer %lx, count %d\n", harmony->ply_buffer,
harmony->ply_count);
snd_iprintf(buffer, "\tbuf %d size %d\n\n", harmony->ply_buf,
harmony->ply_size);
snd_iprintf(buffer, "Capture status:\n");
snd_iprintf(buffer, "\tstopped %d\n", harmony->cap_stopped);
snd_iprintf(buffer, "\tbuffer %lx, count %d\n", harmony->cap_buffer,
harmony->cap_count);
snd_iprintf(buffer, "\tbuf %d, size %d\n\n", harmony->cap_buf,
harmony->cap_size);
snd_iprintf(buffer, "Funny stats: total played=%d, recorded=%d\n\n",
harmony->ply_total, harmony->cap_total);
snd_iprintf(buffer, "Register:\n");
snd_iprintf(buffer, "\tgainctl: %lx\n", (unsigned long)
gsc_readl(harmony->hpa+REG_GAINCTL));
snd_iprintf(buffer, "\tcntl: %lx\n", (unsigned long)
gsc_readl(harmony->hpa+REG_CNTL));
snd_iprintf(buffer, "\tid: %lx\n", (unsigned long)
gsc_readl(harmony->hpa+REG_ID));
snd_iprintf(buffer, "\tpcuradd: %lx\n", (unsigned long)
gsc_readl(harmony->hpa+REG_PCURADD));
snd_iprintf(buffer, "\trcuradd: %lx\n", (unsigned long)
gsc_readl(harmony->hpa+REG_RCURADD));
snd_iprintf(buffer, "\tpnxtadd: %lx\n", (unsigned long)
gsc_readl(harmony->hpa+REG_PNXTADD));
snd_iprintf(buffer, "\trnxtadd: %lx\n", (unsigned long)
gsc_readl(harmony->hpa+REG_RNXTADD));
snd_iprintf(buffer, "\tdstatus: %lx\n", (unsigned long)
gsc_readl(harmony->hpa+REG_DSTATUS));
snd_iprintf(buffer, "\tov: %lx\n\n", (unsigned long)
gsc_readl(harmony->hpa+REG_OV));
}
static void __devinit snd_harmony_proc_init(snd_card_harmony_t *harmony)
{
snd_info_entry_t *entry;
if ((entry = snd_info_create_card_entry(harmony->card, "harmony",
harmony->card->proc_root)) != NULL) {
entry->content = SNDRV_INFO_CONTENT_TEXT;
entry->private_data = harmony;
entry->mode = S_IFREG | S_IRUGO | S_IWUSR;
entry->c.text.read_size = 2048; /* should be enough */
entry->c.text.read = snd_harmony_proc_read;
if (snd_info_register(entry) < 0) {
snd_info_free_entry(entry);
entry = NULL;
}
}
harmony->proc_entry = entry;
}
static void snd_harmony_proc_done(snd_card_harmony_t *harmony)
{
if (harmony->proc_entry) {
snd_info_unregister(harmony->proc_entry);
harmony->proc_entry = NULL;
}
}
/*
* PCM Stuff
*/
static int snd_card_harmony_playback_ioctl(snd_pcm_substream_t * substream,
unsigned int cmd,
void *arg)
{
return snd_pcm_lib_ioctl(substream, cmd, arg);
}
static int snd_card_harmony_capture_ioctl(snd_pcm_substream_t * substream,
unsigned int cmd,
void *arg)
{
return snd_pcm_lib_ioctl(substream, cmd, arg);
}
static int snd_card_harmony_playback_trigger(snd_pcm_substream_t * substream,
int cmd)
{
snd_card_harmony_t *harmony = snd_pcm_substream_chip(substream);
switch (cmd) {
case SNDRV_PCM_TRIGGER_STOP:
if (harmony->ply_stopped)
return -EBUSY;
harmony->ply_stopped = 1;
snd_harmony_disable_interrupts(harmony);
break;
case SNDRV_PCM_TRIGGER_START:
if (!harmony->ply_stopped)
return -EBUSY;
harmony->ply_stopped = 0;
/* write the location of the first buffer to play */
gsc_writel(harmony->ply_buffer, harmony->hpa+REG_PNXTADD);
snd_harmony_enable_interrupts(harmony);
break;
case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
case SNDRV_PCM_TRIGGER_SUSPEND:
DPRINTK(KERN_INFO PFX "received unimplemented trigger: %d\n",
cmd);
default:
return -EINVAL;
}
return 0;
}
static int snd_card_harmony_capture_trigger(snd_pcm_substream_t * substream,
int cmd)
{
snd_card_harmony_t *harmony = snd_pcm_substream_chip(substream);
switch (cmd) {
case SNDRV_PCM_TRIGGER_STOP:
if (harmony->cap_stopped)
return -EBUSY;
harmony->cap_stopped = 1;;
snd_harmony_disable_interrupts(harmony);
break;
case SNDRV_PCM_TRIGGER_START:
if (!harmony->cap_stopped)
return -EBUSY;
harmony->cap_stopped = 0;
snd_harmony_enable_interrupts(harmony);
break;
case SNDRV_PCM_TRIGGER_PAUSE_PUSH:
case SNDRV_PCM_TRIGGER_PAUSE_RELEASE:
case SNDRV_PCM_TRIGGER_SUSPEND:
DPRINTK(KERN_INFO PFX "Received unimplemented trigger: %d\n",
cmd);
default:
return -EINVAL;
}
return 0;
}
static int snd_card_harmony_playback_prepare(snd_pcm_substream_t * substream)
{
snd_card_harmony_t *harmony = snd_pcm_substream_chip(substream);
snd_pcm_runtime_t *runtime = substream->runtime;
harmony->ply_size = snd_pcm_lib_buffer_bytes(substream);
harmony->ply_count = snd_pcm_lib_period_bytes(substream);
harmony->ply_buf = 0;
harmony->ply_stopped = 1;
/* initialize given sample rate */
harmony->sample_rate = snd_card_harmony_rate_bits(runtime->rate);
/* data format */
if (snd_pcm_format_width(runtime->format) == 16) harmony->data_format =
HARMONY_DF_16BIT_LINEAR;
else harmony->data_format = HARMONY_DF_8BIT_ULAW;
/* number of channels */
if (runtime->channels == 2) harmony->stereo_select = HARMONY_SS_STEREO;
else harmony->stereo_select = HARMONY_SS_MONO;
DPRINTK(KERN_INFO PFX "Playback_prepare, sr=%d(%x), df=%x, ss=%x hpa=%lx\n",
runtime->rate,
harmony->sample_rate, harmony->data_format,
harmony->stereo_select, harmony->hpa);
snd_harmony_update_control(harmony);
harmony->format_initialized = 1;
harmony->ply_buffer = runtime->dma_addr;
return 0;
}
static int snd_card_harmony_capture_prepare(snd_pcm_substream_t * substream)
{
snd_pcm_runtime_t *runtime = substream->runtime;
snd_card_harmony_t *harmony = snd_pcm_substream_chip(substream);
harmony->cap_size = snd_pcm_lib_buffer_bytes(substream);
harmony->cap_count = snd_pcm_lib_period_bytes(substream);
harmony->cap_count = 0;
harmony->cap_stopped = 1;
/* initialize given sample rate */
harmony->sample_rate = snd_card_harmony_rate_bits(runtime->rate);
/* data format */
if (snd_pcm_format_width(runtime->format) == 16) harmony->data_format =
HARMONY_DF_16BIT_LINEAR;
else harmony->data_format = HARMONY_DF_8BIT_ULAW;
/* number of channels */
if (runtime->channels == 1) harmony->stereo_select = HARMONY_SS_MONO;
else if (runtime->channels == 2) harmony->stereo_select = HARMONY_SS_STEREO;
snd_harmony_update_control(harmony);
harmony->format_initialized = 1;
harmony->cap_buffer = runtime->dma_addr;
return 0;
}
static snd_pcm_uframes_t snd_card_harmony_capture_pointer(snd_pcm_substream_t *
substream)
{
snd_pcm_runtime_t *runtime = substream->runtime;
snd_card_harmony_t *harmony = snd_pcm_substream_chip(substream);
unsigned long rcuradd;
int recorded;
if (harmony->cap_stopped) return 0;
if (harmony->capture_substream == NULL) return 0;
rcuradd = gsc_readl(harmony->hpa+REG_RCURADD);
recorded = (rcuradd - harmony->cap_buffer);
recorded %= harmony->cap_size;
return bytes_to_frames(runtime, recorded);
}
/*
*/
static snd_pcm_uframes_t snd_card_harmony_playback_pointer(snd_pcm_substream_t *
substream)
{
snd_pcm_runtime_t *runtime = substream->runtime;
snd_card_harmony_t *harmony = snd_pcm_substream_chip(substream);
int played;
long int pcuradd = gsc_readl(harmony->hpa+REG_PCURADD);
if ((harmony->ply_stopped) || (harmony->playback_substream == NULL)) return 0;
if ((harmony->ply_buffer == 0) || (harmony->ply_size == 0)) return 0;
played = (pcuradd - harmony->ply_buffer);
printk(KERN_DEBUG PFX "Pointer is %lx-%lx = %d\n", pcuradd,
harmony->ply_buffer, played);
if (pcuradd > harmony->ply_buffer + harmony->ply_size) return 0;
return bytes_to_frames(runtime, played);
}
static snd_pcm_hardware_t snd_card_harmony_playback =
{
.info = (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
SNDRV_PCM_INFO_JOINT_DUPLEX |
SNDRV_PCM_INFO_MMAP_VALID |
SNDRV_PCM_INFO_BLOCK_TRANSFER),
.formats = (SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_BE |
SNDRV_PCM_FMTBIT_A_LAW |
SNDRV_PCM_FMTBIT_MU_LAW),
.rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
.rate_min = 5500,
.rate_max = 48000,
.channels_min = 1,
.channels_max = 2,
.buffer_bytes_max = MAX_BUFFER_SIZE,
.period_bytes_min = HARMONY_BUF_SIZE,
.period_bytes_max = HARMONY_BUF_SIZE,
.periods_min = 1,
.periods_max = MAX_BUFS,
.fifo_size = 0,
};
static snd_pcm_hardware_t snd_card_harmony_capture =
{
.info = (SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
SNDRV_PCM_INFO_JOINT_DUPLEX |
SNDRV_PCM_INFO_MMAP_VALID |
SNDRV_PCM_INFO_BLOCK_TRANSFER),
.formats = (SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_BE |
SNDRV_PCM_FMTBIT_A_LAW |
SNDRV_PCM_FMTBIT_MU_LAW),
.rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
.rate_min = 5500,
.rate_max = 48000,
.channels_min = 1,
.channels_max = 2,
.buffer_bytes_max = MAX_BUFFER_SIZE,
.period_bytes_min = HARMONY_BUF_SIZE,
.period_bytes_max = HARMONY_BUF_SIZE,
.periods_min = 1,
.periods_max = MAX_BUFS,
.fifo_size = 0,
};
static int snd_card_harmony_playback_open(snd_pcm_substream_t * substream)
{
snd_card_harmony_t *harmony = snd_pcm_substream_chip(substream);
snd_pcm_runtime_t *runtime = substream->runtime;
int err;
/*
* harmony is not "real" pci, but we need a pci_dev
* to alloc PCI DMA pages
*/
substream->dma_private = harmony->fake_pci_dev;
substream->dma_type = SNDRV_PCM_DMA_TYPE_PCI;
harmony->playback_substream = substream;
runtime->hw = snd_card_harmony_playback;
snd_pcm_hw_constraint_list(runtime, 0, SNDRV_PCM_HW_PARAM_RATE,
&hw_constraint_rates);
if ((err = snd_pcm_hw_constraint_integer(runtime, SNDRV_PCM_HW_PARAM_PERIODS))
< 0)
return err;
return 0;
}
static int snd_card_harmony_capture_open(snd_pcm_substream_t * substream)
{
snd_card_harmony_t *harmony = snd_pcm_substream_chip(substream);
snd_pcm_runtime_t *runtime = substream->runtime;
int err;
/*
* harmony is not "real" pci, but we need a pci_dev
* to alloc PCI DMA pages
*/
substream->dma_private = harmony->fake_pci_dev;
substream->dma_type = SNDRV_PCM_DMA_TYPE_PCI;
harmony->capture_substream = substream;
runtime->hw = snd_card_harmony_capture;
snd_pcm_hw_constraint_list(runtime, 0, SNDRV_PCM_HW_PARAM_RATE,
&hw_constraint_rates);
if ((err = snd_pcm_hw_constraint_integer(runtime, SNDRV_PCM_HW_PARAM_PERIODS))
< 0)
return err;
return 0;
}
static int snd_card_harmony_playback_close(snd_pcm_substream_t * substream)
{
snd_card_harmony_t *harmony = snd_pcm_substream_chip(substream);
snd_pcm_lib_free_pages(substream);
harmony->playback_substream = NULL;
harmony->ply_size = 0;
harmony->ply_buf = 0;
harmony->ply_buffer = 0;
harmony->ply_count = 0;
harmony->ply_stopped = 1;
harmony->format_initialized = 0;
return 0;
}
static int snd_card_harmony_capture_close(snd_pcm_substream_t * substream)
{
snd_card_harmony_t *harmony = snd_pcm_substream_chip(substream);
snd_pcm_lib_free_pages(substream);
harmony->capture_substream = NULL;
harmony->cap_size = 0;
harmony->cap_buf = 0;
harmony->cap_buffer = 0;
harmony->cap_count = 0;
harmony->cap_stopped = 1;
harmony->format_initialized = 0;
return 0;
}
static int snd_card_harmony_hw_params(snd_pcm_substream_t *substream,
snd_pcm_hw_params_t * hw_params)
{
snd_pcm_runtime_t *runtime = substream->runtime;
int err;
err = snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(hw_params));
DPRINTK(KERN_INFO PFX "HW Params returned %d, dma_addr %lx\n", err,
(unsigned long)runtime->dma_addr);
return err;
}
static int snd_card_harmony_hw_free(snd_pcm_substream_t *substream)
{
snd_pcm_lib_free_pages(substream);
return 0;
}
static snd_pcm_ops_t snd_card_harmony_playback_ops = {
.open = snd_card_harmony_playback_open,
.close = snd_card_harmony_playback_close,
.ioctl = snd_card_harmony_playback_ioctl,
.hw_params = snd_card_harmony_hw_params,
.hw_free = snd_card_harmony_hw_free,
.prepare = snd_card_harmony_playback_prepare,
.trigger = snd_card_harmony_playback_trigger,
.pointer = snd_card_harmony_playback_pointer,
};
static snd_pcm_ops_t snd_card_harmony_capture_ops = {
.open = snd_card_harmony_capture_open,
.close = snd_card_harmony_capture_close,
.ioctl = snd_card_harmony_capture_ioctl,
.hw_params = snd_card_harmony_hw_params,
.hw_free = snd_card_harmony_hw_free,
.prepare = snd_card_harmony_capture_prepare,
.trigger = snd_card_harmony_capture_trigger,
.pointer = snd_card_harmony_capture_pointer,
};
static int snd_card_harmony_pcm_init(snd_card_harmony_t *harmony, int device)
{
snd_pcm_t *pcm;
int err;
/* Request that IRQ */
if (request_irq(harmony->irq, snd_card_harmony_interrupt, 0 ,"harmony",
harmony)) {
printk(KERN_ERR PFX "Error requesting irq %d.\n", harmony->irq);
return -EFAULT;
}
snd_harmony_disable_interrupts(harmony);
if ((err = snd_pcm_new(harmony->card, "Harmony", device, 1, 1, &pcm)) < 0)
return err;
snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK,
&snd_card_harmony_playback_ops);
snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_card_harmony_capture_ops);
pcm->private_data = harmony;
pcm->info_flags = 0;
strcpy(pcm->name, "Harmony");
harmony->pcm = pcm;
/* initialize graveyard buffer */
harmony->graveyard_addr = snd_malloc_pci_pages(harmony->fake_pci_dev,
HARMONY_BUF_SIZE*GRAVEYARD_BUFS, &harmony->graveyard_dma);
harmony->graveyard_count = 0;
/* initialize silence buffers */
harmony->silence_addr = snd_malloc_pci_pages(harmony->fake_pci_dev,
HARMONY_BUF_SIZE*SILENCE_BUFS, &harmony->silence_dma);
harmony->silence_count = 0;
harmony->ply_stopped = harmony->cap_stopped = 1;
harmony->playback_substream = NULL;
harmony->capture_substream = NULL;
harmony->graveyard_count = 0;
return 0;
}
/*
* mixer routines
*/
static void snd_harmony_set_new_gain(snd_card_harmony_t *harmony)
{
DPRINTK(KERN_INFO PFX "Setting new gain %x at %lx\n", harmony->current_gain,
harmony->hpa+REG_GAINCTL);
/* Wait until we're out of control mode */
snd_harmony_wait_cntl(harmony);
gsc_writel(harmony->current_gain, harmony->hpa+REG_GAINCTL);
}
#define HARMONY_VOLUME(xname, left_shift, right_shift, mask, invert) \
{ .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, \
.info = snd_harmony_mixercontrol_info, \
.get = snd_harmony_volume_get, .put = snd_harmony_volume_put, \
.private_value = ((left_shift) | ((right_shift) << 8) | ((mask) << 16) | ((invert)
<< 24)) }
static int snd_harmony_mixercontrol_info(snd_kcontrol_t * kcontrol,
snd_ctl_elem_info_t * uinfo)
{
int mask = (kcontrol->private_value >> 16) & 0xff;
int left_shift = (kcontrol->private_value) & 0xff;
int right_shift = (kcontrol->private_value >> 8) & 0xff;
uinfo->type = (mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN :
SNDRV_CTL_ELEM_TYPE_INTEGER);
uinfo->count = (left_shift == right_shift) ? 1 : 2;
uinfo->value.integer.min = 0;
uinfo->value.integer.max = mask;
return 0;
}
static int snd_harmony_volume_get(snd_kcontrol_t * kcontrol, snd_ctl_elem_value_t *
ucontrol)
{
snd_card_harmony_t *harmony = _snd_kcontrol_chip(kcontrol);
int shift_left = (kcontrol->private_value) & 0xff;
int shift_right = (kcontrol->private_value >> 8) & 0xff;
int mask = (kcontrol->private_value >> 16) & 0xff;
int invert = (kcontrol->private_value >> 24) & 0xff;
unsigned long flags;
int left, right;
spin_lock_irqsave(&harmony->mixer_lock, flags);
left = (harmony->current_gain >> shift_left) & mask;
right = (harmony->current_gain >> shift_right) & mask;
if (invert) {
left = mask - left;
right = mask - right;
}
ucontrol->value.integer.value[0] = left;
ucontrol->value.integer.value[1] = right;
spin_unlock_irqrestore(&harmony->mixer_lock, flags);
return 0;
}
static int snd_harmony_volume_put(snd_kcontrol_t * kcontrol, snd_ctl_elem_value_t *
ucontrol)
{
snd_card_harmony_t *harmony = _snd_kcontrol_chip(kcontrol);
int shift_left = (kcontrol->private_value) & 0xff;
int shift_right = (kcontrol->private_value >> 8) & 0xff;
int mask = (kcontrol->private_value >> 16) & 0xff;
int invert = (kcontrol->private_value >> 24) & 0xff;
unsigned long flags;
int left, right;
int old_gain = harmony->current_gain;
left = ucontrol->value.integer.value[0] & mask;
right = ucontrol->value.integer.value[1] & mask;
if (invert) {
left = mask - left;
right = mask - right;
}
spin_lock_irqsave(&harmony->mixer_lock, flags);
harmony->current_gain = harmony->current_gain & ~( (mask << shift_right) |
(mask << shift_left));
harmony->current_gain = harmony->current_gain | ((left << shift_left) | (right
<< shift_right) );
snd_harmony_set_new_gain(harmony);
spin_unlock_irqrestore(&harmony->mixer_lock, flags);
return (old_gain - harmony->current_gain);
}
#define HARMONY_CONTROLS (sizeof(snd_harmony_controls)/sizeof(snd_kcontrol_new_t))
static snd_kcontrol_new_t snd_harmony_controls[] = {
HARMONY_VOLUME("PCM Capture Volume", 12, 16, 0x0f, 0),
HARMONY_VOLUME("Master Volume", 20, 20, 0x0f, 1),
HARMONY_VOLUME("PCM Playback Volume", 6, 0, 0x3f, 1),
};
static void snd_harmony_reset_codec(snd_card_harmony_t *harmony)
{
snd_harmony_wait_cntl(harmony);
gsc_writel(1, harmony->hpa+REG_RESET);
mdelay(50); /* wait 50 ms */
gsc_writel(0, harmony->hpa+REG_RESET);
}
/*
* Mute all the output and reset Harmony.
*/
static void __init snd_harmony_mixer_reset(snd_card_harmony_t *harmony)
{
harmony->current_gain = HARMONY_GAIN_TOTAL_SILENCE;
snd_harmony_set_new_gain(harmony);
snd_harmony_reset_codec(harmony);
harmony->current_gain = HARMONY_GAIN_DEFAULT;
snd_harmony_set_new_gain(harmony);
}
int __init snd_card_harmony_mixer_init(snd_card_harmony_t *harmony)
{
snd_card_t *card = harmony->card;
int idx, err;
snd_assert(harmony != NULL, return -EINVAL);
strcpy(card->mixername, "Harmony Gain control interface");
for (idx = 0; idx < HARMONY_CONTROLS; idx++) {
if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_harmony_controls[idx],
harmony))) < 0)
return err;
}
snd_harmony_mixer_reset(harmony);
return 0;
}
static int snd_card_harmony_create(snd_card_t *card, struct parisc_device *pa_dev,
snd_card_harmony_t *harmony)
{
u32 cntl;
harmony->card = card;
/* Set the HPA of harmony */
harmony->hpa = pa_dev->hpa;
harmony->irq = pa_dev->irq;
if (!harmony->irq) {
printk(KERN_ERR PFX "no irq found\n");
return -ENODEV;
}
/* Grab the ID and revision from the device */
harmony->id = (gsc_readl(harmony->hpa+REG_ID)&0x00ff0000) >> 16;
if ((harmony->id | 1) != 0x15) {
printk(KERN_WARNING PFX "wrong harmony id 0x%02x\n", harmony->id);
return -EBUSY;
}
cntl = gsc_readl(harmony->hpa+REG_CNTL);
harmony->rev = (cntl>>20) & 0xff;
printk(KERN_INFO "Lasi Harmony Audio driver h/w id %i, rev. %i at 0x%lx, IRQ
%i\n", harmony->id, harmony->rev, pa_dev->hpa, harmony->irq);
/* Make sure the control bit isn't set, although I don't think it
ever is. */
if (cntl & HARMONY_CNTL_C) {
printk(KERN_WARNING PFX "CNTL busy\n");
harmony->hpa = 0;
return -EBUSY;
}
/* a fake pci_dev is needed for pci_* functions under ccio */
harmony->fake_pci_dev = ccio_get_fake(pa_dev);
return 0;
}
static int __init snd_card_harmony_probe(struct parisc_device *pa_dev)
{
static int dev;
snd_card_harmony_t *chip;
snd_card_t *card;
int err;
if (dev >= SNDRV_CARDS)
return -ENODEV;
if (!enable[dev]) {
dev++;
return -ENOENT;
}
snd_harmony_cards[dev] = snd_card_new(index[dev], id[dev], THIS_MODULE,
sizeof(snd_card_harmony_t));
card = snd_harmony_cards[dev];
if (card == NULL)
return -ENOMEM;
chip = (struct snd_card_harmony *)card->private_data;
if ((err = snd_card_harmony_create(card, pa_dev, chip)) < 0) {
printk(KERN_ERR PFX "Creation failed\n");
snd_card_free(card);
return err;
}
if ((err = snd_card_harmony_pcm_init(chip, dev)) < 0) {
printk(KERN_ERR PFX "PCM Init failed\n");
snd_card_free(card);
return err;
}
if ((err = snd_card_harmony_mixer_init(chip)) < 0) {
printk(KERN_ERR PFX "Mixer init failed\n");
snd_card_free(card);
return err;
}
snd_harmony_proc_init(chip);
strcpy(card->driver, "Harmony");
strcpy(card->shortname, "ALSA driver for LASI Harmony");
sprintf(card->longname, "%s at h/w, id %i, rev. %i hpa 0x%lx, IRQ
%i\n",card->shortname, chip->id, chip->rev, pa_dev->hpa, chip->irq);
if ((err = snd_card_register(card)) < 0) {
snd_card_free(card);
return err;
}
printk(KERN_DEBUG PFX "Successfully registered harmony pcm backend & mixer
%d\n", dev);
dev++;
return 0;
}
static struct parisc_device_id snd_card_harmony_devicetbl[] = {
{ HPHW_FIO, HVERSION_REV_ANY_ID, HVERSION_ANY_ID, 0x0007A }, /* Bushmaster/Flounder */
{ HPHW_FIO, HVERSION_REV_ANY_ID, HVERSION_ANY_ID, 0x0007B }, /* 712/715 Audio */
{ HPHW_FIO, HVERSION_REV_ANY_ID, HVERSION_ANY_ID, 0x0007E }, /* Pace Audio */
{ HPHW_FIO, HVERSION_REV_ANY_ID, HVERSION_ANY_ID, 0x0007F }, /* Outfield / Coral II */
{ 0, }
};
MODULE_DEVICE_TABLE(parisc, snd_card_harmony_devicetbl);
/*
* bloc device parisc. c'est une structure qui definit un device
* que l'on trouve sur parisc.
* On y trouve les differents numeros HVERSION correspondant au device
* en question (ce qui permet a l'inventory de l'identifier) et la fonction
* d'initialisation du chose
*/
static struct parisc_driver snd_card_harmony_driver = {
name: "Lasi ALSA Harmony",
id_table: snd_card_harmony_devicetbl,
probe: snd_card_harmony_probe,
};
static int __init alsa_card_harmony_init(void)
{
int err;
if ((err = register_parisc_driver(&snd_card_harmony_driver)) < 0) {
printk(KERN_ERR "Harmony soundcard not found or device busy\n");
return err;
}
return 0;
}
static void __exit alsa_card_harmony_exit(void)
{
int idx;
snd_card_harmony_t *harmony;
for (idx = 0; idx < SNDRV_CARDS; idx++)
{
if (snd_harmony_cards[idx] != NULL)
{
DPRINTK(KERN_INFO PFX "Freeing card %d\n", idx);
harmony = snd_harmony_cards[idx]->private_data;
snd_harmony_proc_done(harmony);
free_irq(harmony->irq, snd_card_harmony_interrupt);
printk(KERN_INFO PFX "Card unloaded %d, irq=%d\n", idx,
harmony->irq);
snd_card_free(snd_harmony_cards[idx]);
}
}
}
module_init(alsa_card_harmony_init)
module_exit(alsa_card_harmony_exit)
-------------------------------------------------------
This SF.NET email is sponsored by:
SourceForge Enterprise Edition + IBM + LinuxWorld = Something 2 See!
http://www.vasoftware.com
_______________________________________________
Alsa-cvslog mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/alsa-cvslog
