// rdwavefile.cpp
//
// A class for handling audio files.
//
// (C) Copyright 2002-2015 Fred Gleason <fredg@paravelsystems.com>
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU Library General Public License
// version 2 as published by the Free Software Foundation.
//
// This program 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., 675 Mass Ave, Cambridge, MA 02139, USA.
//
//
#include <stdlib.h>
#include <stdio.h>
#include <stdint.h>
#include <string.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <syslog.h>
#include <math.h>
#include <fcntl.h>
#include <arpa/inet.h>
#include <unistd.h>
#include <errno.h>
#include <assert.h>
#include <arpa/inet.h>
#include <id3/tag.h>
#include <id3/misc_support.h>
#ifdef HAVE_FLAC
#include <FLAC/metadata.h>
#endif // HAVE_FLAC
#include <qobject.h>
#include <qstring.h>
#include <qdatetime.h>
//Added by qt3to4:
#include <Q3CString>
#include <rd.h>
#include <rdcart.h>
#include <rdwavefile.h>
#include <rdconf.h>
#include <rdmp4.h>
#ifdef HAVE_MP4_LIBS
#include <mp4v2/mp4v2.h>
#endif
RDWaveFile::RDWaveFile(QString file_name)
{
//
// Initialize Class Structures
//
wave_file.setName(file_name);
wave_data=NULL;
recordable=false;
format_chunk=false;
comm_chunk=false;
format_tag=0;
channels=0;
normalize_level=1.0;
samples_per_sec=0;
avg_bytes_per_sec=0;
block_align=0;
bits_per_sample=0;
cb_size=0;
head_layer=0;
head_bit_rate=0;
head_mode=0;
head_mode_ext=0;
head_emphasis=1;
head_flags=0;
pts=0;
mpeg_id=RDWaveFile::NonMpeg;
mpeg_frame_size=0;
id3v1_tag=false;
id3v2_tag[0]=false;
id3v2_tag[1]=false;
id3v2_offset[0]=0;
id3v2_offset[1]=0;
has_energy=false;
energy_loaded=false;
energy_ptr=0;
for(int i=0;i<FMT_CHUNK_SIZE;i++) {
fmt_chunk_data[i]=0;
}
fmt_size=0;
fact_chunk=false;
sample_length=0;
for(int i=0;i<FACT_CHUNK_SIZE;i++) {
fact_chunk_data[i]=0;
}
data_chunk=false;
data_length=0;
cart_chunk=false;
cart_version=0;
cart_title="";
cart_title="";
cart_artist="";
cart_cut_id="";
cart_client_id="";
cart_category="";
cart_classification="";
cart_out_cue="";
cart_start_date=QDate::currentDate();
cart_start_time=QTime::currentTime();
cart_end_date=QDate(CART_DEFAULT_END_YEAR,
CART_DEFAULT_END_MONTH,
CART_DEFAULT_END_DAY);
cart_end_time=QTime(CART_DEFAULT_END_HOUR,
CART_DEFAULT_END_MINUTE,
CART_DEFAULT_END_SECOND);
cart_producer_app_id="";
cart_producer_app_ver="";
cart_user_def="";
cart_url="";
cart_tag_text="";
cart_level_ref=CART_DEFAULT_LEVEL_REF;
for(int i=0;i<MAX_TIMERS;i++) {
cart_timer_label[i]=QString("");
cart_timer_sample[i]=0;
}
for(int i=0;i<CART_CHUNK_SIZE;i++) {
cart_chunk_data[i]=0;
}
bext_chunk=false;
bext_description="";
bext_originator="";
bext_originator_ref="";
bext_origination_date=QDate::currentDate();
bext_origination_time=QTime::currentTime();
bext_time_reference_low=0;
bext_time_reference_high=0;
bext_version=0;
for(int i=0;i<64;i++) {
bext_umid[i]=0;
}
bext_coding_history="";
for(int i=0;i<BEXT_CHUNK_SIZE;i++) {
bext_chunk_data[i]=0;
}
bext_coding_data=NULL;
bext_coding_size=0;
mext_chunk=false;
mext_homogenous=true;
mext_padding_used=false;
mext_rate_hacked=false;
mext_free_format=false;
mext_frame_size=0;
mext_anc_length=0;
mext_left_energy=false;
mext_ancillary_private=false;
mext_right_energy=false;
for(int i=0;i<MEXT_CHUNK_SIZE;i++) {
mext_chunk_data[i]=0;
}
levl_chunk=false;
levl_format=DEFAULT_LEVL_FORMAT;
levl_points=DEFAULT_LEVL_POINTS;
levl_block_size=DEFAULT_LEVL_BLOCK_SIZE;
cook_buffer=NULL;
cook_buffer_size=0;
wave_type=RDWaveFile::Unknown;
encode_quality=5.0f;
serial_number=-1;
atx_offset=0;
scot_chunk=false;
av10_chunk=false;
rdxl_chunk=false;
ptr_offset_msecs=0;
}
RDWaveFile::~RDWaveFile()
{
if(bext_coding_data!=NULL) {
free(bext_coding_data);
}
if(cook_buffer!=NULL) {
free(cook_buffer);
}
}
RDWaveFile::Type RDWaveFile::type() const
{
return wave_type;
}
void RDWaveFile::nameWave(QString file_name)
{
if(wave_file.isOpen()) {
return;
}
wave_file.setName(file_name);
}
bool RDWaveFile::openWave(RDWaveData *data)
{
#ifdef HAVE_VORBIS
vorbis_info *vorbis_info;
#endif // HAVE_VORBIS
unsigned char tmc_buffer[4];
wave_data=data;
if(!wave_file.open(QIODevice::ReadOnly)) {
return false;
}
switch(GetType(wave_file.handle())) {
case RDWaveFile::Wave:
if(GetFmt(wave_file.handle())) {
wave_type=RDWaveFile::Wave;
}
else {
wave_type=RDWaveFile::Ambos;
format_tag=WAVE_FORMAT_MPEG;
}
if(!GetChunk(wave_file.handle(),"data",&data_length,NULL,0)) { // Set fileptr to start of data block
return false;
}
data_chunk=true;
data_start=lseek(wave_file.handle(),0,SEEK_CUR);
if((!GetFact(wave_file.handle()))||(sample_length==0)) {
if((format_tag!=WAVE_FORMAT_PCM)&&
(format_tag!=WAVE_FORMAT_IEEE_FLOAT)&&format_chunk) {
#ifdef MPEG_FACT_FUDGE
// Guesstimate the overall sample size
sample_length=1152.0*((double)data_length/(144.0*(double)head_bit_rate/
(double)samples_per_sec));
ext_time_length=1000.0*(double)sample_length/(double)samples_per_sec;
time_length=ext_time_length/1000;
#else
time_length=0;
sample_length=0;
ext_time_length=0;
#endif
}
else {
if(format_chunk) {
ext_time_length=(unsigned)(1000.0*(double)data_length/
(double)(block_align*samples_per_sec));
time_length=ext_time_length/1000;
sample_length=data_length/block_align;
}
else {
if(!GetMpegHeader(wave_file.handle(),data_start)) {
wave_file.close();
return false;
}
data_length=wave_file.size()-data_start;
sample_length=1152*(data_length/mpeg_frame_size);
ext_time_length=(unsigned)(1000.0*(double)sample_length/
(double)samples_per_sec);
time_length=ext_time_length/1000;
lseek(wave_file.handle(),data_start,SEEK_SET);
format_chunk=true;
}
}
}
else {
if(format_chunk) {
time_length=sample_length/samples_per_sec;
ext_time_length=(unsigned)(1000.0*(double)sample_length/
(double)samples_per_sec);
}
else {
time_length=0;
ext_time_length=0;
}
}
GetCart(wave_file.handle());
GetBext(wave_file.handle());
GetMext(wave_file.handle());
GetList(wave_file.handle());
GetScot(wave_file.handle());
GetAv10(wave_file.handle());
GetAir1(wave_file.handle());
GetRdxl(wave_file.handle());
break;
case RDWaveFile::Aiff:
if(GetComm(wave_file.handle())) {
wave_type=RDWaveFile::Aiff;
}
if(!GetChunk(wave_file.handle(),"SSND",&data_length,NULL,0,true)) {
return false;
}
data_length-=8; // SSND chunk has eight data bytes at the beginning!
data_chunk=true;
data_start=lseek(wave_file.handle(),8,SEEK_CUR);
ext_time_length=(unsigned)(1000.0*(double)sample_length/
(double)samples_per_sec);
time_length=ext_time_length/1000;
break;
case RDWaveFile::Mpeg:
format_tag=WAVE_FORMAT_MPEG;
if(!GetMpegHeader(wave_file.handle(),id3v2_offset[0])) {
wave_file.close();
return false;
}
data_length=wave_file.size();
if(id3v1_tag) {
data_length-=128;
}
if(id3v2_tag[1]) {
data_length-=id3v2_offset[1];
}
data_start=id3v2_offset[0];
sample_length=1152*(data_length/mpeg_frame_size);
ext_time_length=
(unsigned)(1000.0*(double)sample_length/(double)samples_per_sec);
time_length=ext_time_length/1000;
data_chunk=true;
lseek(wave_file.handle(),data_start,SEEK_SET);
format_chunk=true;
wave_type=RDWaveFile::Mpeg;
ReadId3Metadata();
break;
case RDWaveFile::M4A:
{
#ifdef HAVE_MP4_LIBS
// MP4 libs must already be loaded by now for file to have that type.
assert(dlmp4.load());
format_tag=WAVE_FORMAT_M4A;
MP4FileHandle f = dlmp4.MP4Read(getName());
if(f == MP4_INVALID_FILE_HANDLE)
return false;
// Find an audio track, and populate sample rate, bits/sample etc.
MP4TrackId audioTrack = dlmp4.getMP4AACTrack(f);
if(audioTrack == MP4_INVALID_TRACK_ID) {
dlmp4.MP4Close(f, 0);
return false;
}
// Found audio track. Get audio data:
avg_bytes_per_sec = dlmp4.MP4GetTrackBitRate(f, audioTrack);
channels = dlmp4.MP4GetTrackAudioChannels(f, audioTrack);
MP4Duration trackDuration = dlmp4.MP4GetTrackDuration(f, audioTrack);
ext_time_length = (unsigned)dlmp4.MP4ConvertFromTrackDuration(f, audioTrack, trackDuration,
MP4_MSECS_TIME_SCALE);
time_length = ext_time_length / 1000;
samples_per_sec = dlmp4.MP4GetTrackTimeScale(f, audioTrack);
bits_per_sample = 16;
data_start = 0;
sample_length = dlmp4.MP4GetTrackNumberOfSamples(f, audioTrack);
data_length = sample_length * 2 * channels;
data_chunk = true;
format_chunk = true;
wave_type = RDWaveFile::M4A;
// Now extract metadata (title, artist, etc)
if(wave_data) {
const MP4Tags* tags = dlmp4.MP4TagsAlloc();
dlmp4.MP4TagsFetch(tags, f);
wave_data->setMetadataFound(true);
if(tags->name)
wave_data->setTitle(tags->name);
if(tags->artist)
wave_data->setArtist(tags->artist);
if(tags->composer)
wave_data->setComposer(tags->composer);
if(tags->album)
wave_data->setAlbum(tags->album);
dlmp4.MP4TagsFree(tags);
}
dlmp4.MP4Close(f, 0);
return true;
#else
return false;
#endif
break;
}
case RDWaveFile::Ogg:
#ifdef HAVE_VORBIS
format_tag=WAVE_FORMAT_VORBIS;
avg_bytes_per_sec=ov_bitrate(&vorbis_file,-1)/8;
vorbis_info=ov_info(&vorbis_file,-1);
channels=vorbis_info->channels;
block_align=2*channels;
samples_per_sec=vorbis_info->rate;
avg_bytes_per_sec=block_align*samples_per_sec;
bits_per_sample=16;
data_start=0;
sample_length=ov_pcm_total(&vorbis_file,-1);
data_length=sample_length*2*channels;
ext_time_length=(unsigned)(ov_time_total(&vorbis_file,-1)*1000.0);
time_length=(unsigned)ov_time_total(&vorbis_file,-1);
data_chunk=true;
format_chunk=true;
wave_type=RDWaveFile::Ogg;
ReadNormalizeLevel(wave_file.name());
ValidateMetadata();
return true;
#else
return false;
#endif // HAVE_VORBIS
break;
case RDWaveFile::Atx:
format_tag=WAVE_FORMAT_MPEG;
atx_offset=GetAtxOffset(wave_file.handle());
if(!GetMpegHeader(wave_file.handle(),atx_offset)) {
wave_file.close();
return false;
}
data_length=wave_file.size()-atx_offset;
data_start=atx_offset;
sample_length=1152*(data_length/mpeg_frame_size);
ext_time_length=
(unsigned)(1000.0*(double)sample_length/(double)samples_per_sec);
time_length=ext_time_length/1000;
data_chunk=true;
lseek(wave_file.handle(),data_start,SEEK_SET);
format_chunk=true;
wave_type=RDWaveFile::Atx;
break;
case RDWaveFile::Tmc:
format_tag=WAVE_FORMAT_MPEG;
atx_offset=4;
if(!GetMpegHeader(wave_file.handle(),atx_offset)) {
wave_file.close();
return false;
}
lseek(wave_file.handle(),0,SEEK_SET);
read(wave_file.handle(),tmc_buffer,4);
data_length=(0xFF&tmc_buffer[0])+(0xFF&tmc_buffer[1])*256+
(0xFF&tmc_buffer[2])*65536+(0xFF&tmc_buffer[3])*16777216;
data_start=atx_offset;
sample_length=1152*(data_length/mpeg_frame_size);
ext_time_length=
(unsigned)(1000.0*(double)sample_length/(double)samples_per_sec);
time_length=ext_time_length/1000;
data_chunk=true;
lseek(wave_file.handle(),data_start,SEEK_SET);
format_chunk=true;
wave_type=RDWaveFile::Tmc;
ReadTmcMetadata(wave_file.handle());
break;
#ifdef HAVE_FLAC
case RDWaveFile::Flac:
format_tag=WAVE_FORMAT_FLAC;
if(!GetFlacStreamInfo()) {
wave_file.close();
return false;
}
wave_type=RDWaveFile::Flac;
format_chunk=true;
if(wave_data!=NULL) {
ReadId3Metadata();
ReadFlacMetadata();
}
break;
#endif // HAVE_FLAC
default:
close(wave_file.handle());
return false;
break;
}
lseek(wave_file.handle(),data_start,SEEK_SET);
ValidateMetadata();
// lseek(wave_file.handle(),SEEK_SET,0x845);
// printf("PTR: 0x%04X\n",lseek(wave_file.handle(),SEEK_CUR,0));
return true;
}
bool RDWaveFile::createWave(RDWaveData *data,unsigned ptr_offset)
{
mode_t prev_mask;
bool rc;
wave_data=data;
ptr_offset_msecs=ptr_offset;
if(wave_data!=NULL) {
cart_title=wave_data->title();
cart_artist=wave_data->artist();
cart_cut_id=wave_data->cutId();
cart_client_id=wave_data->client();
cart_category=wave_data->category();
cart_classification=wave_data->classification();
cart_out_cue=wave_data->outCue();
cart_start_date=wave_data->startDate();
cart_start_time=wave_data->startTime();
cart_end_date=wave_data->endDate();
cart_end_time=wave_data->endTime();
cart_user_def=wave_data->userDefined();
cart_url=wave_data->url();
cart_tag_text=wave_data->tagText();
bext_description=wave_data->description();
bext_originator=wave_data->originator();
bext_originator_ref=wave_data->originatorReference();
bext_coding_history=wave_data->codingHistory();
}
switch(format_tag) {
case WAVE_FORMAT_PCM:
case WAVE_FORMAT_MPEG:
levl_block_ptr=0;
levl_istate=0;
levl_accum=0;
energy_data.clear();
for(int i=0;i<channels;i++) {
energy_data.push_back(0);
}
if(!MakeFmt()) {
return false;
}
prev_mask = umask(0113); // Set umask so files are user and group writable.
rc=wave_file.open(QIODevice::ReadWrite|QIODevice::Truncate);
unlink((wave_file.name()+".energy").ascii());
umask(prev_mask);
if(rc==false) {
return false;
}
recordable=true;
write(wave_file.handle(),"RIFF\0\0\0\0WAVE",12);
WriteChunk(wave_file.handle(),"fmt ",fmt_chunk_data,fmt_size);
if(format_tag==WAVE_FORMAT_MPEG) {
write(wave_file.handle(),"fact\4\0\0\0\0\0\0\0",12);
}
if(cart_chunk) {
MakeCart(ptr_offset);
WriteChunk(wave_file.handle(),"cart",cart_chunk_data,
CART_CHUNK_SIZE);
}
if(bext_chunk) {
MakeBext();
WriteChunk(wave_file.handle(),"bext",bext_coding_data,
bext_coding_size);
}
if(mext_chunk) {
MakeMext();
WriteChunk(wave_file.handle(),"mext",mext_chunk_data,
MEXT_CHUNK_SIZE);
}
if(!rdxl_contents.isEmpty()) {
WriteChunk(wave_file.handle(),"rdxl",rdxl_contents);
}
wave_type=RDWaveFile::Wave;
write(wave_file.handle(),"data\0\0\0\0",8);
data_start=lseek(wave_file.handle(),0,SEEK_CUR);
break;
case WAVE_FORMAT_VORBIS:
#ifdef HAVE_VORBIS
avg_bytes_per_sec=2*channels*samples_per_sec;
vorbis_info_init(&vorbis_inf);
if(vorbis_encode_init_vbr(&vorbis_inf,channels,samples_per_sec,
encode_quality)<0) {
vorbis_info_clear(&vorbis_inf);
return false;
}
vorbis_encode_ctl(&vorbis_inf,OV_ECTL_RATEMANAGE_SET,NULL);
prev_mask = umask(0113); // Set umask so files are user and group writable.
rc=wave_file.open(QIODevice::ReadWrite|QIODevice::Truncate);
umask(prev_mask);
if(rc==false) {
vorbis_info_clear(&vorbis_inf);
return false;
}
wave_type=RDWaveFile::Ogg;
recordable=true;
vorbis_encode_setup_init(&vorbis_inf);
vorbis_analysis_init(&vorbis_dsp,&vorbis_inf);
vorbis_block_init(&vorbis_dsp,&vorbis_blk);
if(serial_number<0) { // Generate random serial number
srand(time(NULL));
serial_number=abs(rand());
}
ogg_stream_init(&ogg_stream,serial_number);
{
ogg_packet header_main;
ogg_packet header_comments;
ogg_packet header_codebooks;
vorbis_comment vorbis_comm;
vorbis_comment_init(&vorbis_comm);
vorbis_analysis_headerout(&vorbis_dsp,&vorbis_comm,&header_main,
&header_comments,&header_codebooks);
ogg_stream_packetin(&ogg_stream,&header_main);
ogg_stream_packetin(&ogg_stream,&header_comments);
ogg_stream_packetin(&ogg_stream,&header_codebooks);
while(ogg_stream_flush(&ogg_stream,&ogg_pg)) {
WriteOggPage(&ogg_pg);
}
}
return true;
#endif // HAVE_VORBIS
return false;
break;
}
levl_timestamp=QDateTime(QDate::currentDate(),QTime::currentTime());
data_length=0;
return true;
}
void RDWaveFile::closeWave(int samples)
{
unsigned char size_buf[4];
unsigned csize;
unsigned lsize=0;
unsigned cptr;
if(recordable) {
switch(wave_type) {
case RDWaveFile::Wave:
//
// Write levl chunk
//
if(levl_chunk&&((format_tag==WAVE_FORMAT_PCM)||
((format_tag==WAVE_FORMAT_MPEG)&&(head_layer==2)))) {
levl_version=0;
levl_format=2;
levl_points=1;
levl_block_size=1152;
levl_channels=channels;
levl_frames=energy_data.size()/channels;
levl_peak_offset=0xFFFFFFFF;
levl_peak_value=0;
MakeLevl();
lseek(wave_file.handle(),0,SEEK_END);
write(wave_file.handle(),"levl",4);
lsize=LEVL_CHUNK_SIZE+energy_data.size()*2-8;
size_buf[0]=lsize&0xff;
size_buf[1]=(lsize>>8)&0xff;
size_buf[2]=(lsize>>16)&0xff;
size_buf[3]=(lsize>>24)&0xff;
write(wave_file.handle(),size_buf,4);
write(wave_file.handle(),levl_chunk_data,LEVL_CHUNK_SIZE-8);
// Fixup the endianness
unsigned char * sbuf = new unsigned char [2 * energy_data.size()];
for (unsigned int i=0; i < energy_data.size(); i++){
WriteSword (sbuf,2*i,(unsigned short) energy_data[i]);
}
write(wave_file.handle(),sbuf,2*energy_data.size());
delete [] sbuf;
ftruncate(wave_file.handle(),lseek(wave_file.handle(),0,SEEK_CUR));
}
//
// Update file size
//
cptr=lseek(wave_file.handle(),0,SEEK_END)-8;
size_buf[0]=cptr&0xff;
size_buf[1]=(cptr>>8)&0xff;
size_buf[2]=(cptr>>16)&0xff;
size_buf[3]=(cptr>>24)&0xff;
lseek(wave_file.handle(),4,SEEK_SET);
write(wave_file.handle(),size_buf,4);
//
// Update data chunk size
//
size_buf[0]=data_length&0xff;
size_buf[1]=(data_length>>8)&0xff;
size_buf[2]=(data_length>>16)&0xff;
size_buf[3]=(data_length>>24)&0xff;
lseek(wave_file.handle(),
FindChunk(wave_file.handle(),"data",&csize)-4,SEEK_SET);
write(wave_file.handle(),size_buf,4);
//
// Update fact chunk
//
if(FindChunk(wave_file.handle(),"fact",&csize)>0) {
if(samples<0) {
if(format_tag==WAVE_FORMAT_PCM) {
samples=data_length/block_align;
}
if(format_tag==WAVE_FORMAT_MPEG) {
samples=(unsigned)(1152.0*((double)data_length/
(144.0*(double)head_bit_rate/
(double)samples_per_sec)));
}
}
size_buf[0]=samples&0xff;
size_buf[1]=(samples>>8)&0xff;
size_buf[2]=(samples>>16)&0xff;
size_buf[3]=(samples>>24)&0xff;
WriteChunk(wave_file.handle(),"fact",size_buf,4);
}
//
// Update Cart Chunk
//
if(cart_chunk) {
MakeCart(ptr_offset_msecs);
WriteChunk(wave_file.handle(),"cart",cart_chunk_data,CART_CHUNK_SIZE);
}
//
// Update Bext Chunk
//
if(bext_chunk) {
MakeBext();
WriteChunk(wave_file.handle(),"bext",bext_coding_data,bext_coding_size);
}
//
// Update Mext Chunk
//
if(mext_chunk) {
MakeMext();
WriteChunk(wave_file.handle(),"mext",mext_chunk_data,MEXT_CHUNK_SIZE);
}
//
// Truncate
//
if(!levl_chunk) {
ftruncate(wave_file.handle(),FindChunk(wave_file.handle(),
"data",&csize)+data_length);
}
else {
if((format_tag==WAVE_FORMAT_MPEG)&&(head_layer!=2)) {
ftruncate(wave_file.handle(),
FindChunk(wave_file.handle(),
"data",&csize)+data_length);
}
}
break;
case RDWaveFile::Ogg:
#ifdef HAVE_VORBIS
WriteOggBuffer(NULL,0);
ogg_stream_clear(&ogg_stream);
vorbis_block_clear(&vorbis_blk);
vorbis_dsp_clear(&vorbis_dsp);
vorbis_info_clear(&vorbis_inf);
wave_file.close();
#endif // HAVE_VORBIS
break;
default:
break;
}
}
if(wave_type==RDWaveFile::Ogg) {
#ifdef HAVE_VORBIS
if(!recordable) {
ov_clear(&vorbis_file);
}
#endif // HAVE_VORBIS
}
wave_file.close();
recordable=false;
time_length=0;
format_chunk=false;
format_tag=0;
channels=0;
normalize_level=1.0;
samples_per_sec=0;
avg_bytes_per_sec=0;
block_align=0;
bits_per_sample=0;
cb_size=0;
head_layer=0;
head_bit_rate=0;
head_mode=0;
head_mode_ext=0;
head_emphasis=1;
head_flags=0;
pts=0;
mpeg_id=RDWaveFile::NonMpeg;
mpeg_frame_size=0;
id3v1_tag=false;
id3v2_tag[0]=false;
id3v2_tag[1]=false;
id3v2_offset[0]=0;
id3v2_offset[1]=0;
for(int i=0;i<FMT_CHUNK_SIZE;i++) {
fmt_chunk_data[i]=0;
}
fmt_size=0;
fact_chunk=false;
for(int i=0;i<FACT_CHUNK_SIZE;i++) {
fact_chunk_data[i]=0;
}
sample_length=0;
data_chunk=false;
data_length=0;
cart_chunk=false;
cart_version=0;
cart_title="";
cart_title="";
cart_artist="";
cart_cut_id="";
cart_client_id="";
cart_category="";
cart_classification="";
cart_out_cue="";
cart_start_date=QDate::currentDate();
cart_start_time=QTime::currentTime();
cart_end_date=QDate(CART_DEFAULT_END_YEAR,
CART_DEFAULT_END_MONTH,
CART_DEFAULT_END_DAY);
cart_end_time=QTime(CART_DEFAULT_END_HOUR,
CART_DEFAULT_END_MINUTE,
CART_DEFAULT_END_SECOND);
cart_producer_app_id="";
cart_producer_app_ver="";
cart_user_def="";
cart_url="";
cart_tag_text="";
cart_level_ref=CART_DEFAULT_LEVEL_REF;
for(int i=0;i<CART_CHUNK_SIZE;i++) {
cart_chunk_data[i]=0;
}
bext_chunk=false;
bext_description="";
bext_originator="";
bext_originator_ref="";
bext_origination_date=QDate::currentDate();
bext_origination_time=QTime::currentTime();
bext_time_reference_low=0;
bext_time_reference_high=0;
bext_version=0;
for(int i=0;i<64;i++) {
bext_umid[i]=0;
}
bext_coding_history="";
for(int i=0;i<BEXT_CHUNK_SIZE;i++) {
bext_chunk_data[i]=0;
}
free(bext_coding_data);
bext_coding_data=NULL;
bext_coding_size=0;
mext_chunk=false;
mext_homogenous=true;
mext_padding_used=false;
mext_rate_hacked=false;
mext_free_format=false;
mext_frame_size=0;
mext_anc_length=0;
mext_left_energy=false;
mext_ancillary_private=false;
mext_right_energy=false;
for(int i=0;i<MEXT_CHUNK_SIZE;i++) {
mext_chunk_data[i]=0;
}
levl_chunk=false;
levl_format=DEFAULT_LEVL_FORMAT;
levl_points=DEFAULT_LEVL_POINTS;
levl_block_size=DEFAULT_LEVL_BLOCK_SIZE;
energy_loaded=false;
energy_data.clear();
free(cook_buffer);
cook_buffer=NULL;
cook_buffer_size=0;
encode_quality=5.0f;
serial_number=-1;
atx_offset=0;
av10_chunk=false;
rdxl_chunk=false;
}
void RDWaveFile::resetWave()
{
if(wave_type!=RDWaveFile::Ogg) {
lseek(wave_file.handle(),data_start,SEEK_SET);
ftruncate(wave_file.handle(),data_start);
}
}
QString RDWaveFile::getName() const
{
return wave_file.name();
}
bool RDWaveFile::getFormatChunk() const
{
return format_chunk;
}
bool RDWaveFile::getFactChunk() const
{
return fact_chunk;
}
unsigned RDWaveFile::getSampleLength() const
{
return sample_length;
}
unsigned RDWaveFile::getTimeLength() const
{
return time_length;
}
unsigned RDWaveFile::getExtTimeLength() const
{
return ext_time_length;
}
bool RDWaveFile::getDataChunk() const
{
return data_chunk;
}
unsigned RDWaveFile::getDataLength() const
{
return data_length;
}
int RDWaveFile::readWave(void *buf,int count)
{
int stream;
int n;
unsigned int pos;
int c = 0;
int16_t *sample;
switch(wave_type) {
case RDWaveFile::Ogg:
#ifdef HAVE_VORBIS
n = 0;
while(n!=count){
int ret = ov_read(&vorbis_file,(char *)buf+n,count-n,0,2,1,&stream);
if (!ret) break;
n+=ret;
}
if(normalize_level != 1.0f){
for (int i=0;i<n/2;i++) {
sample=(int16_t *)buf+i;
*sample=(int16_t)(normalize_level*(double)*sample);
}
}
return n;
#endif // HAVE_VORBIS
return 0;
case RDWaveFile::Wave:
pos = lseek(wave_file.handle(),0,SEEK_CUR);
//
// FIXME: how fix comparing singed (data_start, count) vs.
// unsigned (pos, data_length) ... WAVE standard is 32 bit,
// but not sure if signed or not...
// grauf@rfa.org Tue, 04 Apr 2006 21:02:51 -0400
//
if (((pos+count)>(data_start+data_length))&&(data_length>0)) {
count=count - ( (pos+count) - (data_start+data_length) );
}
c = read(wave_file.handle(),buf,count);
break;
default:
c = read(wave_file.handle(),buf,count);
}
if ( c <0 ) return 0; // read error
// Fixup the buffer for big endian hosts (Wav is defined as LE).
if (htonl (1l) == 1){ // Big endian host
for(int i = 0; i < c/2; i++){
((short*)buf)[i] = ReadSword((unsigned char *)buf,2*i);
}
}
// printf("RDWaveFile: 0x%02X\n",((char *)buf)[0]&0xff);
return c;
}
int RDWaveFile::writeWave(void *buf,int count)
{
if(!recordable) {
return -1;
}
switch(format_tag) {
case WAVE_FORMAT_PCM:
switch(bits_per_sample) {
case 16:
if(levl_chunk) {
for(int i=0;i<count;i++) {
switch(levl_istate) {
case 0: // Left Channel, LSB
levl_accum=((char *)buf)[i]&0xff;
levl_istate=1;
break;
case 1: // Left Channel, MSB
levl_accum|=((((char *)buf)[i]&0xff)<<8);
switch(channels) {
case 1:
if(levl_accum>energy_data[energy_data.size()-1]) {
energy_data[energy_data.size()-1]=levl_accum;
}
if(++levl_block_ptr==1152) {
energy_data.push_back(0);
levl_block_ptr=0;
}
levl_istate=0;
break;
case 2:
if(levl_accum>energy_data[energy_data.size()-2]) {
energy_data[energy_data.size()-2]=levl_accum;
}
levl_istate=2;
break;
}
break;
case 2: // Right Channel, LSB
levl_accum=((char *)buf)[i]&0xff;
levl_istate=3;
break;
case 3: // Right Channel, MSB
levl_accum|=((((char *)buf)[i]&0xff)<<8);
if(levl_accum>energy_data[energy_data.size()-1]) {
energy_data[energy_data.size()-1]=levl_accum;
}
if(++levl_block_ptr==1152) {
energy_data.push_back(0);
energy_data.push_back(0);
levl_block_ptr=0;
}
levl_istate=0;
break;
}
}
}
lseek(wave_file.handle(),0,SEEK_END);
data_length+=count;
// Fixup the buffer for big endian hosts (Wav is defined as LE).
if (htonl (1l) == 1l){ // Big endian host
for(int i = 0; i < count/2; i++) {
unsigned short s = ((unsigned short*)buf)[i];
WriteSword((unsigned char *)buf,2*i,s);
}
}
return write(wave_file.handle(),buf,count);
case 24:
if(levl_chunk) {
for(int i=0;i<count;i++) {
switch(levl_istate) {
case 0: // Left Channel LSB
levl_istate=1;
break;
case 1: // Left Channel, Middle Byte
levl_accum=((char *)buf)[i]&0xff;
levl_istate=2;
break;
case 2: // Left Channel, MSB
levl_accum|=((((char *)buf)[i]&0xff)<<8);
switch(channels) {
case 1:
if(levl_accum>energy_data[energy_data.size()-1]) {
energy_data[energy_data.size()-1]=levl_accum;
}
if(++levl_block_ptr==1152) {
energy_data.push_back(0);
levl_block_ptr=0;
}
levl_istate=0;
break;
case 2:
if(levl_accum>energy_data[energy_data.size()-2]) {
energy_data[energy_data.size()-2]=levl_accum;
}
levl_istate=3;
break;
}
break;
case 3: // Right Channel, LSB
levl_istate=4;
break;
case 4: // Right Channel, Middle
levl_accum=((char *)buf)[i]&0xff;
levl_istate=5;
break;
case 5: // Right Channel, MSB
levl_accum|=((((char *)buf)[i]&0xff)<<8);
if(levl_accum>energy_data[energy_data.size()-1]) {
energy_data[energy_data.size()-1]=levl_accum;
}
if(++levl_block_ptr==1152) {
energy_data.push_back(0);
energy_data.push_back(0);
levl_block_ptr=0;
}
levl_istate=0;
break;
}
}
}
lseek(wave_file.handle(),0,SEEK_END);
data_length+=count;
return write(wave_file.handle(),buf,count);
}
case WAVE_FORMAT_MPEG:
if(levl_chunk&&(head_layer==2)) {
for(int i=0;i<count;i++) {
if(levl_block_ptr==(block_align-5)) { // Right Channel, MSB
if(channels==2) {
levl_accum=((((char *)buf)[i]&0xff)<<8);
}
levl_block_ptr++;
}
else {
if(levl_block_ptr==(block_align-4)) { // Right Channel, LSB
if(channels==2) {
levl_accum|=((char *)buf)[i]&0xff;
energy_data[energy_data.size()-1]=levl_accum;
}
levl_block_ptr++;
}
else {
if(levl_block_ptr==(block_align-2)) { // Left Channel, MSB
levl_accum=((((char *)buf)[i]&0xff)<<8);
levl_block_ptr++;
}
else {
if(levl_block_ptr==(block_align-1)) { // Left Channel, LSB
levl_accum|=((char *)buf)[i]&0xff;
energy_data[energy_data.size()-channels]=levl_accum;
for(unsigned j=0;j<channels;j++) {
energy_data.push_back(0);
}
levl_block_ptr=0;
}
else {
levl_block_ptr++;
}
}
}
}
}
}
lseek(wave_file.handle(),0,SEEK_END);
data_length+=count;
return write(wave_file.handle(),buf,count);
case WAVE_FORMAT_VORBIS:
WriteOggBuffer((char *)buf,count);
break;
}
return 0;
}
bool RDWaveFile::hasEnergy()
{
GetEnergy();
return has_energy;
}
unsigned RDWaveFile::energySize()
{
GetEnergy();
if(!has_energy) {
return 0;
}
return energy_data.size();
}
unsigned short RDWaveFile::energy(unsigned frame)
{
if(!has_energy) {
return 0;
}
GetEnergy();
return energy_data[frame];
}
int RDWaveFile::readEnergy(unsigned short buf[],int count)
{
if(!has_energy) {
return 0;
}
GetEnergy();
for(int i=0;i<count;i++) {
if((i+energy_ptr)<energy_data.size()) {
buf[i]=energy_data[i+energy_ptr];
}
else {
energy_ptr+=i;
return i;
}
}
return 0;
}
int RDWaveFile::startTrim(int level)
{
double ratio=pow(10,-(double)level/2000.0)*32768.0;
GetEnergy();
for(unsigned i=0;i<energy_data.size();i++) {
if((double)energy_data[i]>=ratio) {
return i*1152/getChannels();
}
}
return -1;
}
int RDWaveFile::endTrim(int level)
{
double ratio=pow(10,-(double)level/2000.0)*32768.0;
GetEnergy();
for(int i=energy_data.size()-1;i>=0;i--) {
if((double)energy_data[i]>=ratio) {
return i*1152/getChannels();
}
}
return -1;
}
void RDWaveFile::getSettings(RDSettings *settings)
{
switch(type()) {
case RDWaveFile::Pcm8:
case RDWaveFile::Aiff:
case RDWaveFile::M4A:
// FIXME
break;
case RDWaveFile::Wave:
switch(getFormatTag()) {
case WAVE_FORMAT_PCM:
settings->setFormat(RDSettings::Pcm16);
break;
case WAVE_FORMAT_MPEG:
settings->setFormat((RDSettings::Format)getHeadLayer());
break;
}
break;
case RDWaveFile::Mpeg:
case RDWaveFile::Atx:
case RDWaveFile::Tmc:
case RDWaveFile::Ambos:
settings->setFormat((RDSettings::Format)getHeadLayer());
break;
case RDWaveFile::Ogg:
settings->setFormat(RDSettings::OggVorbis);
break;
#ifdef HAVE_FLAC
case RDWaveFile::Flac:
settings->setFormat(RDSettings::Flac);
break;
#endif // HAVE_FLAC
}
settings->setChannels(getChannels());
settings->setSampleRate(getSamplesPerSec());
settings->setLayer(getHeadLayer());
settings->setBitRate(getHeadBitRate());
}
void RDWaveFile::setSettings(const RDSettings *settings)
{
}
int RDWaveFile::seekWave(int offset,int whence)
{
int pos;
unsigned abspos;
switch(wave_type) {
case RDWaveFile::Ogg:
#ifdef HAVE_VORBIS
switch(whence) {
case SEEK_SET:
if(ov_pcm_seek(&vorbis_file,offset/(2*channels))==0) {
//printf("RDWaveFile::seekWave() = %d\n",offset);
return offset;
}
//printf("RDWaveFile::seekWave() = -1\n");
return -1;
break;
case SEEK_CUR:
pos=ov_pcm_tell(&vorbis_file)*2*channels;
if(offset==0) {
return pos;
}
return seekWave(pos+offset,SEEK_SET);
break;
case SEEK_END:
break;
}
#endif // HAVE_VORBIS
return -1;
break;
case RDWaveFile::Wave:
switch(whence) {
case SEEK_SET:
if(offset<0) {
offset=0;
}
if((unsigned)offset>data_length) {
offset=data_length;
}
return lseek(wave_file.handle(),
offset+data_start,SEEK_SET)-data_start;
break;
case SEEK_CUR:
pos = lseek(wave_file.handle(),0,SEEK_CUR);
abspos=pos+offset;
if((pos+offset)<0) {
abspos=0;
}
if (abspos<(unsigned)data_start) {
offset=offset + (data_start - abspos);
}
if (abspos>(data_start+data_length)) {
offset=offset - (abspos - (data_start+data_length));
}
return lseek(wave_file.handle(),offset,SEEK_CUR)-data_start;
break;
case SEEK_END:
pos = lseek(wave_file.handle(),0,SEEK_END);
abspos=pos+offset;
if((pos+offset)<0) {
abspos=0;
}
if (abspos<(unsigned)data_start) {
offset=offset + (data_start - (pos+offset));
}
if (abspos>(data_start+data_length)) {
offset=offset - (abspos - (data_start+data_length));
}
return lseek(wave_file.handle(),offset,SEEK_END)-data_start;
break;
}
break;
default:
switch(whence) {
case SEEK_SET:
return lseek(wave_file.handle(),
offset+data_start,SEEK_SET)-data_start;
break;
case SEEK_CUR:
return lseek(wave_file.handle(),offset,SEEK_CUR)-data_start;
break;
case SEEK_END:
return lseek(wave_file.handle(),offset,SEEK_END)-data_start;
break;
}
}
return 0;
}
unsigned short RDWaveFile::getFormatTag() const
{
return format_tag;
}
void RDWaveFile::setFormatTag(unsigned short format)
{
if(!recordable) {
format_tag=format;
}
}
unsigned short RDWaveFile::getChannels() const
{
return channels;
}
void RDWaveFile::setChannels(unsigned short chan)
{
if(!recordable) {
channels=chan;
}
}
unsigned RDWaveFile::getSamplesPerSec() const
{
return samples_per_sec;
}
void RDWaveFile::setSamplesPerSec(unsigned rate)
{
if(!recordable) {
samples_per_sec=rate;
}
}
unsigned RDWaveFile::getAvgBytesPerSec() const
{
return avg_bytes_per_sec;
}
unsigned short RDWaveFile::getBlockAlign() const
{
return block_align;
}
unsigned short RDWaveFile::getBitsPerSample() const
{
return bits_per_sample;
}
void RDWaveFile::setBitsPerSample(unsigned short bits)
{
if(!recordable) {
bits_per_sample=bits;
}
}
unsigned short RDWaveFile::getHeadLayer() const
{
return head_layer;
}
void RDWaveFile::setHeadLayer(unsigned short layer)
{
if(!recordable) {
head_layer=layer;
}
}
unsigned RDWaveFile::getHeadBitRate() const
{
return head_bit_rate;
}
void RDWaveFile::setHeadBitRate(unsigned rate)
{
if(!recordable) {
head_bit_rate=rate;
}
}
unsigned short RDWaveFile::getHeadMode() const
{
return head_mode;
}
void RDWaveFile::setHeadMode(unsigned short mode)
{
if(!recordable) {
head_mode=mode;
}
}
void RDWaveFile::setHeadFlags(unsigned short flags)
{
if(!recordable) {
head_flags=flags;
}
}
unsigned RDWaveFile::getHeadModeExt() const
{
return head_mode_ext;
}
unsigned RDWaveFile::getHeadEmphasis() const
{
return head_emphasis;
}
unsigned short RDWaveFile::getHeadFlags() const
{
return head_flags;
}
unsigned long RDWaveFile::getPTS() const
{
return pts;
}
bool RDWaveFile::getCartChunk() const
{
return cart_chunk;
}
void RDWaveFile::setCartChunk(bool state)
{
if(!recordable) {
cart_chunk=state;
}
}
unsigned RDWaveFile::getCartVersion() const
{
return cart_version;
}
QString RDWaveFile::getCartTitle() const
{
return cart_title;
}
void RDWaveFile::setCartTitle(QString string)
{
cart_title=string;
}
QString RDWaveFile::getCartArtist() const
{
return cart_artist;
}
void RDWaveFile::setCartArtist(QString string)
{
cart_artist=string;
}
QString RDWaveFile::getCartCutID() const
{
return cart_cut_id;
}
void RDWaveFile::setCartCutID(QString string)
{
cart_cut_id=string;
}
QString RDWaveFile::getCartClientID() const
{
return cart_client_id;
}
void RDWaveFile::setCartClientID(QString string)
{
cart_client_id=string;
}
QString RDWaveFile::getCartCategory() const
{
return cart_category;
}
void RDWaveFile::setCartCategory(QString string)
{
cart_category=string;
}
QString RDWaveFile::getCartClassification() const
{
return cart_classification;
}
void RDWaveFile::setCartClassification(QString string)
{
cart_classification=string;
}
QString RDWaveFile::getCartOutCue() const
{
return cart_out_cue;
}
void RDWaveFile::setCartOutCue(QString string)
{
cart_out_cue=string;
}
QDate RDWaveFile::getCartStartDate() const
{
return cart_start_date;
}
void RDWaveFile::setCartStartDate(QDate date)
{
cart_start_date=date;
}
QTime RDWaveFile::getCartStartTime() const
{
return cart_start_time;
}
void RDWaveFile::setCartStartTime(QTime time)
{
cart_start_time=time;
}
QDate RDWaveFile::getCartEndDate() const
{
return cart_end_date;
}
void RDWaveFile::setCartEndDate(QDate date)
{
cart_end_date=date;
}
QTime RDWaveFile::getCartEndTime() const
{
return cart_end_time;
}
void RDWaveFile::setCartEndTime(QTime time)
{
cart_end_time=time;
}
QString RDWaveFile::getCartProducerAppID() const
{
return cart_producer_app_id;
}
QString RDWaveFile::getCartProducerAppVer() const
{
return cart_producer_app_ver;
}
QString RDWaveFile::getCartUserDef() const
{
return cart_user_def;
}
void RDWaveFile::setCartUserDef(QString string)
{
cart_user_def=string;
}
unsigned RDWaveFile::getCartLevelRef() const
{
return cart_level_ref;
}
void RDWaveFile::setCartLevelRef(unsigned level)
{
cart_level_ref=level;
}
QString RDWaveFile::getCartTimerLabel(int index) const
{
if(index<MAX_TIMERS) {
return cart_timer_label[index];
}
return QString("");
}
/*
void RDWaveFile::setCartTimerLabel(int index,QString label)
{
if(index<MAX_TIMERS) {
cart_timer_label[index]=label;
}
}
*/
unsigned RDWaveFile::getCartTimerSample(int index) const
{
if(index<MAX_TIMERS) {
return cart_timer_sample[index];
}
return 0;
}
/*
void RDWaveFile::setCartTimerSample(int index,unsigned sample)
{
if(index<MAX_TIMERS) {
cart_timer_sample[index]=sample;
}
}
*/
QString RDWaveFile::getCartURL() const
{
return cart_url;
}
void RDWaveFile::setCartURL(QString string)
{
cart_url=string;
}
QString RDWaveFile::getCartTagText() const
{
return cart_tag_text;
}
bool RDWaveFile::getBextChunk() const
{
return bext_chunk;
}
void RDWaveFile::setBextChunk(bool state)
{
if(!recordable) {
bext_chunk=state;
}
}
QString RDWaveFile::getBextDescription() const
{
return bext_description;
}
void RDWaveFile::setBextDescription(QString string)
{
bext_description=string;
}
QString RDWaveFile::getBextOriginator() const
{
return bext_originator;
}
void RDWaveFile::setBextOriginator(QString string)
{
bext_originator=string;
}
QString RDWaveFile::getBextOriginatorRef() const
{
return bext_originator_ref;
}
void RDWaveFile::setBextOriginatorRef(QString string)
{
bext_originator_ref=string;
}
QDate RDWaveFile::getBextOriginationDate() const
{
return bext_origination_date;
}
void RDWaveFile::setBextOriginationDate(QDate date)
{
bext_origination_date=date;
}
QTime RDWaveFile::getBextOriginationTime() const
{
return bext_origination_time;
}
void RDWaveFile::setBextOriginationTime(QTime time)
{
bext_origination_time=time;
}
unsigned RDWaveFile::getBextTimeReferenceLow() const
{
return bext_time_reference_low;
}
void RDWaveFile::setBextTimeReferenceLow(unsigned sample)
{
bext_time_reference_low=sample;
}
unsigned RDWaveFile::getBextTimeReferenceHigh() const
{
return bext_time_reference_low;
}
void RDWaveFile::setBextTimeReferenceHigh(unsigned sample)
{
bext_time_reference_high=sample;
}
unsigned short RDWaveFile::getBextVersion() const
{
return bext_version;
}
void RDWaveFile::getBextUMD(unsigned char *buf) const
{
for(int i=0;i<64;i++) {
buf[i]=bext_umid[i];
}
}
void RDWaveFile::setBextUMD(unsigned char *buf)
{
for(int i=0;i<64;i++) {
bext_umid[i]=buf[i];
}
}
QString RDWaveFile::getBextCodingHistory() const
{
return bext_coding_history;
}
void RDWaveFile::setBextCodingHistory(QString string)
{
if(!recordable) {
bext_coding_history=string;
}
}
bool RDWaveFile::getMextChunk() const
{
return mext_chunk;
}
void RDWaveFile::setMextChunk(bool state)
{
if(!recordable) {
mext_chunk=state;
}
}
bool RDWaveFile::getMextHomogenous() const
{
return mext_homogenous;
}
void RDWaveFile::setMextHomogenous(bool state)
{
mext_homogenous=state;
}
bool RDWaveFile::getMextPaddingUsed() const
{
return mext_padding_used;
}
void RDWaveFile::setMextPaddingUsed(bool state)
{
mext_padding_used=state;
}
bool RDWaveFile::getMextHackedBitRate() const
{
return mext_rate_hacked;
}
void RDWaveFile::setMextHackedBitRate(bool state)
{
mext_rate_hacked=state;
}
bool RDWaveFile::getMextFreeFormat() const
{
return mext_free_format;
}
void RDWaveFile::setMextFreeFormat(bool state)
{
mext_free_format=state;
}
int RDWaveFile::getMextFrameSize() const
{
return mext_frame_size;
}
void RDWaveFile::setMextFrameSize(int size)
{
mext_frame_size=size;
}
int RDWaveFile::getMextAncillaryLength() const
{
return mext_anc_length;
}
void RDWaveFile::setMextAncillaryLength(int length)
{
mext_anc_length=length;
}
bool RDWaveFile::getMextLeftEnergyPresent() const
{
return mext_left_energy;
}
void RDWaveFile::setMextLeftEnergyPresent(bool state)
{
mext_left_energy=state;
}
bool RDWaveFile::getMextPrivateDataPresent() const
{
return mext_ancillary_private;
}
void RDWaveFile::setMextPrivateDataPresent(bool state)
{
mext_ancillary_private=state;
}
bool RDWaveFile::getMextRightEnergyPresent() const
{
return mext_right_energy;
}
void RDWaveFile::setMextRightEnergyPresent(bool state)
{
mext_right_energy=state;
}
bool RDWaveFile::getLevlChunk() const
{
return levl_chunk;
}
void RDWaveFile::setLevlChunk(bool state)
{
levl_chunk=state;
}
int RDWaveFile::getLevlVersion() const
{
return levl_version;
}
void RDWaveFile::setLevlVersion(unsigned ver)
{
levl_version=ver;
}
int RDWaveFile::getLevlBlockSize() const
{
return levl_block_size;
}
void RDWaveFile::setLevlBlockSize(unsigned size)
{
levl_block_size=size;
}
int RDWaveFile::getLevlChannels() const
{
return levl_channels;
}
unsigned short RDWaveFile::getLevlPeak() const
{
return levl_peak_value;
}
QDateTime RDWaveFile::getLevlTimestamp() const
{
return levl_timestamp;
}
void RDWaveFile::setEncodeQuality(float qual)
{
encode_quality=qual;
}
int RDWaveFile::getSerialNumber() const
{
return serial_number;
}
void RDWaveFile::setSerialNumber(int serial)
{
serial_number=serial;
}
bool RDWaveFile::getScotChunk() const
{
return scot_chunk;
}
bool RDWaveFile::getAIR1Chunk() const
{
return AIR1_chunk;
}
bool RDWaveFile::getRdxlChunk() const
{
return rdxl_chunk;
}
QString RDWaveFile::getRdxlContents() const
{
return rdxl_contents;
}
void RDWaveFile::setRdxlContents(const QString &xml)
{
rdxl_contents=xml;
//
// Make sure that the RDXL chunk is of even length.
// (To avoid goosing a bug in CoolEdit Pro 2003).
//
if((rdxl_contents.length()%2)!=0) {
rdxl_contents+=" ";
}
}
RDWaveFile::Type RDWaveFile::GetType(int fd)
{
if(IsWav(fd)) {
return RDWaveFile::Wave;
}
if(IsAiff(fd)) {
return RDWaveFile::Aiff;
}
if(IsFlac(fd)) {
return RDWaveFile::Flac;
}
if(IsAtx(fd)) {
return RDWaveFile::Atx;
}
if(IsTmc(fd)) {
return RDWaveFile::Tmc;
}
if(IsOgg(fd)) {
return RDWaveFile::Ogg;
}
if(IsM4A(fd)) {
return RDWaveFile::M4A;
}
if(IsMpeg(fd)) {
return RDWaveFile::Mpeg;
}
return RDWaveFile::Unknown;
}
bool RDWaveFile::IsWav(int fd)
{
int i;
char buffer[5];
/*
* Is this a riff file?
*/
lseek(fd,0,SEEK_SET);
i=read(fd,buffer,4);
if(i==4) {
buffer[4]=0;
if(strcmp("RIFF",buffer)!=0) {
return false;
}
}
else {
return false;
}
/*
* Is this a WAVE file?
*/
if(lseek(fd,8,SEEK_SET)!=8) {
return false;
}
i=read(fd,buffer,4);
if(i==4) {
buffer[4]=0;
if(strcmp("WAVE",buffer)!=0) {
return false;
}
}
else {
return false;
}
return true;
}
bool RDWaveFile::IsMpeg(int fd)
{
int i;
unsigned char buffer[11];
id3v1_tag=false;
id3v2_tag[0]=false;
id3v2_tag[1]=false;
id3v2_offset[0]=0;
id3v2_offset[1]=0;
lseek(fd,0,SEEK_SET);
if((i=read(fd,buffer,10))!=10) {
return false;
}
buffer[3]=0;
if(!strcasecmp((char *)buffer,"ID3")) {
id3v2_tag[0]=true;
id3v2_offset[0]=
(buffer[9]|(buffer[8]<<7)|(buffer[7]<<14)|(buffer[6]<<21))+10;
}
lseek(fd,id3v2_offset[0],SEEK_SET);
if((i=read(fd,buffer,2))!=2) {
return false;
}
if((buffer[0]==0xFF)&&((buffer[1]&0xE0)==0xE0)) {
return true;
}
while(read(fd,buffer,1)==1) {
if(buffer[0]==0xFF) { // Could be it -- check the next byte
if(read(fd,buffer,1)==1) {
if((buffer[0]&0xF0)==0xF0) { // Got it -- fix things up
id3v2_tag[0]=true;
id3v2_offset[0]=lseek(fd,0,SEEK_CUR)-2;
return true;
}
}
}
}
return false;
}
bool RDWaveFile::IsOgg(int fd)
{
#ifdef HAVE_VORBIS
lseek(fd,0,SEEK_SET);
if(ov_open(fdopen(fd,"r"),&vorbis_file,NULL,0)==0) {
return true;
}
#endif // HAVE_VORBIS
return false;
}
bool RDWaveFile::IsAtx(int fd)
{
char buffer[6];
lseek(fd,0,SEEK_SET);
if(read(fd,buffer,5)!=5) {
return false;
}
buffer[5]=0;
if(strcmp("FILE:",buffer)) {
return false;
}
return true;
}
bool RDWaveFile::IsTmc(int fd)
{
unsigned char buffer[7];
lseek(fd,0,SEEK_SET);
if(read(fd,buffer,6)!=6) {
return false;
}
buffer[6]=0;
if((buffer[4]!=0xFF)||((buffer[5]&0xF0)!=0xF0)) {
return false;
}
return true;
}
bool RDWaveFile::IsFlac(int fd)
{
#ifdef HAVE_FLAC
char buffer[5];
ID3_Tag id3_tag(Q3CString().sprintf("%s",(const char *)wave_file.name().utf8()));
lseek(fd,id3_tag.GetPrependedBytes(),SEEK_SET);
if(read(fd,buffer,4)!=4) {
return false;
}
buffer[4]=0;
if(strcmp(buffer,"fLaC")) {
return false;
}
return true;
#else
return false;
#endif // HAVE_FLAC
}
bool RDWaveFile::IsAiff(int fd)
{
int i;
char buffer[5];
lseek(fd,0,SEEK_SET);
i=read(fd,buffer,4);
if(i==4) {
buffer[4]=0;
if(strcmp("FORM",buffer)!=0) {
return false;
}
}
else {
return false;
}
if(lseek(fd,8,SEEK_SET)!=8) {
return false;
}
i=read(fd,buffer,4);
if(i==4) {
buffer[4]=0;
if(strcmp("AIFF",buffer)!=0) {
return false;
}
}
else {
return false;
}
return true;
}
bool RDWaveFile::IsM4A(int fd)
{
#ifdef HAVE_MP4_LIBS
if(!dlmp4.load())
return false;
MP4FileHandle f = dlmp4.MP4Read(getName());
bool ret = f != MP4_INVALID_FILE_HANDLE;
if(ret)
dlmp4.MP4Close(f, 0);
return ret;
#else
return false;
#endif
}
off_t RDWaveFile::FindChunk(int fd,const char *chunk_name,unsigned *chunk_size,
bool big_end)
{
int i;
char name[5]={0,0,0,0,0};
unsigned char buffer[4];
lseek(fd,12,SEEK_SET);
i=read(fd,name,4);
i=read(fd,buffer,4);
if(big_end) {
*chunk_size=
buffer[3]+(256*buffer[2])+(65536*buffer[1])+(16777216*buffer[0]);
}
else {
*chunk_size=
buffer[0]+(256*buffer[1])+(65536*buffer[2])+(16777216*buffer[3]);
}
while(i==4) {
if(strcasecmp(chunk_name,name)==0) {
return lseek(fd,0,SEEK_CUR);
}
lseek(fd,*chunk_size,SEEK_CUR);
i=read(fd,name,4);
i=read(fd,buffer,4);
if(big_end) {
*chunk_size=buffer[3]+(256*buffer[2])+(65536*buffer[1])+
(16777216*buffer[0]);
}
else {
*chunk_size=buffer[0]+(256*buffer[1])+(65536*buffer[2])+
(16777216*buffer[3]);
}
}
return -1;
}
bool RDWaveFile::GetChunk(int fd,const char *chunk_name,unsigned *chunk_size,
unsigned char *chunk,size_t size,bool big_end)
{
off_t pos;
if((pos=FindChunk(fd,chunk_name,chunk_size,big_end))<0) {
return false;
}
lseek(fd,SEEK_SET,pos);
read(fd,chunk,size);
return true;
}
void RDWaveFile::WriteChunk(int fd,const char *cname,unsigned char *buf,
unsigned size,bool big_end)
{
unsigned char size_buf[4];
unsigned csize;
if(FindChunk(fd,cname,&csize)<0) {
if(big_end) {
size_buf[3]=size&0xff;
size_buf[2]=(size>>8)&0xff;
size_buf[1]=(size>>16)&0xff;
size_buf[0]=(size>>24)&0xff;
}
else {
size_buf[0]=size&0xff;
size_buf[1]=(size>>8)&0xff;
size_buf[2]=(size>>16)&0xff;
size_buf[3]=(size>>24)&0xff;
}
lseek(fd,0,SEEK_END);
write(fd,cname,4);
write(fd,size_buf,4);
write(fd,buf,size);
return;
}
if(csize==size) {
write(fd,buf,size);
return;
}
//printf("WARNING: Updated chunk size mismatch! Update not written.\n");
}
void RDWaveFile::WriteChunk(int fd,const char *cname,const QString &contents)
{
unsigned char size_buf[4];
size_buf[0]=contents.utf8().length()&0xff;
size_buf[1]=(contents.utf8().length()>>8)&0xff;
size_buf[2]=(contents.utf8().length()>>16)&0xff;
size_buf[3]=(contents.utf8().length()>>24)&0xff;
lseek(fd,0,SEEK_END);
write(fd,cname,4);
write(fd,size_buf,4);
write(fd,contents.utf8(),contents.utf8().length());
}
bool RDWaveFile::GetFmt(int fd)
{
unsigned chunk_size;
/*
* Load the chunk
*/
if(!GetChunk(fd,"fmt ",&chunk_size,fmt_chunk_data,FMT_CHUNK_SIZE)) {
format_chunk=false;
return false;
}
format_chunk=true;
/*
* Generic data -- present in ALL valid WAV files
*/
format_tag=fmt_chunk_data[0]+256*fmt_chunk_data[1];
channels=fmt_chunk_data[2]+256*fmt_chunk_data[3];
samples_per_sec=fmt_chunk_data[4]+256*fmt_chunk_data[5]+65536*
fmt_chunk_data[6]+16777216*fmt_chunk_data[7];
avg_bytes_per_sec=fmt_chunk_data[8]+256*fmt_chunk_data[9]+65536*
fmt_chunk_data[10]+16777216*fmt_chunk_data[11];
block_align=fmt_chunk_data[12]+256*fmt_chunk_data[13];
/*
* PCM Linear specific fields
*/
if(format_tag==WAVE_FORMAT_PCM) {
bits_per_sample=fmt_chunk_data[14]+256*fmt_chunk_data[15];
}
/*
* MPEG-1 specific fields
*/
if(format_tag==WAVE_FORMAT_MPEG) {
head_layer=fmt_chunk_data[18]+256*fmt_chunk_data[19];
head_bit_rate=fmt_chunk_data[20]+256*fmt_chunk_data[21]+65536*
fmt_chunk_data[22]+16777216*fmt_chunk_data[23];
head_mode=fmt_chunk_data[24]+256*fmt_chunk_data[25];
head_mode_ext=fmt_chunk_data[26]+256*fmt_chunk_data[27];
head_emphasis=fmt_chunk_data[28]+256*fmt_chunk_data[29];
head_flags=fmt_chunk_data[30]+256*fmt_chunk_data[31];
pts=fmt_chunk_data[32]+256*fmt_chunk_data[33]+65536*
fmt_chunk_data[34]+16777216*fmt_chunk_data[35];
}
if(format_tag==WAVE_FORMAT_MPEGLAYER3) {
if(!GetChunk(wave_file.handle(),"data",&data_length,NULL,0)) {
return false;
}
data_start=lseek(wave_file.handle(),0,SEEK_CUR);
GetMpegHeader(fd,data_start);
format_tag=WAVE_FORMAT_MPEG;
}
return true;
}
bool RDWaveFile::GetFact(int fd)
{
unsigned chunk_size;
/*
* Load the chunk
*/
if(!GetChunk(fd,"fact",&chunk_size,fact_chunk_data,FACT_CHUNK_SIZE)) {
return false;
}
fact_chunk=true;
sample_length=fact_chunk_data[0]+256*fact_chunk_data[1]+
65536*fact_chunk_data[2]+16777216*fact_chunk_data[3];
return true;
}
bool RDWaveFile::GetCart(int fd)
{
unsigned chunk_size;
char *tag_buffer=NULL;
int i,j;
/*
* Load the chunk
*/
if(!GetChunk(fd,"cart",&chunk_size,cart_chunk_data,CART_CHUNK_SIZE)) {
return false;
}
cart_chunk=true;
cart_version=cart_chunk_data[0]+256*cart_chunk_data[1]+
65536*cart_chunk_data[2]+16777216*cart_chunk_data[3];
cart_title=cutString((char *)cart_chunk_data,4,64);
cart_artist=cutString((char *)cart_chunk_data,68,64);
cart_cut_id=cutString((char *)cart_chunk_data,132,64);
cart_client_id=cutString((char *)cart_chunk_data,196,64);
cart_category=cutString((char *)cart_chunk_data,260,64);
cart_classification=cutString((char *)cart_chunk_data,324,64);
cart_out_cue=cutString((char *)cart_chunk_data,388,64);
cart_start_date=cutDate((char *)cart_chunk_data,452);
cart_start_time=cutTime((char *)cart_chunk_data,462);
cart_end_date=cutDate((char *)cart_chunk_data,470);
cart_end_time=cutTime((char *)cart_chunk_data,480);
cart_producer_app_id=cutString((char *)cart_chunk_data,488,64);
cart_producer_app_ver=cutString((char *)cart_chunk_data,552,64);
cart_user_def=cutString((char *)cart_chunk_data,616,64);
cart_level_ref=cart_chunk_data[680]+256*cart_chunk_data[681]+
65536*cart_chunk_data[682]+16777216*cart_chunk_data[683];
j=0;
for(i=0;i<MAX_TIMERS;i++) {
if(cart_chunk_data[684+i*8]!=0) {
cart_timer_label[j]=cutString((char *)cart_chunk_data,684+i*8,4);
cart_timer_sample[j]=cart_chunk_data[688+i*8]+
256*cart_chunk_data[689+i*8]+
65536*cart_chunk_data[690+i*8]+
16777216*cart_chunk_data[691+i*8];
j++;
}
}
if(wave_type==RDWaveFile::Wave) {
cart_url=cutString((char *)cart_chunk_data,1024,1024);
//
// Get the Tag Text
//
if(chunk_size>2048) {
tag_buffer=(char *)malloc(chunk_size-2048+1);
read(wave_file.handle(),tag_buffer,chunk_size-2048);
tag_buffer[chunk_size-2048]=0;
cart_tag_text=tag_buffer;
free(tag_buffer);
tag_buffer=NULL;
}
}
else {
cart_url="";
cart_tag_text="";
}
if(wave_data!=NULL) {
wave_data->setMetadataFound(true);
wave_data->setTitle(cart_title);
wave_data->setArtist(cart_artist);
wave_data->setCutId(cart_cut_id);
wave_data->setClient(cart_client_id);
wave_data->setCategory(cart_category);
wave_data->setClassification(cart_classification);
wave_data->setOutCue(cart_out_cue);
wave_data->setStartDate(cart_start_date);
wave_data->setStartTime(cart_start_time);
wave_data->setEndDate(cart_end_date);
wave_data->setEndTime(cart_end_time);
wave_data->setUserDefined(cart_user_def);
wave_data->setUrl(cart_url);
wave_data->setTagText(cart_tag_text);
for(int i=0;i<MAX_TIMERS;i++) {
if((cart_timer_label[i]=="SEGs")||(cart_timer_label[i]=="SEC1")) {
wave_data->setSegueStartPos((int)(1000.0*((double)cart_timer_sample[i])/
((double)getSamplesPerSec())));
}
if((cart_timer_label[i]=="SEGe")||(cart_timer_label[i]=="EOD ")) {
wave_data->setSegueEndPos((int)(1000.0*((double)cart_timer_sample[i])/
((double)getSamplesPerSec())));
}
if(cart_timer_label[i]=="INTs") {
wave_data->setIntroStartPos((int)(1000.0*((double)cart_timer_sample[i])/
((double)getSamplesPerSec())));
}
if(cart_timer_label[i]=="INTe") {
wave_data->setIntroEndPos((int)(1000.0*((double)cart_timer_sample[i])/
((double)getSamplesPerSec())));
}
if((cart_timer_label[i]=="INT ")||(cart_timer_label[i]=="INT1")) {
wave_data->setIntroStartPos(0);
wave_data->setIntroEndPos((int)(1000.0*((double)cart_timer_sample[i])/
((double)getSamplesPerSec())));
}
if(cart_timer_label[i]=="AUDs") {
wave_data->setStartPos((int)(1000.0*((double)cart_timer_sample[i])/
((double)getSamplesPerSec())));
}
if(cart_timer_label[i]=="AUDe") {
wave_data->setEndPos((int)(1000.0*((double)cart_timer_sample[i])/
((double)getSamplesPerSec())));
}
}
}
return true;
}
bool RDWaveFile::GetBext(int fd)
{
unsigned chunk_size;
char *tag_buffer=NULL;
/*
* Load the chunk
*/
if(!GetChunk(fd,"bext",&chunk_size,bext_chunk_data,BEXT_CHUNK_SIZE)) {
return false;
}
bext_chunk=true;
bext_description=cutString((char *)bext_chunk_data,0,256);
bext_originator=cutString((char *)bext_chunk_data,256,32);
bext_originator_ref=cutString((char *)bext_chunk_data,288,32);
bext_origination_date=cutDate((char *)bext_chunk_data,320);
bext_origination_time=cutTime((char *)bext_chunk_data,330);
bext_time_reference_low=bext_chunk_data[338]+256*bext_chunk_data[339]+
65536*bext_chunk_data[340]+16777216*bext_chunk_data[341];
bext_time_reference_high=bext_chunk_data[342]+256*bext_chunk_data[343]+
65536*bext_chunk_data[344]+16777216*bext_chunk_data[345];
bext_version=bext_chunk_data[346]+256*bext_chunk_data[347];
for(int i=0;i<64;i++) {
bext_umid[i]=bext_chunk_data[348+i];
}
//
// Get the Coding History
//
if(chunk_size>602) {
tag_buffer=(char *)malloc(chunk_size-602+1);
read(wave_file.handle(),tag_buffer,chunk_size-602);
tag_buffer[chunk_size-602]=0;
bext_coding_history=tag_buffer;
free(tag_buffer);
tag_buffer=NULL;
}
if(wave_data!=NULL) {
wave_data->setMetadataFound(true);
wave_data->setDescription(bext_description);
wave_data->setOriginator(bext_originator);
wave_data->setOriginatorReference(bext_originator_ref);
wave_data->setOriginationDate(bext_origination_date);
wave_data->setOriginationTime(bext_origination_time);
wave_data->setCodingHistory(bext_coding_history);
}
return true;
}
bool RDWaveFile::GetMext(int fd)
{
unsigned chunk_size;
/*
* Load the chunk
*/
if(!GetChunk(fd,"mext",&chunk_size,mext_chunk_data,MEXT_CHUNK_SIZE)) {
return false;
}
mext_chunk=true;
if((mext_chunk_data[0]&1)!=0) {
mext_homogenous=true;
}
if((mext_chunk_data[0]&2)==0) {
mext_padding_used=true;
}
if((mext_chunk_data[0]&4)!=0) {
mext_rate_hacked=true;
}
if((mext_chunk_data[0]&8)!=0) {
mext_free_format=true;
}
mext_frame_size=mext_chunk_data[2]+256*mext_chunk_data[3];
mext_anc_length=mext_chunk_data[4]+256*mext_chunk_data[5];
if((mext_chunk_data[6]&1)!=0) {
mext_left_energy=true;
}
if((mext_chunk_data[6]&2)!=0) {
mext_ancillary_private=true;
}
if((mext_chunk_data[6]&4)!=0) {
mext_right_energy=true;
}
return true;
}
bool RDWaveFile::GetLevl(int fd)
{
unsigned size=LEVL_CHUNK_SIZE;
unsigned chunk_size;
unsigned char frame[2];
QDate date;
QTime time;
/*
* Load the chunk
*/
if(!GetChunk(fd,"levl",&chunk_size,levl_chunk_data,LEVL_CHUNK_SIZE)) {
return false;
}
levl_chunk=true;
levl_version=ReadDword(levl_chunk_data,0);
levl_format=ReadDword(levl_chunk_data,4);
levl_points=ReadDword(levl_chunk_data,8);
levl_block_size=ReadDword(levl_chunk_data,12);
levl_channels=ReadDword(levl_chunk_data,16);
levl_frames=ReadDword(levl_chunk_data,20);
levl_peak_offset=ReadDword(levl_chunk_data,24);
levl_block_offset=ReadDword(levl_chunk_data,28);
levl_timestamp=QDateTime(cutDate((char *)levl_chunk_data,32),
cutTime((char *)levl_chunk_data,43));
if(levl_block_size!=1152) {
return true;
}
lseek(wave_file.handle(),FindChunk(wave_file.handle(),"levl",&size)+
levl_block_offset-8,SEEK_SET);
for(unsigned i=1;i<levl_frames;i++) {
for(int j=0;j<levl_channels;j++) {
read(wave_file.handle(),frame,2);
energy_data.push_back(frame[0]+256*frame[1]);
}
}
if(levl_peak_offset==0xFFFFFFFF) {
levl_peak_value=0;
}
else {
levl_peak_value=energy_data[levl_peak_offset];
}
energy_loaded=true;
has_energy=true;
return true;
}
bool RDWaveFile::GetScot(int fd)
{
unsigned chunk_size;
int start_day;
int start_month;
int start_hour;
int end_day;
int end_month;
int end_hour;
unsigned cartnum;
unsigned segue_start;
/*
* Load the chunk
*/
if(!GetChunk(fd,"scot",&chunk_size,scot_chunk_data,SCOT_CHUNK_SIZE)) {
return false;
}
scot_chunk=true;
scot_title=cutString((char *)scot_chunk_data,4,42);
scot_artist=cutString((char *)scot_chunk_data,267,33);
scot_etc=cutString((char *)scot_chunk_data,301,33);
scot_year=cutString((char *)scot_chunk_data,338,4).toInt();
scot_intro_length=cutString((char *)scot_chunk_data,335,2).toInt()*1000;
//start_year=cutString((char *)scot_chunk_data,69,2).toInt()+2000;
start_month=cutString((char *)scot_chunk_data,65,2).toInt();
start_day=cutString((char *)scot_chunk_data,67,2).toInt();
cartnum=cutString((char *)scot_chunk_data,47,4).toUInt();
segue_start=(0xFF&scot_chunk_data[88])+((0xFF&scot_chunk_data[89])<<8);
if((start_month>0)&&(start_month<13)&&(start_month>0)&&(start_day<32)) {
scot_start_date=QDate(start_day,start_month,start_day);
}
start_hour=cutString((char *)scot_chunk_data,77,2).toInt();
if((start_hour>=129)&&(start_hour<=151)) {
scot_start_time=QTime(start_hour-128,0,0);
}
//end_year=cutString((char *)scot_chunk_data,75,2).toInt()+2000;
end_month=cutString((char *)scot_chunk_data,71,2).toInt();
end_day=cutString((char *)scot_chunk_data,73,2).toInt();
if((end_month>0)&&(end_month<13)&&(end_day>0)&&(end_day<32)&&
scot_start_date.isValid()) {
scot_end_date=QDate(end_day,end_month,end_day);
}
else {
scot_start_date=QDate();
scot_end_date=QDate();
}
end_hour=cutString((char *)scot_chunk_data,78,2).toInt();
if((end_hour>=129)&&(end_hour<=151)) {
scot_end_time=QTime(end_hour-128,0,0);
}
if(wave_data!=NULL) {
wave_data->setMetadataFound(true);
wave_data->setTitle(scot_title.stripWhiteSpace());
wave_data->setArtist(scot_artist.stripWhiteSpace());
wave_data->setUserDefined(scot_etc.stripWhiteSpace());
wave_data->setReleaseYear(scot_year);
wave_data->setCutId(QString().sprintf("%u",cartnum));
wave_data->setIntroStartPos(0);
wave_data->setIntroEndPos(scot_intro_length);
if(segue_start>0) {
wave_data->setSegueStartPos(getExtTimeLength()-10*segue_start);
wave_data->setSegueEndPos(getExtTimeLength());
}
if(scot_start_date.isValid()) {
wave_data->setStartDate(scot_start_date);
}
if(scot_start_time.isValid()) {
wave_data->setStartTime(scot_start_time);
}
if(scot_end_date.isValid()) {
wave_data->setEndDate(scot_end_date);
}
if(scot_end_time.isValid()) {
wave_data->setEndTime(scot_end_time);
}
}
return true;
}
bool RDWaveFile::GetAv10(int fd)
{
//
// The 'av10' chunk is used by BE AudioVault systems for metadata storage
//
unsigned chunk_size;
QString str;
int n;
int pos;
int offset;
bool ok=false;
int istate=0;
QString label;
QString arg;
QString userdef;
/*
* Load the chunk
*/
if(!GetChunk(fd,"av10",&chunk_size,av10_chunk_data,AV10_CHUNK_SIZE)) {
return false;
}
av10_chunk=true;
//
// Walk through the fields
//
for(unsigned i=2;i<chunk_size;i++) {
switch(istate) {
case 0: // Label
if(av10_chunk_data[i]==0) {
i++;
istate=1;
}
else {
label+=av10_chunk_data[i];
}
break;
case 1: // Argument
if(av10_chunk_data[i]==0) { // Found a label/value pair, see if we can
// use it
if(label=="1") { // Start/end markers
if((n=arg.find(","))>0) {
pos=arg.left(n).toInt(&ok);
if(ok) {
offset=arg.right(arg.length()-n-1).toInt(&ok);
if(ok) {
if(wave_data!=NULL) {
wave_data->setStartPos(pos);
wave_data->setEndPos(pos+offset);
wave_data->setMetadataFound(true);
}
}
}
}
}
if(label=="2") { // Segue markers
if((n=arg.find(","))>0) {
pos=arg.left(n).toInt(&ok);
if(ok) {
offset=arg.right(arg.length()-n-1).toInt(&ok);
if(ok) {
if(wave_data!=NULL) {
wave_data->setSegueStartPos(pos);
wave_data->setSegueEndPos(pos+offset);
wave_data->setMetadataFound(true);
}
}
}
}
}
if(label=="C") { // AV Category
userdef+=("av_category="+arg+", ");
}
if(label=="CI") { // AV Artist/Client
if(wave_data!=NULL) {
wave_data->setArtist(arg);
}
}
if(label=="CL") { // AV Class
userdef+=("av_class="+arg+", ");
}
if(label=="CO") { // AV Codes
userdef+=("av_codes="+arg+", ");
}
if(label=="D") { // AV Description
if(wave_data!=NULL) {
wave_data->setTitle(arg);
wave_data->setMetadataFound(true);
}
}
if(label=="G") { // AV ???
}
if(label=="IN") { // AV Intro
if(ok) {
if(wave_data!=NULL) {
wave_data->setIntroStartPos(wave_data->startPos());
wave_data->setIntroEndPos(1000*arg.toInt());
wave_data->setMetadataFound(true);
}
}
}
if(label=="K") { // AV Kill Date
}
if(label=="N") { // AV Name
}
if(label=="Q") { // AV Outcue
if(wave_data!=NULL) {
wave_data->setOutCue(arg);
wave_data->setMetadataFound(true);
}
}
if(label=="S") { // AV Start Date
}
if(label=="SR") { // AV ???
}
// printf("Label: %s Arg: %s\n",(const char *)label,(const char *)arg);
label="";
arg="";
istate=0;
}
else {
arg+=av10_chunk_data[i];
}
break;
}
if(!userdef.isEmpty()) {
if(wave_data!=NULL) {
wave_data->setUserDefined(userdef.left(userdef.length()-2));
}
}
}
return true;
}
bool RDWaveFile::GetAir1(int fd)
{
//
// The 'AIR1' chunk is used by AirForce systems for metadata storage
//
unsigned chunk_size;
/*
* Load the chunk
*/
if(!GetChunk(fd,"AIR1",&chunk_size,AIR1_chunk_data,AIR1_CHUNK_SIZE)) {
return false;
}
AIR1_chunk_data[2047]=0;
if(wave_data!=NULL) {
wave_data->setTitle(cutString((char *)AIR1_chunk_data,0x102,27).
stripWhiteSpace());
wave_data->setArtist(cutString((char *)AIR1_chunk_data,0x147,27).
stripWhiteSpace());
wave_data->setAlbum(cutString((char *)AIR1_chunk_data,0x163,27).
stripWhiteSpace());
wave_data->setReleaseYear(cutString((char *)AIR1_chunk_data,0x17F,4).
toInt());
wave_data->setMetadataFound(true);
}
AIR1_chunk=true;
return true;
}
bool RDWaveFile::GetRdxl(int fd)
{
off_t pos;
unsigned chunk_size=0;
char *chunk=NULL;
if((pos=FindChunk(fd,"rdxl",&chunk_size))<0) {
return false;
}
lseek(fd,SEEK_SET,pos);
chunk=new char[chunk_size+1];
memset(chunk,0,chunk_size+1);
read(fd,chunk,chunk_size);
rdxl_contents=QString::fromUtf8(chunk);
delete chunk;
if(wave_data!=NULL) {
std::vector<RDWaveData> wavedatas;
if(RDCart::readXml(&wavedatas,rdxl_contents)>1) {
*wave_data=wavedatas[1];
}
}
return true;
}
bool RDWaveFile::GetComm(int fd)
{
unsigned chunk_size;
/*
* Load the chunk
*/
if(!GetChunk(fd,"COMM",&chunk_size,comm_chunk_data,COMM_CHUNK_SIZE,true)) {
comm_chunk=false;
return false;
}
comm_chunk=true;
format_tag=WAVE_FORMAT_PCM; // We support only PCM AIFFs at the moment
channels=comm_chunk_data[1]+256*fmt_chunk_data[0];
sample_length=comm_chunk_data[5]+256*comm_chunk_data[4]+
65536*comm_chunk_data[3]+16777216*comm_chunk_data[2];
bits_per_sample=comm_chunk_data[6]+256*comm_chunk_data[7];
samples_per_sec=256*(0xFF&comm_chunk_data[10])+(0xFF&comm_chunk_data[11]);
return true;
}
bool RDWaveFile::GetList(int fd)
{
unsigned chunk_size=0;
if((wave_data==NULL)||(FindChunk(fd,"list",&chunk_size)<0)) {
return false;
}
unsigned char *chunk_data=new unsigned char[chunk_size];
read(fd,chunk_data,chunk_size);
/*
if(strncmp("INFO",chunk_data,4)) {
delete chunk_data;
return false;
}
*/
unsigned offset=4;
while(ReadListElement(chunk_data,&offset,chunk_size));
if((wave_data->segueStartPos()>=0)&&(wave_data->segueEndPos()<0)) {
wave_data->setSegueEndPos(ext_time_length);
}
return true;
}
bool RDWaveFile::ReadListElement(unsigned char *buffer,unsigned *offset,
unsigned size)
{
if(*offset>=size) {
return false;
}
char tag[5];
for(int i=0;i<4;i++) {
tag[i]=buffer[*offset+i];
}
tag[4]=0;
*offset+=4;
unsigned len=ReadDword(buffer,*offset);
*offset+=4;
if(!strcmp(tag,"tref")) {
wave_data->setTmciSongId(((char *)buffer)+(*offset));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tttl")) {
wave_data->setTitle(((char *)buffer)+(*offset));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tart")) {
wave_data->setArtist(((char *)buffer)+(*offset));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tcom")) {
wave_data->setComposer(((char *)buffer)+(*offset));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tpub")) {
wave_data->setPublisher(((char *)buffer)+(*offset));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tlic")) {
wave_data->setLicensingOrganization(((char *)buffer)+(*offset));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tlab")) {
wave_data->setLabel(((char *)buffer)+(*offset));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tint")) {
wave_data->setIntroStartPos(0);
wave_data->setIntroEndPos(RDSetTimeLength(((char *)buffer)+(*offset)));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"ttim")) {
wave_data->setStartPos(0);
wave_data->setEndPos(RDSetTimeLength(((char *)buffer)+(*offset)));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tend")) {
wave_data->setEndType((RDWaveData::EndType)(((char *)buffer)+(*offset))[0]);
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tyr ")) {
wave_data->setReleaseYear(QString(((char *)buffer)+(*offset)).toInt());
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"taux")) {
wave_data->setSegueStartPos(RDSetTimeLength(((char *)buffer)+(*offset)));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tbpm")) {
wave_data->setBeatsPerMinute(QString(((char *)buffer)+(*offset)).toInt());
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"talb")) {
wave_data->setAlbum(((char *)buffer)+(*offset));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tpli")) {
wave_data->setCopyrightNotice(((char *)buffer)+(*offset));
wave_data->setMetadataFound(true);
}
if(!strcmp(tag,"tisr")) {
wave_data->setIsrc(QString(((char *)buffer)+(*offset)).remove(" "));
wave_data->setMetadataFound(true);
}
*offset+=len;
while(((*offset)<size) && (buffer[*offset]==0)) {
(*offset)++;
}
return true;
}
bool RDWaveFile::ReadTmcMetadata(int fd)
{
char buffer[256];
QString current_tag;
lseek(fd,data_length+4,SEEK_SET);
while(GetLine(fd,buffer,255)) {
if(buffer[0]=='#') {
current_tag=QString(buffer+1);
}
else {
if(!current_tag.isEmpty()) {
ReadTmcTag(current_tag,QString(buffer));
}
}
}
return false;
}
void RDWaveFile::ReadTmcTag(const QString tag,const QString value)
{
if(tag=="TITLE") {
wave_data->setTitle(value.stripWhiteSpace());
wave_data->setMetadataFound(true);
}
if(tag=="ARTIST") {
wave_data->setArtist(value.stripWhiteSpace());
wave_data->setMetadataFound(true);
}
if(tag=="COMPOSER") {
wave_data->setComposer(value.stripWhiteSpace());
wave_data->setMetadataFound(true);
}
if(tag=="PUBLISHER") {
wave_data->setPublisher(value.stripWhiteSpace());
wave_data->setMetadataFound(true);
}
if(tag=="LICENSE") {
wave_data->setLicensingOrganization(value.stripWhiteSpace());
wave_data->setMetadataFound(true);
}
if(tag=="LABEL") {
wave_data->setLabel(value.stripWhiteSpace());
wave_data->setMetadataFound(true);
}
if(tag=="ALBUM") {
wave_data->setAlbum(value.stripWhiteSpace());
wave_data->setMetadataFound(true);
}
if(tag=="YEAR") {
wave_data->setReleaseYear(value.stripWhiteSpace().toInt());
wave_data->setMetadataFound(true);
}
if(tag=="INTRO") {
wave_data->setIntroStartPos(0);
wave_data->setIntroEndPos(RDSetTimeLength(value.stripWhiteSpace()));
wave_data->setMetadataFound(true);
}
if(tag=="AUX") {
wave_data->setSegueStartPos(RDSetTimeLength(value.stripWhiteSpace()));
wave_data->setMetadataFound(true);
}
if(tag=="END") {
wave_data->setEndType((RDWaveData::EndType)((char)value.at(0).toAscii()));
wave_data->setMetadataFound(true);
}
if(tag=="TMCIREF") {
wave_data->setTmciSongId(value.stripWhiteSpace());
wave_data->setMetadataFound(true);
}
if(tag=="BPM") {
wave_data->setBeatsPerMinute(value.toInt());
wave_data->setMetadataFound(true);
}
if(tag=="ISRC") {
QString str=value;
wave_data->setIsrc(str.remove(" ").stripWhiteSpace());
wave_data->setMetadataFound(true);
}
if(tag=="PLINE") {
wave_data->setCopyrightNotice(value.stripWhiteSpace());
wave_data->setMetadataFound(true);
}
}
bool RDWaveFile::GetLine(int fd,char *buffer,int max_len)
{
for(int i=0;i<max_len;i++) {
if(read(fd,buffer+i,1)==0) {
return false;
}
if(buffer[i]==10) {
if(buffer[i-1]==13) {
buffer[i-1]=0;
}
else {
buffer[i]=0;
}
return true;
}
}
buffer[max_len-1]=0;
return true;
}
void RDWaveFile::ReadId3Metadata()
{
if(wave_data==NULL) {
return;
}
ID3_Frame *frame=NULL;
ID3_Tag id3_tag(Q3CString().sprintf("%s",(const char *)wave_file.name().utf8()));
if((frame=id3_tag.Find(ID3FID_USERTEXT,ID3FN_DESCRIPTION,"rdxl"))!=NULL) {
rdxl_contents=ID3_GetString(frame,ID3FN_TEXT);
if(wave_data!=NULL) {
std::vector<RDWaveData> wavedatas;
if(RDCart::readXml(&wavedatas,rdxl_contents)>1) {
*wave_data=wavedatas[1];
}
}
}
else {
if((frame=id3_tag.Find(ID3FID_TITLE))!=NULL) {
wave_data->setTitle(ID3_GetString(frame,ID3FN_TEXT));
wave_data->setMetadataFound(true);
}
if((frame=id3_tag.Find(ID3FID_BPM))!=NULL) {
wave_data->
setBeatsPerMinute(QString(ID3_GetString(frame,ID3FN_TEXT)).toInt());
wave_data->setMetadataFound(true);
}
if((frame=id3_tag.Find(ID3FID_ALBUM))!=NULL) {
wave_data->setAlbum(ID3_GetString(frame,ID3FN_TEXT));
wave_data->setMetadataFound(true);
}
if((frame=id3_tag.Find(ID3FID_COMPOSER))!=NULL) {
wave_data->setComposer(ID3_GetString(frame,ID3FN_TEXT));
wave_data->setMetadataFound(true);
}
if((frame=id3_tag.Find(ID3FID_COPYRIGHT))!=NULL) {
wave_data->setCopyrightNotice(ID3_GetString(frame,ID3FN_TEXT));
wave_data->setMetadataFound(true);
}
if((frame=id3_tag.Find(ID3FID_ORIGARTIST))!=NULL) {
wave_data->setArtist(ID3_GetString(frame,ID3FN_TEXT));
wave_data->setMetadataFound(true);
}
if((frame=id3_tag.Find(ID3FID_LEADARTIST))!=NULL) {
wave_data->setArtist(ID3_GetString(frame,ID3FN_TEXT));
wave_data->setMetadataFound(true);
}
if((frame=id3_tag.Find(ID3FID_CONDUCTOR))!=NULL) {
wave_data->setConductor(ID3_GetString(frame,ID3FN_TEXT));
wave_data->setMetadataFound(true);
}
if((frame=id3_tag.Find(ID3FID_PUBLISHER))!=NULL) {
wave_data->setPublisher(ID3_GetString(frame,ID3FN_TEXT));
wave_data->setMetadataFound(true);
}
if((frame=id3_tag.Find(ID3FID_ISRC))!=NULL) {
wave_data->setIsrc(ID3_GetString(frame,ID3FN_TEXT));
wave_data->setMetadataFound(true);
}
if((frame=id3_tag.Find(ID3FID_YEAR))!=NULL) {
wave_data->
setReleaseYear(QString(ID3_GetString(frame,ID3FN_TEXT)).toInt());
wave_data->setMetadataFound(true);
}
}
}
bool RDWaveFile::GetMpegHeader(int fd,int offset)
{
unsigned char buffer[4];
int n;
lseek(fd,offset,SEEK_SET);
if((n=read(fd,buffer,4))!=4) {
return false;
}
//
// Sync
//
if((buffer[0]!=0xFF)||((buffer[1]&0xE0)!=0xE0)) {
return false;
}
//
// MPEG Id
//
if((buffer[1]&0x08)==0) {
mpeg_id=RDWaveFile::Mpeg2;
}
else {
mpeg_id=RDWaveFile::Mpeg1;
}
//
// Layer
//
switch((buffer[1]&0x06)>>1) {
case 1:
head_layer=3;
break;
case 2:
head_layer=2;
break;
case 3:
head_layer=1;
break;
default:
return false;
}
//
// Bitrate
//
switch(mpeg_id) {
case RDWaveFile::Mpeg1:
switch(head_layer) {
case 1:
switch(buffer[2]>>4) {
case 1:
head_bit_rate=32000;
break;
case 2:
head_bit_rate=64000;
break;
case 3:
head_bit_rate=96000;
break;
case 4:
head_bit_rate=128000;
break;
case 5:
head_bit_rate=160000;
break;
case 6:
head_bit_rate=192000;
break;
case 7:
head_bit_rate=224000;
break;
case 8:
head_bit_rate=256000;
break;
case 9:
head_bit_rate=288000;
break;
case 10:
head_bit_rate=320000;
break;
case 11:
head_bit_rate=352000;
break;
case 12:
head_bit_rate=384000;
break;
case 13:
head_bit_rate=416000;
break;
case 14:
head_bit_rate=448000;
break;
default:
return false;
}
break;
case 2:
switch(buffer[2]>>4) {
case 1:
head_bit_rate=32000;
break;
case 2:
head_bit_rate=48000;
break;
case 3:
head_bit_rate=56000;
break;
case 4:
head_bit_rate=64000;
break;
case 5:
head_bit_rate=80000;
break;
case 6:
head_bit_rate=96000;
break;
case 7:
head_bit_rate=112000;
break;
case 8:
head_bit_rate=128000;
break;
case 9:
head_bit_rate=160000;
break;
case 10:
head_bit_rate=192000;
break;
case 11:
head_bit_rate=224000;
break;
case 12:
head_bit_rate=256000;
break;
case 13:
head_bit_rate=320000;
break;
case 14:
head_bit_rate=384000;
break;
default:
return false;
break;
}
break;
case 3:
switch(buffer[2]>>4) {
case 1:
head_bit_rate=32000;
break;
case 2:
head_bit_rate=40000;
break;
case 3:
head_bit_rate=48000;
break;
case 4:
head_bit_rate=56000;
break;
case 5:
head_bit_rate=64000;
break;
case 6:
head_bit_rate=80000;
break;
case 7:
head_bit_rate=96000;
break;
case 8:
head_bit_rate=112000;
break;
case 9:
head_bit_rate=128000;
break;
case 10:
head_bit_rate=160000;
break;
case 11:
head_bit_rate=192000;
break;
case 12:
head_bit_rate=224000;
break;
case 13:
head_bit_rate=256000;
break;
case 14:
head_bit_rate=320000;
break;
default:
return false;
break;
}
break;
}
break;
case RDWaveFile::Mpeg2:
switch(head_layer) {
case 1:
switch(buffer[2]>>4) {
case 1:
head_bit_rate=32000;
break;
case 2:
head_bit_rate=48000;
break;
case 3:
head_bit_rate=56000;
break;
case 4:
head_bit_rate=64000;
break;
case 5:
head_bit_rate=80000;
break;
case 6:
head_bit_rate=96000;
break;
case 7:
head_bit_rate=112000;
break;
case 8:
head_bit_rate=128000;
break;
case 9:
head_bit_rate=144000;
break;
case 10:
head_bit_rate=160000;
break;
case 11:
head_bit_rate=176000;
break;
case 12:
head_bit_rate=192000;
break;
case 13:
head_bit_rate=224000;
break;
case 14:
head_bit_rate=256000;
break;
default:
return false;
}
break;
case 2:
switch(buffer[2]>>4) {
case 1:
head_bit_rate=8000;
break;
case 2:
head_bit_rate=16000;
break;
case 3:
head_bit_rate=24000;
break;
case 4:
head_bit_rate=32000;
break;
case 5:
head_bit_rate=40000;
break;
case 6:
head_bit_rate=48000;
break;
case 7:
head_bit_rate=56000;
break;
case 8:
head_bit_rate=64000;
break;
case 9:
head_bit_rate=80000;
break;
case 10:
head_bit_rate=96000;
break;
case 11:
head_bit_rate=112000;
break;
case 12:
head_bit_rate=128000;
break;
case 13:
head_bit_rate=144000;
break;
case 14:
head_bit_rate=160000;
break;
default:
return false;
break;
}
break;
case 3:
switch(buffer[2]>>4) {
case 1:
head_bit_rate=8000;
break;
case 2:
head_bit_rate=16000;
break;
case 3:
head_bit_rate=24000;
break;
case 4:
head_bit_rate=32000;
break;
case 5:
head_bit_rate=40000;
break;
case 6:
head_bit_rate=48000;
break;
case 7:
head_bit_rate=56000;
break;
case 8:
head_bit_rate=64000;
break;
case 9:
head_bit_rate=80000;
break;
case 10:
head_bit_rate=96000;
break;
case 11:
head_bit_rate=112000;
break;
case 12:
head_bit_rate=128000;
break;
case 13:
head_bit_rate=144000;
break;
case 14:
head_bit_rate=160000;
break;
default:
return false;
break;
}
break;
}
break;
default:
return false;
}
//
// Sample Rate
//
switch((buffer[2]>>2)&0x03) {
case 0:
switch(mpeg_id) {
case RDWaveFile::Mpeg1:
samples_per_sec=44100;
break;
case RDWaveFile::Mpeg2:
samples_per_sec=22050;
break;
default:
break;
}
break;
case 1:
switch(mpeg_id) {
case RDWaveFile::Mpeg1:
samples_per_sec=48000;
break;
case RDWaveFile::Mpeg2:
samples_per_sec=24000;
break;
default:
break;
}
break;
case 2:
switch(mpeg_id) {
case RDWaveFile::Mpeg1:
samples_per_sec=32000;
break;
case RDWaveFile::Mpeg2:
samples_per_sec=16000;
break;
default:
break;
}
break;
default:
return false;
break;
}
//
// Mode
//
switch(buffer[3]>>6) {
case 0:
head_mode=ACM_MPEG_STEREO;
channels=2;
break;
case 1:
head_mode=ACM_MPEG_JOINTSTEREO;
channels=2;
break;
case 2:
head_mode=ACM_MPEG_DUALCHANNEL;
channels=2;
break;
case 3:
head_mode=ACM_MPEG_SINGLECHANNEL;
channels=1;
break;
}
//
// Flags
//
if((buffer[2]&0x01)!=0) {
head_flags|=ACM_MPEG_PRIVATEBIT;
}
if((buffer[3]&0x08)!=0) {
head_flags|=ACM_MPEG_COPYRIGHT;
}
if((buffer[3]&0x04)!=0) {
head_flags|=ACM_MPEG_ORIGINALHOME;
}
if((buffer[1]&0x01)!=0) {
head_flags|=ACM_MPEG_PROTECTIONBIT;
}
if(mpeg_id==RDWaveFile::Mpeg1) {
head_flags|=ACM_MPEG_ID_MPEG1;
}
//
// Frame Size (without padding)
//
mpeg_frame_size=144*head_bit_rate/samples_per_sec;
return true;
}
int RDWaveFile::GetAtxOffset(int fd)
{
unsigned char buffer[MAX_ATX_HEADER_SIZE];
lseek(fd,0,SEEK_SET);
int n=read(fd,buffer,MAX_ATX_HEADER_SIZE-1);
for(int i=0;i<n;i++) {
if(buffer[i]==0xFF) {
return i;
}
}
return -1;
}
bool RDWaveFile::GetFlacStreamInfo()
{
#if HAVE_FLAC
FLAC__StreamMetadata sinfo;
if(!FLAC__metadata_get_streaminfo(Q3CString().sprintf("%s",(const char *)wave_file.name().utf8()),&sinfo)) {
return false;
}
samples_per_sec=sinfo.data.stream_info.sample_rate;
bits_per_sample=sinfo.data.stream_info.bits_per_sample;
sample_length=sinfo.data.stream_info.total_samples;
channels=sinfo.data.stream_info.channels;
ext_time_length=(unsigned)(1000.0*(double)sample_length/(double)samples_per_sec);
time_length=ext_time_length/1000;
return true;
#else
return false;
#endif // HAVE_FLAC
}
void RDWaveFile::ReadFlacMetadata()
{
#ifdef HAVE_FLAC_METADATA
QString artist;
QString composer;
FLAC__StreamMetadata* tags;
if(!FLAC__metadata_get_tags(Q3CString().
sprintf("%s",(const char *)wave_file.name().utf8()),&tags)) {
return;
}
for(unsigned iCommentIndex=0;
iCommentIndex<tags->data.vorbis_comment.num_comments;
++iCommentIndex)
{
FLAC__StreamMetadata_VorbisComment_Entry&
comment(tags->data.vorbis_comment.comments[iCommentIndex]);
// comment.entry is a UTF-8 string of comment.length octets
// (http://www.xiph.org/vorbis/doc/v-comment.html)
QString entry=
QString::fromUtf8((const char *)comment.entry, comment.length);
// every entry is a name=value pair. Name is not allowed to contain a '='
// so we just scan to the first instance of it.
int nameLength = entry.find('=');
if(nameLength < 0) continue; // malformed comment, it would seem
QString name = entry.left(nameLength), value = entry.mid(nameLength + 1);
if(name=="TITLE") {
wave_data->setTitle(value);
wave_data->setMetadataFound(true);
continue;
}
if(name=="ARTIST") {
composer=value;
wave_data->setMetadataFound(true);
continue;
}
if(name=="PERFORMER") {
artist=value;
wave_data->setMetadataFound(true);
}
if(name=="ALBUM") {
wave_data->setAlbum(value);
wave_data->setMetadataFound(true);
continue;
}
if(name=="ORGANIZATION") {
wave_data->setLabel(value);
wave_data->setMetadataFound(true);
continue;
}
// TODO: Parse the date field to get the year out
//if(name == "DATE") { wave_data->setReleaseYear(value);
//wave_data->setMetadataFound(true); continue; }
if(name=="ISRC") {
wave_data->setIsrc(value);
wave_data->setMetadataFound(true);
continue;
}
}
if((!artist.isEmpty())&&(!composer.isEmpty())) {
wave_data->setArtist(artist);
wave_data->setComposer(composer);
}
else {
if(!artist.isEmpty()) {
wave_data->setArtist(artist);
}
else {
wave_data->setArtist(composer);
}
}
FLAC__metadata_object_delete(tags);
#endif // HAVE_FLAC_METADATA
}
bool RDWaveFile::MakeFmt()
{
if((format_tag!=WAVE_FORMAT_PCM)&&(format_tag!=WAVE_FORMAT_MPEG)) {
return false;
}
if((channels!=1)&&(channels!=2)) {
return false;
}
if(samples_per_sec==0) {
return false;
}
if(format_tag==WAVE_FORMAT_PCM) {
switch(bits_per_sample) {
case 8:
block_align=channels;
break;
case 16:
block_align=2*channels;
break;
case 24:
block_align=3*channels;
break;
case 32:
block_align=4*channels;
break;
default:
return false;
break;
}
avg_bytes_per_sec=block_align*samples_per_sec;
cb_size=0;
WriteSword(fmt_chunk_data,0,format_tag);
WriteSword(fmt_chunk_data,2,channels);
WriteDword(fmt_chunk_data,4,samples_per_sec);
WriteDword(fmt_chunk_data,8,avg_bytes_per_sec);
WriteSword(fmt_chunk_data,12,block_align);
WriteSword(fmt_chunk_data,14,bits_per_sample);
WriteSword(fmt_chunk_data,16,cb_size);
fmt_size=18;
return true;
}
if(format_tag==WAVE_FORMAT_MPEG) {
bits_per_sample=0;
block_align=144*head_bit_rate/samples_per_sec;
cb_size=40;
if(head_layer==0) {
return false;
}
if(head_bit_rate==0) {
return false;
}
if((!mext_padding_used)&&((samples_per_sec==11025)||
(samples_per_sec==22050)||
(samples_per_sec==44100))) {
avg_bytes_per_sec=samples_per_sec*block_align/1152;
}
else {
avg_bytes_per_sec=head_bit_rate/8;
}
if(head_mode==0) {
return false;
}
head_flags|=ACM_MPEG_ID_MPEG1;
WriteSword(fmt_chunk_data,0,format_tag);
WriteSword(fmt_chunk_data,2,channels);
WriteDword(fmt_chunk_data,4,samples_per_sec);
WriteDword(fmt_chunk_data,8,avg_bytes_per_sec);
WriteSword(fmt_chunk_data,12,block_align);
WriteSword(fmt_chunk_data,14,bits_per_sample);
WriteSword(fmt_chunk_data,16,cb_size);
WriteSword(fmt_chunk_data,18,head_layer);
WriteDword(fmt_chunk_data,20,head_bit_rate);
WriteSword(fmt_chunk_data,24,head_mode);
WriteSword(fmt_chunk_data,26,head_mode_ext);
WriteSword(fmt_chunk_data,28,head_emphasis);
WriteSword(fmt_chunk_data,30,head_flags);
WriteDword(fmt_chunk_data,32,0);
WriteDword(fmt_chunk_data,36,0);
fmt_size=40;
return true;
}
return false;
}
bool RDWaveFile::MakeCart(unsigned ptr_offset)
{
for(int i=0;i<CART_CHUNK_SIZE;i++) {
cart_chunk_data[i]=0;
}
sprintf((char *)cart_chunk_data,"%4s",
CART_VERSION);
if(!cart_title.isEmpty()) {
sprintf((char *)cart_chunk_data+4,"%s",
(const char *)cart_title.left(64));
}
if(!cart_artist.isEmpty()) {
sprintf((char *)cart_chunk_data+68,"%s",
(const char *)cart_artist.left(64));
}
if(!cart_cut_id.isEmpty()) {
sprintf((char *)cart_chunk_data+132,"%s",
(const char *)cart_cut_id.left(64));
}
if(!cart_client_id.isEmpty()) {
sprintf((char *)cart_chunk_data+196,"%s",
(const char *)cart_client_id.left(64));
}
if(!cart_category.isEmpty()) {
sprintf((char *)cart_chunk_data+260,"%s",
(const char *)cart_category.left(64));
}
if(!cart_classification.isEmpty()) {
sprintf((char *)cart_chunk_data+324,"%s",
(const char *)cart_classification.left(64));
}
if(!cart_out_cue.isEmpty()) {
sprintf((char *)cart_chunk_data+388,"%s",
(const char *)cart_out_cue.left(64));
}
sprintf((char *)cart_chunk_data+452,"%04d/%02d/%02d",
cart_start_date.year(),
cart_start_date.month(),
cart_start_date.day());
sprintf((char *)cart_chunk_data+462,"%02d:%02d:%02d",
cart_start_time.hour(),
cart_start_time.minute(),
cart_start_time.second());
sprintf((char *)cart_chunk_data+470,"%04d/%02d/%02d",
cart_end_date.year(),
cart_end_date.month(),
cart_end_date.day());
sprintf((char *)cart_chunk_data+480,"%02d:%02d:%02d",
cart_end_time.hour(),
cart_end_time.minute(),
cart_end_time.second());
snprintf((char *)cart_chunk_data+488,64,"%s",PACKAGE);
snprintf((char *)cart_chunk_data+552,64,"%s",VERSION);
if(!cart_user_def.isEmpty()) {
sprintf((char *)cart_chunk_data+616,"%s",
(const char *)cart_user_def.left(64));
}
WriteDword(cart_chunk_data,680,cart_level_ref);
if(wave_data!=NULL) {
int timer=0;
if((wave_data->segueStartPos()>=0)&&
(wave_data->segueEndPos()>wave_data->segueStartPos())) {
sprintf((char *)cart_chunk_data+684+timer*MAX_TIMERS,"SEGs");
WriteDword(cart_chunk_data,688+timer*MAX_TIMERS,
FrameOffset(wave_data->segueStartPos()-ptr_offset_msecs));
timer++;
sprintf((char *)cart_chunk_data+684+timer*MAX_TIMERS,"SEGe");
WriteDword(cart_chunk_data,688+timer*MAX_TIMERS,
FrameOffset(wave_data->segueEndPos()-ptr_offset_msecs));
timer++;
}
if((wave_data->introStartPos()>=0)&&
(wave_data->introEndPos()>wave_data->introStartPos())) {
sprintf((char *)cart_chunk_data+684+timer*MAX_TIMERS,"INTs");
WriteDword(cart_chunk_data,688+timer*MAX_TIMERS,
FrameOffset(wave_data->introStartPos()-ptr_offset_msecs));
timer++;
sprintf((char *)cart_chunk_data+684+timer*MAX_TIMERS,"INTe");
WriteDword(cart_chunk_data,688+timer*MAX_TIMERS,
FrameOffset(wave_data->introEndPos()-ptr_offset_msecs));
timer++;
}
if((wave_data->startPos()>=0)&&
(wave_data->endPos()>wave_data->startPos())) {
sprintf((char *)cart_chunk_data+684+timer*MAX_TIMERS,"AUDs");
WriteDword(cart_chunk_data,688+timer*MAX_TIMERS,
FrameOffset(wave_data->startPos()-ptr_offset_msecs));
timer++;
sprintf((char *)cart_chunk_data+684+timer*MAX_TIMERS,"AUDe");
WriteDword(cart_chunk_data,688+timer*MAX_TIMERS,
FrameOffset(wave_data->endPos()-ptr_offset_msecs));
timer++;
}
}
if(!cart_url.isEmpty()) {
sprintf((char *)cart_chunk_data+1020,"%s",
(const char *)cart_url.left(1024));
}
return true;
}
bool RDWaveFile::MakeBext()
{
bext_coding_size=bext_coding_history.length()+BEXT_CHUNK_SIZE;
bext_coding_data=(unsigned char *)realloc(bext_coding_data,bext_coding_size);
for(int i=0;i<BEXT_CHUNK_SIZE;i++) {
bext_coding_data[i]=0;
}
if(!bext_description.isEmpty()) {
sprintf((char *)bext_coding_data,"%s",
(const char *)bext_description.left(256));
}
if(!bext_originator.isEmpty()) {
sprintf((char *)bext_coding_data+256,"%s",
(const char *)bext_originator.left(32));
}
if(!bext_originator_ref.isEmpty()) {
sprintf((char *)bext_coding_data+288,"%s",
(const char *)bext_originator_ref.left(32));
}
sprintf((char *)bext_coding_data+320,"%04d-%02d-%02d",
bext_origination_date.year(),
bext_origination_date.month(),
bext_origination_date.day());
sprintf((char *)bext_coding_data+330,"%02d:%02d:%02d",
bext_origination_time.hour(),
bext_origination_time.minute(),
bext_origination_time.second());
WriteDword(bext_coding_data,338,bext_time_reference_low);
WriteDword(bext_coding_data,342,bext_time_reference_high);
WriteSword(bext_coding_data,346,BWF_VERSION);
for(int i=0;i<64;i++) {
bext_coding_data[i+348]=bext_umid[i];
}
if(!bext_coding_history.isEmpty()) {
sprintf((char *)bext_coding_data+602,"%s",
(const char *)bext_coding_history);
}
return true;
}
bool RDWaveFile::MakeMext()
{
for(int i=0;i<MEXT_CHUNK_SIZE;i++) {
mext_chunk_data[i]=0;
}
if(mext_homogenous) {
mext_chunk_data[0]|=1;
}
if(!mext_padding_used) {
mext_chunk_data[0]|=2;
}
if(mext_rate_hacked) {
mext_chunk_data[0]|=4;
}
if(mext_free_format) {
mext_chunk_data[0]|=8;
}
if(mext_homogenous) {
WriteSword(mext_chunk_data,2,mext_frame_size);
}
WriteSword(mext_chunk_data,4,mext_anc_length);
if(mext_left_energy) {
mext_chunk_data[6]|=1;
}
if(mext_ancillary_private) {
mext_chunk_data[6]|=2;
}
if(mext_right_energy) {
mext_chunk_data[6]|=4;
}
return true;
}
bool RDWaveFile::MakeLevl()
{
for(int i=0;i<LEVL_CHUNK_SIZE;i++) {
levl_chunk_data[i]=0;
}
WriteDword(levl_chunk_data,0,levl_version);
WriteDword(levl_chunk_data,4,levl_format); // Format
WriteDword(levl_chunk_data,8,levl_points); // Points per Value
WriteDword(levl_chunk_data,12,levl_block_size); // Blocksize
WriteDword(levl_chunk_data,16,levl_channels); // Channels
WriteDword(levl_chunk_data,20,levl_frames); // Total Peak Values
WriteDword(levl_chunk_data,24,levl_peak_offset); // Offset to Peak-of-Peaks
WriteDword(levl_chunk_data,28,132); // Offset to Peak Data
sprintf((char *)levl_chunk_data+32,"%s",
(const char *)levl_timestamp.toString("yyyy:MM:dd:hh:mm:ss:000"));
return true;
}
QString RDWaveFile::cutString(char *buffer,unsigned start_point,unsigned size)
{
QString string;
for(unsigned i=start_point;i<start_point+size;i++) {
string=string.append(buffer[i]);
}
return string;
}
QDate RDWaveFile::cutDate(char *buffer,unsigned start_point)
{
int i;
char date_buf[11];
int day=0,mon=0,year=0;
for(i=0;i<4;i++) {
date_buf[i]=buffer[start_point+i];
}
date_buf[4]=0;
sscanf(date_buf,"%d",&year);
if(year>RD_MAX_YEAR) {
year=RD_MAX_YEAR;
}
for(i=0;i<2;i++) {
date_buf[i]=buffer[start_point+i+5];
}
date_buf[2]=0;
sscanf(date_buf,"%d",&mon);
for(i=0;i<4;i++) {
date_buf[i]=buffer[start_point+i+8];
}
date_buf[2]=0;
sscanf(date_buf,"%d",&day);
if((mon>0)&&(mon<13)&&(day>0)&&(day<32)) {
return QDate(year,mon,day);
}
return QDate();
}
QTime RDWaveFile::cutTime(char *buffer,unsigned start_point)
{
int i;
char time_buf[9];
int hour=0,min=0,sec=0;
for(i=0;i<8;i++) {
time_buf[i]=buffer[start_point+i];
}
time_buf[8]=0;
sscanf(time_buf,"%d:%d:%d",&hour,&min,&sec);
return QTime(hour,min,sec);
}
void RDWaveFile::WriteDword(unsigned char *buf,unsigned ptr,unsigned value)
{
buf[ptr]=value&0xff;
buf[ptr+1]=(value>>8)&0xff;
buf[ptr+2]=(value>>16)&0xff;
buf[ptr+3]=(value>>24)&0xff;
}
void RDWaveFile::WriteSword(unsigned char *buf,unsigned ptr,
unsigned short value)
{
buf[ptr]=value&0xff;
buf[ptr+1]=(value>>8)&0xff;
}
unsigned RDWaveFile::ReadDword(unsigned char *buffer,unsigned offset)
{
return buffer[offset]+256*buffer[offset+1]+
65536*buffer[offset+2]+16777216*buffer[offset+3];
}
unsigned short RDWaveFile::ReadSword(unsigned char *buffer,unsigned offset)
{
return buffer[offset]+256*buffer[offset+1];
}
void RDWaveFile::GetEnergy()
{
int file_ptr;
ReadEnergyFile(wave_file.name());
if(!levl_chunk) {
GetLevl(wave_file.handle());
}
if(energy_loaded) {
return;
}
file_ptr=lseek(wave_file.handle(),0,SEEK_CUR);
lseek(wave_file.handle(),0,SEEK_SET);
LoadEnergy();
energy_loaded=true;
lseek(wave_file.handle(),file_ptr,SEEK_SET);
}
unsigned RDWaveFile::LoadEnergy()
{
unsigned i=0;
unsigned char block[5];
char pcm[4608];
int block_size;
int offset;
unsigned energy_size;
energy_data.clear();
energy_size=getSampleLength()*getChannels()/1152;
seekWave(0,SEEK_SET);
switch(format_tag) {
case WAVE_FORMAT_MPEG:
if((head_layer==2)&&(mext_left_energy||mext_right_energy)) {
while(i<energy_size) {
lseek(wave_file.handle(),block_align-5,SEEK_CUR);
if(read(wave_file.handle(),block,5)<5) {
has_energy=true;
return i;
}
if(mext_left_energy) {
energy_data.push_back(block[4]+256*block[3]);
i++;
}
if(mext_right_energy) {
energy_data.push_back(block[1]+256*block[0]);
i++;
}
}
has_energy=true;
return i;
}
else {
has_energy=false;
return 0;
}
break;
case WAVE_FORMAT_PCM:
switch(bits_per_sample) {
case 16:
block_size=2304*channels;
while(i<energy_size) {
if(read(wave_file.handle(),pcm,block_size)!=block_size) {
has_energy=true;
return i;
}
for(int j=0;j<channels;j++) {
energy_data.push_back(0);
for(int k=0;k<1152;k++) {
offset=2*k*channels+2*j;
if((pcm[offset]+256*pcm[offset+1])>energy_data[i]) {
energy_data[i]=pcm[offset]+256*pcm[offset+1];
}
}
i++;
}
}
has_energy=true;
return i;
case 24:
block_size=3456*channels;
while(i<energy_size) {
if(read(wave_file.handle(),pcm,block_size)!=block_size) {
has_energy=true;
return i;
}
for(int j=0;j<channels;j++) {
energy_data.push_back(0);
for(int k=0;k<1152;k++) {
offset=3*k*channels+3*j;
if((pcm[offset]+256*pcm[offset+1])>energy_data[i]) {
energy_data[i]=pcm[offset]+256*pcm[offset+1];
}
}
i++;
}
}
has_energy=true;
return i;
}
break;
case WAVE_FORMAT_VORBIS:
block_size=2304*channels;
while(i<energy_size) {
if(readWave(pcm,block_size)!=block_size) {
has_energy=true;
return i;
}
for(int j=0;j<channels;j++) {
energy_data.push_back(0);
for(int k=0;k<1152;k++) {
offset=2*k*channels+2*j;
if((pcm[offset]+256*pcm[offset+1])>energy_data[i]) {
energy_data[i]=pcm[offset]+256*pcm[offset+1];
}
}
i++;
}
}
has_energy=true;
return i;
break;
default:
has_energy=false;
return 0;
break;
}
return 0;
}
bool RDWaveFile::ReadEnergyFile(QString wave_file_name)
{
if(has_energy && energy_loaded) return true;
/*
QFile energy_file;
QString str;
unsigned char frame[50];
energy_file.setName(wave_file_name+".energy");
if(!energy_file.open(QIODevice::ReadOnly))
return false;
if(energy_file.readLine(str,20) <= 0)
return false;
normalize_level=str.toDouble();
energy_file.close();
if(!energy_file.open(QIODevice::ReadOnly))
return false;
read(energy_file.handle(),frame,str.length());
int i=0;
while(read(energy_file.handle(),frame,2)>0) {
energy_data.push_back(frame[0]+256*frame[1]);
i++;
}
ext_time_length=
(unsigned)(1000.0*(((double)i*1152)/getChannels())/(double)samples_per_sec);
energy_file.close();
energy_loaded=true;
has_energy=true;
return true;
*/
return false;
}
bool RDWaveFile::ReadNormalizeLevel(QString wave_file_name)
{
QFile energy_file;
char str[21];
int n;
//
// FIXME: This is really evil!
//
energy_file.setName(wave_file_name+".energy");
if(!energy_file.open(QIODevice::ReadOnly))
return false;
if((n=energy_file.readLine(str,20)) <= 0)
return false;
str[n]=0;
normalize_level=QString(str).toDouble();
energy_file.close();
return true;
}
double RDWaveFile::getNormalizeLevel() const
{
return normalize_level;
}
void RDWaveFile::setNormalizeLevel(double level)
{
normalize_level=level;
}
void RDWaveFile::GrowAlloc(size_t size)
{
if(size>(size_t)cook_buffer_size) {
cook_buffer=(unsigned char *)realloc(cook_buffer,size);
cook_buffer_size=size;
}
}
void RDWaveFile::ValidateMetadata()
{
if(wave_data==NULL) {
return;
}
if(!wave_data->metadataFound()) {
return;
}
if(wave_data->startPos()<0) {
wave_data->setStartPos(0);
}
if(wave_data->endPos()<0) {
wave_data->setEndPos(ext_time_length);
}
if((wave_data->segueStartPos()>=0)&&(wave_data->segueEndPos()<0)) {
wave_data->setSegueEndPos(wave_data->endPos());
}
}
#ifdef HAVE_VORBIS
int RDWaveFile::WriteOggPage(ogg_page *page)
{
int n;
n=write(wave_file.handle(),page->header,page->header_len);
n+=write(wave_file.handle(),page->body,page->body_len);
return n;
}
#endif // HAVE_VORBIS
int RDWaveFile::WriteOggBuffer(char *buf,int size)
{
#ifdef HAVE_VORBIS
float **buffer=vorbis_analysis_buffer(&vorbis_dsp,size/channels);
for(int i=0;i<(size/(2*channels));i++) {
for(int j=0;j<channels;j++) {
/*
buffer[j][i]=
(float)((buf[2*channels*i+2*j]&0xff)|
((buf[2*channels*i+2*j+1]&0xff)<<8))/32768.0f;
*/
/*
if(buffer[j][i]>high) {
high=buffer[j][i];
}
*/
buffer[j][i]=
((float)(buf[2*channels*i+2*j]&0xff)+
(256.0f*(float)(buf[2*channels*i+2*j+1]&0xff)))/32768.0f;
}
// printf("HIGH: %5.3f\n",high);
}
vorbis_analysis_wrote(&vorbis_dsp,size/(2*channels));
while(vorbis_analysis_blockout(&vorbis_dsp,&vorbis_blk)==1) {
vorbis_analysis(&vorbis_blk,NULL);
vorbis_bitrate_addblock(&vorbis_blk);
while(vorbis_bitrate_flushpacket(&vorbis_dsp,&ogg_pack)) {
ogg_stream_packetin(&ogg_stream,&ogg_pack);
while(ogg_stream_pageout(&ogg_stream,&ogg_pg)) {
WriteOggPage(&ogg_pg);
}
}
}
#endif // HAVE_VORBIS
return 0;
}
unsigned RDWaveFile::FrameOffset(int msecs) const
{
if(msecs<0) {
return 0;
}
return (unsigned)((double)msecs*(double)samples_per_sec/1000.0);
}