/*
	SuperCollider real time audio synthesis system
    Copyright (c) 2002 James McCartney. All rights reserved.
	http://www.audiosynth.com

    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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301  USA
*/


#ifndef _SC_CoreAudio_
#define _SC_CoreAudio_

#include "MsgFifo.h"
#include "SC_FifoMsg.h"
#include "OSC_Packet.h"
#include "SC_SyncCondition.h"
#include "PriorityQueue.h"
#include "SC_Lock.h"

#define SC_AUDIO_API_COREAUDIO	1
#define SC_AUDIO_API_JACK		2
#define SC_AUDIO_API_PORTAUDIO  3
#define SC_AUDIO_API_AUDIOUNITS  4
#define SC_AUDIO_API_COREAUDIOIPHONE	5
#define SC_AUDIO_API_ANDROIDJNI 6

#ifdef SC_ANDROID
#define SC_AUDIO_API SC_AUDIO_API_ANDROIDJNI
#endif

#ifdef SC_IPHONE
#define SC_AUDIO_API SC_AUDIO_API_COREAUDIOIPHONE
#endif

#ifndef SC_AUDIO_API
# if defined(_WIN32)
#  define SC_AUDIO_API SC_AUDIO_API_PORTAUDIO
# elif defined(__APPLE__)
#  define SC_AUDIO_API SC_AUDIO_API_COREAUDIO
# else
#  error SC_AUDIO_API undefined, cannot determine audio backend
# endif
#endif // SC_AUDIO_API

#if SC_AUDIO_API == SC_AUDIO_API_COREAUDIO || SC_AUDIO_API == SC_AUDIO_API_AUDIOUNITS
# include <CoreAudio/AudioHardware.h>
# include <CoreAudio/HostTime.h>
#endif

#if SC_AUDIO_API == SC_AUDIO_API_COREAUDIOIPHONE
#include <AudioUnit/AudioUnit.h>
#include <AudioToolbox/AudioToolbox.h>
#include <AudioToolbox/AudioConverter.h>
#include <AudioToolbox/AUGraph.h>
#endif


#if SC_AUDIO_API == SC_AUDIO_API_PORTAUDIO
#include "portaudio.h"
#endif

const double kSecondsToOSCunits = 4294967296.; // pow(2,32)
const double kMicrosToOSCunits = 4294.967296; // pow(2,32)/1e6
const double kNanosToOSCunits  = 4.294967296; // pow(2,32)/1e9

const int32 kSECONDS_FROM_1900_to_1970 = (int32)2208988800UL; /* 17 leap years */
const double kOSCtoSecs = 2.328306436538696e-10;

struct SC_ScheduledEvent
{
	/// Callback function responsible for freeing the OSC packet in the correct thread.
	typedef void (*PacketFreeFunc)(struct World* world, OSC_Packet* packet);

	/// Frees an OSC packet in the realtime thread (to be used as a PacketFreeFunc).
	static void FreeInRT(struct World* world, OSC_Packet* packet);
	/// Frees an OSC packet in the non-realtime thread (to be used as a PacketFreeFunc).
	static void FreeInNRT(struct World* world, OSC_Packet* packet);

	SC_ScheduledEvent() : mTime(0), mPacket(0) {}
	SC_ScheduledEvent(struct World *inWorld, int64 inTime, OSC_Packet *inPacket, PacketFreeFunc freeFunc)
		: mTime(inTime), mPacket(inPacket), mPacketFreeFunc(freeFunc), mWorld(inWorld) {}

	int64 Time() { return mTime; }
	void Perform();

	int64 mTime;
	OSC_Packet *mPacket;
	PacketFreeFunc mPacketFreeFunc;
	struct World *mWorld;
};

typedef MsgFifo<FifoMsg, 1024> EngineFifo;

// Functions to be implemented by the driver backend
extern "C" {
	int32 server_timeseed();
	int64 oscTimeNow();
};

void initializeScheduler();

/** Denotes whether an OSC packet has been performed immediately or has been scheduled for later execution.

	If the package has been scheduled, memory ownership is transferred from the caller to the scheduler.
*/
enum PacketStatus
{
	PacketPerformed,
	PacketScheduled
};

/** Perform a completion message in the realtime thread.

	The return value denotes whether ownership is transferred to the scheduler or not.
 */
PacketStatus PerformCompletionMsg(World *world, const OSC_Packet& packet);

class SC_AudioDriver
{
protected:
    int64 mOSCincrement;
	struct World *mWorld;
	double mOSCtoSamples;
	int mSampleTime;

	// Common members
	uint32	mHardwareBufferSize;	// bufferSize returned by kAudioDevicePropertyBufferSize
	EngineFifo mFromEngine, mToEngine;
	EngineFifo mOscPacketsToEngine;
	SC_SyncCondition mAudioSync;
	pthread_t mThread;
	bool mRunThreadFlag;
	uint32 mSafetyOffset;
	PriorityQueueT<SC_ScheduledEvent, 2048> mScheduler;
	int mNumSamplesPerCallback;
	uint32 mPreferredHardwareBufferFrameSize;
	uint32 mPreferredSampleRate;
	double mBuffersPerSecond;
	double mAvgCPU, mPeakCPU;
	int mPeakCounter, mMaxPeakCounter;
	double mOSCincrementNumerator;

	double mStartHostSecs;
	double mPrevHostSecs;
	double mStartSampleTime;
	double mPrevSampleTime;
	double mSmoothSampleRate;
	double mSampleRate;

	// Driver interface methods, implemented by subclasses
	/**
	* DriverSetup() should init the driver and write the num of samples per callback
	* and the sample rate into the two addresses supplied as arguments.
	* The driver will have access to the "preferred" values of these two args 
	* (mPreferredHardwareBufferFrameSize, mPreferredSampleRate) and ideally should follow them.
	* This method should open the resources (and return true if successful), but shouldn't
	* really start the streaming (this is the responsibility of DriverStart()).
	*/
	virtual bool DriverSetup(int* outNumSamplesPerCallback, double* outSampleRate) = 0;
	/**
	* Start the audio streaming. Return true iff successful.
	*/
	virtual bool DriverStart() = 0;
	/**
	* Stop the audio streaming. Return true iff successful.
	*/
	virtual bool DriverStop() = 0;

public:
	// Common methods
	SC_AudioDriver(struct World *inWorld);
	virtual ~SC_AudioDriver();

	int64 mOSCbuftime;

	bool Setup();
	bool Start();
	bool Stop();

	void ClearSched() { mScheduler.Empty(); }

	void RunNonRealTime(float *in, float *out, int numSamples, int64 oscTime);
	void* RunThread();

	int SafetyOffset() const { return mSafetyOffset; }
	int NumSamplesPerCallback() const { return mNumSamplesPerCallback; }
	void SetPreferredHardwareBufferFrameSize(int inSize)
	{
		mPreferredHardwareBufferFrameSize = inSize;
	}
	void SetPreferredSampleRate(int inRate)
	{
		mPreferredSampleRate = inRate;
	}

	bool SendMsgToEngine(FifoMsg& inMsg);           // called by NRT thread
	bool SendMsgFromEngine(FifoMsg& inMsg);
	bool SendOscPacketMsgToEngine(FifoMsg& inMsg);  // called by OSC socket listener threads, protected by mWorld->mDriverLock

	void AddEvent(SC_ScheduledEvent& event) { mScheduler.Add(event); }

	double GetAvgCPU() const { return mAvgCPU; }
	double GetPeakCPU() const { return mPeakCPU; }
	double GetSampleRate() const { return mSampleRate; }
	double GetActualSampleRate() const { return mSmoothSampleRate; }
};

extern SC_AudioDriver* SC_NewAudioDriver(struct World* inWorld);


// the following classes should be split out into separate source files.
#if SC_AUDIO_API == SC_AUDIO_API_COREAUDIO || SC_AUDIO_API == SC_AUDIO_API_AUDIOUNITS
class SC_CoreAudioDriver : public SC_AudioDriver
{

	AudioBufferList * mInputBufList;
	AudioDeviceID	mInputDevice;
	AudioDeviceID	mOutputDevice;

	AudioStreamBasicDescription	inputStreamDesc;	// info about the default device
	AudioStreamBasicDescription	outputStreamDesc;	// info about the default device

	friend OSStatus appIOProc (		AudioDeviceID inDevice,
									const AudioTimeStamp* inNow,
									const AudioBufferList* inInputData,
									const AudioTimeStamp* inInputTime,
									AudioBufferList* outOutputData,
									const AudioTimeStamp* inOutputTime,
									void* defptr);

	friend OSStatus appIOProcSeparateIn (AudioDeviceID device, const AudioTimeStamp* inNow,
									const AudioBufferList* inInputData,
									const AudioTimeStamp* inInputTime,
									AudioBufferList* outOutputData,
									const AudioTimeStamp* inOutputTime,
									void* defptr);

protected:
    // Driver interface methods
	virtual bool DriverSetup(int* outNumSamplesPerCallback, double* outSampleRate);
	virtual bool DriverStart();
	virtual bool DriverStop();

	AudioDeviceIOProcID mOutputID;
	AudioDeviceIOProcID mInputID;

public:
	int builtinoutputflag_; 
	
    SC_CoreAudioDriver(struct World *inWorld);
	virtual ~SC_CoreAudioDriver();

	bool StopStart(); 
	
    void Run(const AudioBufferList* inInputData, AudioBufferList* outOutputData, int64 oscTime);

	bool UseInput() { return mInputDevice != kAudioDeviceUnknown; }
	bool UseSeparateIO() { return UseInput() && mInputDevice != mOutputDevice; }
	AudioDeviceID InputDevice() { return mInputDevice; }
	AudioDeviceID OutputDevice() { return mOutputDevice; }

	void SetInputBufferList(AudioBufferList * inBufList) { mInputBufList = inBufList; }
	AudioBufferList* GetInputBufferList() const { return mInputBufList; }
};

#endif

#if SC_AUDIO_API == SC_AUDIO_API_COREAUDIOIPHONE
class SC_iCoreAudioDriver : public SC_AudioDriver
{
	AUGraph graph;

	AudioStreamBasicDescription	inputStreamDesc;	// info about the default device
	AudioStreamBasicDescription	outputStreamDesc;	// info about the default device

protected:
    // Driver interface methods
	virtual bool DriverSetup(int* outNumSamplesPerCallback, double* outSampleRate);
	virtual bool DriverStart();
	virtual bool DriverStop();

public:
    SC_iCoreAudioDriver(struct World *inWorld);
	virtual ~SC_iCoreAudioDriver();

    void Run(const AudioBufferList* inInputData, AudioBufferList* outOutputData, int64 oscTime);

    AudioBufferList * buflist;
	AudioBufferList * floatInputList;
	AudioBufferList * floatOutputList;
	AudioConverterRef converter_in_to_F32;
	AudioConverterRef converter_F32_to_out;
	AudioConverterRef converter_in_to_out;
	int *converter_buffer;

	int receivedIn;
	AudioUnit inputUnit;


};

inline SC_AudioDriver* SC_NewAudioDriver(struct World *inWorld)
{
	return new SC_iCoreAudioDriver(inWorld);
}
#endif // SC_AUDIO_API_COREAUDIOIPHONE


#if SC_AUDIO_API == SC_AUDIO_API_PORTAUDIO
class SC_PortAudioDriver : public SC_AudioDriver
{

	int mInputChannelCount, mOutputChannelCount;
	PaStream *mStream;
	PaTime mPaStreamStartupTime;
	int64 mPaStreamStartupTimeOSC;

protected:
	// Driver interface methods
	virtual bool DriverSetup(int* outNumSamplesPerCallback, double* outSampleRate);
	virtual bool DriverStart();
	virtual bool DriverStop();

public:
    SC_PortAudioDriver(struct World *inWorld);
	virtual ~SC_PortAudioDriver();

	int PortAudioCallback( const void *input, void *output,
            unsigned long frameCount, const PaStreamCallbackTimeInfo* timeInfo,
            PaStreamCallbackFlags statusFlags );
private:
	void GetPaDeviceFromName(const char* device, int* mInOut);
};

inline SC_AudioDriver* SC_NewAudioDriver(struct World *inWorld)
{
    return new SC_PortAudioDriver(inWorld);
}
#endif // SC_AUDIO_API_PORTAUDIO

#if SC_AUDIO_API == SC_AUDIO_API_ANDROIDJNI

class SC_AndroidJNIAudioDriver : public SC_AudioDriver
{

protected:

    // Driver interface methods
        virtual bool DriverSetup(int* outNumSamplesPerCallback, double* outSampleRate);
        virtual bool DriverStart();
        virtual bool DriverStop();
        
public:
    SC_AndroidJNIAudioDriver(struct World *inWorld);
        virtual ~SC_AndroidJNIAudioDriver();

        void genaudio(short* arri, int numSamples);

};

inline SC_AudioDriver* SC_NewAudioDriver(struct World *inWorld)
{
    return new SC_AndroidJNIAudioDriver(inWorld);
}

#endif // SC_AUDIO_API == SC_AUDIO_API_ANDROIDJNI

#endif
