/* 
 * Copyright (C) 2000-2001 the xine project
 * 
 * This file is part of xine, a unix video player.
 * 
 * xine 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.
 * 
 * xine 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
 *
 * $Id: audio_decoder.c,v 1.34 2001/09/09 15:39:47 jkeil Exp $
 *
 *
 * functions that implement audio decoding
 */

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include <sched.h>
#include <unistd.h>

#include "xine_internal.h"
#include "utils.h"
#include "monitor.h"

void *audio_decoder_loop (void *this_gen) {

  buf_element_t   *buf;
  xine_t          *this = (xine_t *) this_gen;
  int              running = 1;
  int              i,j;
  audio_decoder_t *decoder;

  while (running) {

    /* printf ("audio_loop: waiting for package...\n"); */

    buf = this->audio_fifo->get (this->audio_fifo);

    /* printf ("audio_loop: got package pts = %d\n", buf->PTS); */

    if (buf->input_pos)
      this->cur_input_pos = buf->input_pos;
    
    if (buf->input_time)
      this->cur_input_time = buf->input_time;
    
    /* 
     * Call update status callback function if
     * there is no video decoder initialized, like
     *  in .mp3 playback.
     */
    /*
    if(this->cur_video_decoder_plugin == NULL) {
      if(this->status == XINE_PLAY)
	this->status_callback (this->status);
    }
    */
    
    switch (buf->type) {
      
    case BUF_CONTROL_START:
      if (this->cur_audio_decoder_plugin) {
	this->cur_audio_decoder_plugin->close (this->cur_audio_decoder_plugin);
	this->cur_audio_decoder_plugin = NULL;
      }
      
      pthread_mutex_lock (&this->xine_lock);
      this->audio_finished = 0;
      pthread_mutex_unlock (&this->xine_lock);
      
      for (i=0 ; i<50; i++)
	this->audio_track_map[0] = 0;
      
      this->audio_track_map_entries = 0;

      this->metronom->audio_stream_start (this->metronom);
      
      break;
      
    case BUF_CONTROL_END:

      this->metronom->audio_stream_end (this->metronom);
      
      if (this->cur_audio_decoder_plugin) {
	this->cur_audio_decoder_plugin->close (this->cur_audio_decoder_plugin);
	this->cur_audio_decoder_plugin = NULL;
      }
      
      pthread_mutex_lock (&this->xine_lock);

      if (!this->audio_finished && (buf->decoder_info[0]==0)) {
	this->audio_finished = 1;
      
	if (this->video_finished) {
	  pthread_mutex_unlock (&this->xine_lock);
	  xine_notify_stream_finished (this);
	} else
	  pthread_mutex_unlock (&this->xine_lock);
      } else
	pthread_mutex_unlock (&this->xine_lock);

      break;
      
    case BUF_CONTROL_QUIT:
      if (this->cur_audio_decoder_plugin) {
	this->cur_audio_decoder_plugin->close (this->cur_audio_decoder_plugin);
	this->cur_audio_decoder_plugin = NULL;
      }
      running = 0;
      break;
      
    default:

      while (this->audio_mute==2) {
	xine_usec_sleep (50000);
      }

      if (this->audio_mute)
	break;

      profiler_start_count (1);

      if ( (buf->type & 0xFF000000) == BUF_AUDIO_BASE ) {
	
	/* printf ("audio_decoder: got an audio buffer, type %08x\n", buf->type);  */
	
	/* update track map */
	
	i = 0;
	while ( (i<this->audio_track_map_entries) && (this->audio_track_map[i]<buf->type) ) 
	  i++;
	
	/*
	  printf ("audio_decoder: got an audio buffer, type %08x, %d map entries, i=%d\n", 
	  buf->type, this->audio_track_map_entries, i); 
	*/
	
	if ( (i==this->audio_track_map_entries) || (this->audio_track_map[i] != buf->type) ) {
	  
	  j = this->audio_track_map_entries;
	  while (j>i) {
	    this->audio_track_map[j] = this->audio_track_map[j-1];
	    j--;
	  }
	  this->audio_track_map[i] = buf->type;
	  this->audio_track_map_entries++;
	    
	  if (i<=this->audio_channel) {
	    /* close old audio decoder */
	    if (this->cur_audio_decoder_plugin) {
	      this->cur_audio_decoder_plugin->close (this->cur_audio_decoder_plugin);
	      this->cur_audio_decoder_plugin = NULL;
	    }
	  }
	    
	}
	  
	/* now, decode this buffer if it's the right track */
	  
	if (buf->type == this->audio_track_map[this->audio_channel]) {
	    
	  int streamtype = (buf->type>>16) & 0xFF;
	    
	  decoder = this->audio_decoder_plugins [streamtype];
	    
	  if (decoder) {
	    if (this->cur_audio_decoder_plugin != decoder) {
		
	      if (this->cur_audio_decoder_plugin) 
		this->cur_audio_decoder_plugin->close (this->cur_audio_decoder_plugin);
		
	      this->cur_audio_decoder_plugin = decoder;
	      this->cur_audio_decoder_plugin->init (this->cur_audio_decoder_plugin, this->audio_out);

	      printf ("audio_decoder: using decoder >%s< \n",
		      decoder->get_identifier());
		
	    }
	      
	    decoder->decode_data (decoder, buf);
	  }
	}
      } else
	printf ("audio_decoder: unknown buffer type: %08x\n", buf->type);

      profiler_stop_count (1);
    }
    
    buf->free_buffer (buf);
  }

  pthread_exit(NULL);
}

void audio_decoder_init (xine_t *this) {

  pthread_attr_t       pth_attrs;
  struct sched_param   pth_params;

  if (this->audio_out == NULL) {
    this->audio_finished = 1;    
    this->audio_fifo     = NULL;
    return;
  }
  
  this->audio_fifo = fifo_buffer_new (1500, 4096);

  pthread_attr_init(&pth_attrs);
  pthread_attr_getschedparam(&pth_attrs, &pth_params);
  pth_params.sched_priority = sched_get_priority_min(SCHED_OTHER);
  pthread_attr_setschedparam(&pth_attrs, &pth_params);
  pthread_attr_setscope(&pth_attrs, PTHREAD_SCOPE_SYSTEM);
  
  pthread_create (&this->audio_thread, &pth_attrs, audio_decoder_loop, this) ;
}

void audio_decoder_shutdown (xine_t *this) {

  buf_element_t *buf;
  void          *p;

  if (this->audio_fifo) {
    /* this->audio_fifo->clear(this->audio_fifo); */

    buf = this->audio_fifo->buffer_pool_alloc (this->audio_fifo);
    buf->type = BUF_CONTROL_QUIT;
    this->audio_fifo->put (this->audio_fifo, buf);
    
    pthread_join (this->audio_thread, &p); 
  }
}