xwords/xwords4/linux/cursesmain.c

/* -*- compile-command: "make MEMDEBUG=TRUE -j3"; -*- */
/* 
 * Copyright 2000 - 2011 by Eric House (xwords@eehouse.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.
 */
#ifdef PLATFORM_NCURSES

#include <ncurses.h>
#include <signal.h>
#include <assert.h>
#include <ctype.h>
#include <sys/time.h>
#include <time.h>

#include <netdb.h>		/* gethostbyname */
#include <errno.h>
//#include <net/netinet.h>

#include <sys/poll.h>

#include <sys/types.h>
#include <sys/socket.h>
#include <unistd.h>
#include <fcntl.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <netinet/in.h>

#include "linuxmain.h"
#include "linuxutl.h"
#include "linuxdict.h"
#include "cursesmain.h"
#include "cursesask.h"
#include "cursesletterask.h"
#include "linuxbt.h"
#include "model.h"
#include "draw.h"
#include "board.h"
#include "engine.h"
/* #include "compipe.h" */
#include "xwproto.h"
#include "xwstream.h"
#include "xwstate.h"
#include "strutils.h"
#include "server.h"
#include "memstream.h"
#include "util.h"
#include "dbgutil.h"
#include "linuxsms.h"
#include "linuxudp.h"
#include "gamesdb.h"
#include "relaycon.h"

#ifdef CURSES_SMALL_SCREEN
# define MENU_WINDOW_HEIGHT 1
# define BOARD_OFFSET 0
#else
# define MENU_WINDOW_HEIGHT 5	/* three lines plus borders */
# define BOARD_OFFSET 1
#endif

#ifndef CURSES_CELL_HT
# define CURSES_CELL_HT 1
#endif
#ifndef CURSES_CELL_WIDTH
# define CURSES_CELL_WIDTH 2
#endif

#define INFINITE_TIMEOUT -1
#define BOARD_SCORE_PADDING 3


typedef XP_Bool (*CursesMenuHandler)(CursesAppGlobals* globals);
typedef struct MenuList {
    CursesMenuHandler handler;
    char* desc;
    char* keyDesc;
    char key;
} MenuList;

static XP_Bool handleQuit( CursesAppGlobals* globals );
static XP_Bool handleResend( CursesAppGlobals* globals );
static XP_Bool handleSpace( CursesAppGlobals* globals );
static XP_Bool handleRet( CursesAppGlobals* globals );
static XP_Bool handleHint( CursesAppGlobals* globals );
#ifdef KEYBOARD_NAV
static XP_Bool handleLeft( CursesAppGlobals* globals );
static XP_Bool handleRight( CursesAppGlobals* globals );
static XP_Bool handleUp( CursesAppGlobals* globals );
static XP_Bool handleDown( CursesAppGlobals* globals );
#endif
static XP_Bool handleCommit( CursesAppGlobals* globals );
static XP_Bool handleFlip( CursesAppGlobals* globals );
static XP_Bool handleToggleValues( CursesAppGlobals* globals );
static XP_Bool handleBackspace( CursesAppGlobals* globals );
static XP_Bool handleUndo( CursesAppGlobals* globals );
static XP_Bool handleReplace( CursesAppGlobals* globals );
static XP_Bool handleJuggle( CursesAppGlobals* globals );
static XP_Bool handleHide( CursesAppGlobals* globals );
static XP_Bool handleAltLeft( CursesAppGlobals* globals );
static XP_Bool handleAltRight( CursesAppGlobals* globals );
static XP_Bool handleAltUp( CursesAppGlobals* globals );
static XP_Bool handleAltDown( CursesAppGlobals* globals );
#ifdef CURSES_SMALL_SCREEN
static XP_Bool handleRootKeyShow( CursesAppGlobals* globals );
static XP_Bool handleRootKeyHide( CursesAppGlobals* globals );
#endif


const MenuList g_sharedMenuList[] = {
    { handleQuit, "Quit", "Q", 'Q' },
    { handleResend, "Resend", "R", 'R' },
    { handleSpace, "Raise focus", "<spc>", ' ' },
    { handleRet, "Click/tap", "<ret>", '\r' },
    { handleHint, "Hint", "?", '?' },

#ifdef KEYBOARD_NAV
    { handleLeft, "Left", "H", 'H' },
    { handleRight, "Right", "L", 'L' },
    { handleUp, "Up", "J", 'J' },
    { handleDown, "Down", "K", 'K' },
#endif

    { handleCommit, "Commit move", "C", 'C' },
    { handleFlip, "Flip", "F", 'F' },
    { handleToggleValues, "Show values", "V", 'V' },

    { handleBackspace, "Remove from board", "<del>", 8 },
    { handleUndo, "Undo prev", "U", 'U' },
    { handleReplace, "uNdo cur", "N", 'N' },

    { NULL, NULL, NULL, '\0'}
};

const MenuList g_boardMenuList[] = {
    { handleAltLeft,  "Force left", "{", '{' },
    { handleAltRight, "Force right", "}", '}' },
    { handleAltUp,    "Force up", "_", '_' },
    { handleAltDown,  "Force down", "+", '+' },
    { NULL, NULL, NULL, '\0'}
};

const MenuList g_scoreMenuList[] = {
#ifdef KEYBOARD_NAV
#endif
    { NULL, NULL, NULL, '\0'}
};

const MenuList g_trayMenuList[] = {
    { handleJuggle, "Juggle", "G", 'G' },
    { handleHide, "[un]hIde", "I", 'I' },
    { handleAltLeft, "Divider left", "{", '{' },
    { handleAltRight, "Divider right", "}", '}' },

    { NULL, NULL, NULL, '\0'}
};

#ifdef CURSES_SMALL_SCREEN
const MenuList g_rootMenuListShow[] = {
    { handleRootKeyShow,  "Press . for menu", "", '.' },
    { NULL, NULL, NULL, '\0'}
};

const MenuList g_rootMenuListHide[] = {
    { handleRootKeyHide,  "Clear menu", ".", '.' },
    { NULL, NULL, NULL, '\0'}
};
#endif


static CursesAppGlobals g_globals;	/* must be global b/c of SIGWINCH_handler */

#ifdef KEYBOARD_NAV
static void changeMenuForFocus( CursesAppGlobals* globals, 
                                BoardObjectType obj );
static XP_Bool handleLeft( CursesAppGlobals* globals );
static XP_Bool handleRight( CursesAppGlobals* globals );
static XP_Bool handleUp( CursesAppGlobals* globals );
static XP_Bool handleDown( CursesAppGlobals* globals );
static XP_Bool handleFocusKey( CursesAppGlobals* globals, XP_Key key );
#else 
# define handleFocusKey( g, k ) XP_FALSE
#endif
static void countMenuLines( const MenuList** menuLists, int maxX, int padding,
                            int* nLinesP, int* nColsP );
static void drawMenuFromList( WINDOW* win, const MenuList** menuLists,
                              int nLines, int padding );
static CursesMenuHandler getHandlerForKey( const MenuList* list, char ch );


#ifdef MEM_DEBUG
# define MEMPOOL cGlobals->util->mpool,
#else
# define MEMPOOL
#endif

/* extern int errno; */

static void
cursesUserError( CursesAppGlobals* globals, const char* format, ... )
{
    char buf[512];
    va_list ap;

    va_start( ap, format );

    vsprintf( buf, format, ap );

    const char* buttons[] = {"OK"};
    (void)cursesask( globals, buf, VSIZE(buttons), buttons );

    va_end(ap);
} /* cursesUserError */

static void
curses_util_notifyPickTileBlank( XW_UtilCtxt* uc, XP_U16 playerNum,
                                 XP_U16 XP_UNUSED(col), XP_U16 XP_UNUSED(row),
                                 const XP_UCHAR** texts, XP_U16 nTiles )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    char query[128];
    char* playerName = globals->cGlobals.gi->players[playerNum].name;

    snprintf( query, sizeof(query), 
              "Pick tile for %s! (Tab or type letter to select "
              "then hit <cr>.)", playerName );

    /*index = */curses_askLetter( globals, query, texts, nTiles );
    // return index;
} /* util_userPickTile */

static void
curses_util_informNeedPickTiles( XW_UtilCtxt* XP_UNUSED(uc),
                                 XP_Bool XP_UNUSED(isInitial),
                                 XP_U16 XP_UNUSED(player),
                                 XP_U16 XP_UNUSED(nToPick),
                                 XP_U16 XP_UNUSED(nFaces),
                                 const XP_UCHAR** XP_UNUSED(faces),
                                 const XP_U16* XP_UNUSED(counts) )
{
    /* CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure; */
    /* char query[128]; */
    /* XP_S16 index; */
    /* char* playerName = globals->cGlobals.gi->players[playerNum].name; */

    /* snprintf( query, sizeof(query),  */
    /*           "Pick tile for %s! (Tab or type letter to select " */
    /*           "then hit <cr>.)", playerName ); */

    /* index = curses_askLetter( globals, query, texts, nTiles ); */
    /* return index; */
} /* util_userPickTile */

static void
curses_util_userError( XW_UtilCtxt* uc, UtilErrID id )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    XP_Bool silent;
    const XP_UCHAR* message = linux_getErrString( id, &silent );

    if ( silent ) {
        XP_LOGF( "silent userError: %s", message );
    } else {
        cursesUserError( globals, message );
    }
} /* curses_util_userError */

static void
curses_util_notifyMove( XW_UtilCtxt* uc, XWStreamCtxt* stream )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    char* question;
    const char* answers[3] = {NULL};
    short numAnswers = 0;
    XP_Bool freeMe = XP_FALSE;

    question = strFromStream( stream );
    freeMe = XP_TRUE;
    answers[numAnswers++] = "Cancel";
    answers[numAnswers++] = "Ok";
        
    //     result = okIndex ==
    cursesask( globals, question, numAnswers, answers );

    if ( freeMe ) {
        free( question );
    }
} /* curses_util_userQuery */

static void
curses_util_notifyTrade( XW_UtilCtxt* uc, const XP_UCHAR** tiles, XP_U16 nTiles )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    formatConfirmTrade( &globals->cGlobals, tiles, nTiles );
    /* const char* buttons[] = { "Cancel", "Ok" }; */
    /* cursesask( globals, question, VSIZE(buttons), buttons ); */
}

static void
curses_util_trayHiddenChange( XW_UtilCtxt* XP_UNUSED(uc), 
                              XW_TrayVisState XP_UNUSED(state),
                              XP_U16 XP_UNUSED(nVisibleRows) )
{
    /* nothing to do if we don't have a scrollbar */
} /* curses_util_trayHiddenChange */

static void
cursesShowFinalScores( CursesAppGlobals* globals )
{
    XWStreamCtxt* stream;
    XP_UCHAR* text;

    stream = mem_stream_make( MPPARM(globals->cGlobals.util->mpool)
                              globals->cGlobals.params->vtMgr,
                              globals, CHANNEL_NONE, NULL );
    server_writeFinalScores( globals->cGlobals.game.server, stream );

    text = strFromStream( stream );

    const char* buttons[] = { "Ok" };
    (void)cursesask( globals, text, VSIZE(buttons), buttons );

    free( text );
    stream_destroy( stream );
} /* cursesShowFinalScores */

static void
curses_util_informMove( XW_UtilCtxt* uc, XP_S16 XP_UNUSED(turn),
                        XWStreamCtxt* expl, XWStreamCtxt* XP_UNUSED(words))
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    char* question = strFromStream( expl );
    const char* buttons[] = { "Ok" };
    (void)cursesask( globals, question, VSIZE(buttons), buttons );
    free( question );
}

static void
curses_util_informUndo( XW_UtilCtxt* XP_UNUSED(uc))
{
    LOG_FUNC();
}

static void
curses_util_notifyGameOver( XW_UtilCtxt* uc, XP_S16 quitter )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    board_draw( globals->cGlobals.game.board );

    /* game belongs in cGlobals... */
    if ( globals->cGlobals.params->printHistory ) {    
        catGameHistory( &globals->cGlobals );
    }

    catFinalScores( &globals->cGlobals, quitter );

    if ( globals->cGlobals.params->quitAfter >= 0 ) {
        sleep( globals->cGlobals.params->quitAfter );
        handleQuit( globals );
    } else if ( globals->cGlobals.params->undoWhenDone ) {
        server_handleUndo( globals->cGlobals.game.server, 0 );
    } else if ( !globals->cGlobals.params->skipGameOver ) {
        /* This is modal.  Don't show if quitting */
        cursesShowFinalScores( globals );
    }
} /* curses_util_notifyGameOver */

static void
curses_util_informNetDict( XW_UtilCtxt* uc, XP_LangCode XP_UNUSED(lang),
                           const XP_UCHAR* XP_UNUSED_DBG(oldName),
                           const XP_UCHAR* XP_UNUSED_DBG(newName), 
                           const XP_UCHAR* XP_UNUSED_DBG(newSum),
                           XWPhoniesChoice phoniesAction )
{
    XP_USE(uc);
    XP_USE(phoniesAction);
    XP_LOGF( "%s: %s => %s (cksum: %s)", __func__, oldName, newName, newSum );
}

static void
curses_util_setIsServer( XW_UtilCtxt* uc, XP_Bool isServer )
{
    LOG_FUNC();
    CommonGlobals* cGlobals = (CommonGlobals*)uc->closure;
    linuxSetIsServer( cGlobals, isServer );
}

#ifdef XWFEATURE_HILITECELL
static XP_Bool
curses_util_hiliteCell( XW_UtilCtxt* uc, 
                        XP_U16 XP_UNUSED(col), XP_U16 XP_UNUSED(row) )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    if ( globals->cGlobals.params->sleepOnAnchor ) {
        usleep( 10000 );
    }
    return XP_TRUE;
} /* curses_util_hiliteCell */
#endif

static XP_Bool
curses_util_engineProgressCallback( XW_UtilCtxt* XP_UNUSED(uc) )
{
    return XP_TRUE;
} /* curses_util_engineProgressCallback */

#ifdef USE_GLIBLOOP
static gboolean
timerFired( gpointer data )
{
    TimerInfo* ti = (TimerInfo*)data;
    CommonGlobals* globals = ti->globals;
    XWTimerReason why = ti - globals->timerInfo;
    if ( linuxFireTimer( globals, why ) ) {
        board_draw( globals->game.board );
    }

    return FALSE;
}
#endif

static void
curses_util_setTimer( XW_UtilCtxt* uc, XWTimerReason why, XP_U16 when,
                      XWTimerProc proc, void* closure )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    TimerInfo* ti = &globals->cGlobals.timerInfo[why];

    ti->proc = proc;
    ti->closure = closure;

#ifdef USE_GLIBLOOP
    ti->globals = &globals->cGlobals;
    (void)g_timeout_add_seconds( when, timerFired, ti );
#else
    ti->when = util_getCurSeconds(uc) + when;
#endif
} /* curses_util_setTimer */

static void
curses_util_clearTimer( XW_UtilCtxt* uc, XWTimerReason why )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    globals->cGlobals.timerInfo[why].proc = NULL;
}

#ifdef USE_GLIBLOOP
static gboolean
onetime_idle( gpointer data )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)data;
    if ( server_do( globals->cGlobals.game.server ) ) {
        if ( !!globals->cGlobals.game.board ) {
            board_draw( globals->cGlobals.game.board );
        }
        saveGame( &globals->cGlobals );
    }
    return FALSE;
}
#endif 

static void
curses_util_requestTime( XW_UtilCtxt* uc ) 
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
#ifdef USE_GLIBLOOP
# if 0
    (void)g_idle_add( onetime_idle, globals );
# else
    (void)g_timeout_add( 1,// interval,
                         onetime_idle, globals );
# endif
#else
    /* I've created a pipe whose read-only end is plugged into the array of
       fds that my event loop polls so that I can write to it to simulate
       post-event on a more familiar system.  It works, so no complaints! */
    if ( 1 != write( globals->timepipe[1], "!", 1 ) ) {
        XP_ASSERT(0);
    }
#endif
} /* curses_util_requestTime */

static void
initCurses( CursesAppGlobals* globals, int* widthP, int* heightP )
{
    WINDOW* mainWin;
    WINDOW* menuWin;
    WINDOW* boardWin;

    int width, height;

    /* ncurses man page says most apps want this sequence  */
    mainWin = initscr(); 
    cbreak(); 
    noecho();
    nonl();
    intrflush(stdscr, FALSE);
    keypad(stdscr, TRUE);       /* effects wgetch only? */

    getmaxyx( mainWin, height, width );
    XP_LOGF( "%s: getmaxyx()->w:%d; h:%d", __func__, width, height );

    globals->statusLine = height - MENU_WINDOW_HEIGHT - 1;
    menuWin = newwin( MENU_WINDOW_HEIGHT, width, 
                      height-MENU_WINDOW_HEIGHT, 0 );
    nodelay(menuWin, 1);		/* don't block on getch */
    boardWin = newwin( height-MENU_WINDOW_HEIGHT, width, 0, 0 );

    globals->menuWin = menuWin;
    globals->boardWin = boardWin;
    globals->mainWin = mainWin;

    *widthP = width;
    *heightP = height;
} /* initCurses */

#if 0
static void
showStatus( CursesAppGlobals* globals )
{
    char* str;

    switch ( globals->state ) {
    case XW_SERVER_WAITING_CLIENT_SIGNON:
	str = "Waiting for client[s] to connnect";
	break;
    case XW_SERVER_READY_TO_PLAY:
	str = "It's somebody's move";
	break;
    default:
	str = "unknown state";
    }

    
    standout();
    mvaddstr( globals->statusLine, 0, str );
/*     clrtoeol();     */
    standend();

    refresh();
} /* showStatus */
#endif

static XP_Bool
handleQuit( CursesAppGlobals* globals )
{
#ifdef USE_GLIBLOOP
    g_main_loop_quit( globals->loop );
#else
    globals->timeToExit = XP_TRUE;
#endif
    return XP_TRUE;
} /* handleQuit */

static XP_Bool
handleResend( CursesAppGlobals* globals )
{
    if ( !!globals->cGlobals.game.comms ) {
        comms_resendAll( globals->cGlobals.game.comms, COMMS_CONN_NONE,
                         XP_TRUE );
    }
    return XP_TRUE;
}

#ifdef KEYBOARD_NAV
static void
checkAssignFocus( BoardCtxt* board )
{
    if ( OBJ_NONE == board_getFocusOwner(board) ) {
        board_focusChanged( board, OBJ_BOARD, XP_TRUE );
    }
}
#else
# define checkAssignFocus(b)
#endif

static XP_Bool
handleSpace( CursesAppGlobals* globals )
{
    XP_Bool handled;
    checkAssignFocus( globals->cGlobals.game.board );

    globals->doDraw = board_handleKey( globals->cGlobals.game.board, 
                                       XP_RAISEFOCUS_KEY, &handled );
    return XP_TRUE;
} /* handleSpace */

static XP_Bool
handleRet( CursesAppGlobals* globals )
{
    XP_Bool handled;
    globals->doDraw = board_handleKey( globals->cGlobals.game.board, 
                                       XP_RETURN_KEY, &handled );
    return XP_TRUE;
} /* handleRet */

static XP_Bool
handleHint( CursesAppGlobals* globals )
{
    XP_Bool redo;
    globals->doDraw = board_requestHint( globals->cGlobals.game.board, 
#ifdef XWFEATURE_SEARCHLIMIT
                                         XP_FALSE,
#endif
                                         XP_FALSE, &redo );
    return XP_TRUE;
} /* handleHint */

static XP_Bool
handleCommit( CursesAppGlobals* globals )
{
    globals->doDraw = board_commitTurn( globals->cGlobals.game.board,
                                        XP_FALSE, XP_FALSE, NULL );
    return XP_TRUE;
} /* handleCommit */

static XP_Bool
handleJuggle( CursesAppGlobals* globals )
{
    globals->doDraw = board_juggleTray( globals->cGlobals.game.board );
    return XP_TRUE;
} /* handleJuggle */

static XP_Bool
handleHide( CursesAppGlobals* globals )
{
    XW_TrayVisState curState = 
        board_getTrayVisState( globals->cGlobals.game.board );

    if ( curState == TRAY_REVEALED ) {
        globals->doDraw = board_hideTray( globals->cGlobals.game.board );
    } else {
        globals->doDraw = board_showTray( globals->cGlobals.game.board );
    }

    return XP_TRUE;
} /* handleJuggle */

#ifdef CURSES_SMALL_SCREEN
static XP_Bool
handleRootKeyShow( CursesAppGlobals* globals )
{
    WINDOW* win;
    MenuList* lists[] = { g_sharedMenuList, globals->menuList, 
                          g_rootMenuListHide, NULL };
    int winMaxY, winMaxX;
    
    wclear( globals->menuWin );
    wrefresh( globals->menuWin ); 

    getmaxyx( globals->boardWin, winMaxY, winMaxX );

    int border = 2;
    int width = winMaxX - (border * 2);
    int padding = 1;            /* for the box */
    int nLines, nCols;
    countMenuLines( lists, width, padding, &nLines, &nCols );

    if ( width > nCols ) {
        width = nCols;
    }

    win = newwin( nLines+(padding*2), width+(padding*2), 
                  ((winMaxY-nLines-padding-padding)/2), (winMaxX-width)/2 );
    wclear( win );
    box( win, '|', '-');

    drawMenuFromList( win, lists, nLines, padding );
    wrefresh( win );

    CursesMenuHandler handler = NULL;
    while ( !handler ) {
        int ch = fgetc( stdin );

        int i;
        for ( i = 0; !!lists[i]; ++i ) {
            handler = getHandlerForKey( lists[i], ch );
            if ( !!handler ) {
                break;
            }
        }
    }

    delwin( win );

    touchwin( globals->boardWin );
    wrefresh( globals->boardWin );
    MenuList* ml[] = { g_rootMenuListShow, NULL };
    drawMenuFromList( globals->menuWin, ml, 1, 0 );
    wrefresh( globals->menuWin ); 

    return handler != NULL && (*handler)(globals);
} /* handleRootKeyShow */

static XP_Bool
handleRootKeyHide( CursesAppGlobals* globals )
{
    globals->doDraw = XP_TRUE;
    return XP_TRUE;
}
#endif

static XP_Bool
handleAltLeft( CursesAppGlobals* XP_UNUSED_KEYBOARD_NAV(globals) )
{
    return handleFocusKey( globals, XP_CURSOR_KEY_ALTLEFT );
}

static XP_Bool
handleAltRight( CursesAppGlobals* XP_UNUSED_KEYBOARD_NAV(globals) )
{
    return handleFocusKey( globals, XP_CURSOR_KEY_ALTRIGHT );
}

static XP_Bool
handleAltUp( CursesAppGlobals* XP_UNUSED_KEYBOARD_NAV(globals) )
{
    return handleFocusKey( globals, XP_CURSOR_KEY_ALTUP );
}

static XP_Bool
handleAltDown( CursesAppGlobals* XP_UNUSED_KEYBOARD_NAV(globals) )
{
    return handleFocusKey( globals, XP_CURSOR_KEY_ALTDOWN );
}

static XP_Bool
handleFlip( CursesAppGlobals* globals )
{
    globals->doDraw = board_flip( globals->cGlobals.game.board );
    return XP_TRUE;
} /* handleFlip */

static XP_Bool
handleToggleValues( CursesAppGlobals* globals )
{
    globals->doDraw = board_toggle_showValues( globals->cGlobals.game.board );
    return XP_TRUE;
} /* handleToggleValues */

static XP_Bool
handleBackspace( CursesAppGlobals* globals )
{
    XP_Bool handled;
    globals->doDraw = board_handleKey( globals->cGlobals.game.board,
                                       XP_CURSOR_KEY_DEL, &handled );
    return XP_TRUE;
} /* handleBackspace */

static XP_Bool
handleUndo( CursesAppGlobals* globals )
{
    globals->doDraw = server_handleUndo( globals->cGlobals.game.server, 0 );
    return XP_TRUE;
} /* handleUndo */

static XP_Bool
handleReplace( CursesAppGlobals* globals )
{
    globals->doDraw = board_replaceTiles( globals->cGlobals.game.board );
    return XP_TRUE;
} /* handleReplace */

#ifdef KEYBOARD_NAV
static XP_Bool
handleFocusKey( CursesAppGlobals* globals, XP_Key key )
{
    XP_Bool handled;
    XP_Bool draw;

    checkAssignFocus( globals->cGlobals.game.board );

    draw = board_handleKey( globals->cGlobals.game.board, key, &handled );
    if ( !handled ) {
        BoardObjectType nxt;
        BoardObjectType order[] = { OBJ_BOARD, OBJ_SCORE, OBJ_TRAY };
        draw = linShiftFocus( &globals->cGlobals, key, order, &nxt ) || draw;
        if ( nxt != OBJ_NONE ) {
            changeMenuForFocus( globals, nxt );
        }
    }

    globals->doDraw = draw || globals->doDraw;
    return XP_TRUE;
} /* handleFocusKey */

static XP_Bool
handleLeft( CursesAppGlobals* globals )
{
    return handleFocusKey( globals, XP_CURSOR_KEY_LEFT );
} /* handleLeft */

static XP_Bool
handleRight( CursesAppGlobals* globals )
{
    return handleFocusKey( globals, XP_CURSOR_KEY_RIGHT );
} /* handleRight */

static XP_Bool
handleUp( CursesAppGlobals* globals )
{
    return handleFocusKey( globals, XP_CURSOR_KEY_UP );
} /* handleUp */

static XP_Bool
handleDown( CursesAppGlobals* globals )
{
    return handleFocusKey( globals, XP_CURSOR_KEY_DOWN );
} /* handleDown */
#endif

static void
fmtMenuItem( const MenuList* item, char* buf, int maxLen )
{
    snprintf( buf, maxLen, "%s %s", item->keyDesc, item->desc );
}


static void
countMenuLines( const MenuList** menuLists, int maxX, int padding,
                int* nLinesP, int* nColsP )
{
    int nCols = 0;
    /* The menu space should be wider rather than taller, but line up by
       column.  So we want to use as many columns as possible to minimize the
       number of lines.  So start with one line and lay out.  If that doesn't
       fit, try two.  Given the number of lines, get the max width of each
       column.
    */

    maxX -= padding * 2;        /* on left and right side */

    int nLines;
    for ( nLines = 1; ; ++nLines ) {
        short line = 0;
        XP_Bool tooFewLines = XP_FALSE;
        int maxThisCol = 0;
        int i;
        nCols = 0;

        for ( i = 0; !tooFewLines && (NULL != menuLists[i]); ++i ) {
            const MenuList* entry;
            for ( entry = menuLists[i]; !tooFewLines && !!entry->handler; 
                  ++entry ) {
                int width;
                char buf[32];

                /* time to switch to new column? */
                if ( line == nLines ) {
                    nCols += maxThisCol;
                    if ( nCols > maxX ) {
                        tooFewLines = XP_TRUE;
                        break;
                    }
                    maxThisCol = 0;
                    line = 0;
                }

                fmtMenuItem( entry, buf, sizeof(buf) );
                width = strlen(buf) + 2; /* padding */

                if ( maxThisCol < width ) {
                    maxThisCol = width;
                }

                ++line;
            }
        }
        /* If we get here without running out of space, we're done */
        nCols += maxThisCol;
        if ( !tooFewLines && (nCols < maxX) ) {
            break;
        }
    }
    
    *nColsP = nCols;
    *nLinesP = nLines;
} /* countMenuLines */

static void
drawMenuFromList( WINDOW* win, const MenuList** menuLists,
                  int nLines, int padding )
{
    short line = 0, col, i;
    int winMaxY, winMaxX;

    getmaxyx( win, winMaxY, winMaxX );
    XP_USE(winMaxY);

    int maxColWidth = 0;
    if ( 0 == nLines ) {
        int ignore;
        countMenuLines( menuLists, winMaxX, padding, &nLines, &ignore );
    }
    col = 0;

    for ( i = 0; NULL != menuLists[i]; ++i ) {
        const MenuList* entry;
        for ( entry = menuLists[i]; !!entry->handler; ++entry ) {
            char buf[32];

            fmtMenuItem( entry, buf, sizeof(buf) );

            mvwaddstr( win, line+padding, col+padding, buf );

            int width = strlen(buf) + 2;
            if ( width > maxColWidth ) {
                maxColWidth = width;
            }

            if ( ++line == nLines ) {
                line = 0;
                col += maxColWidth;
                maxColWidth = 0;
            }

        }
    }
} /* drawMenuFromList */

static void 
SIGWINCH_handler( int signal )
{
    int height, width;

    assert( signal == SIGWINCH );

    endwin(); 

/*     (*globals.drawMenu)( &globals );  */

    getmaxyx( stdscr, height, width );
    XP_LOGF( "%s:, getmaxyx()->w:%d; h:%d", __func__, width, height );
    wresize( g_globals.mainWin, height-MENU_WINDOW_HEIGHT, width );

    board_draw( g_globals.cGlobals.game.board );
} /* SIGWINCH_handler */

static void 
SIGINTTERM_handler( int XP_UNUSED(signal) )
{
    if ( 1 != write( g_globals.quitpipe[1], "!", 1 ) ) {
        XP_ASSERT(0);
    }
}

static void
cursesListenOnSocket( void* closure, int newSock
#ifdef USE_GLIBLOOP
                      , GIOFunc func 
#endif
)
{
#ifdef USE_GLIBLOOP
    GIOChannel* channel = g_io_channel_unix_new( newSock );
    XP_LOGF( "%s: created channel %p for socket %d", __func__, channel, newSock );
    XP_ASSERT( !!func );
    (void)g_io_add_watch( channel, 
                          G_IO_IN | G_IO_ERR | G_IO_HUP | G_IO_NVAL,
                          func, closure );
#else
    XP_ASSERT( globals->fdCount+1 < FD_MAX );

    XP_WARNF( "%s: setting fd[%d] to %d", __func__, globals->fdCount, newSock );
    globals->fdArray[globals->fdCount].fd = newSock;
    globals->fdArray[globals->fdCount].events = POLLIN | POLLERR | POLLHUP;

    ++globals->fdCount;
    XP_LOGF( "%s: there are now %d sources to poll",
             __func__, globals->fdCount );
#endif
} /* cursesListenOnSocket */

static void
curses_socket_added( void* closure, int newSock, GIOFunc func )
{
    // CursesAppGlobals* globals = (CursesAppGlobals*)closure;
    if ( newSock != -1 ) {
        cursesListenOnSocket( closure, newSock
#ifdef USE_GLIBLOOP
                              , func
#endif
                              );
    }

#ifdef XWFEATURE_RELAY
    /* XP_ASSERT( !globals->cGlobals.relaySocket ); */
    /* globals->cGlobals.relaySocket = newSock; */
#endif
} /* curses_socket_changed */

static void
curses_onGameSaved( void* closure, sqlite3_int64 rowid, 
                    XP_Bool XP_UNUSED(firstTime) )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)closure;
    /* May not be recorded */
    globals->cGlobals.selRow = rowid;
}

#ifdef USE_GLIBLOOP
static gboolean
handle_quitwrite( GIOChannel* XP_UNUSED(source), GIOCondition XP_UNUSED(condition), gpointer data )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)data;
    handleQuit( globals );
    return TRUE;
}

static gboolean
fire_acceptor( GIOChannel* source, GIOCondition condition, gpointer data )
{
    if ( 0 != (G_IO_IN & condition) ) {
        CursesAppGlobals* globals = (CursesAppGlobals*)data;

        int fd = g_io_channel_unix_get_fd( source );
        XP_ASSERT( fd == globals->csInfo.server.serverSocket );
        (*globals->cGlobals.acceptor)( fd, globals );
    }
    return TRUE;
}
#endif

static void
curses_socket_acceptor( int listener, Acceptor func, CommonGlobals* cGlobals,
                        void** XP_UNUSED(storage) )
{
    if ( -1 == listener ) {
        XP_LOGF( "%s: removal of listener not implemented!!!!!", __func__ );
    } else {
        CursesAppGlobals* globals = (CursesAppGlobals*)cGlobals;
        XP_ASSERT( !cGlobals->acceptor || (func == cGlobals->acceptor) );
        cGlobals->acceptor = func;
        globals->csInfo.server.serverSocket = listener;
        cursesListenOnSocket( globals, listener
#ifdef USE_GLIBLOOP
                              , fire_acceptor
#endif
                              );
    }
}

#ifndef USE_GLIBLOOP
#ifdef XWFEATURE_RELAY
static int
figureTimeout( CursesAppGlobals* globals )
{
    int result = INFINITE_TIMEOUT;
    XWTimerReason ii;
    XP_U32 now = util_getCurSeconds( globals->cGlobals.params->util );

    now *= 1000;

    for ( ii = 0; ii < NUM_TIMERS_PLUS_ONE; ++ii ) {
        TimerInfo* tip = &globals->cGlobals.timerInfo[ii];
        if ( !!tip->proc ) {
            XP_U32 then = tip->when * 1000;
            if ( now >= then ) {
                result = 0;
                break;          /* if one's immediate, we're done */
            } else {
                then -= now;
                if ( result == -1 || then < result ) {
                    result = then;
                }
            }
        }
    }
    return result;
} /* figureTimeout */
#else 
# define figureTimeout(g) INFINITE_TIMEOUT
#endif

#ifdef XWFEATURE_RELAY
static void
fireCursesTimer( CursesAppGlobals* globals )
{
    XWTimerReason ii;
    TimerInfo* smallestTip = NULL;

    for ( ii = 0; ii < NUM_TIMERS_PLUS_ONE; ++ii ) {
        TimerInfo* tip = &globals->cGlobals.timerInfo[ii];
        if ( !!tip->proc ) { 
            if ( !smallestTip ) {
                smallestTip = tip;
            } else if ( tip->when < smallestTip->when ) {
                smallestTip = tip;
            }
        }
    }

    if ( !!smallestTip ) {
        XP_U32 now = util_getCurSeconds( globals->cGlobals.params->util ) ;
        if ( now >= smallestTip->when ) {
            if ( linuxFireTimer( &globals->cGlobals, 
                                 smallestTip - globals->cGlobals.timerInfo ) ){
                board_draw( globals->cGlobals.game.board );
            }
        } else {
            XP_LOGF( "skipping timer: now (%ld) < when (%ld)", 
                     now, smallestTip->when );
        }
    }
} /* fireCursesTimer */
#endif
#endif

/* 
 * Ok, so this doesn't block yet.... 
 */
#ifndef USE_GLIBLOOP
/* static XP_Bool */
/* blocking_gotEvent( CursesAppGlobals* globals, int* ch ) */
/* { */
/*     XP_Bool result = XP_FALSE; */
/*     int numEvents, ii; */
/*     short fdIndex; */
/*     XP_Bool redraw = XP_FALSE; */

/*     int timeout = figureTimeout( globals ); */
/*     numEvents = poll( globals->fdArray, globals->fdCount, timeout ); */

/*     if ( timeout != INFINITE_TIMEOUT && numEvents == 0 ) { */
/* #ifdef XWFEATURE_RELAY */
/*         fireCursesTimer( globals ); */
/* #endif */
/*     } else if ( numEvents > 0 ) { */
	
/*         /\* stdin first *\/ */
/*         if ( (globals->fdArray[FD_STDIN].revents & POLLIN) != 0 ) { */
/*             int evtCh = wgetch(globals->mainWin); */
/*             XP_LOGF( "%s: got key: %x", __func__, evtCh ); */
/*             *ch = evtCh; */
/*             result = XP_TRUE; */
/*             --numEvents; */
/*         } */
/*         if ( (globals->fdArray[FD_STDIN].revents & ~POLLIN ) ) { */
/*             XP_LOGF( "some other events set on stdin" ); */
/*         } */

/*         if ( (globals->fdArray[FD_TIMEEVT].revents & POLLIN) != 0 ) { */
/*             char ch; */
/*             if ( 1 != read(globals->fdArray[FD_TIMEEVT].fd, &ch, 1 ) ) { */
/*                 XP_ASSERT(0); */
/*             } */
/*         } */

/*         fdIndex = FD_FIRSTSOCKET; */

/*         if ( numEvents > 0 ) { */
/*             if ( (globals->fdArray[fdIndex].revents & ~POLLIN ) ) { */
/*                 XP_LOGF( "some other events set on socket %d",  */
/*                          globals->fdArray[fdIndex].fd  ); */
/*             } */

/*             if ( (globals->fdArray[fdIndex].revents & POLLIN) != 0 ) { */

/*                 --numEvents; */

/*                 if ( globals->fdArray[fdIndex].fd  */
/*                      == globals->csInfo.server.serverSocket ) { */
/*                     /\* It's the listening socket: call platform's accept() */
/*                        wrapper *\/ */
/*                     (*globals->cGlobals.acceptor)( globals->fdArray[fdIndex].fd,  */
/*                                                    globals ); */
/*                 } else { */
/* #ifndef XWFEATURE_STANDALONE_ONLY */
/*                     unsigned char buf[1024]; */
/*                     int nBytes; */
/*                     CommsAddrRec addrRec; */
/*                     CommsAddrRec* addrp = NULL; */

/*                     /\* It's a normal data socket *\/ */
/*                     switch ( globals->cGlobals.params->conType ) { */
/* #ifdef XWFEATURE_RELAY */
/*                     case COMMS_CONN_RELAY: */
/*                         nBytes = linux_relay_receive( &globals->cGlobals, buf,  */
/*                                                       sizeof(buf) ); */
/*                         break; */
/* #endif */
/* #ifdef XWFEATURE_SMS */
/*                     case COMMS_CONN_SMS: */
/*                         addrp = &addrRec; */
/*                         nBytes = linux_sms_receive( &globals->cGlobals,  */
/*                                                     globals->fdArray[fdIndex].fd, */
/*                                                     buf, sizeof(buf), addrp ); */
/*                         break; */
/* #endif */
/* #ifdef XWFEATURE_BLUETOOTH */
/*                     case COMMS_CONN_BT: */
/*                         nBytes = linux_bt_receive( globals->fdArray[fdIndex].fd,  */
/*                                                    buf, sizeof(buf) ); */
/*                         break; */
/* #endif */
/*                     default: */
/*                         XP_ASSERT( 0 ); /\* fired *\/ */
/*                     } */

/*                     if ( nBytes != -1 ) { */
/*                         XWStreamCtxt* inboundS; */
/*                         redraw = XP_FALSE; */

/*                         inboundS = stream_from_msgbuf( &globals->cGlobals,  */
/*                                                        buf, nBytes ); */
/*                         if ( !!inboundS ) { */
/*                             if ( comms_checkIncomingStream( */
/*                                                            globals->cGlobals.game.comms, */
/*                                                            inboundS, addrp ) ) { */
/*                                 redraw = server_receiveMessage(  */
/*                                                                globals->cGlobals.game.server, inboundS ); */
/*                             } */
/*                             stream_destroy( inboundS ); */
/*                         } */
                
/*                         /\* if there's something to draw resulting from the */
/*                            message, we need to give the main loop time to reflect */
/*                            that on the screen before giving the server another */
/*                            shot.  So just call the idle proc. *\/ */
/*                         if ( redraw ) { */
/*                             curses_util_requestTime(globals->cGlobals.params->util); */
/*                         } */
/*                     } */
/* #else */
/*                     XP_ASSERT(0);   /\* no socket activity in standalone game! *\/ */
/* #endif                          /\* #ifndef XWFEATURE_STANDALONE_ONLY *\/ */
/*                 } */
/*                 ++fdIndex; */
/*             } */
/*         } */

/*         for ( ii = 0; ii < 5; ++ii ) { */
/*             redraw = server_do( globals->cGlobals.game.server, NULL ) || redraw; */
/*         } */
/*         if ( redraw ) { */
/*             /\* messages change a lot *\/ */
/*             board_invalAll( globals->cGlobals.game.board ); */
/*             board_draw( globals->cGlobals.game.board ); */
/*         } */
/*         saveGame( globals->cGlobals ); */
/*     } */
/*     return result; */
/* } /\* blocking_gotEvent *\/ */
#endif

static void
remapKey( int* kp )
{
    /* There's what the manual says I should get, and what I actually do from
     * a funky M$ keyboard....
     */
    int key = *kp;
    switch( key ) {
    case KEY_B2:                /* "center of keypad" */
        key = '\r';
        break;
    case KEY_DOWN:
    case 526:
        key = 'K';
        break;
    case KEY_UP:
    case 523:
        key = 'J';
        break;
    case KEY_LEFT:
    case 524:
        key = 'H';
        break;
    case KEY_RIGHT:
    case 525:
        key = 'L';
        break;
    default:
        if ( key > 0x7F ) {
            XP_LOGF( "%s(%d): no mapping", __func__, key );
        }
        break;
    }
    *kp = key;
} /* remapKey */

static void
drawMenuLargeOrSmall( CursesAppGlobals* globals, const MenuList* menuList )
{
#ifdef CURSES_SMALL_SCREEN
    const MenuList* lists[] = { g_rootMenuListShow, NULL };
#else
    const MenuList* lists[] = { g_sharedMenuList, menuList, NULL };
#endif
    wclear( globals->menuWin );
    drawMenuFromList( globals->menuWin, lists, 0, 0 );
    wrefresh( globals->menuWin );
}

#ifdef KEYBOARD_NAV
static void
changeMenuForFocus( CursesAppGlobals* globals, BoardObjectType focussed )
{
    if ( focussed == OBJ_TRAY ) {
        globals->menuList = g_trayMenuList;
    } else if ( focussed == OBJ_BOARD ) {
        globals->menuList = g_boardMenuList;
    } else if ( focussed == OBJ_SCORE ) {
        globals->menuList = g_scoreMenuList;
    } else {
        XP_ASSERT(0);
    }
    drawMenuLargeOrSmall( globals, globals->menuList );
} /* changeMenuForFocus */
#endif

#if 0
static void
initClientSocket( CursesAppGlobals* globals, char* serverName )
{
    struct hostent* hostinfo;
    hostinfo = gethostbyname( serverName );
    if ( !hostinfo ) {
        userError( globals, "unable to get host info for %s\n", serverName );
    } else {
        char* hostName = inet_ntoa( *(struct in_addr*)hostinfo->h_addr );
        XP_LOGF( "gethostbyname returned %s", hostName );
        globals->csInfo.client.serverAddr = inet_addr(hostName);
        XP_LOGF( "inet_addr returned %lu", 
                 globals->csInfo.client.serverAddr );
    }
} /* initClientSocket */
#endif

static VTableMgr*
curses_util_getVTManager(XW_UtilCtxt* uc)
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    return globals->cGlobals.params->vtMgr;
} /* linux_util_getVTManager */

static void
curses_util_informNeedPassword( XW_UtilCtxt* XP_UNUSED(uc),
                                XP_U16 playerNum,
                                const XP_UCHAR* name )
{
    XP_WARNF( "curses_util_informNeedPassword(num=%d, name=%s", playerNum, name );
} /* curses_util_askPassword */

static void
curses_util_yOffsetChange( XW_UtilCtxt* XP_UNUSED(uc), 
                           XP_U16 XP_UNUSED(maxOffset),
                           XP_U16 XP_UNUSED(oldOffset), XP_U16 XP_UNUSED(newOffset) )
{
    /* if ( oldOffset != newOffset ) { */
    /*     XP_WARNF( "curses_util_yOffsetChange(%d,%d,%d) not implemented", */
    /*               maxOffset, oldOffset, newOffset ); */
    /* } */
} /* curses_util_yOffsetChange */

#ifdef XWFEATURE_TURNCHANGENOTIFY
static void
curses_util_turnChanged( XW_UtilCtxt* XP_UNUSED(uc), XP_S16 newTurn )
{
    XP_LOGF( "%s(turn=%d)", __func__, newTurn );
}
#endif

static void
curses_util_notifyIllegalWords( XW_UtilCtxt* XP_UNUSED(uc),
                                BadWordInfo* XP_UNUSED(bwi),
                                XP_U16 XP_UNUSED(player),
                                XP_Bool XP_UNUSED(turnLost) )
{
    XP_WARNF( "curses_util_notifyIllegalWords not implemented" );
} /* curses_util_notifyIllegalWord */

static void
curses_util_remSelected( XW_UtilCtxt* uc )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    XWStreamCtxt* stream;
    XP_UCHAR* text;

    stream = mem_stream_make( MPPARM(globals->cGlobals.util->mpool)
                              globals->cGlobals.params->vtMgr,
                              globals, CHANNEL_NONE, NULL );
    board_formatRemainingTiles( globals->cGlobals.game.board, stream );

    text = strFromStream( stream );

    const char* buttons[] = { "Ok" };
    (void)cursesask( globals, text, VSIZE(buttons), buttons );

    free( text );
}

#ifndef XWFEATURE_STANDALONE_ONLY
static XWStreamCtxt*
curses_util_makeStreamFromAddr(XW_UtilCtxt* uc, XP_PlayerAddr channelNo )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    LaunchParams* params = globals->cGlobals.params;

    XWStreamCtxt* stream = mem_stream_make( MPPARM(uc->mpool) params->vtMgr,
                                            &globals->cGlobals, channelNo,
                                            sendOnClose );
    return stream;
} /* curses_util_makeStreamFromAddr */
#endif

#ifdef XWFEATURE_CHAT
static void
curses_util_showChat( XW_UtilCtxt* uc, 
                      const XP_UCHAR* const XP_UNUSED_DBG(msg),
                      XP_S16 XP_UNUSED_DBG(from), XP_U32 XP_UNUSED(timestamp) )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)uc->closure;
    globals->nChatsSent = 0;
# ifdef DEBUG
    const XP_UCHAR* name = "<unknown>";
    if ( 0 <= from ) {
        CommonGlobals* cGlobals = &globals->cGlobals;
        name = cGlobals->gi->players[from].name;
    }
    XP_LOGF( "%s: got \"%s\" from %s", __func__, msg, name );
# endif
}
#endif

static void
setupCursesUtilCallbacks( CursesAppGlobals* globals, XW_UtilCtxt* util )
{
    util->vtable->m_util_userError = curses_util_userError;

    util->vtable->m_util_getVTManager = curses_util_getVTManager;
    util->vtable->m_util_informNeedPassword = curses_util_informNeedPassword;
    util->vtable->m_util_yOffsetChange = curses_util_yOffsetChange;
#ifdef XWFEATURE_TURNCHANGENOTIFY
    util->vtable->m_util_turnChanged = curses_util_turnChanged;
#endif
    util->vtable->m_util_notifyIllegalWords = curses_util_notifyIllegalWords;
    util->vtable->m_util_remSelected = curses_util_remSelected;
#ifndef XWFEATURE_STANDALONE_ONLY
    util->vtable->m_util_makeStreamFromAddr = curses_util_makeStreamFromAddr;
#endif
#ifdef XWFEATURE_CHAT
    util->vtable->m_util_showChat = curses_util_showChat;
#endif

    util->vtable->m_util_notifyMove = curses_util_notifyMove;
    util->vtable->m_util_notifyTrade = curses_util_notifyTrade;
    util->vtable->m_util_notifyPickTileBlank = curses_util_notifyPickTileBlank;
    util->vtable->m_util_informNeedPickTiles = curses_util_informNeedPickTiles;
    util->vtable->m_util_trayHiddenChange = curses_util_trayHiddenChange;
    util->vtable->m_util_informMove = curses_util_informMove;
    util->vtable->m_util_informUndo = curses_util_informUndo;
    util->vtable->m_util_notifyGameOver = curses_util_notifyGameOver;
    util->vtable->m_util_informNetDict = curses_util_informNetDict;
    util->vtable->m_util_setIsServer = curses_util_setIsServer;

#ifdef XWFEATURE_HILITECELL
    util->vtable->m_util_hiliteCell = curses_util_hiliteCell;
#endif
    util->vtable->m_util_engineProgressCallback = 
        curses_util_engineProgressCallback;

    util->vtable->m_util_setTimer = curses_util_setTimer;
    util->vtable->m_util_clearTimer = curses_util_clearTimer;
    util->vtable->m_util_requestTime = curses_util_requestTime;

    util->closure = globals;
} /* setupCursesUtilCallbacks */

static CursesMenuHandler
getHandlerForKey( const MenuList* list, char ch )
{
    CursesMenuHandler handler = NULL;
    while ( list->handler != NULL ) {
        if ( list->key == ch ) {
            handler = list->handler;
            break;
        }
        ++list;
    }
    return handler;
}

static XP_Bool
handleKeyEvent( CursesAppGlobals* globals, const MenuList* list, char ch )
{
    CursesMenuHandler handler = getHandlerForKey( list, ch );
    XP_Bool result = XP_FALSE;
    if ( !!handler ) {
        result = (*handler)(globals);
    }
    return result;
} /* handleKeyEvent */

static XP_Bool
passKeyToBoard( CursesAppGlobals* globals, char ch )
{
    XP_Bool handled = ch >= 'a' && ch <= 'z';
    if ( handled ) {
        ch += 'A' - 'a';
        globals->doDraw = board_handleKey( globals->cGlobals.game.board, 
                                           ch, NULL );
    }
    return handled;
} /* passKeyToBoard */

static void
positionSizeStuff( CursesAppGlobals* globals, int width, int height )
{
    CommonGlobals* cGlobals = &globals->cGlobals;
    BoardCtxt* board = cGlobals->game.board;
#ifdef COMMON_LAYOUT

    BoardDims dims;
    board_figureLayout( board, cGlobals->gi, 
                        0, 0, width, height, 100,
                        150, 200, /* percents */
                        width*75/100, 2, 1, 
                        XP_FALSE, &dims );
    board_applyLayout( board, &dims );

#else
    XP_U16 cellWidth, cellHt, scoreLeft, scoreWidth;
    int remWidth = width;
    int nRows = globals->cGlobals.gi->boardSize;

    cellWidth = CURSES_CELL_WIDTH;
    cellHt = CURSES_CELL_HT;
    board_setPos( board, BOARD_OFFSET, BOARD_OFFSET, 
                  cellWidth * nRows, cellHt * nRows, 
                  cellWidth, XP_FALSE );
    /* board_setScale( board, cellWidth, cellHt ); */
    scoreLeft = (cellWidth * nRows);// + BOARD_SCORE_PADDING;
    remWidth -= cellWidth * nRows;

    /* If the scoreboard will right of the board, put it there.  Otherwise try
       to fit it below the boards. */
    int tileWidth = 3;
    int trayWidth = (tileWidth*MAX_TRAY_TILES);
    int trayLeft = scoreLeft;
    int trayTop;
    int trayHt = 4;
    if ( trayWidth < remWidth ) {
        trayLeft += XP_MIN(remWidth - trayWidth, BOARD_SCORE_PADDING );
        trayTop = 8;
    } else {
        trayLeft = BOARD_OFFSET;
        trayTop = BOARD_OFFSET + (cellHt * nRows);
        if ( trayTop + trayHt > height ) {
            XP_ASSERT( height > trayTop );
            trayHt = height - trayTop;
        }
    }
    board_setTrayLoc( board, trayLeft, trayTop, (3*MAX_TRAY_TILES)+1, 
                      trayHt, 1 );

    scoreWidth = remWidth;
    if ( scoreWidth > 45 ) {
        scoreWidth = 45;
        scoreLeft += (remWidth - scoreWidth) / 2;
    }
    board_setScoreboardLoc( board, scoreLeft, 1,
                            scoreWidth, 5, /*4 players + rem*/ XP_FALSE );

    /* no divider -- yet */
    /*     board_setTrayVisible( globals.board, XP_TRUE, XP_FALSE ); */
#endif
    board_invalAll( board );
} /* positionSizeStuff */

static XP_Bool 
relay_sendNoConn_curses( const XP_U8* msg, XP_U16 len,
                         const XP_UCHAR* XP_UNUSED(msgNo),
                         const XP_UCHAR* relayID, void* closure )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)closure;
    return storeNoConnMsg( &globals->cGlobals, msg, len, relayID );
} /* relay_sendNoConn_curses */

static void
relay_status_curses( void* closure, CommsRelayState state )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)closure;
    globals->commsRelayState = state;
    XP_LOGF( "%s got status: %s", __func__, CommsRelayState2Str(state) );
}

static void
relay_connd_curses( void* XP_UNUSED(closure), XP_UCHAR* const XP_UNUSED(room),
                    XP_Bool XP_UNUSED(reconnect), XP_U16 XP_UNUSED(devOrder),
                    XP_Bool XP_UNUSED_DBG(allHere),
                    XP_U16 XP_UNUSED_DBG(nMissing) )
{
    XP_LOGF( "%s got allHere: %s; nMissing: %d", __func__, 
             allHere?"true":"false", nMissing );
}

static void
relay_error_curses( void* XP_UNUSED(closure), XWREASON XP_UNUSED_DBG(relayErr) )
{
#ifdef DEBUG
    XP_LOGF( "%s(%s)", __func__, XWREASON2Str( relayErr ) );
#endif
}

#ifdef USE_GLIBLOOP
static gboolean
handle_stdin( GIOChannel* XP_UNUSED_DBG(source), GIOCondition condition, 
              gpointer data )
{
    if ( 0 != (G_IO_IN & condition) ) {
#ifdef DEBUG
        gint fd = g_io_channel_unix_get_fd( source );
        XP_ASSERT( 0 == fd );
#endif
        CursesAppGlobals* globals = (CursesAppGlobals*)data;
        int ch = wgetch( globals->mainWin );
        remapKey( &ch );
        if (
#ifdef CURSES_SMALL_SCREEN
            handleKeyEvent( globals, g_rootMenuListShow, ch ) ||
#endif
            handleKeyEvent( globals, globals->menuList, ch )
            || handleKeyEvent( globals, g_sharedMenuList, ch )
            || passKeyToBoard( globals, ch ) ) {
            if ( g_globals.doDraw ) {
                board_draw( globals->cGlobals.game.board );
                globals->doDraw = XP_FALSE;
            }
        }
    }
    return TRUE;
}
#endif

#ifdef COMMS_XPORT_FLAGSPROC
static XP_U32
curses_getFlags( void* XP_UNUSED(closure) )
{
    return COMMS_XPORT_FLAGS_HASNOCONN;
}
#endif

static void
cursesGotBuf( void* closure, const CommsAddrRec* addr, 
              const XP_U8* buf, XP_U16 len )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)closure;
    XP_U32 clientToken;
    XP_ASSERT( sizeof(clientToken) < len );
    XP_MEMCPY( &clientToken, &buf[0], sizeof(clientToken) );
    buf += sizeof(clientToken);
    len -= sizeof(clientToken);

    sqlite3_int64 ignore;
    XP_U16 seed;
    rowidFromToken( XP_NTOHL( clientToken ), &ignore, &seed );
    // XP_ASSERT( seed == comms_getChannelSeed( globals->cGlobals.game.comms ) );
    if ( seed == comms_getChannelSeed( globals->cGlobals.game.comms ) ) {
        gameGotBuf( &globals->cGlobals, XP_TRUE, buf, len, addr );
    } else {
        XP_LOGF( "%s: dropping packet; meant for a different device",
                 __func__ );
    }
}

static gint
curses_requestMsgs( gpointer data )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)data;
    XP_UCHAR devIDBuf[64] = {0};
    db_fetch( globals->cGlobals.pDb, KEY_RDEVID, devIDBuf, sizeof(devIDBuf) );
    if ( '\0' != devIDBuf[0] ) {
        relaycon_requestMsgs( globals->cGlobals.params, devIDBuf );
    } else {
        XP_LOGF( "%s: not requesting messages as don't have relay id", __func__ );
    }
    return 0;                   /* don't run again */
}


static void 
cursesNoticeRcvd( void* closure )
{
    LOG_FUNC();
    CursesAppGlobals* globals = (CursesAppGlobals*)closure;
    (void)g_idle_add( curses_requestMsgs, globals );
}

static gboolean
keepalive_timer( gpointer data )
{
    LOG_FUNC();
    curses_requestMsgs( data );
    return TRUE;
}

static void
cursesDevIDReceived( void* closure, const XP_UCHAR* devID, 
                     XP_U16 maxInterval )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)closure;
    CommonGlobals* cGlobals = &globals->cGlobals;
    sqlite3* pDb = cGlobals->pDb;
    if ( !!devID ) {
        XP_LOGF( "%s(devID=%s)", __func__, devID );

        /* If we already have one, make sure it's the same! Else store. */
        gchar buf[64];
        XP_Bool have = db_fetch( pDb, KEY_RDEVID, buf, sizeof(buf) );
        if ( !have ) {
            db_store( pDb, KEY_RDEVID, devID );
        } else {
            XP_ASSERT( 0 == strcmp( buf, devID ) );
        }
        (void)g_timeout_add_seconds( maxInterval, keepalive_timer, globals );
    } else {
        XP_LOGF( "%s: bad relayid", __func__ );
        db_remove( pDb, KEY_RDEVID );

        DevIDType typ;
        const XP_UCHAR* devID = linux_getDevID( cGlobals->params, &typ );
        relaycon_reg( cGlobals->params, NULL, typ, devID );
    }
}

static void
cursesErrorMsgRcvd( void* closure, const XP_UCHAR* msg )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)closure;
    if ( !!globals->lastErr && 0 == strcmp( globals->lastErr, msg ) ) {
        XP_LOGF( "skipping error message from relay" );
    } else {
        g_free( globals->lastErr );
        globals->lastErr = g_strdup( msg );
        const char* buttons[] = { "Ok" };
        (void)cursesask( globals, msg, VSIZE(buttons), buttons );
    }
}

static gboolean
chatsTimerFired( gpointer data )
{
    CursesAppGlobals* globals = (CursesAppGlobals*)data;
    XWGame* game = &globals->cGlobals.game;
    GameStateInfo gsi;

    game_getState( game, &gsi );

    if ( gsi.canChat && 3 > globals->nChatsSent ) {
        XP_UCHAR msg[128];
        struct tm* timp;
        struct timeval tv;
        struct timezone tz;

        gettimeofday( &tv, &tz );
        timp = localtime( &tv.tv_sec );

        snprintf( msg, sizeof(msg), "%x: Saying hi via chat at %.2d:%.2d:%.2d", 
                  comms_getChannelSeed( game->comms ),
                  timp->tm_hour, timp->tm_min, timp->tm_sec );
        XP_LOGF( "%s: sending \"%s\"", __func__, msg );
        board_sendChat( game->board, msg );
        ++globals->nChatsSent;
    }

    return TRUE;
}

/* static XP_U16 */
/* feedBufferCurses( CommonGlobals* cGlobals, sqlite3_int64 rowid,  */
/*                   const XP_U8* buf, XP_U16 len, const CommsAddrRec* from ) */
/* { */
/*     gameGotBuf( cGlobals, XP_TRUE, buf, len, from ); */

/*     /\* GtkGameGlobals* globals = findOpenGame( apg, rowid ); *\/ */

/*     /\* if ( !!globals ) { *\/ */
/*     /\*     gameGotBuf( &globals->cGlobals, XP_TRUE, buf, len, from ); *\/ */
/*     /\*     seed = comms_getChannelSeed( globals->cGlobals.game.comms ); *\/ */
/*     /\* } else { *\/ */
/*     /\*     GtkGameGlobals tmpGlobals; *\/ */
/*     /\*     if ( loadGameNoDraw( &tmpGlobals, apg->params, rowid ) ) { *\/ */
/*     /\*         gameGotBuf( &tmpGlobals.cGlobals, XP_FALSE, buf, len, from ); *\/ */
/*     /\*         seed = comms_getChannelSeed( tmpGlobals.cGlobals.game.comms ); *\/ */
/*     /\*         saveGame( &tmpGlobals.cGlobals ); *\/ */
/*     /\*     } *\/ */
/*     /\*     freeGlobals( &tmpGlobals ); *\/ */
/*     /\* } *\/ */
/*     /\* return seed; *\/ */
/* } */

static void
smsMsgReceivedCurses( void* closure, const CommsAddrRec* from, 
                      XP_U32 XP_UNUSED(gameID),
                      const XP_U8* buf, XP_U16 len )
{
    LOG_FUNC();
    CommonGlobals* cGlobals = (CommonGlobals*)closure;
    gameGotBuf( cGlobals, XP_TRUE, buf, len, from );
    LOG_RETURN_VOID();
    /* LaunchParams* params =  cGlobals->params; */

    /* sqlite3_int64 rowids[4]; */
    /* int nRowIDs = VSIZE(rowids); */
    /* getRowsForGameID( params->pDb, gameID, rowids, &nRowIDs ); */
    /* for ( int ii = 0; ii < nRowIDs; ++ii ) { */
    /*     gameGotBuf( cGlobals, XP_TRUE, buf, len, from ); */
    /*     // feedBufferCurses( cGlobals, rowids[ii], buf, len, from ); */
    /* } */
}

void
cursesmain( XP_Bool isServer, LaunchParams* params )
{
    int width, height;
    CommonGlobals* cGlobals = &g_globals.cGlobals;

    memset( &g_globals, 0, sizeof(g_globals) );

#ifdef USE_GLIBLOOP
    g_globals.loop = g_main_loop_new( NULL, FALSE );
#endif

    g_globals.amServer = isServer;
    g_globals.cGlobals.params = params;
#ifdef XWFEATURE_RELAY
    g_globals.cGlobals.relaySocket = -1;
#endif

    g_globals.cGlobals.socketAdded = curses_socket_added;
    g_globals.cGlobals.socketAddedClosure = &g_globals;
    g_globals.cGlobals.onSave = curses_onGameSaved;
    g_globals.cGlobals.onSaveClosure = &g_globals;

    g_globals.cGlobals.addAcceptor = curses_socket_acceptor;

    g_globals.cGlobals.cp.showBoardArrow = XP_TRUE;
    g_globals.cGlobals.cp.showRobotScores = params->showRobotScores;
    g_globals.cGlobals.cp.hideTileValues = params->hideValues;
    g_globals.cGlobals.cp.skipCommitConfirm = params->skipCommitConfirm;
    g_globals.cGlobals.cp.sortNewTiles = params->sortNewTiles;
    g_globals.cGlobals.cp.showColors = params->showColors;
    g_globals.cGlobals.cp.allowPeek = params->allowPeek;
#ifdef XWFEATURE_SLOW_ROBOT
    g_globals.cGlobals.cp.robotThinkMin = params->robotThinkMin;
    g_globals.cGlobals.cp.robotThinkMax = params->robotThinkMax;
    g_globals.cGlobals.cp.robotTradePct = params->robotTradePct;
#endif

    g_globals.cGlobals.gi = &params->pgi;
    setupUtil( &g_globals.cGlobals );
    setupCursesUtilCallbacks( &g_globals, g_globals.cGlobals.util );

    initFromParams( &g_globals.cGlobals, params );

#ifdef XWFEATURE_RELAY
    if ( addr_hasType( &params->addr, COMMS_CONN_RELAY ) ) {
        g_globals.cGlobals.defaultServerName
            = params->connInfo.relay.relayName;
    }
#endif

#ifdef USE_GLIBLOOP
    if ( !params->closeStdin ) {
        cursesListenOnSocket( &g_globals, 0, handle_stdin );
    }
    setOneSecondTimer( &g_globals.cGlobals );

# ifdef DEBUG
    int piperesult = 
# endif
        pipe( g_globals.quitpipe );
    XP_ASSERT( piperesult == 0 );
    cursesListenOnSocket( &g_globals, g_globals.quitpipe[0], handle_quitwrite );

#else
    cursesListenOnSocket( &g_globals, 0 ); /* stdin */

    int piperesult = pipe( g_globals.timepipe );
    XP_ASSERT( piperesult == 0 );
    /* reader pipe */
    cursesListenOnSocket( &g_globals, g_globals.timepipe[0] );
#endif

    struct sigaction act = { .sa_handler = SIGINTTERM_handler };
    sigaction( SIGINT, &act, NULL );
    sigaction( SIGTERM, &act, NULL );
    struct sigaction act2 = { .sa_handler = SIGWINCH_handler };
    sigaction( SIGWINCH, &act2, NULL );

    TransportProcs procs = {
        .closure = &g_globals,
        .send = LINUX_SEND,
#ifdef COMMS_HEARTBEAT
        .reset = linux_reset,
#endif
#ifdef XWFEATURE_RELAY
        .rstatus = relay_status_curses,
        .rconnd = relay_connd_curses,
        .rerror = relay_error_curses,
        .sendNoConn = relay_sendNoConn_curses,
# ifdef COMMS_XPORT_FLAGSPROC
        .getFlags = curses_getFlags,
# endif
#endif
    };

    if ( !!params->pipe && !!params->fileName ) {
        read_pipe_then_close( &g_globals.cGlobals, &procs );
    } else if ( !!params->nbs && !!params->fileName ) {
        do_nbs_then_close( &g_globals.cGlobals, &procs );
    } else {
        if ( 0 != params->chatsInterval ) {
            (void)g_timeout_add_seconds( params->chatsInterval, chatsTimerFired, 
                                         &g_globals );
        }

        XP_Bool opened = XP_FALSE;
        initCurses( &g_globals, &width, &height );

        g_globals.draw = (struct CursesDrawCtx*)
            cursesDrawCtxtMake( g_globals.boardWin );

        XP_Bool idIsNew = XP_TRUE;
        if ( !!params->dbName ) {
            sqlite3* pDb = openGamesDB( params->dbName );
            /* Gross that both need to be set, but they do. */
            params->pDb = g_globals.cGlobals.pDb = pDb;

            /* Check if we have a local ID already.  If we do and it's
               changed, we care. */
            idIsNew = linux_setupDevidParams( params );
        }

        if ( params->useUdp ) {
            RelayConnProcs procs = {
                .msgReceived = cursesGotBuf,
                .msgNoticeReceived = cursesNoticeRcvd,
                .devIDReceived = cursesDevIDReceived,
                .msgErrorMsg = cursesErrorMsgRcvd,
                .socketAdded = curses_socket_added,
            };

            relaycon_init( params, &procs, &g_globals,
                           params->connInfo.relay.relayName,
                           params->connInfo.relay.defaultSendPort );

            linux_doInitialReg( params, idIsNew );
        }

#ifdef XWFEATURE_SMS
        gchar buf[32];
        const gchar* myPhone = params->connInfo.sms.phone;
        if ( !!myPhone ) {
            db_store( params->pDb, KEY_SMSPHONE, myPhone );
        } else if ( !myPhone && db_fetch( params->pDb, KEY_SMSPHONE, buf, VSIZE(buf) ) ) {
            params->connInfo.sms.phone = myPhone = buf;
        }
        XP_U16 myPort = params->connInfo.sms.port;
        gchar portbuf[8];
        if ( 0 < myPort ) {
            sprintf( portbuf, "%d", myPort );
            db_store( params->pDb, KEY_SMSPORT, portbuf );
        } else if ( db_fetch( params->pDb, KEY_SMSPORT, portbuf, VSIZE(portbuf) ) ) {
            params->connInfo.sms.port = myPort = atoi( portbuf );
        }

        if ( !!myPhone && myPhone[0] && myPort ) {
            SMSProcs smsProcs = {
                .socketAdded = curses_socket_added,
                .inviteReceived = NULL,
                .msgReceived = smsMsgReceivedCurses,
            };
            linux_sms_init( params, myPhone, myPort, &smsProcs, &g_globals.cGlobals );
        }
#endif

        XWStreamCtxt* stream = NULL;
        if ( !!params->dbName ) {
            GSList* games = listGames( params->pDb );
            if ( !!games ) {
                XP_ASSERT( 1 == g_slist_length(games) ); /* for now */
                stream = mem_stream_make( MEMPOOL params->vtMgr,
                                          &g_globals.cGlobals, CHANNEL_NONE,
                                          NULL );
                sqlite3_int64 selRow = *(sqlite3_int64*)games->data;
                /* XP_UCHAR buf[32]; */
                /* XP_SNPRINTF( buf, sizeof(buf), "%lld", selRow ); */
                mpool_setTag( MEMPOOL params->dbName );
                if ( loadGame( stream, params->pDb, selRow ) ) {
                    g_globals.cGlobals.selRow = selRow;
                } else {
                    stream_destroy( stream );
                    stream = NULL;
                }
                g_slist_free( games );
            }
                
        } else if ( !!params->fileName && file_exists( params->fileName ) ) {
            mpool_setTag( MEMPOOL "file" );
            stream = streamFromFile( &g_globals.cGlobals, params->fileName, 
                                     &g_globals );
#ifdef USE_SQLITE
        } else if ( !!params->dbFileName && file_exists( params->dbFileName ) ) {
            XP_UCHAR buf[32];
            XP_SNPRINTF( buf, sizeof(buf), "%d", params->dbFileID );
            mpool_setTag( MEMPOOL buf );
            stream = streamFromDB( &g_globals.cGlobals, &g_globals );
#endif
        }

        if ( NULL == cGlobals->dict ) {
            if ( !!stream ) {
                cGlobals->dict = makeDictForStream( cGlobals, stream );
            } else {
                cGlobals->dict = 
                    linux_dictionary_make( MEMPOOL params, 
                                           cGlobals->gi->dictName, XP_TRUE );
            }
        }
        cGlobals->gi->dictLang = dict_getLangCode( cGlobals->dict );

        if ( !!stream ) {
            (void)game_makeFromStream( MEMPOOL stream, &cGlobals->game, 
                                       cGlobals->gi, cGlobals->dict, 
                                       &cGlobals->dicts, cGlobals->util, 
                                       (DrawCtx*)g_globals.draw, 
                                       &g_globals.cGlobals.cp, &procs );

            stream_destroy( stream );
            if ( !isServer && cGlobals->gi->serverRole == SERVER_ISSERVER ) {
                isServer = XP_TRUE;
            }
            opened = XP_TRUE;
        }
        if ( !opened ) {
            game_makeNewGame( MEMPOOL &cGlobals->game, cGlobals->gi,
                              cGlobals->util, (DrawCtx*)g_globals.draw,
                              &g_globals.cGlobals.cp, &procs, 
                              params->gameSeed );
            g_globals.cGlobals.selRow = -1;
            saveGame( &g_globals.cGlobals );
        }

#ifndef XWFEATURE_STANDALONE_ONLY
        if ( cGlobals->game.comms ) {
            CommsAddrRec addr = {0};

            CommsConnType typ;
            for ( XP_U32 st = 0; addr_iter( &params->addr, &typ, &st ); ) {
                switch( typ ) {
# ifdef XWFEATURE_RELAY
                case COMMS_CONN_RELAY:
                    addr_addType( &addr, COMMS_CONN_RELAY );
                    addr.u.ip_relay.ipAddr = 0;       /* ??? */
                    addr.u.ip_relay.port = params->connInfo.relay.defaultSendPort;
                    addr.u.ip_relay.seeksPublicRoom = params->connInfo.relay.seeksPublicRoom;
                    addr.u.ip_relay.advertiseRoom = params->connInfo.relay.advertiseRoom;
                    XP_STRNCPY( addr.u.ip_relay.hostName, params->connInfo.relay.relayName,
                                sizeof(addr.u.ip_relay.hostName) - 1 );
                    XP_STRNCPY( addr.u.ip_relay.invite, params->connInfo.relay.invite,
                                sizeof(addr.u.ip_relay.invite) - 1 );
                    break;
# endif
# ifdef XWFEATURE_SMS
                case COMMS_CONN_SMS:
                    addr_addType( &addr, COMMS_CONN_SMS );
                    XP_STRNCPY( addr.u.sms.phone, params->connInfo.sms.phone,
                                sizeof(addr.u.sms.phone) - 1 );
                    addr.u.sms.port = params->connInfo.sms.port;
                    break;
# endif
# ifdef XWFEATURE_BLUETOOTH
                case COMMS_CONN_BT:
                    addr_addType( &addr, COMMS_CONN_BT );
                    XP_ASSERT( sizeof(addr.u.bt.btAddr) 
                               >= sizeof(params->connInfo.bt.hostAddr));
                    XP_MEMCPY( &addr.u.bt.btAddr, &params->connInfo.bt.hostAddr,
                               sizeof(params->connInfo.bt.hostAddr) );
                    break;
# endif
#ifdef XWFEATURE_DIRECTIP
                case COMMS_CONN_IP_DIRECT:
                    addr_addType( &addr, COMMS_CONN_IP_DIRECT );
                    XP_MEMCPY( addr.u.ip.hostName_ip, &params->connInfo.ip.hostName,
                               sizeof(addr.u.ip.hostName_ip) );
                    addr.u.ip.port_ip = params->connInfo.ip.hostPort;
                    break;
#endif
                default:
                    break;
                }
            }
            comms_setAddr( cGlobals->game.comms, &addr );
        }
#endif

        model_setDictionary( cGlobals->game.model, cGlobals->dict );
        setSquareBonuses( cGlobals );
        positionSizeStuff( &g_globals, width, height );

#ifndef XWFEATURE_STANDALONE_ONLY
        /* send any events that need to get off before the event loop begins */
        if ( !!cGlobals->game.comms && !isServer ) {
            (void)server_initClientConnection( cGlobals->game.server, 
                                               mem_stream_make( MEMPOOL
                                                                params->vtMgr,
                                                                cGlobals,
                                                                (XP_PlayerAddr)0,
                                                                sendOnClose ) );
        }
#endif

        server_do( g_globals.cGlobals.game.server );

        g_globals.menuList = g_boardMenuList;
        drawMenuLargeOrSmall( &g_globals, g_boardMenuList ); 
        board_draw( g_globals.cGlobals.game.board );

#ifdef USE_GLIBLOOP
        g_main_loop_run( g_globals.loop );
#else
        while ( !g_globals.timeToExit ) {
            int ch = 0;
            if ( blocking_gotEvent( &g_globals, &ch ) ) {
                remapKey( &ch );
                if (
#ifdef CURSES_SMALL_SCREEN
                    handleKeyEvent( &g_globals, g_rootMenuListShow, ch ) ||
#endif
                    handleKeyEvent( &g_globals, g_globals.menuList, ch )
                    || handleKeyEvent( &g_globals, g_sharedMenuList, ch )
                    || passKeyToBoard( &g_globals, ch ) ) {
                    if ( g_globals.doDraw ) {
                        board_draw( g_globals.cGlobals.game.board );
                        g_globals.doDraw = XP_FALSE;
                    }
                }
            }
        }
#endif
    }
    if ( !!g_globals.cGlobals.game.comms ) {
        comms_stop( g_globals.cGlobals.game.comms );
    }
    saveGame( &g_globals.cGlobals );

    game_dispose( &g_globals.cGlobals.game );
    gi_disposePlayerInfo( MEMPOOL cGlobals->gi );
    dict_unref( cGlobals->dict );
    
#ifdef XWFEATURE_BLUETOOTH
    linux_bt_close( &g_globals.cGlobals );
#endif
#ifdef XWFEATURE_SMS
    // linux_sms_close( &g_globals.cGlobals );
#endif
#ifdef XWFEATURE_IP_DIRECT
    linux_udp_close( &g_globals.cGlobals );
#endif

    endwin();

    if ( !!params->dbName ) {
        closeGamesDB( g_globals.cGlobals.pDb );
    }
    relaycon_cleanup( params );

    linux_sms_cleanup( params );

    linux_util_vt_destroy( g_globals.cGlobals.util );
} /* cursesmain */
#endif /* PLATFORM_NCURSES */