X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fgui%2Fpsppire-data-editor.c;h=92250255f501eea0316a023dc44709d7309961c7;hb=38c2638eed90f33225870563c4be183097e4155a;hp=2e1dee8954aa5a59dd7d3707d19c96fcecd04eb9;hpb=ddd7c113f3e50c8d87f6a677856799d05a1f40c7;p=pspp-builds.git diff --git a/src/ui/gui/psppire-data-editor.c b/src/ui/gui/psppire-data-editor.c index 2e1dee89..92250255 100644 --- a/src/ui/gui/psppire-data-editor.c +++ b/src/ui/gui/psppire-data-editor.c @@ -23,6 +23,7 @@ #include #include "psppire-data-store.h" +#include #include "helper.h" #include @@ -107,8 +108,12 @@ psppire_data_editor_finalize (GObject *obj) -static void popup_variable_menu (GtkSheet *sheet, gint column, - GdkEventButton *event, gpointer data); +static void popup_variable_column_menu (GtkSheet *sheet, gint column, + GdkEventButton *event, gpointer data); + +static void popup_variable_row_menu (GtkSheet *sheet, gint row, + GdkEventButton *event, gpointer data); + static void popup_cases_menu (GtkSheet *sheet, gint row, GdkEventButton *event, gpointer data); @@ -116,26 +121,32 @@ static void popup_cases_menu (GtkSheet *sheet, gint row, + /* Callback which occurs when the data sheet's column title is double clicked */ static gboolean on_data_column_clicked (PsppireDataEditor *de, gint col, gpointer data) { - + GtkSheetRange visible_range; gint current_row, current_column; - gtk_notebook_set_current_page (GTK_NOTEBOOK (de), PSPPIRE_DATA_EDITOR_VARIABLE_VIEW); + gtk_notebook_set_current_page (GTK_NOTEBOOK (de), + PSPPIRE_DATA_EDITOR_VARIABLE_VIEW); gtk_sheet_get_active_cell (GTK_SHEET (de->var_sheet), ¤t_row, ¤t_column); gtk_sheet_set_active_cell (GTK_SHEET (de->var_sheet), col, current_column); - return FALSE; -} + gtk_sheet_get_visible_range (GTK_SHEET (de->var_sheet), &visible_range); + + if ( col < visible_range.row0 || col > visible_range.rowi) + gtk_sheet_moveto (GTK_SHEET (de->var_sheet), col, current_column, 0.5, 0.5); + return FALSE; +} /* Callback which occurs when the var sheet's row title @@ -157,10 +168,7 @@ on_var_row_clicked (PsppireDataEditor *de, gint row, gpointer data) gtk_sheet_get_visible_range (GTK_SHEET (de->data_sheet[0]), &visible_range); if ( row < visible_range.col0 || row > visible_range.coli) - { - gtk_sheet_moveto (GTK_SHEET (de->data_sheet[0]), - -1, row, 0, 0); - } + gtk_sheet_moveto (GTK_SHEET (de->data_sheet[0]), -1, row, 0.5, 0.5); return FALSE; } @@ -189,8 +197,9 @@ enum PROP_0, PROP_DATA_STORE, PROP_VAR_STORE, - PROP_COLUMN_MENU, - PROP_ROW_MENU, + PROP_VS_ROW_MENU, + PROP_DS_COLUMN_MENU, + PROP_DS_ROW_MENU, PROP_VALUE_LABELS, PROP_CURRENT_CASE, PROP_CURRENT_VAR, @@ -199,77 +208,155 @@ enum }; -#define WIDTH_OF_M 10 +#define DEFAULT_ROW_HEIGHT 25 static void -new_variables_callback (PsppireDict *dict, gpointer data) +new_data_callback (PsppireDataStore *ds, gpointer data) { - gint v, i; + gint i; PsppireDataEditor *de = PSPPIRE_DATA_EDITOR (data); - for (i = 0 ; i < 4 ; ++i) - { - PsppireAxis *haxis; - g_object_get (de->data_sheet[i], "horizontal-axis", &haxis, NULL); + casenumber n_cases = psppire_data_store_get_case_count (ds); - psppire_axis_clear (haxis); + for (i = 0; i < 2; ++i) + { + psppire_axis_impl_clear (de->vaxis[i]); + psppire_axis_impl_append_n (de->vaxis[i], n_cases, DEFAULT_ROW_HEIGHT); + } +} - for (v = 0 ; v < psppire_dict_get_var_cnt (dict); ++v) - { - const struct variable *var = psppire_dict_get_variable (dict, v); +static void +case_inserted_callback (PsppireDataStore *ds, gint before, gpointer data) +{ + gint i; + PsppireDataEditor *de = PSPPIRE_DATA_EDITOR (data); - psppire_axis_append (haxis, 10 * var_get_display_width (var)); - } - } + for (i = 0; i < 2; ++i) + psppire_axis_impl_insert (de->vaxis[i], before, DEFAULT_ROW_HEIGHT); } + static void -insert_variable_callback (PsppireDict *dict, gint x, gpointer data) +cases_deleted_callback (PsppireDataStore *ds, gint first, gint n_cases, gpointer data) { gint i; PsppireDataEditor *de = PSPPIRE_DATA_EDITOR (data); - for (i = 0 ; i < 4 ; ++i) - { - const struct variable *var = psppire_dict_get_variable (dict, x); - PsppireAxis *haxis; - g_object_get (de->data_sheet[i], "horizontal-axis", &haxis, NULL); + for (i = 0; i < 2; ++i) + psppire_axis_impl_delete (de->vaxis[0], first, n_cases); +} - psppire_axis_insert (haxis, WIDTH_OF_M * var_get_display_width (var), x); - } + + +/* Return the width (in pixels) of an upper case M when rendered in the + current font of W +*/ +static gint +width_of_m (GtkWidget *w) +{ + PangoRectangle rect; + PangoLayout *layout = gtk_widget_create_pango_layout (w, "M"); + + pango_layout_get_pixel_extents (layout, NULL, &rect); + + g_object_unref (layout); + + return rect.width; +} + +/* Callback for the axis' resize signal. + Changes the variable's display width */ +static void +rewidth_variable (GtkWidget *w, gint unit, glong size) +{ + PsppireDataEditor *de = PSPPIRE_DATA_EDITOR (w); + + const PsppireDict *dict = de->data_store->dict; + struct variable *var = psppire_dict_get_variable (dict, unit); + + if (NULL == var) + return; + + var_set_display_width (var, size / (float) width_of_m (w)); } static void -delete_variable_callback (PsppireDict *dict, gint posn, gint x UNUSED, gint y UNUSED, gpointer data) +new_variables_callback (PsppireDict *dict, gpointer data) { - gint i; + gint v; PsppireDataEditor *de = PSPPIRE_DATA_EDITOR (data); + gint m_width = width_of_m (GTK_WIDGET (de)); + + PsppireAxisImpl *vaxis; + g_object_get (de->var_sheet, "vertical-axis", &vaxis, NULL); + + psppire_axis_impl_clear (vaxis); + psppire_axis_impl_append_n (vaxis, 1 + psppire_dict_get_var_cnt (dict), DEFAULT_ROW_HEIGHT); + + g_signal_connect_swapped (de->haxis, "resize-unit", + G_CALLBACK (rewidth_variable), de); - for (i = 0 ; i < 4 ; ++i) + psppire_axis_impl_clear (de->haxis); + + for (v = 0 ; v < psppire_dict_get_var_cnt (dict); ++v) { - PsppireAxis *haxis; - g_object_get (de->data_sheet[i], "horizontal-axis", &haxis, NULL); + const struct variable *var = psppire_dict_get_variable (dict, v); - psppire_axis_remove (haxis, posn); + psppire_axis_impl_append (de->haxis, m_width * var_get_display_width (var)); } } +static void +insert_variable_callback (PsppireDict *dict, gint x, gpointer data) +{ + PsppireDataEditor *de = PSPPIRE_DATA_EDITOR (data); + + gint m_width = width_of_m (GTK_WIDGET (de)); + + PsppireAxisImpl *var_vaxis; + + const struct variable *var = psppire_dict_get_variable (dict, x); + + g_object_get (de->var_sheet, "vertical-axis", &var_vaxis, NULL); + + psppire_axis_impl_insert (var_vaxis, x, DEFAULT_ROW_HEIGHT); + + + psppire_axis_impl_insert (de->haxis, x, m_width * var_get_display_width (var)); +} + + +static void +delete_variable_callback (PsppireDict *dict, gint posn, + gint x UNUSED, gint y UNUSED, gpointer data) +{ + PsppireDataEditor *de = PSPPIRE_DATA_EDITOR (data); + + PsppireAxisImpl *var_vaxis; + g_object_get (de->var_sheet, "vertical-axis", &var_vaxis, NULL); + + psppire_axis_impl_delete (var_vaxis, posn, 1); + + psppire_axis_impl_delete (de->haxis, posn, 1); +} + static void rewidth_variable_callback (PsppireDict *dict, gint posn, gpointer data) { - gint i; PsppireDataEditor *de = PSPPIRE_DATA_EDITOR (data); + gint m_width = width_of_m (GTK_WIDGET (de)); - for (i = 0 ; i < 4 ; ++i) - { - const struct variable *var = psppire_dict_get_variable (dict, posn); - PsppireAxis *haxis; - g_object_get (de->data_sheet[i], "horizontal-axis", &haxis, NULL); + const struct variable *var = psppire_dict_get_variable (dict, posn); - psppire_axis_resize_unit (haxis, WIDTH_OF_M * var_get_display_width (var), posn); - } + gint var_width = var_get_display_width (var); + + /* Don't allow zero width */ + if ( var_width < 1 ) + var_width = 1; + + psppire_axis_impl_resize (de->haxis, posn, m_width * var_width); } @@ -294,15 +381,30 @@ psppire_data_editor_set_property (GObject *object, for (i = 0 ; i < 4 ; ++i ) g_object_set (de->data_sheet[i], - "row-geometry", de->data_store, "model", de->data_store, NULL); - g_signal_connect (de->data_store->dict, "backend-changed", G_CALLBACK (new_variables_callback), de); - g_signal_connect (de->data_store->dict, "variable-inserted", G_CALLBACK (insert_variable_callback), de); - g_signal_connect (de->data_store->dict, "variable-deleted", G_CALLBACK (delete_variable_callback), de); - // g_signal_connect (de->data_store->dict, "variable-changed", G_CALLBACK (alter_variable_callback), de); - g_signal_connect (de->data_store->dict, "variable-display-width-changed", G_CALLBACK (rewidth_variable_callback), de); + g_signal_connect (de->data_store->dict, "backend-changed", + G_CALLBACK (new_variables_callback), de); + + g_signal_connect (de->data_store->dict, "variable-inserted", + G_CALLBACK (insert_variable_callback), de); + + g_signal_connect (de->data_store->dict, "variable-deleted", + G_CALLBACK (delete_variable_callback), de); + + g_signal_connect (de->data_store->dict, "variable-display-width-changed", + G_CALLBACK (rewidth_variable_callback), de); + + g_signal_connect (de->data_store, "backend-changed", + G_CALLBACK (new_data_callback), de); + + g_signal_connect (de->data_store, "case-inserted", + G_CALLBACK (case_inserted_callback), de); + + g_signal_connect (de->data_store, "cases-deleted", + G_CALLBACK (cases_deleted_callback), de); + break; case PROP_VAR_STORE: if ( de->var_store) g_object_unref (de->var_store); @@ -310,19 +412,26 @@ psppire_data_editor_set_property (GObject *object, g_object_ref (de->var_store); g_object_set (de->var_sheet, - "row-geometry", de->var_store, "model", de->var_store, NULL); break; - case PROP_COLUMN_MENU: + case PROP_VS_ROW_MENU: + { + GObject *menu = g_value_get_object (value); + + g_signal_connect (de->var_sheet, "button-event-row", + G_CALLBACK (popup_variable_row_menu), menu); + } + break; + case PROP_DS_COLUMN_MENU: { GObject *menu = g_value_get_object (value); g_signal_connect (de->data_sheet[0], "button-event-column", - G_CALLBACK (popup_variable_menu), menu); + G_CALLBACK (popup_variable_column_menu), menu); } break; - case PROP_ROW_MENU: + case PROP_DS_ROW_MENU: { GObject *menu = g_value_get_object (value); @@ -422,7 +531,8 @@ psppire_data_editor_class_init (PsppireDataEditorClass *klass) GParamSpec *data_store_spec ; GParamSpec *var_store_spec ; GParamSpec *column_menu_spec; - GParamSpec *row_menu_spec; + GParamSpec *ds_row_menu_spec; + GParamSpec *vs_row_menu_spec; GParamSpec *value_labels_spec; GParamSpec *current_case_spec; GParamSpec *current_var_spec; @@ -459,27 +569,40 @@ psppire_data_editor_class_init (PsppireDataEditorClass *klass) var_store_spec); column_menu_spec = - g_param_spec_object ("column-menu", - "Column Menu", - "A menu to be displayed when button 3 is pressed in the column title buttons", + g_param_spec_object ("datasheet-column-menu", + "Data Sheet Column Menu", + "A menu to be displayed when button 3 is pressed in thedata sheet's column title buttons", GTK_TYPE_MENU, G_PARAM_WRITABLE); g_object_class_install_property (object_class, - PROP_COLUMN_MENU, + PROP_DS_COLUMN_MENU, column_menu_spec); - row_menu_spec = - g_param_spec_object ("row-menu", - "Row Menu", - "A menu to be displayed when button 3 is pressed in the row title buttons", + ds_row_menu_spec = + g_param_spec_object ("datasheet-row-menu", + "Data Sheet Row Menu", + "A menu to be displayed when button 3 is pressed in the data sheet's row title buttons", GTK_TYPE_MENU, G_PARAM_WRITABLE); g_object_class_install_property (object_class, - PROP_ROW_MENU, - row_menu_spec); + PROP_DS_ROW_MENU, + ds_row_menu_spec); + + + vs_row_menu_spec = + g_param_spec_object ("varsheet-row-menu", + "Variable Sheet Row Menu", + "A menu to be displayed when button 3 is pressed in the variable sheet's row title buttons", + GTK_TYPE_MENU, + G_PARAM_WRITABLE); + + g_object_class_install_property (object_class, + PROP_VS_ROW_MENU, + vs_row_menu_spec); + value_labels_spec = g_param_spec_boolean ("value-labels", @@ -690,20 +813,26 @@ on_map (GtkWidget *w) static void init_sheet (PsppireDataEditor *de, int i, - GtkAdjustment *hadj, GtkAdjustment *vadj) + GtkAdjustment *hadj, GtkAdjustment *vadj, + PsppireAxisImpl *vaxis, + PsppireAxisImpl *haxis + ) { - PsppireAxis *haxis = psppire_axis_new (); de->sheet_bin[i] = gtk_scrolled_window_new (hadj, vadj); - de->data_sheet[i] = gtk_sheet_new (NULL, NULL, NULL); + de->data_sheet[i] = gtk_sheet_new (NULL); g_object_set (de->sheet_bin[i], "border-width", 3, "shadow-type", GTK_SHADOW_ETCHED_IN, NULL); + g_object_set (haxis, "default-size", 75, NULL); + g_object_set (vaxis, "default-size", 25, NULL); + g_object_set (de->data_sheet[i], "horizontal-axis", haxis, + "vertical-axis", vaxis, NULL); gtk_container_add (GTK_CONTAINER (de->sheet_bin[i]), de->data_sheet[i]); @@ -718,38 +847,46 @@ init_sheet (PsppireDataEditor *de, int i, static void init_data_sheet (PsppireDataEditor *de) { - GtkAdjustment *va0, *ha0; - GtkAdjustment *va1, *ha1; + GtkAdjustment *vadj0, *hadj0; + GtkAdjustment *vadj1, *hadj1; GtkWidget *sheet ; + de->vaxis[0] = psppire_axis_impl_new (); + de->vaxis[1] = psppire_axis_impl_new (); + + /* Txoxovhere's only one horizontal axis, since the + column widths are parameters of the variables */ + de->haxis = psppire_axis_impl_new (); + + de->split = TRUE; de->paned = gtk_xpaned_new (); - init_sheet (de, 0, NULL, NULL); + init_sheet (de, 0, NULL, NULL, de->vaxis[0], de->haxis); gtk_widget_show (de->sheet_bin[0]); - va0 = gtk_scrolled_window_get_vadjustment (GTK_SCROLLED_WINDOW (de->sheet_bin[0])); - ha0 = gtk_scrolled_window_get_hadjustment (GTK_SCROLLED_WINDOW (de->sheet_bin[0])); + vadj0 = gtk_scrolled_window_get_vadjustment (GTK_SCROLLED_WINDOW (de->sheet_bin[0])); + hadj0 = gtk_scrolled_window_get_hadjustment (GTK_SCROLLED_WINDOW (de->sheet_bin[0])); g_object_set (de->sheet_bin[0], "vscrollbar-policy", GTK_POLICY_NEVER, NULL); g_object_set (de->sheet_bin[0], "hscrollbar-policy", GTK_POLICY_NEVER, NULL); - init_sheet (de, 1, NULL, va0); + init_sheet (de, 1, NULL, vadj0, de->vaxis[0], de->haxis); gtk_widget_show (de->sheet_bin[1]); sheet = gtk_bin_get_child (GTK_BIN (de->sheet_bin[1])); gtk_sheet_hide_row_titles (GTK_SHEET (sheet)); - ha1 = gtk_scrolled_window_get_hadjustment (GTK_SCROLLED_WINDOW (de->sheet_bin[1])); + hadj1 = gtk_scrolled_window_get_hadjustment (GTK_SCROLLED_WINDOW (de->sheet_bin[1])); g_object_set (de->sheet_bin[1], "vscrollbar-policy", GTK_POLICY_ALWAYS, NULL); g_object_set (de->sheet_bin[1], "hscrollbar-policy", GTK_POLICY_NEVER, NULL); - init_sheet (de, 2, ha0, NULL); + init_sheet (de, 2, hadj0, NULL, de->vaxis[1], de->haxis); gtk_widget_show (de->sheet_bin[2]); sheet = gtk_bin_get_child (GTK_BIN (de->sheet_bin[2])); gtk_sheet_hide_column_titles (GTK_SHEET (sheet)); g_object_set (de->sheet_bin[2], "vscrollbar-policy", GTK_POLICY_NEVER, NULL); g_object_set (de->sheet_bin[2], "hscrollbar-policy", GTK_POLICY_ALWAYS, NULL); - va1 = gtk_scrolled_window_get_vadjustment (GTK_SCROLLED_WINDOW (de->sheet_bin[2])); + vadj1 = gtk_scrolled_window_get_vadjustment (GTK_SCROLLED_WINDOW (de->sheet_bin[2])); - init_sheet (de, 3, ha1, va1); + init_sheet (de, 3, hadj1, vadj1, de->vaxis[1], de->haxis); gtk_widget_show (de->sheet_bin[3]); sheet = gtk_bin_get_child (GTK_BIN (de->sheet_bin[3])); gtk_sheet_hide_column_titles (GTK_SHEET (sheet)); @@ -1031,7 +1168,7 @@ psppire_data_editor_clip_cut (PsppireDataEditor *de) /* Popup menu related stuff */ static void -popup_variable_menu (GtkSheet *sheet, gint column, +popup_variable_column_menu (GtkSheet *sheet, gint column, GdkEventButton *event, gpointer data) { GtkMenu *menu = GTK_MENU (data); @@ -1053,6 +1190,29 @@ popup_variable_menu (GtkSheet *sheet, gint column, } +static void +popup_variable_row_menu (GtkSheet *sheet, gint row, + GdkEventButton *event, gpointer data) +{ + GtkMenu *menu = GTK_MENU (data); + + PsppireVarStore *var_store = + PSPPIRE_VAR_STORE (gtk_sheet_get_model (sheet)); + + const struct variable *v = + psppire_dict_get_variable (var_store->dict, row); + + if ( v && event->button == 3) + { + gtk_sheet_select_row (sheet, row); + + gtk_menu_popup (menu, + NULL, NULL, NULL, NULL, + event->button, event->time); + } +} + + static void popup_cases_menu (GtkSheet *sheet, gint row, GdkEventButton *event, gpointer data) @@ -1129,14 +1289,26 @@ psppire_data_editor_sort_descending (PsppireDataEditor *de) void psppire_data_editor_insert_variable (PsppireDataEditor *de) { - glong posn = -1; + glong posn = 0; - if ( de->data_sheet[0]->state == GTK_SHEET_COLUMN_SELECTED ) - posn = GTK_SHEET (de->data_sheet[0])->range.col0; - else - posn = GTK_SHEET (de->data_sheet[0])->active_cell.col; - - if ( posn == -1 ) posn = 0; + switch (gtk_notebook_get_current_page (GTK_NOTEBOOK (de))) + { + case PSPPIRE_DATA_EDITOR_DATA_VIEW: + if ( de->data_sheet[0]->state == GTK_SHEET_COLUMN_SELECTED ) + posn = GTK_SHEET (de->data_sheet[0])->range.col0; + else + posn = GTK_SHEET (de->data_sheet[0])->active_cell.col; + break; + case PSPPIRE_DATA_EDITOR_VARIABLE_VIEW: + if ( de->var_sheet->state == GTK_SHEET_ROW_SELECTED ) + posn = GTK_SHEET (de->var_sheet)->range.row0; + else + posn = GTK_SHEET (de->var_sheet)->active_cell.row; + break; + default: + g_assert_not_reached (); + break; + }; psppire_dict_insert_variable (de->data_store->dict, posn, NULL); } @@ -1205,11 +1377,27 @@ psppire_data_editor_show_grid (PsppireDataEditor *de, gboolean grid_visible) gtk_sheet_show_grid (GTK_SHEET (de->data_sheet[0]), grid_visible); } + +static void +set_font (GtkWidget *w, gpointer data) +{ + PangoFontDescription *font_desc = data; + GtkRcStyle *style = gtk_widget_get_modifier_style (w); + + pango_font_description_free (style->font_desc); + style->font_desc = pango_font_description_copy (font_desc); + + gtk_widget_modify_style (w, style); + + if ( GTK_IS_CONTAINER (w)) + gtk_container_foreach (GTK_CONTAINER (w), set_font, font_desc); +} + void psppire_data_editor_set_font (PsppireDataEditor *de, PangoFontDescription *font_desc) { - psppire_data_store_set_font (de->data_store, font_desc); - psppire_var_store_set_font (de->var_store, font_desc); + set_font (GTK_WIDGET (de), font_desc); + gtk_container_foreach (GTK_CONTAINER (de), set_font, font_desc); } @@ -1421,7 +1609,7 @@ data_sheet_set_clip (GtkSheet *sheet) { struct ccase old; - if (psppire_case_file_get_case (ds->case_file, i, &old)) + if (psppire_data_store_get_case (ds, i, &old)) { struct ccase new;