/* This file is part of the KDE project
   Copyright (C) 1998, 1999 Torben Weis <weis@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 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.
*/

// TODO: Torben: On error free memory!   (r932881 might serve as inspiration)

extern "C"
{
#include "ktraderparse_p.h"

void KTraderParse_mainParse( const char *_code );
}

#include "ktraderparsetree_p.h"

#include <assert.h>
#include <stdlib.h>
#include <kdebug.h>

namespace KTraderParse
{

struct ParsingData
{
    ParseTreeBase::Ptr ptr;
    QByteArray buffer;
};

}

using namespace KTraderParse;

thread_local ParsingData* s_parsingData = nullptr;

static int KTraderParseDeinit() {
    delete s_parsingData;
    return 0;
}
Q_DESTRUCTOR_FUNCTION(KTraderParseDeinit);

ParseTreeBase::Ptr KTraderParse::parseConstraints( const QString& _constr )
{
    if (s_parsingData) {
        s_parsingData->ptr.clear();
        delete s_parsingData;
    }
    s_parsingData = new ParsingData();
    s_parsingData->buffer = _constr.toUtf8();
    KTraderParse_mainParse(s_parsingData->buffer.constData());
    ParseTreeBase::Ptr ret = s_parsingData->ptr;
    return ret;
}

void KTraderParse_setParseTree( void *_ptr1 )
{
    s_parsingData->ptr = static_cast<ParseTreeBase*>(_ptr1);
}


void KTraderParse_error( const char* err )
{
    kWarning(7014) << "Parsing" << s_parsingData->buffer << "gave:" << err;
}

void* KTraderParse_newOR( void *_ptr1, void *_ptr2 )
{
  return new ParseTreeOR( static_cast<ParseTreeBase*>(_ptr1), static_cast<ParseTreeBase*>(_ptr2) );
}

void* KTraderParse_newAND( void *_ptr1, void *_ptr2 )
{
  return new ParseTreeAND( static_cast<ParseTreeBase*>(_ptr1), static_cast<ParseTreeBase*>(_ptr2) );
}

void* KTraderParse_newCMP( void *_ptr1, void *_ptr2, int _i )
{
  return new ParseTreeCMP( static_cast<ParseTreeBase*>(_ptr1), static_cast<ParseTreeBase*>(_ptr2), _i );
}

void* KTraderParse_newIN( void *_ptr1, void *_ptr2, int _cs )
{
  return new ParseTreeIN( static_cast<ParseTreeBase*>(_ptr1), static_cast<ParseTreeBase*>(_ptr2),
    _cs == 1 ? Qt::CaseSensitive : Qt::CaseInsensitive );
}

void* KTraderParse_newSubstringIN( void *_ptr1, void *_ptr2, int _cs )
{
  return new ParseTreeIN(static_cast<ParseTreeBase*>(_ptr1), static_cast<ParseTreeBase*>(_ptr2),
                          _cs == 1 ? Qt::CaseSensitive : Qt::CaseInsensitive, true);
}

void* KTraderParse_newMATCH( void *_ptr1, void *_ptr2, int _cs )
{
  return new ParseTreeMATCH( static_cast<ParseTreeBase*>(_ptr1), static_cast<ParseTreeBase*>(_ptr2), _cs == 1 ? Qt::CaseSensitive : Qt::CaseInsensitive );
}

void* KTraderParse_newCALC( void *_ptr1, void *_ptr2, int _i )
{
  return new ParseTreeCALC( static_cast<ParseTreeBase*>(_ptr1), static_cast<ParseTreeBase*>(_ptr2), _i );
}

void* KTraderParse_newBRACKETS( void *_ptr1 )
{
  return new ParseTreeBRACKETS( static_cast<ParseTreeBase*>(_ptr1) );
}

void* KTraderParse_newNOT( void *_ptr1 )
{
  return new ParseTreeNOT( static_cast<ParseTreeBase*>(_ptr1) );
}

void* KTraderParse_newEXIST( char *_ptr1 )
{
  ParseTreeEXIST *t = new ParseTreeEXIST( _ptr1 );
  free(_ptr1);
  return t;
}

void* KTraderParse_newID( char *_ptr1 )
{
  ParseTreeID *t = new ParseTreeID( _ptr1 );
  free(_ptr1);
  return t;
}

void* KTraderParse_newSTRING( char *_ptr1 )
{
  ParseTreeSTRING *t = new ParseTreeSTRING( _ptr1 );
  free(_ptr1);
  return t;
}

void* KTraderParse_newNUM( int _i )
{
  return new ParseTreeNUM( _i );
}

void* KTraderParse_newFLOAT( float _f )
{
  return new ParseTreeDOUBLE( _f );
}

void* KTraderParse_newBOOL( char _b )
{
  return new ParseTreeBOOL( (bool)_b );
}

void* KTraderParse_newMAX2( char *_id )
{
  ParseTreeMAX2 *t = new ParseTreeMAX2( _id );
  free(_id);
  return t;
}

void* KTraderParse_newMIN2( char *_id )
{
  ParseTreeMIN2 *t = new ParseTreeMIN2( _id );
  free(_id);
  return t;
}

void KTraderParse_destroy(void *node)
{
    ParseTreeBase *p = reinterpret_cast<ParseTreeBase *>(node);
    if (p != s_parsingData->ptr) {
        delete p;
    }
}