/* * File: wx_dialg.cc * Purpose: wxDialogBox and miscellaneous dialog functions (X version) * Author: Julian Smart * Created: 1993 * Updated: August 1994 * RCS_ID: $Id: wx_dialg.cc,v 1.63 1994/11/02 22:18:47 edz Exp edz $ * Copyright: (c) 1993, AIAI, University of Edinburgh */ // $Log: wx_dialg.cc,v $ // Revision 1.62 1994/11/02 22:18:47 edz // Minor changes. // // Revision 1.61 1994/11/02 12:07:36 edz // Cleaned up the X file dialog box. Also made the current working // directory follow the selection like the file manager--- this // is better HCI logic. // // Revision 1.60 1994/11/02 11:13:15 edz // Fixed the push-pin problem/close modal window problem // --- still no definitive answer. // // // static const char sccsid[] = "%W% %G%"; #ifdef __GNUG__ #pragma implementation #pragma interface #endif #include #include #include "common.h" #include "wx_lbox.h" #include "wx_buttn.h" #include "wx_choic.h" #include "wx_check.h" #include "wx_messg.h" #include "wx_txt.h" #include "wx_mtxt.h" #include "wx_dialg.h" #include "wx_utils.h" #include "wx_frame.h" #include "wx_privt.h" #include "wx_main.h" #define wxDIALOG_DEFAULT_X 300 #define wxDIALOG_DEFAULT_Y 300 #ifdef wx_motif #include #if XmVersion >= 1002 #include #endif #include #include #include #include #include #include #include #include #include #include #if XmVersion > 1000 #include #endif void wxCloseDialogCallback(Widget widget, XtPointer client_data, XmAnyCallbackStruct *cbs); void wxDialogBoxRepaintProc(Widget w, XtPointer c_data, XEvent *event, char *); void wxDialogBoxEventHandler (Widget wid, XtPointer client_data, XEvent* event, Boolean *continueToDispatch); char *wxMotifFileSelector(char *message, char *default_path, char *default_filename, char *default_extension, char *wildcard, int flags, wxWindow *parent, int x, int y); #endif #ifdef wx_xview #include #include #include #include #include #define USE_DEFAULT_DIALOG_ICON #ifdef USE_DEFAULT_DIALOG_ICON static short closed_wxdialog_bits[] = { #if 1 /* Format_version=1, Width=64, Height=64, Depth=1, Valid_bits_per_item=16 */ 0x0055, 0x5555, 0x5555, 0x5000, 0x002A, 0xAAAA, 0xAAAA, 0xA800, 0x0040, 0x0000, 0x0000, 0x0800, 0x0020, 0xA000, 0x0000, 0x1000, 0x0045, 0xFAAA, 0xAAAA, 0xB000, 0x0023, 0x8155, 0x5555, 0x5800, 0x0045, 0x12AA, 0xAAAA, 0xB000, 0x0023, 0xF2AA, 0xAAAA, 0xB800, 0x0045, 0x1155, 0x5555, 0x5000, 0x0022, 0x82AA, 0xAAAA, 0xB800, 0x0047, 0xFFFF, 0xFFFF, 0xF000, 0x0026, 0xAAAA, 0xAAAA, 0x9800, 0x0040, 0x0000, 0x0000, 0x1000, 0x0025, 0x5555, 0x5555, 0x5800, 0x0042, 0xAAAA, 0xAAAA, 0xB000, 0x0025, 0x5555, 0x5555, 0x5800, 0x0042, 0xAAAA, 0xAAAA, 0xB000, 0x0025, 0x5555, 0x5555, 0x5800, 0x0042, 0xAAAA, 0xAAFA, 0xB000, 0x0025, 0x5555, 0x55DD, 0x5800, 0x0042, 0xAAAA, 0xAAAE, 0xB000, 0x0025, 0x5555, 0x555D, 0x5800, 0x0042, 0xAAAA, 0xAABA, 0xB000, 0x0025, 0x5555, 0x5575, 0x5800, 0x0042, 0xAAAA, 0xAAAA, 0xB000, 0x0025, 0x5555, 0x5575, 0x5800, 0x0042, 0xFFFF, 0xFFBA, 0xB000, 0x0025, 0x5555, 0x5555, 0x5800, 0x0042, 0xAAAA, 0xAAAA, 0xB000, 0x0025, 0x5555, 0x5555, 0x5800, 0x0042, 0xAAAA, 0xAAAA, 0xB000, 0x0025, 0x5555, 0x5555, 0x5800, 0x0042, 0xAAAA, 0xAAAA, 0xB000, 0x0025, 0x5555, 0x5555, 0x5800, 0x0042, 0xAAAA, 0xAAAA, 0xB000, 0x0025, 0x5555, 0x5555, 0x5800, 0x0042, 0xAAAA, 0xAAAA, 0xB000, 0x0025, 0x5555, 0x5555, 0x5800, 0x0042, 0xAAAA, 0xAAAA, 0xB000, 0x0025, 0x5555, 0x5555, 0x5800, 0x0042, 0xAAAA, 0xAAAA, 0xB000, 0x0025, 0x5555, 0x5555, 0x5800, 0x004F, 0xFFFF, 0xFFFF, 0xF000, 0x002A, 0xAAAA, 0xAAAA, 0xA800, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, #else /* Format_version=1, Width=64, Height=64, Depth=1, Valid_bits_per_item=16 */ 0xFFFF, 0xFFFF, 0xFFFF, 0xF89C, 0xFFFF, 0xFFFF, 0xFFFF, 0xF8A2, 0xE18C, 0x4216, 0x8439, 0x1A61, 0xC9CF, 0xD6CC, 0x71E8, 0x5A91, 0xC31C, 0xCDED, 0x9B72, 0x1989, 0xD38C, 0xF9CD, 0xDB30, 0x9A46, 0xC739, 0x99DB, 0x99E4, 0x3E26, 0xE319, 0xFBBB, 0x9621, 0x1B1A, 0xCFE3, 0xDDDC, 0xE3C8, 0x5498, 0xC210, 0x8421, 0x0FE2, 0x3968, 0xD084, 0x2108, 0x4A70, 0xD262, 0xC421, 0x0842, 0x17C4, 0xA4A2, 0xE108, 0x4210, 0x8421, 0x4988, 0xC842, 0x1084, 0x210A, 0xD288, 0xC210, 0x8421, 0x0847, 0x3622, 0xD0E6, 0xEFCF, 0x7BFA, 0xCA22, 0xC4F7, 0xEFEF, 0xFDF4, 0xB888, 0xE108, 0x4210, 0x8429, 0x3888, 0xC842, 0x1084, 0x215A, 0x5A22, 0xC7B9, 0xEFBD, 0x9DE6, 0x9A22, 0xD7FD, 0xFFDF, 0xDF59, 0x9888, 0xC421, 0x0842, 0x1296, 0x3888, 0xE108, 0x4210, 0x8525, 0x1A22, 0xCF7F, 0x3CEC, 0xFB48, 0x5A22, 0xC7BF, 0xBEFF, 0xFCD2, 0x1888, 0xD084, 0x2108, 0x6B30, 0x9888, 0xC421, 0x0842, 0x52C4, 0x3A22, 0xE7EF, 0x67F7, 0xA4E1, 0x1A22, 0xCFF7, 0xF7F7, 0x69F8, 0x5888, 0xC210, 0x8423, 0x9A42, 0x1888, 0xD084, 0x210D, 0x6610, 0x9A22, 0xC7BD, 0x99EA, 0x5F84, 0x3A22, 0xE7DF, 0xDFF4, 0x9FA1, 0x1888, 0xC842, 0x10AD, 0x2108, 0x5888, 0xC210, 0x8473, 0x4842, 0x1A22, 0xD7BC, 0x21EC, 0xC210, 0x9A22, 0xC7BD, 0x096B, 0x1084, 0x3888, 0xE108, 0x4312, 0x8421, 0x1888, 0xC842, 0x128C, 0x2108, 0x5A22, 0xC210, 0x8639, 0x0842, 0x1A22, 0xD084, 0x2768, 0x4210, 0x9888, 0xC421, 0x0FC2, 0x1084, 0x3888, 0xE108, 0x4E10, 0x8421, 0x1A22, 0xC842, 0x1884, 0x2108, 0x5A22, 0xC210, 0x8421, 0x0842, 0x1888, 0xD084, 0x2108, 0x4210, 0x9888, 0xCF6F, 0x09C3, 0x9084, 0x3A22, 0xE76C, 0x4399, 0x8421, 0x1A22, 0xCE66, 0x109C, 0x210E, 0x5888, 0xC6F8, 0xFFBF, 0xBE7E, 0x1888, 0xD6ED, 0xB999, 0xDB74, 0x9A22, 0xC731, 0xBB73, 0x1BFC, 0x3A22, 0xE339, 0xF333, 0xB621, 0x1888, 0xCB72, 0xDBBF, 0xB77C, 0x5888, 0xC210, 0x8421, 0x08CE, 0x1A22, 0xD084, 0x2108, 0x42F8, 0x9A22, 0xC421, 0x0842, 0x1084, 0x3888, 0xE108, 0x4210, 0x8421, 0x1888, 0xC842, 0x1084, 0x2108, 0x5A22, 0xC210, 0x8421, 0x0842, 0x1A22, 0xD084, 0x2108, 0x4210, 0x9888, 0xC421, 0x0842, 0x1084, 0x3888, 0xFFFF, 0xFFFF, 0xFFFF, 0xFA22, 0xFFFF, 0xFFFF, 0xFFFF, 0xFA22, #endif }; #endif extern "C" Frame xv_window_loop(Frame); extern "C" void xv_window_return(Frame); extern void wxPanelEventProc(Panel panel, Event *event); // See wx_item.cc extern void wxPanelInterposeProc(Panel x_panel, Event *event, Notify_arg arg, Notify_event_type type); Notify_value wxDialogInterposer(Frame x_frame, Event *x_event, Notify_arg arg, Notify_event_type type); Notify_value wxDialogCloseInterposer(Notify_client client, Destroy_status status); // Sometimes calls notify function after frame has died, so set this when frame // is deleted, to do nothing. Notify_value wxDummyDialogInterposer(Frame x_frame, Event *x_event, Notify_arg arg, Notify_event_type type); char *wxXFileSelector(wxWindow *parent, char *path, char *file, char *message, int flags, char *wild_card, int x, int y); #endif // The Maximum length of a file path #define _MAXPATHLEN 1024 /* @@@@ */ // Dialog box - like panel but doesn't need a frame, and is modal or // non-modal IMPLEMENT_DYNAMIC_CLASS(wxDialogBox, wxPanel) wxDialogBox::wxDialogBox(void) { dialogTitle = NULL; panelBackgroundBrush = NULL; #ifdef wx_motif borderWidget = 0; wxType = 1; invisibleResize = FALSE ; has_child = FALSE ; hSpacing = PANEL_HSPACING; vSpacing = PANEL_VSPACING; initial_hspacing = hSpacing ; initial_vspacing = vSpacing ; current_hspacing = hSpacing ; current_vspacing = vSpacing ; new_line = FALSE; // @@@@@ firstRowWidget = NULL; lastWidget = NULL; dialogShell = NULL; panelWidget = NULL; handle = NULL; modal_showing = FALSE; #endif #ifdef wx_xview xFrame = XV_NULL; handle = NULL; has_child = FALSE; // @@@ #endif modal = FALSE; } #ifdef wx_motif void UnmapBulletinBoard(Widget dialog,wxDialogBox *client,XtPointer call) { client->modal_showing = FALSE ; client->is_show = FALSE ; } #endif wxDialogBox::wxDialogBox(wxWindow *Parent, char *Title, Bool Modal, int x, int y, int width, int height, long style, char *name): wxbDialogBox(Parent, Title, Modal, x, y, width, height, style, name) { Create(Parent, Title, Modal, x, y, width, height, style, name); } #ifdef wx_xview void Done_proc(Panel x_panel) { ; // Block quit } // Hack function to handle XView push pins // [Handles both mapped and unmapped frames] void PopUp_done_proc(Frame subframe) { // If the push-pin is pulled out... if (xv_get(subframe, FRAME_CMD_PIN_STATE) != FRAME_CMD_PIN_IN) { Panel x_panel = (Panel) xv_get (subframe, FRAME_CMD_PANEL); // Make sure the panel is still useable if (! xv_get(x_panel, WIN_CLIENT_DATA)) { // Looks like an old frame so... xv_set(subframe, XV_SHOW, FALSE, NULL); return; } // Find the default item, if any, and execute its callback Panel_item item = (Panel_item) xv_get (x_panel, PANEL_DEFAULT_ITEM); if (item) { wxButton *wx_item = (wxButton *) xv_get (item, PANEL_CLIENT_DATA); if (wx_item) { // Push the default button.... wxCommandEvent event (wxEVENT_TYPE_BUTTON_COMMAND); event.eventObject = wx_item; wx_item->ProcessCommand (event); } } /* we should push the pin back in */ xv_set(subframe, FRAME_CMD_PIN_STATE, FRAME_CMD_PIN_IN, NULL); } } #endif Bool wxDialogBox::Create(wxWindow *Parent, char *Title, Bool Modal, int x, int y, int width, int height, long style, char *name) { wxbDialogBox::Create(Parent, Title, Modal, x, y, width, height, style, name); SetName(name); has_child = FALSE ; panelBackgroundBrush = NULL; hSpacing = PANEL_HSPACING; vSpacing = PANEL_VSPACING; initial_hspacing = hSpacing ; initial_vspacing = vSpacing ; current_hspacing = hSpacing ; current_vspacing = vSpacing ; if (Title) dialogTitle = copystring(Title); if (Parent) Parent->AddChild(this); window_parent = Parent; is_show = FALSE; modal_showing = FALSE; if (x < 0) x = wxDIALOG_DEFAULT_X; if (y < 0) y = wxDIALOG_DEFAULT_Y; #ifdef wx_motif if (width == -1) width = 600; if (height == -1) height = 600; // invisibleResize = (style & wxMOTIF_RESIZE)!=0 ; invisibleResize = TRUE; borderWidget = 0; wxType = 1; hSpacing = PANEL_HSPACING; vSpacing = PANEL_VSPACING; new_line = FALSE; // @@@@ firstRowWidget = NULL; lastWidget = NULL; // Create dialog box as BulletinBoard. It seems better to me (Patrick), Dialog are // always over parent's frame. // Side effect: no Minimize/Maximize buttons Widget parentShell = 0; if (Parent) { if (wxSubType(Parent->__type, wxTYPE_FRAME)) { parentShell = ((wxFrame *)Parent)->frameShell; // Make sure the parent is not iconized, // or the dialog will not appear! if (((wxFrame *)Parent)->Iconized()) ((wxFrame *)Parent)->Iconize(FALSE); } else if (wxSubType(Parent->__type, wxTYPE_DIALOG_BOX)) parentShell = ((wxDialogBox *)Parent)->dialogShell; else { parentShell = wxTheApp->topLevel; // Make sure the parent is not iconized, // or the dialog will not appear! if (wxTheApp->wx_frame && wxTheApp->wx_frame->Iconized()) wxTheApp->wx_frame->Iconize(FALSE); } } else { parentShell = wxTheApp->topLevel; // Make sure the parent is not iconized, // or the dialog will not appear! if (wxTheApp->wx_frame && wxTheApp->wx_frame->Iconized()) wxTheApp->wx_frame->Iconize(FALSE); } // Force dialog box to be positioned correctly Arg args[1]; XtSetArg (args[0], XmNdefaultPosition, False); dialogShell = XmCreateBulletinBoardDialog(parentShell, windowName, args, 1); // We don't want margins, since there is enough elsewhere. XtVaSetValues(dialogShell, XmNmarginHeight, 0, XmNmarginWidth, 0, XmNresizePolicy, XmRESIZE_NONE, NULL) ; /* if (invisibleResize) { XtVaSetValues(dialogShell, // XmNresizePolicy, XmRESIZE_ANY, XmNresizePolicy, XmRESIZE_NONE, NULL) ; } else { XtVaSetValues(dialogShell, XmNresizePolicy, XmRESIZE_NONE, // EXPERIMENTAL // XmNresizePolicy, XmRESIZE_ANY, // *** TROUBLE SPOT: UNcomment if you're having // *** panel item sizing problems. NULL) ; } */ panelWidget = dialogShell; Widget shell = XtParent(dialogShell) ; if (Title) { XmString str = XmStringCreateSimple(Title); XtVaSetValues(dialogShell, XmNdialogTitle, str, NULL); XmStringFree(str); } if (wxWidgetHashTable->Get((long)dialogShell)) { wxError("Widget table clash in wx_dialg.cc"); } wxWidgetHashTable->Put((long)dialogShell, this); // Intercept CLOSE messages from the window manager Atom WM_DELETE_WINDOW = XmInternAtom(XtDisplay(shell), "WM_DELETE_WINDOW", False); // Modified Steve Hammes for Motif 2.0 #if (XmREVISION > 1 || XmVERSION > 1) XmAddWMProtocolCallback(shell, WM_DELETE_WINDOW, (XtCallbackProc) wxCloseDialogCallback, (XtPointer)this); #elif XmREVISION == 1 XmAddWMProtocolCallback(shell, WM_DELETE_WINDOW, (XtCallbackProc) wxCloseDialogCallback, (caddr_t)this); #else XmAddWMProtocolCallback(shell, WM_DELETE_WINDOW, (void (*)())wxCloseDialogCallback, (caddr_t)this); #endif XtTranslations ptr ; XtOverrideTranslations(dialogShell, ptr = XtParseTranslationTable(": resize()")); XtFree((char *)ptr); if (invisibleResize) { if (x > -1) XtVaSetValues(dialogShell, XmNx, x, NULL); if (y > -1) XtVaSetValues(dialogShell, XmNy, y, NULL); if (width > -1) XtVaSetValues(panelWidget, XmNwidth, width, NULL); if (height > -1) XtVaSetValues(panelWidget, XmNheight, height, NULL); } // This patch come from Torsten Liermann lier@lier1.muc.de if (XmIsMotifWMRunning(wxTheApp->topLevel)) { int decor = 0 ; if (style & wxRESIZE_BORDER) decor |= MWM_DECOR_RESIZEH ; if (style & wxSYSTEM_MENU) decor |= MWM_DECOR_MENU; if ((style & wxCAPTION) || (style && wxTINY_CAPTION_HORIZ) || (style && wxTINY_CAPTION_VERT)) decor |= MWM_DECOR_TITLE; if (style & wxTHICK_FRAME) decor |= MWM_DECOR_BORDER; if (style & wxMINIMIZE_BOX) decor |= MWM_DECOR_MINIMIZE; if (style & wxMAXIMIZE_BOX) decor |= MWM_DECOR_MAXIMIZE; XtVaSetValues(shell,XmNmwmDecorations,decor,NULL) ; } XtRealizeWidget(dialogShell); XtAddCallback(dialogShell,XmNunmapCallback, (XtCallbackProc)UnmapBulletinBoard,this) ; // Positioning of the dialog doesn't work properly unless the dialog // is managed, so we manage without mapping to the screen. // To show, we map the shell (actually it's parent). if (!invisibleResize) XtVaSetValues(XtParent(dialogShell), XmNmappedWhenManaged, FALSE, NULL); handle = (char *)panelWidget; if (!invisibleResize) { XtManageChild(dialogShell); SetSize(x, y, width, height); } XtAddEventHandler(panelWidget,ExposureMask,FALSE, wxDialogBoxRepaintProc, (XtPointer) this); XtAddEventHandler(panelWidget,ExposureMask,FALSE, wxDialogBoxRepaintProc, (XtPointer) this); XtAddEventHandler(panelWidget, ButtonPressMask | ButtonReleaseMask | PointerMotionMask | KeyPressMask, FALSE, wxDialogBoxEventHandler, (XtPointer)this); wx_dc = new wxPanelDC(this); // Construct a new brush that takes on the // real background colour of this panel. panelBackgroundBrush = new wxBrush; Pixel thePix; XtVaGetValues(panelWidget, XmNbackground, &thePix, NULL); panelBackgroundBrush->colour.pixel = thePix; GetPanelDC()->SetBackground(panelBackgroundBrush); #endif /* Motif */ #ifdef wx_xview Frame parent; parent = ((Parent==NULL || !wxSubType(Parent->__type, wxTYPE_FRAME)) ? ROOT_FRAME : (Frame)(Parent->GetHandle())); // The kind of frame created is given by style, so you can // create frame with pushpin -- but note that on other platforms, // you must probably emulate pushpin with a checkbox. // Currently, wxEnhDialogBox provides this. // default style is to create FRAME, except for wxEnhDialogBox. // Xv_pkg *Frame_style; Bool scrollable = (style & wxVSCROLL) != 0; // System Menu or Resize Corners if (style & wxSYSTEM_MENU || style & wxRESIZE_BOX || scrollable) { Frame_style = FRAME; // Normal frame xFrame = (Frame) xv_create (parent, Frame_style, FRAME_SHOW_RESIZE_CORNER, (style & wxRESIZE_BOX) ? TRUE : FALSE, FRAME_DONE_PROC, Done_proc, // FRAME_DEFAULT_DONE_PROC, done_proc, FRAME_LABEL, Title, FRAME_SHOW_LABEL, (style & (wxCAPTION|wxTINY_CAPTION_HORIZ|wxTINY_CAPTION_VERT)) ? TRUE : FALSE, XV_X, x, XV_Y, y, WIN_CLIENT_DATA, (Xv_opaque) this, NULL); } else { Frame_style = FRAME_CMD; // Push-Pin frame xFrame = (Frame) xv_create (parent, Frame_style, FRAME_DONE_PROC, PopUp_done_proc, /* @@@@ 941102 */ FRAME_CMD_PIN_STATE, FRAME_CMD_PIN_IN, // FRAME_DEFAULT_DONE_PROC, done_proc, FRAME_LABEL, Title, FRAME_SHOW_LABEL, (style & (wxCAPTION|wxTINY_CAPTION_HORIZ|wxTINY_CAPTION_VERT)) ? TRUE : FALSE, XV_X, x, XV_Y, y, WIN_CLIENT_DATA, (Xv_opaque) this, NULL); } Panel x_panel; if (Frame_style == FRAME_CMD) { x_panel = (Panel) xv_get (xFrame, FRAME_CMD_PANEL); } else { x_panel = (Panel) xv_create (xFrame, scrollable ? SCROLLABLE_PANEL : PANEL, NULL); #ifdef USE_DEFAULT_DIALOG_ICON Server_image closed_image = (Server_image)xv_create(XV_NULL, SERVER_IMAGE, XV_WIDTH, 64, XV_HEIGHT, 64, SERVER_IMAGE_BITS, closed_wxdialog_bits, NULL); Icon icon = (Icon)xv_create(xFrame, ICON, ICON_IMAGE, closed_image, ICON_LABEL, Title, XV_X, 64, XV_Y, 64, NULL); xv_set(xFrame, FRAME_ICON, icon, NULL); #endif } xv_set (x_panel, PANEL_BACKGROUND_PROC, wxPanelEventProc, PANEL_ACCEPT_KEYSTROKE, TRUE, WIN_CLIENT_DATA, (Xv_opaque) this, NULL); notify_interpose_event_func(x_panel, (Notify_func)wxPanelInterposeProc, NOTIFY_SAFE); Scrollbar sb; if (scrollable) sb = xv_create(x_panel, SCROLLBAR, NULL); if (width > -1) { xv_set(xFrame, XV_WIDTH, width, NULL); xv_set(x_panel, XV_WIDTH, width, NULL); } if (height > -1) { xv_set(xFrame, XV_HEIGHT, height, NULL); xv_set(x_panel, XV_HEIGHT, height, NULL); } // xv_set(xFrame, XV_SHOW, TRUE, NULL); // EXPERIMENT handle = (char *)x_panel; // Have to do this interposition to receive frame resize events (void)notify_interpose_event_func(xFrame, (Notify_func)wxDialogInterposer, NOTIFY_SAFE); (void)notify_interpose_destroy_func(xFrame, (Notify_func)wxDialogCloseInterposer); wx_dc = new wxPanelDC(this); #endif modal = Modal; return TRUE; } wxDialogBox::~wxDialogBox() { // cerr << "Deleting dialog box\n"; if (dialogTitle) delete[] dialogTitle; #ifdef wx_motif modal_showing = FALSE; if (!invisibleResize && dialogShell) XtUnmapWidget(dialogShell); // wxWidgetHashTable->Delete((long)dialogShell); #endif #ifdef wx_xview modal_showing = FALSE; if (xFrame) { (void)notify_interpose_event_func(xFrame, (Notify_func)wxDummyDialogInterposer, NOTIFY_SAFE); // Zap the data attached to the frame xv_set(xFrame, WIN_CLIENT_DATA, NULL, NULL); xv_destroy_safe(xFrame); } #endif } #ifdef wx_xview Notify_value wxDummyDialogInterposer(Frame x_frame, Event *x_event, Notify_arg arg, Notify_event_type type) { return NOTIFY_DONE; } Notify_value wxDialogInterposer(Frame x_frame, Event *x_event, Notify_arg arg, Notify_event_type type) { wxDialogBox *dialog = (wxDialogBox *)xv_get(x_frame, WIN_CLIENT_DATA); if (dialog && event_action(x_event) == WIN_RESIZE) { int width, height; dialog->GetSize(&width, &height); dialog->GetEventHandler()->OnSize(width, height); } return notify_next_event_func(x_frame, (Notify_event)x_event, arg, type); } Notify_value wxDialogCloseInterposer(Notify_client client, Destroy_status status) { wxDialogBox *dialog = (wxDialogBox *)xv_get(client, WIN_CLIENT_DATA); if (status == DESTROY_CHECKING) { if (dialog && ( dialog->GetEventHandler()->OnClose() == FALSE || dialog->modal == TRUE)) notify_veto_destroy(client); } else if (status == DESTROY_CLEANUP) { // Try to delete the wxDialogBox without allowing the Frame // to be deleted, since this will be done by XView if (dialog) { dialog->Show(FALSE); (void)notify_interpose_event_func(dialog->GetXFrame(), (Notify_func)wxDummyDialogInterposer, NOTIFY_SAFE); xv_set(dialog->GetXFrame(), WIN_CLIENT_DATA, NULL, NULL); dialog->SetXFrame(XV_NULL); dialog->DestroyChildren(); delete dialog; } return notify_next_destroy_func(client, status); } else if (status == DESTROY_SAVE_YOURSELF) { ; // Do nothing - this is an Open Look specific feature } else if (status == DESTROY_PROCESS_DEATH) { ; // Nothing here }; return NOTIFY_DONE; } #endif #ifdef wx_motif void wxDialogBox::PostDestroyChildren(void) { } /* * It's necessary to put this dialog-specific stuff in the base class * because for some reason wxDialogBox::PostDestroyChildren * doesn't get called from ~wxWindow. Perhaps this is because C++ * is crap. Why should the virtual member function calling rules * be changed just because we're in a destructor?!! * */ void wxWindow::PostDestroyChildren(void) { if (wxType == 1) { wxDialogBox *box = (wxDialogBox *)this; XtDestroyWidget(box->dialogShell); // Now process all events, because otherwise // this might remain on the screen XSync(XtDisplay(wxTheApp->topLevel), FALSE); XEvent event; while (XtAppPending(wxTheApp->appContext)) { XFlush(XtDisplay(wxTheApp->topLevel)); XtAppNextEvent(wxTheApp->appContext, &event); XtDispatchEvent(&event); } } } void wxCloseDialogCallback(Widget widget, XtPointer client_data, XmAnyCallbackStruct *cbs) { wxDialogBox *dialog = (wxDialogBox *)client_data; if (dialog && dialog->GetEventHandler()->OnClose()) { dialog->Show(FALSE); delete dialog; } } void wxDialogBoxRepaintProc(Widget w, XtPointer c_data, XEvent *event, char *) { wxPanel *panel; Window window; static XRectangle *xrect; Display *display; GC gc; int llp = 0; static int last_count = 0; static int draw_count = 0; // panel = (wxPanel *) c_data; panel = (wxPanel *)wxWidgetHashTable->Get((long)w); if (panel) switch(event -> type) { case Expose : window = (Window) panel -> GetXWindow(); display = (Display *) panel -> GetXDisplay(); gc = (GC) panel -> GetDC() -> gc; llp = event -> xexpose.count; if ((last_count == 0) && (llp == 0)) { xrect = new XRectangle[1]; xrect[0].x = event -> xexpose.x; xrect[0].y = event -> xexpose.y; xrect[0].width = event -> xexpose.width; xrect[0].height = event -> xexpose.height; XSetClipRectangles(display,gc,0,0,xrect,1,Unsorted); // panel->DoPaint(xrect, 1); panel->GetEventHandler()->OnPaint(); delete xrect; } if ((last_count == 0) && (llp != 0)) { xrect = new XRectangle[llp + 1]; draw_count = llp + 1; xrect[draw_count - llp - 1].x = event -> xexpose.x; xrect[draw_count - llp - 1].y = event -> xexpose.y; xrect[draw_count - llp - 1].width = event -> xexpose.width; xrect[draw_count - llp - 1].height = event -> xexpose.height; } if ((last_count != 0) && (llp != 0)) { xrect[draw_count - llp - 1].x = event -> xexpose.x; xrect[draw_count - llp - 1].y = event -> xexpose.y; xrect[draw_count - llp - 1].width = event -> xexpose.width; xrect[draw_count - llp - 1].height = event -> xexpose.height; } if ((last_count != 0) && (llp == 0)) { xrect[draw_count - llp - 1].x = event -> xexpose.x; xrect[draw_count - llp - 1].y = event -> xexpose.y; xrect[draw_count - llp - 1].width = event -> xexpose.width; xrect[draw_count - llp - 1].height = event -> xexpose.height; XSetClipRectangles(display,gc,0,0,xrect,draw_count,Unsorted); // panel->DoPaint(xrect,draw_count); panel->GetEventHandler()->OnPaint(); delete xrect; } last_count = event -> xexpose.count; break; default : cout << "\n\nNew Event ! is = " << event -> type << "\n"; break; } } void wxDialogBoxEventHandler (Widget wid, XtPointer client_data, XEvent* event, Boolean *continueToDispatch) { // wxDialogBox *dialog = (wxDialogBox *)client_data; wxDialogBox *dialog = (wxDialogBox *)wxWidgetHashTable->Get((long)wid); if (dialog) { wxMouseEvent wxevent(0); if (wxTranslateMouseEvent(wxevent, dialog, event)) dialog->GetEventHandler()->OnEvent(wxevent); } *continueToDispatch = True; } #endif void wxDialogBox::Fit(void) { #ifdef wx_motif wxPanel::Fit(); // Doesn't work properly for dialog boxes, Motif 1.2 #endif #ifdef wx_xview Panel panel = (Panel)handle; window_fit(panel); // Make sure that panel isn't too big too fit on the screen. // Assume that we'll be using a scrolling panel if it's really // big. int y = (int)xv_get(panel, XV_HEIGHT); int dx, dy; wxDisplaySize(&dx, &dy); if ((y + 40) > dy) { xv_set(panel, XV_HEIGHT, dy-40, NULL); } window_fit(xFrame); #endif } void wxDialogBox::Iconize(Bool iconize) { #ifdef wx_motif // Can't iconize a dialog in Motif // XtVaSetValues(dialogShell, XmNiconic, iconize, NULL); #endif #ifdef wx_xview xv_set(xFrame, FRAME_CLOSED, iconize, NULL); #endif } Bool wxDialogBox::Iconized(void) { #ifdef wx_motif /* Bool iconic; XtVaGetValues(dialogShell, XmNiconic, &iconic, NULL); return iconic; */ return FALSE; #endif #ifdef wx_xview return xv_get(xFrame, FRAME_CLOSED); #endif } void wxDialogBox::SetSize(int x, int y, int width, int height, int sizeFlags) { #ifdef wx_motif // Widget shell = XtParent((Widget)handle) ; Widget shell = (Widget)handle ; XtVaSetValues(shell, XmNresizePolicy, XmRESIZE_ANY, NULL); // Widget shellParent = XtParent(shell); /* if (width > -1) { XtVaSetValues((Widget)handle, XmNwidth, width, NULL); // XtVaSetValues(panelWidget, XmNwidth, width, NULL); } if (height > -1) { XtVaSetValues((Widget)handle, XmNheight, height, NULL); // XtVaSetValues(panelWidget, XmNheight, height, NULL); } if (invisibleResize) { if (width > -1) XtVaSetValues(dialogShell, XmNwidth, width, NULL); if (height > -1) XtVaSetValues(dialogShell, XmNheight, height, NULL); } */ if (x > -1) XtVaSetValues(shell, XmNx, x, NULL); if (y > -1) XtVaSetValues(shell, XmNy, y, NULL); // if (!invisibleResize) { if (width > -1) XtVaSetValues(shell, XmNwidth, width, NULL); if (height > -1) XtVaSetValues(shell, XmNheight, height, NULL); } XtVaSetValues(shell, XmNresizePolicy, XmRESIZE_NONE, NULL); GetEventHandler()->OnSize(width, height); #endif #ifdef wx_xview if (x == -1 || y == -1) { int xx,yy ; GetPosition(&xx, &yy); if (x == -1) x = xx ; if (y == -1) y = yy ; } (void)xv_set(xFrame, XV_X, x, XV_Y, y, NULL); if (width == -1 || height == -1) { int ww,hh ; GetSize(&ww, &hh); if (width == -1) width = ww ; if (height == -1) height = hh ; } (void)xv_set(xFrame, XV_WIDTH, width, XV_HEIGHT, height, NULL); GetEventHandler()->OnSize(width, height); #endif } void wxDialogBox::GetSize(int *w, int *h) { #ifdef wx_motif // Widget shell = XtParent((Widget)handle) ; Widget shell = (Widget)handle ; Dimension ww, hh; XtVaGetValues(shell, XmNwidth, &ww, XmNheight, &hh, NULL); *w = ww; *h = hh; #endif #ifdef wx_xview Xv_opaque object = (Xv_opaque) handle; *w = (int)xv_get(object, XV_WIDTH, NULL); *h = (int)xv_get(object, XV_HEIGHT, NULL); #endif } void wxDialogBox::SetClientSize(int width, int height) { #ifdef wx_motif // Widget shell = XtParent((Widget)handle) ; Widget shell = (Widget)handle ; XtVaSetValues(shell, XmNresizePolicy, XmRESIZE_ANY, NULL); if (!invisibleResize) { int xx, yy; GetPosition(&xx, &yy); SetSize(xx, yy, width, height); } else { if (width > -1) XtVaSetValues((Widget)handle, XmNwidth, width, NULL); if (height > -1) XtVaSetValues((Widget)handle, XmNheight, height, NULL); } XtVaSetValues(shell, XmNresizePolicy, XmRESIZE_NONE, NULL); GetEventHandler()->OnSize(width, height); #endif #ifdef wx_xview if (width > -1 && height > -1) (void)xv_set(xFrame, XV_WIDTH, width, XV_HEIGHT, height, NULL); #endif } void wxDialogBox::GetPosition(int *x, int *y) { #ifdef wx_motif Dimension xx, yy; XtVaGetValues(dialogShell, XmNx, &xx, XmNy, &yy, NULL); *x = xx; *y = yy; #endif #ifdef wx_xview *x = (int)xv_get(xFrame, XV_X); *y = (int)xv_get(xFrame, XV_Y); #endif } Bool wxDialogBox::IsShown(void) { return is_show; } // A stack of modal_showing flags, since we can't rely // on accessing wxDialogBox::modal_showing within // wxDialogBox::Show in case a callback has deleted the wxDialogBox. static wxList wxModalShowingStack; Bool wxDialogBox::Show(Bool show) { is_show = show; #ifdef WXGARBAGE_COLLECTION_ON if (!window_parent) { if (show) { if (!wxTopLevelWindows.Member(this)) wxTopLevelWindows.Append(this); } else wxTopLevelWindows.DeleteObject(this); } #endif #ifdef wx_motif if (show) { if (!invisibleResize) XtMapWidget(XtParent(dialogShell)); else XtManageChild(dialogShell) ; XRaiseWindow(XtDisplay(dialogShell), XtWindow(dialogShell)); /* XtManageChild(dialogShell) ; */ // Don't manage, map! if (modal) { if (modal_showing) return TRUE; wxModalShowingStack.Insert((wxObject *)TRUE); modal_showing = TRUE; XtAddGrab(dialogShell, TRUE, FALSE); XEvent event; // printf("+++ Entering modal dialog loop\n"); while ((wxModalShowingStack.Number() > 0) && (Bool)wxModalShowingStack.First()->Data()) { XtAppNextEvent(wxTheApp->appContext, &event); XtDispatchEvent(&event); // printf("*"); // fflush(stdout); } // Remove modal dialog flag from stack wxNode *node = wxModalShowingStack.First(); if (node) delete node; // printf("\n--- Exiting modal dialog loop\n"); // Question: do we have to avoid destroying the widget // in the destructor, or not? /* // Destroy widget if (wxWidgetHashTable->Get((long)theWidget)) XtDestroyWidget(theWidget); */ // printf("+++ Processing remaining events\n"); // Now process all events, to ensure widget destruction XSync(XtDisplay(wxTheApp->topLevel), FALSE); while (XtAppPending(wxTheApp->appContext)) { XFlush(XtDisplay(wxTheApp->topLevel)); XtAppNextEvent(wxTheApp->appContext, &event); XtDispatchEvent(&event); } // printf("--- Processed remaining events\n"); } else modal_showing = FALSE; } else { if (modal_showing) XtRemoveGrab(dialogShell); if (!invisibleResize) XtUnmapWidget(XtParent(dialogShell)); else XtUnmanageChild(dialogShell) ; // XmUpdateDisplay(wxTheApp->topLevel); // Experimental: may be responsible for crashes modal_showing = FALSE; wxNode *node = wxModalShowingStack.First(); if (node) node->SetData((wxObject *)FALSE); // printf("About to flush and sync\n"); XFlush(XtDisplay(wxTheApp->topLevel)); // printf("Number of events in queue is %d\n", (int)XEventsQueued(XtDisplay(wxTheApp->topLevel), QueuedAfterFlush)); XSync(XtDisplay(wxTheApp->topLevel), FALSE); // printf("After flush and sync\n"); } #endif #ifdef wx_xview // Note this bit not code is not working // recursively!! XView limitation? Yes! // Requires patched version of xv_win_lp.c if (show) { if (modal) { if (modal_showing) return TRUE; modal_showing = TRUE; xv_set (xFrame, WIN_GRAB_ALL_INPUT, FALSE, NULL); if (XV_OK != xv_window_loop (xFrame)) printf("Internal Error: %s(%d)\n", __FILE__, __LINE__); modal_showing = FALSE; } else xv_set(xFrame, XV_SHOW, TRUE, NULL); } else // Hide the Frame { xv_set (xFrame, WIN_GRAB_ALL_INPUT, FALSE, NULL); if (modal) xv_window_return (XV_OK); else xv_set(xFrame, XV_SHOW, FALSE, NULL); } #endif return TRUE; } void wxDialogBox::SetTitle(char *title) { if (dialogTitle) delete[] dialogTitle; dialogTitle = copystring(title); #ifdef wx_motif if (title) XtVaSetValues(dialogShell, XmNtitle, title, XmNiconName, title, NULL); #endif #ifdef wx_xview xv_set(xFrame, FRAME_LABEL, title, NULL); /* if (icon) { xv_set(icon->x_icon, XV_LABEL, title, NULL); xv_set(xFrame, FRAME_ICON, icon->x_icon, NULL); } */ #endif } char *wxDialogBox::GetTitle(void) { return dialogTitle; } /* * Common dialogs code * */ // Pop up a message box int wxMessageBox(char *message, char *caption, long style, wxWindow *parent, int x, int y) { #if defined(wx_xview) && USE_NOTICES Xv_opaque win = 0; if (parent) win = (Xv_opaque)parent->handle; else if (wxTheApp->wx_frame) win = (Xv_opaque)wxTheApp->wx_frame->handle; else return wxbMessageBox(message, caption, style, parent, x, y); int noticeStatus = 0; Xv_notice notice = 0; // OK only. if (((style & wxOK) == wxOK) && ((style & wxYES_NO) == 0) && ((style & wxCANCEL) == 0)) { notice = xv_create(win, NOTICE, NOTICE_MESSAGE_STRING, message,// NULL, NOTICE_BUTTON_YES, "OK", NOTICE_BLOCK_THREAD, TRUE, NOTICE_NO_BEEPING, TRUE, NOTICE_STATUS, ¬iceStatus, NULL); // if (x > -1 && y > -1) // xv_set(notice, NOTICE_FOCUS_XY, x, y, NULL); xv_set(notice, XV_SHOW, TRUE, NULL); xv_destroy(notice); return wxOK; } // OK, Cancel else if (((style & wxOK) == wxOK) && ((style & wxCANCEL) == wxCANCEL)) { notice = xv_create(win, NOTICE, NOTICE_MESSAGE_STRING, message,// NULL, NOTICE_BUTTON_YES, "OK", NOTICE_BUTTON_NO, "Cancel", NOTICE_BLOCK_THREAD, TRUE, NOTICE_NO_BEEPING, TRUE, NOTICE_STATUS, ¬iceStatus, NULL); if (x > -1 && y > -1) xv_set(notice, NOTICE_FOCUS_XY, x, y, NULL); xv_set(notice, XV_SHOW, TRUE, NULL); xv_destroy(notice); if (noticeStatus == NOTICE_YES) return wxOK; else return wxCANCEL; } // Yes, No, Cancel else if (((style & wxYES_NO) == wxYES_NO) && ((style & wxCANCEL) == wxCANCEL)) { notice = xv_create(win, NOTICE, NOTICE_MESSAGE_STRING, message,// NULL, NOTICE_BUTTON, "Yes", 100, NOTICE_BUTTON, "No", 101, NOTICE_BUTTON, "Cancel", 102, NOTICE_BLOCK_THREAD, TRUE, NOTICE_NO_BEEPING, TRUE, NOTICE_STATUS, ¬iceStatus, NULL); if (x > -1 && y > -1) xv_set(notice, NOTICE_FOCUS_XY, x, y, NULL); xv_set(notice, XV_SHOW, TRUE, NULL); xv_destroy(notice); if (noticeStatus == 100) return wxYES; else if (noticeStatus == 101) return wxNO; else // if (noticeStatus == 102) return wxCANCEL; } // Yes, no else if ((style & wxYES_NO) == wxYES_NO) { notice = xv_create(win, NOTICE, NOTICE_MESSAGE_STRING, message,// NULL, NOTICE_BUTTON_YES, "Yes", NOTICE_BUTTON_NO, "No", NOTICE_BLOCK_THREAD, TRUE, NOTICE_NO_BEEPING, TRUE, NOTICE_STATUS, ¬iceStatus, NULL); if (x > -1 && y > -1) xv_set(notice, NOTICE_FOCUS_XY, x, y, NULL); xv_set(notice, XV_SHOW, TRUE, NULL); xv_destroy(notice); if (noticeStatus == NOTICE_YES) return wxYES; else return wxNO; } return 0; // Make the compiler happy #else return wxbMessageBox(message, caption, style, parent, x, y); #endif } char *wxFileSelector(char *message, char *default_path, char *default_filename, char *default_extension, char *wildcard, int flags, wxWindow *parent, int x, int y) { if (x < 0) x = wxDIALOG_DEFAULT_X; if (y < 0) y = wxDIALOG_DEFAULT_Y; #ifdef wx_motif return wxMotifFileSelector(message, default_path, default_filename, default_extension, wildcard, flags, parent, x, y); #elif defined(wx_xview) char buf[_MAXPATHLEN]; if (default_path == NULL) { if ((default_path = getcwd(buf, sizeof(buf)/sizeof(char)-1)) == NULL) default_path = "."; } if (default_filename == NULL) default_filename = ""; return wxXFileSelector(parent, default_path, default_filename, message, flags, wildcard, x, y); #else # error "Not Yet..." #endif } #ifdef wx_xview void wxReadDir(wxListBox *filebox, wxListBox *dirbox, char *path, char *filename, DIR *dirp) { filebox->Show(FALSE); filebox->Clear(); dirbox->Show(FALSE); dirbox->Clear(); struct dirent *dir; wxBeginBusyCursor(); // @@@@ // Parent first (if not root dir) if (*path != '/' || *(path + 1) != '\0') dirbox->Append(".."); DIR *dirstream = NULL; if ((dir=readdir(dirp))==NULL) { printf("wxWin: There has been an error reading a directory\n"); return; } char buf[_MAXPATHLEN]; wxStringList files; wxStringList dirs; // Used to skip the first entry since we assumed // it to be "." but that assumtion is not POSIX. do { // We ignore all .xx files and dirs if (dir->d_name[0] == '.' && filename[0] != '.') continue; strcpy(buf, path); size_t len = strlen(buf); if (buf[len - 1] != '/') buf[len++] = '/'; strcpy(&buf[len], dir->d_name); // The readdir is necessary on some systems since opendir // can open a file successfully, but readdir fails // on reading from a file. if ((dirstream = opendir(buf)) && (readdir(dirstream))) { closedir(dirstream); if (dir->d_name[0] != '.') dirs.Add(dir->d_name); } else if (!wxIsWild(filename) || wxMatchWild(filename, dir->d_name)) files.Add(dir->d_name); } while ((dir = readdir(dirp)) != NULL); // Sort files and dirs files.Sort(); dirs.Sort(); for(wxNode *node = files.First(); node; node = files.First()) { char *s = (char *)node->Data(); filebox->Append(s); delete[] s; delete node; } for(node = dirs.First(); node; node = dirs.First()) { char *s = (char *)node->Data(); dirbox->Append(s); delete[] s; delete node; } wxEndBusyCursor(); // @@@@ filebox->Show(TRUE); dirbox->Show(TRUE); } class wxXFileSelDialog: public wxDialogBox { public: char *wild_card; wxText *name_item; wxText *path_item; wxListBox *list_item; wxListBox *file_item; wxListBox *dir_item; wxXFileSelDialog(wxWindow *frame, char *title, Bool isModal = FALSE, int x = -1, int y = -1, int width = -1, int height = -1); }; wxXFileSelDialog::wxXFileSelDialog(wxWindow *frame, char *title, Bool isModal, int x, int y, int width, int height): wxDialogBox(frame, title, isModal, x, y, width, height) { } void wxXFileSelPath(wxText& text, wxEvent& event) { } void wxStripOneDir(char *dir) { #if 1 if (dir && *dir) { char *tcp; if ((tcp = strrchr(dir, '/')) == NULL) tcp = dir; // No slash so zap it all else if (tcp == dir) // Don't strip away root tcp++; // Protect first '/' *tcp = '\0'; // Cut here } #else int len = strlen(dir); if (len > 1) { int i = len - 1; char ch = 0; while (ch != '/' && i > 0) { ch = dir[i]; i --; } if (++i == 0) i++; dir[i] = 0; } #endif } void wxXFileSelDirList(wxListBox& listbox, wxEvent& event) { char *name = copystring(listbox.GetStringSelection()); wxXFileSelDialog *dialog = (wxXFileSelDialog *)listbox.GetParent(); char *path = copystring(dialog->path_item->GetValue()); char buf[_MAXPATHLEN]; strcpy(buf, path); if (strcmp(name, "..") == 0) { wxStripOneDir(buf); } else { size_t len = strlen(buf); if (buf[len - 1] != '/') { buf[len++] = '/'; buf[len] = '\0'; } strcat(buf, name); } DIR *dirstream = NULL; if (dirstream = opendir(buf)) { dialog->path_item->SetValue(buf); wxReadDir(dialog->file_item, &listbox, buf, dialog->name_item->GetValue(), dirstream); closedir(dirstream); } else dialog->name_item->SetValue(name); } void wxXFileSelFileList(wxListBox& listbox, wxEvent& event) { char *name = copystring(listbox.GetStringSelection()); wxXFileSelDialog *dialog = (wxXFileSelDialog *)listbox.GetParent(); dialog->name_item->SetValue(name); } int wxXFileSelResponse = 0; char *wxXFileSelAnswer = NULL; // Note: // edz 111694: // Instead of message boxes for warning messages we should probably // use a status line--- better HCI. [to be done] void wxXFileSelOK(wxButton& ok, wxEvent& event) { wxXFileSelDialog *dialog = (wxXFileSelDialog *)ok.GetParent(); char *nameval = dialog->name_item->GetValue(); char *pathval = dialog->path_item->GetValue(); if (wxIsWild(nameval)) { DIR *dirstream = NULL; if (dirstream = opendir(pathval)) { wxReadDir(dialog->file_item, dialog->dir_item, pathval, nameval, dirstream); closedir(dirstream); } else { // Zap the file/dir lists // dialog->file_item->Show (FALSE); dialog->file_item->Clear (); // dialog->dir_item->Show (FALSE); dialog->dir_item->Clear (); wxMessageBox("Specified Dir not readable", wxSTR_WARNING, wxOK); } return; } char *name = copystring(nameval); char *path = copystring(pathval); char buf[_MAXPATHLEN]; strcpy(buf, path); int len = strlen(buf); if (buf[len - 1] != '/') strcat(buf, "/"); strcat(buf, name); delete[] name; delete[] path; if (wxXFileSelAnswer) delete[] wxXFileSelAnswer; wxXFileSelAnswer = copystring(buf); dialog->Show(FALSE); delete dialog; wxXFileSelResponse = 1; } void wxXFileSelCancel(wxButton& cancel, wxEvent& event) { wxXFileSelDialog *dialog = (wxXFileSelDialog *)cancel.GetParent(); wxXFileSelResponse = 0; dialog->Show(FALSE); delete dialog; } char *wxXFileSelector(wxWindow *parent, char *path, char *file, char *message, int flags, char *wild_card, int x, int y) { wxXFileSelResponse = 0; DIR *dirstream; char buf[_MAXPATHLEN]; if (path == NULL) { if ((path = getcwd(buf, sizeof(buf)/sizeof(char)-1)) == NULL) path = "."; } if (file == NULL) file = ""; // Bounded at (0,0) // A coordinate of -1 means centre on Axis! int realX = x < 0 ? 0 : x; int realY = y < 0 ? 0 : y; if ((dirstream=opendir(path))!=NULL) { // @@@ Use Title wxXFileSelDialog *dialog = new wxXFileSelDialog( parent , message ? message : wxSTR_FILE_SELECTOR , TRUE, realX, realY, 800, 800); dialog->SetLabelPosition(wxHORIZONTAL); dialog->NewLine(); // Extra space is a question of taste wxText *name_text = new wxText(dialog, (wxFunction)NULL, wxSTR_LABEL_FILENAME, file, -1, -1, 300, -1); (void)new wxButton(dialog, (wxFunction)wxXFileSelOK, wxSTR_BUTTON_OK); wxButton *cancelBut = new wxButton(dialog, (wxFunction)wxXFileSelCancel, wxSTR_BUTTON_CANCEL); cancelBut->SetDefault(); // Cancel is Default! dialog->NewLine(); wxText *path_text = new wxText(dialog, (wxFunction)wxXFileSelPath, wxSTR_LABEL_PATH, path, -1, -1, 400, -1); dialog->NewLine(); dialog->SetLabelPosition(wxVERTICAL); wxListBox *filebox = new wxListBox(dialog, (wxFunction)wxXFileSelFileList, wxSTR_LABEL_FILES, wxSINGLE, -1, -1, 250, 300); int fX, fY; filebox->GetPosition(&fX, &fY); wxListBox *dirbox = new wxListBox(dialog, (wxFunction)wxXFileSelDirList, wxSTR_LABEL_DIRS, wxSINGLE, 265, fY, 250, 300); dialog->path_item = path_text; dialog->name_item = name_text; dialog->dir_item = dirbox; dialog->file_item = filebox; dialog->wild_card = wild_card; dialog->Fit(); // edz: @@@ 111594 Fixed handling of default if ((file == NULL || file[0] == '\0') && wild_card) dialog->name_item->SetValue (wild_card); wxReadDir(filebox, dirbox, path, wild_card, dirstream); // Centre if position not given @@@@ if ( x < 0 && y < 0 ) dialog->Centre(wxBOTH); else if ( x == -1 ) dialog->Centre(wxVERTICAL); else if ( y == -1 ) dialog->Centre(wxHORIZONTAL); dialog->Show(TRUE); if (wxXFileSelResponse == 0) return NULL; else { if ((flags & wxOVERWRITE_PROMPT) && FileExists(wxXFileSelAnswer)) { char buf[200]; sprintf(buf, wxSTR_OVERWRITE_FILE, wxXFileSelAnswer); int ans = wxMessageBox(buf, wxSTR_WARNING, wxYES_NO); if (ans == wxYES) { strcpy(wxBuffer, wxXFileSelAnswer); return wxBuffer; } else return NULL; } else { strcpy(wxBuffer, wxXFileSelAnswer); return wxBuffer; } } // wxXFileSelResponse != 0 } // If directory could be opened // ERROR return NULL; } #endif #ifdef wx_motif char *wxFileSelectorAnswer = NULL; Bool wxFileSelectorReturned = FALSE; void wxFileSelCancel(Widget fs, XtPointer client_data, XmFileSelectionBoxCallbackStruct *cbs) { wxFileSelectorAnswer = NULL; wxFileSelectorReturned = TRUE; } void wxFileSelOk(Widget fs, XtPointer client_data, XmFileSelectionBoxCallbackStruct *cbs) { char *filename = NULL; if (!XmStringGetLtoR(cbs->value, XmSTRING_DEFAULT_CHARSET, &filename)) { wxFileSelectorAnswer = NULL; wxFileSelectorReturned = TRUE; } else { if (filename) { if (wxFileSelectorAnswer) delete[] wxFileSelectorAnswer; wxFileSelectorAnswer = copystring(filename); XtFree(filename); } wxFileSelectorReturned = TRUE; } } char *wxMotifFileSelector(char *message, char *default_path, char *default_filename, char *default_extension, char *wildcard, int flags, wxWindow *parent, int x, int y) { wxBeginBusyCursor(); static char fileBuf[512]; Widget parentWidget = 0; if (parent) { if (wxSubType(parent->__type, wxTYPE_FRAME)) parentWidget = ((wxFrame *)parent)->frameShell; else if (wxSubType(parent->__type, wxTYPE_DIALOG_BOX)) parentWidget = ((wxDialogBox *)parent)->dialogShell; else parentWidget = (Widget)parent->handle; } else if (wxTheApp->wx_frame) parentWidget = wxTheApp->wx_frame->frameShell; Widget fileSel = XmCreateFileSelectionDialog(parentWidget, "file_selector", NULL, 0); XtUnmanageChild(XmFileSelectionBoxGetChild(fileSel, XmDIALOG_HELP_BUTTON)); Widget shell = XtParent(fileSel); if (message) XtVaSetValues(shell, XmNtitle, message, NULL); char *entirePath = NULL; if (default_path && default_filename) { sprintf(wxBuffer, "%s/%s", default_path, default_filename); entirePath = copystring(wxBuffer); } else if (default_path && !default_filename) { sprintf(wxBuffer, "%s/", default_path); entirePath = copystring(wxBuffer); } else if ((!default_path) && default_filename) { sprintf(wxBuffer, "%s", default_filename); entirePath = copystring(wxBuffer); } if (entirePath) { Widget selectionWidget = XmFileSelectionBoxGetChild(fileSel, XmDIALOG_TEXT); XmTextSetString(selectionWidget, entirePath); delete[] entirePath; } if (wildcard) { if (default_path) sprintf(wxBuffer, "%s/%s", default_path, wildcard); else sprintf(wxBuffer, "%s", wildcard); Widget filterWidget = XmFileSelectionBoxGetChild(fileSel, XmDIALOG_FILTER_TEXT); XmTextSetString(filterWidget, wxBuffer); XmFileSelectionDoSearch(fileSel, NULL); } XtAddCallback(fileSel, XmNcancelCallback, (XtCallbackProc)wxFileSelCancel, (XtPointer)NULL); XtAddCallback(fileSel, XmNokCallback, (XtCallbackProc)wxFileSelOk, (XtPointer)NULL); //#if XmVersion > 1000 // I'm not sure about what you mean with XmVersion. // If this is for Motif1.1/Motif1.2, then check XmVersion>=1200 // (Motif1.1.4 ==> XmVersion 1100 ) // Nevertheless, I put here a #define, so anyone can choose in (I)makefile... // #if !DEFAULT_FILE_SELECTOR_SIZE int width = wxFSB_WIDTH; int height = wxFSB_HEIGHT; XtVaSetValues(fileSel, XmNwidth, width, XmNheight, height, XmNresizePolicy, XmRESIZE_NONE, NULL); #endif XtManageChild(fileSel); if (wxFileSelectorAnswer) delete[] wxFileSelectorAnswer; wxFileSelectorAnswer = NULL; wxFileSelectorReturned = FALSE; wxEndBusyCursor(); XtAddGrab(XtParent(fileSel), TRUE, FALSE); XEvent event; while (!wxFileSelectorReturned) { XtAppNextEvent(wxTheApp->appContext, &event); XtDispatchEvent(&event); } XtRemoveGrab(XtParent(fileSel)); XmUpdateDisplay(wxTheApp->topLevel); // Experimental // XtDestroyWidget(fileSel); XtUnmapWidget(XtParent(fileSel)); XtDestroyWidget(XtParent(fileSel)); // Now process all events, because otherwise // this might remain on the screen XSync(XtDisplay(wxTheApp->topLevel), FALSE); while (XtAppPending(wxTheApp->appContext)) { XFlush(XtDisplay(wxTheApp->topLevel)); XtAppNextEvent(wxTheApp->appContext, &event); XtDispatchEvent(&event); } if (wxFileSelectorAnswer) { strcpy(fileBuf, wxFileSelectorAnswer); return fileBuf; } else return NULL; } #endif