You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdemultimedia/mpg123_artsplugin/dxhead.c

251 lines
3.5 KiB

/*---- DXhead.c --------------------------------------------
decoder MPEG Layer III
handle Xing header
mod 12/7/98 add vbr scale
Copyright 1998 Xing Technology Corp.
-----------------------------------------------------------*/
#include <stdlib.h>
#include <unistd.h>
#include <float.h>
#include <math.h>
#include "mpg123/mpg123.h"
#include "dxhead.h"
/* 4 Xing
* 4 flags
* 4 frames
* 4 bytes
* 100 toc
*/
/*-------------------------------------------------------------*/
static int ExtractI4(unsigned char *buf)
{
int x;
/* big endian extract */
x = buf[0];
x <<= 8;
x |= buf[1];
x <<= 8;
x |= buf[2];
x <<= 8;
x |= buf[3];
return x;
}
/*-------------------------------------------------------------*/
int mpg123_get_xing_header(XHEADDATA * X, unsigned char *buf)
{
int i, head_flags;
int h_id, h_mode, h_sr_index;
static int sr_table[4] =
{44100, 48000, 32000, 99999};
/* get Xing header data */
X->flags = 0; /* clear to null incase fail */
X->toc = NULL;
/* get selected MPEG header data */
h_id = (buf[1] >> 3) & 1;
h_sr_index = (buf[2] >> 2) & 3;
h_mode = (buf[3] >> 6) & 3;
/* determine offset of header */
if (h_id)
{ /* mpeg1 */
if (h_mode != 3) {
buf += (32 + 4);
}
else
buf += (17 + 4);
}
else
{ /* mpeg2 */
if (h_mode != 3)
buf += (17 + 4);
else
buf += (9 + 4);
}
if (buf[0] != 'X')
return 0; /* fail */
if (buf[1] != 'i')
return 0; /* header not found */
if (buf[2] != 'n')
return 0;
if (buf[3] != 'g')
return 0;
buf += 4;
X->h_id = h_id;
X->samprate = sr_table[h_sr_index];
if (h_id == 0)
X->samprate >>= 1;
head_flags = X->flags = ExtractI4(buf);
buf += 4; /* get flags */
if (head_flags & FRAMES_FLAG)
{
X->frames = ExtractI4(buf);
buf += 4;
}
if (head_flags & BYTES_FLAG)
{
X->bytes = ExtractI4(buf);
buf += 4;
}
if (head_flags & TOC_FLAG)
{
X->toc = malloc(100);
if (X->toc != NULL)
{
for (i = 0; i < 100; i++)
X->toc[i] = buf[i];
}
buf += 100;
}
X->vbr_scale = -1;
if (head_flags & VBR_SCALE_FLAG)
{
X->vbr_scale = ExtractI4(buf);
buf += 4;
}
/*if( X->toc != NULL ) {
*for(i=0;i<100;i++) {
* if( (i%10) == 0 ) printf("\n");
* printf(" %3d", (int)(X->toc[i]));
*}
*}
*/
return 1; /* success */
}
/*-------------------------------------------------------------*/
int mpg123_seek_point(unsigned char TOC[100], int file_bytes, float percent)
{
/* interpolate in TOC to get file seek point in bytes */
int a, seekpoint;
float fa, fb, fx;
if (percent < 0.0f)
percent = 0.0f;
if (percent > 100.0f)
percent = 100.0f;
a = (int) percent;
if (a > 99)
a = 99;
fa = TOC[a];
if (a < 99)
{
fb = TOC[a + 1];
}
else
{
fb = 256.0f;
}
fx = fa + (fb - fa) * (percent - a);
seekpoint = (int) ((1.0f / 256.0f) * fx * file_bytes);
return seekpoint;
}
/*-------------------------------------------------------------*/
int mpg123_stream_check_for_xing_header(struct frame *fr, XHEADDATA * xhead)
{
unsigned char *head_data;
int ret;
lseek(rd->filept, -(fr->framesize + 4), SEEK_CUR);
head_data = malloc(fr->framesize + 4);
read(rd->filept,head_data, fr->framesize +4); /* now read the rest */
ret = mpg123_get_xing_header(xhead, head_data);
free(head_data);
return ret;
}