/**
* stf_dialog_format_page_prepare
* @data: mother struct
*
* This will prepare the widgets on the format page before
* the page gets displayed
*
* returns : nothing
**/
void
stf_dialog_format_page_prepare (StfDialogData *data)
{
GOFormat *general = go_format_general ();
/* Set the trim. */
format_page_trim_menu_changed (NULL, data);
/* If necessary add new items (non-visual) */
while ((int)data->format.formats->len < data->format.renderdata->colcount)
g_ptr_array_add (data->format.formats, go_format_ref (general));
data->format.manual_change = TRUE;
activate_column (data, 0);
}
static void
update_obj_value (SolverState *state)
{
GnmSolver *sol = state->run.solver;
GnmSolverResult *r = sol->result;
char *valtxt;
const char *txt;
switch (r ? r->quality : GNM_SOLVER_RESULT_NONE) {
default:
case GNM_SOLVER_RESULT_NONE:
txt = "";
break;
case GNM_SOLVER_RESULT_FEASIBLE:
txt = _("Feasible");
break;
case GNM_SOLVER_RESULT_OPTIMAL:
txt = _("Optimal");
break;
case GNM_SOLVER_RESULT_INFEASIBLE:
txt = _("Infeasible");
break;
case GNM_SOLVER_RESULT_UNBOUNDED:
txt = _("Unbounded");
break;
}
gtk_label_set_text (GTK_LABEL (state->run.problem_status_widget), txt);
if (gnm_solver_has_solution (sol)) {
txt = valtxt = gnm_format_value (go_format_general (),
r->value);
} else {
valtxt = NULL;
txt = "";
}
gtk_label_set_text (GTK_LABEL (state->run.objective_value_widget),
txt);
g_free (valtxt);
remove_objective_value_source (state);
}
static char *
try_auto_float (GnmValue *value, const GOFormat *format,
GODateConventions const *date_conv)
{
gboolean is_date;
int is_time;
if (!VALUE_IS_FLOAT (value))
return NULL;
format = gnm_format_specialize (format, value);
is_date = go_format_is_date (format) > 0;
is_time = go_format_is_time (format);
if (is_date || is_time > 0)
return NULL;
return format_value (go_format_general (), value, -1, date_conv);
}
/**
* format_page_update_preview
* @pagedata: mother struct
*
* Will simply utilize the preview rendering functions to update
* the preview
*
* returns : nothing
**/
static void
format_page_update_preview (StfDialogData *pagedata)
{
RenderData_t *renderdata = pagedata->format.renderdata;
unsigned int ui;
int i;
int col_import_array_len_old, old_part;
GStringChunk *lines_chunk;
char *msg = NULL;
stf_preview_colformats_clear (renderdata);
for (ui = 0; ui < pagedata->format.formats->len; ui++) {
GOFormat *sf = g_ptr_array_index (pagedata->format.formats, ui);
stf_preview_colformats_add (renderdata, sf);
}
lines_chunk = g_string_chunk_new (100 * 1024);
stf_preview_set_lines (renderdata, lines_chunk,
stf_parse_general (pagedata->parseoptions,
lines_chunk,
pagedata->cur,
pagedata->cur_end));
col_import_array_len_old = pagedata->format.col_import_array_len;
pagedata->format.col_import_array_len = renderdata->colcount;
pagedata->format.col_autofit_array =
g_renew(gboolean, pagedata->format.col_autofit_array,
pagedata->format.col_import_array_len);
pagedata->format.col_import_array =
g_renew(gboolean, pagedata->format.col_import_array,
pagedata->format.col_import_array_len);
old_part = (col_import_array_len_old < pagedata->format.col_import_array_len)
? col_import_array_len_old
: pagedata->format.col_import_array_len;
pagedata->format.col_import_count = 0;
for (i = 0; i < old_part; i++)
if (pagedata->format.col_import_array[i])
pagedata->format.col_import_count++;
for (i = old_part;
i < pagedata->format.col_import_array_len; i++) {
if (pagedata->format.col_import_count < GNM_MAX_COLS) {
pagedata->format.col_import_array[i] = TRUE;
pagedata->format.col_import_count++;
} else {
pagedata->format.col_import_array[i] = FALSE;
}
pagedata->format.col_autofit_array[i] = TRUE;
}
format_page_update_column_selection (pagedata);
if (old_part < renderdata->colcount)
msg = g_strdup_printf
(_("A maximum of %d columns can be imported."),
GNM_MAX_COLS);
for (i = old_part; i < renderdata->colcount; i++) {
GtkTreeViewColumn *column =
stf_preview_get_column (renderdata, i);
GtkWidget *button = gtk_tree_view_column_get_button (column);
if (NULL == g_object_get_data (G_OBJECT (column), "checkbox")) {
GtkWidget *vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 5);
GtkWidget *check,
*check_autofit = gtk_check_button_new_with_label (_("Auto fit"));
char * label_text = g_strdup_printf
(pagedata->format.col_header, i+1);
GOFormat const *gf = go_format_general ();
GtkWidget *format_label = gtk_button_new_with_label
(go_format_sel_format_classification (gf));
GtkWidget *format_icon
= gtk_image_new_from_stock (GTK_STOCK_INFO, GTK_ICON_SIZE_BUTTON);
check = gtk_check_button_new_with_label (label_text);
g_free (label_text);
gtk_button_set_image (GTK_BUTTON (format_label), format_icon);
g_object_set (G_OBJECT (stf_preview_get_cell_renderer
(pagedata->format.renderdata, i)),
"strikethrough",
!pagedata->format.col_import_array[i], NULL);
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON(check),
pagedata->
format.col_import_array[i]);
label_text = g_strdup_printf
(_("If this checkbox is selected, "
"column %i will be imported into "
"Gnumeric."), i+1);
gtk_widget_set_tooltip_text
(check,
label_text);
gtk_widget_set_tooltip_text
(check_autofit,
_("If this checkbox is selected, "
"the width of the column will be adjusted "
"to the longest entry."));
g_free (label_text);
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON(check_autofit),
pagedata->
format.col_autofit_array[i]);
g_object_set_data (G_OBJECT (check), "pagedata", pagedata);
g_object_set_data (G_OBJECT (check_autofit), "pagedata", pagedata);
g_object_set_data (G_OBJECT (format_label), "pagedata", pagedata);
gtk_box_pack_start (GTK_BOX(vbox), check, FALSE, FALSE, 0);
gtk_box_pack_start (GTK_BOX(vbox), format_label, TRUE, TRUE, 0);
gtk_box_pack_start (GTK_BOX(vbox), check_autofit, TRUE, TRUE, 0);
gtk_widget_show_all (vbox);
gtk_tree_view_column_set_widget (column, vbox);
g_object_set_data (G_OBJECT (column), "pagedata", pagedata);
g_object_set_data (G_OBJECT (column), "checkbox", check);
g_object_set_data (G_OBJECT (column), "checkbox-autofit", check_autofit);
g_object_set_data (G_OBJECT (column), "formatlabel", format_label);
g_object_set_data (G_OBJECT (button),
"pagedata", pagedata);
g_object_set_data (G_OBJECT (button),
"checkbox", check);
g_object_set_data (G_OBJECT (button),
"formatlabel", format_label);
g_object_set (G_OBJECT (column), "clickable", TRUE, NULL);
g_signal_connect (G_OBJECT (check),
"toggled",
G_CALLBACK (cb_col_check_clicked),
GINT_TO_POINTER (i));
g_signal_connect (G_OBJECT (check_autofit),
"toggled",
G_CALLBACK (cb_col_check_autofit_clicked),
GINT_TO_POINTER (i));
g_signal_connect (G_OBJECT (format_label),
"clicked",
G_CALLBACK (cb_format_clicked),
GINT_TO_POINTER (i));
g_signal_connect (G_OBJECT (button),
"event",
G_CALLBACK (cb_col_event),
GINT_TO_POINTER (i));
}
}
g_free (msg);
}
/**
* wbcg_edit_start:
* @wbcg: The workbook to be edited.
* @blankp: If true, erase current cell contents first. If false, leave the
* contents alone.
* @cursorp: If true, create an editing cursor in the current sheet. (If
* false, the text will be editing in the edit box above the sheet,
* but this is not handled by this function.)
*
* Initiate editing of a cell in the sheet. Note that we have two modes of
* editing:
* 1) in-cell editing when you just start typing, and
* 2) above sheet editing when you hit F2.
*
* Returns TRUE if we did indeed start editing. Returns FALSE if the
* cell-to-be-edited was locked.
*/
gboolean
wbcg_edit_start (WBCGtk *wbcg,
gboolean blankp, gboolean cursorp)
{
/* We could save this, but the situation is rare, if confusing. */
static gboolean warn_on_text_format = TRUE;
SheetView *sv;
SheetControlGUI *scg;
GnmCell *cell;
char *text = NULL;
int col, row;
WorkbookView *wbv;
int cursor_pos = -1;
g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg), FALSE);
if (wbcg_is_editing (wbcg))
return TRUE;
/* Avoid recursion, and do not begin editing if a guru is up */
if (wbcg->inside_editing || wbc_gtk_get_guru (wbcg) != NULL)
return TRUE;
wbcg->inside_editing = TRUE;
wbv = wb_control_view (GNM_WBC (wbcg));
sv = wb_control_cur_sheet_view (GNM_WBC (wbcg));
scg = wbcg_cur_scg (wbcg);
col = sv->edit_pos.col;
row = sv->edit_pos.row;
/* don't edit a locked cell */
/* TODO : extend this to disable edits that cannot succeed
* like editing a single cell of an array. I think we have enough
* information if we look at the selection.
*/
if (wb_view_is_protected (wbv, TRUE) &&
gnm_style_get_contents_locked (sheet_style_get (sv->sheet, col, row))) {
char *pos = g_strdup_printf ( _("%s!%s is locked"),
sv->sheet->name_quoted, cell_coord_name (col, row));
go_cmd_context_error_invalid (GO_CMD_CONTEXT (wbcg), pos,
wb_view_is_protected (wbv, FALSE)
? _("Unprotect the workbook to enable editing.")
: _("Unprotect the sheet to enable editing."));
wbcg->inside_editing = FALSE;
g_free (pos);
return FALSE;
}
cell = sheet_cell_get (sv->sheet, col, row);
if (cell &&
warn_on_text_format &&
go_format_is_text (gnm_cell_get_format (cell)) &&
(gnm_cell_has_expr (cell) || !VALUE_IS_STRING (cell->value))) {
gint res; /* Using GtkResponseType would yield a warning on the switch */
GtkWidget *check;
GtkWidget *align;
GtkWidget *d = gnm_message_dialog_create
(wbcg_toplevel (wbcg),
GTK_DIALOG_DESTROY_WITH_PARENT,
GTK_MESSAGE_WARNING,
_("You are about to edit a cell with \"text\" format."),
_("The cell does not currently contain text, though, so if "
"you go on editing then the contents will be turned into "
"text."));
gtk_dialog_add_button (GTK_DIALOG (d), GTK_STOCK_EDIT, GTK_RESPONSE_OK);
go_gtk_dialog_add_button
(GTK_DIALOG (d), _("Remove format"), GTK_STOCK_REMOVE,
GNM_RESPONSE_REMOVE);
gtk_dialog_add_button (GTK_DIALOG (d), GNM_STOCK_CANCEL, GTK_RESPONSE_CANCEL);
gtk_dialog_set_default_response (GTK_DIALOG (d), GTK_RESPONSE_CANCEL);
check = gtk_check_button_new_with_label (_("Show this dialog next time."));
g_signal_connect (check, "toggled", G_CALLBACK (cb_warn_toggled), &warn_on_text_format);
gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (check), TRUE);
align = gtk_alignment_new (0.5, 0.5, 0, 0);
gtk_container_add (GTK_CONTAINER (align), check);
gtk_widget_show_all (align);
gtk_box_pack_end (GTK_BOX (gtk_dialog_get_content_area (GTK_DIALOG (d))), align, TRUE, TRUE, 0);
res = go_gtk_dialog_run (GTK_DIALOG (d), wbcg_toplevel (wbcg));
switch (res) {
case GNM_RESPONSE_REMOVE: {
GnmStyle *style = gnm_style_new ();
gnm_style_set_format (style, go_format_general ());
if (!cmd_selection_format (GNM_WBC (wbcg),
style, NULL, NULL))
break;
/* Fall through. */
}
default:
case GTK_RESPONSE_CANCEL:
wbcg->inside_editing = FALSE;
return FALSE;
case GTK_RESPONSE_OK:
break;
}
}
gnm_app_clipboard_unant ();
if (blankp)
gtk_entry_set_text (wbcg_get_entry (wbcg), "");
else if (cell != NULL) {
gboolean quoted = FALSE;
text = gnm_cell_get_text_for_editing (cell, sv->sheet, "ed, &cursor_pos);
if (text)
gtk_entry_set_text (wbcg_get_entry (wbcg), text);
if (cell->value != NULL) {
GOFormat const *fmt = VALUE_FMT (cell->value);
if (fmt != NULL && go_format_is_markup (fmt)) {
PangoAttrList *markup =
pango_attr_list_copy ((PangoAttrList *)go_format_get_markup (fmt));
if (quoted)
go_pango_attr_list_open_hole (markup, 0, 1);
wbcg_edit_init_markup (wbcg, markup);
}
}
}
gnm_expr_entry_set_scg (wbcg->edit_line.entry, scg);
gnm_expr_entry_set_flags (wbcg->edit_line.entry,
GNM_EE_SHEET_OPTIONAL | GNM_EE_FORMULA_ONLY,
GNM_EE_SINGLE_RANGE | GNM_EE_SHEET_OPTIONAL | GNM_EE_FORMULA_ONLY | GNM_EE_FORCE_REL_REF | GNM_EE_FORCE_ABS_REF);
scg_edit_start (scg);
/* Redraw the cell contents in case there was a span */
sheet_redraw_region (sv->sheet, col, row, col, row);
if (cursorp && /* autocompletion code will not work in the edit line */
wbv->do_auto_completion &&
(text == NULL || g_unichar_isalpha (g_utf8_get_char (text)))) {
wbcg->auto_complete = gnm_complete_sheet_new (
sv->sheet, col, row,
workbook_edit_complete_notify, wbcg);
wbcg->auto_completing = TRUE;
wbcg->auto_max_size = 0;
} else
wbcg->auto_complete = NULL;
/* Give the focus to the edit line */
if (!cursorp)
gtk_window_set_focus (wbcg_toplevel (wbcg),
(GtkWidget *) wbcg_get_entry (wbcg));
wbcg->editing = TRUE;
wbcg->editing_sheet = sv->sheet;
wbcg->editing_cell = cell;
/* If this assert fails, it means editing was not shut down
* properly before
*/
g_return_val_if_fail (wbcg->edit_line.signal_changed == 0, TRUE);
wbcg->edit_line.signal_changed = g_signal_connect (
G_OBJECT (wbcg_get_entry (wbcg)),
"changed",
G_CALLBACK (cb_entry_changed), wbcg);
wbcg->edit_line.signal_insert = g_signal_connect (
G_OBJECT (wbcg_get_entry (wbcg)),
"insert-text",
G_CALLBACK (cb_entry_insert_text), wbcg);
wbcg->edit_line.signal_delete = g_signal_connect (
G_OBJECT (wbcg_get_entry (wbcg)),
"delete-text",
G_CALLBACK (cb_entry_delete_text), wbcg);
wbcg->edit_line.signal_cursor_pos = g_signal_connect_swapped (
G_OBJECT (wbcg_get_entry (wbcg)),
"notify::cursor-position",
G_CALLBACK (cb_entry_cursor_pos), wbcg);
wbcg->edit_line.signal_selection_bound = g_signal_connect_swapped (
G_OBJECT (wbcg_get_entry (wbcg)),
"notify::selection-bound",
G_CALLBACK (cb_entry_cursor_pos), wbcg);
g_free (text);
wb_control_update_action_sensitivity (GNM_WBC (wbcg));
wbcg->inside_editing = FALSE;
gtk_editable_set_position (GTK_EDITABLE (wbcg_get_entry (wbcg)), cursor_pos);
return TRUE;
}
/**
* cb_dialog_apply_clicked:
* @button:
* @state:
*
* Close (destroy) the dialog
**/
static void
cb_dialog_apply_clicked (G_GNUC_UNUSED GtkWidget *button,
GoalSeekState *state)
{
char *status_str;
GoalSeekStatus status;
GnmValue *target;
GnmRangeRef const *r;
GOFormat *format;
if (state->warning_dialog != NULL)
gtk_widget_destroy (state->warning_dialog);
/* set up source */
target = gnm_expr_entry_parse_as_value (state->set_cell_entry,
state->sheet);
if (target == NULL) {
go_gtk_notice_nonmodal_dialog (GTK_WINDOW(state->dialog),
&(state->warning_dialog),
GTK_MESSAGE_ERROR,
_("You should introduce a valid cell "
"name in 'Set Cell:'!"));
gnm_expr_entry_grab_focus (state->set_cell_entry, TRUE);
return;
}
r = &target->v_range.cell;
state->set_cell = sheet_cell_get (r->a.sheet, r->a.col, r->a.row);
value_release (target);
if (state->set_cell == NULL || !gnm_cell_has_expr (state->set_cell)) {
go_gtk_notice_nonmodal_dialog (GTK_WINDOW(state->dialog),
&(state->warning_dialog),
GTK_MESSAGE_ERROR,
_("The cell named in 'Set Cell:' "
"must contain a formula!"));
gnm_expr_entry_grab_focus (state->set_cell_entry, TRUE);
return;
}
/* set up source */
target = gnm_expr_entry_parse_as_value (state->change_cell_entry,
state->sheet);
if (target == NULL) {
go_gtk_notice_nonmodal_dialog (GTK_WINDOW(state->dialog),
&(state->warning_dialog),
GTK_MESSAGE_ERROR,
_("You should introduce a valid cell "
"name in 'By Changing Cell:'!"));
gnm_expr_entry_grab_focus (state->change_cell_entry, TRUE);
return;
}
r = &target->v_range.cell;
state->change_cell = sheet_cell_fetch (r->a.sheet, r->a.col, r->a.row);
value_release (target);
if (gnm_cell_has_expr (state->change_cell)) {
go_gtk_notice_nonmodal_dialog (GTK_WINDOW(state->dialog),
&(state->warning_dialog),
GTK_MESSAGE_ERROR,
_("The cell named in 'By changing cell' "
"must not contain a formula."));
gnm_expr_entry_grab_focus (state->change_cell_entry, TRUE);
return;
}
format = gnm_style_get_format (gnm_cell_get_style (state->set_cell));
if (entry_to_float_with_format (GTK_ENTRY(state->to_value_entry),
&state->target_value, TRUE, format)){
go_gtk_notice_nonmodal_dialog (GTK_WINDOW(state->dialog),
&(state->warning_dialog),
GTK_MESSAGE_ERROR,
_("The value given in 'To Value:' "
"is not valid."));
focus_on_entry (GTK_ENTRY(state->to_value_entry));
return;
}
format = gnm_style_get_format (gnm_cell_get_style (state->change_cell));
if (entry_to_float_with_format (GTK_ENTRY(state->at_least_entry),
&state->xmin, TRUE, format)) {
state->xmin = -max_range_val;
gtk_entry_set_text (GTK_ENTRY (state->at_least_entry), "");
}
if (entry_to_float_with_format (GTK_ENTRY(state->at_most_entry), &state->xmax,
TRUE, format)) {
state->xmax = +max_range_val;
gtk_entry_set_text (GTK_ENTRY (state->at_most_entry), "");
}
if ((state->old_cell != NULL) && (state->old_value != NULL)) {
sheet_cell_set_value (state->old_cell, state->old_value);
workbook_recalc (state->wb);
state->old_value = NULL;
}
state->old_cell = state->change_cell;
state->old_value = value_dup (state->change_cell->value);
status = gnumeric_goal_seek (state);
switch (status) {
case GOAL_SEEK_OK: {
const char *actual_str;
const char *solution_str;
GOFormat *format = go_format_general ();
GnmValue *error_value = value_new_float (state->target_value -
value_get_as_float (state->set_cell->value));
char *target_str = format_value (format, error_value, NULL, -1,
workbook_date_conv (state->wb));
gtk_label_set_text (GTK_LABEL (state->target_value_label), target_str);
g_free (target_str);
value_release (error_value);
status_str =
g_strdup_printf (_("Goal seeking with cell %s found a solution."),
cell_name (state->set_cell));
gtk_label_set_text (GTK_LABEL (state->result_label), status_str);
g_free (status_str);
/* FIXME? Do a format? */
actual_str = state->set_cell->value
? value_peek_string (state->set_cell->value)
: "";
gtk_label_set_text (GTK_LABEL (state->current_value_label), actual_str);
solution_str = state->change_cell->value
? value_peek_string (state->change_cell->value)
: "";
gtk_label_set_text (GTK_LABEL (state->solution_label), solution_str);
break;
}
default:
status_str =
g_strdup_printf (_("Goal seeking with cell %s did not find a solution."),
cell_name (state->set_cell));
gtk_label_set_text (GTK_LABEL (state->result_label), status_str);
g_free (status_str);
gtk_label_set_text (GTK_LABEL (state->current_value_label), "");
gtk_label_set_text (GTK_LABEL (state->solution_label), "");
gtk_label_set_text (GTK_LABEL (state->target_value_label), "");
break;
}
state->cancelled = FALSE;
gtk_widget_show (state->result_table);
return;
}
