/*+
−
    SDL - Simple DirectMedia Layer+
−
    Copyright (C) 1997-2009 Sam Lantinga+
−
+
−
    This library is free software; you can redistribute it and/or+
−
    modify it under the terms of the GNU Lesser General Public+
−
    License as published by the Free Software Foundation; either+
−
    version 2.1 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+
−
    Lesser General Public License for more details.+
−
+
−
    You should have received a copy of the GNU Lesser General Public+
−
    License along with this library; if not, write to the Free Software+
−
    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA+
−
+
−
    Carsten Griwodz+
−
    griff@kom.tu-darmstadt.de+
−
+
−
    based on linux/SDL_dspaudio.c by Sam Lantinga+
−
*/+
−
#include "SDL_config.h"+
−
+
−
/* Allow access to a raw mixing buffer */+
−
+
−
#include <errno.h>+
−
#include <unistd.h>+
−
#include <fcntl.h>+
−
#include <sys/types.h>+
−
#include <sys/time.h>+
−
#include <sys/ioctl.h>+
−
#include <sys/stat.h>+
−
#include <sys/mman.h>+
−
+
−
#include "SDL_audio.h"+
−
#include "../SDL_audio_c.h"+
−
#include "../SDL_audiodev_c.h"+
−
#include "SDL_umsaudio.h"+
−
+
−
/* The tag name used by UMS audio */+
−
#define UMS_DRIVER_NAME         "ums"+
−
+
−
#define DEBUG_AUDIO 1+
−
+
−
/* Audio driver functions */+
−
static int UMS_OpenAudio(_THIS, SDL_AudioSpec *spec);+
−
static void UMS_PlayAudio(_THIS);+
−
static Uint8 *UMS_GetAudioBuf(_THIS);+
−
static void UMS_CloseAudio(_THIS);+
−
+
−
static UMSAudioDevice_ReturnCode UADOpen(_THIS,  string device, string mode, long flags);+
−
static UMSAudioDevice_ReturnCode UADClose(_THIS);+
−
static UMSAudioDevice_ReturnCode UADGetBitsPerSample(_THIS, long* bits);+
−
static UMSAudioDevice_ReturnCode UADSetBitsPerSample(_THIS, long bits);+
−
static UMSAudioDevice_ReturnCode UADSetSampleRate(_THIS, long rate, long* set_rate);+
−
static UMSAudioDevice_ReturnCode UADSetByteOrder(_THIS, string byte_order);+
−
static UMSAudioDevice_ReturnCode UADSetAudioFormatType(_THIS, string fmt);+
−
static UMSAudioDevice_ReturnCode UADSetNumberFormat(_THIS, string fmt);+
−
static UMSAudioDevice_ReturnCode UADInitialize(_THIS);+
−
static UMSAudioDevice_ReturnCode UADStart(_THIS);+
−
static UMSAudioDevice_ReturnCode UADStop(_THIS);+
−
static UMSAudioDevice_ReturnCode UADSetTimeFormat(_THIS,  UMSAudioTypes_TimeFormat fmt );+
−
static UMSAudioDevice_ReturnCode UADWriteBuffSize(_THIS,  long* buff_size );+
−
static UMSAudioDevice_ReturnCode UADWriteBuffRemain(_THIS,  long* buff_size );+
−
static UMSAudioDevice_ReturnCode UADWriteBuffUsed(_THIS,  long* buff_size );+
−
static UMSAudioDevice_ReturnCode UADSetDMABufferSize(_THIS,  long bytes, long* bytes_ret );+
−
static UMSAudioDevice_ReturnCode UADSetVolume(_THIS,  long volume );+
−
static UMSAudioDevice_ReturnCode UADSetBalance(_THIS,  long balance );+
−
static UMSAudioDevice_ReturnCode UADSetChannels(_THIS,  long channels );+
−
static UMSAudioDevice_ReturnCode UADPlayRemainingData(_THIS,  boolean block );+
−
static UMSAudioDevice_ReturnCode UADEnableOutput(_THIS,  string output, long* left_gain, long* right_gain);+
−
static UMSAudioDevice_ReturnCode UADWrite(_THIS,  UMSAudioTypes_Buffer* buff, long samples, long* samples_written);+
−
+
−
/* Audio driver bootstrap functions */+
−
static int Audio_Available(void)+
−
{+
−
    return 1;+
−
}+
−
+
−
static void Audio_DeleteDevice(_THIS)+
−
{+
−
    if(this->hidden->playbuf._buffer) SDL_free(this->hidden->playbuf._buffer);+
−
    if(this->hidden->fillbuf._buffer) SDL_free(this->hidden->fillbuf._buffer);+
−
    _somFree( this->hidden->umsdev );+
−
    SDL_free(this->hidden);+
−
    SDL_free(this);+
−
}+
−
+
−
static SDL_AudioDevice *Audio_CreateDevice(int devindex)+
−
{+
−
    SDL_AudioDevice *this;+
−
+
−
    /*+
−
     * Allocate and initialize management storage and private management+
−
     * storage for this SDL-using library.+
−
     */+
−
    this = (SDL_AudioDevice *)SDL_malloc(sizeof(SDL_AudioDevice));+
−
    if ( this ) {+
−
        SDL_memset(this, 0, (sizeof *this));+
−
        this->hidden = (struct SDL_PrivateAudioData *)SDL_malloc((sizeof *this->hidden));+
−
    }+
−
    if ( (this == NULL) || (this->hidden == NULL) ) {+
−
        SDL_OutOfMemory();+
−
        if ( this ) {+
−
            SDL_free(this);+
−
        }+
−
        return(0);+
−
    }+
−
    SDL_memset(this->hidden, 0, (sizeof *this->hidden));+
−
#ifdef DEBUG_AUDIO+
−
    fprintf(stderr, "Creating UMS Audio device\n");+
−
#endif+
−
+
−
    /*+
−
     * Calls for UMS env initialization and audio object construction.+
−
     */+
−
    this->hidden->ev     = somGetGlobalEnvironment();+
−
    this->hidden->umsdev = UMSAudioDeviceNew();+
−
+
−
    /*+
−
     * Set the function pointers.+
−
     */+
−
    this->OpenAudio   = UMS_OpenAudio;+
−
    this->WaitAudio   = NULL;           /* we do blocking output */+
−
    this->PlayAudio   = UMS_PlayAudio;+
−
    this->GetAudioBuf = UMS_GetAudioBuf;+
−
    this->CloseAudio  = UMS_CloseAudio;+
−
    this->free        = Audio_DeleteDevice;+
−
+
−
#ifdef DEBUG_AUDIO+
−
    fprintf(stderr, "done\n");+
−
#endif+
−
    return this;+
−
}+
−
+
−
AudioBootStrap UMS_bootstrap = {+
−
	UMS_DRIVER_NAME, "AIX UMS audio",+
−
	Audio_Available, Audio_CreateDevice+
−
};+
−
+
−
static Uint8 *UMS_GetAudioBuf(_THIS)+
−
{+
−
#ifdef DEBUG_AUDIO+
−
    fprintf(stderr, "enter UMS_GetAudioBuf\n");+
−
#endif+
−
    return this->hidden->fillbuf._buffer;+
−
/*+
−
    long                      bufSize;+
−
    UMSAudioDevice_ReturnCode rc;+
−
+
−
    rc = UADSetTimeFormat(this, UMSAudioTypes_Bytes );+
−
    rc = UADWriteBuffSize(this,  bufSize );+
−
*/+
−
}+
−
+
−
static void UMS_CloseAudio(_THIS)+
−
{+
−
    UMSAudioDevice_ReturnCode rc;+
−
+
−
#ifdef DEBUG_AUDIO+
−
    fprintf(stderr, "enter UMS_CloseAudio\n");+
−
#endif+
−
    rc = UADPlayRemainingData(this, TRUE);+
−
    rc = UADStop(this);+
−
    rc = UADClose(this);+
−
}+
−
+
−
static void UMS_PlayAudio(_THIS)+
−
{+
−
    UMSAudioDevice_ReturnCode rc;+
−
    long                      samplesToWrite;+
−
    long                      samplesWritten;+
−
    UMSAudioTypes_Buffer      swpbuf;+
−
+
−
#ifdef DEBUG_AUDIO+
−
    fprintf(stderr, "enter UMS_PlayAudio\n");+
−
#endif+
−
    samplesToWrite = this->hidden->playbuf._length/this->hidden->bytesPerSample;+
−
    do+
−
    {+
−
        rc = UADWrite(this,  &this->hidden->playbuf,+
−
		       samplesToWrite,+
−
	               &samplesWritten );+
−
	samplesToWrite -= samplesWritten;+
−
+
−
	/* rc values: UMSAudioDevice_Success+
−
	 *            UMSAudioDevice_Failure+
−
	 *            UMSAudioDevice_Preempted+
−
	 *            UMSAudioDevice_Interrupted+
−
	 *            UMSAudioDevice_DeviceError+
−
	 */+
−
	if ( rc == UMSAudioDevice_DeviceError ) {+
−
#ifdef DEBUG_AUDIO+
−
	    fprintf(stderr, "Returning from PlayAudio with devices error\n");+
−
#endif+
−
	    return;+
−
	}+
−
    }+
−
    while(samplesToWrite>0);+
−
+
−
    SDL_LockAudio();+
−
    SDL_memcpy( &swpbuf,                &this->hidden->playbuf, sizeof(UMSAudioTypes_Buffer) );+
−
    SDL_memcpy( &this->hidden->playbuf, &this->hidden->fillbuf, sizeof(UMSAudioTypes_Buffer) );+
−
    SDL_memcpy( &this->hidden->fillbuf, &swpbuf,                sizeof(UMSAudioTypes_Buffer) );+
−
    SDL_UnlockAudio();+
−
+
−
#ifdef DEBUG_AUDIO+
−
    fprintf(stderr, "Wrote audio data and swapped buffer\n");+
−
#endif+
−
}+
−
+
−
#if 0+
−
// 	/* Set the DSP frequency */+
−
// 	value = spec->freq;+
−
// 	if ( ioctl(this->hidden->audio_fd, SOUND_PCM_WRITE_RATE, &value) < 0 ) {+
−
// 		SDL_SetError("Couldn't set audio frequency");+
−
// 		return(-1);+
−
// 	}+
−
// 	spec->freq = value;+
−
#endif+
−
+
−
static int UMS_OpenAudio(_THIS, SDL_AudioSpec *spec)+
−
{+
−
    char*  audiodev = "/dev/paud0";+
−
    long   lgain;+
−
    long   rgain;+
−
    long   outRate;+
−
    long   outBufSize;+
−
    long   bitsPerSample;+
−
    long   samplesPerSec;+
−
    long   success;+
−
    Uint16 test_format;+
−
    int    frag_spec;+
−
    UMSAudioDevice_ReturnCode rc;+
−
+
−
#ifdef DEBUG_AUDIO+
−
    fprintf(stderr, "enter UMS_OpenAudio\n");+
−
#endif+
−
    rc = UADOpen(this, audiodev,"PLAY", UMSAudioDevice_BlockingIO);+
−
    if ( rc != UMSAudioDevice_Success ) {+
−
	SDL_SetError("Couldn't open %s: %s", audiodev, strerror(errno));+
−
	return -1;+
−
    }+
−
 +
−
    rc = UADSetAudioFormatType(this, "PCM"); +
−
+
−
    success = 0;+
−
    test_format = SDL_FirstAudioFormat(spec->format);+
−
    do+
−
    {+
−
#ifdef DEBUG_AUDIO+
−
        fprintf(stderr, "Trying format 0x%4.4x\n", test_format);+
−
#endif+
−
        switch ( test_format )+
−
        {+
−
        case AUDIO_U8:+
−
/* from the mac code: better ? */+
−
/* sample_bits = spec->size / spec->samples / spec->channels * 8; */+
−
	    success       = 1;+
−
            bitsPerSample = 8;+
−
            rc = UADSetSampleRate(this,  spec->freq << 16, &outRate );+
−
            rc = UADSetByteOrder(this, "MSB");       /* irrelevant */+
−
            rc = UADSetNumberFormat(this, "UNSIGNED");+
−
            break;+
−
        case AUDIO_S8:+
−
	    success       = 1;+
−
            bitsPerSample = 8;+
−
            rc = UADSetSampleRate(this,  spec->freq << 16, &outRate );+
−
            rc = UADSetByteOrder(this, "MSB");       /* irrelevant */+
−
            rc = UADSetNumberFormat(this, "SIGNED");+
−
            break;+
−
        case AUDIO_S16LSB:+
−
	    success       = 1;+
−
            bitsPerSample = 16;+
−
            rc = UADSetSampleRate(this,  spec->freq << 16, &outRate );+
−
            rc = UADSetByteOrder(this, "LSB");+
−
            rc = UADSetNumberFormat(this, "SIGNED");+
−
            break;+
−
        case AUDIO_S16MSB:+
−
	    success       = 1;+
−
            bitsPerSample = 16;+
−
            rc = UADSetSampleRate(this,  spec->freq << 16, &outRate );+
−
            rc = UADSetByteOrder(this, "MSB");+
−
            rc = UADSetNumberFormat(this, "SIGNED");+
−
            break;+
−
        case AUDIO_U16LSB:+
−
	    success       = 1;+
−
            bitsPerSample = 16;+
−
            rc = UADSetSampleRate(this,  spec->freq << 16, &outRate );+
−
            rc = UADSetByteOrder(this, "LSB");+
−
            rc = UADSetNumberFormat(this, "UNSIGNED");+
−
            break;+
−
        case AUDIO_U16MSB:+
−
	    success       = 1;+
−
            bitsPerSample = 16;+
−
            rc = UADSetSampleRate(this,  spec->freq << 16, &outRate );+
−
            rc = UADSetByteOrder(this, "MSB");+
−
            rc = UADSetNumberFormat(this, "UNSIGNED");+
−
            break;+
−
        default:+
−
            break;+
−
        }+
−
        if ( ! success ) {+
−
            test_format = SDL_NextAudioFormat();+
−
        }+
−
    }+
−
    while ( ! success && test_format );+
−
+
−
    if ( success == 0 ) {+
−
        SDL_SetError("Couldn't find any hardware audio formats");+
−
        return -1;+
−
    }+
−
+
−
    spec->format = test_format;+
−
+
−
    for ( frag_spec = 0; (0x01<<frag_spec) < spec->size; ++frag_spec );+
−
    if ( (0x01<<frag_spec) != spec->size ) {+
−
        SDL_SetError("Fragment size must be a power of two");+
−
        return -1;+
−
    }+
−
    if ( frag_spec > 2048 ) frag_spec = 2048;+
−
+
−
    this->hidden->bytesPerSample   = (bitsPerSample / 8) * spec->channels;+
−
    samplesPerSec                  = this->hidden->bytesPerSample * outRate;+
−
+
−
    this->hidden->playbuf._length  = 0;+
−
    this->hidden->playbuf._maximum = spec->size;+
−
    this->hidden->playbuf._buffer  = (unsigned char*)SDL_malloc(spec->size);+
−
    this->hidden->fillbuf._length  = 0;+
−
    this->hidden->fillbuf._maximum = spec->size;+
−
    this->hidden->fillbuf._buffer  = (unsigned char*)SDL_malloc(spec->size);+
−
+
−
    rc = UADSetBitsPerSample(this,  bitsPerSample );+
−
    rc = UADSetDMABufferSize(this,  frag_spec, &outBufSize );+
−
    rc = UADSetChannels(this, spec->channels);      /* functions reduces to mono or stereo */+
−
+
−
    lgain = 100; /*maximum left input gain*/+
−
    rgain = 100; /*maimum right input gain*/+
−
    rc = UADEnableOutput(this, "LINE_OUT",&lgain,&rgain);+
−
    rc = UADInitialize(this);+
−
    rc = UADStart(this);+
−
    rc = UADSetVolume(this, 100);+
−
    rc = UADSetBalance(this, 0);+
−
+
−
    /* We're ready to rock and roll. :-) */+
−
    return 0;+
−
}+
−
+
−
+
−
static UMSAudioDevice_ReturnCode UADGetBitsPerSample(_THIS, long* bits)+
−
{+
−
    return UMSAudioDevice_get_bits_per_sample( this->hidden->umsdev,+
−
					       this->hidden->ev,+
−
					       bits );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADSetBitsPerSample(_THIS, long bits)+
−
{+
−
    return UMSAudioDevice_set_bits_per_sample( this->hidden->umsdev,+
−
					       this->hidden->ev,+
−
					       bits );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADSetSampleRate(_THIS, long rate, long* set_rate)+
−
{+
−
    /* from the mac code: sample rate = spec->freq << 16; */+
−
    return UMSAudioDevice_set_sample_rate( this->hidden->umsdev,+
−
					   this->hidden->ev,+
−
					   rate,+
−
					   set_rate );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADSetByteOrder(_THIS, string byte_order)+
−
{+
−
    return UMSAudioDevice_set_byte_order( this->hidden->umsdev,+
−
					  this->hidden->ev,+
−
					  byte_order );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADSetAudioFormatType(_THIS, string fmt)+
−
{+
−
    /* possible PCM, A_LAW or MU_LAW */+
−
    return UMSAudioDevice_set_audio_format_type( this->hidden->umsdev,+
−
						 this->hidden->ev,+
−
						 fmt );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADSetNumberFormat(_THIS, string fmt)+
−
{+
−
    /* possible SIGNED, UNSIGNED, or TWOS_COMPLEMENT */+
−
    return UMSAudioDevice_set_number_format( this->hidden->umsdev,+
−
					     this->hidden->ev,+
−
					     fmt );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADInitialize(_THIS)+
−
{+
−
    return UMSAudioDevice_initialize( this->hidden->umsdev,+
−
				      this->hidden->ev );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADStart(_THIS)+
−
{+
−
    return UMSAudioDevice_start( this->hidden->umsdev,+
−
				 this->hidden->ev );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADSetTimeFormat(_THIS,  UMSAudioTypes_TimeFormat fmt )+
−
{+
−
    /*+
−
     * Switches the time format to the new format, immediately.+
−
     * possible UMSAudioTypes_Msecs, UMSAudioTypes_Bytes or UMSAudioTypes_Samples+
−
     */+
−
    return UMSAudioDevice_set_time_format( this->hidden->umsdev,+
−
					   this->hidden->ev,+
−
					   fmt );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADWriteBuffSize(_THIS,  long* buff_size )+
−
{+
−
    /*+
−
     * returns write buffer size in the current time format+
−
     */+
−
    return UMSAudioDevice_write_buff_size( this->hidden->umsdev,+
−
                                           this->hidden->ev,+
−
					   buff_size );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADWriteBuffRemain(_THIS,  long* buff_size )+
−
{+
−
    /*+
−
     * returns amount of available space in the write buffer+
−
     * in the current time format+
−
     */+
−
    return UMSAudioDevice_write_buff_remain( this->hidden->umsdev,+
−
                                             this->hidden->ev,+
−
					     buff_size );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADWriteBuffUsed(_THIS,  long* buff_size )+
−
{+
−
    /*+
−
     * returns amount of filled space in the write buffer+
−
     * in the current time format+
−
     */+
−
    return UMSAudioDevice_write_buff_used( this->hidden->umsdev,+
−
                                           this->hidden->ev,+
−
					   buff_size );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADSetDMABufferSize(_THIS,  long bytes, long* bytes_ret )+
−
{+
−
    /*+
−
     * Request a new DMA buffer size, maximum requested size 2048.+
−
     * Takes effect with next initialize() call.+
−
     * Devices may or may not support DMA.+
−
     */+
−
    return UMSAudioDevice_set_DMA_buffer_size( this->hidden->umsdev,+
−
					       this->hidden->ev,+
−
					       bytes,+
−
					       bytes_ret );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADSetVolume(_THIS,  long volume )+
−
{+
−
    /*+
−
     * Set the volume.+
−
     * Takes effect immediately.+
−
     */+
−
    return UMSAudioDevice_set_volume( this->hidden->umsdev,+
−
				      this->hidden->ev,+
−
				      volume );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADSetBalance(_THIS,  long balance )+
−
{+
−
    /*+
−
     * Set the balance.+
−
     * Takes effect immediately.+
−
     */+
−
    return UMSAudioDevice_set_balance( this->hidden->umsdev,+
−
				       this->hidden->ev,+
−
				       balance );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADSetChannels(_THIS,  long channels )+
−
{+
−
    /*+
−
     * Set mono or stereo.+
−
     * Takes effect with next initialize() call.+
−
     */+
−
    if ( channels != 1 ) channels = 2;+
−
    return UMSAudioDevice_set_number_of_channels( this->hidden->umsdev,+
−
				                  this->hidden->ev,+
−
				                  channels );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADOpen(_THIS,  string device, string mode, long flags)+
−
{+
−
    return UMSAudioDevice_open( this->hidden->umsdev,+
−
				this->hidden->ev,+
−
				device,+
−
				mode,+
−
				flags );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADWrite(_THIS,  UMSAudioTypes_Buffer* buff,+
−
                                           long samples,+
−
					   long* samples_written)+
−
{+
−
    return UMSAudioDevice_write( this->hidden->umsdev,+
−
				 this->hidden->ev,+
−
				 buff,+
−
				 samples,+
−
				 samples_written );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADPlayRemainingData(_THIS,  boolean block )+
−
{+
−
    return UMSAudioDevice_play_remaining_data( this->hidden->umsdev,+
−
					       this->hidden->ev,+
−
					       block);+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADStop(_THIS)+
−
{+
−
    return UMSAudioDevice_stop( this->hidden->umsdev,+
−
				this->hidden->ev );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADClose(_THIS)+
−
{+
−
    return UMSAudioDevice_close( this->hidden->umsdev,+
−
				 this->hidden->ev );+
−
}+
−
+
−
static UMSAudioDevice_ReturnCode UADEnableOutput(_THIS,  string output, long* left_gain, long* right_gain)+
−
{+
−
    return UMSAudioDevice_enable_output( this->hidden->umsdev,+
−
					 this->hidden->ev,+
−
					 output,+
−
					 left_gain,+
−
					 right_gain );+
−
}+
−
+
−