summaryrefslogtreecommitdiffstats
path: root/filters/kword/amipro/amiproimport.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'filters/kword/amipro/amiproimport.cpp')
-rw-r--r--filters/kword/amipro/amiproimport.cpp368
1 files changed, 368 insertions, 0 deletions
diff --git a/filters/kword/amipro/amiproimport.cpp b/filters/kword/amipro/amiproimport.cpp
new file mode 100644
index 000000000..fe45ca18e
--- /dev/null
+++ b/filters/kword/amipro/amiproimport.cpp
@@ -0,0 +1,368 @@
+/* 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 += "&amp;";
+ else if( str[i] == '<' ) result += "&lt;";
+ else if( str[i] == '>' ) result += "&gt;";
+ else if( str[i] == '"' ) result += "&quot;";
+ else if( str[i] == TQChar(39) ) result += "&apos;";
+ 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"