diff ext/openal-soft/Alc/alsa.c @ 0:4a0efb7baf70

* Datasets becomes the new trunk and retires after that :-)
author mvbarracuda@33b003aa-7bff-0310-803a-e67f0ece8222
date Sun, 29 Jun 2008 18:44:17 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ext/openal-soft/Alc/alsa.c	Sun Jun 29 18:44:17 2008 +0000
@@ -0,0 +1,906 @@
+/**
+ * OpenAL cross platform audio library
+ * Copyright (C) 1999-2007 by authors.
+ * This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ *  Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the
+ *  Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ *  Boston, MA  02111-1307, USA.
+ * Or go to http://www.gnu.org/copyleft/lgpl.html
+ */
+
+#include "config.h"
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <memory.h>
+#ifdef HAVE_DLFCN_H
+#include <dlfcn.h>
+#endif
+#include "alMain.h"
+#include "AL/al.h"
+#include "AL/alc.h"
+
+#include <alsa/asoundlib.h>
+
+
+typedef struct {
+    snd_pcm_t *pcmHandle;
+    snd_pcm_format_t format;
+
+    ALvoid *buffer;
+    ALsizei size;
+
+    int killNow;
+    ALvoid *thread;
+} alsa_data;
+
+typedef struct {
+    ALCchar *name;
+    int card, dev;
+} DevMap;
+
+static void *alsa_handle;
+#define MAKE_FUNC(f) static typeof(f) * p##f
+MAKE_FUNC(snd_strerror);
+MAKE_FUNC(snd_pcm_open);
+MAKE_FUNC(snd_pcm_close);
+MAKE_FUNC(snd_pcm_nonblock);
+MAKE_FUNC(snd_pcm_frames_to_bytes);
+MAKE_FUNC(snd_pcm_hw_params_malloc);
+MAKE_FUNC(snd_pcm_hw_params_free);
+MAKE_FUNC(snd_pcm_hw_params_any);
+MAKE_FUNC(snd_pcm_hw_params_set_access);
+MAKE_FUNC(snd_pcm_hw_params_set_format);
+MAKE_FUNC(snd_pcm_hw_params_set_channels);
+MAKE_FUNC(snd_pcm_hw_params_set_periods_near);
+MAKE_FUNC(snd_pcm_hw_params_set_rate_near);
+MAKE_FUNC(snd_pcm_hw_params_set_rate);
+MAKE_FUNC(snd_pcm_hw_params_set_buffer_size_near);
+MAKE_FUNC(snd_pcm_hw_params_set_buffer_size_min);
+MAKE_FUNC(snd_pcm_hw_params_get_period_size);
+MAKE_FUNC(snd_pcm_hw_params_get_access);
+MAKE_FUNC(snd_pcm_hw_params);
+MAKE_FUNC(snd_pcm_prepare);
+MAKE_FUNC(snd_pcm_start);
+MAKE_FUNC(snd_pcm_resume);
+MAKE_FUNC(snd_pcm_wait);
+MAKE_FUNC(snd_pcm_state);
+MAKE_FUNC(snd_pcm_avail_update);
+MAKE_FUNC(snd_pcm_areas_silence);
+MAKE_FUNC(snd_pcm_mmap_begin);
+MAKE_FUNC(snd_pcm_mmap_commit);
+MAKE_FUNC(snd_pcm_writei);
+MAKE_FUNC(snd_pcm_drain);
+MAKE_FUNC(snd_pcm_info_malloc);
+MAKE_FUNC(snd_pcm_info_free);
+MAKE_FUNC(snd_pcm_info_set_device);
+MAKE_FUNC(snd_pcm_info_set_subdevice);
+MAKE_FUNC(snd_pcm_info_set_stream);
+MAKE_FUNC(snd_pcm_info_get_name);
+MAKE_FUNC(snd_ctl_pcm_next_device);
+MAKE_FUNC(snd_ctl_pcm_info);
+MAKE_FUNC(snd_ctl_open);
+MAKE_FUNC(snd_ctl_close);
+MAKE_FUNC(snd_ctl_card_info_malloc);
+MAKE_FUNC(snd_ctl_card_info_free);
+MAKE_FUNC(snd_ctl_card_info);
+MAKE_FUNC(snd_ctl_card_info_get_name);
+MAKE_FUNC(snd_card_next);
+#undef MAKE_FUNC
+
+#define MAX_DEVICES 16
+#define MAX_ALL_DEVICES 32
+
+static DevMap allDevNameMap[MAX_ALL_DEVICES];
+static ALCchar *alsaDeviceList[MAX_DEVICES];
+static DevMap allCaptureDevNameMap[MAX_ALL_DEVICES];
+
+static int xrun_recovery(snd_pcm_t *handle, int err)
+{
+    if (err == -EPIPE)
+    {    /* under-run */
+        err = psnd_pcm_prepare(handle);
+        if (err < 0)
+            AL_PRINT("prepare failed: %s\n", psnd_strerror(err));
+    }
+    else if (err == -ESTRPIPE)
+    {
+        while ((err = psnd_pcm_resume(handle)) == -EAGAIN)
+            Sleep(1);       /* wait until the suspend flag is released */
+        if (err < 0)
+        {
+            err = psnd_pcm_prepare(handle);
+            if (err < 0)
+                AL_PRINT("prepare failed: %s\n", psnd_strerror(err));
+        }
+    }
+    return err;
+}
+
+
+static ALuint ALSAProc(ALvoid *ptr)
+{
+    ALCdevice *pDevice = (ALCdevice*)ptr;
+    alsa_data *data = (alsa_data*)pDevice->ExtraData;
+    const snd_pcm_channel_area_t *areas = NULL;
+    snd_pcm_sframes_t avail, commitres;
+    snd_pcm_uframes_t offset, frames;
+    char *WritePtr;
+    int WriteCnt;
+    int err;
+
+    while(!data->killNow)
+    {
+        snd_pcm_state_t state = psnd_pcm_state(data->pcmHandle);
+        if(state == SND_PCM_STATE_XRUN)
+        {
+            err = xrun_recovery(data->pcmHandle, -EPIPE);
+            if (err < 0)
+            {
+                AL_PRINT("XRUN recovery failed: %s\n", psnd_strerror(err));
+                break;
+            }
+        }
+        else if (state == SND_PCM_STATE_SUSPENDED)
+        {
+            err = xrun_recovery(data->pcmHandle, -ESTRPIPE);
+            if (err < 0)
+            {
+                AL_PRINT("SUSPEND recovery failed: %s\n", psnd_strerror(err));
+                break;
+            }
+        }
+
+        avail = psnd_pcm_avail_update(data->pcmHandle);
+        if(avail < 0)
+        {
+            err = xrun_recovery(data->pcmHandle, avail);
+            if (err < 0)
+            {
+                AL_PRINT("available update failed: %s\n", psnd_strerror(err));
+                break;
+            }
+        }
+
+        // make sure there's frames to process
+        if(avail == 0)
+        {
+            if(state != SND_PCM_STATE_RUNNING)
+            {
+                err = psnd_pcm_start(data->pcmHandle);
+                if(err < 0)
+                    err = xrun_recovery(data->pcmHandle, err);
+                if(err < 0)
+                {
+                    AL_PRINT("start failed: %s\n", psnd_strerror(err));
+                    break;
+                }
+            }
+            else if(psnd_pcm_wait(data->pcmHandle, 1000) == 0)
+                AL_PRINT("Wait timeout... buffer size too low?\n");
+            continue;
+        }
+
+        // it is possible that contiguous areas are smaller, thus we use a loop
+        while (avail > 0)
+        {
+            frames = avail;
+
+            err = psnd_pcm_mmap_begin(data->pcmHandle, &areas, &offset, &frames);
+            if (err < 0)
+            {
+                err = xrun_recovery(data->pcmHandle, err);
+                if (err < 0)
+                    AL_PRINT("mmap begin error: %s\n", psnd_strerror(err));
+                break;
+            }
+
+            SuspendContext(NULL);
+            WritePtr = (char*)areas->addr + (offset * areas->step / 8);
+            WriteCnt = psnd_pcm_frames_to_bytes(data->pcmHandle, frames);
+            aluMixData(pDevice->Context, WritePtr, WriteCnt, pDevice->Format);
+            ProcessContext(NULL);
+
+            commitres = psnd_pcm_mmap_commit(data->pcmHandle, offset, frames);
+            if (commitres < 0 || (commitres-frames) != 0)
+            {
+                AL_PRINT("mmap commit error: %s\n",
+                         psnd_strerror(commitres >= 0 ? -EPIPE : commitres));
+                break;
+            }
+
+            avail -= frames;
+        }
+    }
+
+    return 0;
+}
+
+static ALuint ALSANoMMapProc(ALvoid *ptr)
+{
+    ALCdevice *pDevice = (ALCdevice*)ptr;
+    alsa_data *data = (alsa_data*)pDevice->ExtraData;
+    snd_pcm_sframes_t avail;
+    char *WritePtr;
+
+    while(!data->killNow)
+    {
+        SuspendContext(NULL);
+        aluMixData(pDevice->Context, data->buffer, data->size, pDevice->Format);
+        ProcessContext(NULL);
+
+        WritePtr = data->buffer;
+        avail = (snd_pcm_uframes_t)data->size / psnd_pcm_frames_to_bytes(data->pcmHandle, 1);
+        while(avail > 0)
+        {
+            int ret = psnd_pcm_writei(data->pcmHandle, WritePtr, avail);
+            switch (ret)
+            {
+            case -EAGAIN:
+                continue;
+            case -ESTRPIPE:
+                while((ret=psnd_pcm_resume(data->pcmHandle)) == -EAGAIN)
+                    Sleep(1);
+                break;
+            case -EPIPE:
+                break;
+            default:
+                if (ret >= 0)
+                {
+                    WritePtr += psnd_pcm_frames_to_bytes(data->pcmHandle, ret);
+                    avail -= ret;
+                }
+                break;
+            }
+            if (ret < 0)
+            {
+                ret = psnd_pcm_prepare(data->pcmHandle);
+                if(ret < 0)
+                    break;
+            }
+        }
+    }
+
+    return 0;
+}
+
+static ALCboolean alsa_open_playback(ALCdevice *device, const ALCchar *deviceName)
+{
+    snd_pcm_uframes_t bufferSizeInFrames;
+    snd_pcm_hw_params_t *p = NULL;
+    snd_pcm_access_t access;
+    unsigned int periods;
+    alsa_data *data;
+    char driver[64];
+    const char *str;
+    int allowmmap;
+    char *err;
+    int i;
+
+    if(!alsa_handle)
+        return ALC_FALSE;
+
+    strncpy(driver, GetConfigValue("alsa", "device", "default"), sizeof(driver)-1);
+    driver[sizeof(driver)-1] = 0;
+    if(deviceName)
+    {
+        size_t idx;
+
+        for(idx = 0;idx < MAX_ALL_DEVICES;idx++)
+        {
+            if(allDevNameMap[idx].name &&
+               strcmp(deviceName, allDevNameMap[idx].name) == 0)
+            {
+                device->szDeviceName = allDevNameMap[idx].name;
+                if(idx > 0)
+                    sprintf(driver, "hw:%d,%d", allDevNameMap[idx].card, allDevNameMap[idx].dev);
+                goto open_alsa;
+            }
+        }
+        for(idx = 0;idx < MAX_DEVICES;idx++)
+        {
+            if(alsaDeviceList[idx] &&
+               strcmp(deviceName, alsaDeviceList[idx]) == 0)
+            {
+                device->szDeviceName = alsaDeviceList[idx];
+                if(idx > 0)
+                    sprintf(driver, "hw:%zd,0", idx-1);
+                goto open_alsa;
+            }
+        }
+        return ALC_FALSE;
+    }
+    else
+        device->szDeviceName = alsaDeviceList[0];
+
+open_alsa:
+    data = (alsa_data*)calloc(1, sizeof(alsa_data));
+
+    i = psnd_pcm_open(&data->pcmHandle, driver, SND_PCM_STREAM_PLAYBACK, SND_PCM_NONBLOCK);
+    if(i < 0)
+    {
+        Sleep(200);
+        i = psnd_pcm_open(&data->pcmHandle, driver, SND_PCM_STREAM_PLAYBACK, SND_PCM_NONBLOCK);
+    }
+    if(i >= 0)
+    {
+        i = psnd_pcm_nonblock(data->pcmHandle, 0);
+        if(i < 0)
+            psnd_pcm_close(data->pcmHandle);
+    }
+    if(i < 0)
+    {
+        free(data);
+        AL_PRINT("Could not open playback device '%s': %s\n", driver, psnd_strerror(i));
+        return ALC_FALSE;
+    }
+
+    switch(aluBytesFromFormat(device->Format))
+    {
+        case 1:
+            data->format = SND_PCM_FORMAT_U8;
+            break;
+        case 2:
+            data->format = SND_PCM_FORMAT_S16;
+            break;
+        default:
+            data->format = SND_PCM_FORMAT_UNKNOWN;
+            AL_PRINT("Unknown format?! %x\n", device->Format);
+    }
+
+    periods = GetConfigValueInt("alsa", "periods", 0);
+    bufferSizeInFrames = device->UpdateSize;
+
+    str = GetConfigValue("alsa", "mmap", "true");
+    allowmmap = (strcasecmp(str, "true") == 0 ||
+                 strcasecmp(str, "yes") == 0 ||
+                 strcasecmp(str, "on") == 0 ||
+                 atoi(str) != 0);
+
+    psnd_pcm_hw_params_malloc(&p);
+#define ok(func, str) (i=(func),((i<0)?(err=(str)),0:1))
+    /* start with the largest configuration space possible */
+    if(!(ok(psnd_pcm_hw_params_any(data->pcmHandle, p), "any") &&
+         /* set interleaved access */
+         ((allowmmap && ok(psnd_pcm_hw_params_set_access(data->pcmHandle, p, SND_PCM_ACCESS_MMAP_INTERLEAVED), "set access")) ||
+          ok(psnd_pcm_hw_params_set_access(data->pcmHandle, p, SND_PCM_ACCESS_RW_INTERLEAVED), "set access")) &&
+         /* set format (implicitly sets sample bits) */
+         ok(psnd_pcm_hw_params_set_format(data->pcmHandle, p, data->format), "set format") &&
+         /* set channels (implicitly sets frame bits) */
+         ok(psnd_pcm_hw_params_set_channels(data->pcmHandle, p, aluChannelsFromFormat(device->Format)), "set channels") &&
+         /* set periods (implicitly constrains period/buffer parameters) */
+         (!periods || ok(psnd_pcm_hw_params_set_periods_near(data->pcmHandle, p, &periods, NULL), "set periods near")) &&
+         /* set rate (implicitly constrains period/buffer parameters) */
+         ok(psnd_pcm_hw_params_set_rate_near(data->pcmHandle, p, &device->Frequency, NULL), "set rate near") &&
+         /* set buffer size in frame units (implicitly sets period size/bytes/time and buffer time/bytes) */
+         ok(psnd_pcm_hw_params_set_buffer_size_near(data->pcmHandle, p, &bufferSizeInFrames), "set buffer size near") &&
+         /* install and prepare hardware configuration */
+         ok(psnd_pcm_hw_params(data->pcmHandle, p), "set params")))
+    {
+        AL_PRINT("%s failed: %s\n", err, psnd_strerror(i));
+        psnd_pcm_hw_params_free(p);
+        psnd_pcm_close(data->pcmHandle);
+        free(data);
+        return ALC_FALSE;
+    }
+#undef ok
+
+    if((i=psnd_pcm_hw_params_get_access(p, &access)) < 0)
+    {
+        AL_PRINT("get_access failed: %s\n", psnd_strerror(i));
+        psnd_pcm_hw_params_free(p);
+        psnd_pcm_close(data->pcmHandle);
+        free(data);
+        return ALC_FALSE;
+    }
+
+    if((i=psnd_pcm_hw_params_get_period_size(p, &bufferSizeInFrames, NULL)) < 0)
+    {
+        AL_PRINT("get_period_size failed: %s\n", psnd_strerror(i));
+        psnd_pcm_hw_params_free(p);
+        psnd_pcm_close(data->pcmHandle);
+        free(data);
+        return ALC_FALSE;
+    }
+
+    psnd_pcm_hw_params_free(p);
+
+    device->UpdateSize = bufferSizeInFrames;
+
+    data->size = psnd_pcm_frames_to_bytes(data->pcmHandle, device->UpdateSize);
+    if(access == SND_PCM_ACCESS_RW_INTERLEAVED)
+    {
+        data->buffer = malloc(data->size);
+        if(!data->buffer)
+        {
+            AL_PRINT("buffer malloc failed\n");
+            psnd_pcm_close(data->pcmHandle);
+            free(data);
+            return ALC_FALSE;
+        }
+    }
+    else
+    {
+        i = psnd_pcm_prepare(data->pcmHandle);
+        if(i < 0)
+        {
+            AL_PRINT("prepare error: %s\n", psnd_strerror(i));
+            psnd_pcm_close(data->pcmHandle);
+            free(data->buffer);
+            free(data);
+            return ALC_FALSE;
+        }
+    }
+
+    device->ExtraData = data;
+    if(access == SND_PCM_ACCESS_RW_INTERLEAVED)
+        data->thread = StartThread(ALSANoMMapProc, device);
+    else
+        data->thread = StartThread(ALSAProc, device);
+    if(data->thread == NULL)
+    {
+        psnd_pcm_close(data->pcmHandle);
+        device->ExtraData = NULL;
+        free(data->buffer);
+        free(data);
+        return ALC_FALSE;
+    }
+
+    return ALC_TRUE;
+}
+
+static void alsa_close_playback(ALCdevice *device)
+{
+    alsa_data *data = (alsa_data*)device->ExtraData;
+    data->killNow = 1;
+    StopThread(data->thread);
+    psnd_pcm_close(data->pcmHandle);
+
+    free(data->buffer);
+    free(data);
+    device->ExtraData = NULL;
+}
+
+
+static ALCboolean alsa_open_capture(ALCdevice *pDevice, const ALCchar *deviceName, ALCuint frequency, ALCenum format, ALCsizei SampleSize)
+{
+    snd_pcm_format_t alsaFormat;
+    snd_pcm_hw_params_t *p;
+    snd_pcm_uframes_t bufferSizeInFrames;
+    alsa_data *data;
+    char driver[64];
+    char *err;
+    int i;
+
+    if(!alsa_handle)
+        return ALC_FALSE;
+
+    strncpy(driver, GetConfigValue("alsa", "capture", "default"), sizeof(driver)-1);
+    driver[sizeof(driver)-1] = 0;
+    if(deviceName)
+    {
+        size_t idx;
+
+        for(idx = 0;idx < MAX_ALL_DEVICES;idx++)
+        {
+            if(allCaptureDevNameMap[idx].name &&
+               strcmp(deviceName, allCaptureDevNameMap[idx].name) == 0)
+            {
+                pDevice->szDeviceName = allCaptureDevNameMap[idx].name;
+                if(idx > 0)
+                    sprintf(driver, "hw:%d,%d", allCaptureDevNameMap[idx].card, allCaptureDevNameMap[idx].dev);
+                goto open_alsa;
+            }
+        }
+        return ALC_FALSE;
+    }
+    else
+        pDevice->szDeviceName = allCaptureDevNameMap[0].name;
+
+open_alsa:
+    data = (alsa_data*)calloc(1, sizeof(alsa_data));
+
+    i = psnd_pcm_open(&data->pcmHandle, driver, SND_PCM_STREAM_CAPTURE, SND_PCM_NONBLOCK);
+    if(i < 0)
+    {
+        Sleep(200);
+        i = psnd_pcm_open(&data->pcmHandle, driver, SND_PCM_STREAM_CAPTURE, SND_PCM_NONBLOCK);
+    }
+    if(i >= 0)
+    {
+        i = psnd_pcm_nonblock(data->pcmHandle, 0);
+        if(i < 0)
+            psnd_pcm_close(data->pcmHandle);
+    }
+    if(i < 0)
+    {
+        free(data);
+        AL_PRINT("Could not open capture device '%s': %s\n", driver, psnd_strerror(i));
+        return ALC_FALSE;
+    }
+
+    switch(aluBytesFromFormat(format))
+    {
+        case 1:
+            alsaFormat = SND_PCM_FORMAT_U8;
+            break;
+        case 2:
+            alsaFormat = SND_PCM_FORMAT_S16;
+            break;
+        default:
+            alsaFormat = SND_PCM_FORMAT_UNKNOWN;
+            AL_PRINT("Unknown format?! %x\n", format);
+    }
+
+    bufferSizeInFrames = SampleSize;
+
+    psnd_pcm_hw_params_malloc(&p);
+#define ok(func, str) (i=(func),((i<0)?(err=(str)),0:1))
+    /* start with the largest configuration space possible */
+    if(!(ok(psnd_pcm_hw_params_any(data->pcmHandle, p), "any") &&
+         /* set interleaved access */
+         ok(psnd_pcm_hw_params_set_access(data->pcmHandle, p, SND_PCM_ACCESS_MMAP_INTERLEAVED), "set access") &&
+         /* set format (implicitly sets sample bits) */
+         ok(psnd_pcm_hw_params_set_format(data->pcmHandle, p, alsaFormat), "set format") &&
+         /* set channels (implicitly sets frame bits) */
+         ok(psnd_pcm_hw_params_set_channels(data->pcmHandle, p, aluChannelsFromFormat(pDevice->Format)), "set channels") &&
+         /* set rate (implicitly constrains period/buffer parameters) */
+         ok(psnd_pcm_hw_params_set_rate(data->pcmHandle, p, frequency, 0), "set rate") &&
+         /* set buffer size in frame units (implicitly sets period size/bytes/time and buffer time/bytes) */
+         ok(psnd_pcm_hw_params_set_buffer_size_min(data->pcmHandle, p, &bufferSizeInFrames), "set buffer size min") &&
+         /* install and prepare hardware configuration */
+         ok(psnd_pcm_hw_params(data->pcmHandle, p), "set params")))
+    {
+        AL_PRINT("%s failed: %s\n", err, psnd_strerror(i));
+        psnd_pcm_hw_params_free(p);
+        psnd_pcm_close(data->pcmHandle);
+        free(data);
+        return ALC_FALSE;
+    }
+#undef ok
+    psnd_pcm_hw_params_free(p);
+
+    i = psnd_pcm_prepare(data->pcmHandle);
+    if(i < 0)
+    {
+        AL_PRINT("prepare error: %s\n", psnd_strerror(i));
+        psnd_pcm_close(data->pcmHandle);
+        free(data);
+        return ALC_FALSE;
+    }
+
+    pDevice->ExtraData = data;
+    return ALC_TRUE;
+}
+
+static void alsa_close_capture(ALCdevice *pDevice)
+{
+    alsa_data *data = (alsa_data*)pDevice->ExtraData;
+    psnd_pcm_close(data->pcmHandle);
+
+    free(data);
+    pDevice->ExtraData = NULL;
+}
+
+static void alsa_start_capture(ALCdevice *pDevice)
+{
+    alsa_data *data = (alsa_data*)pDevice->ExtraData;
+    psnd_pcm_start(data->pcmHandle);
+}
+
+static void alsa_stop_capture(ALCdevice *pDevice)
+{
+    alsa_data *data = (alsa_data*)pDevice->ExtraData;
+    psnd_pcm_drain(data->pcmHandle);
+}
+
+static void alsa_capture_samples(ALCdevice *pDevice, ALCvoid *pBuffer, ALCuint lSamples)
+{
+    alsa_data *data = (alsa_data*)pDevice->ExtraData;
+    const snd_pcm_channel_area_t *areas = NULL;
+    snd_pcm_sframes_t frames, commitres;
+    snd_pcm_uframes_t size, offset;
+    int err;
+
+    frames = psnd_pcm_avail_update(data->pcmHandle);
+    if(frames < 0)
+    {
+        err = xrun_recovery(data->pcmHandle, frames);
+        if (err < 0)
+            AL_PRINT("available update failed: %s\n", psnd_strerror(err));
+        else
+            frames = psnd_pcm_avail_update(data->pcmHandle);
+    }
+    if (frames < (snd_pcm_sframes_t)lSamples)
+    {
+        SetALCError(ALC_INVALID_VALUE);
+        return;
+    }
+
+    // it is possible that contiguous areas are smaller, thus we use a loop
+    while (lSamples > 0)
+    {
+        char *Pointer;
+        int Count;
+
+        size = lSamples;
+        err = psnd_pcm_mmap_begin(data->pcmHandle, &areas, &offset, &size);
+        if (err < 0)
+        {
+            err = xrun_recovery(data->pcmHandle, err);
+            if (err < 0)
+            {
+                AL_PRINT("mmap begin error: %s\n", psnd_strerror(err));
+                break;
+            }
+            continue;
+        }
+
+        Pointer = (char*)areas->addr + (offset * areas->step / 8);
+        Count = psnd_pcm_frames_to_bytes(data->pcmHandle, size);
+
+        memcpy(pBuffer, Pointer, Count);
+        pBuffer = (char*)pBuffer + Count;
+
+        commitres = psnd_pcm_mmap_commit(data->pcmHandle, offset, size);
+        if (commitres < 0 || (commitres-size) != 0)
+        {
+           AL_PRINT("mmap commit error: %s\n",
+                    psnd_strerror(commitres >= 0 ? -EPIPE : commitres));
+           break;
+        }
+
+        lSamples -= size;
+    }
+}
+
+static ALCuint alsa_available_samples(ALCdevice *pDevice)
+{
+    alsa_data *data = (alsa_data*)pDevice->ExtraData;
+    snd_pcm_sframes_t frames = psnd_pcm_avail_update(data->pcmHandle);
+    if(frames < 0)
+    {
+        int err = xrun_recovery(data->pcmHandle, frames);
+        if (err < 0)
+            AL_PRINT("available update failed: %s\n", psnd_strerror(err));
+        else
+            frames = psnd_pcm_avail_update(data->pcmHandle);
+        if(frames < 0) /* ew.. */
+            SetALCError(ALC_INVALID_DEVICE);
+    }
+    return max(frames, 0);
+}
+
+
+BackendFuncs alsa_funcs = {
+    alsa_open_playback,
+    alsa_close_playback,
+    alsa_open_capture,
+    alsa_close_capture,
+    alsa_start_capture,
+    alsa_stop_capture,
+    alsa_capture_samples,
+    alsa_available_samples
+};
+
+void alc_alsa_init(BackendFuncs *func_list)
+{
+    snd_ctl_t *handle;
+    int card, err, dev, idx = 1;
+    snd_ctl_card_info_t *info;
+    snd_pcm_info_t *pcminfo;
+    snd_pcm_stream_t stream = SND_PCM_STREAM_PLAYBACK;
+    char name[128];
+    char *str;
+
+    *func_list = alsa_funcs;
+
+#ifdef HAVE_DLFCN_H
+    alsa_handle = dlopen("libasound.so.2", RTLD_NOW);
+    if(!alsa_handle)
+        return;
+    dlerror();
+
+#define LOAD_FUNC(f) do { \
+    p##f = (typeof(f)*)dlsym(alsa_handle, #f); \
+    if((str=dlerror()) != NULL) \
+    { \
+        dlclose(alsa_handle); \
+        alsa_handle = NULL; \
+        AL_PRINT("Could not load %s from libasound.so.2: %s\n", #f, str); \
+        return; \
+    } \
+} while(0)
+#else
+    str = NULL;
+    alsa_handle = 0xDEADBEEF;
+#define LOAD_FUNC(f) p##f = f
+#endif
+
+LOAD_FUNC(snd_strerror);
+LOAD_FUNC(snd_pcm_open);
+LOAD_FUNC(snd_pcm_close);
+LOAD_FUNC(snd_pcm_nonblock);
+LOAD_FUNC(snd_pcm_frames_to_bytes);
+LOAD_FUNC(snd_pcm_hw_params_malloc);
+LOAD_FUNC(snd_pcm_hw_params_free);
+LOAD_FUNC(snd_pcm_hw_params_any);
+LOAD_FUNC(snd_pcm_hw_params_set_access);
+LOAD_FUNC(snd_pcm_hw_params_set_format);
+LOAD_FUNC(snd_pcm_hw_params_set_channels);
+LOAD_FUNC(snd_pcm_hw_params_set_periods_near);
+LOAD_FUNC(snd_pcm_hw_params_set_rate_near);
+LOAD_FUNC(snd_pcm_hw_params_set_rate);
+LOAD_FUNC(snd_pcm_hw_params_set_buffer_size_near);
+LOAD_FUNC(snd_pcm_hw_params_set_buffer_size_min);
+LOAD_FUNC(snd_pcm_hw_params_get_period_size);
+LOAD_FUNC(snd_pcm_hw_params_get_access);
+LOAD_FUNC(snd_pcm_hw_params);
+LOAD_FUNC(snd_pcm_prepare);
+LOAD_FUNC(snd_pcm_start);
+LOAD_FUNC(snd_pcm_resume);
+LOAD_FUNC(snd_pcm_wait);
+LOAD_FUNC(snd_pcm_state);
+LOAD_FUNC(snd_pcm_avail_update);
+LOAD_FUNC(snd_pcm_areas_silence);
+LOAD_FUNC(snd_pcm_mmap_begin);
+LOAD_FUNC(snd_pcm_mmap_commit);
+LOAD_FUNC(snd_pcm_writei);
+LOAD_FUNC(snd_pcm_drain);
+
+LOAD_FUNC(snd_pcm_info_malloc);
+LOAD_FUNC(snd_pcm_info_free);
+LOAD_FUNC(snd_pcm_info_set_device);
+LOAD_FUNC(snd_pcm_info_set_subdevice);
+LOAD_FUNC(snd_pcm_info_set_stream);
+LOAD_FUNC(snd_pcm_info_get_name);
+LOAD_FUNC(snd_ctl_pcm_next_device);
+LOAD_FUNC(snd_ctl_pcm_info);
+LOAD_FUNC(snd_ctl_open);
+LOAD_FUNC(snd_ctl_close);
+LOAD_FUNC(snd_ctl_card_info_malloc);
+LOAD_FUNC(snd_ctl_card_info_free);
+LOAD_FUNC(snd_ctl_card_info);
+LOAD_FUNC(snd_ctl_card_info_get_name);
+LOAD_FUNC(snd_card_next);
+
+#undef LOAD_FUNC
+
+    psnd_ctl_card_info_malloc(&info);
+    psnd_pcm_info_malloc(&pcminfo);
+
+    card = -1;
+    if(psnd_card_next(&card) < 0 || card < 0)
+        AL_PRINT("no playback cards found...\n");
+    else
+    {
+        alsaDeviceList[0] = AppendDeviceList("ALSA Software on default");
+        allDevNameMap[0].name = AppendAllDeviceList("ALSA Software on default");
+    }
+
+    while (card >= 0) {
+        int firstDev = 1;
+
+        sprintf(name, "hw:%d", card);
+        if ((err = psnd_ctl_open(&handle, name, 0)) < 0) {
+            AL_PRINT("control open (%i): %s\n", card, psnd_strerror(err));
+            goto next_card;
+        }
+        if ((err = psnd_ctl_card_info(handle, info)) < 0) {
+            AL_PRINT("control hardware info (%i): %s\n", card, psnd_strerror(err));
+            psnd_ctl_close(handle);
+            goto next_card;
+        }
+
+        dev = -1;
+        while (idx < MAX_ALL_DEVICES) {
+            const char *cname, *dname;
+
+            if (psnd_ctl_pcm_next_device(handle, &dev)<0)
+                AL_PRINT("snd_ctl_pcm_next_device failed\n");
+            if (dev < 0)
+                break;
+
+            if(firstDev && card < MAX_DEVICES-1) {
+                firstDev = 0;
+                snprintf(name, sizeof(name), "ALSA Software on %s",
+                         psnd_ctl_card_info_get_name(info));
+                alsaDeviceList[card+1] = AppendDeviceList(name);
+            }
+
+            psnd_pcm_info_set_device(pcminfo, dev);
+            psnd_pcm_info_set_subdevice(pcminfo, 0);
+            psnd_pcm_info_set_stream(pcminfo, stream);
+            if ((err = psnd_ctl_pcm_info(handle, pcminfo)) < 0) {
+                if (err != -ENOENT)
+                    AL_PRINT("control digital audio info (%i): %s\n", card, psnd_strerror(err));
+                continue;
+            }
+
+            cname = psnd_ctl_card_info_get_name(info);
+            dname = psnd_pcm_info_get_name(pcminfo);
+            snprintf(name, sizeof(name), "ALSA Software on %s [%s]",
+                     cname, dname);
+            allDevNameMap[idx].name = AppendAllDeviceList(name);
+            allDevNameMap[idx].card = card;
+            allDevNameMap[idx].dev = dev;
+            idx++;
+        }
+        psnd_ctl_close(handle);
+next_card:
+        if(psnd_card_next(&card) < 0) {
+            AL_PRINT("snd_card_next failed\n");
+            break;
+        }
+    }
+
+
+    stream = SND_PCM_STREAM_CAPTURE;
+
+    card = -1;
+    if(psnd_card_next(&card) < 0 || card < 0) {
+        AL_PRINT("no capture cards found...\n");
+        psnd_pcm_info_free(pcminfo);
+        psnd_ctl_card_info_free(info);
+        return;
+    }
+
+    allCaptureDevNameMap[0].name = AppendCaptureDeviceList("ALSA Capture on default");
+
+    while (card >= 0) {
+        sprintf(name, "hw:%d", card);
+        handle = NULL;
+        if ((err = psnd_ctl_open(&handle, name, 0)) < 0) {
+            AL_PRINT("control open (%i): %s\n", card, psnd_strerror(err));
+        }
+        if (err >= 0 && (err = psnd_ctl_card_info(handle, info)) < 0) {
+            AL_PRINT("control hardware info (%i): %s\n", card, psnd_strerror(err));
+        }
+        else if (err >= 0)
+        {
+            dev = -1;
+            while (idx < MAX_ALL_DEVICES) {
+                const char *cname, *dname;
+
+                if (psnd_ctl_pcm_next_device(handle, &dev)<0)
+                    AL_PRINT("snd_ctl_pcm_next_device failed\n");
+                if (dev < 0)
+                    break;
+                psnd_pcm_info_set_device(pcminfo, dev);
+                psnd_pcm_info_set_subdevice(pcminfo, 0);
+                psnd_pcm_info_set_stream(pcminfo, stream);
+                if ((err = psnd_ctl_pcm_info(handle, pcminfo)) < 0) {
+                    if (err != -ENOENT)
+                        AL_PRINT("control digital audio info (%i): %s\n", card, psnd_strerror(err));
+                    continue;
+                }
+
+                cname = psnd_ctl_card_info_get_name(info);
+                dname = psnd_pcm_info_get_name(pcminfo);
+                snprintf(name, sizeof(name), "ALSA Capture on %s [%s]",
+                         cname, dname);
+                allDevNameMap[idx].name = AppendCaptureDeviceList(name);
+                allDevNameMap[idx].card = card;
+                allDevNameMap[idx].dev = dev;
+                idx++;
+            }
+        }
+        if(handle) psnd_ctl_close(handle);
+        if(psnd_card_next(&card) < 0) {
+            AL_PRINT("snd_card_next failed\n");
+            break;
+        }
+    }
+    psnd_pcm_info_free(pcminfo);
+    psnd_ctl_card_info_free(info);
+}