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.
158 lines
4.2 KiB
158 lines
4.2 KiB
/*
|
|
* Copyright (c) 2002-2003 Jesper K. Pedersen <blackie@kde.org>
|
|
*
|
|
* 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 "concregexp.h"
|
|
#include "widgetfactory.h"
|
|
#include "compoundregexp.h"
|
|
|
|
ConcRegExp::ConcRegExp( bool selected ) :RegExp( selected )
|
|
{
|
|
}
|
|
|
|
void ConcRegExp::addRegExp( RegExp *regExp )
|
|
{
|
|
list.append(regExp);
|
|
addChild( regExp );
|
|
}
|
|
|
|
RegExpList ConcRegExp::children()
|
|
{
|
|
return list;
|
|
}
|
|
|
|
|
|
bool ConcRegExp::check( ErrorMap& map, bool first, bool last)
|
|
{
|
|
bool f = first;
|
|
bool possibleEmpty = true;
|
|
for ( RegExpListIt it(list); *it; ++it ) {
|
|
possibleEmpty = (*it)->check( map, f, last && it.atLast() ) && possibleEmpty;
|
|
if ( ! possibleEmpty )
|
|
f = false;
|
|
}
|
|
return possibleEmpty;
|
|
}
|
|
|
|
RegExp* ConcRegExp::lastRegExp()
|
|
{
|
|
if ( list.count() == 0)
|
|
return 0;
|
|
else
|
|
return list.at( list.count()-1);
|
|
}
|
|
|
|
TQDomNode ConcRegExp::toXml( TQDomDocument* doc ) const
|
|
{
|
|
TQDomElement top = doc->createElement( TQString::fromLocal8Bit("Concatenation") );
|
|
for ( RegExpListIt it(list); *it; ++it ) {
|
|
top.appendChild( (*it)->toXml( doc ) );
|
|
}
|
|
return top;
|
|
}
|
|
|
|
bool ConcRegExp::load( TQDomElement top, const TQString& version )
|
|
{
|
|
Q_ASSERT( top.tagName() == TQString::fromLocal8Bit( "Concatenation" ) );
|
|
|
|
for ( TQDomNode child = top.firstChild(); !child.isNull(); child = child.nextSibling() ) {
|
|
if ( ! child.isElement() )
|
|
continue; // User might have added a comment.
|
|
|
|
RegExp* regexp = WidgetFactory::createRegExp( child.toElement(), version );
|
|
if ( regexp == 0 )
|
|
return false;
|
|
addRegExp( regexp );
|
|
}
|
|
return true;
|
|
}
|
|
|
|
bool ConcRegExp::operator==( const RegExp& other ) const
|
|
{
|
|
// TODO: Merge with AltnRegExp::operator==
|
|
if ( list.count() == 1 )
|
|
return ( other == *(const_cast< TQPtrList<RegExp>& >(list).at(0)) );
|
|
|
|
if ( other.type() != type() )
|
|
return false;
|
|
|
|
const ConcRegExp& theOther = dynamic_cast<const ConcRegExp&>( other );
|
|
|
|
if ( list.count() != theOther.list.count() )
|
|
return false;
|
|
|
|
RegExpListIt it1( list );
|
|
RegExpListIt it2( theOther.list );
|
|
|
|
for ( ; *it1 && *it2 ; ) {
|
|
if ( ! (**it1 == **it2) )
|
|
return false;
|
|
++it1;
|
|
++it2;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
|
|
void ConcRegExp::replacePart( CompoundRegExp* replacement )
|
|
{
|
|
RegExp* otherChild = replacement->child();
|
|
ConcRegExp* otherConc = dynamic_cast<ConcRegExp*>( otherChild );
|
|
if ( ! otherConc ) {
|
|
// Watch out for garbage here!
|
|
otherConc = new ConcRegExp( false );
|
|
otherConc->addRegExp( otherChild );
|
|
}
|
|
|
|
RegExpList newList;
|
|
RegExpListIt it1( list );
|
|
while ( *it1 ) {
|
|
(*it1)->replacePart( replacement );
|
|
RegExpListIt it2 = it1;
|
|
RegExpListIt it3( otherConc->list );
|
|
bool match = true;
|
|
int count = 0;
|
|
|
|
// See if replacement is a sublist of list starting from what it1 points at
|
|
for ( ; *it2 && * it3 && match ; ) {
|
|
if (! ( **it2 == **it3 ) )
|
|
match = false;
|
|
++it2;
|
|
++it3;
|
|
++count;
|
|
}
|
|
|
|
if ( match && ! *it3) {
|
|
// I found a match, delete the element in it1, which is common with it3
|
|
while ( *it1 != *it2 ) {
|
|
RegExp* item = *it1;
|
|
++it1;
|
|
delete item;
|
|
}
|
|
RegExp* theClone = replacement->clone();
|
|
newList.append( theClone );
|
|
addChild( theClone );
|
|
}
|
|
else {
|
|
newList.append( *it1 );
|
|
++it1;
|
|
}
|
|
}
|
|
list = newList;
|
|
}
|
|
|
|
|