/***************************************************************************
 *   Copyright (C) 2004-2009 by Thomas Fischer                             *
 *   fischer@unix-ag.uni-kl.de                                             *
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 *   This program 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 General Public License for more details.                          *
 *                                                                         *
 *   You should have received a copy of the GNU General Public License     *
 *   along with this program; if not, write to the                         *
 *   Free Software Foundation, Inc.,                                       *
 *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
 ***************************************************************************/
#include <tqregexp.h>
#include <tqstringlist.h>

#include "preamble.h"

namespace BibTeX
{

    Preamble::Preamble() : Element(), m_value( new Value() )
    {
// TODO
    }

    Preamble::Preamble( const TQString& text ) : Element()
    {
        m_value = new Value( text, false );
    }

    Preamble::Preamble( Preamble *other ): Element(), m_value( NULL )
    {
        copyFrom( other );
    }

    Preamble::~Preamble()
    {
        delete m_value;
    }

    Value *Preamble::value() const
    {
        return m_value;
    }

    void Preamble::setValue( Value *value )
    {
        if ( value != m_value )
        {
            delete m_value;

            if ( value != NULL )
                m_value = new Value( value );
            else
                m_value = NULL;
        }
    }

    bool Preamble::containsPattern( const TQString& pattern, EntryField::FieldType fieldType, FilterType filterType, bool caseSensitive ) const
    {
        TQString text = m_value->simplifiedText();

        if ( filterType == ftExact )
        {
            /** check for exact match */
            return fieldType == EntryField::ftUnknown && text.contains( pattern, caseSensitive );
        }
        else
        {
            /** for each word in the search pattern ... */
            TQStringList words = TQStringList::split( TQRegExp( "\\s+" ), pattern );
            unsigned int hits = 0;
            for ( TQStringList::Iterator it = words.begin(); it != words.end(); ++it )
            {
                /** check if word is contained in text */
                if ( fieldType == EntryField::ftUnknown && text.contains( *it, caseSensitive ) )
                    ++hits;
            }

            /** return success depending on filter type and number of hits */
            return (( filterType == ftAnyWord && hits > 0 ) || ( filterType == ftEveryWord && hits == words.count() ) );
        }
    }

    Element* Preamble::clone()
    {
        return new Preamble( this );
    }

    void Preamble::copyFrom( Preamble *other )
    {
        if ( m_value != NULL ) delete m_value;
        m_value = new Value( other->m_value );
    }

    TQString Preamble::text() const
    {
        return "Preamble: " + m_value->text();
    }
}