#define MAX_PHASES  31

std::bitset<MAX_PHASES> phases;

struct MatchStruct {
    MatchStruct(Player* _player1, Player* _player2) : phaseID(0) // cant phase, use 1 (2^0 = 1)
    {
        player1 = _player1->GetGUID();
        player2 = _player2->GetGUID();
    }

    uint64 player1;
    uint64 player2;
    uint8 phaseID;
};
typedef std::list<MatchStruct> MatchList;
MatchList MatchData;

class DuelPhasing : public PlayerScript
{
public:
    DuelPhasing() : PlayerScript("DuelPhasing") { }

    void OnDuelStart(Player* player1, Player* player2)
    {
        MatchStruct info(player1, player2);

        if(phases.all()) // if all phases full, check if players offline:
            ErasePlayers();

        if(phases.all()) // full
        {
            ChatHandler(player1->GetSession()).SendSysMessage("You cannot be phased at the moment");// this won't happen often
            ChatHandler(player2->GetSession()).SendSysMessage("You cannot be phased at the moment");// this won't happen often
        }
        else // has phases left
        {
            for (int i = 0; i < MAX_PHASES; ++i)
            {
                if (!phases.test(i))
                {
                    phases.set(i, true); // phase in use
                    info.phaseID = i;
                    break;
                }
            }
            ChatHandler(player1->GetSession()).SendSysMessage("You have been phased.");
            ChatHandler(player2->GetSession()).SendSysMessage("You have been phased.");
        }

        MatchData.push_back(info);
        player1->SetPhaseMask(pow(2.0f, info.phaseID), true);
        player2->SetPhaseMask(pow(2.0f, info.phaseID), true);
        // teleport etc
    };

    void ErasePlayers()
    {
        for(MatchList::iterator it = MatchData.begin(); it != MatchData.end();) // loop records
        {
            Player* player1 = sObjectAccessor->FindPlayer(it->player1);
            Player* player2 = sObjectAccessor->FindPlayer(it->player2);
            if(!player1 || !player2) // neither or both offline
            {
                // Teleport players out or something

                phases.set(it->phaseID, false); // set phase unused
                MatchData.erase(it++);
                continue;
            }
            ++it;
        }
    }

    void OnDuelEnd(Player* pWinner, Player* pLoser, DuelCompleteType /*type*/)
    {
        for(MatchList::iterator it = MatchData.begin(); it != MatchData.end();) // loop records
        {

            double phase = sqrt(double(pWinner->GetPhaseMask()));
            if(phase - uint8(phase)) // was not unique
                return;
            uint8 phaseID = uint8(phase);
            if(phaseID >= phases.size())
                return; // wrong ID (too high, will crash)
            phases.set(phaseID, false);
        }
        pWinner->RemoveAllSpellCooldown();
        pLoser->RemoveAllSpellCooldown();
        pWinner->SetHealth(pWinner->GetMaxHealth());
        if ( pWinner->getPowerType() == POWER_MANA )
            pWinner->SetPower(POWER_MANA, pWinner->GetMaxPower(POWER_MANA));
        pLoser->SetHealth(pLoser->GetMaxHealth());
        if ( pLoser->getPowerType() == POWER_MANA )
            pLoser->SetPower(POWER_MANA,  pLoser->GetMaxPower(POWER_MANA));
    }
};

void AddSC_DuelPhasing()
{
    new DuelPhasing();
}