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

   1 /* PSPPIRE - a graphical user interface for PSPP.
   2    Copyright (C) 2015  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-histogram.h"
  21 #include "psppire-value-entry.h"
  22
  23 #include "dialog-common.h"
  24 #include <ui/syntax-gen.h>
  25 #include "psppire-var-view.h"
  26
  27 #include "psppire-dialog.h"
  28 #include "builder-wrapper.h"
  29
  30 #include "psppire-dict.h"
  31 #include "libpspp/str.h"
  32
  33 static void
  34 psppire_dialog_action_histogram_class_init (PsppireDialogActionHistogramClass *class);
  35
  36 G_DEFINE_TYPE (PsppireDialogActionHistogram, psppire_dialog_action_histogram, PSPPIRE_TYPE_DIALOG_ACTION);
  37
  38 static gboolean
  39 dialog_state_valid (gpointer data)
  40 {
  41   PsppireDialogActionHistogram *rd = data;
  42
  43   const gchar *var_name = gtk_entry_get_text (GTK_ENTRY (rd->variable));
  44   const struct variable *var = psppire_dict_lookup_var (PSPPIRE_DIALOG_ACTION (rd)->dict, var_name);
  45
  46   if ( var == NULL)
  47     return FALSE;
  48
  49
  50   return TRUE;
  51 }
  52
  53 static void
  54 refresh (PsppireDialogAction *rd_)
  55 {
  56   PsppireDialogActionHistogram *rd = PSPPIRE_DIALOG_ACTION_HISTOGRAM (rd_);
  57
  58   gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (rd->curve), FALSE);
  59   gtk_entry_set_text (GTK_ENTRY (rd->variable), "");
  60 }
  61
  62 static void
  63 psppire_dialog_action_histogram_activate (GtkAction *a)
  64 {
  65   PsppireDialogActionHistogram *act = PSPPIRE_DIALOG_ACTION_HISTOGRAM (a);
  66   PsppireDialogAction *pda = PSPPIRE_DIALOG_ACTION (a);
  67
  68   GtkBuilder *xml = builder_new ("histogram.ui");
  69   pda->dialog = get_widget_assert (xml, "histogram-dialog");
  70   pda->source = get_widget_assert (xml, "dict-view");
  71
  72   act->variable = get_widget_assert (xml, "entry1");
  73   act->curve = get_widget_assert (xml, "curve");
  74
  75   g_object_unref (xml);
  76
  77   psppire_dialog_action_set_refresh (pda, refresh);
  78
  79   psppire_dialog_action_set_valid_predicate (pda,
  80                                         dialog_state_valid);
  81
  82   if (PSPPIRE_DIALOG_ACTION_CLASS (psppire_dialog_action_histogram_parent_class)->activate)
  83     PSPPIRE_DIALOG_ACTION_CLASS (psppire_dialog_action_histogram_parent_class)->activate (pda);
  84 }
  85
  86
  87
  88 static char *
  89 generate_syntax (PsppireDialogAction *a)
  90 {
  91   PsppireDialogActionHistogram *rd = PSPPIRE_DIALOG_ACTION_HISTOGRAM (a);
  92   gchar *text;
  93   const gchar *var_name = gtk_entry_get_text (GTK_ENTRY (rd->variable));
  94   GString *string = g_string_new ("GRAPH /HISTOGRAM ");
  95
  96   if (gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (rd->curve)))
  97     {
  98       g_string_append (string, "(NORMAL)");
  99     }
 100
 101   g_string_append (string, " = ");
 102   g_string_append (string, var_name);
 103
 104   g_string_append (string, ".\n");
 105
 106   text = string->str;
 107
 108   g_string_free (string, FALSE);
 109
 110   return text;
 111 }
 112
 113 static void
 114 psppire_dialog_action_histogram_class_init (PsppireDialogActionHistogramClass *class)
 115 {
 116   GtkActionClass *action_class = GTK_ACTION_CLASS (class);
 117
 118   action_class->activate = psppire_dialog_action_histogram_activate;
 119
 120   PSPPIRE_DIALOG_ACTION_CLASS (class)->generate_syntax = generate_syntax;
 121 }
 122
 123
 124 static void
 125 psppire_dialog_action_histogram_init (PsppireDialogActionHistogram *act)
 126 {
 127 }
 128