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.
369 lines
13 KiB
369 lines
13 KiB
/* This file is part of the KDE project
|
|
Copyright (C) 2002 Ariya Hidayat <ariyahidayat@yahoo.de>
|
|
|
|
This library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Library General Public
|
|
License as published by the Free Software Foundation; either
|
|
version 2 of the License, or (at your option) any later version.
|
|
|
|
This library 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
|
|
Library General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Library General Public License
|
|
along with this library; see the file COPYING.LIB. If not, write to
|
|
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
|
|
* Boston, MA 02110-1301, USA.
|
|
*/
|
|
|
|
#include <config.h>
|
|
|
|
#ifdef HAVE_UNISTD_H
|
|
#include <unistd.h>
|
|
#endif
|
|
|
|
#include <tqregexp.h>
|
|
#include <tqfileinfo.h>
|
|
#include <tqvaluelist.h>
|
|
#include <tqfont.h>
|
|
|
|
#include <kdebug.h>
|
|
#include <KoFilterChain.h>
|
|
#include <kgenericfactory.h>
|
|
#include <KoGlobal.h>
|
|
|
|
#include <amiproimport.h>
|
|
#include <amiproparser.h>
|
|
|
|
typedef KGenericFactory<AmiProImport, KoFilter> AmiProImportFactory;
|
|
K_EXPORT_COMPONENT_FACTORY( libamiproimport, AmiProImportFactory( "kofficefilters" ) )
|
|
|
|
AmiProImport::AmiProImport( KoFilter *, const char *, const TQStringList& ):
|
|
KoFilter()
|
|
{
|
|
}
|
|
|
|
class AmiProConverter: public AmiProListener
|
|
{
|
|
public:
|
|
AmiProConverter();
|
|
TQString root, documentInfo;
|
|
virtual bool doOpenDocument();
|
|
virtual bool doCloseDocument();
|
|
virtual bool doDefineStyle( const AmiProStyle& style );
|
|
virtual bool doParagraph( const TQString& text, AmiProFormatList formatList,
|
|
AmiProLayout& l );
|
|
private:
|
|
AmiProStyleList styleList;
|
|
};
|
|
|
|
// helper function to escape string for XML-ness
|
|
static TQString XMLEscape( const TQString& str )
|
|
{
|
|
TQString result;
|
|
|
|
for( unsigned i=0; i<str.length(); i++ )
|
|
if( str[i] == '&' ) result += "&";
|
|
else if( str[i] == '<' ) result += "<";
|
|
else if( str[i] == '>' ) result += ">";
|
|
else if( str[i] == '"' ) result += """;
|
|
else if( str[i] == TQChar(39) ) result += "'";
|
|
else result += str[i];
|
|
|
|
return result;
|
|
}
|
|
|
|
// helper function to convert AmiPro format to KWord's FORMAT
|
|
static TQString AmiProFormatAsXML( AmiProFormat format )
|
|
{
|
|
TQString result;
|
|
|
|
TQString fontname = format.fontFamily;
|
|
if( fontname.isEmpty() ) fontname = KoGlobal::defaultFont().family();
|
|
TQString fontsize = TQString::number( format.fontSize );
|
|
TQString boldness = format.bold ? "75" : "50";
|
|
TQString italic = format.italic ? "1" : "0";
|
|
TQString strikeout = format.strikethrough ? "1" : "0";
|
|
TQString vertalign = format.superscript ? "2" : format.subscript ? "1" : "0";
|
|
TQString underline = format.double_underline ? "double" :
|
|
format.underline|format.word_underline ? "1" : "0";
|
|
|
|
result = "<FORMAT id=\"1\" pos=\"" + TQString::number(format.pos) +
|
|
"\" len=\"" + TQString::number(format.len) + "\">\n";
|
|
result.append( " <FONT name=\"" + fontname + "\" />\n" );
|
|
result.append( " <SIZE value=\"" + fontsize + "\" />\n" );
|
|
result.append( " <WEIGHT value=\"" + boldness + "\" />\n" );
|
|
result.append( " <ITALIC value=\"" + italic + "\" />\n" );
|
|
result.append( " <STRIKEOUT value=\"" + strikeout + "\" />\n" );
|
|
result.append( " <VERTALIGN value=\"" + vertalign + "\" />\n" );
|
|
result.append( " <UNDERLINE value=\"" + underline + "\" />\n" );
|
|
result.append( "</FORMAT>\n" );
|
|
|
|
return result;
|
|
}
|
|
|
|
// helper function to convert AmiPro list of formats to KWord FORMATS
|
|
static TQString AmiProFormatListAsXML( AmiProFormatList& formatList )
|
|
{
|
|
TQString result;
|
|
|
|
AmiProFormatList::iterator it;
|
|
for( it=formatList.begin(); it!=formatList.end(); ++it )
|
|
{
|
|
AmiProFormat& format = *it;
|
|
result.append( AmiProFormatAsXML(format) );
|
|
}
|
|
|
|
if( !result.isEmpty() )
|
|
{
|
|
result.prepend( "<FORMATS>\n" );
|
|
result.append( "</FORMATS>\n" );
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
// helper function to convert AmiPro paragraph layout to KWord's LAYOUT
|
|
static TQString AmiProLayoutAsXML( const AmiProLayout& layout )
|
|
{
|
|
TQString result;
|
|
|
|
TQString referredStyle = layout.name;
|
|
if( referredStyle.isEmpty() ) referredStyle = "Standard";
|
|
|
|
TQString fontname = layout.fontFamily;
|
|
if( fontname.isEmpty() ) fontname = KoGlobal::defaultFont().family();
|
|
TQString fontsize = TQString::number( layout.fontSize );
|
|
TQString fontcolor = "red=\"" + TQString::number( layout.fontColor.red() ) +
|
|
"\" green=\"" + TQString::number( layout.fontColor.green() ) +
|
|
"\" blue=\"" + TQString::number( layout.fontColor.blue() ) + "\"";
|
|
TQString boldness = layout.bold ? "75" : "50";
|
|
TQString italic = layout.italic ? "1" : "0";
|
|
TQString strikeout = layout.strikethrough ? "1" : "0";
|
|
TQString vertalign = layout.superscript ? "2" : layout.subscript ? "1" : "0";
|
|
TQString underline = layout.double_underline ? "double" :
|
|
layout.underline|layout.word_underline ? "1" : "0";
|
|
|
|
TQString align;
|
|
align = layout.align==TQt::AlignLeft ? "left" :
|
|
layout.align==TQt::AlignRight ? "right" :
|
|
layout.align==TQt::AlignCenter ? "center" :
|
|
layout.align==TQt::AlignJustify ? "justify" :
|
|
"left";
|
|
|
|
TQString offsets;
|
|
offsets = "before=\"" + TQString::number(layout.spaceBefore) +
|
|
"\" after=\"" + TQString::number(layout.spaceAfter) + "\"";
|
|
|
|
TQString linespacing;
|
|
linespacing = layout.linespace==AmiPro::LS_Single ? TQString::fromLatin1( "0" ) :
|
|
layout.linespace==AmiPro::LS_OneAndHalf ? TQString::fromLatin1( "oneandhalf" ) :
|
|
layout.linespace==AmiPro::LS_Double ? TQString::fromLatin1( "double" ) :
|
|
TQString::number( layout.linespace );
|
|
|
|
result.append( "<LAYOUT>\n" );
|
|
result.append( " <NAME value=\"" + XMLEscape( referredStyle ) + "\" />\n" );
|
|
result.append( " <FLOW align=\"" + align + "\" />\n" );
|
|
result.append( " <LINESPACING value=\"" + linespacing + "\" />\n" );
|
|
result.append( " <OFFSETS " + offsets + " />\n" );
|
|
result.append( " <LEFTBORDER width=\"0\" style=\"0\" />\n" );
|
|
result.append( " <RIGHTBORDER width=\"0\" style=\"0\" />\n" );
|
|
result.append( " <TOPBORDER width=\"0\" style=\"0\" />\n" );
|
|
result.append( " <BOTTOMBORDER width=\"0\" style=\"0\" />\n" );
|
|
result.append( " <INDENTS />\n" );
|
|
result.append( " <OFFSETS />\n" );
|
|
result.append( " <PAGEBREAKING />\n" );
|
|
result.append( " <COUNTER />\n" );
|
|
result.append( " <FORMAT id=\"1\">\n" );
|
|
result.append( " <FONT name=\"" + fontname + "\" />\n" );
|
|
result.append( " <SIZE value=\"" + fontsize + "\" />\n" );
|
|
result.append( " <COLOR " + fontcolor + " />\n" );
|
|
result.append( " <WEIGHT value=\"" + boldness + "\" />\n" );
|
|
result.append( " <ITALIC value=\"" + italic + "\" />\n" );
|
|
result.append( " <STRIKEOUT value=\"" + strikeout + "\" />\n" );
|
|
result.append( " <VERTALIGN value=\"" + vertalign + "\" />\n" );
|
|
result.append( " <UNDERLINE value=\"" + underline + "\" />\n" );
|
|
result.append( " </FORMAT>\n" );
|
|
result.append( "</LAYOUT>\n" );
|
|
|
|
return result;
|
|
}
|
|
|
|
// helper function to convert AmiPro style to KWord STYLE
|
|
static TQString AmiProStyleAsXML( const AmiProStyle& style )
|
|
{
|
|
TQString result;
|
|
|
|
TQString fontname = style.fontFamily;
|
|
if( fontname.isEmpty() ) fontname = KoGlobal::defaultFont().family();
|
|
TQString fontsize = TQString::number( style.fontSize );
|
|
TQString boldness = style.bold ? "75" : "50";
|
|
TQString italic = style.italic ? "1" : "0";
|
|
TQString strikeout = style.strikethrough ? "1" : "0";
|
|
TQString vertalign = style.superscript ? "2" : style.subscript ? "1" : "0";
|
|
TQString underline = style.double_underline ? "double" :
|
|
style.underline|style.word_underline ? "1" : "0";
|
|
|
|
TQString align;
|
|
align = style.align==TQt::AlignLeft ? "left" :
|
|
style.align==TQt::AlignRight ? "right" :
|
|
style.align==TQt::AlignCenter ? "center" :
|
|
style.align==TQt::AlignJustify ? "justify" :
|
|
"left";
|
|
|
|
TQString linespacing;
|
|
linespacing = style.linespace==AmiPro::LS_Single ? TQString::fromLatin1( "0" ) :
|
|
style.linespace==AmiPro::LS_OneAndHalf ? TQString::fromLatin1( "oneandhalf" ) :
|
|
style.linespace==AmiPro::LS_Double ? TQString::fromLatin1( "double" ) :
|
|
TQString::number( style.linespace );
|
|
|
|
TQString offsets;
|
|
offsets = "before=\"" + TQString::number(style.spaceBefore) +
|
|
"\" after=\"" + TQString::number(style.spaceAfter) + "\"";
|
|
|
|
result.append( "<STYLE>\n" );
|
|
result.append( " <NAME value=\"" + XMLEscape( style.name ) + "\" />\n" );
|
|
result.append( " <FOLLOWING name=\"Body Text\" />\n" );
|
|
result.append( " <FLOW align=\"" + align + "\" />\n" );
|
|
result.append( " <LINESPACING value=\"" + linespacing + "\" />\n" );
|
|
result.append( " <OFFSETS " + offsets + " />\n" );
|
|
result.append( " <LEFTBORDER width=\"0\" style=\"0\" />\n" );
|
|
result.append( " <RIGHTBORDER width=\"0\" style=\"0\" />\n" );
|
|
result.append( " <TOPBORDER width=\"0\" style=\"0\" />\n" );
|
|
result.append( " <BOTTOMBORDER width=\"0\" style=\"0\" />\n" );
|
|
result.append( " <FORMAT id=\"1\">\n" );
|
|
result.append( " <FONT name=\"" + fontname + "\" />\n" );
|
|
result.append( " <SIZE value=\"" + fontsize + "\" />\n" );
|
|
result.append( " <WEIGHT value=\"" + boldness + "\" />\n" );
|
|
result.append( " <ITALIC value=\"" + italic + "\" />\n" );
|
|
result.append( " <STRIKEOUT value=\"" + strikeout + "\" />\n" );
|
|
result.append( " <VERTALIGN value=\"" + vertalign + "\" />\n" );
|
|
result.append( " <UNDERLINE value=\"" + underline + "\" />\n" );
|
|
result.append( " </FORMAT>\n" );
|
|
result.append( "</STYLE>\n" );
|
|
|
|
return result;
|
|
}
|
|
|
|
// helper function to convert AmiPro styles to KWord STYLES
|
|
static TQString AmiProStyleListAsXML( AmiProStyleList& styleList )
|
|
{
|
|
TQString result;
|
|
|
|
AmiProStyleList::iterator it;
|
|
for( it=styleList.begin(); it!=styleList.end(); ++it )
|
|
{
|
|
AmiProStyle& style = *it;
|
|
result.append( AmiProStyleAsXML( style ) );
|
|
}
|
|
|
|
if( !result.isEmpty() )
|
|
{
|
|
result.prepend ( "<STYLES>\n" );
|
|
result.append( "</STYLES>\n" );
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
AmiProConverter::AmiProConverter()
|
|
{
|
|
root = "";
|
|
}
|
|
|
|
bool AmiProConverter::doOpenDocument()
|
|
{
|
|
TQString prolog = "<!DOCTYPE DOC>\n";
|
|
|
|
prolog.append( "<DOC mime=\"application/x-kword\" syntaxVersion=\"2\" editor=\"KWord\">\n");
|
|
prolog.append( "<PAPER width=\"595\" height=\"841\" format=\"1\" fType=\"0\" orientation=\"0\" hType=\"0\" columns=\"1\">\n" );
|
|
prolog.append( " <PAPERBORDERS left=\"36\" right=\"36\" top=\"36\" bottom=\"36\" />\n" );
|
|
prolog.append( "</PAPER>\n" );
|
|
prolog.append( "<ATTRIBUTES standardpage=\"1\" hasFooter=\"0\" hasHeader=\"0\" processing=\"0\" />\n" );
|
|
prolog.append( "<FRAMESETS>\n" );
|
|
prolog.append( "<FRAMESET removable=\"0\" frameType=\"1\" frameInfo=\"0\" autoCreateNewFrame=\"1\">\n" );
|
|
prolog.append( "<FRAME right=\"567\" left=\"28\" top=\"42\" bottom=\"799\" />\n" );
|
|
root = prolog;
|
|
|
|
return true;
|
|
}
|
|
|
|
bool AmiProConverter::doCloseDocument()
|
|
{
|
|
TQString epilog = "</FRAMESET>\n";
|
|
epilog.append( "</FRAMESETS>\n" );
|
|
epilog.append( AmiProStyleListAsXML( styleList ) );
|
|
epilog.append( "</DOC>\n" );
|
|
|
|
root.append( epilog );
|
|
|
|
return true;
|
|
}
|
|
|
|
bool AmiProConverter::doDefineStyle( const AmiProStyle& style )
|
|
{
|
|
styleList.append( style );
|
|
return true;
|
|
}
|
|
|
|
bool AmiProConverter::doParagraph( const TQString& text, AmiProFormatList formatList,
|
|
AmiProLayout& layout )
|
|
{
|
|
root.append( "<PARAGRAPH>\n" );
|
|
root.append( "<TEXT>" + XMLEscape( text ) + "</TEXT>\n" );
|
|
root.append( AmiProFormatListAsXML( formatList ) );
|
|
root.append( AmiProLayoutAsXML( layout ) );
|
|
root.append( "</PARAGRAPH>\n" );
|
|
|
|
return true;
|
|
}
|
|
|
|
KoFilter::ConversionStatus AmiProImport::convert( const TQCString& from, const TQCString& to )
|
|
{
|
|
// check for proper conversion
|
|
if( to!= "application/x-kword" || from != "application/x-amipro" )
|
|
return KoFilter::NotImplemented;
|
|
|
|
// parse/convert input file
|
|
AmiProParser *parser = new AmiProParser;
|
|
AmiProConverter *converter = new AmiProConverter;
|
|
parser->setListener( converter );
|
|
|
|
parser->process( m_chain->inputFile() );
|
|
|
|
if( converter->root.isEmpty() )
|
|
return KoFilter::StupidError;
|
|
|
|
TQString root = converter->root;
|
|
TQString documentInfo = converter->documentInfo;
|
|
|
|
delete converter;
|
|
delete parser;
|
|
|
|
// prepare storage
|
|
KoStoreDevice* out=m_chain->storageFile( "root", KoStore::Write );
|
|
|
|
// store output document
|
|
if( out )
|
|
{
|
|
TQCString cstring = root.utf8();
|
|
cstring.prepend( "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n" );
|
|
out->writeBlock( (const char*) cstring, cstring.length() );
|
|
}
|
|
|
|
// store document info
|
|
out = m_chain->storageFile( "documentinfo.xml", KoStore::Write );
|
|
if ( out )
|
|
{
|
|
TQCString cstring = documentInfo.utf8();
|
|
cstring.prepend( "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n" );
|
|
|
|
out->writeBlock( (const char*) cstring, cstring.length() );
|
|
}
|
|
|
|
return KoFilter::OK;
|
|
}
|
|
|
|
#include "amiproimport.moc"
|