michael@0: /******************************************************************** michael@0: * * michael@0: * THIS FILE IS PART OF THE OggTheora SOFTWARE CODEC SOURCE CODE. * michael@0: * USE, DISTRIBUTION AND REPRODUCTION OF THIS LIBRARY SOURCE IS * michael@0: * GOVERNED BY A BSD-STYLE SOURCE LICENSE INCLUDED WITH THIS SOURCE * michael@0: * IN 'COPYING'. PLEASE READ THESE TERMS BEFORE DISTRIBUTING. * michael@0: * * michael@0: * THE Theora SOURCE CODE IS COPYRIGHT (C) 2002-2009 * michael@0: * by the Xiph.Org Foundation and contributors http://www.xiph.org/ * michael@0: * * michael@0: ******************************************************************** michael@0: michael@0: function: michael@0: last mod: $Id: internal.c 17506 2010-10-13 02:52:41Z tterribe $ michael@0: michael@0: ********************************************************************/ michael@0: michael@0: #include michael@0: #include michael@0: #include michael@0: #include "internal.h" michael@0: michael@0: michael@0: michael@0: /*A map from the index in the zig zag scan to the coefficient number in a michael@0: block. michael@0: All zig zag indices beyond 63 are sent to coefficient 64, so that zero runs michael@0: past the end of a block in bogus streams get mapped to a known location.*/ michael@0: const unsigned char OC_FZIG_ZAG[128]={ michael@0: 0, 1, 8,16, 9, 2, 3,10, michael@0: 17,24,32,25,18,11, 4, 5, michael@0: 12,19,26,33,40,48,41,34, michael@0: 27,20,13, 6, 7,14,21,28, michael@0: 35,42,49,56,57,50,43,36, michael@0: 29,22,15,23,30,37,44,51, michael@0: 58,59,52,45,38,31,39,46, michael@0: 53,60,61,54,47,55,62,63, michael@0: 64,64,64,64,64,64,64,64, michael@0: 64,64,64,64,64,64,64,64, michael@0: 64,64,64,64,64,64,64,64, michael@0: 64,64,64,64,64,64,64,64, michael@0: 64,64,64,64,64,64,64,64, michael@0: 64,64,64,64,64,64,64,64, michael@0: 64,64,64,64,64,64,64,64, michael@0: 64,64,64,64,64,64,64,64 michael@0: }; michael@0: michael@0: /*A map from the coefficient number in a block to its index in the zig zag michael@0: scan.*/ michael@0: const unsigned char OC_IZIG_ZAG[64]={ michael@0: 0, 1, 5, 6,14,15,27,28, michael@0: 2, 4, 7,13,16,26,29,42, michael@0: 3, 8,12,17,25,30,41,43, michael@0: 9,11,18,24,31,40,44,53, michael@0: 10,19,23,32,39,45,52,54, michael@0: 20,22,33,38,46,51,55,60, michael@0: 21,34,37,47,50,56,59,61, michael@0: 35,36,48,49,57,58,62,63 michael@0: }; michael@0: michael@0: /*A map from physical macro block ordering to bitstream macro block michael@0: ordering within a super block.*/ michael@0: const unsigned char OC_MB_MAP[2][2]={{0,3},{1,2}}; michael@0: michael@0: /*A list of the indices in the oc_mb.map array that can be valid for each of michael@0: the various chroma decimation types.*/ michael@0: const unsigned char OC_MB_MAP_IDXS[TH_PF_NFORMATS][12]={ michael@0: {0,1,2,3,4,8}, michael@0: {0,1,2,3,4,5,8,9}, michael@0: {0,1,2,3,4,6,8,10}, michael@0: {0,1,2,3,4,5,6,7,8,9,10,11} michael@0: }; michael@0: michael@0: /*The number of indices in the oc_mb.map array that can be valid for each of michael@0: the various chroma decimation types.*/ michael@0: const unsigned char OC_MB_MAP_NIDXS[TH_PF_NFORMATS]={6,8,8,12}; michael@0: michael@0: /*The number of extra bits that are coded with each of the DCT tokens. michael@0: Each DCT token has some fixed number of additional bits (possibly 0) stored michael@0: after the token itself, containing, for example, coefficient magnitude, michael@0: sign bits, etc.*/ michael@0: const unsigned char OC_DCT_TOKEN_EXTRA_BITS[TH_NDCT_TOKENS]={ michael@0: 0,0,0,2,3,4,12,3,6, michael@0: 0,0,0,0, michael@0: 1,1,1,1,2,3,4,5,6,10, michael@0: 1,1,1,1,1,3,4, michael@0: 2,3 michael@0: }; michael@0: michael@0: michael@0: michael@0: int oc_ilog(unsigned _v){ michael@0: int ret; michael@0: for(ret=0;_v;ret++)_v>>=1; michael@0: return ret; michael@0: } michael@0: michael@0: michael@0: michael@0: void *oc_aligned_malloc(size_t _sz,size_t _align){ michael@0: unsigned char *p; michael@0: if(_align-1>UCHAR_MAX||(_align&_align-1)||_sz>~(size_t)0-_align)return NULL; michael@0: p=(unsigned char *)_ogg_malloc(_sz+_align); michael@0: if(p!=NULL){ michael@0: int offs; michael@0: offs=((p-(unsigned char *)0)-1&_align-1); michael@0: p[offs]=offs; michael@0: p+=offs+1; michael@0: } michael@0: return p; michael@0: } michael@0: michael@0: void oc_aligned_free(void *_ptr){ michael@0: unsigned char *p; michael@0: p=(unsigned char *)_ptr; michael@0: if(p!=NULL){ michael@0: int offs; michael@0: offs=*--p; michael@0: _ogg_free(p-offs); michael@0: } michael@0: } michael@0: michael@0: michael@0: void **oc_malloc_2d(size_t _height,size_t _width,size_t _sz){ michael@0: size_t rowsz; michael@0: size_t colsz; michael@0: size_t datsz; michael@0: char *ret; michael@0: colsz=_height*sizeof(void *); michael@0: rowsz=_sz*_width; michael@0: datsz=rowsz*_height; michael@0: /*Alloc array and row pointers.*/ michael@0: ret=(char *)_ogg_malloc(datsz+colsz); michael@0: if(ret==NULL)return NULL; michael@0: /*Initialize the array.*/ michael@0: if(ret!=NULL){ michael@0: size_t i; michael@0: void **p; michael@0: char *datptr; michael@0: p=(void **)ret; michael@0: i=_height; michael@0: for(datptr=ret+colsz;i-->0;p++,datptr+=rowsz)*p=(void *)datptr; michael@0: } michael@0: return (void **)ret; michael@0: } michael@0: michael@0: void **oc_calloc_2d(size_t _height,size_t _width,size_t _sz){ michael@0: size_t colsz; michael@0: size_t rowsz; michael@0: size_t datsz; michael@0: char *ret; michael@0: colsz=_height*sizeof(void *); michael@0: rowsz=_sz*_width; michael@0: datsz=rowsz*_height; michael@0: /*Alloc array and row pointers.*/ michael@0: ret=(char *)_ogg_calloc(datsz+colsz,1); michael@0: if(ret==NULL)return NULL; michael@0: /*Initialize the array.*/ michael@0: if(ret!=NULL){ michael@0: size_t i; michael@0: void **p; michael@0: char *datptr; michael@0: p=(void **)ret; michael@0: i=_height; michael@0: for(datptr=ret+colsz;i-->0;p++,datptr+=rowsz)*p=(void *)datptr; michael@0: } michael@0: return (void **)ret; michael@0: } michael@0: michael@0: void oc_free_2d(void *_ptr){ michael@0: _ogg_free(_ptr); michael@0: } michael@0: michael@0: /*Fills in a Y'CbCr buffer with a pointer to the image data in the first michael@0: buffer, but with the opposite vertical orientation. michael@0: _dst: The destination buffer. michael@0: This can be the same as _src. michael@0: _src: The source buffer.*/ michael@0: void oc_ycbcr_buffer_flip(th_ycbcr_buffer _dst, michael@0: const th_ycbcr_buffer _src){ michael@0: int pli; michael@0: for(pli=0;pli<3;pli++){ michael@0: _dst[pli].width=_src[pli].width; michael@0: _dst[pli].height=_src[pli].height; michael@0: _dst[pli].stride=-_src[pli].stride; michael@0: _dst[pli].data=_src[pli].data michael@0: +(1-_dst[pli].height)*(ptrdiff_t)_dst[pli].stride; michael@0: } michael@0: } michael@0: michael@0: const char *th_version_string(void){ michael@0: return OC_VENDOR_STRING; michael@0: } michael@0: michael@0: ogg_uint32_t th_version_number(void){ michael@0: return (TH_VERSION_MAJOR<<16)+(TH_VERSION_MINOR<<8)+TH_VERSION_SUB; michael@0: } michael@0: michael@0: /*Determines the packet type. michael@0: Note that this correctly interprets a 0-byte packet as a video data packet. michael@0: Return: 1 for a header packet, 0 for a data packet.*/ michael@0: int th_packet_isheader(ogg_packet *_op){ michael@0: return _op->bytes>0?_op->packet[0]>>7:0; michael@0: } michael@0: michael@0: /*Determines the frame type of a video data packet. michael@0: Note that this correctly interprets a 0-byte packet as a delta frame. michael@0: Return: 1 for a key frame, 0 for a delta frame, and -1 for a header michael@0: packet.*/ michael@0: int th_packet_iskeyframe(ogg_packet *_op){ michael@0: return _op->bytes<=0?0:_op->packet[0]&0x80?-1:!(_op->packet[0]&0x40); michael@0: }