3afdedaef2
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@30581 a1c6a512-1295-4272-9138-f99709370657
471 lines
14 KiB
C
471 lines
14 KiB
C
/********************************************************************
|
|
* *
|
|
* THIS FILE IS PART OF THE OggVorbis 'TREMOR' CODEC SOURCE CODE. *
|
|
* *
|
|
* USE, DISTRIBUTION AND REPRODUCTION OF THIS LIBRARY SOURCE IS *
|
|
* GOVERNED BY A BSD-STYLE SOURCE LICENSE INCLUDED WITH THIS SOURCE *
|
|
* IN 'COPYING'. PLEASE READ THESE TERMS BEFORE DISTRIBUTING. *
|
|
* *
|
|
* THE OggVorbis 'TREMOR' SOURCE CODE IS (C) COPYRIGHT 1994-2002 *
|
|
* BY THE Xiph.Org FOUNDATION http://www.xiph.org/ *
|
|
* *
|
|
********************************************************************
|
|
|
|
function: PCM data vector blocking, windowing and dis/reassembly
|
|
|
|
********************************************************************/
|
|
|
|
#include "config-tremor.h"
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include "ogg.h"
|
|
#include "ivorbiscodec.h"
|
|
#include "codec_internal.h"
|
|
|
|
#include "window.h"
|
|
#include "registry.h"
|
|
#include "misc.h"
|
|
#include "ffmpeg_stuff.h"
|
|
//#include <codecs/lib/codeclib.h>
|
|
|
|
static int ilog(unsigned int v){
|
|
int ret=0;
|
|
if(v)--v;
|
|
while(v){
|
|
ret++;
|
|
v>>=1;
|
|
}
|
|
return(ret);
|
|
}
|
|
|
|
static ogg_int32_t* _pcmbp[CHANNELS] IBSS_ATTR;
|
|
static ogg_int32_t* _pcmret[CHANNELS] IBSS_ATTR;
|
|
/* save original pointers returned by malloc so we can free it easily */
|
|
static ogg_int32_t* malloc_pointers[3] = {NULL};
|
|
|
|
/* pcm accumulator examples (not exhaustive):
|
|
|
|
<-------------- lW ---------------->
|
|
<--------------- W ---------------->
|
|
: .....|..... _______________ |
|
|
: .''' | '''_--- | |\ |
|
|
:.....''' |_____--- '''......| | \_______|
|
|
:.................|__________________|_______|__|______|
|
|
|<------ Sl ------>| > Sr < |endW
|
|
|beginSl |endSl | |endSr
|
|
|beginW |endlW |beginSr
|
|
|
|
|
|
|< lW >|
|
|
<--------------- W ---------------->
|
|
| | .. ______________ |
|
|
| | ' `/ | ---_ |
|
|
|___.'___/`. | ---_____|
|
|
|_______|__|_______|_________________|
|
|
| >|Sl|< |<------ Sr ----->|endW
|
|
| | |endSl |beginSr |endSr
|
|
|beginW | |endlW
|
|
mult[0] |beginSl mult[n]
|
|
|
|
<-------------- lW ----------------->
|
|
|<--W-->|
|
|
: .............. ___ | |
|
|
: .''' |`/ \ | |
|
|
:.....''' |/`....\|...|
|
|
:.........................|___|___|___|
|
|
|Sl |Sr |endW
|
|
| | |endSr
|
|
| |beginSr
|
|
| |endSl
|
|
|beginSl
|
|
|beginW
|
|
*/
|
|
|
|
/* block abstraction setup *********************************************/
|
|
|
|
#ifndef WORD_ALIGN
|
|
#define WORD_ALIGN 8
|
|
#endif
|
|
|
|
int vorbis_block_init(vorbis_dsp_state *v, vorbis_block *vb){
|
|
memset(vb,0,sizeof(*vb));
|
|
vb->vd=v;
|
|
vb->localalloc=0;
|
|
vb->localstore=NULL;
|
|
|
|
return(0);
|
|
}
|
|
|
|
void *_vorbis_block_alloc(vorbis_block *vb,long bytes){
|
|
bytes=(bytes+(WORD_ALIGN-1)) & ~(WORD_ALIGN-1);
|
|
if(bytes+vb->localtop>vb->localalloc){
|
|
/* can't just _ogg_realloc... there are outstanding pointers */
|
|
if(vb->localstore){
|
|
struct alloc_chain *link=(struct alloc_chain *)_ogg_malloc(sizeof(*link));
|
|
vb->totaluse+=vb->localtop;
|
|
link->next=vb->reap;
|
|
link->ptr=vb->localstore;
|
|
vb->reap=link;
|
|
}
|
|
/* highly conservative */
|
|
vb->localalloc=bytes;
|
|
vb->localstore=_ogg_malloc(vb->localalloc);
|
|
vb->localtop=0;
|
|
}
|
|
{
|
|
void *ret=(void *)(((char *)vb->localstore)+vb->localtop);
|
|
vb->localtop+=bytes;
|
|
return ret;
|
|
}
|
|
}
|
|
|
|
/* reap the chain, pull the ripcord */
|
|
void _vorbis_block_ripcord(vorbis_block *vb){
|
|
/* reap the chain */
|
|
struct alloc_chain *reap=vb->reap;
|
|
while(reap){
|
|
struct alloc_chain *next=reap->next;
|
|
_ogg_free(reap->ptr);
|
|
memset(reap,0,sizeof(*reap));
|
|
_ogg_free(reap);
|
|
reap=next;
|
|
}
|
|
/* consolidate storage */
|
|
if(vb->totaluse){
|
|
vb->localstore=_ogg_realloc(vb->localstore,vb->totaluse+vb->localalloc);
|
|
vb->localalloc+=vb->totaluse;
|
|
vb->totaluse=0;
|
|
}
|
|
|
|
/* pull the ripcord */
|
|
vb->localtop=0;
|
|
vb->reap=NULL;
|
|
}
|
|
|
|
int vorbis_block_clear(vorbis_block *vb){
|
|
_vorbis_block_ripcord(vb);
|
|
if(vb->localstore)_ogg_free(vb->localstore);
|
|
|
|
memset(vb,0,sizeof(*vb));
|
|
return(0);
|
|
}
|
|
|
|
static int _vds_init(vorbis_dsp_state *v,vorbis_info *vi){
|
|
int i;
|
|
long b_size[2];
|
|
|
|
codec_setup_info *ci=(codec_setup_info *)vi->codec_setup;
|
|
private_state *b=NULL;
|
|
|
|
if(ci==NULL) return 1;
|
|
|
|
memset(v,0,sizeof(*v));
|
|
b=(private_state *)(v->backend_state=_ogg_calloc(1,sizeof(*b)));
|
|
|
|
v->vi=vi;
|
|
b->modebits=ilog(ci->modes);
|
|
|
|
#ifdef TREMOR_USE_IRAM
|
|
/* allocate IRAM buffer for the PCM data generated by synthesis */
|
|
iram_malloc_init();
|
|
|
|
v->floors = iram_malloc(vi->channels*ci->blocksizes[1]/2*sizeof(ogg_int32_t));
|
|
v->residues[0] = iram_malloc(vi->channels*ci->blocksizes[1]/2*sizeof(ogg_int32_t));
|
|
/* if we can get away with it, put a double buffer into IRAM too, so that
|
|
overlap-add runs iram-to-iram and we avoid needing to memcpy */
|
|
v->residues[1] = iram_malloc(vi->channels*ci->blocksizes[1]/2*sizeof(ogg_int32_t));
|
|
if (v->residues[1] == NULL)
|
|
v->saved = iram_malloc(vi->channels*ci->blocksizes[1]/4*sizeof(ogg_int32_t));
|
|
|
|
#endif
|
|
|
|
if (v->residues[0] == NULL) {
|
|
malloc_pointers[0] = _ogg_malloc(vi->channels*ci->blocksizes[1]/2*sizeof(ogg_int32_t));
|
|
v->residues[0] = malloc_pointers[0];
|
|
}
|
|
|
|
if (v->residues[1] == NULL && v->saved == NULL) {
|
|
malloc_pointers[1] = _ogg_malloc(vi->channels*ci->blocksizes[1]/2*sizeof(ogg_int32_t));
|
|
v->residues[1] = malloc_pointers[1];
|
|
}
|
|
|
|
if (v->floors == NULL) {
|
|
malloc_pointers[2] = _ogg_malloc(vi->channels*ci->blocksizes[1]/2*sizeof(ogg_int32_t));
|
|
v->floors = malloc_pointers[2];
|
|
}
|
|
|
|
/* needed for the first overlap/add */
|
|
if (v->saved) {
|
|
memset(v->saved, 0, vi->channels*ci->blocksizes[1]/4*sizeof(ogg_int32_t));
|
|
for (i = 0; i < vi->channels; i++)
|
|
v->saved_ptr[i] = v->saved + i*ci->blocksizes[1]/4;
|
|
} else {
|
|
memset(v->residues[1], 0, vi->channels*ci->blocksizes[1]/2*sizeof(ogg_int32_t));
|
|
for (i = 0; i < vi->channels; i++)
|
|
v->saved_ptr[i] = v->residues[1] + i*ci->blocksizes[1]/2;
|
|
}
|
|
|
|
/* Vorbis I uses only window type 0 */
|
|
b_size[0]=ci->blocksizes[0]/2;
|
|
b_size[1]=ci->blocksizes[1]/2;
|
|
b->window[0]=_vorbis_window(0,b_size[0]);
|
|
b->window[1]=_vorbis_window(0,b_size[1]);
|
|
|
|
#ifdef TREMOR_USE_IRAM
|
|
/* allocate IRAM buffer for window tables too, if sufficient iram available */
|
|
/* give preference to the larger window over the smaller window
|
|
(on the assumption that both windows are equally likely used) */
|
|
LOOKUP_TNC *iramposw;
|
|
for(i=1; i>=0; i--){
|
|
iramposw=iram_malloc(b_size[i]*sizeof(LOOKUP_TNC));
|
|
if(iramposw!=NULL) {
|
|
memcpy(iramposw, b->window[i], b_size[i]*sizeof(LOOKUP_TNC));
|
|
b->window[i]=iramposw;
|
|
}
|
|
}
|
|
#endif
|
|
|
|
/* finish the codebooks */
|
|
if(!ci->fullbooks){
|
|
ci->fullbooks=(codebook *)_ogg_calloc(ci->books,sizeof(*ci->fullbooks));
|
|
for(i=0;i<ci->books;i++){
|
|
if(ci->book_param[i]==NULL)
|
|
goto abort_books;
|
|
if(vorbis_book_init_decode(ci->fullbooks+i,ci->book_param[i]))
|
|
goto abort_books;
|
|
/* decode codebooks are now standalone after init */
|
|
vorbis_staticbook_destroy(ci->book_param[i]);
|
|
ci->book_param[i]=NULL;
|
|
}
|
|
}
|
|
|
|
v->pcm_storage=ci->blocksizes[1];
|
|
v->pcmret=_pcmret;
|
|
v->pcmb=_pcmbp;
|
|
|
|
_pcmbp[0]=NULL;
|
|
_pcmbp[1]=NULL;
|
|
|
|
/* all 1 (large block) or 0 (small block) */
|
|
/* explicitly set for the sake of clarity */
|
|
v->lW=0; /* previous window size */
|
|
v->W=0; /* current window size */
|
|
|
|
/* initialize all the mapping/backend lookups */
|
|
b->mode=(vorbis_look_mapping **)_ogg_calloc(ci->modes,sizeof(*b->mode));
|
|
for(i=0;i<ci->modes;i++){
|
|
int mapnum=ci->mode_param[i]->mapping;
|
|
int maptype=ci->map_type[mapnum];
|
|
b->mode[i]=_mapping_P[maptype]->look(v,ci->mode_param[i],
|
|
ci->map_param[mapnum]);
|
|
}
|
|
|
|
return(0);
|
|
abort_books:
|
|
for(i=0;i<ci->books;i++){
|
|
if(ci->book_param[i]!=NULL){
|
|
vorbis_staticbook_destroy(ci->book_param[i]);
|
|
ci->book_param[i]=NULL;
|
|
}
|
|
}
|
|
vorbis_dsp_clear(v);
|
|
return -1;
|
|
}
|
|
|
|
int vorbis_synthesis_restart(vorbis_dsp_state *v){
|
|
vorbis_info *vi=v->vi;
|
|
codec_setup_info *ci;
|
|
|
|
if(!v->backend_state)return -1;
|
|
if(!vi)return -1;
|
|
ci=vi->codec_setup;
|
|
if(!ci)return -1;
|
|
|
|
v->pcm_current=0;
|
|
|
|
v->pcm_returned=-1;
|
|
v->granulepos=-1;
|
|
v->sequence=-1;
|
|
((private_state *)(v->backend_state))->sample_count=-1;
|
|
|
|
return(0);
|
|
}
|
|
|
|
int vorbis_synthesis_init(vorbis_dsp_state *v,vorbis_info *vi){
|
|
if(_vds_init(v,vi))return 1;
|
|
vorbis_synthesis_restart(v);
|
|
|
|
return 0;
|
|
}
|
|
|
|
void vorbis_dsp_clear(vorbis_dsp_state *v){
|
|
int i;
|
|
if(v){
|
|
vorbis_info *vi=v->vi;
|
|
codec_setup_info *ci=(codec_setup_info *)(vi?vi->codec_setup:NULL);
|
|
private_state *b=(private_state *)v->backend_state;
|
|
|
|
if(vi != NULL)
|
|
{
|
|
/* pcm buffer came from oggmalloc rather than iram */
|
|
for(i=0;i<3;i++)
|
|
if(malloc_pointers[i]) {
|
|
_ogg_free(malloc_pointers[i]);
|
|
malloc_pointers[i] = NULL;
|
|
}
|
|
}
|
|
|
|
/* free mode lookups; these are actually vorbis_look_mapping structs */
|
|
if(ci){
|
|
for(i=0;i<ci->modes;i++){
|
|
int mapnum=ci->mode_param[i]->mapping;
|
|
int maptype=ci->map_type[mapnum];
|
|
if(b && b->mode)_mapping_P[maptype]->free_look(b->mode[i]);
|
|
}
|
|
}
|
|
|
|
if(b){
|
|
if(b->mode)_ogg_free(b->mode);
|
|
_ogg_free(b);
|
|
}
|
|
|
|
memset(v,0,sizeof(*v));
|
|
}
|
|
}
|
|
|
|
/* Unlike in analysis, the window is only partially applied for each
|
|
block. The time domain envelope is not yet handled at the point of
|
|
calling (as it relies on the previous block). */
|
|
|
|
int vorbis_synthesis_blockin(vorbis_dsp_state *v,vorbis_block *vb)
|
|
ICODE_ATTR;
|
|
int vorbis_synthesis_blockin(vorbis_dsp_state *v,vorbis_block *vb){
|
|
vorbis_info *vi=v->vi;
|
|
codec_setup_info *ci=(codec_setup_info *)vi->codec_setup;
|
|
private_state *b=v->backend_state;
|
|
|
|
if(v->pcm_current>v->pcm_returned && v->pcm_returned!=-1)return(OV_EINVAL);
|
|
|
|
v->lW=v->W;
|
|
v->W=vb->W;
|
|
v->nW=-1;
|
|
|
|
if((v->sequence==-1)||
|
|
(v->sequence+1 != vb->sequence)){
|
|
v->granulepos=-1; /* out of sequence; lose count */
|
|
b->sample_count=-1;
|
|
}
|
|
|
|
v->sequence=vb->sequence;
|
|
int n=ci->blocksizes[v->W]/2;
|
|
int ln=ci->blocksizes[v->lW]/2;
|
|
|
|
if(LIKELY(vb->pcmend != 0)){ /* no pcm to process if vorbis_synthesis_trackonly
|
|
was called on block */
|
|
window_overlap_add(ci->blocksizes[v->W], ci->blocksizes[v->lW],
|
|
ci->blocksizes[0], ci->blocksizes[1], vi->channels,
|
|
b->window[v->W & v->lW], v);
|
|
/* deal with initial packet state; we do this using the explicit
|
|
pcm_returned==-1 flag otherwise we're sensitive to first block
|
|
being short or long */
|
|
|
|
if(v->pcm_returned==-1){
|
|
v->pcm_returned=0;
|
|
v->pcm_current=0;
|
|
}else{
|
|
v->pcm_returned=0;
|
|
v->pcm_current=(n+ln)/2;
|
|
}
|
|
}
|
|
|
|
/* track the frame number... This is for convenience, but also
|
|
making sure our last packet doesn't end with added padding. If
|
|
the last packet is partial, the number of samples we'll have to
|
|
return will be past the vb->granulepos.
|
|
|
|
This is not foolproof! It will be confused if we begin
|
|
decoding at the last page after a seek or hole. In that case,
|
|
we don't have a starting point to judge where the last frame
|
|
is. For this reason, vorbisfile will always try to make sure
|
|
it reads the last two marked pages in proper sequence */
|
|
|
|
if(b->sample_count==-1){
|
|
b->sample_count=0;
|
|
}else{
|
|
b->sample_count+=(n+ln)/2;
|
|
}
|
|
|
|
if(v->granulepos==-1){
|
|
if(vb->granulepos!=-1){ /* only set if we have a position to set to */
|
|
|
|
v->granulepos=vb->granulepos;
|
|
|
|
/* is this a short page? */
|
|
if(b->sample_count>v->granulepos){
|
|
/* corner case; if this is both the first and last audio page,
|
|
then spec says the end is cut, not beginning */
|
|
if(vb->eofflag){
|
|
/* trim the end */
|
|
/* no preceeding granulepos; assume we started at zero (we'd
|
|
have to in a short single-page stream) */
|
|
/* granulepos could be -1 due to a seek, but that would result
|
|
in a long coun`t, not short count */
|
|
|
|
v->pcm_current-=(b->sample_count-v->granulepos);
|
|
}else{
|
|
/* trim the beginning */
|
|
v->pcm_returned+=(b->sample_count-v->granulepos);
|
|
if(v->pcm_returned>v->pcm_current)
|
|
v->pcm_returned=v->pcm_current;
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
}else{
|
|
v->granulepos+=(n+ln)/2;
|
|
if(vb->granulepos!=-1 && v->granulepos!=vb->granulepos){
|
|
|
|
if(v->granulepos>vb->granulepos){
|
|
long extra=v->granulepos-vb->granulepos;
|
|
|
|
if(extra)
|
|
if(vb->eofflag){
|
|
/* partial last frame. Strip the extra samples off */
|
|
v->pcm_current-=extra;
|
|
} /* else {Shouldn't happen *unless* the bitstream is out of
|
|
spec. Either way, believe the bitstream } */
|
|
} /* else {Shouldn't happen *unless* the bitstream is out of
|
|
spec. Either way, believe the bitstream } */
|
|
v->granulepos=vb->granulepos;
|
|
}
|
|
}
|
|
|
|
/* Update, cleanup */
|
|
|
|
if(vb->eofflag)v->eofflag=1;
|
|
return(0);
|
|
}
|
|
|
|
/* pcm==NULL indicates we just want the pending samples, no more */
|
|
int vorbis_synthesis_pcmout(vorbis_dsp_state *v,ogg_int32_t ***pcm) ICODE_ATTR;
|
|
int vorbis_synthesis_pcmout(vorbis_dsp_state *v,ogg_int32_t ***pcm){
|
|
vorbis_info *vi=v->vi;
|
|
if(v->pcm_returned>-1 && v->pcm_returned<v->pcm_current){
|
|
if(pcm){
|
|
int i;
|
|
for(i=0;i<vi->channels;i++)
|
|
v->pcmret[i]=v->pcmb[i]+v->pcm_returned;
|
|
*pcm=v->pcmret;
|
|
}
|
|
return(v->pcm_current-v->pcm_returned);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int vorbis_synthesis_read(vorbis_dsp_state *v,int bytes){
|
|
if(bytes && v->pcm_returned+bytes>v->pcm_current)return(OV_EINVAL);
|
|
v->pcm_returned+=bytes;
|
|
return(0);
|
|
}
|
|
|