/*****************************************************************************
#   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    "guiUndoEdit.h"
#include    <Xm/Form.h>
#include    <Xm/Label.h>
#include    <Xm/Text.h>
#include    <stdio.h>
#include    <Xm/PushB.h>
#include    <iostream.h>
#include    <Xm/MainW.h>
#include    "handleWindowManagerDelete.h"
#include    "guiapp.h"
#include    "consed.h"
#include    "hp_exception_kludge.h"



guiUndoEdit :: guiUndoEdit() {


   Arg              aArg[100];
   int              nArgs;
   XmStringTable    xmStringList;
   int              n;



   widPopupShell_ = XtVaCreatePopupShell("Undo Edits",
                                  topLevelShellWidgetClass,
                                  GuiApp::pGetGuiApp()->widGetTopLevel(),
                                  XmNdeleteResponse, XmDO_NOTHING,
                                  NULL );
   
   handleWindowManagerDelete( widPopupShell_ );

   // the immediate child of the application shell is a
   // main window
   Widget widMainWin = 
     XtVaCreateManagedWidget("mainwin", 
                             xmMainWindowWidgetClass, widPopupShell_,
                             XmNancestorSensitive, True,  
                             NULL );

   //
   // create the form widget
   //

   Widget   widForm = XtVaCreateManagedWidget( "form",
                            xmFormWidgetClass,
                            widMainWin,
                            XmNshadowThickness, 0,
                            XmNborderWidth, 0,
                            NULL );


   Widget   widLabel = XtVaCreateManagedWidget("Next edit to undo:  ",
                   xmLabelWidgetClass,
                   widForm,
                   XmNtopAttachment, XmATTACH_FORM,
                   XmNtopOffset, 20,
                   XmNleftAttachment, XmATTACH_FORM,
                   XmNleftOffset, 20,
                   NULL );



   widNextEditToUndo_ = XtVaCreateManagedWidget( 
                   "text of next edit to undo", 
                   xmTextWidgetClass,
                   widForm, 
                   XmNleftAttachment, XmATTACH_FORM,
                   XmNrightAttachment, XmATTACH_FORM,
                   XmNleftOffset, 20,
                   XmNrightOffset, 20,
                   XmNtopAttachment, XmATTACH_WIDGET,
                   XmNtopWidget, widLabel,
                   XmNeditMode, XmSINGLE_LINE_EDIT,
                   XmNcursorPositionVisible, False,
                   NULL
                   );


   displayNextEditToUndo();


   widUndoButton_ = XtVaCreateManagedWidget( "Undo",
       xmPushButtonWidgetClass,
       widForm,
       XmNtopAttachment, XmATTACH_WIDGET,
       XmNtopWidget, widNextEditToUndo_,
       XmNtopOffset, 20,
       XmNleftAttachment, XmATTACH_POSITION,
       XmNleftPosition,45 ,                                                
       XmNrightAttachment, XmATTACH_POSITION,
       XmNrightPosition,55 ,                                                
       NULL );                                                 

   
   XtAddCallback( widUndoButton_,
                 XmNactivateCallback,
                 cbUndoNextEdit,
                 this );


   XmString xmsWarning = XmStringCreateLtoR( 
        "Note:  you will not be able to undo edits that were done prior to saving the assembly.",
        XmFONTLIST_DEFAULT_TAG  );

   Widget widWarningLabel = XtVaCreateManagedWidget(
             "warning",
             xmLabelWidgetClass,
             widForm,
             XmNlabelString, xmsWarning,
             XmNtopAttachment, XmATTACH_WIDGET,
             XmNtopWidget, widUndoButton_,
             XmNtopOffset, 20,
             XmNleftAttachment, XmATTACH_FORM,
             XmNrightAttachment, XmATTACH_FORM,
             NULL );


   XmStringFree( xmsWarning );


   widDismissButton_ = XtVaCreateManagedWidget( "Dismiss",
        xmPushButtonWidgetClass,
        widForm,
       XmNtopAttachment, XmATTACH_WIDGET,
       XmNtopWidget, widWarningLabel,
       XmNtopOffset, 20,
       XmNleftAttachment, XmATTACH_POSITION,
       XmNleftPosition,45 ,                                                
       XmNrightAttachment, XmATTACH_POSITION,
       XmNrightPosition, 55,                                                
       XmNbottomAttachment, XmATTACH_FORM,
       XmNbottomOffset, 20,                                          
       XmNtraversalOn, False,
       NULL );                                                 

   
   XtAddCallback( widDismissButton_,
                 XmNactivateCallback,
                 cbDismissUndo,
                 this );


// pop it all up
// Note:  if you do this any earlier, the bottom of the dialog will be
// off the screen since it grows downward after being popped up.

   XtPopup( widPopupShell_, XtGrabNone );

   // make the query box initially have input focus
   XmProcessTraversal( widUndoButton_, XmTRAVERSE_CURRENT );

}




static void cbUndoNextEdit( Widget wid,
                            XtPointer pClientData,
                            XtPointer pCallData ) {
   guiUndoEdit* pGuiUndoEdit = (guiUndoEdit*) pClientData;

   TRY_CATCH_WRAPPER(
                     pGuiUndoEdit->userPushedUndo();
                     );
}


void guiUndoEdit :: userPushedUndo() {

   if (pLastEditAction_ == NULL ) {
      GuiApp :: popupErrorMessage( "There is no edit to undo." );
      return;
   }

   
   if (pLastEditAction_ != ConsEd :: pGetConsEd()->pGetLastEditAction() ) {
      GuiApp :: popupErrorMessage( "You must have made an edit or saved the assembly since you popped this box up. \nYou must dismiss this box and bring it up again." );
      return;
   }

   ConsEd :: pGetConsEd()->undoLastEditAction( true ); 
   // true means write to edit history file

   displayNextEditToUndo();
}




static void cbDismissUndo( Widget wid,
                           XtPointer pClientData,
                           XtPointer pCallData ) {

   guiUndoEdit* pGuiUndoEdit = (guiUndoEdit*) pClientData;
   TRY_CATCH_WRAPPER(
                     delete pGuiUndoEdit;
                     );
}


guiUndoEdit :: ~guiUndoEdit() {

   XtPopdown( widPopupShell_ );
   XtDestroyWidget( widPopupShell_ );

}




void guiUndoEdit :: displayNextEditToUndo() {

   pLastEditAction_ = ConsEd :: pGetConsEd()->pGetLastEditAction();
       // this will be NULL if there is no edits so far

   RWCString soDescriptionOfEdit;

   if (pLastEditAction_ )
      soDescriptionOfEdit = pLastEditAction_->soGetDescriptionOfEdit();
   else
      soDescriptionOfEdit = "(no edits so far)";

   XmTextSetString( widNextEditToUndo_, (char*) soDescriptionOfEdit.data() );
}