/***************************************************************************
 *   Copyright (C) 2005 by Ari Loytynoja   *
 *   ari@ebi.ac.uk   *
 *                                                                         *
 *   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.             *
 ***************************************************************************/

#ifndef ANCESTRALNODE_H
#define ANCESTRALNODE_H

#include <treenode.h>
#include <ancestralsequence.h>

class AncestralNode : public TreeNode
{
    AncestralSequence* seq;

public:
    AncestralNode(std::string s);

    ~AncestralNode();

    std::string left_nhx_tag;
    std::string right_nhx_tag;

    AncestralSequence* getSequence()
    {
        return seq;
    }

    int getTerminalNodeNumber();
    int getInternalNodeNumber();

    void concatenateTerminalNames(std::string *s)
    {
        lChild->concatenateTerminalNames(s);
        rChild->concatenateTerminalNames(s);
    }

    void getNames(std::vector<std::string>* nms);
    void getTerminalNames(std::vector<std::string>* nms);
    void getInternalNames(std::vector<std::string>* nms);

    void setCharString(std::vector<std::string>* sns,std::vector<std::string>* sqs,int* count);
    void setCharString(std::vector<std::string>* sns,std::vector<std::string>* sqs);
    void getCharStrings(std::vector<std::string>* sqs);

    void getAllSubtrees(std::map<std::string,float> *subtrees);
    void getAllSubtreesWithNodename(std::map<std::string,std::string> *subtrees);
    void getSubtreeBelow(std::string *subtree);
    void markRealignSubtrees(std::map<std::string,float> *subtrees);

    bool anyChildNodeRealigned()
    {
        if(getLChild()->anyChildNodeRealigned())
            return true;
        if(getRChild()->anyChildNodeRealigned())
            return true;
        return realignNode;
    }

    void getThisAlignmentPostProbAt(double* p,int i);
    void getLowestAlignmentPostProbAt(double* p,int i);

    void alignSequences( );
    void alignThisNode( );
    bool readAlignment();
    bool readThisNode();
    void printDebugNodes();

    bool partlyAlignSequences();
    bool updateAlignedSequences();

    void getCleanNewick(std::string* tree);
    void outputXml(std::ofstream* out,std::map<std::string,std::string> *anc_seqs,bool triple);

    void writeNewick(std::string* tree,int* sInd);
    void writeLabelledNewick(std::string* tree,int* sInd);
    void getNewick(std::string* tree);
    void getLabelledNewickBrl(std::string* tree);
    void getLabelledNewick(std::string* tree);
    void getNewickBrl(std::string* tree);
    void getNexusTree(std::string* tree, int *count);

    void getNHXBrl(std::string* tree,int *nodeNumber);

    void getMLAncestralSeqs(std::vector<std::string>* sqs,std::vector<std::string>* nms);
    void setSiteLength(int l);
    void setSiteIndex(int site,int index);

    void getAllCharactersAt(std::vector<std::string>* col,int i,bool parentIns,bool parentPermIns);
    void getAncCharactersAt(std::vector<std::string>* col,int i,bool parentIns,bool parentPermIns);
    std::string getThisAncCharactersAt(int i);
    void getCharactersAt(std::vector<std::string>* col,int i,bool parentPermIns=false);
    void getIndelEvents(std::vector<indelEvent> *indels);
    void getSubstEvents(std::vector<substEvent> *substs);

    void setPermanentInsertion(int i);
    void printChildAlignment(TreeNode *node,std::string filename);

    void setAncSequenceStrings(std::vector<std::string> *aseqs)
    {
        lChild->setAncSequenceStrings(aseqs);

        alignedseqstr = aseqs->at(0);
        aseqs->erase(aseqs->begin());

        rChild->setAncSequenceStrings(aseqs);
    }

    void setAncSequenceStrings(std::map<std::string,std::string> *aseqs)
    {
        lChild->setAncSequenceStrings(aseqs);
        rChild->setAncSequenceStrings(aseqs);

        if(aseqs->find(this->getNodeName())!=aseqs->end())
            alignedseqstr = aseqs->find(this->getNodeName())->second;
//        std::cout<<nodeName<<" "<<alignedseqstr<<std::endl;
    }

    void setThisAncSequenceString(std::vector<std::string> *aseqs)
    {
        alignedseqstr = aseqs->at(0);
        aseqs->erase(aseqs->begin());
    }

    void setAncSequenceGaps(std::vector<std::string>* aseqs)
    {
        lChild->setAncSequenceGaps(aseqs);
        rChild->setAncSequenceGaps(aseqs);

        std::string gstr = aseqs->at(0);
        aseqs->erase(aseqs->begin());

//        std::cout<<nodeName<<std::endl<<gstr<<std::endl;
//        std::cout<<nodeName<<std::endl<<alignedseqstr<<std::endl;
        for(int i=0;i<gstr.length();i++)
        {
            if(gstr.at(i)=='-')
                alignedseqstr.at(i) = '-';
            if(gstr.at(i)=='.')
                alignedseqstr.at(i) = '.';
        }
    }

    void setThisAncSequenceString(std::string aseq)
    {
        alignedseqstr = aseq;
    }

    void getAncSequenceStrings(std::vector<std::string> *aseqs)
    {
        lChild->getAncSequenceStrings(aseqs);
        aseqs->push_back(alignedseqstr);
        rChild->getAncSequenceStrings(aseqs);

    }

    void setAlignedSequenceStrings(std::vector<std::string>* aseqs)
    {
        lChild->setAlignedSequenceStrings(aseqs);
        rChild->setAlignedSequenceStrings(aseqs);
    }

    void getAlignedSequenceStrings(std::vector<std::string>* aseqs)
    {
        lChild->getAlignedSequenceStrings(aseqs);
        rChild->getAlignedSequenceStrings(aseqs);
    }

    void fixTerminalNodenames()
    {
        lChild->fixTerminalNodenames();
        rChild->fixTerminalNodenames();
    }

    void deleteAncestralSeqs()
    {
        lChild->deleteAncestralSeqs();
        rChild->deleteAncestralSeqs();

        if(seq != NULL)
        {
            delete seq;
        }
    }

    bool updateInsertionSite(int i,bool has_parent);

};

#endif
