/*
 * Copyright 2012, Adrien Destugues <pulkomandy@gmail.com>
 * Distributed under the terms of the MIT License.
 */


#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include <Entry.h>
#include <InterfaceDefs.h>
#include <MediaFile.h>
#include <MediaTrack.h>
#include <PushGameSound.h>


int
main(int argc, char *argv[])
{
        // 256 frames * 4 buffer parts * 2 channels * 2 bytes per sample
        // will give us internal buffer of 4096 bytes
        size_t framesPerBufferPart = 256;
        size_t bufferPartCount = 4;

        if (argc != 1 && argc != 3) {
                printf("Usage: %s [<frames per part> <parts>]\n",
                        argv[0]);
                return 0;
        }

        if (argc == 3) {
                size_t size = strtoul(argv[1], NULL, 10);
                if (size > 0)
                        framesPerBufferPart = size;

                size = strtoul(argv[2], NULL,  10);
                if (size > 0)
                        bufferPartCount = size;
        }

        printf("frames per buffer part: %ld\n", framesPerBufferPart);
        printf("buffer part count: %ld\n", bufferPartCount);

        gs_audio_format gsFormat;
        memset(&gsFormat, 0, sizeof(gsFormat));
        gsFormat.frame_rate = 48000;
        gsFormat.channel_count = 1;
        gsFormat.format = gs_audio_format::B_GS_S16;
        gsFormat.byte_order = B_MEDIA_LITTLE_ENDIAN;
        gsFormat.buffer_size = framesPerBufferPart;

        BPushGameSound pushGameSound(framesPerBufferPart, &gsFormat,
                bufferPartCount);
        if (pushGameSound.InitCheck() != B_OK) {
                printf("trouble initializing push game sound: %s\n",
                        strerror(pushGameSound.InitCheck()));
                return 1;
        }

        uint8 *buffer;
        size_t bufferSize;
        if (pushGameSound.LockForCyclic((void **)&buffer, &bufferSize)
                        != BPushGameSound::lock_ok) {
                printf("cannot lock buffer\n");
                return 1;
        }
        memset(buffer, 0, bufferSize);

        if (pushGameSound.StartPlaying() != B_OK) {
                printf("cannot start playback\n");
                return 1;
        }

        printf("playing, press [esc] to exit...\n");

        key_info keyInfo;

        size_t sampleCount = framesPerBufferPart * bufferPartCount;
        for(size_t pos = 0; pos < sampleCount; pos++)
        {
                *(int16_t*)(buffer + pos * sizeof(int16_t))
                        = (int16_t)(2000 * sin(pos * gsFormat.frame_rate
                                        / ((float)sampleCount * 440)));
        }

        while (true) {
                usleep(1000000 * framesPerBufferPart / gsFormat.frame_rate);

                // check escape key state
                if (get_key_info(&keyInfo) != B_OK) {
                        printf("\nkeyboard state read error\n");
                        break;
                }
                if ((keyInfo.key_states[0] & 0x40) != 0)
                        break;
        }

        pushGameSound.StopPlaying();

        printf("\nfinished.\n");

        return 0;
}