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.
koffice/kword/KWImportStyleDia.cpp

344 lines
12 KiB

/* This file is part of the KDE project
Copyright (C) 2002 Montel Laurent <lmontel@mandrakesoft.com>
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 <tdelocale.h>
#include "KWDocument.h"
#include <tqvbox.h>
#include <tqlayout.h>
#include <tqlineedit.h>
#include <tqpushbutton.h>
#include <tqlistbox.h>
#include <tdemessagebox.h>
#include "KWImportStyleDia.h"
#include <KoStore.h>
#include <tqfile.h>
#include <tdefiledialog.h>
#include <kdebug.h>
#include <tqlabel.h>
#include "KWTextParag.h"
KWImportStyleDia::KWImportStyleDia( KWDocument *_doc, KoStyleCollection* currentCollection, TQWidget *parent, const char *name )
:KoImportStyleDia( currentCollection, parent, name ),
m_doc(_doc)
{
}
KWImportStyleDia::~KWImportStyleDia()
{
}
void KWImportStyleDia::loadFile()
{
KFileDialog fd( TQString(), TQString(), 0, 0, TRUE );
TQStringList lst = "application/x-kword";
#if 0
lst << "application/vnd.oasis.opendocument.text";
#endif
fd.setMimeFilter( lst );
fd.setCaption(i18n("Import Style"));
KURL url;
if ( fd.exec() != TQDialog::Accepted )
return;
url = fd.selectedURL();
if( url.isEmpty() )
{
KMessageBox::sorry( this,
i18n("File name is empty."),
i18n("Import Style"));
return;
}
TQMap<TQString, TQString>insertStyle;
KoStore* store=KoStore::createStore( this, url, KoStore::Read );
if (store )
{
if (store->open("maindoc.xml") )
{
clear();
m_listStyleName->clear();
TQDomDocument doc;
doc.setContent( store->device() );
TQDomElement word = doc.documentElement();
TQDomElement stylesElem = word.namedItem( "STYLES" ).toElement();
if ( !stylesElem.isNull() )
{
//todo
//duplicate code try to remove it !
// TODO: use loadOasisStyleTemplates() for OASIS
// (and put as much code as possible in koimportstyledia of course)
//
// I guess we'll have to keep this old loading code forever though,
// so we can't really get rid of the subclasses.
TQValueList<TQString> followingStyles;
TQDomNodeList listStyles = stylesElem.elementsByTagName( "STYLE" );
for (unsigned int item = 0; item < listStyles.count(); item++)
{
TQDomElement styleElem = listStyles.item( item ).toElement();
KoParagStyle *sty = new KoParagStyle( TQString() );
// Load the paraglayout from the <STYLE> element
sty->loadStyle( styleElem, m_doc->syntaxVersion() ); //#### wrong syntaxVersion!
TQString name = sty->displayName();
if ( currentCollection()->findStyle( name ) )
sty->setName(generateStyleName(sty->name() + "-%1"));
// ### TODO: we should offer the option of updating the
// existing style instead of creating a foo-1 style. Any ideas for a GUI?
if ( currentCollection()->findStyleByDisplayName( name ) )
sty->setDisplayName(generateStyleDisplayName(sty->displayName() + "-%1"));
insertStyle.insert( name, sty->name() ); // old name -> new name
TQDomElement formatElem = styleElem.namedItem( "FORMAT" ).toElement();
if ( !formatElem.isNull() )
sty->format() = KWTextParag::loadFormat( formatElem, 0L, m_doc->defaultFont(), m_doc->globalLanguage(), m_doc->globalHyphenation() );
else
kdWarning(32001) << "No FORMAT tag in <STYLE>" << endl; // This leads to problems in applyStyle().
// Style created, now let's try to add it
sty = m_styleList.addStyle(sty);
if( m_styleList.count() >= 0 && uint( m_styleList.count() ) > followingStyles.count() )
{
TQString following = styleElem.namedItem("FOLLOWING").toElement().attribute("name");
followingStyles.append( following );
}
else
kdWarning () << "Found duplicate style declaration, overwriting former " << sty->name() << endl;
}
Q_ASSERT( m_styleList.count() >= 0 && followingStyles.count() == uint( m_styleList.count() ) );
unsigned int i=0;
for( TQValueList<TQString>::Iterator it = followingStyles.begin(); it != followingStyles.end(); ++it ) {
TQString newName =*it;
if ( insertStyle.contains( *it ) )
newName = (insertStyle)[ *it ];
KoParagStyle * style = m_styleList.findStyle(newName);
if ( style )
m_styleList.styleAt(i++)->setFollowingStyle( style );
}
}
initList();
if(m_styleList.count() == 0) {
KMessageBox::error( this,
i18n("File does not contain any styles. It may be the wrong version."),
i18n("Import Style"));
}
}
else if ( store->hasFile( "content.xml" ) )
{
//oasis file format (for koffice-1.5)
}
else
{
KMessageBox::error( this,
i18n("This file is not a KWord file!"),
i18n("Import Style"));
}
store->close();
}
delete store;
}
KWImportFrameTableStyleDia::KWImportFrameTableStyleDia( KWDocument *_doc, const TQStringList &_list, StyleType _type, TQWidget *parent, const char *name )
: KDialogBase( parent, name , true, "", Ok|Cancel, Ok, true )
{
setCaption( i18n("Import Style") );
m_doc=_doc;
m_typeStyle = _type;
m_list =_list;
TQVBox *page = makeVBoxMainWidget();
new TQLabel(i18n("Select style to import:"), page);
m_listStyleName = new TQListBox( page );
m_listStyleName->setSelectionMode( TQListBox::Multi );
loadFile();
resize (300, 400);
setFocus();
}
KWImportFrameTableStyleDia::~KWImportFrameTableStyleDia()
{
m_frameStyleList.setAutoDelete(true);
m_tableStyleList.setAutoDelete(true);
m_frameStyleList.clear();
m_tableStyleList.clear();
}
TQString KWImportFrameTableStyleDia::generateStyleName( const TQString & templateName )
{
TQString name;
int num = 1;
bool exists;
do {
name = templateName.arg( num );
exists = (m_list.findIndex( name )!=-1);
++num;
} while ( exists );
return name;
}
void KWImportFrameTableStyleDia::loadFile()
{
KFileDialog fd( TQString(), TQString(), 0, 0, TRUE );
TQStringList lst = "application/x-kword";
#if 0
lst << "application/vnd.oasis.opendocument.text";
#endif
fd.setMimeFilter( lst );
fd.setCaption(i18n("Import Style"));
KURL url;
if ( fd.exec() != TQDialog::Accepted )
return;
url = fd.selectedURL();
if( url.isEmpty() )
{
KMessageBox::sorry( this,
i18n("File name is empty."),
i18n("Import Style"));
return;
}
KoStore* store=KoStore::createStore( this, url, KoStore::Read );
if (store )
{
if (store->open("maindoc.xml") )
{
TQDomDocument doc;
doc.setContent( store->device() );
TQDomElement word = doc.documentElement();
if ( m_typeStyle ==frameStyle )
{
TQDomNodeList listStyles = word.elementsByTagName( "FRAMESTYLE" );
for (unsigned int item = 0; item < listStyles.count(); item++) {
TQDomElement styleElem = listStyles.item( item ).toElement();
KWFrameStyle *sty = new KWFrameStyle( styleElem );
TQString name =sty->name();
if ( m_list.findIndex( name )!=-1 )
sty->setDisplayName(generateStyleName( sty->displayName() + TQString( "-%1")));
m_frameStyleList.append( sty);
}
}
else
{
TQDomNodeList listStyles = word.elementsByTagName( "TABLESTYLE" );
for (unsigned int item = 0; item < listStyles.count(); item++) {
TQDomElement styleElem = listStyles.item( item ).toElement();
KWTableStyle *sty = new KWTableStyle( styleElem,m_doc,2 );
TQString name =sty->name();
if ( m_list.findIndex( name )!=-1 )
sty->setName(generateStyleName( sty->displayName() + TQString( "-%1")));
m_tableStyleList.append( sty);
}
}
initList();
if(m_tableStyleList.count() == 0 && m_frameStyleList.count()==0) {
KMessageBox::error( this,
i18n("File does not contain any styles. It may be the wrong version."),
i18n("Import Style"));
}
}
else if ( store->hasFile( "content.xml" ) )
{
//oasis file format (for koffice-1.5)
}
else
{
KMessageBox::error( this,
i18n("This file is not a KWord file!"),
i18n("Import Style"));
}
store->close();
}
delete store;
}
void KWImportFrameTableStyleDia::initList()
{
TQStringList lst;
if ( m_typeStyle ==frameStyle )
{
for ( KWFrameStyle * p = m_frameStyleList.first(); p != 0L; p = m_frameStyleList.next() )
{
lst<<p->displayName();
}
}
else
{
for ( KWTableStyle * p = m_tableStyleList.first(); p != 0L; p = m_tableStyleList.next() )
{
lst<<p->displayName();
}
}
m_listStyleName->insertStringList(lst);
}
void KWImportFrameTableStyleDia::slotOk()
{
for (uint i = 0; i< m_listStyleName->count();i++)
{
if ( !m_listStyleName->isSelected( i ))
{
TQString name = m_listStyleName->text(i );
if ( m_typeStyle ==frameStyle ) // frame styles
{
//remove this style from list
TQPtrListIterator<KWFrameStyle> styleIt( m_frameStyleList );
for ( ; styleIt.current(); ++styleIt )
{
if ( styleIt.current()->displayName() == name )
{
m_frameStyleList.remove(styleIt.current());
break;
}
}
}
else // then it will have to be table styles
{
//remove this style from list
TQPtrListIterator<KWTableStyle> styleIt( m_tableStyleList );
for ( ; styleIt.current(); ++styleIt )
{
if ( styleIt.current()->displayName() == name )
{
m_tableStyleList.remove(styleIt.current());
break;
}
}
}
}
}
KDialogBase::slotOk();
}
#include "KWImportStyleDia.moc"