Pileus Git - ~andy/gtk/blob - gtk/gtkdialog.c

   1 /* GTK - The GIMP Toolkit
   2  * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the
  16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  * Boston, MA 02111-1307, USA.
  18  */
  19
  20 /*
  21  * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
  22  * file for a list of people on the GTK+ Team.  See the ChangeLog
  23  * files for a list of changes.  These files are distributed with
  24  * GTK+ at ftp://ftp.gtk.org/pub/gtk/.
  25  */
  26
  27 #include "gtkbutton.h"
  28 #include "gtkdialog.h"
  29 #include "gtkhbbox.h"
  30 #include "gtkhseparator.h"
  31 #include "gtkvbox.h"
  32 #include "gtksignal.h"
  33 #include "gdkkeysyms.h"
  34 #include "gtkmain.h"
  35 #include "gtkintl.h"
  36 #include "gtkbindings.h"
  37
  38 static void gtk_dialog_class_init (GtkDialogClass *klass);
  39 static void gtk_dialog_init       (GtkDialog      *dialog);
  40
  41 static void gtk_dialog_add_buttons_valist (GtkDialog   *dialog,
  42                                            const gchar *first_button_text,
  43                                            va_list      args);
  44
  45 static gint gtk_dialog_delete_event_handler (GtkWidget   *widget,
  46                                              GdkEventAny *event,
  47                                              gpointer     user_data);
  48
  49 static void gtk_dialog_set_property      (GObject          *object,
  50                                           guint             prop_id,
  51                                           const GValue     *value,
  52                                           GParamSpec       *pspec);
  53 static void gtk_dialog_get_property      (GObject          *object,
  54                                           guint             prop_id,
  55                                           GValue           *value,
  56                                           GParamSpec       *pspec);
  57 static void gtk_dialog_style_set         (GtkWidget        *widget,
  58                                           GtkStyle         *prev_style);
  59
  60 static void gtk_dialog_close             (GtkDialog        *dialog);
  61
  62 enum {
  63   PROP_0,
  64   PROP_HAS_SEPARATOR
  65 };
  66
  67 enum {
  68   RESPONSE,
  69   CLOSE,
  70   LAST_SIGNAL
  71 };
  72
  73 static gpointer parent_class;
  74 static guint dialog_signals[LAST_SIGNAL];
  75
  76 GtkType
  77 gtk_dialog_get_type (void)
  78 {
  79   static GtkType dialog_type = 0;
  80
  81   if (!dialog_type)
  82     {
  83       static const GtkTypeInfo dialog_info =
  84       {
  85         "GtkDialog",
  86         sizeof (GtkDialog),
  87         sizeof (GtkDialogClass),
  88         (GtkClassInitFunc) gtk_dialog_class_init,
  89         (GtkObjectInitFunc) gtk_dialog_init,
  90         /* reserved_1 */ NULL,
  91         /* reserved_2 */ NULL,
  92         (GtkClassInitFunc) NULL,
  93       };
  94
  95       dialog_type = gtk_type_unique (GTK_TYPE_WINDOW, &dialog_info);
  96     }
  97
  98   return dialog_type;
  99 }
 100
 101 static void
 102 gtk_dialog_class_init (GtkDialogClass *class)
 103 {
 104   GObjectClass *gobject_class;
 105   GtkObjectClass *object_class;
 106   GtkWidgetClass *widget_class;
 107   GtkBindingSet *binding_set;
 108
 109   gobject_class = G_OBJECT_CLASS (class);
 110   object_class = GTK_OBJECT_CLASS (class);
 111   widget_class = GTK_WIDGET_CLASS (class);
 112
 113   parent_class = g_type_class_peek_parent (class);
 114
 115   gobject_class->set_property = gtk_dialog_set_property;
 116   gobject_class->get_property = gtk_dialog_get_property;
 117
 118   widget_class->style_set = gtk_dialog_style_set;
 119
 120   class->close = gtk_dialog_close;
 121
 122   g_object_class_install_property (gobject_class,
 123                                    PROP_HAS_SEPARATOR,
 124                                    g_param_spec_boolean ("has_separator",
 125                                                          _("Has separator"),
 126                                                          _("The dialog has a separator bar above its buttons"),
 127                                                          TRUE,
 128                                                          G_PARAM_READWRITE));
 129
 130   dialog_signals[RESPONSE] =
 131     gtk_signal_new ("response",
 132                     GTK_RUN_LAST,
 133                     GTK_CLASS_TYPE (object_class),
 134                     GTK_SIGNAL_OFFSET (GtkDialogClass, response),
 135                     gtk_marshal_NONE__INT,
 136                     GTK_TYPE_NONE, 1,
 137                     GTK_TYPE_INT);
 138
 139   dialog_signals[CLOSE] =
 140     gtk_signal_new ("close",
 141                     GTK_RUN_LAST | GTK_RUN_ACTION,
 142                     GTK_CLASS_TYPE (object_class),
 143                     GTK_SIGNAL_OFFSET (GtkDialogClass, close),
 144                     gtk_marshal_NONE__NONE,
 145                     GTK_TYPE_NONE, 0);
 146
 147   gtk_widget_class_install_style_property (widget_class,
 148                                            g_param_spec_int ("content_area_border",
 149                                                              _("Content area border"),
 150                                                              _("Width of border around the main dialog area"),
 151                                                              0,
 152                                                              G_MAXINT,
 153                                                              2,
 154                                                              G_PARAM_READABLE));
 155   gtk_widget_class_install_style_property (widget_class,
 156                                            g_param_spec_int ("button_spacing",
 157                                                              _("Button spacing"),
 158                                                              _("Spacing between buttons"),
 159                                                              0,
 160                                                              G_MAXINT,
 161                                                              10,
 162                                                              G_PARAM_READABLE));
 163
 164   gtk_widget_class_install_style_property (widget_class,
 165                                            g_param_spec_int ("action_area_border",
 166                                                              _("Action area border"),
 167                                                              _("Width of border around the button area at the bottom of the dialog"),
 168                                                              0,
 169                                                              G_MAXINT,
 170                                                              5,
 171                                                              G_PARAM_READABLE));
 172
 173   binding_set = gtk_binding_set_by_class (class);
 174
 175   gtk_binding_entry_add_signal (binding_set, GDK_Escape, 0,
 176                                 "close", 0);
 177 }
 178
 179 static void
 180 update_spacings (GtkDialog *dialog)
 181 {
 182   GtkWidget *widget;
 183   gint content_area_border;
 184   gint button_spacing;
 185   gint action_area_border;
 186
 187   widget = GTK_WIDGET (dialog);
 188
 189   gtk_widget_style_get (widget,
 190                         "content_area_border",
 191                         &content_area_border,
 192                         "button_spacing",
 193                         &button_spacing,
 194                         "action_area_border",
 195                         &action_area_border,
 196                         NULL);
 197
 198   gtk_container_set_border_width (GTK_CONTAINER (dialog->vbox),
 199                                   content_area_border);
 200   gtk_box_set_spacing (GTK_BOX (dialog->action_area),
 201                        button_spacing);
 202   gtk_container_set_border_width (GTK_CONTAINER (dialog->action_area),
 203                                   action_area_border);
 204 }
 205
 206 static void
 207 gtk_dialog_init (GtkDialog *dialog)
 208 {
 209   /* To avoid breaking old code that prevents destroy on delete event
 210    * by connecting a handler, we have to have the FIRST signal
 211    * connection on the dialog.
 212    */
 213   gtk_signal_connect (GTK_OBJECT (dialog),
 214                       "delete_event",
 215                       GTK_SIGNAL_FUNC (gtk_dialog_delete_event_handler),
 216                       NULL);
 217
 218   dialog->vbox = gtk_vbox_new (FALSE, 0);
 219
 220   gtk_container_add (GTK_CONTAINER (dialog), dialog->vbox);
 221   gtk_widget_show (dialog->vbox);
 222
 223   dialog->action_area = gtk_hbutton_box_new ();
 224
 225   gtk_button_box_set_layout (GTK_BUTTON_BOX (dialog->action_area),
 226                              GTK_BUTTONBOX_END);
 227
 228   gtk_box_pack_end (GTK_BOX (dialog->vbox), dialog->action_area,
 229                     FALSE, TRUE, 0);
 230   gtk_widget_show (dialog->action_area);
 231
 232   dialog->separator = gtk_hseparator_new ();
 233   gtk_box_pack_end (GTK_BOX (dialog->vbox), dialog->separator, FALSE, TRUE, 0);
 234   gtk_widget_show (dialog->separator);
 235
 236   gtk_window_set_type_hint (GTK_WINDOW (dialog),
 237                             GDK_WINDOW_TYPE_HINT_DIALOG);
 238   gtk_window_set_position (GTK_WINDOW (dialog), GTK_WIN_POS_CENTER_ON_PARENT);
 239 }
 240
 241
 242 static void
 243 gtk_dialog_set_property (GObject      *object,
 244                          guint         prop_id,
 245                          const GValue *value,
 246                          GParamSpec   *pspec)
 247 {
 248   GtkDialog *dialog;
 249
 250   dialog = GTK_DIALOG (object);
 251
 252   switch (prop_id)
 253     {
 254     case PROP_HAS_SEPARATOR:
 255       gtk_dialog_set_has_separator (dialog, g_value_get_boolean (value));
 256       break;
 257
 258     default:
 259       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 260       break;
 261     }
 262 }
 263
 264 static void
 265 gtk_dialog_get_property (GObject     *object,
 266                          guint        prop_id,
 267                          GValue      *value,
 268                          GParamSpec  *pspec)
 269 {
 270   GtkDialog *dialog;
 271
 272   dialog = GTK_DIALOG (object);
 273
 274   switch (prop_id)
 275     {
 276     case PROP_HAS_SEPARATOR:
 277       g_value_set_boolean (value, dialog->separator != NULL);
 278       break;
 279
 280     default:
 281       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 282       break;
 283     }
 284 }
 285
 286 static gint
 287 gtk_dialog_delete_event_handler (GtkWidget   *widget,
 288                                  GdkEventAny *event,
 289                                  gpointer     user_data)
 290 {
 291   /* emit response signal */
 292   gtk_dialog_response (GTK_DIALOG (widget), GTK_RESPONSE_DELETE_EVENT);
 293
 294   /* Do the destroy by default */
 295   return FALSE;
 296 }
 297
 298 static void
 299 gtk_dialog_style_set (GtkWidget *widget,
 300                       GtkStyle  *prev_style)
 301 {
 302   update_spacings (GTK_DIALOG (widget));
 303 }
 304
 305 static void
 306 gtk_dialog_close (GtkDialog *dialog)
 307 {
 308   /* Synthesize delete_event to close dialog. */
 309
 310   GdkEventAny event;
 311   GtkWidget *widget;
 312
 313   widget = GTK_WIDGET (dialog);
 314
 315   event.type = GDK_DELETE;
 316   event.window = widget->window;
 317   event.send_event = TRUE;
 318
 319   g_object_ref (G_OBJECT (event.window));
 320
 321   gtk_main_do_event ((GdkEvent*)&event);
 322
 323   g_object_unref (G_OBJECT (event.window));
 324 }
 325
 326 GtkWidget*
 327 gtk_dialog_new (void)
 328 {
 329   return GTK_WIDGET (gtk_type_new (GTK_TYPE_DIALOG));
 330 }
 331
 332 static GtkWidget*
 333 gtk_dialog_new_empty (const gchar     *title,
 334                       GtkWindow       *parent,
 335                       GtkDialogFlags   flags)
 336 {
 337   GtkDialog *dialog;
 338
 339   dialog = GTK_DIALOG (g_object_new (GTK_TYPE_DIALOG, NULL));
 340
 341   if (title)
 342     gtk_window_set_title (GTK_WINDOW (dialog), title);
 343
 344   if (parent)
 345     gtk_window_set_transient_for (GTK_WINDOW (dialog), parent);
 346
 347   if (flags & GTK_DIALOG_MODAL)
 348     gtk_window_set_modal (GTK_WINDOW (dialog), TRUE);
 349
 350   if (flags & GTK_DIALOG_DESTROY_WITH_PARENT)
 351     gtk_window_set_destroy_with_parent (GTK_WINDOW (dialog), TRUE);
 352
 353   if (flags & GTK_DIALOG_NO_SEPARATOR)
 354     gtk_dialog_set_has_separator (dialog, FALSE);
 355
 356   return GTK_WIDGET (dialog);
 357 }
 358
 359 /**
 360  * gtk_dialog_new_with_buttons:
 361  * @title: Title of the dialog, or %NULL
 362  * @parent: Transient parent of the dialog, or %NULL
 363  * @flags: from #GtkDialogFlags
 364  * @first_button_text: stock ID or text to go in first button, or %NULL
 365  * @Varargs: response ID for first button, then additional buttons, ending with %NULL
 366  *
 367  * Creates a new #GtkDialog with title @title (or %NULL for the default
 368  * title; see gtk_window_set_title()) and transient parent @parent (or
 369  * %NULL for none; see gtk_window_set_transient_for()). The @flags
 370  * argument can be used to make the dialog modal (#GTK_DIALOG_MODAL)
 371  * and/or to have it destroyed along with its transient parent
 372  * (#GTK_DIALOG_DESTROY_WITH_PARENT). After @flags, button
 373  * text/response ID pairs should be listed, with a %NULL pointer ending
 374  * the list. Button text can be either a stock ID such as
 375  * #GTK_STOCK_OK, or some arbitrary text.  A response ID can be
 376  * any positive number, or one of the values in the #GtkResponseType
 377  * enumeration. If the user clicks one of these dialog buttons,
 378  * #GtkDialog will emit the "response" signal with the corresponding
 379  * response ID. If a #GtkDialog receives the "delete_event" signal, it
 380  * will emit "response" with a response ID of #GTK_RESPONSE_DELETE_EVENT.
 381  * However, destroying a dialog does not emit the "response" signal;
 382  * so be careful relying on "response" when using
 383  * the #GTK_DIALOG_DESTROY_WITH_PARENT flag. Buttons are from left to right,
 384  * so the first button in the list will be the leftmost button in the dialog.
 385  *
 386  * Here's a simple example:
 387  * <programlisting>
 388  *  GtkWidget *dialog = gtk_dialog_new_with_buttons ("My dialog",
 389  *                                                   main_app_window,
 390  *                                                   GTK_DIALOG_MODAL | GTK_DIALOG_DESTROY_WITH_PARENT,
 391  *                                                   GTK_STOCK_OK,
 392  *                                                   GTK_RESPONSE_ACCEPT,
 393  *                                                   GTK_STOCK_CANCEL,
 394  *                                                   GTK_RESPONSE_REJECT,
 395  *                                                   NULL);
 396  * </programlisting>
 397  *
 398  * Return value: a new #GtkDialog
 399  **/
 400 GtkWidget*
 401 gtk_dialog_new_with_buttons (const gchar    *title,
 402                              GtkWindow      *parent,
 403                              GtkDialogFlags  flags,
 404                              const gchar    *first_button_text,
 405                              ...)
 406 {
 407   GtkDialog *dialog;
 408   va_list args;
 409
 410   dialog = GTK_DIALOG (gtk_dialog_new_empty (title, parent, flags));
 411
 412   va_start (args, first_button_text);
 413
 414   gtk_dialog_add_buttons_valist (dialog,
 415                                  first_button_text,
 416                                  args);
 417
 418   va_end (args);
 419
 420   return GTK_WIDGET (dialog);
 421 }
 422
 423 typedef struct _ResponseData ResponseData;
 424
 425 struct _ResponseData
 426 {
 427   gint response_id;
 428 };
 429
 430 static ResponseData*
 431 get_response_data (GtkWidget *widget)
 432 {
 433   ResponseData *ad = gtk_object_get_data (GTK_OBJECT (widget),
 434                                           "gtk-dialog-response-data");
 435
 436   if (ad == NULL)
 437     {
 438       ad = g_new (ResponseData, 1);
 439
 440       gtk_object_set_data_full (GTK_OBJECT (widget),
 441                                 "gtk-dialog-response-data",
 442                                 ad,
 443                                 g_free);
 444     }
 445
 446   return ad;
 447 }
 448
 449 static void
 450 action_widget_activated (GtkWidget *widget, GtkDialog *dialog)
 451 {
 452   ResponseData *ad;
 453   gint response_id;
 454
 455   g_return_if_fail (GTK_IS_DIALOG (dialog));
 456
 457   response_id = GTK_RESPONSE_NONE;
 458
 459   ad = get_response_data (widget);
 460
 461   g_assert (ad != NULL);
 462
 463   response_id = ad->response_id;
 464
 465   gtk_dialog_response (dialog, response_id);
 466 }
 467 /**
 468  * gtk_dialog_add_action_widget:
 469  * @dialog: a #GtkDialog
 470  * @child: an activatable widget
 471  * @response_id: response ID for @child
 472  *
 473  * Adds an activatable widget to the action area of a #GtkDialog,
 474  * connecting a signal handler that will emit the "response" signal on
 475  * the dialog when the widget is activated.  The widget is appended to
 476  * the end of the dialog's action area.  If you want to add a
 477  * non-activatable widget, simply pack it into the
 478  * <literal>action_area</literal> field of the #GtkDialog struct.
 479  **/
 480 void
 481 gtk_dialog_add_action_widget  (GtkDialog *dialog,
 482                                GtkWidget *child,
 483                                gint       response_id)
 484 {
 485   ResponseData *ad;
 486   gint signal_id = 0;
 487
 488   g_return_if_fail (GTK_IS_DIALOG (dialog));
 489   g_return_if_fail (GTK_IS_WIDGET (child));
 490
 491   ad = get_response_data (child);
 492
 493   ad->response_id = response_id;
 494
 495   if (GTK_IS_BUTTON (child))
 496     {
 497       signal_id = g_signal_lookup ("clicked", GTK_TYPE_BUTTON);
 498     }
 499   else
 500     signal_id = GTK_WIDGET_GET_CLASS (child)->activate_signal != 0;
 501
 502   if (signal_id)
 503     {
 504       const gchar* name = gtk_signal_name (signal_id);
 505
 506       gtk_signal_connect_while_alive (GTK_OBJECT (child),
 507                                       name,
 508                                       GTK_SIGNAL_FUNC (action_widget_activated),
 509                                       dialog,
 510                                       GTK_OBJECT (dialog));
 511     }
 512   else
 513     g_warning ("Only 'activatable' widgets can be packed into the action area of a GtkDialog");
 514
 515   gtk_box_pack_end (GTK_BOX (dialog->action_area),
 516                     child,
 517                     FALSE, TRUE, 0);
 518
 519   if (response_id == GTK_RESPONSE_HELP)
 520     gtk_button_box_set_child_secondary (GTK_BUTTON_BOX (dialog->action_area), child, TRUE);
 521 }
 522
 523 /**
 524  * gtk_dialog_add_button:
 525  * @dialog: a #GtkDialog
 526  * @button_text: text of button, or stock ID
 527  * @response_id: response ID for the button
 528  *
 529  * Adds a button with the given text (or a stock button, if @button_text is a
 530  * stock ID) and sets things up so that clicking the button will emit the
 531  * "response" signal with the given @response_id. The button is appended to the
 532  * end of the dialog's action area. The button widget is returned, but usually
 533  * you don't need it.
 534  *
 535  * Return value: the button widget that was added
 536  **/
 537 GtkWidget*
 538 gtk_dialog_add_button (GtkDialog   *dialog,
 539                        const gchar *button_text,
 540                        gint         response_id)
 541 {
 542   GtkWidget *button;
 543
 544   g_return_val_if_fail (GTK_IS_DIALOG (dialog), NULL);
 545   g_return_val_if_fail (button_text != NULL, NULL);
 546
 547   button = gtk_button_new_from_stock (button_text);
 548
 549   GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
 550
 551   gtk_widget_show (button);
 552
 553   gtk_dialog_add_action_widget (dialog,
 554                                 button,
 555                                 response_id);
 556
 557   return button;
 558 }
 559
 560 static void
 561 gtk_dialog_add_buttons_valist(GtkDialog      *dialog,
 562                               const gchar    *first_button_text,
 563                               va_list         args)
 564 {
 565   const gchar* text;
 566   gint response_id;
 567
 568   g_return_if_fail (GTK_IS_DIALOG (dialog));
 569
 570   if (first_button_text == NULL)
 571     return;
 572
 573   text = first_button_text;
 574   response_id = va_arg (args, gint);
 575
 576   while (text != NULL)
 577     {
 578       gtk_dialog_add_button (dialog, text, response_id);
 579
 580       text = va_arg (args, gchar*);
 581       if (text == NULL)
 582         break;
 583       response_id = va_arg (args, int);
 584     }
 585 }
 586
 587 /**
 588  * gtk_dialog_add_buttons:
 589  * @dialog: a #GtkDialog
 590  * @first_button_text: button text or stock ID
 591  * @Varargs: response ID for first button, then more text-response_id pairs
 592  *
 593  * Adds more buttons, same as calling gtk_dialog_add_button()
 594  * repeatedly.  The variable argument list should be %NULL-terminated
 595  * as with gtk_dialog_new_with_buttons(). Each button must have both
 596  * text and response ID.
 597  **/
 598 void
 599 gtk_dialog_add_buttons (GtkDialog   *dialog,
 600                         const gchar *first_button_text,
 601                         ...)
 602 {
 603   va_list args;
 604
 605   va_start (args, first_button_text);
 606
 607   gtk_dialog_add_buttons_valist (dialog,
 608                                  first_button_text,
 609                                  args);
 610
 611   va_end (args);
 612 }
 613
 614 /**
 615  * gtk_dialog_set_response_sensitive:
 616  * @dialog: a #GtkDialog
 617  * @response_id: a response ID
 618  * @setting: %TRUE for sensitive
 619  *
 620  * Calls gtk_widget_set_sensitive (widget, @setting) for each
 621  * widget in the dialog's action area with the given @response_id.
 622  * A convenient way to sensitize/desensitize dialog buttons.
 623  **/
 624 void
 625 gtk_dialog_set_response_sensitive (GtkDialog *dialog,
 626                                    gint       response_id,
 627                                    gboolean   setting)
 628 {
 629   GList *children;
 630   GList *tmp_list;
 631
 632   g_return_if_fail (GTK_IS_DIALOG (dialog));
 633
 634   children = gtk_container_get_children (GTK_CONTAINER (dialog->action_area));
 635
 636   tmp_list = children;
 637   while (tmp_list != NULL)
 638     {
 639       GtkWidget *widget = tmp_list->data;
 640       ResponseData *rd = g_object_get_data (G_OBJECT (widget),
 641                                             "gtk-dialog-response-data");
 642
 643       if (rd && rd->response_id == response_id)
 644         gtk_widget_set_sensitive (widget, setting);
 645
 646       tmp_list = g_list_next (tmp_list);
 647     }
 648
 649   g_list_free (children);
 650 }
 651
 652 /**
 653  * gtk_dialog_set_default_response:
 654  * @dialog: a #GtkDialog
 655  * @response_id: a response ID
 656  *
 657  * Sets the last widget in the dialog's action area with the given @response_id
 658  * as the default widget for the dialog. Pressing "Enter" normally activates
 659  * the default widget.
 660  **/
 661 void
 662 gtk_dialog_set_default_response (GtkDialog *dialog,
 663                                  gint       response_id)
 664 {
 665   GList *children;
 666   GList *tmp_list;
 667
 668   g_return_if_fail (GTK_IS_DIALOG (dialog));
 669
 670   children = gtk_container_get_children (GTK_CONTAINER (dialog->action_area));
 671
 672   tmp_list = children;
 673   while (tmp_list != NULL)
 674     {
 675       GtkWidget *widget = tmp_list->data;
 676       ResponseData *rd = g_object_get_data (G_OBJECT (widget),
 677                                             "gtk-dialog-response-data");
 678
 679       if (rd && rd->response_id == response_id)
 680         {
 681           gtk_widget_grab_default (widget);
 682
 683           if (!GTK_WINDOW (dialog)->focus_widget)
 684             gtk_widget_grab_focus (widget);
 685         }
 686
 687       tmp_list = g_list_next (tmp_list);
 688     }
 689
 690   g_list_free (children);
 691 }
 692
 693 /**
 694  * gtk_dialog_set_has_separator:
 695  * @dialog: a #GtkDialog
 696  * @setting: %TRUE to have a separator
 697  *
 698  * Sets whether the dialog has a separator above the buttons.
 699  * %TRUE by default.
 700  **/
 701 void
 702 gtk_dialog_set_has_separator (GtkDialog *dialog,
 703                               gboolean   setting)
 704 {
 705   g_return_if_fail (GTK_IS_DIALOG (dialog));
 706
 707   /* this might fail if we get called before _init() somehow */
 708   g_assert (dialog->vbox != NULL);
 709
 710   if (setting && dialog->separator == NULL)
 711     {
 712       dialog->separator = gtk_hseparator_new ();
 713       gtk_box_pack_end (GTK_BOX (dialog->vbox), dialog->separator, FALSE, TRUE, 0);
 714
 715       /* The app programmer could screw this up, but, their own fault.
 716        * Moves the separator just above the action area.
 717        */
 718       gtk_box_reorder_child (GTK_BOX (dialog->vbox), dialog->separator, 1);
 719       gtk_widget_show (dialog->separator);
 720     }
 721   else if (!setting && dialog->separator != NULL)
 722     {
 723       gtk_widget_destroy (dialog->separator);
 724       dialog->separator = NULL;
 725     }
 726
 727   g_object_notify (G_OBJECT (dialog), "has_separator");
 728 }
 729
 730 /**
 731  * gtk_dialog_get_has_separator:
 732  * @dialog: a #GtkDialog
 733  *
 734  * Accessor for whether the dialog has a separator.
 735  *
 736  * Return value: %TRUE if the dialog has a separator
 737  **/
 738 gboolean
 739 gtk_dialog_get_has_separator (GtkDialog *dialog)
 740 {
 741   g_return_val_if_fail (GTK_IS_DIALOG (dialog), FALSE);
 742
 743   return dialog->separator != NULL;
 744 }
 745
 746 /**
 747  * gtk_dialog_response:
 748  * @dialog: a #GtkDialog
 749  * @response_id: response ID
 750  *
 751  * Emits the "response" signal with the given response ID. Used to
 752  * indicate that the user has responded to the dialog in some way;
 753  * typically either you or gtk_dialog_run() will be monitoring the
 754  * "response" signal and take appropriate action.
 755  **/
 756 void
 757 gtk_dialog_response (GtkDialog *dialog,
 758                      gint       response_id)
 759 {
 760   g_return_if_fail (GTK_IS_DIALOG (dialog));
 761
 762   gtk_signal_emit (GTK_OBJECT (dialog),
 763                    dialog_signals[RESPONSE],
 764                    response_id);
 765 }
 766
 767 typedef struct
 768 {
 769   GtkDialog *dialog;
 770   gint response_id;
 771   GMainLoop *loop;
 772 } RunInfo;
 773
 774 static void
 775 shutdown_loop (RunInfo *ri)
 776 {
 777   if (g_main_loop_is_running (ri->loop))
 778     g_main_loop_quit (ri->loop);
 779 }
 780
 781 static void
 782 run_unmap_handler (GtkDialog *dialog, gpointer data)
 783 {
 784   RunInfo *ri = data;
 785
 786   shutdown_loop (ri);
 787 }
 788
 789 static void
 790 run_response_handler (GtkDialog *dialog,
 791                       gint response_id,
 792                       gpointer data)
 793 {
 794   RunInfo *ri;
 795
 796   ri = data;
 797
 798   ri->response_id = response_id;
 799
 800   shutdown_loop (ri);
 801 }
 802
 803 static gint
 804 run_delete_handler (GtkDialog *dialog,
 805                     GdkEventAny *event,
 806                     gpointer data)
 807 {
 808   RunInfo *ri = data;
 809
 810   shutdown_loop (ri);
 811
 812   return TRUE; /* Do not destroy */
 813 }
 814
 815 /**
 816  * gtk_dialog_run:
 817  * @dialog: a #GtkDialog
 818  *
 819  * Blocks in a recursive main loop until the @dialog either emits the
 820  * response signal, or is destroyed. If the dialog is destroyed,
 821  * gtk_dialog_run() returns #GTK_RESPONSE_NONE. Otherwise, it returns
 822  * the response ID from the "response" signal emission. Before
 823  * entering the recursive main loop, gtk_dialog_run() calls
 824  * gtk_widget_show() on the dialog for you. Note that you still
 825  * need to show any children of the dialog yourself.
 826  *
 827  * During gtk_dialog_run(), the default behavior of "delete_event" is
 828  * disabled; if the dialog receives "delete_event", it will not be
 829  * destroyed as windows usually are, and gtk_dialog_run() will return
 830  * #GTK_RESPONSE_DELETE_EVENT. Also, during gtk_dialog_run() the dialog will be
 831  * modal. You can force gtk_dialog_run() to return at any time by
 832  * calling gtk_dialog_response() to emit the "response"
 833  * signal. Destroying the dialog during gtk_dialog_run() is a very bad
 834  * idea, because your post-run code won't know whether the dialog was
 835  * destroyed or not.
 836  *
 837  * After gtk_dialog_run() returns, you are responsible for hiding or
 838  * destroying the dialog if you wish to do so.
 839  *
 840  * Typical usage of this function might be:
 841  * <programlisting>
 842  *   gint result = gtk_dialog_run (GTK_DIALOG (dialog));
 843  *   switch (result)
 844  *     {
 845  *       case GTK_RESPONSE_ACCEPT:
 846  *          do_application_specific_something ();
 847  *          break;
 848  *       default:
 849  *          do_nothing_since_dialog_was_cancelled ();
 850  *          break;
 851  *     }
 852  *   gtk_widget_destroy (dialog);
 853  * </programlisting>
 854  *
 855  * Return value: response ID
 856  **/
 857 gint
 858 gtk_dialog_run (GtkDialog *dialog)
 859 {
 860   RunInfo ri = { NULL, GTK_RESPONSE_NONE, NULL };
 861   gboolean was_modal;
 862   guint response_handler;
 863   guint destroy_handler;
 864   guint delete_handler;
 865
 866   g_return_val_if_fail (GTK_IS_DIALOG (dialog), -1);
 867
 868   gtk_object_ref (GTK_OBJECT (dialog));
 869
 870   if (!GTK_WIDGET_VISIBLE (dialog))
 871     gtk_widget_show (GTK_WIDGET (dialog));
 872
 873   was_modal = GTK_WINDOW (dialog)->modal;
 874   if (!was_modal)
 875     gtk_window_set_modal (GTK_WINDOW (dialog), TRUE);
 876
 877   response_handler =
 878     gtk_signal_connect (GTK_OBJECT (dialog),
 879                         "response",
 880                         GTK_SIGNAL_FUNC (run_response_handler),
 881                         &ri);
 882
 883   destroy_handler =
 884     gtk_signal_connect (GTK_OBJECT (dialog),
 885                         "unmap",
 886                         GTK_SIGNAL_FUNC (run_unmap_handler),
 887                         &ri);
 888
 889   delete_handler =
 890     gtk_signal_connect (GTK_OBJECT (dialog),
 891                         "delete_event",
 892                         GTK_SIGNAL_FUNC (run_delete_handler),
 893                         &ri);
 894
 895   ri.loop = g_main_new (FALSE);
 896
 897   GDK_THREADS_LEAVE ();
 898   g_main_loop_run (ri.loop);
 899   GDK_THREADS_ENTER ();
 900
 901   g_main_loop_unref (ri.loop);
 902
 903   ri.loop = NULL;
 904
 905   if (!GTK_OBJECT_DESTROYED (dialog))
 906     {
 907       if (!was_modal)
 908         gtk_window_set_modal (GTK_WINDOW(dialog), FALSE);
 909
 910       gtk_signal_disconnect (GTK_OBJECT (dialog), destroy_handler);
 911       gtk_signal_disconnect (GTK_OBJECT (dialog), response_handler);
 912       gtk_signal_disconnect (GTK_OBJECT (dialog), delete_handler);
 913     }
 914
 915   gtk_object_unref (GTK_OBJECT (dialog));
 916
 917   return ri.response_id;
 918 }
 919
 920
 921
 922