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