void tag_processor_id3v2::g_remove_ex(tag_write_callback & p_callback,const service_ptr_t<file> & p_file,t_uint64 & p_size_removed,abort_callback & p_abort)
{
p_file->ensure_seekable();
t_filesize len;
len = p_file->get_size(p_abort);
if (len == filesize_invalid) throw exception_io_no_length();
p_file->seek(0,p_abort);
t_uint64 offset;
g_multiskip(p_file,offset,p_abort);
if (offset>0 && offset<len)
{
len-=offset;
service_ptr_t<file> temp;
if (p_callback.open_temp_file(temp,p_abort)) {
file::g_transfer_object(p_file,temp,len,p_abort);
} else {
if (len > 16*1024*1024) filesystem::g_open_temp(temp,p_abort);
else filesystem::g_open_tempmem(temp,p_abort);
file::g_transfer_object(p_file,temp,len,p_abort);
p_file->seek(0,p_abort);
p_file->set_eof(p_abort);
temp->seek(0,p_abort);
file::g_transfer_object(temp,p_file,len,p_abort);
}
}
p_size_removed = offset;
}
void file::g_transfer_file(const service_ptr_t<file> & p_from,const service_ptr_t<file> & p_to,abort_callback & p_abort) {
t_filesize length = p_from->get_size_ex(p_abort);
p_from->seek(0,p_abort);
p_to->seek(0,p_abort);
p_to->set_eof(p_abort);
if (length > 0) {
g_transfer_object(p_from,p_to,length,p_abort);
}
}
void write(const service_ptr_t<file> & p_file,abort_callback & p_abort,const char * p_string,bool is_utf8)
{
p_file->seek(0,p_abort);
p_file->set_eof(p_abort);
if (is_utf8)
{
p_file->write_object(utf8_header,sizeof(utf8_header),p_abort);
p_file->write_object(p_string,strlen(p_string),p_abort);
}
else
{
#ifdef _WIN32
pfc::stringcvt::string_ansi_from_utf8 bah(p_string);
p_file->write_object(bah,bah.length(),p_abort);
#else
throw exception_io_data();
#endif
}
}
write_xid6( service_ptr_t<file> & p_file, const file_info & p_info, abort_callback & p_abort )
: m_file( p_file ), m_abort( p_abort )
{
pfc::stringcvt::string_ansi_from_utf8 converter;
t_filesize offset_tag_start;
const char * value;
t_uint32 int32 = 0;
p_file->seek_ex( 0, file::seek_from_eof, p_abort );
p_file->write_object( xid6_signature, 4, p_abort );
p_file->write_object_t( int32, p_abort );
offset_tag_start = p_file->get_position( p_abort );
value = p_info.meta_get( "title", 0 );
if ( value )
{
converter.convert( value );
if ( strlen( converter ) > 32 ) write_string( XID_SONG, converter );
}
value = p_info.meta_get( "album", 0 );
if ( value )
{
converter.convert( value );
if ( strlen( converter ) > 32 ) write_string( XID_GAME, converter );
}
value = p_info.meta_get( "artist", 0 );
if ( value )
{
converter.convert( value );
if ( strlen( converter ) > 32 ) write_string( XID_ARTIST, converter );
}
value = p_info.meta_get( "dumper", 0 );
if ( value )
{
converter.convert( value );
if ( strlen( converter ) > 16 ) write_string( XID_DUMPER, converter );
}
value = p_info.meta_get( "comment", 0 );
if ( value )
{
converter.convert( value );
if ( strlen( converter ) > 32 ) write_string( XID_CMNTS, converter );
}
value = p_info.meta_get( "OST", 0 );
if ( value )
{
converter.convert( value );
write_string( XID_OST, converter );
}
value = p_info.meta_get( "discnumber", 0 );
if ( value )
{
char * end;
unsigned disc = strtoul( value, &end, 10 );
if ( !*end && disc > 0 && disc <= 9 )
write_data( XID_DISC, disc );
}
value = p_info.meta_get( "tracknumber", 0 );
if ( value )
{
char * end;
unsigned track = strtoul( value, &end, 10 );
if ( track > 0 && track < 100 )
write_data( XID_TRACK, track * 0x100 + *end );
}
value = p_info.meta_get( "copyright", 0 );
if ( value )
{
char * end;
unsigned copyright_year = strtoul( value, &end, 10 );
if ( copyright_year > 0 && copyright_year < 65536 )
write_data( XID_COPY, copyright_year );
while ( *end && *end == ' ' ) end++;
if ( *end )
{
converter.convert( end );
write_string( XID_PUB, converter );
}
}
value = p_info.info_get( field_length );
if ( value )
{
char * end;
unsigned length = strtoul( value, &end, 10 );
if ( !*end && length > 0 && ( length % 1000 || length > 999000 ) )
write_int( XID_INTRO, length * 64 );
}
value = p_info.info_get( field_fade );
if ( value )
{
char * end;
unsigned fade = strtoul( value, &end, 10 );
if ( !*end && fade > 99999 )
write_int( XID_FADE, fade * 64 );
}
t_filesize offset = p_file->get_position( p_abort );
offset -= offset_tag_start;
if ( offset > ( 1 << 30 ) ) throw exception_io_data();
if ( offset )
{
int32 = t_uint32( offset );
p_file->seek( offset_tag_start - 4, p_abort );
p_file->write_lendian_t( int32, p_abort );
}
else
{
p_file->seek( offset_tag_start - 8, p_abort );
p_file->set_eof( p_abort );
}
}
