uiMenu_JR.cpp

/*

Jump'n'Run Engine
http://www.atanaslaskov.com/jnr/

BSD LICENSE
Copyright (c) 2007-2013, Atanas Laskov
All rights reserved.

Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are met:
1. Redistributions of source code must retain the above copyright notice,
this list of conditions and the following disclaimer.
2. Redistributions in binary form must reproduce the above copyright notice,
this list of conditions and the following disclaimer in the documentation
and/or other materials provided with the distribution.
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
DISCLAIMED. IN NO EVENT SHALL ATANAS LASKOV BE LIABLE FOR ANY
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

*/

#include "stdafx.h"
#include "jnr.h"

#include <windows.h>

class uiLoadProfile_JR: public uiContainer
{
    unsigned _nProfiles;
    char _title_buf[64];

public:
    unsigned profiles() { return _nProfiles; }

    uiLoadProfile_JR();
    void onCommand(unsigned long uID, unsigned long nCmd);

    void loadProfile(char*strProfile);
    char* profileName(unsigned i)
    {
        uiButton* pb  = (uiButton*)get(i + 2);
        pb->getText(_title_buf);
        return _title_buf;
    }
};

uiLoadProfile_JR::uiLoadProfile_JR(): uiContainer("ui\\dialogs\\mm-profile-list.cui")
{
    WIN32_FIND_DATA FindFileData;
    HANDLE hFind;

    BOOL bOK = FALSE;
    hFind = FindFirstFile("save\\*.profile", &FindFileData);
    if(hFind != INVALID_HANDLE_VALUE) bOK = TRUE;
    //ASSERT(hFind != INVALID_HANDLE_VALUE, "Can't list profiles or empty profile list");

    _nProfiles=0;
    #define M_BUT_HEIGHT 45

    while(bOK)
    {
        uiButton* but = new uiButton();
        but->create( laPoint3(0, (_nProfiles++)*M_BUT_HEIGHT*1.1 + 10), laPoint3(150, M_BUT_HEIGHT) );
        *strstr(FindFileData.cFileName, ".profile") = '\0';
        but->setText(FindFileData.cFileName);
        but->setID( insert(but) );
        //MSG( "%d", but->getID() );

        bOK = FindNextFile(hFind, &FindFileData);
    }

    uiButton* but = new uiButton();
    but->create( laPoint3(0, (_nProfiles)*M_BUT_HEIGHT*1.1 + 10 + M_BUT_HEIGHT*0.3), laPoint3(150, M_BUT_HEIGHT) );
    but->setText( "Cancel" );
    but->setID( insert(but) );

    _ptSize[1] = (_nProfiles+2)*M_BUT_HEIGHT*1.1 + 30;

   //MSG(FindFileData.cFileName);
}

void uiLoadProfile_JR::onCommand(unsigned long uID, unsigned long nCmd)
{
    if(!isEnabled()) return;

    //Identify the button
    uiButton* pb  = (uiButton*)get(uID);
    char title[64];
    pb->getText(title);

    if( !strstr(title, "Cancel") ) {
        loadProfile(title);
    }

    hide();
}

void uiLoadProfile_JR::loadProfile(char*strProfile)
{
    char strfile[64];
    sprintf(strfile, "save\\%s.profile", strProfile);
    laFileParser fp;

    // Try to read next level
    if( fp.fileOpen(strfile) )
    {
        try{
            laPropertyList pl;
            fp.readObj(&pl, M_FALSE);
            fp.fileClose();

            strcpy( laSystemIntegrator::getSettings()->load_level, pl.getText("load-level"));
            strcpy( laSystemIntegrator::getSettings()->load_player_name, strProfile);

            //MSG(laSystemIntegrator::getSettings()->load_level);
            laSystemIntegrator::getGame()->setStage(M_STAGE_LOAD);

            return;
        }
        catch(laError&) { };
    }

    ASSERT(M_FALSE, "Corrupted player profile '%s'", strProfile);
}

class uiNewProfile_JR: public uiChoiceDialog
{
public:
    uiLoadProfile_JR **_ppListProf;

    uiNewProfile_JR();
    virtual void onOK();
};

uiNewProfile_JR::uiNewProfile_JR(): uiChoiceDialog("ui\\dialogs\\mm-profile-new.cui"){
}

void uiNewProfile_JR::onOK()
{
    char str[32];
    ((uiEdit*)get(3))->getText(str);

    // Check if profile exists
    //
    char strfile[64];
    sprintf(strfile, "save\\%s.profile", str);
    FILE* f = fopen(strfile, "r");
    if(f)
    {
        // Aleeady exists. Close prof file and show warning
        //
        fclose(f);
        hide();

        static uiWarningDialog* pWarn = NULL;
        if(pWarn) pWarn->show();
        else{
            pWarn = new uiWarningDialog("ui\\dialogs\\mm-profile-w-duplicate.cui", this);
            ((uiContainer*)_pParent)->insert( pWarn );
        }
    }
    else
    {
        // Let the player create the sheet with the
        // default params
        //
        f = fopen(strfile, "w+");
        fprintf(f, "[profile]\n [text] load-level: '%s' \n[/profile]", M_NEWGAME_FIRST_LEVEL);
        fclose(f);

        strcpy( laSystemIntegrator::getSettings()->load_player_name, str);
        strcpy( laSystemIntegrator::getSettings()->load_level, M_NEWGAME_FIRST_LEVEL);
        laSystemIntegrator::getGame()->setStage(M_STAGE_LOAD);

        // Invalidate profile list;
        delete *_ppListProf;
        *_ppListProf = NULL;
    }
}

uiMenu_JR::uiMenu_JR(unsigned nMenuType)
{
    _nMenuType = nMenuType;

    switch(_nMenuType)
    {
    case M_JRMENU_MAIN:
        load("ui\\dialogs\\mmenu.cui");
        break;
    case M_JRMENU_INGAME:
        load("ui\\dialogs\\mmenu-ingame.cui");
        break;
    case M_JRMENU_EDIT:
        load("ui\\dialogs\\mmenu-edit.cui");
        break;
    default:
        throw laError("uiMenu_JR::uiMenu_JR(): Unimplemented menu type");
    }

    _pListProf = NULL;
    _pNewProf = NULL;
}

uiMenu_JR::~uiMenu_JR(void)
{
    if(_pListProf) delete _pListProf;
    if(_pNewProf) delete _pNewProf;
}

void uiMenu_JR::_create_profile_dialogs()
{
    ASSERT(_pParent, "Paremnt must be set to create dialogs");

    if(!_pListProf)
    {
        _pListProf = new uiLoadProfile_JR();
        ((uiContainer*)_pParent)->insert( _pListProf );
        _pListProf->hide();
    }

    if(!_pNewProf)
    {
        _pNewProf = new uiNewProfile_JR();
        ((uiContainer*)_pParent)->insert( _pNewProf );
        _pNewProf->hide();
    }

    // Allows the new prof window to invalidate the prof list
    _pNewProf->_ppListProf = &_pListProf;
}


void uiMenu_JR::reply()
{
    _create_profile_dialogs();
    if( _pListProf->profiles() == 0 ) get(2)->disable();
    else get(2)->enable();

    uiContainer::reply();
}

void uiMenu_JR::onCommand(unsigned long uID, unsigned long nCmd)
{
    if(!isEnabled()) return;

    //Identify the button
    uiButton* pb  = (uiButton*)get(uID);
    char title[64];
    pb->getText(title);

    if(strstr(title, "New Game"))
    {
        // New profile prompt
        _pNewProf->show();
    }
    else if(strstr(title, "Continue"))
    {
        // Only 1 profile, so activate it without prompting
        if(_pListProf->profiles() == 1)
        {
            _pListProf->loadProfile( _pListProf->profileName(0) );
        }
        else
        {
            // New profile prompt
            _pListProf->show();
        }
    }
    else if(strstr(title, "New Level"))
    {
        ((stageEdit*)(laSystemIntegrator::getGame()->getStage(M_STAGE_EDIT)))
            ->pNewLevelDlg->show();
    }
    else if(strstr(title, "Save As"))
    {
        ((stageEdit*)(laSystemIntegrator::getGame()->getStage(M_STAGE_EDIT)))
            ->pSaveDlg->show();
    }
    else if(strstr(title, "Open"))
    {
        ((stageEdit*)(laSystemIntegrator::getGame()->getStage(M_STAGE_EDIT)))
            ->pOpenDlg->show();
    }
    else if(strstr(title, "Editor"))
    {
        disable();
        ((uiContainer*)_pParent)->insert(new uiStartEditorDlg());
    }
    else if(strstr(title, "About"))
    {
        hide();
        ((uiContainer*)_pParent)->insert(new uiAboutDlg());
    }
    else if(strstr(title, "Exit"))
    {
        ::laSystemIntegrator::getEnvironment()->terminate();
    }
    else if(strstr(title, "Resume"))
    {
        hide();
    }
    else if(strstr(title, "Return"))
    {
        laSystemIntegrator::getGame()->setStage(M_STAGE_MENU);
        hide();
    }
    else if(strstr(title, "hide"))
    {
        collapse();
    }
    else if(strstr(title, "show"))
    {
        expand();
    }
}

void uiMenu_JR::collapse()
{
    move(laPoint3(20, -290), M_AR, M_AB);
    ((uiEdit*)get(2))->setText("show menu");
}

void uiMenu_JR::expand()
{
    move(laPoint3(20, -20), M_AR, M_AB);
    ((uiEdit*)get(2))->setText("hide menu");
}

void uiMenu_JR::toggle()
{
    char caption[128];
    ((uiEdit*)get(2))->getText(caption);

    if(strstr( caption, "show" )) expand();
    else collapse();
}