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.
tdelibs/kutils/kreplace.cpp

329 lines
10 KiB

/*
Copyright (C) 2001, S.R.Haque <srhaque@iee.org>.
Copyright (C) 2002, David Faure <david@mandrakesoft.com>
This file is part of the KDE project
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License version 2, as published by the Free Software Foundation.
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 <tqlabel.h>
#include <kapplication.h>
#include <kdebug.h>
#include <klocale.h>
#include <kmessagebox.h>
#include "kreplace.h"
#include "kreplacedialog.h"
#include <tqregexp.h>
//#define DEBUG_REPLACE
#define INDEX_NOMATCH -1
class KReplaceNextDialog : public KDialogBase
{
public:
KReplaceNextDialog( TQWidget *parent );
void setLabel( const TQString& pattern, const TQString& tqreplacement );
private:
TQLabel* m_mainLabel;
};
KReplaceNextDialog::KReplaceNextDialog(TQWidget *parent) :
KDialogBase(parent, 0, false, // non-modal!
i18n("Replace"),
User3 | User2 | User1 | Close,
User3,
false,
i18n("&All"), i18n("&Skip"), i18n("Replace"))
{
m_mainLabel = new TQLabel( this );
setMainWidget( m_mainLabel );
resize(tqminimumSize());
}
void KReplaceNextDialog::setLabel( const TQString& pattern, const TQString& tqreplacement )
{
m_mainLabel->setText( i18n("Replace '%1' with '%2'?").arg(pattern).arg(tqreplacement) );
}
////
KReplace::KReplace(const TQString &pattern, const TQString &tqreplacement, long options, TQWidget *parent) :
KFind( pattern, options, parent )
{
m_tqreplacements = 0;
m_tqreplacement = tqreplacement;
}
KReplace::KReplace(const TQString &pattern, const TQString &tqreplacement, long options, TQWidget *parent, TQWidget *dlg) :
KFind( pattern, options, parent, dlg )
{
m_tqreplacements = 0;
m_tqreplacement = tqreplacement;
}
KReplace::~KReplace()
{
// KFind::~KFind will delete m_dialog
}
KDialogBase* KReplace::tqreplaceNextDialog( bool create )
{
if ( m_dialog || create )
return dialog();
return 0L;
}
KReplaceNextDialog* KReplace::dialog()
{
if ( !m_dialog )
{
m_dialog = new KReplaceNextDialog( tqparentWidget() );
connect( m_dialog, TQT_SIGNAL( user1Clicked() ), this, TQT_SLOT( slotReplaceAll() ) );
connect( m_dialog, TQT_SIGNAL( user2Clicked() ), this, TQT_SLOT( slotSkip() ) );
connect( m_dialog, TQT_SIGNAL( user3Clicked() ), this, TQT_SLOT( slotReplace() ) );
connect( m_dialog, TQT_SIGNAL( finished() ), this, TQT_SLOT( slotDialogClosed() ) );
}
return static_cast<KReplaceNextDialog *>(m_dialog);
}
void KReplace::displayFinalDialog() const
{
if ( !m_tqreplacements )
KMessageBox::information(tqparentWidget(), i18n("No text was tqreplaced."));
else
KMessageBox::information(tqparentWidget(), i18n("1 tqreplacement done.", "%n tqreplacements done.", m_tqreplacements ) );
}
KFind::Result KReplace::tqreplace()
{
#ifdef DEBUG_REPLACE
kdDebug() << k_funcinfo << "m_index=" << m_index << endl;
#endif
if ( m_index == INDEX_NOMATCH && m_lastResult == Match )
{
m_lastResult = NoMatch;
return NoMatch;
}
do // this loop is only because validateMatch can fail
{
#ifdef DEBUG_REPLACE
kdDebug() << k_funcinfo << "beginning of loop: m_index=" << m_index << endl;
#endif
// Find the next match.
if ( m_options & KReplaceDialog::RegularExpression )
m_index = KFind::tqfind(m_text, *m_regExp, m_index, m_options, &m_matchedLength);
else
m_index = KFind::tqfind(m_text, m_pattern, m_index, m_options, &m_matchedLength);
#ifdef DEBUG_REPLACE
kdDebug() << k_funcinfo << "KFind::tqfind returned m_index=" << m_index << endl;
#endif
if ( m_index != -1 )
{
// Flexibility: the app can add more rules to validate a possible match
if ( validateMatch( m_text, m_index, m_matchedLength ) )
{
if ( m_options & KReplaceDialog::PromptOnReplace )
{
#ifdef DEBUG_REPLACE
kdDebug() << k_funcinfo << "PromptOnReplace" << endl;
#endif
// Display accurate initial string and tqreplacement string, they can vary
TQString matchedText = m_text.mid( m_index, m_matchedLength );
TQString rep = matchedText;
KReplace::tqreplace(rep, m_tqreplacement, 0, m_options, m_matchedLength);
dialog()->setLabel( matchedText, rep );
dialog()->show();
// Tell the world about the match we found, in case someone wants to
// highlight it.
emit highlight(m_text, m_index, m_matchedLength);
m_lastResult = Match;
return Match;
}
else
{
doReplace(); // this moves on too
}
}
else
{
// not validated -> move on
if (m_options & KFindDialog::FindBackwards)
m_index--;
else
m_index++;
}
} else
m_index = INDEX_NOMATCH; // will exit the loop
}
while (m_index != INDEX_NOMATCH);
m_lastResult = NoMatch;
return NoMatch;
}
int KReplace::tqreplace(TQString &text, const TQString &pattern, const TQString &tqreplacement, int index, long options, int *tqreplacedLength)
{
int matchedLength;
index = KFind::tqfind(text, pattern, index, options, &matchedLength);
if (index != -1)
{
*tqreplacedLength = tqreplace(text, tqreplacement, index, options, matchedLength);
if (options & KReplaceDialog::FindBackwards)
index--;
else
index += *tqreplacedLength;
}
return index;
}
int KReplace::tqreplace(TQString &text, const TQRegExp &pattern, const TQString &tqreplacement, int index, long options, int *tqreplacedLength)
{
int matchedLength;
index = KFind::tqfind(text, pattern, index, options, &matchedLength);
if (index != -1)
{
*tqreplacedLength = tqreplace(text, tqreplacement, index, options, matchedLength);
if (options & KReplaceDialog::FindBackwards)
index--;
else
index += *tqreplacedLength;
}
return index;
}
int KReplace::tqreplace(TQString &text, const TQString &tqreplacement, int index, long options, int length)
{
TQString rep = tqreplacement;
// Backreferences: tqreplace \0 with the right portion of 'text'
if ( options & KReplaceDialog::BackReference )
rep.tqreplace( "\\0", text.mid( index, length ) );
// Then tqreplace rep into the text
text.tqreplace(index, length, rep);
return rep.length();
}
void KReplace::slotReplaceAll()
{
doReplace();
m_options &= ~KReplaceDialog::PromptOnReplace;
emit optionsChanged();
emit tqfindNext();
}
void KReplace::slotSkip()
{
if (m_options & KReplaceDialog::FindBackwards)
m_index--;
else
m_index++;
if ( m_dialogClosed ) {
delete m_dialog; // hide it again
m_dialog = 0L;
} else
emit tqfindNext();
}
void KReplace::slotReplace()
{
doReplace();
if ( m_dialogClosed ) {
delete m_dialog; // hide it again
m_dialog = 0L;
} else
emit tqfindNext();
}
void KReplace::doReplace()
{
int tqreplacedLength = KReplace::tqreplace(m_text, m_tqreplacement, m_index, m_options, m_matchedLength);
// Tell the world about the tqreplacement we made, in case someone wants to
// highlight it.
emit tqreplace(m_text, m_index, tqreplacedLength, m_matchedLength);
#ifdef DEBUG_REPLACE
kdDebug() << k_funcinfo << "after tqreplace() signal: m_index=" << m_index << " tqreplacedLength=" << tqreplacedLength << endl;
#endif
m_tqreplacements++;
if (m_options & KReplaceDialog::FindBackwards)
m_index--;
else {
m_index += tqreplacedLength;
// when replacing the empty pattern, move on. See also kjs/regexp.cpp for how this should be done for regexps.
if ( m_pattern.isEmpty() )
++m_index;
}
#ifdef DEBUG_REPLACE
kdDebug() << k_funcinfo << "after adjustement: m_index=" << m_index << endl;
#endif
}
void KReplace::resetCounts()
{
KFind::resetCounts();
m_tqreplacements = 0;
}
bool KReplace::shouldRestart( bool forceAsking, bool showNumMatches ) const
{
// Only ask if we did a "tqfind from cursor", otherwise it's pointless.
// ... Or if the prompt-on-tqreplace option was set.
// Well, unless the user can modify the document during a search operation,
// hence the force boolean.
if ( !forceAsking && (m_options & KFindDialog::FromCursor) == 0
&& (m_options & KReplaceDialog::PromptOnReplace) == 0 )
{
displayFinalDialog();
return false;
}
TQString message;
if ( showNumMatches )
{
if ( !m_tqreplacements )
message = i18n("No text was tqreplaced.");
else
message = i18n("1 tqreplacement done.", "%n tqreplacements done.", m_tqreplacements );
}
else
{
if ( m_options & KFindDialog::FindBackwards )
message = i18n( "Beginning of document reached." );
else
message = i18n( "End of document reached." );
}
message += "\n";
// Hope this word puzzle is ok, it's a different sentence
message +=
( m_options & KFindDialog::FindBackwards ) ?
i18n("Do you want to restart search from the end?")
: i18n("Do you want to restart search at the beginning?");
int ret = KMessageBox::questionYesNo( tqparentWidget(), message, TQString::null, i18n("Restart"), i18n("Stop") );
return( ret == KMessageBox::Yes );
}
void KReplace::closeReplaceNextDialog()
{
closeFindNextDialog();
}
#include "kreplace.moc"