/*
 * Milan Mimica
 * Audio example that plays multiple files at the same time
 * Originlly derived from the ex_acodec example.
 */

#include <stdio.h>
#include "allegro5/allegro.h"
#include "allegro5/allegro_audio.h"
#include "allegro5/allegro_acodec.h"

#include "common.c"

char *default_files[] = {NULL, "data/welcome.voc",
   "data/haiku/earth_0.ogg", "data/haiku/water_0.ogg",
   "data/haiku/fire_0.ogg", "data/haiku/air_0.ogg"};

int main(int argc, char **argv)
{
   int i;
   ALLEGRO_SAMPLE **sample_data;
   ALLEGRO_SAMPLE_INSTANCE **sample;
   ALLEGRO_MIXER *mixer;
   ALLEGRO_VOICE *voice;
   float longest_sample;

   if (!al_init()) {
       abort_example("Could not init Allegro.\n");
   }

   open_log();

   if (argc < 2) {
      log_printf("This example can be run from the command line.\nUsage: %s {audio_files}\n", argv[0]);
      argv = default_files;
      argc = 6;
   }

   al_init_acodec_addon();

   if (!al_install_audio()) {
       abort_example("Could not init sound!\n");
   }

   sample = malloc(argc * sizeof(*sample));
   if (!sample) {
      abort_example("Out of memory!\n");
   }

   sample_data = malloc(argc * sizeof(*sample_data));
   if (!sample_data) {
      abort_example("Out of memory!\n");
   }

   /* a voice is used for playback */
   voice = al_create_voice(44100, ALLEGRO_AUDIO_DEPTH_INT16,
      ALLEGRO_CHANNEL_CONF_2);
   if (!voice) {
      abort_example("Could not create ALLEGRO_VOICE from sample\n");
   }

   mixer = al_create_mixer(44100, ALLEGRO_AUDIO_DEPTH_FLOAT32,
      ALLEGRO_CHANNEL_CONF_2);
   if (!mixer) {
      abort_example("al_create_mixer failed.\n");
   }

   if (!al_attach_mixer_to_voice(mixer, voice)) {
      abort_example("al_attach_mixer_to_voice failed.\n");
   }

   for (i = 1; i < argc; ++i) {
      const char *filename = argv[i];

      sample[i] = NULL;

      /* loads the entire sound file from disk into sample data */
      sample_data[i] = al_load_sample(filename);
      if (!sample_data[i]) {
         abort_example("Could not load sample from '%s'!\n", filename);
      }

      sample[i] = al_create_sample_instance(sample_data[i]);
      if (!sample[i]) {
         log_printf("Could not create sample!\n");
         al_destroy_sample(sample_data[i]);
         sample_data[i] = NULL;
         continue;
      }

      if (!al_attach_sample_instance_to_mixer(sample[i], mixer)) {
         log_printf("al_attach_sample_instance_to_mixer failed.\n");
         continue;
      }
   }

   longest_sample = 0;

   for (i = 1; i < argc; ++i) {
      const char *filename = argv[i];
      float sample_time;

      if (!sample[i])
         continue;

      /* play each sample once */
      al_play_sample_instance(sample[i]);

      sample_time = al_get_sample_instance_time(sample[i]);
      log_printf("Playing '%s' (%.3f seconds)\n", filename, sample_time);

      if (sample_time > longest_sample)
         longest_sample = sample_time;
   }

   al_rest(longest_sample);

   log_printf("Done\n");

   for (i = 1; i < argc; ++i) {
      /* free the memory allocated when creating the sample + voice */
      if (sample[i]) {
         al_stop_sample_instance(sample[i]);
         al_destroy_sample_instance(sample[i]);
         al_destroy_sample(sample_data[i]);
      }
   }
   al_destroy_mixer(mixer);
   al_destroy_voice(voice);

   free(sample);
   free(sample_data);

   al_uninstall_audio();

   close_log(true);

   return 0;
}