/*****************************************************************************
#   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/Xm.h>
#include    <Xm/Form.h>
#include    <Xm/TextF.h>
#include    <Xm/PushB.h>
#include    <Xm/Label.h>
#include    "contigwin.h"
#include    "guiChangeColor.h"
#include    "guiapp.h"
#include    "hp_exception_kludge.h"
#include    "colorDefaults.h"
#include    "guicontigwin.h"
#include    "handleWindowManagerDelete2.h"
#include    "colormode.h"
#include    "tagTypes.h"




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

   guiChangeColor* pGuiChangeColor = (guiChangeColor*) pClientData;

   TRY_CATCH_WRAPPER( delete pGuiChangeColor );
}


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

   guiChangeColor* pGuiChangeColor = (guiChangeColor*) pClientData;
   TRY_CATCH_WRAPPER( pGuiChangeColor->userPushedApply() );
}




guiChangeColor :: guiChangeColor( ContigWin* pContigWin ) :
pContigWin_( pContigWin ) {


   widPopupShell_ = XtVaCreatePopupShell(
                                         "change color",
                                         topLevelShellWidgetClass,
                                         pContigWin->pGcw_->widGetGuiContigWinTopLevel(),
                                         XmNnoResize, False,
                                         XmNautoUnmanage, False,
                                         XmNtransient, False,
                                         XmNdeleteResponse, XmDO_NOTHING,
                                         NULL );

   handleWindowManagerDelete2( widPopupShell_, cbDismiss, this );

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

   Widget widDismissButton = XtVaCreateManagedWidget( 
                      "Dismiss",
                      xmPushButtonWidgetClass,
                      widForm,
                      XmNbottomAttachment, XmATTACH_FORM,
                      XmNbottomOffset, 10,
                      XmNtopOffset, 10,
                      XmNleftAttachment, XmATTACH_POSITION,
                      XmNleftPosition, 60,
                      XmNrightAttachment, XmATTACH_POSITION,
                      XmNrightPosition, 80,
                      XmNtraversalOn, False,
                      NULL );

   XtAddCallback( widDismissButton,
                  XmNactivateCallback,
                  cbDismiss,
                  this );

   Widget widApplyButton = XtVaCreateManagedWidget(
                       "Apply",
                       xmPushButtonWidgetClass,
                       widForm,
                       XmNbottomAttachment, XmATTACH_FORM,
                       XmNbottomOffset, 10,
                       XmNtopOffset, 10,
                       XmNleftAttachment, XmATTACH_POSITION,
                       XmNleftPosition, 20,
                       XmNrightAttachment, XmATTACH_POSITION,
                       XmNrightPosition, 40,
                       XmNtraversalOn, True,
                       NULL );

   XtAddCallback( widApplyButton,
                  XmNactivateCallback,
                  cbApply,
                  this );

   Widget widLabel = XtVaCreateManagedWidget(
                       "Enter color:",
                       xmLabelWidgetClass,
                       widForm,
                       XmNtopAttachment, XmATTACH_FORM,
                       XmNleftAttachment, XmATTACH_FORM,
                       NULL );

   widColor_ = XtVaCreateManagedWidget(
                       "color",
                       xmTextFieldWidgetClass,
                       widForm,
                       XmNtraversalOn, True,
                       XmNtopAttachment, XmATTACH_FORM,
                       XmNleftAttachment, XmATTACH_WIDGET,
                       XmNleftWidget, widLabel,
                       XmNrightAttachment, XmATTACH_FORM,
                       XmNbottomAttachment, XmATTACH_WIDGET,
                       XmNbottomWidget, widApplyButton,
                       NULL );

   
   XtPopup( widPopupShell_, XtGrabNone );
}



                                                      


guiChangeColor :: ~guiChangeColor() {
   XtPopdown( widPopupShell_ );
   XtDestroyWidget( widPopupShell_ );
}



void guiChangeColor :: userPushedApply() {

   char* szValue = XmTextFieldGetString( widColor_ );
   RWCString soNewColor = szValue;
   XtFree( szValue );

   ColorDefaults::pGetColorDefaults()->soColorMeansQualityDisagree_ = soNewColor;

   GAPP->pColorMeansQualityAndTags_ = 
      new ColorMeansQualityAndTags( );

   GAPP->pColorMeansQuality_ = 
      new ColorMeansQuality( );


   pContigWin_->pColorMode_ = GAPP->pColorMeansQualityAndTags_;


   // change the color of all tags to be this color

   GuiColorText* pNewGuiColorText = new GuiColorText( "black",
                                                   soNewColor );

   for( int nTagType = 0; 
        nTagType < tagTypes::pGetTagTypes()->aTagTypes_.length(); 
        ++nTagType ) {

      tagTypes::pGetTagTypes()->aTagTypes_[ nTagType ]->pGuiColorText_ = 
         pNewGuiColorText;
   }




   pContigWin_->drawBasesAndConsensus( true ); // erase first



}