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/xsltransform.cpp

82 lines
3.2 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 <libxml/parser.h>
#include <libxml/tree.h>
#include <libxml/xmlstring.h>
#include <libxslt/transform.h>
#include <libxslt/xsltutils.h>
#include <tqfile.h>
#include <tqstring.h>
12 years ago
#include "xsltransform.h"
namespace BibTeX
{
XSLTransform::XSLTransform( const TQString& xsltFilename )
12 years ago
{
m_xlstStylesheet = xsltParseStylesheetFile(( const xmlChar* ) xsltFilename.latin1() );
if ( m_xlstStylesheet == NULL )
tqDebug( "Could not load XSLT file '%s'.", xsltFilename.latin1() );
12 years ago
}
XSLTransform::~XSLTransform()
{
xsltFreeStylesheet( m_xlstStylesheet );
}
TQString XSLTransform::transform( const TQString& xmlText )
12 years ago
{
TQString result = TQString::null;
TQCString xmlCText = xmlText.utf8();
12 years ago
xmlDocPtr document = xmlParseMemory( xmlCText, xmlCText.length() );
if ( document )
{
if ( m_xlstStylesheet )
{
xmlDocPtr resultDocument = xsltApplyStylesheet( m_xlstStylesheet, document, NULL );
if ( resultDocument )
{
// Save the result into the TQString
12 years ago
xmlChar * mem;
int size;
xmlDocDumpMemoryEnc( resultDocument, &mem, &size, "UTF-8" );
result = TQString::fromUtf8( TQCString(( char * )( mem ), size + 1 ) );
12 years ago
xmlFree( mem );
xmlFreeDoc( resultDocument );
}
else
tqDebug( "Applying XSLT stylesheet to XML document failed" );
12 years ago
}
else
tqDebug( "XSLT stylesheet is not available or not valid" );
12 years ago
xmlFreeDoc( document );
}
else
tqDebug( "XML document is not available or not valid" );
12 years ago
return result;
}
}