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

229 lines
8.5 KiB

12 years ago
/***************************************************************************
* Copyright (C) 2004-2009 by Thomas Fischer *
* fischer@unix-ag.uni-kl.de *
* *
* This program is free software; you can redistribute it and/or modify *
* it under the terms of the GNU General Public License as published by *
* the Free Software Foundation; either version 2 of the License, or *
* (at your option) any later version. *
* *
* 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., *
* 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
***************************************************************************/
#include <ntqregexp.h>
#include <ntqstringlist.h>
12 years ago
#include <file.h>
#include <element.h>
#include <entry.h>
#include <encoderxml.h>
#include <macro.h>
#include <comment.h>
#include "fileexporterxml.h"
namespace BibTeX
{
FileExporterXML::FileExporterXML() : FileExporter()
{
// nothing
}
FileExporterXML::~FileExporterXML()
{
// nothing
}
bool FileExporterXML::save( TQIODevice* iodevice, const File* bibtexfile, TQStringList * /*errorLog*/ )
12 years ago
{
m_mutex.lock();
bool result = TRUE;
m_cancelFlag = FALSE;
TQTextStream stream( iodevice );
stream.setEncoding( TQTextStream::UnicodeUTF8 );
12 years ago
stream << "<?xml version=\"1.0\" encoding=\"UTF-8\"?>" << endl;
stream << "<bibliography>" << endl;
int numElements = (int) bibtexfile->count(), i = 0;
emit progress( 0, numElements );
for ( File::ElementList::const_iterator it = bibtexfile->elements.begin(); it != bibtexfile->elements.end() && result && !m_cancelFlag; it++ )
{
Element *element = *it;
write( stream, element, bibtexfile );
emit progress( ++i, numElements );
}
stream << "</bibliography>" << endl;
m_mutex.unlock();
return result && !m_cancelFlag;
}
bool FileExporterXML::save( TQIODevice* iodevice, const Element* element, TQStringList * /*errorLog*/ )
12 years ago
{
TQTextStream stream( iodevice );
stream.setEncoding( TQTextStream::UnicodeUTF8 );
12 years ago
stream << "<?xml version=\"1.0\" encoding=\"UTF-8\"?>" << endl;
return write( stream, element );
}
void FileExporterXML::cancel()
{
m_cancelFlag = TRUE;
}
bool FileExporterXML::write( TQTextStream&stream, const Element *element, const File* bibtexfile )
12 years ago
{
bool result = FALSE;
const Entry *entry = dynamic_cast<const Entry*>( element );
if ( entry != NULL )
{
if ( bibtexfile != NULL )
{
entry = bibtexfile->completeReferencedFieldsConst( entry );
}
result |= writeEntry( stream, entry );
if ( bibtexfile != NULL )
delete entry;
}
else
{
const Macro * macro = dynamic_cast<const Macro*>( element );
if ( macro != NULL )
result |= writeMacro( stream, macro );
else
{
const Comment * comment = dynamic_cast<const Comment*>( element );
if ( comment != NULL )
result |= writeComment( stream, comment );
else
{
// preambles are ignored, make no sense in XML files
}
}
}
return result;
}
bool FileExporterXML::writeEntry( TQTextStream &stream, const Entry* entry )
12 years ago
{
stream << " <entry id=\"" << EncoderXML::currentEncoderXML() ->encode( entry->id() ) << "\" type=\"" << entry->entryTypeString().lower() << "\">" << endl;
for ( Entry::EntryFields::const_iterator it = entry->begin(); it != entry->end(); it++ )
{
EntryField *field = *it;
switch ( field->fieldType() )
{
case EntryField::ftAuthor:
case EntryField::ftEditor:
{
TQString tag = field->fieldTypeName().lower();
12 years ago
stream << " <" << tag << "s>" << endl;
TQStringList persons = TQStringList::split( TQRegExp( "\\s+(,|and|&)+\\s+", FALSE ), EncoderXML::currentEncoderXML() ->encode( valueToString( field->value() ) ) );
for ( TQStringList::Iterator it = persons.begin(); it != persons.end(); it++ )
12 years ago
stream << " <person>" << *it << "</person>" << endl;
stream << " </" << tag << "s>" << endl;
}
break;
case EntryField::ftMonth:
{
stream << " <month";
bool ok = FALSE;
int month = -1;
TQString tag = "";
TQString content = "";
for ( TQValueList<ValueItem*>::ConstIterator it = field->value()->items.begin(); it != field->value()->items.end(); ++it )
12 years ago
{
if ( dynamic_cast<MacroKey*>( *it ) != NULL )
{
for ( int i = 0; i < 12; i++ )
if ( TQString::compare(( *it )->text(), MonthsTriple[ i ] ) == 0 )
12 years ago
{
if ( month < 1 )
{
tag = MonthsTriple[ i ];
month = i + 1;
}
content.append( Months[ i ] );
ok = TRUE;
break;
}
}
else
content.append( EncoderXML::currentEncoderXML() ->encode(( *it )->text() ) );
}
if ( !ok )
content = EncoderXML::currentEncoderXML() ->encode( field->value()->simplifiedText() ) ;
if ( !tag.isEmpty() )
stream << " tag=\"" << tag << "\"";
if ( month > 0 )
stream << " month=\"" << month << "\"";
stream << '>' << content;
stream << "</month>" << endl;
}
break;
default:
{
TQString tag = field->fieldTypeName().lower();
12 years ago
stream << " <" << tag << ">" << EncoderXML::currentEncoderXML() ->encode( valueToString( field->value() ) ) << "</" << tag << ">" << endl;
}
break;
}
}
stream << " </entry>" << endl;
return TRUE;
}
bool FileExporterXML::writeMacro( TQTextStream &stream, const Macro *macro )
12 years ago
{
stream << " <string key=\"" << macro->key() << "\">";
stream << EncoderXML::currentEncoderXML() ->encode( valueToString( macro->value() ) );
stream << "</string>" << endl;
return TRUE;
}
bool FileExporterXML::writeComment( TQTextStream &stream, const Comment *comment )
12 years ago
{
stream << " <comment>" ;
stream << EncoderXML::currentEncoderXML() ->encode( comment->text() );
stream << "</comment>" << endl;
return TRUE;
}
TQString FileExporterXML::valueToString( Value *value )
12 years ago
{
TQString result;
12 years ago
bool isFirst = TRUE;
for ( TQValueList<ValueItem*>::ConstIterator it = value->items.begin(); it != value->items.end(); it++ )
12 years ago
{
if ( !isFirst )
result.append( ' ' );
isFirst = FALSE;
result.append(( *it ) ->simplifiedText() );
}
return result;
}
}