pintos-os.org Git - pspp/blob - src/ui/gui/psppire-dialog-action.c

   1 /* PSPPIRE - a graphical user interface for PSPP.
   2    Copyright (C) 2012  Free Software Foundation
   3
   4    This program is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation, either version 3 of the License, or
   7    (at your option) any later version.
   8
   9    This program 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
  12    GNU General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program.  If not, see <http://www.gnu.org/licenses/>. */
  16
  17
  18 #include <config.h>
  19
  20 #include "psppire-dialog-action.h"
  21 #include "psppire-dialog.h"
  22 #include "executor.h"
  23 #include "helper.h"
  24 #include "psppire-data-window.h"
  25
  26 static void psppire_dialog_action_init            (PsppireDialogAction      *act);
  27 static void psppire_dialog_action_class_init      (PsppireDialogActionClass *class);
  28
  29 G_DEFINE_ABSTRACT_TYPE (PsppireDialogAction, psppire_dialog_action, GTK_TYPE_ACTION);
  30
  31 /* Properties */
  32 enum
  33 {
  34   PROP_0,
  35   PROP_MANAGER,
  36   PROP_TOPLEVEL,
  37 };
  38
  39 static void
  40 psppire_dialog_action_set_property (GObject         *object,
  41                                guint            prop_id,
  42                                const GValue    *value,
  43                                GParamSpec      *pspec)
  44 {
  45   PsppireDialogAction *act = PSPPIRE_DIALOG_ACTION (object);
  46
  47   switch (prop_id)
  48     {
  49     case PROP_MANAGER:
  50       {
  51
  52         GObject *p = g_value_get_object (value);
  53         act->uim = GTK_UI_MANAGER (p);
  54       }
  55       break;
  56     default:
  57       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
  58       break;
  59     };
  60 }
  61
  62
  63 static void
  64 psppire_dialog_action_get_property (GObject    *object,
  65                                guint            prop_id,
  66                                GValue          *value,
  67                                GParamSpec      *pspec)
  68 {
  69   PsppireDialogAction *dialog_action = PSPPIRE_DIALOG_ACTION (object);
  70
  71   switch (prop_id)
  72     {
  73     case PROP_MANAGER:
  74       g_value_take_object (value, dialog_action->uim);
  75       break;
  76   case PROP_TOPLEVEL:
  77       g_value_take_object (value, dialog_action->toplevel);
  78       break;
  79     default:
  80       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
  81       break;
  82     };
  83 }
  84
  85
  86 static void
  87 set_toplevel (PsppireDialogAction *act)
  88 {
  89   if (act->toplevel)
  90     return;
  91
  92   GSList *sl = gtk_ui_manager_get_toplevels (act->uim, GTK_UI_MANAGER_MENUBAR | GTK_UI_MANAGER_TOOLBAR);
  93   g_return_if_fail (sl);
  94
  95   act->toplevel = gtk_widget_get_toplevel (GTK_WIDGET (sl->data));
  96   g_slist_free (sl);
  97 }
  98
  99 static void
 100 on_destroy_dataset (GObject *w)
 101 {
 102   GHashTable *t = g_object_get_data (w, "thing-table");
 103   GSList *dl = g_object_get_data (w, "widget-list");
 104
 105   g_slist_free_full (dl, (GDestroyNotify) gtk_widget_destroy);
 106   g_hash_table_unref (t);
 107 }
 108
 109 GHashTable *
 110 psppire_dialog_action_get_pointer (PsppireDialogAction *act)
 111 {
 112   set_toplevel (act);
 113
 114   GHashTable *thing = g_object_get_data (G_OBJECT (act->toplevel), "thing-table");
 115   if (thing == NULL)
 116     {
 117       thing = g_hash_table_new_full (g_direct_hash, g_direct_equal, 0, g_object_unref);
 118       g_object_set_data (G_OBJECT (act->toplevel), "thing-table", thing);
 119       g_object_set_data (G_OBJECT (act->toplevel), "widget-list", NULL);
 120       g_signal_connect (act->toplevel, "destroy", G_CALLBACK (on_destroy_dataset), NULL);
 121     }
 122
 123   return thing;
 124 }
 125
 126 static void
 127 psppire_dialog_action_activate (PsppireDialogAction *act)
 128 {
 129   gint response;
 130
 131   PsppireDialogActionClass *class = PSPPIRE_DIALOG_ACTION_GET_CLASS (act);
 132
 133   gboolean first_time = ! act->toplevel;
 134
 135   set_toplevel (act);
 136
 137   act->dict = PSPPIRE_DATA_WINDOW(act->toplevel)->dict;
 138
 139   g_object_set (act->source, "model", act->dict, NULL);
 140
 141   GSList *wl = g_object_get_data (G_OBJECT (act->toplevel), "widget-list");
 142   wl = g_slist_prepend (wl, act->dialog);
 143   g_object_set_data (G_OBJECT (act->toplevel), "widget-list", wl);
 144
 145   gtk_window_set_transient_for (GTK_WINDOW (act->dialog), GTK_WINDOW (act->toplevel));
 146
 147   if (GTK_ACTION_CLASS (psppire_dialog_action_parent_class)->activate)
 148     GTK_ACTION_CLASS (psppire_dialog_action_parent_class)->activate ( GTK_ACTION (act));
 149
 150   gtk_widget_grab_focus (act->source);
 151
 152   if (first_time)
 153     psppire_dialog_reload (PSPPIRE_DIALOG (act->dialog));
 154
 155   response = psppire_dialog_run (PSPPIRE_DIALOG (act->dialog));
 156
 157   if ( class->generate_syntax )
 158     {
 159       switch (response)
 160         {
 161         case GTK_RESPONSE_OK:
 162           g_free (execute_syntax_string (PSPPIRE_DATA_WINDOW (act->toplevel),
 163                                          class->generate_syntax (act)));
 164           break;
 165         case PSPPIRE_RESPONSE_PASTE:
 166           g_free (paste_syntax_to_window (class->generate_syntax (act)));
 167           break;
 168         default:
 169           break;
 170         }
 171     }
 172 }
 173
 174 static void
 175 psppire_dialog_action_class_init (PsppireDialogActionClass *class)
 176 {
 177   GObjectClass *object_class = G_OBJECT_CLASS (class);
 178
 179   GParamSpec *manager_spec =
 180     g_param_spec_object ("manager",
 181                          "Manager",
 182                          "The GtkUIManager which created this object",
 183                          GTK_TYPE_UI_MANAGER,
 184                          G_PARAM_READWRITE);
 185
 186   GParamSpec *toplevel_spec =
 187     g_param_spec_object ("top-level",
 188                          "Top Level",
 189                          "The top level widget to which this dialog action belongs",
 190                          GTK_TYPE_WINDOW,
 191                          G_PARAM_READABLE);
 192
 193   object_class->set_property = psppire_dialog_action_set_property;
 194   object_class->get_property = psppire_dialog_action_get_property;
 195
 196   class->generate_syntax = NULL;
 197
 198   class->activate = psppire_dialog_action_activate;
 199
 200   g_object_class_install_property (object_class,
 201                                    PROP_MANAGER,
 202                                    manager_spec);
 203
 204   g_object_class_install_property (object_class,
 205                                    PROP_TOPLEVEL,
 206                                    toplevel_spec);
 207 }
 208
 209
 210 static void
 211 psppire_dialog_action_init (PsppireDialogAction *act)
 212 {
 213   act->toplevel = NULL;
 214   act->dict = NULL;
 215 }
 216
 217
 218 void
 219 psppire_dialog_action_set_valid_predicate (PsppireDialogAction *act,
 220                                            ContentsAreValid dialog_state_valid)
 221 {
 222   psppire_dialog_set_valid_predicate (PSPPIRE_DIALOG (act->dialog),
 223                                       dialog_state_valid, act);
 224 }
 225
 226 void
 227 psppire_dialog_action_set_refresh (PsppireDialogAction *pda,
 228                                    PsppireDialogActionRefresh refresh)
 229 {
 230   g_signal_connect_swapped (pda->dialog, "refresh", G_CALLBACK (refresh),  pda);
 231 }
 232
 233
 234 void
 235 psppire_dialog_action_set_activation (gpointer class, activation activate)
 236 {
 237   GTK_ACTION_CLASS (class)->activate = activate;
 238 }
 239