#include "Editor.h"
#include <AsynchronCall.h>
#include "Interface\Dialogs\Frage.h"
#include "Interface\Dialogs\Nachricht.h"
#include <iostream>
#include <Bild.h>
#include <Globals.h>

using namespace Editor;

// Inhalt der Editor Klasse aus Editor.h
// Konstruktor
AsteroidsEditor::AsteroidsEditor()
    : ReferenceCounter()
{
    uiFactory.initParam.schrift = 0;
    kamera = new Kamera2D();
    minimap = new Kamera2D();
    minimap->setSize( 200, 200 );
    minimap->setStyle( ZeichnungHintergrund::Style::Sichtbar | ZeichnungHintergrund::Style::Rahmen );
    minimap->setRahmenFarbe( 0xFFFFFFFF );
    minimap->setName( "minimap" );
    klient = 0;
    laden = 0;
    i = 0;
    alpha = 0;
    status = START;
    dialogs = new Array< Dialog* >();
    sts = 0;
    rend = 1;
    daten = 0;
    moveObj = 0;
    rotObj = 0;
}

// Destruktor
AsteroidsEditor::~AsteroidsEditor()
{
    if( sts )
        sts->release();
    if( klient )
        klient->release();
    if( laden )
        laden->release();
    if( i )
        i->release();
    if( daten )
    {
        daten->stopWork();
        daten->release();
    }
    dialogs->release();
    kamera->release();
    minimap->release();
}

void AsteroidsEditor::ladeKarte()
{
    if( sts )
        sts = (SpielerTeamStruktur*)sts->release();
    sts = new SpielerTeamStruktur();
    klient->getSpielerTeamStruktur( sts );
    if( daten )
    {
        daten->stopWork();
        daten->release();
    }
    daten = new KarteDaten( dynamic_cast<EditorKlient*>(klient->getThis()), sts );
    i->setDaten( dynamic_cast<KarteDaten*>(daten->getThis()) );
    minimap->setWelt( daten->getWelt(), 0 );
    minimap->lookAtWorldPos( daten->zWelt()->getWorldInfo().size / 2 );
    minimap->lookAtWorldArea( (float)daten->zWelt()->getWorldInfo().size.x, (float)daten->zWelt()->getWorldInfo().size.y );
    kamera->setWelt( daten->getWelt(), 1 );
}

// nicht constant
void AsteroidsEditor::addDialog( Dialog* d )
{
    c.lock();
    dialogs->add( d );
    c.unlock();
}

// nicht constant
void AsteroidsEditor::setUIFactory( UIInit& uiFactory )
{
    this->uiFactory = uiFactory;
    if( !i && windowSize != Punkt() )
        i = new Interface( uiFactory, windowSize );
}

void AsteroidsEditor::setKlient( KSGClient::EditorServerClient* ekv )
{
    if( klient )
        klient->release();
    klient = new EditorKlient( ekv );
}

void AsteroidsEditor::setLadeAnimation( Animation2D* la )
{
    if( laden )
        laden->release();
    laden = la;
}

void AsteroidsEditor::setSichtbar()
{
    status = START;
    Punkt mS = windowSize;
    if( windowSize != Punkt() )
    {
        EditorKlient* k = dynamic_cast<EditorKlient*>(klient->getThis());
        TextRenderer* zS = new TextRenderer( dynamic_cast<Schrift*>(uiFactory.initParam.schrift->getThis()) );
        new AsynchronCall( [this, k, zS, mS]( void ) -> void {
            int ret = k->init();
            if( ret == 2 )
            {
                std::function< void() > wiederherstellen = [this, k] {
                    status = START;
                    ladeKarte();
                    this->status = INITIALIZED;
                };
                std::function< void() > verwerfen = [this, k, zS, mS] {
                    status = START;
                    if( !k->sitzungVerwerfen() )
                    {
                        Text t = "Fehler beim verwerfen der Sitzung: ";
                        t += k->getLastError();
                        this->addDialog( new Nachricht( dynamic_cast<TextRenderer*>(zS->getThis()), uiFactory, t, mS, 0 ) );
                    }
                    ladeKarte();
                    this->status = INITIALIZED;
                };
                this->addDialog( new Frage( dynamic_cast<TextRenderer*>(zS->getThis()), uiFactory, "Es wurde eine alte ungespeicherte Sitzung gefunden. möchtest du sie Wiederherstellen?", "Ja", "Nein", wiederherstellen, verwerfen, verwerfen, mS ) );
                this->status = INITIALIZED;
            }
            else if( ret == 1 )
            {
                ladeKarte();
                this->status = INITIALIZED;
            }
            else
            {
                Status* st = &status;
                this->status = INITIALIZED;
                this->addDialog( new Nachricht( dynamic_cast<TextRenderer*>(zS->getThis()), uiFactory, Text( "Fehler beim Initialisieren: " ) += k->getLastError(), mS, [st]() { *st = EXIT; } ) );
            }
            zS->release();
            k->release();
        } );
    }
    rend = 1;
}

void AsteroidsEditor::doPublicMausEreignis( MausEreignis& me )
{
    c.lock();
    for( auto i : *dialogs )
        i->doPublicMausEreignis( me );
    bool dialogActive = dialogs->hat( 0 );
    int anz = dialogs->getEintragAnzahl();
    c.unlock();
    if( anz == 0 )
    {
        i->doPublicMausEreignis( me );
        if( i->hatVerlassen() && status == INITIALIZED && !dialogActive && me.id == ME_RLinks )
        {
            status = WARTEND;
            EditorKlient* k = dynamic_cast<EditorKlient*>(klient->getThis());
            TextRenderer* zS = new TextRenderer( dynamic_cast<Schrift*>(uiFactory.initParam.schrift->getThis()) );
            Punkt mS = windowSize;
            new AsynchronCall( [this, k, zS, mS]( void ) -> void {
                if( !k->sitzungBeenden() )
                {
                    this->addDialog( new Nachricht( dynamic_cast<TextRenderer*>(zS->getThis()), uiFactory, Text( "Fehler beim Speichern: " ) += k->getLastError(), mS, 0 ) );
                    status = INITIALIZED;
                }
                else
                    status = EXIT;
                zS->release();
                k->release();
            } );
        }
    }
    if( !me.verarbeitet )
    {
        if( me.id == ME_PLinks )
        {
            Vertex pos = kamera->getWorldCoordinates( Punkt( me.mx, me.my ) );
            moveObj = (EditorObject*)daten->zWelt()->zObjectAt( (int)pos.x, (int)pos.y, 1 );
            if( moveObj )
                me.verarbeitet = 1;
        }
        if( me.id == ME_PMitte )
        {
            Vertex pos = kamera->getWorldCoordinates( Punkt( me.mx, me.my ) );
            rotObj = (EditorObject*)daten->zWelt()->zObjectAt( (int)pos.x, (int)pos.y, 1 );
            if( rotObj )
                me.verarbeitet = 1;
        }
        if( me.id == ME_Bewegung )
        {
            if( moveObj )
            {
                moveObj->setPosition( moveObj->getPosition() + Punkt( me.mx, me.my ) - maus );
                rend = 1;
                me.verarbeitet = 1;
            }
            if( rotObj )
            {
                rotObj->addDrehung( (me.mx - maus.x) / 100.f );
                rend = 1;
                me.verarbeitet = 1;
            }
        }
        if( me.id == ME_RLinks )
        {
            if( moveObj )
            {
                moveObj->update();
                me.verarbeitet = 1;
                moveObj = 0;
            }
        }
        if( me.id == ME_RMitte )
        {
            if( rotObj )
            {
                rotObj->update();
                me.verarbeitet = 1;
                rotObj = 0;
            }
        }
    }
    if( !me.verarbeitet )
    {
        if( getMausStand( M_Links ) )
        {
            if( me.mx >= minimap->getX() && me.mx < minimap->getX() + minimap->getBreite() &&
                me.my >= minimap->getY() && me.my <= minimap->getY() + minimap->getHeight() )
            {
                kamera->lookAtWorldPos( minimap->getWorldCoordinates( Punkt( me.mx - minimap->getX(), me.my - minimap->getY() ) ) );
            }
            else
            {
                if( me.id == ME_Bewegung )
                    kamera->lookAtWorldPos( kamera->getWorldPosition() + maus - Punkt( me.mx, me.my ) );
            }
        }
        if( me.id == ME_UScroll )
            kamera->setZoom( kamera->getZoom() / 0.9f );
        if( me.id == ME_DScroll )
            kamera->setZoom( kamera->getZoom() / 1.1f );
    }
    maus.x = me.mx;
    maus.y = me.my;
}

void AsteroidsEditor::doTastaturEreignis( TastaturEreignis& te )
{
    c.lock();
    for( auto i : *dialogs )
        i->doTastaturEreignis( te );
    int anz = dialogs->getEintragAnzahl();
    c.unlock();
    if( anz == 0 )
        i->doTastaturEreignis( te );
}

bool AsteroidsEditor::tick( double z )
{
    if( (status == WARTEND || status == START || (daten && daten->hasAktions())) )
    {
        if( alpha != 100 )
        {
            if( laden && !laden->istSichtbar() )
                laden->setSichtbar( 1 );
            if( alpha < 100 )
            {
                alpha += (unsigned char)(100 * z);
                if( alpha > 100 )
                    alpha = 100;
            }
            else
            {
                alpha -= (unsigned char)(100 * z);
                if( alpha < 100 )
                    alpha = 100;
            }
            rend = 1;
        }
    }
    else if( alpha != 255 )
    {
        if( laden && laden->istSichtbar() )
            laden->setSichtbar( 0 );
        if( alpha + 100 * z > 255 )
            alpha = 255;
        else
            alpha += (unsigned char)(100 * z);
        rend = 1;
    }
    if( laden )
        rend |= laden->tick( z );
    rend |= i->tick( z );
    rend |= minimap->tick( z );
    rend |= kamera->tick( z );
    c.lock();
    for( auto i : *dialogs )
        rend |= i->tick( z );
    c.unlock();
    bool tmp = rend;
    rend = 0;
    return tmp;
}

void AsteroidsEditor::render( Bild& zRObj )
{
    if( windowSize == Punkt() )
    {
        if( status != EXIT )
            windowSize = zRObj.getSize();
        setSichtbar();
        if( !i && uiFactory.initParam.schrift )
            i = new Interface( uiFactory, windowSize );
    }
    zRObj.setAlpha( alpha );
    kamera->setSize( zRObj.getSize() );
    kamera->render( zRObj );
    minimap->setPosition( 10, zRObj.getHeight() - 210 );
    minimap->render( zRObj );
    i->render( zRObj );
    c.lock();
    for( int i = dialogs->getEintragAnzahl() - 1; i >= 0; i-- )
    {
        dialogs->get( i )->render( zRObj );
        if( dialogs->get( i )->hatVerlassen() )
        {
            delete dialogs->get( i );
            dialogs->remove( i );
        }
    }
    c.unlock();
    zRObj.releaseAlpha();
    if( laden )
        laden->render( zRObj );
}

// constant
bool AsteroidsEditor::hatVerlassen( bool jetzt ) const
{
    return status == EXIT;
}