1 /* PSPPIRE - a graphical user interface for PSPP.
2 Copyright (C) 2015 Free Software Foundation
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.
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.
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/>. */
19 #include "psppire-dialog-action-histogram.h"
20 #include "psppire-value-entry.h"
22 #include "dialog-common.h"
23 #include <ui/syntax-gen.h>
24 #include "psppire-var-view.h"
26 #include "psppire-dialog.h"
27 #include "builder-wrapper.h"
29 #include "psppire-dict.h"
30 #include "libpspp/str.h"
33 psppire_dialog_action_histogram_class_init (PsppireDialogActionHistogramClass *class);
35 G_DEFINE_TYPE (PsppireDialogActionHistogram, psppire_dialog_action_histogram, PSPPIRE_TYPE_DIALOG_ACTION);
38 dialog_state_valid (gpointer data)
40 PsppireDialogActionHistogram *rd = data;
42 const gchar *var_name = gtk_entry_get_text (GTK_ENTRY (rd->variable));
43 const struct variable *var = psppire_dict_lookup_var (PSPPIRE_DIALOG_ACTION (rd)->dict, var_name);
53 refresh (PsppireDialogAction *rd_)
55 PsppireDialogActionHistogram *rd = PSPPIRE_DIALOG_ACTION_HISTOGRAM (rd_);
57 gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (rd->curve), FALSE);
58 gtk_entry_set_text (GTK_ENTRY (rd->variable), "");
62 psppire_dialog_action_histogram_activate (PsppireDialogAction *a)
64 PsppireDialogActionHistogram *act = PSPPIRE_DIALOG_ACTION_HISTOGRAM (a);
65 PsppireDialogAction *pda = PSPPIRE_DIALOG_ACTION (a);
67 GHashTable *thing = psppire_dialog_action_get_hash_table (pda);
68 GtkBuilder *xml = g_hash_table_lookup (thing, a);
71 xml = builder_new ("histogram.ui");
72 g_hash_table_insert (thing, a, xml);
75 pda->dialog = get_widget_assert (xml, "histogram-dialog");
76 pda->source = get_widget_assert (xml, "dict-view");
78 act->variable = get_widget_assert (xml, "entry1");
79 act->curve = get_widget_assert (xml, "curve");
81 psppire_dialog_action_set_refresh (pda, refresh);
83 psppire_dialog_action_set_valid_predicate (pda,
91 generate_syntax (const PsppireDialogAction *a)
93 PsppireDialogActionHistogram *rd = PSPPIRE_DIALOG_ACTION_HISTOGRAM (a);
95 const gchar *var_name = gtk_entry_get_text (GTK_ENTRY (rd->variable));
96 GString *string = g_string_new ("GRAPH /HISTOGRAM ");
98 if (gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (rd->curve)))
100 g_string_append (string, "(NORMAL)");
103 g_string_append (string, " = ");
104 g_string_append (string, var_name);
106 g_string_append (string, ".\n");
110 g_string_free (string, FALSE);
116 psppire_dialog_action_histogram_class_init (PsppireDialogActionHistogramClass *class)
118 psppire_dialog_action_set_activation (class, psppire_dialog_action_histogram_activate);
120 PSPPIRE_DIALOG_ACTION_CLASS (class)->generate_syntax = generate_syntax;
125 psppire_dialog_action_histogram_init (PsppireDialogActionHistogram *act)