Small distrib updates,
[wxWidgets.git] / src / gtk1 / dialog.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: dialog.cpp
3 // Purpose:
4 // Author: Robert Roebling
5 // Id: $Id$
6 // Copyright: (c) 1998 Robert Roebling
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
9
10 #ifdef __GNUG__
11 #pragma implementation "dialog.h"
12 #endif
13
14 #include "wx/dialog.h"
15 #include "wx/frame.h"
16 #include "wx/app.h"
17
18 #include "gdk/gdk.h"
19 #include "gtk/gtk.h"
20 #include "wx/gtk/win_gtk.h"
21
22 //-----------------------------------------------------------------------------
23 // idle system
24 //-----------------------------------------------------------------------------
25
26 extern void wxapp_install_idle_handler();
27 extern bool g_isIdle;
28
29 //-----------------------------------------------------------------------------
30 // data
31 //-----------------------------------------------------------------------------
32
33 extern wxList wxPendingDelete;
34
35 //-----------------------------------------------------------------------------
36 // "delete_event"
37 //-----------------------------------------------------------------------------
38
39 bool gtk_dialog_delete_callback( GtkWidget *WXUNUSED(widget), GdkEvent *WXUNUSED(event), wxDialog *win )
40 {
41 if (g_isIdle)
42 wxapp_install_idle_handler();
43
44 win->Close();
45
46 return TRUE;
47 }
48
49 //-----------------------------------------------------------------------------
50 // "size_allocate"
51 //-----------------------------------------------------------------------------
52
53 static void gtk_dialog_size_callback( GtkWidget *WXUNUSED(widget), GtkAllocation* alloc, wxDialog *win )
54 {
55 if (g_isIdle)
56 wxapp_install_idle_handler();
57
58 if (!win->m_hasVMT) return;
59
60 if ((win->m_width != alloc->width) || (win->m_height != alloc->height))
61 {
62 win->m_width = alloc->width;
63 win->m_height = alloc->height;
64 win->UpdateSize();
65 }
66 }
67
68 //-----------------------------------------------------------------------------
69 // "configure_event"
70 //-----------------------------------------------------------------------------
71
72 static gint
73 #if (GTK_MINOR_VERSON > 0)
74 gtk_dialog_configure_callback( GtkWidget *WXUNUSED(widget), GdkEventConfigure *WXUNUSED(event), wxDialog *win )
75 #else
76 gtk_dialog_configure_callback( GtkWidget *WXUNUSED(widget), GdkEventConfigure *event, wxDialog *win )
77 #endif
78 {
79 if (g_isIdle)
80 wxapp_install_idle_handler();
81
82 if (!win->m_hasVMT) return FALSE;
83
84 #if (GTK_MINOR_VERSON > 0)
85 int x = 0;
86 int y = 0;
87 gdk_window_get_root_origin( win->m_widget->window, &x, &y );
88 win->m_x = x;
89 win->m_y = y;
90 #else
91 win->m_x = event->x;
92 win->m_y = event->y;
93 #endif
94
95 wxMoveEvent mevent( wxPoint(win->m_x,win->m_y), win->GetId() );
96 mevent.SetEventObject( win );
97 win->GetEventHandler()->ProcessEvent( mevent );
98
99 return FALSE;
100 }
101
102 //-----------------------------------------------------------------------------
103 // "realize" from m_widget
104 //-----------------------------------------------------------------------------
105
106 /* we cannot MWM hints and icons before the widget has been realized,
107 so we do this directly after realization */
108
109 static gint
110 gtk_dialog_realized_callback( GtkWidget *widget, wxDialog *win )
111 {
112 if (g_isIdle)
113 wxapp_install_idle_handler();
114
115 /* I haven''t been able to set the position of
116 the dialog before it is shown, so I set the
117 position in "realize" and "map" */
118 gtk_widget_set_uposition( widget, win->m_x, win->m_y );
119
120 /* reset the icon */
121 if (win->m_icon != wxNullIcon)
122 {
123 wxIcon icon( win->m_icon );
124 win->m_icon = wxNullIcon;
125 win->SetIcon( icon );
126 }
127
128 return FALSE;
129 }
130
131 //-----------------------------------------------------------------------------
132 // "map" from m_widget
133 //-----------------------------------------------------------------------------
134
135 static gint
136 gtk_dialog_map_callback( GtkWidget *widget, wxDialog *win )
137 {
138 if (g_isIdle)
139 wxapp_install_idle_handler();
140
141 /* I haven''t been able to set the position of
142 the dialog before it is shown, so I set the
143 position in "realize" and "map" */
144 gtk_widget_set_uposition( widget, win->m_x, win->m_y );
145
146 /* all this is for Motif Window Manager "hints" and is supposed to be
147 recognized by other WM as well. not tested. */
148 long decor = (long) GDK_DECOR_BORDER;
149 long func = (long) GDK_FUNC_MOVE ;
150
151 if ((win->GetWindowStyle() & wxCAPTION) != 0)
152 decor |= GDK_DECOR_TITLE;
153 if ((win->GetWindowStyle() & wxSYSTEM_MENU) != 0)
154 {
155 decor |= GDK_DECOR_MENU;
156 func |= GDK_FUNC_CLOSE;
157 }
158 if ((win->GetWindowStyle() & wxMINIMIZE_BOX) != 0)
159 {
160 func |= GDK_FUNC_MINIMIZE;
161 decor |= GDK_DECOR_MINIMIZE;
162 }
163 if ((win->GetWindowStyle() & wxMAXIMIZE_BOX) != 0)
164 {
165 decor |= GDK_DECOR_MAXIMIZE;
166 func |= GDK_FUNC_MAXIMIZE;
167 }
168 if ((win->GetWindowStyle() & wxRESIZE_BORDER) != 0)
169 {
170 func |= GDK_FUNC_RESIZE;
171 decor |= GDK_DECOR_RESIZEH;
172 }
173 gdk_window_set_decorations( win->m_widget->window, (GdkWMDecoration)decor);
174 gdk_window_set_functions( win->m_widget->window, (GdkWMFunction)func);
175
176 /* GTK's shrinking/growing policy */
177 if ((win->GetWindowStyle() & wxRESIZE_BORDER) == 0)
178 gtk_window_set_policy(GTK_WINDOW(win->m_widget), 0, 0, 1);
179 else
180 gtk_window_set_policy(GTK_WINDOW(win->m_widget), 1, 1, 1);
181
182 return FALSE;
183 }
184
185 //-----------------------------------------------------------------------------
186 // InsertChild for wxDialog
187 //-----------------------------------------------------------------------------
188
189 /* Callback for wxFrame. This very strange beast has to be used because
190 * C++ has no virtual methods in a constructor. We have to emulate a
191 * virtual function here as wxWindows requires different ways to insert
192 * a child in container classes. */
193
194 static void wxInsertChildInDialog( wxDialog* parent, wxWindow* child )
195 {
196 gtk_myfixed_put( GTK_MYFIXED(parent->m_wxwindow),
197 GTK_WIDGET(child->m_widget),
198 child->m_x,
199 child->m_y,
200 child->m_width,
201 child->m_height );
202
203 if (parent->HasFlag(wxTAB_TRAVERSAL))
204 {
205 /* we now allow a window to get the focus as long as it
206 doesn't have any children. */
207 GTK_WIDGET_UNSET_FLAGS( parent->m_wxwindow, GTK_CAN_FOCUS );
208 }
209 }
210
211 //-----------------------------------------------------------------------------
212 // wxDialog
213 //-----------------------------------------------------------------------------
214
215 BEGIN_EVENT_TABLE(wxDialog,wxPanel)
216 EVT_BUTTON (wxID_OK, wxDialog::OnOK)
217 EVT_BUTTON (wxID_CANCEL, wxDialog::OnCancel)
218 EVT_BUTTON (wxID_APPLY, wxDialog::OnApply)
219 EVT_SIZE (wxDialog::OnSize)
220 EVT_CLOSE (wxDialog::OnCloseWindow)
221 END_EVENT_TABLE()
222
223 IMPLEMENT_DYNAMIC_CLASS(wxDialog,wxPanel)
224
225 void wxDialog::Init()
226 {
227 m_returnCode = 0;
228 m_sizeSet = FALSE;
229 m_modalShowing = FALSE;
230 }
231
232 wxDialog::wxDialog( wxWindow *parent,
233 wxWindowID id, const wxString &title,
234 const wxPoint &pos, const wxSize &size,
235 long style, const wxString &name )
236 {
237 Init();
238
239 Create( parent, id, title, pos, size, style, name );
240 }
241
242 bool wxDialog::Create( wxWindow *parent,
243 wxWindowID id, const wxString &title,
244 const wxPoint &pos, const wxSize &size,
245 long style, const wxString &name )
246 {
247 wxTopLevelWindows.Append( this );
248
249 m_needParent = FALSE;
250
251 if (!PreCreation( parent, pos, size ) ||
252 !CreateBase( parent, id, pos, size, style, wxDefaultValidator, name ))
253 {
254 wxFAIL_MSG( _T("wxDialog creation failed") );
255 return FALSE;
256 }
257
258 m_insertCallback = (wxInsertChildFunction) wxInsertChildInDialog;
259
260 m_widget = gtk_window_new( GTK_WINDOW_TOPLEVEL );
261
262 if (!name.IsEmpty())
263 gtk_window_set_wmclass( GTK_WINDOW(m_widget), name.mb_str(), name.mb_str() );
264
265 GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS );
266
267 gtk_signal_connect( GTK_OBJECT(m_widget), "delete_event",
268 GTK_SIGNAL_FUNC(gtk_dialog_delete_callback), (gpointer)this );
269
270 m_wxwindow = gtk_myfixed_new();
271 gtk_widget_show( m_wxwindow );
272 GTK_WIDGET_UNSET_FLAGS( m_wxwindow, GTK_CAN_FOCUS );
273
274 gtk_container_add( GTK_CONTAINER(m_widget), m_wxwindow );
275
276 SetTitle( title );
277
278 if (m_parent) m_parent->AddChild( this );
279
280 PostCreation();
281
282 /* we cannot set MWM hints before the widget has
283 been realized, so we do this directly after realization */
284 gtk_signal_connect( GTK_OBJECT(m_widget), "realize",
285 GTK_SIGNAL_FUNC(gtk_dialog_realized_callback), (gpointer) this );
286
287 /* we set the position of the window after the map event. setting it
288 before has no effect (with KWM) */
289 gtk_signal_connect( GTK_OBJECT(m_widget), "map",
290 GTK_SIGNAL_FUNC(gtk_dialog_map_callback), (gpointer) this );
291
292 /* the user resized the frame by dragging etc. */
293 gtk_signal_connect( GTK_OBJECT(m_widget), "size_allocate",
294 GTK_SIGNAL_FUNC(gtk_dialog_size_callback), (gpointer)this );
295
296 gtk_signal_connect( GTK_OBJECT(m_widget), "configure_event",
297 GTK_SIGNAL_FUNC(gtk_dialog_configure_callback), (gpointer)this );
298
299 return TRUE;
300 }
301
302 wxDialog::~wxDialog()
303 {
304 m_isBeingDeleted = TRUE;
305
306 wxTopLevelWindows.DeleteObject( this );
307
308 if (wxTheApp->GetTopWindow() == this)
309 {
310 wxTheApp->SetTopWindow( (wxWindow*) NULL );
311 }
312
313 if (wxTopLevelWindows.Number() == 0)
314 {
315 wxTheApp->ExitMainLoop();
316 }
317 }
318
319 void wxDialog::SetTitle( const wxString& title )
320 {
321 m_title = title;
322 if (m_title.IsNull()) m_title = _T("");
323 gtk_window_set_title( GTK_WINDOW(m_widget), m_title.mbc_str() );
324 }
325
326 wxString wxDialog::GetTitle() const
327 {
328 return (wxString&)m_title;
329 }
330
331 void wxDialog::OnApply( wxCommandEvent &WXUNUSED(event) )
332 {
333 if (Validate()) TransferDataFromWindow();
334 }
335
336 void wxDialog::OnCancel( wxCommandEvent &WXUNUSED(event) )
337 {
338 if (IsModal())
339 {
340 EndModal(wxID_CANCEL);
341 }
342 else
343 {
344 SetReturnCode(wxID_CANCEL);
345 Show(FALSE);
346 }
347 }
348
349 void wxDialog::OnOK( wxCommandEvent &WXUNUSED(event) )
350 {
351 if (Validate() && TransferDataFromWindow())
352 {
353 if (IsModal())
354 {
355 EndModal(wxID_OK);
356 }
357 else
358 {
359 SetReturnCode(wxID_OK);
360 this->Show(FALSE);
361 }
362 }
363 }
364
365 void wxDialog::OnPaint( wxPaintEvent& WXUNUSED(event) )
366 {
367 // yes
368 }
369
370 void wxDialog::OnCloseWindow(wxCloseEvent& event)
371 {
372 // We'll send a Cancel message by default,
373 // which may close the dialog.
374 // Check for looping if the Cancel event handler calls Close().
375
376 // Note that if a cancel button and handler aren't present in the dialog,
377 // nothing will happen when you close the dialog via the window manager, or
378 // via Close().
379 // We wouldn't want to destroy the dialog by default, since the dialog may have been
380 // created on the stack.
381 // However, this does mean that calling dialog->Close() won't delete the dialog
382 // unless the handler for wxID_CANCEL does so. So use Destroy() if you want to be
383 // sure to destroy the dialog.
384 // The default OnCancel (above) simply ends a modal dialog, and hides a modeless dialog.
385
386 static wxList s_closing;
387
388 if (s_closing.Member(this))
389 return; // no loops
390
391 s_closing.Append(this);
392
393 wxCommandEvent cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED, wxID_CANCEL);
394 cancelEvent.SetEventObject( this );
395 GetEventHandler()->ProcessEvent(cancelEvent);
396 s_closing.DeleteObject(this);
397 }
398
399 bool wxDialog::Destroy()
400 {
401 if (!wxPendingDelete.Member(this)) wxPendingDelete.Append(this);
402
403 return TRUE;
404 }
405
406 void wxDialog::OnSize( wxSizeEvent &WXUNUSED(event) )
407 {
408 wxASSERT_MSG( (m_widget != NULL), _T("invalid dialog") );
409
410 #if wxUSE_CONSTRAINTS
411 if (GetAutoLayout())
412 {
413 Layout();
414 }
415 else
416 #endif // wxUSE_CONSTRAINTS
417 {
418 /* no child: go out ! */
419 if (!GetChildren().First()) return;
420
421 /* do we have exactly one child? */
422 wxWindow *child = (wxWindow *) NULL;
423 for(wxNode *node = GetChildren().First(); node; node = node->Next())
424 {
425 wxWindow *win = (wxWindow *)node->Data();
426 if (!wxIS_KIND_OF(win,wxFrame) && !wxIS_KIND_OF(win,wxDialog))
427 {
428 /* it's the second one: do nothing */
429 if (child) return;
430 child = win;
431 }
432 }
433
434 /* yes: set it's size to fill all the frame */
435 int client_x, client_y;
436 GetClientSize( &client_x, &client_y );
437 child->SetSize( 1, 1, client_x-2, client_y);
438 }
439 }
440
441 void wxDialog::DoSetSize( int x, int y, int width, int height, int sizeFlags )
442 {
443 wxASSERT_MSG( (m_widget != NULL), _T("invalid dialog") );
444 wxASSERT_MSG( (m_wxwindow != NULL), _T("invalid dialog") );
445
446 if (m_resizing) return; /* I don't like recursions */
447 m_resizing = TRUE;
448
449 int old_x = m_x;
450 int old_y = m_y;
451 int old_width = m_width;
452 int old_height = m_height;
453
454 if ((sizeFlags & wxSIZE_ALLOW_MINUS_ONE) == 0)
455 {
456 if (x != -1) m_x = x;
457 if (y != -1) m_y = y;
458 if (width != -1) m_width = width;
459 if (height != -1) m_height = height;
460 }
461 else
462 {
463 m_x = x;
464 m_y = y;
465 m_width = width;
466 m_height = height;
467 }
468
469 if ((sizeFlags & wxSIZE_AUTO_WIDTH) == wxSIZE_AUTO_WIDTH)
470 {
471 if (width == -1) m_width = 80;
472 }
473
474 if ((sizeFlags & wxSIZE_AUTO_HEIGHT) == wxSIZE_AUTO_HEIGHT)
475 {
476 if (height == -1) m_height = 26;
477 }
478
479 if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
480 if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
481 if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_maxWidth;
482 if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_maxHeight;
483
484 if ((m_x != -1) || (m_y != -1))
485 {
486 if ((m_x != old_x) || (m_y != old_y))
487 {
488 /* we set the position here and when showing the dialog
489 for the first time in idle time */
490 gtk_widget_set_uposition( m_widget, m_x, m_y );
491 }
492 }
493
494 if ((m_width != old_width) || (m_height != old_height))
495 {
496 /* actual resizing is deferred to GtkOnSize in idle time and
497 when showing the dialog */
498 m_sizeSet = FALSE;
499 }
500
501 m_resizing = FALSE;
502 }
503
504 void wxDialog::GtkOnSize( int WXUNUSED(x), int WXUNUSED(y), int width, int height )
505 {
506 // due to a bug in gtk, x,y are always 0
507 // m_x = x;
508 // m_y = y;
509
510 if ((m_height == height) && (m_width == width) && (m_sizeSet)) return;
511 if (!m_wxwindow) return;
512
513 m_width = width;
514 m_height = height;
515
516 if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
517 if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
518 if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_maxWidth;
519 if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_maxHeight;
520
521 /* we actually set the size of a frame here and no-where else */
522 gtk_widget_set_usize( m_widget, m_width, m_height );
523
524 m_sizeSet = TRUE;
525
526 wxSizeEvent event( wxSize(m_width,m_height), GetId() );
527 event.SetEventObject( this );
528 GetEventHandler()->ProcessEvent( event );
529 }
530
531 void wxDialog::Centre( int direction )
532 {
533 wxASSERT_MSG( (m_widget != NULL), _T("invalid dialog") );
534
535 int x = 0;
536 int y = 0;
537
538 if ((direction & wxHORIZONTAL) == wxHORIZONTAL) x = (gdk_screen_width () - m_width) / 2;
539 if ((direction & wxVERTICAL) == wxVERTICAL) y = (gdk_screen_height () - m_height) / 2;
540
541 Move( x, y );
542 }
543
544 void wxDialog::OnInternalIdle()
545 {
546 if (!m_sizeSet && GTK_WIDGET_REALIZED(m_wxwindow))
547 GtkOnSize( m_x, m_y, m_width, m_height );
548 }
549
550 bool wxDialog::Show( bool show )
551 {
552 if (!show && IsModal())
553 {
554 EndModal( wxID_CANCEL );
555 }
556
557 if (show && !m_sizeSet)
558 {
559 /* by calling GtkOnSize here, we don't have to call
560 either after showing the frame, which would entail
561 much ugly flicker nor from within the size_allocate
562 handler, because GTK 1.1.X forbids that. */
563
564 GtkOnSize( m_x, m_y, m_width, m_height );
565 }
566
567 bool ret = wxWindow::Show( show );
568
569 if (show) InitDialog();
570
571 return ret;
572 }
573
574 bool wxDialog::IsModal() const
575 {
576 return m_modalShowing;
577 }
578
579 void wxDialog::SetModal( bool WXUNUSED(flag) )
580 {
581 /*
582 if (flag)
583 m_windowStyle |= wxDIALOG_MODAL;
584 else
585 if (m_windowStyle & wxDIALOG_MODAL) m_windowStyle -= wxDIALOG_MODAL;
586 */
587 wxFAIL_MSG( _T("wxDialog:SetModal obsolete now") );
588 }
589
590 int wxDialog::ShowModal()
591 {
592 if (IsModal())
593 {
594 wxFAIL_MSG( _T("wxDialog:ShowModal called twice") );
595 return GetReturnCode();
596 }
597
598 Show( TRUE );
599
600 m_modalShowing = TRUE;
601
602 gtk_grab_add( m_widget );
603 gtk_main();
604 gtk_grab_remove( m_widget );
605
606 return GetReturnCode();
607 }
608
609 void wxDialog::EndModal( int retCode )
610 {
611 SetReturnCode( retCode );
612
613 if (!IsModal())
614 {
615 wxFAIL_MSG( _T("wxDialog:EndModal called twice") );
616 return;
617 }
618
619 m_modalShowing = FALSE;
620
621 gtk_main_quit();
622
623 Show( FALSE );
624 }
625
626 void wxDialog::InitDialog()
627 {
628 wxWindow::InitDialog();
629 }
630
631 void wxDialog::SetIcon( const wxIcon &icon )
632 {
633 m_icon = icon;
634 if (!icon.Ok()) return;
635
636 if (!m_widget->window) return;
637
638 wxMask *mask = icon.GetMask();
639 GdkBitmap *bm = (GdkBitmap *) NULL;
640 if (mask) bm = mask->GetBitmap();
641
642 gdk_window_set_icon( m_widget->window, (GdkWindow *) NULL, icon.GetPixmap(), bm );
643 }