/*
* Copyright (c) 2010 Ixonos Plc.
* All rights reserved.
* This component and the accompanying materials are made available
* under the terms of the "Eclipse Public License v1.0"
* which accompanies this distribution, and is available
* at the URL "http://www.eclipse.org/legal/epl-v10.html".
*
* Initial Contributors:
* Nokia Corporation - Initial contribution
*
* Contributors:
* Ixonos Plc
*
* Description:  
*
*/



#include "Mp3API.h"
#include "mpif.h"
#include "mpaud.h"
#include "mpheader.h"
#include "mp3tool.h"




// Exception handler for FLOATS
void handler(TExcType /*aType*/)
{
#ifndef __WINS__
//    CMp3Mix::WriteL(_L("Exception cought!!!"));
#endif

}

//const int16 Kmp3BufSize = 8;

EXPORT_C CMp3Edit* CMp3Edit::NewL()
    {

    CMp3Edit* self = new (ELeave) CMp3Edit();
    CleanupStack::PushL(self);
    self->ConstructL();
    CleanupStack::Pop(self);
    return self;

    }

void CMp3Edit::ConstructL()
    {
    
      }


EXPORT_C CMp3Edit::~CMp3Edit()
    {

    }

CMp3Edit::CMp3Edit()
    {

    }


EXPORT_C uint32
CMp3Edit::FileLengthInMs(TMpTransportHandle *tHandle, int32 fileSize) const
    {
    return MP_FileLengthInMs(tHandle, fileSize);
    }

EXPORT_C int32
CMp3Edit::GetSeekOffset(TMpTransportHandle *tHandle, int32 seekPos) const
    {
    return MP_GetSeekOffset(tHandle, seekPos);
    }

EXPORT_C int32
CMp3Edit::GetFrameTime(TMpTransportHandle *tHandle) const
    {
    return MP_GetFrameTime(tHandle);
    }

EXPORT_C void 
CMp3Edit::InitTransport(TMpTransportHandle *tHandle) const
    {

    mpInitTransport(tHandle);
    }

EXPORT_C int16
CMp3Edit::SeekSync(TMpTransportHandle *tHandle, uint8 *syncBuf, 
            uint32 syncBufLen, int16 *readBytes, 
            int16 *frameBytes, int16 *headerBytes,
            uint8 initMode) const

    {

    return MP_SeekSync(tHandle, syncBuf, 
            syncBufLen, readBytes, 
            frameBytes, headerBytes,
            initMode);
    }

EXPORT_C int16
CMp3Edit::FreeMode(TMpTransportHandle *tHandle, uint8 *syncBuf, 
            uint32 syncBufLen, int16 *readBytes, 
            int16 *frameBytes, int16 *headerBytes) const
    {
    return MP_FreeMode(tHandle, syncBuf, 
            syncBufLen, readBytes, 
            frameBytes, headerBytes);
    }

EXPORT_C int16
CMp3Edit::EstimateBitrate(TMpTransportHandle *tHandle, uint8 isVbr) const
    {
    return MP_EstimateBitrate(tHandle, isVbr) ;

    }



/*
 * Saves modified 'global_gain' bitstream elements to specified layer I/II/III data buffer.
 */
EXPORT_C void
CMp3Edit::SetMPGlobalGains(TBitStream *bs, uint8 numGains, uint8 *globalGain, uint32 *gainPos)
{
  int16 i;

  /*-- Store the gain element back to bitstream. --*/
  for(i = 0; i < numGains; i++)
  {
    BsSkipNBits(bs, gainPos[i]); 
    BsPutBits(bs, 8, globalGain[i]);
  }
}



EXPORT_C uint8
CMp3Edit::GetMPGlobalGains(TBitStream *bs, TMpTransportHandle *tHandle, uint8 *globalGain, uint32 *gainPos)
{
  uint32 bufBitOffset;
  uint8 numGains, nVersion, nChannels;

  numGains = 0;
  nVersion = (uint8) version(&tHandle->header);
  nChannels =(uint8)  channels(&tHandle->header);

  bufBitOffset = BsGetBitsRead(bs);

  /*-- Get the gain for each channel and granule. --*/
  switch(nVersion)
  {
    /*-- MPEG-1. --*/
    case 1:
      switch(nChannels)
      {
        /*
         * Mono frame consists of 2 granules.
         */
        case 1:
          numGains = 2;

          /*-- Left channel, granules 0 and granule 1. --*/
          BsSkipNBits(bs, 0x27);
          gainPos[0] = BsGetBitsRead(bs) - bufBitOffset;
          globalGain[0] = (uint8) BsGetBits(bs, 8);
          BsSkipNBits(bs, 0x33);
          gainPos[1] = 0x33;
          globalGain[1] = (uint8) BsGetBits(bs, 8);
          break;

        /*
         * Two channels, 2 granules.
         */
        case 2:
          numGains = 4;

          /*-- Left and right channel, granule 0. --*/
          BsSkipNBits(bs, 0x29);
          gainPos[0] = BsGetBitsRead(bs) - bufBitOffset;
          globalGain[0] = (uint8) BsGetBits(bs, 8);
          BsSkipNBits(bs, 0x33); 
          gainPos[1] = 0x33;
          globalGain[1] = (uint8) BsGetBits(bs, 8);

          /*-- Left and right channel, granule 1. --*/
          BsSkipNBits(bs, 0x33); 
          gainPos[2] = 0x33;
          globalGain[2] = (uint8) BsGetBits(bs, 8);
          BsSkipNBits(bs, 0x33); 
          gainPos[3] = 0x33;
          globalGain[3] = (uint8) BsGetBits(bs, 8);
          break;
      }
      break;

    /*-- MPEG-2 LSF and MPEG-2.5. --*/
    default:
      switch(nChannels)
      {
        /*
         * Mono channel, 1 granule.
         */
        case 1:
          numGains = 1;
          BsSkipNBits(bs, 0x1E); 
          gainPos[0] = BsGetBitsRead(bs) - bufBitOffset;
          globalGain[0] = (uint8) BsGetBits(bs, 8);
          break;

        /*
         * Two channels, 1 granule.
         */
        case 2:
          numGains = 2;
          BsSkipNBits(bs, 0x1F); 
          gainPos[0] = BsGetBitsRead(bs) - bufBitOffset;
          globalGain[0] = (uint8) BsGetBits(bs, 8);
          BsSkipNBits(bs, 0x37); 
          gainPos[1] = 0x37;
          globalGain[1] = (uint8) BsGetBits(bs, 8);
          break;
      }
      break;
  }


  return (numGains);
}

EXPORT_C CMPAudDec* CMPAudDec::NewL()
    {
    CMPAudDec* self = new (ELeave) CMPAudDec();
    CleanupStack::PushL(self);
    self->ConstructL();
    CleanupStack::Pop(self);
    return self;


    }
    
CMPAudDec::CMPAudDec()
    {


    }

EXPORT_C CMPAudDec::~CMPAudDec()
    {

  
    int16 i;

    /* --Scalefactors. --*/
    if (frame->scale_factors != 0) delete[] frame->scale_factors;
    
    /*-- Quantized samples. --*/
    if (frame->quant != 0) delete[] frame->quant;

    /*-- Huffman codebooks. --*/
    if (huffman != 0) delete[] huffman;

    /*-- Layer III side info. --*/
    if(side_info)
        {
        for(i = 0; i < MAX_CHANNELS; i++)
            {
            int16 j;

            if(side_info->ch_info[i])
                {
                if (side_info->ch_info[i]->scale_fac != 0) delete side_info->ch_info[i]->scale_fac;
          
                for(j = 0; j < 2; j++)
                    if (side_info->ch_info[i]->gr_info[j] != 0) delete side_info->ch_info[i]->gr_info[j];
                }      
            if (side_info->ch_info[i] != 0) delete side_info->ch_info[i];
            }
    
        if (side_info->s_mode_long != 0) delete[] side_info->s_mode_long;
    
        for(i = 0; i < 3; i++)
            if (side_info->s_mode_short[i] != 0) delete[] side_info->s_mode_short[i];
    
        if (side_info != 0) delete side_info;
        }
  
    if (frame != 0) delete frame;
    if (bitReserv != 0) delete[] bitReserv;

    

    }

void CMPAudDec::ConstructL()
    {
     
    int16 i, j, groups;

    /*-- Create handle. --*/
    
    /*-- Create bit reservoir buffer. --*/
    bitReserv = new (ELeave) uint8[4 * MAX_BITRESER_SIZE];
    ZERO_MEMORY(bitReserv, 4 * MAX_BITRESER_SIZE * sizeof(uint8));

    BsInit(&br, bitReserv, 4 * MAX_BITRESER_SIZE);
  
    /*-- Create frame parameters. --*/
    frame = new (ELeave) TMPEG_Frame;
  
    /*-- Create side info parameters. --*/
    side_info = CIII_Side_Info::NewL();
  
    /*-- Create scalefactors. --*/
    frame->scale_factors = new (ELeave) uint8[MAX_CHANNELS * SBLIMIT * 3];
    ZERO_MEMORY(frame->scale_factors, MAX_CHANNELS * SBLIMIT * 3 * sizeof(uint8)); 


    /*-- Create L3 side info. --*/
    for(i = 0; i < MAX_CHANNELS; i++)
        {
    
        side_info->ch_info[i] = CIII_Channel_Info::NewL();
    
        for(j = 0; j < 2; j++)
            {
                side_info->ch_info[i]->gr_info[j] = new (ELeave) TGranule_Info;
      
            }
        }
  
    side_info->s_mode_long = new (ELeave) StereoMode[22];
    
    ZERO_MEMORY(side_info->s_mode_long, 22 * sizeof(StereoMode));

    for(i = 0; i < 3; i++)
        {
        side_info->s_mode_short[i] =  new (ELeave) StereoMode[13]; //GET_CHUNK(13 * sizeof(StereoMode));
        ZERO_MEMORY(side_info->s_mode_short[i], 13 * sizeof(StereoMode));
        }
  
    /*-- Initialize scalefactors. --*/
    for(i = j = 0; i < MAX_CHANNELS; i++)
        {
        uint8 idx[] = {0, 23, 36, 49, 62, 85, 98, 111};

        CIII_Scale_Factors *scale_fac;

        side_info->ch_info[i]->scale_fac = new (ELeave) CIII_Scale_Factors();
      
        scale_fac = side_info->ch_info[i]->scale_fac;

        scale_fac->scalefac_long     = frame->scale_factors + idx[j++];
        scale_fac->scalefac_short[0] = frame->scale_factors + idx[j++];
        scale_fac->scalefac_short[1] = frame->scale_factors + idx[j++];
        scale_fac->scalefac_short[2] = frame->scale_factors + idx[j++];
    }

    groups = MAX_MONO_SAMPLES * MAX_CHANNELS;

    /*-- Create buffer for quantized samples. --*/
    frame->quant = new (ELeave) int16[groups + 10];//(int16 *) GET_CHUNK((groups + 10) * sizeof(int16));

    ZERO_MEMORY(frame->quant, (groups + 10) * sizeof(int16));

    for(i = 0; i < MAX_CHANNELS; i++)
        frame->ch_quant[i] = frame->quant + i * MAX_MONO_SAMPLES;

    /*-- Create Huffman handle. --*/
    huffman = new (ELeave) CHuffman[33];// *) GET_CHUNK(33 * sizeof(CHuffman)); 
    
    /*-- Get the Huffman codebooks. --*/
    InitL3Huffman(huffman);

    }

    /*-- Initializes MPEG Layer I/II/III decoder handle. --*/
EXPORT_C void
CMPAudDec::Init(TMpTransportHandle *aMpFileFormat)
{
  mpFileFormat = aMpFileFormat;

  /*-- MPEG-1 --*/
  if(version(&mpFileFormat->header) == MPEG_AUDIO_ID)
    {
    side_info->lsf = FALSE;
    side_info->max_gr = 2;
    }

    /*-- MPEG-2 LSF or MPEG-2.5 --*/
    else
    {
        side_info->lsf = TRUE;
        side_info->max_gr = 1;
    }

    /*-- Get the scalefactor band related parameters. --*/
    III_SfbDataInit(side_info->sfbData, &mpFileFormat->header);
}