X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fgui%2Fweight-cases-dialog.c;h=1a637f3c660d0cbbb5ff0a9548ad4b567c3d9333;hb=1d5a97ba2afec23855a8294ff2814ab052f6777a;hp=50294de7fb72e039d1eab73760c583378a9d86c5;hpb=09a1109ddc398f36fe720208e1d38053850cbd2a;p=pspp-builds.git diff --git a/src/ui/gui/weight-cases-dialog.c b/src/ui/gui/weight-cases-dialog.c index 50294de7..1a637f3c 100644 --- a/src/ui/gui/weight-cases-dialog.c +++ b/src/ui/gui/weight-cases-dialog.c @@ -17,111 +17,195 @@ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ - #include -#include "psppire-var-select.h" -#include -#include "helper.h" -#include - -#include "psppire-var-store.h" #include "weight-cases-dialog.h" - +#include "psppire-selector.h" #include "psppire-dialog.h" +#include "helper.h" +#include "data-editor.h" +#include "dict-display.h" +#include +#include "syntax-editor.h" + +#include +#include +#include #define _(msgid) gettext (msgid) #define N_(msgid) msgid + +/* FIXME: These shouldn't be here */ +#include +#include "psppire-var-store.h" + static void -refresh_var_select (PsppireVarSelect *vs) +on_select (PsppireSelector *sel, gpointer data) { - struct variable *weight; + GtkRadioButton *radiobutton2 = data; - psppire_var_select_deselect_all (vs); + gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (radiobutton2), TRUE); +} - weight = psppire_dict_get_weight_variable (vs->dict); +static void +on_deselect (PsppireSelector *sel, gpointer data) +{ + GtkRadioButton *radiobutton1 = data; - if ( weight ) - psppire_var_select_set_variable (vs, weight); + gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (radiobutton1), TRUE); } static void -on_refresh (GtkWidget *dialog, gpointer data) +on_toggle (GtkToggleButton *button, gpointer data) { - refresh_var_select (data); + GtkEntry *entry = data; + if ( gtk_toggle_button_get_active (button)) + gtk_entry_set_text (entry, ""); } +struct weight_cases_dialog +{ + PsppireDict *dict; + GtkEntry *entry; + GtkLabel *status; + GtkToggleButton *off; + GtkToggleButton *on; +}; static void -on_radiobutton_toggle (GtkToggleButton *button, gpointer data) +refresh (PsppireDialog *dialog, const struct weight_cases_dialog *wcd) { - PsppireVarSelect *vs = data; - if ( gtk_toggle_button_get_active (button) ) + const struct variable *var = dict_get_weight (wcd->dict->dict); + + if ( ! var ) + { + gtk_entry_set_text (wcd->entry, ""); + gtk_label_set_text (wcd->status, _("Do not weight cases")); + gtk_toggle_button_set_active (wcd->off, TRUE); + } + else { - psppire_var_select_deselect_all (vs); + gchar *text = + g_strdup_printf (_("Weight cases by %s"), var_get_name (var)); + + gtk_entry_set_text (wcd->entry, var_get_name (var)); + gtk_label_set_text (wcd->status, text); + + g_free (text); + gtk_toggle_button_set_active (wcd->on, TRUE); } + + g_signal_emit_by_name (wcd->entry, "activate"); } -/* Callback for when new variable is selected. - IDX is the dict index of the variable selected. - Updates the label and toggle buttons in the dialog box - to reflect this new selection. */ -static void -select_var_callback (PsppireVarSelect *vs, gint idx, gpointer data) +static gchar * generate_syntax (const struct weight_cases_dialog *wcd); + + +/* Pops up the Weight Cases dialog box */ +void +weight_cases_dialog (GObject *o, gpointer data) { - GladeXML * xml = data; + gint response; + struct data_editor *de = data; + struct weight_cases_dialog wcd; - GtkWidget *label = get_widget_assert (xml, "weight-status-label"); + GladeXML *xml = XML_NEW ("psppire.glade"); - GtkWidget *radiobutton2 = get_widget_assert (xml, "radiobutton2"); + GtkWidget *dialog = get_widget_assert (xml, "weight-cases-dialog"); + GtkWidget *source = get_widget_assert (xml, "weight-cases-treeview"); + GtkWidget *entry = get_widget_assert (xml, "weight-cases-entry"); + GtkWidget *selector = get_widget_assert (xml, "weight-cases-selector"); + GtkWidget *radiobutton1 = get_widget_assert (xml, + "weight-cases-radiobutton1"); + GtkWidget *radiobutton2 = get_widget_assert (xml, "radiobutton2"); + GtkWidget *status = get_widget_assert (xml, "weight-status-label"); - struct variable *var = psppire_dict_get_variable (vs->dict, idx); + GtkSheet *var_sheet = + GTK_SHEET (get_widget_assert (de->xml, "variable_sheet")); - gtk_label_set_text (GTK_LABEL (label), var_get_name(var)); + PsppireVarStore *vs = PSPPIRE_VAR_STORE (gtk_sheet_get_model (var_sheet)); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (radiobutton2), TRUE); -} + gtk_window_set_transient_for (GTK_WINDOW (dialog), de->parent.window); + g_signal_connect (radiobutton1, "toggled", G_CALLBACK (on_toggle), entry); + g_signal_connect (selector, "selected", G_CALLBACK (on_select), + radiobutton2); + g_signal_connect (selector, "de-selected", G_CALLBACK (on_deselect), + radiobutton1); -static void -deselect_all (PsppireVarSelect *vs, gpointer data) -{ - GladeXML * xml = data; + attach_dictionary_to_treeview (GTK_TREE_VIEW (source), + vs->dict, + GTK_SELECTION_SINGLE, + var_is_numeric + ); - GtkWidget *label = get_widget_assert (xml, "weight-status-label"); + psppire_selector_set_subjects (PSPPIRE_SELECTOR (selector), + source, + entry, + insert_source_row_into_entry, + is_currently_in_entry + ); - GtkWidget *radiobutton1 = get_widget_assert (xml, "radiobutton1"); - gtk_label_set_text (GTK_LABEL (label), _("Do not weight cases")); + wcd.dict = vs->dict; + wcd.entry = GTK_ENTRY (entry); + wcd.status = GTK_LABEL (status); + wcd.off = GTK_TOGGLE_BUTTON (radiobutton1); + wcd.on = GTK_TOGGLE_BUTTON (radiobutton2); - gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (radiobutton1), TRUE); -} + g_signal_connect (dialog, "refresh", G_CALLBACK (refresh), &wcd); + response = psppire_dialog_run (PSPPIRE_DIALOG (dialog)); + g_object_unref (xml); -PsppireDialog * -create_weight_dialog (PsppireVarSelect *select, GladeXML *xml) -{ - GtkWidget *dialog = get_widget_assert (xml, "weight-cases-dialog"); - GtkWidget *radiobutton1 = get_widget_assert (xml, "radiobutton1"); + switch (response) + { + case GTK_RESPONSE_OK: + { + gchar *syntax = generate_syntax (&wcd); + struct getl_interface *sss = create_syntax_string_source (syntax); + execute_syntax (sss); + + g_free (syntax); + } + break; + case PSPPIRE_RESPONSE_PASTE: + { + gchar *syntax = generate_syntax (&wcd); + + struct syntax_editor *se = + (struct syntax_editor *) window_create (WINDOW_SYNTAX, NULL); + + gtk_text_buffer_insert_at_cursor (se->buffer, syntax, -1); + + g_free (syntax); + } + break; + default: + break; + } +} - g_signal_connect (dialog, "refresh", G_CALLBACK (on_refresh), select); - g_signal_connect (select, "variable-selected", - G_CALLBACK (select_var_callback), xml); +static gchar * +generate_syntax (const struct weight_cases_dialog *wcd) +{ + gchar *syntax; - g_signal_connect (select, "deselect-all", - G_CALLBACK (deselect_all), xml); + const gchar *text = gtk_entry_get_text (wcd->entry); - g_signal_connect (radiobutton1, "toggled", - G_CALLBACK (on_radiobutton_toggle), - select); + struct variable *var = psppire_dict_lookup_var (wcd->dict, text); - refresh_var_select (select); + if ( var == NULL) + syntax = g_strdup ("WEIGHT OFF."); + else + syntax = g_strdup_printf ("WEIGHT BY %s.\n", + var_get_name (var)); - return PSPPIRE_DIALOG (dialog); + return syntax; }