/***************************************************************************** # 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. # #*****************************************************************************/ // // fileselector.cpp // // implementation for the FileSelector object // // chrisa 24-Jan-95 // #include #include #include #include #include #include #include #include #include "sysdepend.h" #include "messageAndFileSelector.h" #include "guiapp.h" #include "handleWindowManagerDelete.h" #include "hp_exception_kludge.h" messageAndFileSelector::messageAndFileSelector( const char* szDirMask, const char* szFileName, const char *szMessage ) { Arg aArg[100]; int nArgs; widPopupShell_ = XtVaCreatePopupShell("consed", 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 // nArgs = 0; XtSetArg(aArg[nArgs],XmNshadowThickness,0); nArgs++; XtSetArg(aArg[nArgs],XmNborderWidth,0); nArgs++; Widget widForm = XmCreateForm(widMainWin, "form", aArg, nArgs); XtManageChild(widForm); // don't pop it up--first add everything XmString xmsMessage = XmStringCreateLtoR( (char *) szMessage, XmFONTLIST_DEFAULT_TAG ); Widget widMessage = XtVaCreateManagedWidget("Fragment List", xmLabelWidgetClass, widForm, XmNtopAttachment, XmATTACH_FORM, XmNtopOffset, 20, XmNleftAttachment, XmATTACH_FORM, XmNleftOffset, 20, XmNlabelString, xmsMessage, XmNalignment, XmALIGNMENT_BEGINNING, NULL ); XmStringFree( xmsMessage ); nArgs = 0; XtSetArg(aArg[nArgs], XmNtopAttachment, XmATTACH_WIDGET); nArgs++; XtSetArg(aArg[nArgs], XmNtopWidget, widMessage ); nArgs++; XtSetArg(aArg[nArgs], XmNleftAttachment, XmATTACH_FORM); nArgs++; XtSetArg(aArg[nArgs], XmNrightAttachment, XmATTACH_FORM); nArgs++; XtSetArg(aArg[nArgs], XmNbottomAttachment, XmATTACH_FORM ); nArgs++; XtSetArg(aArg[nArgs], XmNtopOffset,20); nArgs++; XtSetArg(aArg[nArgs], XmNleftOffset,4); nArgs++; XtSetArg(aArg[nArgs], XmNrightOffset,4); nArgs++; XtSetArg(aArg[nArgs], XmNcursorPositionVisible, False); nArgs++; widFileSelectionBox_ = XmCreateFileSelectionBox( widForm, "FileDialog", aArg, nArgs); XtManageChild( widFileSelectionBox_ ); // no help button XtUnmanageChild(XmSelectionBoxGetChild(widFileSelectionBox_, XmDIALOG_HELP_BUTTON)); // ok button callback XtAddCallback(widFileSelectionBox_, XmNokCallback, (XtCallbackProc )fsbCbOk, this); // cancel button callback XtAddCallback(widFileSelectionBox_, XmNcancelCallback, (XtCallbackProc )fsbCbCancel, this); assert ( szDirMask); setDirMask(szDirMask); // set directory mask } // sets the directory mask for the motif file selection box void messageAndFileSelector::setDirMask(const char* szDirMask) { assert(szDirMask); // bug spray Arg aArg[10]; int nArgs = 0; XmString xmsDirMask = XmStringCreateSimple((char* )szDirMask ); XtSetArg( aArg[nArgs], XmNdirMask, xmsDirMask ); nArgs++; XtSetValues(widFileSelectionBox_, aArg, nArgs); XmStringFree(xmsDirMask); } // sets the complete specification of the file path i.e. the default // file selected if the user just presses OK void messageAndFileSelector::setDirSpec(const char* szDirSpec) { Arg aArg[10]; int nArgs = 0; XmString xmsDirSpec = XmStringCreateSimple((char* )szDirSpec); XtSetArg( aArg[nArgs], XmNdirSpec, xmsDirSpec ); nArgs++; XtSetValues(widFileSelectionBox_, aArg, nArgs); XmStringFree(xmsDirSpec); } // sets the title string and saves callback pointer before managing FileName messageAndFileSelector:: filePopupAndGetFilename() { // clear the file path member soFullFilePath_ = ""; // pop it all up XtPopup( widPopupShell_, XtGrabNone ); // Do not allow the program to continue until the user has seen and // acknowledged this message. bBlockApplication_ = true; // xt callback must clear XEvent xevent; while( bBlockApplication_ ) { XtAppNextEvent( GuiApp::pGetGuiApp()->ctxGetAppContext(), &xevent); XtDispatchEvent( &xevent); } // return whatever the callback did or didn't leave // in the private member data return soFullFilePath_; } void fsbCbOk(Widget wid, messageAndFileSelector* pFS, XmFileSelectionBoxCallbackStruct* cbs) { TRY_CATCH_WRAPPER( char* szFilePath; assert (XmStringGetLtoR(cbs->value, XmSTRING_DEFAULT_CHARSET, &szFilePath)); XtPopdown( pFS->widPopupShell_ ); // save in member data whatever we got pFS->soFullFilePath_ = szFilePath ; // unblock pFS->bBlockApplication_ = false; ); } void fsbCbCancel(Widget wid, messageAndFileSelector* pFS, XmFileSelectionBoxCallbackStruct* cbs) { XtPopdown( pFS->widPopupShell_ ); // unblock pFS->bBlockApplication_ = false; } // dtor destroys motif widget messageAndFileSelector :: ~messageAndFileSelector() { // bug in X destroy method causes a seg fault on SunOS // XtDestroyWidget(widPopupShell_); }