/*****************************************************************************
#   Copyright (C) 1994-2008 by David Gordon.
#   All rights reserved.                           
#                                                                           
#   This software is part of a beta-test version of the Consed/Autofinish
#   package.  It should not be redistributed or
#   used for any commercial purpose, including commercially funded
#   sequencing, without written permission from the author and the
#   University of Washington.
#   
#   This software is provided ``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 the authors or the University of Washington 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.
#
#   Building Consed from source is error prone and not simple which is
#   why I provide executables.  Due to time limitations I cannot
#   provide any assistance in building Consed.  Even if you do not
#   modify the source, you may introduce errors due to using a
#   different version of the compiler, a different version of motif,
#   different versions of other libraries than I used, etc.  For this
#   reason, if you discover Consed bugs, I can only offer help with
#   those bugs if you first reproduce those bugs with an executable
#   provided by me--not an executable you have built.
# 
#   Modifying Consed is also difficult.  Although Consed is modular,
#   some modules are used by many other modules.  Thus making a change
#   in one place can have unforeseen effects on many other features.
#   It may takes months for you to notice these other side-effects
#   which may not seen connected at all.  It is not feasable for me to
#   provide help with modifying Consed sources because of the
#   potentially huge amount of time involved.
#
#*****************************************************************************/
#include    <Xm/MessageB.h>
#include    "rwcstring.h"
#include    "sysdepend.h"
#include    "guiapp.h"
#include    "handleWindowManagerDelete.h"
#include    <Xm/MwmUtil.h>
#include    "breakIntoShorterLines.h"


static bool bBlockApplication;
enum eYesNo { eYesPushed, eNoPushed };
static enum eYesNo eYesNoo;


union eYesNoXtPointer {
   XtPointer pClientData;
   eYesNo eeYesNo;
};



void cbGetAnswerYesNo(Widget wid,
                    XtPointer pClientData,
                    XmPushButtonCallbackStruct* pCbStruct) {

   union eYesNoXtPointer ee;

   ee.pClientData = pClientData;
   eYesNoo = ee.eeYesNo;

   // clear the flag
   bBlockApplication = false;
}



bool bGuiGetAnswerYesNo( const RWCString& soQuestion1 ) {
   
   Widget   widDialog;

   widDialog = XmCreateQuestionDialog( GuiApp::pGetGuiApp()->widGetTopLevel(),
                                      "dialog", 
                                       NULL, 0 );

   XmString xmsYes = XmStringCreateSimple( "Yes" );
   XmString xmsNo  = XmStringCreateSimple( "No" );

   RWCString soQuestion( soQuestion1 );
   
   breakIntoShorterLines( soQuestion, 50 );


   XmString xmsQuestion = XmStringCreateLtoR( (char *) soQuestion.data(),
                                            XmFONTLIST_DEFAULT_TAG );

   XtVaSetValues( widDialog, 
                 XmNmessageString, xmsQuestion,
                 XmNokLabelString, xmsYes,
                 XmNcancelLabelString, xmsNo,
                 NULL );

   Widget widShell = XtParent( widDialog );

   XtVaSetValues( widShell, 
                 XmNdeleteResponse, XmDO_NOTHING,
                 XmNmwmDecorations, MWM_DECOR_ALL | MWM_DECOR_MENU | MWM_DECOR_MINIMIZE | MWM_DECOR_MAXIMIZE,
                 NULL );

   handleWindowManagerDelete( widShell );


   // this fanciness is to handle the case in which a pointer is larger
   // than an enum value, as is the case with 64 bit pointers

   union eYesNoXtPointer ee;
   ee.eeYesNo = eYesPushed;

   XtAddCallback( widDialog, XmNokCallback, 
                  (XtCallbackProc )cbGetAnswerYesNo, ee.pClientData );

   ee.eeYesNo = eNoPushed;

   XtAddCallback( widDialog, XmNcancelCallback, 
                  (XtCallbackProc )cbGetAnswerYesNo, ee.pClientData );

   XmStringFree( xmsYes );
   XmStringFree( xmsNo );
   XmStringFree( xmsQuestion );

   XtManageChild( widDialog );
   XtUnmanageChild( XmMessageBoxGetChild( widDialog, XmDIALOG_HELP_BUTTON ) );
   XtPopup( XtParent( widDialog ), XtGrabExclusive );

   // save this for later checking
   Widget widYes = XmMessageBoxGetChild( widDialog, XmDIALOG_OK_BUTTON );
   Widget widNo = XmMessageBoxGetChild( widDialog, XmDIALOG_CANCEL_BUTTON );

   bBlockApplication = true;  // xt callback must clear

   XEvent xevent;
   while( bBlockApplication ) {
      XtAppNextEvent( GuiApp::pGetGuiApp()->ctxGetAppContext(), &xevent);
      XtDispatchEvent( &xevent);
   }

   bool bYesPushed = false;
   if (eYesNoo == eYesPushed )
     bYesPushed = true;

   XtDestroyWidget( widDialog );
   return( bYesPushed );
}