#include "config.h"

#include <stdio.h>

#include <stdlib.h>

#include <math.h>

#include <inttypes.h>

#include "a52.h"

#include "audio_out.h"

#include "audio_out_internal.h"

typedef struct peak_instance_s {

    ao_instance_t ao;

    int flags;

    sample_t peak;

} peak_instance_t;

static int peak_setup (ao_instance_t * _instance, int sample_rate, int * flags,

		       sample_t * level, sample_t * bias)

{

    peak_instance_t * instance = (peak_instance_t *) _instance;

    *flags = instance->flags;

    *level = 1;

    *bias = 0;

    return 0;

}

static int peak_play (ao_instance_t * _instance, int flags, sample_t * samples)

{

    peak_instance_t * instance = (peak_instance_t *) _instance;

    int i;

    for (i = 0; i < 256 * 2; i++) {

	if (instance->peak < fabs(samples[i]))

	    instance->peak = fabs(samples[i]);

    }

    return 0;

}

static void peak_close (ao_instance_t * _instance)

{

    peak_instance_t * instance = (peak_instance_t *) _instance;

    printf ("peak level = %.4f (%+.2f dB)\n",

	    instance->peak, 6 * log (instance->peak) / log (2));

}

static ao_instance_t * peak_open (int flags)

{

    peak_instance_t * instance;

    instance = malloc (sizeof (peak_instance_t));

    if (instance == NULL)

	return NULL;

    instance->ao.setup = peak_setup;

    instance->ao.play = peak_play;

    instance->ao.close = peak_close;

    instance->flags = flags;

    instance->peak = 0;

    return (ao_instance_t *) instance;

}

ao_instance_t * ao_peak_open (void)

{

    return peak_open (A52_STEREO);

}

ao_instance_t * ao_peakdolby_open (void)

{

    return peak_open (A52_DOLBY);

}