AUDIOLIB_FX+= $(OBJ)audiolib_fx_fmod.$o \

		              $(OBJ)dsoundout.$o \

		              $(OBJ)pitch.$o \

		              $(OBJ)multivoc.$o

AUDIOLIB=$(SRC)/jaudiolib

$(OBJ)dsl.$o: $(SRC)jaudiolib/dsl.c $(SRC)jaudiolib/util.h

$(OBJ)nodpmi.$o: $(SRC)jaudiolib/nodpmi.c $(SRC)jaudiolib/dpmi.h

$(OBJ)unixpitch.$o: $(SRC)jaudiolib/unixpitch.c $(SRC)jaudiolib/pitch.h

$(OBJ)unixvoc.$o: $(SRC)jaudiolib/unixvoc.c $(SRC)jaudiolib/usrhooks.h $(SRC)jaudiolib/linklist.h $(SRC)jaudiolib/pitch.h $(SRC)jaudiolib/multivoc.h $(SRC)jaudiolib/_multivc.h

   SCRIPT_PutNumber( scripthandle, "Sound Setup", "FXDevice",FXDevice,false,false);

   SCRIPT_PutNumber( scripthandle, "Sound Setup", "MusicDevice",MusicDevice,false,false);

/*

Copyright (C) 1994-1995 Apogee Software, Ltd.

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

#ifndef __DEBUGIO_H

#define __DEBUGIO_H

void DB_SetXY( int x, int y );

void DB_PutChar( char ch );

int  DB_PrintString( char *string );

int  DB_PrintNum( int number );

int  DB_PrintUnsigned( unsigned long number, int radix );

int  DB_printf( char *fmt, ... );

#endif

/*

Copyright (C) 1994-1995 Apogee Software, Ltd.

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

/**********************************************************************

   file:   DMA.H

   author: James R. Dose

   date:   February 4, 1994

   Public header file for DMA.C

   (c) Copyright 1994 James R. Dose.  All Rights Reserved.

**********************************************************************/

#ifndef __DMA_H

#define __DMA_H

enum DMA_ERRORS

   {

   DMA_Error = -1,

   DMA_Ok    = 0,

   DMA_ChannelOutOfRange,

   DMA_InvalidChannel

   };

enum DMA_Modes

   {

   DMA_SingleShotRead,

   DMA_SingleShotWrite,

   DMA_AutoInitRead,

   DMA_AutoInitWrite

   };

char *DMA_ErrorString

   (

   int ErrorNumber

   );

int DMA_VerifyChannel

   (

   int channel

   );

int DMA_SetupTransfer

   (

   int  channel,

   char *address,

   int  length,

   int  mode

   );

int DMA_EndTransfer

   (

   int channel

   );

char *DMA_GetCurrentPos

   (

   int channel

   );

int DMA_GetTransferCount

   (

   int channel

   );

#endif

/*

Copyright (C) 1994-1995 Apogee Software, Ltd.

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

/**********************************************************************

   module: DPMI.H

   author: James R. Dose

   date:   March 31, 1994

   Inline functions for performing DPMI calls.

   (c) Copyright 1994 James R. Dose.  All Rights Reserved.

**********************************************************************/

#ifndef __DPMI_H

#define __DPMI_H

enum DPMI_Errors

   {

   DPMI_Warning = -2,

   DPMI_Error   = -1,

   DPMI_Ok      = 0

   };

int  DPMI_GetDOSMemory( void **ptr, int *descriptor, unsigned length );

int  DPMI_FreeDOSMemory( int descriptor );

#endif

/*

Copyright (C) 2003-2004 Ryan C. Gordon. and James Bentler

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

Originally written by Ryan C. Gordon. (icculus@clutteredmind.org)

Adapted to work with JonoF's port by James Bentler (bentler@cs.umn.edu)

*/

#include <stdlib.h>

#include <string.h>

#include "dsl.h"

#include "util.h"

#include "SDL.h"

#include "SDL_mixer.h"

extern volatile int MV_MixPage;

static int DSL_ErrorCode = DSL_Ok;

static int mixer_initialized;

static void ( *_CallBackFunc )( void );

static volatile char *_BufferStart;

static int _BufferSize;

static int _NumDivisions;

static int _SampleRate;

static int _remainder;

static Mix_Chunk *blank;

static unsigned char *blank_buf;

/*

possible todo ideas: cache sdl/sdl mixer error messages.

*/

char *DSL_ErrorString( int ErrorNumber )

{

	char *ErrorString;

	switch (ErrorNumber) {

		case DSL_Warning:

		case DSL_Error:

			ErrorString = DSL_ErrorString(DSL_ErrorCode);

			break;

		case DSL_Ok:

			ErrorString = "SDL Driver ok.";

			break;

		case DSL_SDLInitFailure:

			ErrorString = "SDL Audio initialization failed.";

			break;

		case DSL_MixerActive:

			ErrorString = "SDL Mixer already initialized.";

			break;	

		case DSL_MixerInitFailure:

			ErrorString = "SDL Mixer initialization failed.";

			break;

		default:

			ErrorString = "Unknown SDL Driver error.";

			break;

	}

	return ErrorString;

}

static void DSL_SetErrorCode(int ErrorCode)

{

	DSL_ErrorCode = ErrorCode;

}

int DSL_Init( void )

{

	DSL_SetErrorCode(DSL_Ok);

	if (SDL_InitSubSystem(SDL_INIT_AUDIO) < 0) {

		DSL_SetErrorCode(DSL_SDLInitFailure);

		return DSL_Error;

	}

	return DSL_Ok;

}

void DSL_Shutdown( void )

{

	DSL_StopPlayback();

}

static void mixer_callback(int chan, void *stream, int len, void *udata)

{

	Uint8 *stptr;

	Uint8 *fxptr;

	int copysize;

	/* len should equal _BufferSize, else this is screwed up */

	stptr = (Uint8 *)stream;

	if (_remainder > 0) {

		copysize = min(len, _remainder);

		fxptr = (Uint8 *)(&_BufferStart[MV_MixPage * 

			_BufferSize]);

		memcpy(stptr, fxptr+(_BufferSize-_remainder), copysize);

		len -= copysize;

		_remainder -= copysize;

		stptr += copysize;

	}

	while (len > 0) {

		/* new buffer */

		_CallBackFunc();

		fxptr = (Uint8 *)(&_BufferStart[MV_MixPage * 

			_BufferSize]);

		copysize = min(len, _BufferSize);

		memcpy(stptr, fxptr, copysize);

		len -= copysize;

		stptr += copysize;

	}

	_remainder = len;

}

int   DSL_BeginBufferedPlayback( char *BufferStart,

      int BufferSize, int NumDivisions, unsigned SampleRate,

      int MixMode, void ( *CallBackFunc )( void ) )

{

	Uint16 format;

	Uint8 *tmp;

	int channels;

	int chunksize;

	if (mixer_initialized) {

		DSL_SetErrorCode(DSL_MixerActive);

		return DSL_Error;

	}

	_CallBackFunc = CallBackFunc;

	_BufferStart = BufferStart;

	_BufferSize = (BufferSize / NumDivisions);

	_NumDivisions = NumDivisions;

	_SampleRate = SampleRate;

	_remainder = 0;

	format = (MixMode & SIXTEEN_BIT) ? AUDIO_S16SYS : AUDIO_U8;

	channels = (MixMode & STEREO) ? 2 : 1;

/*

	23ms is typically ideal (11025,22050,44100)

	46ms isn't bad

*/

	chunksize = 512;

	if (SampleRate >= 16000) chunksize *= 2;

	if (SampleRate >= 32000) chunksize *= 2;

/*	

// SDL mixer does this already

	if (MixMode & SIXTEEN_BIT) chunksize *= 2;

	if (MixMode & STEREO) chunksize *= 2;

*/

	if (Mix_OpenAudio(SampleRate, format, channels, chunksize) < 0) {

		DSL_SetErrorCode(DSL_MixerInitFailure);

		return DSL_Error;

	}

/*

	Mix_SetPostMix(mixer_callback, NULL);

*/

	/* have to use a channel because postmix will overwrite the music... */

	Mix_RegisterEffect(0, mixer_callback, NULL, NULL);

	/* create a dummy sample just to allocate that channel */

	blank_buf = (Uint8 *)malloc(4096);

	memset(blank_buf, 0, 4096);

	blank = Mix_QuickLoad_RAW(blank_buf, 4096);

	Mix_PlayChannel(0, blank, -1);

	mixer_initialized = 1;

	return DSL_Ok;

}

void DSL_StopPlayback( void )

{

	if (mixer_initialized) {

		Mix_HaltChannel(0);

	}

	if (blank != NULL) {

		Mix_FreeChunk(blank);

	}

	blank = NULL;

	if (blank_buf  != NULL) {

		free(blank_buf);

	}

	blank_buf = NULL;

	if (mixer_initialized) {

		Mix_CloseAudio();

	}

	mixer_initialized = 0;

}

unsigned DSL_GetPlaybackRate( void )

{

	return _SampleRate;

}

unsigned long DisableInterrupts( void )

{

	return 0;

}

void RestoreInterrupts( unsigned long flags )

{

}

/*

Copyright (C) 2003-2004 Ryan C. Gordon. and James Bentler

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

Originally written by Ryan C. Gordon. (icculus@clutteredmind.org)

Adapted to work with JonoF's port by James Bentler (bentler@cs.umn.edu)

*/

#ifndef AUDIOLIB__DSL_H

#define AUDIOLIB__DSL_H

#define MONO_8BIT    0

#define STEREO      1

#define SIXTEEN_BIT 2

#define STEREO_16BIT ( STEREO | SIXTEEN_BIT )

enum DSL_ERRORS

   {

   DSL_Warning = -2,

   DSL_Error = -1,

   DSL_Ok = 0,

   DSL_SDLInitFailure,

   DSL_MixerActive,

   DSL_MixerInitFailure

   };

char *DSL_ErrorString( int ErrorNumber );

int   DSL_Init( void );

void  DSL_StopPlayback( void );

unsigned DSL_GetPlaybackRate( void );

int   DSL_BeginBufferedPlayback( char *BufferStart,

      int BufferSize, int NumDivisions, unsigned SampleRate,

      int MixMode, void ( *CallBackFunc )( void ) );

void  DSL_Shutdown( void );

#endif

/*

Copyright (C) 1994-1995 Apogee Software, Ltd.

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

/**********************************************************************

   module: INTERRUP.H

   author: James R. Dose

   date:   March 31, 1994

   Inline functions for disabling and restoring the interrupt flag.

   (c) Copyright 1994 James R. Dose.  All Rights Reserved.

**********************************************************************/

#ifndef __INTERRUPT_H

#define __INTERRUPT_H

unsigned long DisableInterrupts( void );

void          RestoreInterrupts( unsigned long flags );

#ifdef PLAT_DOS

#pragma aux DisableInterrupts = \

   "pushfd",                    \

   "pop    eax",                \

   "cli"                        \

   modify [ eax ];

#pragma aux RestoreInterrupts = \

   "push   eax",                \

   "popfd"                      \

   parm [ eax ];

#endif

#endif

#else

#define MixBufferSize     256

#endif

/*

Copyright (C) 1994-1995 Apogee Software, Ltd.

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

/**********************************************************************

   module: NODPMI.C

   Functions for faking DPMI calls.

**********************************************************************/

#include <stdlib.h>

#include <string.h>

#include "dpmi.h"

#define TRUE  ( 1 == 1 )

#define FALSE ( !TRUE )

int DPMI_GetDOSMemory( void **ptr, int *descriptor, unsigned length )

{

	/* Lovely... */

	*ptr = (void *)malloc(length);

	*descriptor = (int) *ptr;

	return (descriptor == 0) ? DPMI_Error : DPMI_Ok;

}

int DPMI_FreeDOSMemory( int descriptor )

{

	free((void *)descriptor);

	return (descriptor == 0) ? DPMI_Error : DPMI_Ok;

}

#ifndef _INCLUDE_PLATFORM_H_

#define _INCLUDE_PLATFORM_H_

#if (!defined __EXPORT__)

#define __EXPORT__

#endif

#if (defined __WATCOMC__)

#define snprintf _snprintf

#endif

static __inline unsigned short _swap16(unsigned short D)

{

#if PLATFORM_MACOSX

    register unsigned short returnValue;

    __asm__ volatile("lhbrx %0,0,%1"

        : "=r" (returnValue)

        : "r" (&D)

    );

    return returnValue;

#else

    return((D<<8)|(D>>8));

#endif

}

static __inline unsigned int _swap32(unsigned int D)

{

#if PLATFORM_MACOSX

    register unsigned int returnValue;

    __asm__ volatile("lwbrx %0,0,%1"

        : "=r" (returnValue)

        : "r" (&D)

    );

    return returnValue;

#else

    return((D<<24)|((D<<8)&0x00FF0000)|((D>>8)&0x0000FF00)|(D>>24));

#endif

}

#if PLATFORM_MACOSX

#define PLATFORM_BIGENDIAN 1

#define BUILDSWAP_INTEL16(x) _swap16(x)

#define BUILDSWAP_INTEL32(x) _swap32(x)

#else

#if __BYTE_ORDER == __LITTLE_ENDIAN

#define PLATFORM_LITTLEENDIAN 1

#define BUILDSWAP_INTEL16(x) (x)

#define BUILDSWAP_INTEL32(x) (x)

#else

#define PLATFORM_BIGENDIAN 1

#define BUILDSWAP_INTEL16(x) _swap16(x)

#define BUILDSWAP_INTEL32(x) _swap32(x)

#endif

#endif

extern int has_altivec;  /* PowerPC-specific. */

#endif  /* !defined _INCLUDE_PLATFORM_H_ */

/* end of platform.h ... */

/*

Copyright (C) 2003-2004 Ryan C. Gordon. and James Bentler

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

Originally written by Ryan C. Gordon. (icculus@clutteredmind.org)

Adapted to work with JonoF's port by James Bentler (bentler@cs.umn.edu)

*/

/*

 * A reimplementation of Jim Dose's FX_MAN routines, using  SDL_mixer 1.2.

 *   Whee. FX_MAN is also known as the "Apogee Sound System", or "ASS" for

 *   short. How strangely appropriate that seems.

 */

#include <stdio.h>

#include <stdlib.h>

#include <stdarg.h>

#include <string.h>

#include <assert.h>

#include "duke3d.h"

#include "cache1d.h"

#if (defined __WATCOMC__)

// This is probably out of date.  --ryan.

#include "dukesnd_watcom.h"

#endif

#if (!defined __WATCOMC__)

#define cdecl

#endif

#include "SDL.h"

#include "SDL_mixer.h"

#include "music.h"

#define __FX_TRUE  (1 == 1)

#define __FX_FALSE (!__FX_TRUE)

#define DUKESND_DEBUG       "DUKESND_DEBUG"

#ifndef min

#define min(a, b)  (((a) < (b)) ? (a) : (b))

#endif

#ifndef max

#define max(a, b)  (((a) > (b)) ? (a) : (b))

#endif

void GetUnixPathFromEnvironment( char *fullname, int32 length, const char *filename );

int MUSIC_ErrorCode = MUSIC_Ok;

static char warningMessage[80];

static char errorMessage[80];

static int fx_initialized = 0;

static int numChannels = MIX_CHANNELS;

static void (*callback)(unsigned long);

static int reverseStereo = 0;

static int reverbDelay = 256;

static int reverbLevel = 0;

static int fastReverb = 0;

static FILE *debug_file = NULL;

static int initialized_debugging = 0;

static int mixerIsStereo = 1;

// This gets called all over the place for information and debugging messages.

//  If the user set the DUKESND_DEBUG environment variable, the messages

//  go to the file that is specified in that variable. Otherwise, they

//  are ignored for the expense of the function call. If DUKESND_DEBUG is

//  set to "-" (without the quotes), then the output goes to stdout.

static void musdebug(const char *fmt, ...)

{

    va_list ap;

    if (debug_file)

    {

        fprintf(debug_file, "DUKEMUS: ");

        va_start(ap, fmt);

        vfprintf(debug_file, fmt, ap);

        va_end(ap);

        fprintf(debug_file, "\n");

        fflush(debug_file);

    } // if

} // musdebug

static void init_debugging(void)

{

    const char *envr;

    if (initialized_debugging)

        return;

    envr = getenv(DUKESND_DEBUG);

    if (envr != NULL)

    {

        if (strcmp(envr, "-") == 0)

            debug_file = stdout;

        else

            debug_file = fopen(envr, "w");

        if (debug_file == NULL)

            fprintf(stderr, "DUKESND: -WARNING- Could not open debug file!\n");

        else

            setbuf(debug_file, NULL);

    } // if

    initialized_debugging = 1;

} // init_debugging

static void setWarningMessage(const char *msg)

{

    strncpy(warningMessage, msg, sizeof (warningMessage));

    // strncpy() doesn't add the null char if there isn't room...

    warningMessage[sizeof (warningMessage) - 1] = '\0';

    musdebug("Warning message set to [%s].", warningMessage);

} // setErrorMessage

static void setErrorMessage(const char *msg)

{

    strncpy(errorMessage, msg, sizeof (errorMessage));

    // strncpy() doesn't add the null char if there isn't room...

    errorMessage[sizeof (errorMessage) - 1] = '\0';

    musdebug("Error message set to [%s].", errorMessage);

} // setErrorMessage

// The music functions...

char *MUSIC_ErrorString(int ErrorNumber)

{

    switch (ErrorNumber)

    {

        case MUSIC_Warning:

            return(warningMessage);

        case MUSIC_Error:

            return(errorMessage);

        case MUSIC_Ok:

            return("OK; no error.");

        case MUSIC_ASSVersion:

            return("Incorrect sound library version.");

        case MUSIC_SoundCardError:

            return("General sound card error.");

        case MUSIC_InvalidCard:

            return("Invalid sound card.");

        case MUSIC_MidiError:

            return("MIDI error.");

        case MUSIC_MPU401Error:

            return("MPU401 error.");

        case MUSIC_TaskManError:

            return("Task Manager error.");

        //case MUSIC_FMNotDetected:

        //    return("FM not detected error.");

        case MUSIC_DPMI_Error:

            return("DPMI error.");

        default:

            return("Unknown error.");

    } // switch

    assert(0);    // shouldn't hit this point.

    return(NULL);

} // MUSIC_ErrorString

static int music_initialized = 0;

static int music_context = 0;

static int music_loopflag = MUSIC_PlayOnce;

static char *music_songdata = NULL;

static Mix_Music *music_musicchunk = NULL;

int MUSIC_Init(int SoundCard, int Address)

{

    init_debugging();

    musdebug("INIT! card=>%d, address=>%d...", SoundCard, Address);

    if (music_initialized)

    {

        setErrorMessage("Music system is already initialized.");

        return(MUSIC_Error);

    } // if

    SoundCard = 1;

    music_initialized = 1;

    return(MUSIC_Ok);

} // MUSIC_Init

int MUSIC_Shutdown(void)

{

    musdebug("shutting down sound subsystem.");

    MUSIC_StopSong();

    music_context = 0;

    music_initialized = 0;

    music_loopflag = MUSIC_PlayOnce;

    return(MUSIC_Ok);

} // MUSIC_Shutdown

void MUSIC_SetMaxFMMidiChannel(int channel)

{

    musdebug("STUB ... MUSIC_SetMaxFMMidiChannel(%d).\n", channel);

} // MUSIC_SetMaxFMMidiChannel

void MUSIC_SetVolume(int volume)

{

    volume = max( 0, volume );

    volume = min( volume, 255 );

    Mix_VolumeMusic(volume >> 1);  // convert 0-255 to 0-128.

} // MUSIC_SetVolume

void MUSIC_SetMidiChannelVolume(int channel, int volume)

{

    musdebug("STUB ... MUSIC_SetMidiChannelVolume(%d, %d).\n", channel, volume);

} // MUSIC_SetMidiChannelVolume

void MUSIC_ResetMidiChannelVolumes(void)

{

    musdebug("STUB ... MUSIC_ResetMidiChannelVolumes().\n");

} // MUSIC_ResetMidiChannelVolumes

int MUSIC_GetVolume(void)

{

    return(Mix_VolumeMusic(-1) << 1);  // convert 0-128 to 0-255.

} // MUSIC_GetVolume

void MUSIC_SetLoopFlag(int loopflag)

{

    music_loopflag = loopflag;

} // MUSIC_SetLoopFlag

int MUSIC_SongPlaying(void)

{

    return((Mix_PlayingMusic()) ? __FX_TRUE : __FX_FALSE);

} // MUSIC_SongPlaying

void MUSIC_Continue(void)

{

    if (Mix_PausedMusic())

        Mix_ResumeMusic();

    else if (music_songdata)

        MUSIC_PlaySong(music_songdata, MUSIC_PlayOnce);

} // MUSIC_Continue

void MUSIC_Pause(void)

{

    Mix_PauseMusic();

} // MUSIC_Pause

int MUSIC_StopSong(void)

{

    //if (!fx_initialized)

    if (!Mix_QuerySpec(NULL, NULL, NULL))

    {

        setErrorMessage("Need FX system initialized, too. Sorry.");

        return(MUSIC_Error);

    } // if

    if ( (Mix_PlayingMusic()) || (Mix_PausedMusic()) )

        Mix_HaltMusic();

    if (music_musicchunk)

        Mix_FreeMusic(music_musicchunk);

    music_songdata = NULL;

    music_musicchunk = NULL;

    return(MUSIC_Ok);

} // MUSIC_StopSong

int MUSIC_PlaySong(unsigned char *song, int loopflag)

{

    //SDL_RWops *rw;

    MUSIC_StopSong();

    music_songdata = song;

    // !!! FIXME: This could be a problem...SDL/SDL_mixer wants a RWops, which

    // !!! FIXME:  is an i/o abstraction. Since we already have the MIDI data

    // !!! FIXME:  in memory, we fake it with a memory-based RWops. None of

    // !!! FIXME:  this is a problem, except the RWops wants to know how big

    // !!! FIXME:  its memory block is (so it can do things like seek on an

    // !!! FIXME:  offset from the end of the block), and since we don't have

    // !!! FIXME:  this information, we have to give it SOMETHING.

    /* !!! ARGH! There's no LoadMUS_RW  ?!

    rw = SDL_RWFromMem((void *) song, (10 * 1024) * 1024);  // yikes.

    music_musicchunk = Mix_LoadMUS_RW(rw);

    Mix_PlayMusic(music_musicchunk, (loopflag == MUSIC_PlayOnce) ? 0 : -1);

    */

    return(MUSIC_Ok);

} // MUSIC_PlaySong

extern char ApogeePath[256];

// Duke3D-specific.  --ryan.

void PlayMusic(char *_filename)

{

    //char filename[MAX_PATH];

    //strcpy(filename, _filename);

    //FixFilePath(filename);

    char filename[MAX_PATH];

    long handle;

    long size;

    void *song;

    long rc;

    MUSIC_StopSong();

    // Read from a groupfile, write it to disk so SDL_mixer can read it.

    //   Lame.  --ryan.

    handle = kopen4load(_filename, 0);

    if (handle == -1)

        return;

    size = kfilelength(handle);

    if (size == -1)

    {

        kclose(handle);

        return;

    } // if

    song = malloc(size);

    if (song == NULL)

    {

        kclose(handle);

        return;

    } // if

    rc = kread(handle, song, size);

    kclose(handle);

    if (rc != size)

    {

        free(song);

        return;

    } // if

    // save the file somewhere, so SDL_mixer can load it

    GetUnixPathFromEnvironment(filename, MAX_PATH, "tmpsong.mid");

    handle = SafeOpenWrite(filename, filetype_binary);

    SafeWrite(handle, song, size);

    close(handle);

    free(song);

    //music_songdata = song;

    music_musicchunk = Mix_LoadMUS(filename);

    if (music_musicchunk != NULL)

    {

        // !!! FIXME: I set the music to loop. Hope that's okay. --ryan.

        Mix_PlayMusic(music_musicchunk, -1);

    } // if

}

void MUSIC_SetContext(int context)

{

    musdebug("STUB ... MUSIC_SetContext().\n");

    music_context = context;

} // MUSIC_SetContext

int MUSIC_GetContext(void)

{

    return(music_context);

} // MUSIC_GetContext

void MUSIC_SetSongTick(unsigned long PositionInTicks)

{

    musdebug("STUB ... MUSIC_SetSongTick().\n");

} // MUSIC_SetSongTick

void MUSIC_SetSongTime(unsigned long milliseconds)

{

    musdebug("STUB ... MUSIC_SetSongTime().\n");

}// MUSIC_SetSongTime

void MUSIC_SetSongPosition(int measure, int beat, int tick)

{

    musdebug("STUB ... MUSIC_SetSongPosition().\n");

} // MUSIC_SetSongPosition

void MUSIC_GetSongPosition(songposition *pos)

{

    musdebug("STUB ... MUSIC_GetSongPosition().\n");

} // MUSIC_GetSongPosition

void MUSIC_GetSongLength(songposition *pos)

{

    musdebug("STUB ... MUSIC_GetSongLength().\n");

} // MUSIC_GetSongLength

int MUSIC_FadeVolume(int tovolume, int milliseconds)

{

    Mix_FadeOutMusic(milliseconds);

    return(MUSIC_Ok);

} // MUSIC_FadeVolume

int MUSIC_FadeActive(void)

{

    return((Mix_FadingMusic() == MIX_FADING_OUT) ? __FX_TRUE : __FX_FALSE);

} // MUSIC_FadeActive

void MUSIC_StopFade(void)

{

    musdebug("STUB ... MUSIC_StopFade().\n");

} // MUSIC_StopFade

void MUSIC_RerouteMidiChannel(int channel, int cdecl (*function)( int event, int c1, int c2 ))

{

    musdebug("STUB ... MUSIC_RerouteMidiChannel().\n");

} // MUSIC_RerouteMidiChannel

void MUSIC_RegisterTimbreBank(unsigned char *timbres)

{

    musdebug("STUB ... MUSIC_RegisterTimbreBank().\n");

} // MUSIC_RegisterTimbreBank

void MUSIC_Update(void)

{

}

/*

Copyright (C) 2003-2004 Ryan C. Gordon. and James Bentler

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

Originally written by Ryan C. Gordon. (icculus@clutteredmind.org)

Adapted to work with JonoF's port by James Bentler (bentler@cs.umn.edu)

*/

static char ApogeePath[256];

#define PATH_SEP_CHAR '/'

#define PATH_SEP_STR  "/"

#define ROOTDIR       "/"

#define CURDIR        "./"

#include "duke3d.h"

#include <dirent.h>

#include <errno.h>

void FixFilePath(char *filename)

{

    char *ptr;

    char *lastsep = filename;

    if ((!filename) || (*filename == '\0'))

        return;

    if (access(filename, F_OK) == 0)  /* File exists; we're good to go. */

        return;

    for (ptr = filename; 1; ptr++)

    {

        if (*ptr == '\\')

            *ptr = PATH_SEP_CHAR;

        if ((*ptr == PATH_SEP_CHAR) || (*ptr == '\0'))

        {

            char pch = *ptr;

            struct dirent *dent = NULL;

            DIR *dir;

            if ((pch == PATH_SEP_CHAR) && (*(ptr + 1) == '\0'))

                return; /* eos is pathsep; we're done. */

            if (lastsep == ptr)

                continue;  /* absolute path; skip to next one. */

            *ptr = '\0';

            if (lastsep == filename) {

                dir = opendir((*lastsep == PATH_SEP_CHAR) ? ROOTDIR : CURDIR);

                if (*lastsep == PATH_SEP_CHAR) {

                    lastsep++;

                }

            } 

            else

            {

                *lastsep = '\0';

                dir = opendir(filename);

                *lastsep = PATH_SEP_CHAR;

                lastsep++;

            }

            if (dir == NULL)

            {

                *ptr = PATH_SEP_CHAR;

                return;  /* maybe dir doesn't exist? give up. */

            }

            while ((dent = readdir(dir)) != NULL)

            {

                if (strcasecmp(dent->d_name, lastsep) == 0)

                {

                    /* found match; replace it. */

                    strcpy(lastsep, dent->d_name);

                    break;

                }

            }

            closedir(dir);

            *ptr = pch;

            lastsep = ptr;

            if (dent == NULL)

                return;  /* no match. oh well. */

            if (pch == '\0')  /* eos? */

                return;

        }

    }

}

int32 SafeOpenWrite (const char *_filename, int32 filetype)

{

	int	handle;

    char filename[MAX_PATH];

    strncpy(filename, _filename, sizeof (filename));

    filename[sizeof (filename) - 1] = '\0';

    FixFilePath(filename);

	handle = open(filename,O_RDWR | O_BINARY | O_CREAT | O_TRUNC

	, S_IREAD | S_IWRITE);

	if (handle == -1)

		Error ("Error opening %s: %s",filename,strerror(errno));

	return handle;

}

void SafeWrite (int32 handle, void *buffer, int32 count)

{

	unsigned	iocount;

	while (count)

	{

		iocount = count > 0x8000 ? 0x8000 : count;

		if (write (handle,buffer,iocount) != (int)iocount)

			Error ("File write failure writing %ld bytes",count);

		buffer = (void *)( (byte *)buffer + iocount );

		count -= iocount;

	}

}

void GetUnixPathFromEnvironment( char *fullname, int32 length, const char *filename )

{

	snprintf(fullname, length-1, "%s%s", ApogeePath, filename);

}

/*

Copyright (C) 1994-1995 Apogee Software, Ltd.

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

/**********************************************************************

   module: PITCH.C

   author: James R. Dose

   date:   June 14, 1993

   Routines for pitch scaling.

   (c) Copyright 1993 James R. Dose.  All Rights Reserved.

**********************************************************************/

#include <stdlib.h>

//#include <math.h>

#include "dpmi.h"

#include "standard.h"

#include "pitch.h"

#define MAXDETUNE 25

static unsigned long PitchTable[ 12 ][ MAXDETUNE ] =

   {

      { 0x10000, 0x10097, 0x1012f, 0x101c7, 0x10260, 0x102f9, 0x10392, 0x1042c,

      0x104c6, 0x10561, 0x105fb, 0x10696, 0x10732, 0x107ce, 0x1086a, 0x10907,

      0x109a4, 0x10a41, 0x10adf, 0x10b7d, 0x10c1b, 0x10cba, 0x10d59, 0x10df8,

      0x10e98 },

      { 0x10f38, 0x10fd9, 0x1107a, 0x1111b, 0x111bd, 0x1125f, 0x11302, 0x113a5,

      0x11448, 0x114eb, 0x1158f, 0x11634, 0x116d8, 0x1177e, 0x11823, 0x118c9,

      0x1196f, 0x11a16, 0x11abd, 0x11b64, 0x11c0c, 0x11cb4, 0x11d5d, 0x11e06,

      0x11eaf },

      { 0x11f59, 0x12003, 0x120ae, 0x12159, 0x12204, 0x122b0, 0x1235c, 0x12409,

      0x124b6, 0x12563, 0x12611, 0x126bf, 0x1276d, 0x1281c, 0x128cc, 0x1297b,

      0x12a2b, 0x12adc, 0x12b8d, 0x12c3e, 0x12cf0, 0x12da2, 0x12e55, 0x12f08,

      0x12fbc },

      { 0x1306f, 0x13124, 0x131d8, 0x1328d, 0x13343, 0x133f9, 0x134af, 0x13566,

      0x1361d, 0x136d5, 0x1378d, 0x13846, 0x138fe, 0x139b8, 0x13a72, 0x13b2c,

      0x13be6, 0x13ca1, 0x13d5d, 0x13e19, 0x13ed5, 0x13f92, 0x1404f, 0x1410d,

      0x141cb },

      { 0x1428a, 0x14349, 0x14408, 0x144c8, 0x14588, 0x14649, 0x1470a, 0x147cc,

      0x1488e, 0x14951, 0x14a14, 0x14ad7, 0x14b9b, 0x14c5f, 0x14d24, 0x14dea,

      0x14eaf, 0x14f75, 0x1503c, 0x15103, 0x151cb, 0x15293, 0x1535b, 0x15424,

      0x154ee },

      { 0x155b8, 0x15682, 0x1574d, 0x15818, 0x158e4, 0x159b0, 0x15a7d, 0x15b4a,

      0x15c18, 0x15ce6, 0x15db4, 0x15e83, 0x15f53, 0x16023, 0x160f4, 0x161c5,

      0x16296, 0x16368, 0x1643a, 0x1650d, 0x165e1, 0x166b5, 0x16789, 0x1685e,

      0x16934 },

      { 0x16a09, 0x16ae0, 0x16bb7, 0x16c8e, 0x16d66, 0x16e3e, 0x16f17, 0x16ff1,

      0x170ca, 0x171a5, 0x17280, 0x1735b, 0x17437, 0x17513, 0x175f0, 0x176ce,

      0x177ac, 0x1788a, 0x17969, 0x17a49, 0x17b29, 0x17c09, 0x17cea, 0x17dcc,

      0x17eae },

      { 0x17f91, 0x18074, 0x18157, 0x1823c, 0x18320, 0x18406, 0x184eb, 0x185d2,

      0x186b8, 0x187a0, 0x18888, 0x18970, 0x18a59, 0x18b43, 0x18c2d, 0x18d17,

      0x18e02, 0x18eee, 0x18fda, 0x190c7, 0x191b5, 0x192a2, 0x19391, 0x19480,

      0x1956f },

      { 0x1965f, 0x19750, 0x19841, 0x19933, 0x19a25, 0x19b18, 0x19c0c, 0x19d00,

      0x19df4, 0x19ee9, 0x19fdf, 0x1a0d5, 0x1a1cc, 0x1a2c4, 0x1a3bc, 0x1a4b4,

      0x1a5ad, 0x1a6a7, 0x1a7a1, 0x1a89c, 0x1a998, 0x1aa94, 0x1ab90, 0x1ac8d,

      0x1ad8b },

      { 0x1ae89, 0x1af88, 0x1b088, 0x1b188, 0x1b289, 0x1b38a, 0x1b48c, 0x1b58f,

      0x1b692, 0x1b795, 0x1b89a, 0x1b99f, 0x1baa4, 0x1bbaa, 0x1bcb1, 0x1bdb8,

      0x1bec0, 0x1bfc9, 0x1c0d2, 0x1c1dc, 0x1c2e6, 0x1c3f1, 0x1c4fd, 0x1c609,

      0x1c716 },

      { 0x1c823, 0x1c931, 0x1ca40, 0x1cb50, 0x1cc60, 0x1cd70, 0x1ce81, 0x1cf93,

      0x1d0a6, 0x1d1b9, 0x1d2cd, 0x1d3e1, 0x1d4f6, 0x1d60c, 0x1d722, 0x1d839,

      0x1d951, 0x1da69, 0x1db82, 0x1dc9c, 0x1ddb6, 0x1ded1, 0x1dfec, 0x1e109,

      0x1e225 },

      { 0x1e343, 0x1e461, 0x1e580, 0x1e6a0, 0x1e7c0, 0x1e8e0, 0x1ea02, 0x1eb24,

      0x1ec47, 0x1ed6b, 0x1ee8f, 0x1efb4, 0x1f0d9, 0x1f1ff, 0x1f326, 0x1f44e,

      0x1f576, 0x1f69f, 0x1f7c9, 0x1f8f3, 0x1fa1e, 0x1fb4a, 0x1fc76, 0x1fda3,

      0x1fed1 }

   };

//static int PITCH_Installed = FALSE;

/*---------------------------------------------------------------------

   Function: PITCH_Init

   Initializes pitch table.

---------------------------------------------------------------------*/

/*

void PITCH_Init

   (

   void

   )

   {

   int note;

   int detune;

   if ( !PITCH_Installed )

      {

      for( note = 0; note < 12; note++ )

         {

         for( detune = 0; detune < MAXDETUNE; detune++ )

            {

            PitchTable[ note ][ detune ] = 0x10000 *

               pow( 2, ( note * MAXDETUNE + detune ) / ( 12.0 * MAXDETUNE ) );

            }

         }

      PITCH_Installed = TRUE;

      }

   }

*/

/**********************************************************************

   Memory locked functions:

**********************************************************************/

#define PITCH_LockStart PITCH_GetScale

/*---------------------------------------------------------------------

   Function: PITCH_GetScale

   Returns a fixed-point value to scale number the specified amount.

---------------------------------------------------------------------*/

unsigned long PITCH_GetScale

   (

   int pitchoffset

   )

   {

   unsigned long scale;

   int octaveshift;

   int noteshift;

   int note;

   int detune;

//   if ( !PITCH_Installed )

//      {

//      PITCH_Init();

//      }

   if ( pitchoffset == 0 )

      {

      return( PitchTable[ 0 ][ 0 ] );

      }

   noteshift = pitchoffset % 1200;

   if ( noteshift < 0 )

      {

      noteshift += 1200;

      }

   note   = noteshift / 100;

   detune = ( noteshift % 100 ) / ( 100 / MAXDETUNE );

   octaveshift = ( pitchoffset - noteshift ) / 1200;

   if ( detune < 0 )

      {

      detune += ( 100 / MAXDETUNE );

      note--;

      if ( note < 0 )

         {

         note += 12;

         octaveshift--;

         }

      }

   scale = PitchTable[ note ][ detune ];

   if ( octaveshift < 0 )

      {

      scale >>= -octaveshift;

      }

   else

      {

      scale <<= octaveshift;

      }

   return( scale );

   }

/*---------------------------------------------------------------------

   Function: PITCH_LockEnd

   Used for determining the length of the functions to lock in memory.

---------------------------------------------------------------------*/

static void PITCH_LockEnd

   (

   void

   )

   {

   }

/*

Copyright (C) 1994-1995 Apogee Software, Ltd.

This program is free software; you can redistribute it and/or

modify it under the terms of the GNU General Public License

as published by the Free Software Foundation; either version 2

of the License, or (at your option) any later version.

This program 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 General Public License for more details.

You should have received a copy of the GNU General Public License

along with this program; if not, write to the Free Software

Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

/**********************************************************************

   module: MULTIVOC.C

   author: James R. Dose

   date:   December 20, 1993

   Routines to provide multichannel digitized sound playback for

   Sound Blaster compatible sound cards.

   (c) Copyright 1993 James R. Dose.  All Rights Reserved.

**********************************************************************/

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <time.h>

#include "util.h"

#include "dpmi.h"

#include "usrhooks.h"

#include "interrup.h"

#include "dma.h"

#include "linklist.h"

#include "dsl.h"

#include "pitch.h"

#include "multivoc.h"

#include "_multivc.h"

#include "debugio.h"

// platform.h is from the build engine, but I need the byteswapping macros... --ryan.

#include "platform.h"

#define RoundFixed( fixedval, bits )            \

        (                                       \

          (                                     \

            (fixedval) + ( 1 << ( (bits) - 1 ) )\

          ) >> (bits)                           \

        )

#define IS_QUIET( ptr )  ( ( void * )( ptr ) == ( void * )&MV_VolumeTable[ 0 ] )

static int       MV_ReverbLevel;

static int       MV_ReverbDelay;

static VOLUME16 *MV_ReverbTable = NULL;

//static signed short MV_VolumeTable[ MV_MaxVolume + 1 ][ 256 ];

static signed short MV_VolumeTable[ 63 + 1 ][ 256 ];

//static Pan MV_PanTable[ MV_NumPanPositions ][ MV_MaxVolume + 1 ];

static Pan MV_PanTable[ MV_NumPanPositions ][ 63 + 1 ];

static int MV_Installed   = FALSE;

static int MV_SoundCard   = 1;

static int MV_TotalVolume = MV_MaxTotalVolume;

static int MV_MaxVoices   = 1;

static int MV_Recording;

static int MV_BufferSize = MixBufferSize;

static int MV_BufferLength;

static int MV_NumberOfBuffers = NumberOfBuffers;

static int MV_MixMode    = MONO_8BIT;

static int MV_Channels   = 1;

static int MV_Bits       = 8;

static int MV_Silence    = SILENCE_8BIT;

static int MV_SwapLeftRight = FALSE;

static int MV_RequestedMixRate;

static int MV_MixRate;

static int MV_DMAChannel = -1;

static int MV_BuffShift;

static int MV_TotalMemory;

static int   MV_BufferDescriptor;

static int   MV_BufferEmpty[ NumberOfBuffers ];

char *MV_MixBuffer[ NumberOfBuffers + 1 ];

static VoiceNode *MV_Voices = NULL;

static volatile VoiceNode VoiceList;

static volatile VoiceNode VoicePool;

/*static*/ int MV_MixPage      = 0;

static int MV_VoiceHandle  = MV_MinVoiceHandle;

static void ( *MV_CallBackFunc )( unsigned long ) = NULL;

static void ( *MV_RecordFunc )( char *ptr, int length ) = NULL;

static void ( *MV_MixFunction )( VoiceNode *voice, int buffer );

static int MV_MaxVolume = 63;

char  *MV_HarshClipTable;

char  *MV_MixDestination;

short *MV_LeftVolume;

short *MV_RightVolume;

int    MV_SampleSize = 1;

int    MV_RightChannelOffset;

unsigned long MV_MixPosition;

int MV_ErrorCode = MV_Ok;

#define MV_SetErrorCode( status ) \

   MV_ErrorCode   = ( status );

/*---------------------------------------------------------------------

   Function: MV_ErrorString

   Returns a pointer to the error message associated with an error

   number.  A -1 returns a pointer the current error.

---------------------------------------------------------------------*/

char *MV_ErrorString

   (

   int ErrorNumber

   )

   {

   char *ErrorString;

   switch( ErrorNumber )

      {

      case MV_Warning :

      case MV_Error :

         ErrorString = MV_ErrorString( MV_ErrorCode );

         break;

      case MV_Ok :

         ErrorString = "Multivoc ok.";

         break;

      case MV_UnsupportedCard :

         ErrorString = "Selected sound card is not supported by Multivoc.";

         break;

      case MV_NotInstalled :

         ErrorString = "Multivoc not installed.";

         break;

      case MV_NoVoices :

         ErrorString = "No free voices available to Multivoc.";

         break;

      case MV_NoMem :

         ErrorString = "Out of memory in Multivoc.";

         break;

      case MV_VoiceNotFound :

         ErrorString = "No voice with matching handle found.";

         break;

      case MV_DPMI_Error :

         ErrorString = "DPMI Error in Multivoc.";

         break;

      case MV_InvalidVOCFile :

         ErrorString = "Invalid VOC file passed in to Multivoc.";

         break;

      case MV_InvalidWAVFile :

         ErrorString = "Invalid WAV file passed in to Multivoc.";

         break;

      case MV_InvalidMixMode :

         ErrorString = "Invalid mix mode request in Multivoc.";

         break;

      case MV_IrqFailure :

         ErrorString = "Playback failed, possibly due to an invalid or conflicting IRQ.";

         break;

      case MV_DMAFailure :

         ErrorString = "Playback failed, possibly due to an invalid or conflicting DMA channel.";

         break;

      case MV_DMA16Failure :

         ErrorString = "Playback failed, possibly due to an invalid or conflicting DMA channel.  \n"

                       "Make sure the 16-bit DMA channel is correct.";

         break;

      case MV_NullRecordFunction :

         ErrorString = "Null record function passed to MV_StartRecording.";

         break;

      default :

         ErrorString = "Unknown Multivoc error code.";

         break;

      }

   return( ErrorString );

   }

/**********************************************************************

   Memory locked functions:

**********************************************************************/

#define MV_LockStart MV_Mix

/*---------------------------------------------------------------------

   Function: MV_Mix

   Mixes the sound into the buffer.

---------------------------------------------------------------------*/

static void MV_Mix

   (

   VoiceNode *voice,

   int        buffer

   )

   {

   char          *start;

   int            length;