/* -*-mode: C; fill-column: 77; c-basic-offset: 4; -*- */
/* 
 * Copyright 1999 - 2001 by Eric House (fixin@peak.org).  All rights reserved.
 *
 * 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.
 */

#include "prefsdlg.h"
#include "callback.h"
#include "palmutil.h"
#include "xwords4defines.h"
#include "newgame.h" /* for drawOneGadget */

void localPrefsToGlobal( PalmAppGlobals* globals );
static void localPrefsToControls( PalmAppGlobals* globals, 
                                  PrefsDlgState* state );
static void drawPrefsTypeGadgets( PalmAppGlobals* globals );
static void showHidePrefsWidgets( PalmAppGlobals* globals, FormPtr form );
static Boolean checkPrefsHiliteGadget( PalmAppGlobals* globals, FormPtr form, 
                                       EventType* event );
static void controlsToLocalPrefs( PalmAppGlobals* globals, 
                                  PrefsDlgState* state );
static Boolean dropCtlUnlessNewGame( PalmAppGlobals* globals, XP_U16 id );

Boolean
PrefsFormHandleEvent( EventPtr event )
{
    Boolean result = false;
    PalmAppGlobals* globals;
    PrefsDlgState* state;
    FormPtr form;
    EventType eventToPost;
    Int16 chosen;

    CALLBACK_PROLOGUE();
    globals = getFormRefcon();
    state = globals->prefsDlgState;

    switch ( event->eType ) {

    case frmOpenEvent:

        if ( !state ) {
            GlobalPrefsToLocal( globals );
            state = globals->prefsDlgState;
        }

        sizeGadgetsForStrings( FrmGetActiveForm(),
                               getActiveObjectPtr( XW_PREFS_TYPES_LIST_ID ),
                               XW_PREFS_APPWIDE_CHECKBX_ID );

        state->playerBdSizeList = 
            getActiveObjectPtr( XW_PREFS_BDSIZE_LIST_ID );
        state->phoniesList = 
            getActiveObjectPtr( XW_PREFS_PHONIES_LIST_ID );

    case frmUpdateEvent:
        form = FrmGetActiveForm();

        localPrefsToControls( globals, state );

        showHidePrefsWidgets( globals, form );

        FrmDrawForm( form );

        drawPrefsTypeGadgets( globals );
        break;

    case penDownEvent:
        form = FrmGetActiveForm();
        result = checkPrefsHiliteGadget( globals, form, event );
        break;

    case fldEnterEvent:
        result = dropCtlUnlessNewGame( globals,
                                       event->data.fldEnter.fieldID );
        break;
    case ctlEnterEvent:
        result = dropCtlUnlessNewGame( globals,
                                       event->data.ctlSelect.controlID );
        break;

    case ctlSelectEvent:
        result = true;
        switch ( event->data.ctlSelect.controlID ) {

        case XW_PREFS_PHONIES_TRIGGER_ID:
            chosen = LstPopupList( state->phoniesList );
            if ( chosen >= 0 ) {
                setSelectorFromList( XW_PREFS_PHONIES_TRIGGER_ID, 
                                     state->phoniesList, chosen );
                state->phoniesAction = chosen;
            }
            break;

        case XW_PREFS_BDSIZE_SELECTOR_ID:
            XP_ASSERT( globals->isNewGame ); /* above disables otherwise */
            chosen = LstPopupList( state->playerBdSizeList );
            if ( chosen >= 0 ) {
                setSelectorFromList( XW_PREFS_BDSIZE_SELECTOR_ID, 
                                     state->playerBdSizeList, chosen );
                state->curBdSize = PALM_MAX_ROWS - (chosen*2);
            }
            break;

        case XW_PREFS_TIMERON_CHECKBOX_ID:
            XP_ASSERT( globals->isNewGame );
            form = FrmGetActiveForm();
            showHidePrefsWidgets( globals, form );
            break;

        case XW_PREFS_OK_BUTTON_ID:
            controlsToLocalPrefs( globals, state );
            eventToPost.eType = prefsChangedEvent;
            EvtAddEventToQueue( &eventToPost );
            globals->postponeDraw = true;

        case XW_PREFS_CANCEL_BUTTON_ID:
            FrmReturnToForm( 0 );
            break;
        }
        break;

    default:
        break;
    }

    CALLBACK_EPILOGUE();
    return result;
} /* prefsFormHandleEvent */

static Boolean
dropCtlUnlessNewGame( PalmAppGlobals* globals, XP_U16 id )
{
    Boolean result = false;

    switch ( id ) {

    case XW_PREFS_NOHINTS_CHECKBOX_ID:
    case XW_PREFS_BDSIZE_SELECTOR_ID:
    case XW_PREFS_TIMERON_CHECKBOX_ID:
    case XW_PREFS_TIMER_FIELD_ID:
        if ( globals->isNewGame ) {
            break;
        }
        result = true;		
        break;
    }

    if ( result ) {
        beep();
    }

    return result;
} /* dropCtlUnlessNewGame */

void
GlobalPrefsToLocal( PalmAppGlobals* globals )
{
    PrefsDlgState* state = globals->prefsDlgState;

    if ( !state ) {
        state = globals->prefsDlgState = XP_MALLOC( globals->mpool,
                                                    sizeof(*state) );
    }

    state->curBdSize = !!globals->game.model? 
        model_numRows( globals->game.model ) : PALM_MAX_ROWS;

    state->showColors = globals->gState.showColors;
    state->smartRobot = globals->util.gameInfo->robotSmartness == SMART_ROBOT;
    state->showGrid = globals->gState.showGrid;
    state->showProgress = globals->gState.showProgress;
    XP_MEMCPY( &state->cp, &globals->gState.cp, sizeof(state->cp) );
    XP_ASSERT( !!globals->game.server );

    state->phoniesAction = globals->util.gameInfo->phoniesAction;
    state->hintsNotAllowed = globals->gameInfo.hintsNotAllowed;
    state->timerEnabled = globals->util.gameInfo->timerEnabled;
    state->gameSeconds = globals->util.gameInfo->gameSeconds;

    state->stateTypeIsGlobal = globals->stateTypeIsGlobal;
} /* GlobalPrefsToLocal */

XP_Bool
LocalPrefsToGlobal( PalmAppGlobals* globals )
{
    PrefsDlgState* state = globals->prefsDlgState;
    XP_Bool erase = XP_FALSE;

    /* curBdSize handled elsewhere */

    globals->gState.showColors = state->showColors;

    globals->util.gameInfo->robotSmartness = 
        state->smartRobot? SMART_ROBOT:DUMB_ROBOT;
    
    erase = globals->gState.showGrid != state->showGrid;
    globals->gState.showGrid = state->showGrid;

    XP_MEMCPY( &globals->gState.cp, &state->cp, sizeof(globals->gState.cp) );

    globals->gState.showProgress = state->showProgress;

    globals->util.gameInfo->phoniesAction = state->phoniesAction;

    globals->gameInfo.hintsNotAllowed = state->hintsNotAllowed;

    globals->util.gameInfo->timerEnabled = state->timerEnabled;
    globals->util.gameInfo->gameSeconds = state->gameSeconds;
    return erase;
} /* LocalPrefsToGlobal */

static void
numToField( UInt16 id, XP_S16 num )
{
    FieldPtr field;
    char buf[16];

    StrIToA( buf, num );
    field = getActiveObjectPtr( id );
    FldInsert( field, buf, StrLen(buf) );
} /* numToField */

static void
localPrefsToControls( PalmAppGlobals* globals, PrefsDlgState* state ) 
{
    setSelectorFromList( XW_PREFS_BDSIZE_SELECTOR_ID, 
                         state->playerBdSizeList, 
                         (PALM_MAX_ROWS - state->curBdSize) / 2 );

    setSelectorFromList( XW_PREFS_PHONIES_TRIGGER_ID, state->phoniesList, 
                         state->phoniesAction );

    setBooleanCtrl( XW_PREFS_PLAYERCOLORS_CHECKBOX_ID, state->showColors );
    setBooleanCtrl( XW_PREFS_PROGRESSBAR_CHECKBOX_ID, state->showProgress );
    setBooleanCtrl( XW_PREFS_NOHINTS_CHECKBOX_ID, state->hintsNotAllowed );
    setBooleanCtrl( XW_PREFS_ROBOTSMART_CHECKBOX_ID, state->smartRobot );
    setBooleanCtrl( XW_PREFS_SHOWGRID_CHECKBOX_ID, state->showGrid );
    setBooleanCtrl( XW_PREFS_SHOWARROW_CHECKBOX_ID, state->cp.showBoardArrow );
    setBooleanCtrl( XW_PREFS_ROBOTSCORE_CHECKBOX_ID,
                    state->cp.showRobotScores );
    setBooleanCtrl( XW_PREFS_TIMERON_CHECKBOX_ID, state->timerEnabled );

    numToField( XW_PREFS_TIMER_FIELD_ID, state->gameSeconds/60 );
} /* localPrefsToControls */

static XP_S16
fieldToNum( UInt16 id )
{
    FieldPtr field;
    char* txt;

    field = getActiveObjectPtr( id );
    txt = FldGetTextPtr( field );
    return StrAToI( txt );
} /* fieldToNum */

static void
controlsToLocalPrefs( PalmAppGlobals* globals, PrefsDlgState* state )
{
    state->showColors = getBooleanCtrl( XW_PREFS_PLAYERCOLORS_CHECKBOX_ID );
    state->smartRobot = getBooleanCtrl( XW_PREFS_ROBOTSMART_CHECKBOX_ID );
    state->showGrid = getBooleanCtrl( XW_PREFS_SHOWGRID_CHECKBOX_ID );
    state->cp.showBoardArrow = 
        getBooleanCtrl( XW_PREFS_SHOWARROW_CHECKBOX_ID );
    state->cp.showRobotScores = 
        getBooleanCtrl( XW_PREFS_ROBOTSCORE_CHECKBOX_ID );
    state->showProgress = getBooleanCtrl( XW_PREFS_PROGRESSBAR_CHECKBOX_ID );

    /* trapping ctlEnterEvent should mean it can't have changed, so no need
       to test before grabbing the value. */
    XP_ASSERT( globals->isNewGame ||
               (state->hintsNotAllowed == 
                getBooleanCtrl( XW_PREFS_NOHINTS_CHECKBOX_ID) ) );
    state->hintsNotAllowed = getBooleanCtrl( XW_PREFS_NOHINTS_CHECKBOX_ID );

    state->timerEnabled = getBooleanCtrl( XW_PREFS_TIMERON_CHECKBOX_ID );
    state->gameSeconds = fieldToNum( XW_PREFS_TIMER_FIELD_ID ) * 60;
} /* controlsToLocalPrefs */

static void
drawPrefsTypeGadgets( PalmAppGlobals* globals )
{
    UInt16 i;
    ListPtr list = getActiveObjectPtr( XW_PREFS_TYPES_LIST_ID );
    UInt16 active = globals->prefsDlgState->stateTypeIsGlobal? 0:1;

    XP_ASSERT( !!list );

    for ( i = 0; i < 2; ++i ) {
        char* text = LstGetSelectionText( list, i );
        drawOneGadget( i + XW_PREFS_APPWIDE_CHECKBX_ID, text, i==active );
    }
} /* drawPrefsTypeGadgets */

static void
doOneSet( FormPtr form, XP_U16 first, XP_U16 last, XP_Bool enable )
{
    while ( first <= last ) {
        disOrEnable( form, first, enable );
        ++first;
    }
} /* doOneSet */

/* Which set of controls is supposed to be visible changes depending on which
 * gadget is selected.
 */
static void
showHidePrefsWidgets( PalmAppGlobals* globals, FormPtr form )
{
    XP_Bool global = globals->prefsDlgState->stateTypeIsGlobal;

    XP_U16 firstToEnable, lastToEnable, firstToDisable, lastToDisable;

    /* Need to do the disabling first */
    if ( global ) {
        firstToEnable = XW_PREFS_FIRST_GLOBAL_ID;
        lastToEnable =  XW_PREFS_LAST_GLOBAL_ID;
        firstToDisable = XW_PREFS_FIRST_PERGAME_ID;
        lastToDisable =  XW_PREFS_LAST_PERGAME_ID;
    } else {
        firstToDisable = XW_PREFS_FIRST_GLOBAL_ID;
        lastToDisable =  XW_PREFS_LAST_GLOBAL_ID;
        firstToEnable = XW_PREFS_FIRST_PERGAME_ID;
        lastToEnable =  XW_PREFS_LAST_PERGAME_ID;
    }

    doOneSet( form, firstToDisable, lastToDisable, XP_FALSE );
    doOneSet( form, firstToEnable, lastToEnable, XP_TRUE );

    if ( !global ) {
        Boolean on = getBooleanCtrl( XW_PREFS_TIMERON_CHECKBOX_ID );
        disOrEnable( form, XW_PREFS_TIMER_FIELD_ID, on );
    }
} /* showHidePrefsWidgets */

static Boolean
checkPrefsHiliteGadget( PalmAppGlobals* globals, FormPtr form, 
			EventType* event )
{
    Boolean result = false;
    UInt16 selGadget;

    result = penInGadget( event, &selGadget );
    if ( result ) {
        XP_Bool globalChosen = selGadget == XW_PREFS_APPWIDE_CHECKBX_ID;

        result = globalChosen != globals->prefsDlgState->stateTypeIsGlobal;
	    
        if ( result ) {
            globals->prefsDlgState->stateTypeIsGlobal = globalChosen;

            showHidePrefsWidgets( globals, form );
            drawPrefsTypeGadgets( globals );
        }
    }

    return result;
} /* checkPrefsHiliteGadget */