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 #include "wx/cursor.h"
  22
  23 /*
  24 #include "gdk/gdkprivate.h"
  25 #include "gdk/gdkx.h"
  26 */
  27
  28 //-----------------------------------------------------------------------------
  29 // idle system
  30 //-----------------------------------------------------------------------------
  31
  32 extern void wxapp_install_idle_handler();
  33 extern bool g_isIdle;
  34
  35 //-----------------------------------------------------------------------------
  36 // data
  37 //-----------------------------------------------------------------------------
  38
  39 extern wxList wxPendingDelete;
  40
  41 //-----------------------------------------------------------------------------
  42 // "delete_event"
  43 //-----------------------------------------------------------------------------
  44
  45 bool gtk_dialog_delete_callback( GtkWidget *WXUNUSED(widget), GdkEvent *WXUNUSED(event), wxDialog *win )
  46 {
  47     if (g_isIdle)
  48         wxapp_install_idle_handler();
  49
  50     win->Close();
  51
  52     return TRUE;
  53 }
  54
  55 //-----------------------------------------------------------------------------
  56 // "size_allocate"
  57 //-----------------------------------------------------------------------------
  58
  59 static void gtk_dialog_size_callback( GtkWidget *WXUNUSED(widget), GtkAllocation* alloc, wxDialog *win )
  60 {
  61     if (g_isIdle)
  62         wxapp_install_idle_handler();
  63
  64     if (!win->m_hasVMT) return;
  65
  66     if ((win->m_width != alloc->width) || (win->m_height != alloc->height))
  67     {
  68         win->m_width = alloc->width;
  69         win->m_height = alloc->height;
  70         win->UpdateSize();
  71     }
  72 }
  73
  74 //-----------------------------------------------------------------------------
  75 // "configure_event"
  76 //-----------------------------------------------------------------------------
  77
  78 static gint
  79 #if (GTK_MINOR_VERSON > 0)
  80 gtk_dialog_configure_callback( GtkWidget *WXUNUSED(widget), GdkEventConfigure *WXUNUSED(event), wxDialog *win )
  81 #else
  82 gtk_dialog_configure_callback( GtkWidget *WXUNUSED(widget), GdkEventConfigure *event, wxDialog *win )
  83 #endif
  84 {
  85     if (g_isIdle)
  86         wxapp_install_idle_handler();
  87
  88     if (!win->m_hasVMT) return FALSE;
  89
  90 #if (GTK_MINOR_VERSON > 0)
  91     int x = 0;
  92     int y = 0;
  93     gdk_window_get_root_origin( win->m_widget->window, &x, &y );
  94     win->m_x = x;
  95     win->m_y = y;
  96 #else
  97     win->m_x = event->x;
  98     win->m_y = event->y;
  99 #endif
 100
 101     wxMoveEvent mevent( wxPoint(win->m_x,win->m_y), win->GetId() );
 102     mevent.SetEventObject( win );
 103     win->GetEventHandler()->ProcessEvent( mevent );
 104
 105     return FALSE;
 106 }
 107
 108 //-----------------------------------------------------------------------------
 109 // "realize" from m_widget
 110 //-----------------------------------------------------------------------------
 111
 112 /* we cannot MWM hints and icons before the widget has been realized,
 113    so we do this directly after realization */
 114
 115 static gint
 116 gtk_dialog_realized_callback( GtkWidget *widget, wxDialog *win )
 117 {
 118     if (g_isIdle)
 119         wxapp_install_idle_handler();
 120
 121     /* I haven't been able to set the position of
 122        the dialog before it is shown, so I set the
 123        position in "realize" */
 124     gtk_widget_set_uposition( widget, win->m_x, win->m_y );
 125
 126     /* all this is for Motif Window Manager "hints" and is supposed to be
 127        recognized by other WM as well. not tested. */
 128     long decor = (long) GDK_DECOR_BORDER;
 129     long func = (long) GDK_FUNC_MOVE ;
 130
 131     if ((win->GetWindowStyle() & wxCAPTION) != 0)
 132         decor |= GDK_DECOR_TITLE;
 133     if ((win->GetWindowStyle() & wxSYSTEM_MENU) != 0)
 134     {
 135        decor |= GDK_DECOR_MENU;
 136        func |= GDK_FUNC_CLOSE;
 137     }
 138     if ((win->GetWindowStyle() & wxMINIMIZE_BOX) != 0)
 139     {
 140         func |= GDK_FUNC_MINIMIZE;
 141         decor |= GDK_DECOR_MINIMIZE;
 142     }
 143     if ((win->GetWindowStyle() & wxMAXIMIZE_BOX) != 0)
 144     {
 145         decor |= GDK_DECOR_MAXIMIZE;
 146         func |= GDK_FUNC_MAXIMIZE;
 147     }
 148     if ((win->GetWindowStyle() & wxRESIZE_BORDER) != 0)
 149     {
 150        func |= GDK_FUNC_RESIZE;
 151        decor |= GDK_DECOR_RESIZEH;
 152     }
 153     gdk_window_set_decorations( win->m_widget->window, (GdkWMDecoration)decor);
 154     gdk_window_set_functions( win->m_widget->window, (GdkWMFunction)func);
 155
 156     /* GTK's shrinking/growing policy */
 157     if ((win->GetWindowStyle() & wxRESIZE_BORDER) == 0)
 158         gtk_window_set_policy(GTK_WINDOW(win->m_widget), 0, 0, 1);
 159     else
 160         gtk_window_set_policy(GTK_WINDOW(win->m_widget), 1, 1, 1);
 161
 162     /* set size hints */
 163     gint flag = GDK_HINT_POS;
 164     if ((win->GetMinWidth() != -1) || (win->GetMinHeight() != -1)) flag |= GDK_HINT_MIN_SIZE;
 165     if ((win->GetMaxWidth() != -1) || (win->GetMaxHeight() != -1)) flag |= GDK_HINT_MAX_SIZE;
 166     if (flag)
 167     {
 168         gdk_window_set_hints( win->m_widget->window,
 169                               win->m_x, win->m_y,
 170                               win->GetMinWidth(), win->GetMinHeight(),
 171                               win->GetMaxWidth(), win->GetMaxHeight(),
 172                               flag );
 173     }
 174
 175     /* reset the icon */
 176     if (win->m_icon != wxNullIcon)
 177     {
 178         wxIcon icon( win->m_icon );
 179         win->m_icon = wxNullIcon;
 180         win->SetIcon( icon );
 181     }
 182
 183     return FALSE;
 184 }
 185
 186 //-----------------------------------------------------------------------------
 187 // InsertChild for wxDialog
 188 //-----------------------------------------------------------------------------
 189
 190 /* Callback for wxFrame. This very strange beast has to be used because
 191  * C++ has no virtual methods in a constructor. We have to emulate a
 192  * virtual function here as wxWindows requires different ways to insert
 193  * a child in container classes. */
 194
 195 static void wxInsertChildInDialog( wxDialog* parent, wxWindow* child )
 196 {
 197     gtk_pizza_put( GTK_PIZZA(parent->m_wxwindow),
 198                      GTK_WIDGET(child->m_widget),
 199                      child->m_x,
 200                      child->m_y,
 201                      child->m_width,
 202                      child->m_height );
 203
 204     if (parent->HasFlag(wxTAB_TRAVERSAL))
 205     {
 206         /* we now allow a window to get the focus as long as it
 207            doesn't have any children. */
 208         GTK_WIDGET_UNSET_FLAGS( parent->m_wxwindow, GTK_CAN_FOCUS );
 209     }
 210 }
 211
 212 //-----------------------------------------------------------------------------
 213 // wxDialog
 214 //-----------------------------------------------------------------------------
 215
 216 BEGIN_EVENT_TABLE(wxDialog,wxPanel)
 217     EVT_BUTTON  (wxID_OK,       wxDialog::OnOK)
 218     EVT_BUTTON  (wxID_CANCEL,   wxDialog::OnCancel)
 219     EVT_BUTTON  (wxID_APPLY,    wxDialog::OnApply)
 220     EVT_SIZE    (wxDialog::OnSize)
 221     EVT_CLOSE   (wxDialog::OnCloseWindow)
 222 END_EVENT_TABLE()
 223
 224 IMPLEMENT_DYNAMIC_CLASS(wxDialog,wxPanel)
 225
 226 void wxDialog::Init()
 227 {
 228     m_returnCode = 0;
 229     m_sizeSet = FALSE;
 230     m_modalShowing = FALSE;
 231     m_isFrame = TRUE;
 232 }
 233
 234 wxDialog::wxDialog( wxWindow *parent,
 235                     wxWindowID id, const wxString &title,
 236                     const wxPoint &pos, const wxSize &size,
 237                     long style, const wxString &name )
 238 {
 239     Init();
 240
 241     Create( parent, id, title, pos, size, style, name );
 242 }
 243
 244 bool wxDialog::Create( wxWindow *parent,
 245                        wxWindowID id, const wxString &title,
 246                        const wxPoint &pos, const wxSize &size,
 247                        long style, const wxString &name )
 248 {
 249     wxTopLevelWindows.Append( this );
 250
 251     m_needParent = FALSE;
 252
 253     if (!PreCreation( parent, pos, size ) ||
 254         !CreateBase( parent, id, pos, size, style, wxDefaultValidator, name ))
 255     {
 256         wxFAIL_MSG( wxT("wxDialog creation failed") );
 257         return FALSE;
 258     }
 259
 260     m_insertCallback = (wxInsertChildFunction) wxInsertChildInDialog;
 261
 262     m_widget = gtk_window_new( GTK_WINDOW_DIALOG );
 263
 264     if ((m_parent) && (GTK_IS_WINDOW(m_parent->m_widget)))
 265         gtk_window_set_transient_for( GTK_WINDOW(m_widget), GTK_WINDOW(m_parent->m_widget) );
 266
 267     if (!name.IsEmpty())
 268         gtk_window_set_wmclass( GTK_WINDOW(m_widget), name.mb_str(), name.mb_str() );
 269
 270     GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS );
 271
 272     gtk_signal_connect( GTK_OBJECT(m_widget), "delete_event",
 273         GTK_SIGNAL_FUNC(gtk_dialog_delete_callback), (gpointer)this );
 274
 275     m_wxwindow = gtk_pizza_new();
 276     gtk_widget_show( m_wxwindow );
 277     GTK_WIDGET_UNSET_FLAGS( m_wxwindow, GTK_CAN_FOCUS );
 278
 279     gtk_container_add( GTK_CONTAINER(m_widget), m_wxwindow );
 280
 281     SetTitle( title );
 282
 283     if (m_parent) m_parent->AddChild( this );
 284
 285     PostCreation();
 286
 287     /*  we cannot set MWM hints  before the widget has
 288         been realized, so we do this directly after realization */
 289     gtk_signal_connect( GTK_OBJECT(m_widget), "realize",
 290                         GTK_SIGNAL_FUNC(gtk_dialog_realized_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 = wxT("");
 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& WXUNUSED(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), wxT("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), wxT("invalid dialog") );
 444     wxASSERT_MSG( (m_wxwindow != NULL), wxT("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 /*
 470     if ((sizeFlags & wxSIZE_AUTO_WIDTH) == wxSIZE_AUTO_WIDTH)
 471     {
 472         if (width == -1) m_width = 80;
 473     }
 474
 475     if ((sizeFlags & wxSIZE_AUTO_HEIGHT) == wxSIZE_AUTO_HEIGHT)
 476     {
 477        if (height == -1) m_height = 26;
 478     }
 479 */
 480
 481     if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
 482     if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
 483     if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_maxWidth;
 484     if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_maxHeight;
 485
 486     if ((m_x != -1) || (m_y != -1))
 487     {
 488         if ((m_x != old_x) || (m_y != old_y))
 489         {
 490             /* we set the position here and when showing the dialog
 491                for the first time in idle time */
 492             gtk_widget_set_uposition( m_widget, m_x, m_y );
 493         }
 494     }
 495
 496     if ((m_width != old_width) || (m_height != old_height))
 497     {
 498         /* actual resizing is deferred to GtkOnSize in idle time and
 499            when showing the dialog */
 500         m_sizeSet = FALSE;
 501     }
 502
 503     m_resizing = FALSE;
 504 }
 505
 506 void wxDialog::GtkOnSize( int WXUNUSED(x), int WXUNUSED(y), int width, int height )
 507 {
 508     // due to a bug in gtk, x,y are always 0
 509     // m_x = x;
 510     // m_y = y;
 511
 512     if ((m_height == height) && (m_width == width) && (m_sizeSet)) return;
 513     if (!m_wxwindow) return;
 514
 515     m_width = width;
 516     m_height = height;
 517
 518     if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
 519     if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
 520     if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_maxWidth;
 521     if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_maxHeight;
 522
 523     /* we actually set the size of a frame here and no-where else */
 524     gtk_widget_set_usize( m_widget, m_width, m_height );
 525
 526     m_sizeSet = TRUE;
 527
 528     wxSizeEvent event( wxSize(m_width,m_height), GetId() );
 529     event.SetEventObject( this );
 530     GetEventHandler()->ProcessEvent( event );
 531 }
 532
 533 void wxDialog::OnInternalIdle()
 534 {
 535     if (!m_sizeSet && GTK_WIDGET_REALIZED(m_wxwindow))
 536         GtkOnSize( m_x, m_y, m_width, m_height );
 537
 538     wxWindow::OnInternalIdle();
 539 }
 540
 541 bool wxDialog::Show( bool show )
 542 {
 543     if (!show && IsModal())
 544     {
 545         EndModal( wxID_CANCEL );
 546     }
 547
 548     if (show && !m_sizeSet)
 549     {
 550         /* by calling GtkOnSize here, we don't have to call
 551            either after showing the frame, which would entail
 552            much ugly flicker nor from within the size_allocate
 553            handler, because GTK 1.1.X forbids that. */
 554
 555         GtkOnSize( m_x, m_y, m_width, m_height );
 556     }
 557
 558     bool ret = wxWindow::Show( show );
 559
 560     if (show) InitDialog();
 561
 562     return ret;
 563 }
 564
 565 bool wxDialog::IsModal() const
 566 {
 567     return m_modalShowing;
 568 }
 569
 570 void wxDialog::SetModal( bool WXUNUSED(flag) )
 571 {
 572 /*
 573   if (flag)
 574     m_windowStyle |= wxDIALOG_MODAL;
 575   else
 576     if (m_windowStyle & wxDIALOG_MODAL) m_windowStyle -= wxDIALOG_MODAL;
 577 */
 578     wxFAIL_MSG( wxT("wxDialog:SetModal obsolete now") );
 579 }
 580
 581 int wxDialog::ShowModal()
 582 {
 583     if (IsModal())
 584     {
 585        wxFAIL_MSG( wxT("wxDialog:ShowModal called twice") );
 586        return GetReturnCode();
 587     }
 588
 589     wxBusyCursorSuspender cs; // temporarily suppress the busy cursor
 590
 591     Show( TRUE );
 592
 593     m_modalShowing = TRUE;
 594
 595     gtk_grab_add( m_widget );
 596     gtk_main();
 597     gtk_grab_remove( m_widget );
 598
 599     return GetReturnCode();
 600 }
 601
 602 void wxDialog::EndModal( int retCode )
 603 {
 604     SetReturnCode( retCode );
 605
 606     if (!IsModal())
 607     {
 608         wxFAIL_MSG( wxT("wxDialog:EndModal called twice") );
 609         return;
 610     }
 611
 612     m_modalShowing = FALSE;
 613
 614     gtk_main_quit();
 615
 616     Show( FALSE );
 617 }
 618
 619 void wxDialog::InitDialog()
 620 {
 621     wxWindow::InitDialog();
 622 }
 623
 624 void wxDialog::SetIcon( const wxIcon &icon )
 625 {
 626     m_icon = icon;
 627     if (!icon.Ok()) return;
 628
 629     if (!m_widget->window) return;
 630
 631     wxMask *mask = icon.GetMask();
 632     GdkBitmap *bm = (GdkBitmap *) NULL;
 633     if (mask) bm = mask->GetBitmap();
 634
 635     gdk_window_set_icon( m_widget->window, (GdkWindow *) NULL, icon.GetPixmap(), bm );
 636 }