/*
* cell_register_span
* @cell: The cell to register the span
* @left: the leftmost column used by the cell
* @right: the rightmost column used by the cell
*
* Registers the region
*/
void
cell_register_span (GnmCell const *cell, int left, int right)
{
ColRowInfo *ri;
int col, i;
g_return_if_fail (cell != NULL);
g_return_if_fail (left <= right);
ri = cell->row_info;
col = cell->pos.col;
if (left == right)
return;
if (ri->spans == NULL)
ri->spans = g_hash_table_new (col_hash, col_compare);
for (i = left; i <= right; i++){
CellSpanInfo *spaninfo = g_new (CellSpanInfo, 1);
spaninfo->cell = cell;
spaninfo->left = left;
spaninfo->right = right;
g_return_if_fail (row_span_get (ri, i) == NULL);
g_hash_table_insert (ri->spans, GINT_TO_POINTER(i), spaninfo);
}
}
/**
* cellspan_is_empty :
*
* Utility to ensure that a cell is completely empty.
* - no spans
* - no merged regions
* - no content
*
* No need to check for merged cells here. We have already bounded the search region
* using adjacent merged cells.
*
* We could probably have done the same thing with the span regions too, but
* the current representation is not well suited to that type of search
* returns TRUE if the cell is empty.
*/
static inline gboolean
cellspan_is_empty (int col, GnmCell const *ok_span_cell)
{
CellSpanInfo const *span = row_span_get (ok_span_cell->row_info, col);
GnmCell const *tmp;
if (span != NULL && span->cell != ok_span_cell)
return FALSE;
tmp = sheet_cell_get (ok_span_cell->base.sheet,
col, ok_span_cell->pos.row);
/* FIXME : cannot use gnm_cell_is_empty until expressions can span.
* because cells with expressions start out with value Empty
* existing spans continue to flow through, but never get removed
* because we don't respan expression results.
*/
return (tmp == NULL || tmp->value == NULL ||
(VALUE_IS_EMPTY (tmp->value) && !gnm_cell_has_expr(tmp)));
}
/*
* write_row:
*
* @output: the stream
* @sheet: the gnumeric sheet
* @row: the row number
*
* Set up a TD node for each cell in the given row, witht eh appropriate
* colspan and rowspan.
* Call write_cell for each cell.
*/
static void
write_row (GsfOutput *output, Sheet *sheet, gint row, GnmRange *range, html_version_t version)
{
gint col;
ColRowInfo const *ri = sheet_row_get_info (sheet, row);
if (ri->needs_respan)
row_calc_spans ((ColRowInfo *) ri, row, sheet);
for (col = range->start.col; col <= range->end.col; col++) {
CellSpanInfo const *the_span;
GnmRange const *merge_range;
GnmCellPos pos;
pos.col = col;
pos.row = row;
/* Is this a span */
the_span = row_span_get (ri, col);
if (the_span != NULL) {
gsf_output_printf (output, "<td colspan=\"%i\" ", the_span->right - col + 1);
write_cell (output, sheet, row, the_span->cell->pos.col, version, FALSE);
col = the_span->right;
continue;
}
/* is this covered by a merge */
merge_range = gnm_sheet_merge_contains_pos (sheet, &pos);
if (merge_range != NULL) {
if (merge_range->start.col != col ||
merge_range->start.row != row)
continue;
gsf_output_printf (output, "<td colspan=\"%i\" rowspan=\"%i\" ",
merge_range->end.col - merge_range->start.col + 1,
merge_range->end.row - merge_range->start.row + 1);
write_cell (output, sheet, row, col, version, TRUE);
col = merge_range->end.col;
continue;
}
gsf_output_puts (output, "<td ");
write_cell (output, sheet, row, col, version, FALSE);
}
}
static gboolean
item_grid_draw_region (GocItem const *item, cairo_t *cr,
double x_0, double y_0, double x_1, double y_1)
{
GocCanvas *canvas = item->canvas;
double scale = canvas->pixels_per_unit;
gint64 x0 = x_0 * scale, y0 = y_0 * scale, x1 = x_1 * scale, y1 = y_1 * scale;
gint width = x1 - x0;
gint height = y1 - y0;
GnmPane *pane = GNM_PANE (canvas);
Sheet const *sheet = scg_sheet (pane->simple.scg);
WBCGtk *wbcg = scg_wbcg (pane->simple.scg);
GnmCell const * const edit_cell = wbcg->editing_cell;
GnmItemGrid *ig = GNM_ITEM_GRID (item);
ColRowInfo const *ri = NULL, *next_ri = NULL;
int const dir = sheet->text_is_rtl ? -1 : 1;
SheetView const *sv = scg_view (ig->scg);
WorkbookView *wbv = sv_wbv (sv);
gboolean show_function_cell_markers = wbv->show_function_cell_markers;
gboolean show_extension_markers = wbv->show_extension_markers;
/* we use the selected background color from an entry for selected cells */
GtkWidget *entry = gtk_entry_new ();
GtkStyleContext *ctxt = gtk_widget_get_style_context (entry);
/* To ensure that far and near borders get drawn we pretend to draw +-2
* pixels around the target area which would include the surrounding
* borders if necessary */
/* TODO : there is an opportunity to speed up the redraw loop by only
* painting the borders of the edges and not the content.
* However, that feels like more hassle that it is worth. Look into this someday.
*/
int x;
gint64 y, start_x, offset;
int col, row, n, start_col, end_col;
int start_row = gnm_pane_find_row (pane, y0-2, &y);
int end_row = gnm_pane_find_row (pane, y1+2, NULL);
gint64 const start_y = y - canvas->scroll_y1 * scale;
GnmStyleRow sr, next_sr;
GnmStyle const **styles;
GnmBorder const **borders, **prev_vert;
GnmBorder const *none =
sheet->hide_grid ? NULL : gnm_style_border_none ();
GnmRange view;
GSList *merged_active, *merged_active_seen,
*merged_used, *merged_unused, *ptr, **lag;
int *colwidths = NULL;
gboolean const draw_selection =
ig->scg->selected_objects == NULL &&
wbcg->new_object == NULL;
start_col = gnm_pane_find_col (pane, x0-2, &start_x);
end_col = gnm_pane_find_col (pane, x1+2, NULL);
g_return_val_if_fail (start_col <= end_col, TRUE);
#if 0
g_printerr ("%s:", cell_coord_name (start_col, start_row));
g_printerr ("%s <= %ld vs ???", cell_coord_name(end_col, end_row), (long)y);
g_printerr (" [%s]\n", cell_coord_name (ig->bound.end.col, ig->bound.end.row));
#endif
/* clip to bounds */
if (end_col > ig->bound.end.col)
end_col = ig->bound.end.col;
if (end_row > ig->bound.end.row)
end_row = ig->bound.end.row;
/* Skip any hidden cols/rows at the start */
for (; start_col <= end_col ; ++start_col) {
ri = sheet_col_get_info (sheet, start_col);
if (ri->visible)
break;
}
for (; start_row <= end_row ; ++start_row) {
ri = sheet_row_get_info (sheet, start_row);
if (ri->visible)
break;
}
/* if everything is hidden no need to draw */
if (end_col < ig->bound.start.col || start_col > ig->bound.end.col ||
end_row < ig->bound.start.row || start_row > ig->bound.end.row)
return TRUE;
/* Respan all rows that need it. */
for (row = start_row; row <= end_row; row++) {
ColRowInfo const *ri = sheet_row_get_info (sheet, row);
if (ri->visible && ri->needs_respan)
row_calc_spans ((ColRowInfo *)ri, row, sheet);
}
sheet_style_update_grid_color (sheet);
/* Fill entire region with default background (even past far edge) */
cairo_save (cr);
if (canvas->direction == GOC_DIRECTION_LTR)
gtk_render_background (goc_item_get_style_context (item),
cr,
x0 - canvas->scroll_x1 * scale,
y0 - canvas->scroll_y1 * scale,
width, height);
else
gtk_render_background (goc_item_get_style_context (item),
cr,
canvas->width - x0 + canvas->scroll_x1 * scale - width,
y0 - canvas->scroll_y1 * scale,
width, height);
cairo_restore (cr);
/* Get ordered list of merged regions */
merged_active = merged_active_seen = merged_used = NULL;
merged_unused = gnm_sheet_merge_get_overlap (sheet,
range_init (&view, start_col, start_row, end_col, end_row));
/*
* allocate a single blob of memory for all 8 arrays of pointers.
* - 6 arrays of n GnmBorder const *
* - 2 arrays of n GnmStyle const *
*
* then alias the arrays for easy access so that array [col] is valid
* for all elements start_col-1 .. end_col+1 inclusive.
* Note that this means that in some cases array [-1] is legal.
*/
n = end_col - start_col + 3; /* 1 before, 1 after, 1 fencepost */
style_row_init (&prev_vert, &sr, &next_sr, start_col, end_col,
g_alloca (n * 8 * sizeof (gpointer)), sheet->hide_grid);
/* load up the styles for the first row */
next_sr.row = sr.row = row = start_row;
sheet_style_get_row (sheet, &sr);
/* Collect the column widths */
colwidths = g_alloca (n * sizeof (int));
colwidths -= start_col;
for (col = start_col; col <= end_col; col++) {
ColRowInfo const *ci = sheet_col_get_info (sheet, col);
colwidths[col] = ci->visible ? ci->size_pixels : -1;
}
goc_canvas_c2w (canvas, start_x / scale, 0, &x, NULL);
start_x = x;
for (y = start_y; row <= end_row; row = sr.row = next_sr.row, ri = next_ri) {
/* Restore the set of ranges seen, but still active.
* Reinverting list to maintain the original order */
g_return_val_if_fail (merged_active == NULL, TRUE);
#if DEBUG_SELECTION_PAINT
g_printerr ("row = %d (startcol = %d)\n", row, start_col);
#endif
while (merged_active_seen != NULL) {
GSList *tmp = merged_active_seen->next;
merged_active_seen->next = merged_active;
merged_active = merged_active_seen;
merged_active_seen = tmp;
MERGE_DEBUG (merged_active->data, " : seen -> active\n");
}
/* find the next visible row */
while (1) {
++next_sr.row;
if (next_sr.row <= end_row) {
next_ri = sheet_row_get_info (sheet, next_sr.row);
if (next_ri->visible) {
sheet_style_get_row (sheet, &next_sr);
break;
}
} else {
for (col = start_col ; col <= end_col; ++col)
next_sr.vertical [col] =
next_sr.bottom [col] = none;
break;
}
}
/* look for merges that start on this row, on the first painted row
* also check for merges that start above. */
view.start.row = row;
lag = &merged_unused;
for (ptr = merged_unused; ptr != NULL; ) {
GnmRange * const r = ptr->data;
if (r->start.row <= row) {
GSList *tmp = ptr;
ptr = *lag = tmp->next;
if (r->end.row < row) {
tmp->next = merged_used;
merged_used = tmp;
MERGE_DEBUG (r, " : unused -> used\n");
} else {
ColRowInfo const *ci =
sheet_col_get_info (sheet, r->start.col);
g_slist_free_1 (tmp);
merged_active = g_slist_insert_sorted (merged_active, r,
(GCompareFunc)merged_col_cmp);
MERGE_DEBUG (r, " : unused -> active\n");
if (ci->visible)
item_grid_draw_merged_range (cr, ig,
start_x, y, &view, r,
draw_selection,
ctxt);
}
} else {
lag = &(ptr->next);
ptr = ptr->next;
}
}
for (col = start_col, x = start_x; col <= end_col ; col++) {
GnmStyle const *style;
CellSpanInfo const *span;
ColRowInfo const *ci = sheet_col_get_info (sheet, col);
#if DEBUG_SELECTION_PAINT
g_printerr ("col [%d] = %d\n", col, x);
#endif
if (!ci->visible) {
if (merged_active != NULL) {
GnmRange const *r = merged_active->data;
if (r->end.col == col) {
ptr = merged_active;
merged_active = merged_active->next;
if (r->end.row <= row) {
ptr->next = merged_used;
merged_used = ptr;
MERGE_DEBUG (r, " : active2 -> used\n");
} else {
ptr->next = merged_active_seen;
merged_active_seen = ptr;
MERGE_DEBUG (r, " : active2 -> seen\n");
}
}
}
continue;
}
/* Skip any merged regions */
if (merged_active != NULL) {
GnmRange const *r = merged_active->data;
if (r->start.col <= col) {
gboolean clear_top, clear_bottom = FALSE;
int i, first = r->start.col;
int last = r->end.col;
ptr = merged_active;
merged_active = merged_active->next;
if (r->end.row <= row) {
ptr->next = merged_used;
merged_used = ptr;
MERGE_DEBUG (r, " : active -> used\n");
/* in case something managed the bottom of a merge */
if (r->end.row < row)
goto plain_draw;
} else {
ptr->next = merged_active_seen;
merged_active_seen = ptr;
MERGE_DEBUG (r, " : active -> seen\n");
if (next_sr.row <= r->end.row)
clear_bottom = TRUE;
}
x += dir * scg_colrow_distance_get (
pane->simple.scg, TRUE, col, last+1);
col = last;
if (first < start_col) {
first = start_col;
sr.vertical [first] = NULL;
}
if (last > end_col) {
last = end_col;
sr.vertical [last+1] = NULL;
}
clear_top = (r->start.row != row);
/* Clear the borders */
for (i = first ; i <= last ; i++) {
if (clear_top)
sr.top [i] = NULL;
if (clear_bottom)
sr.bottom [i] = NULL;
if (i > first)
sr.vertical [i] = NULL;
}
continue;
}
}
plain_draw : /* a quick hack to deal with 142267 */
if (dir < 0)
x -= ci->size_pixels;
style = sr.styles [col];
item_grid_draw_background (cr, ig,
style, col, row, x, y,
ci->size_pixels, ri->size_pixels,
draw_selection, ctxt);
/* Is this part of a span?
* 1) There are cells allocated in the row
* (indicated by ri->spans != NULL)
* 2) Look in the rows hash table to see if
* there is a span descriptor.
*/
if (NULL == ri->spans || NULL == (span = row_span_get (ri, col))) {
/* If it is being edited pretend it is empty to
* avoid problems with long cells'
* contents extending past the edge of the edit
* box. Ignore blanks too.
*/
GnmCell const *cell = sheet_cell_get (sheet, col, row);
if (!gnm_cell_is_empty (cell) && cell != edit_cell) {
if (show_function_cell_markers)
draw_function_marker (ig, cell, cr, x, y,
ci->size_pixels,
ri->size_pixels,
dir);
cell_draw (cell, cr,
x, y, ci->size_pixels,
ri->size_pixels, -1,
show_extension_markers);
}
/* Only draw spaning cells after all the backgrounds
* that we are going to draw have been drawn. No need
* to draw the edit cell, or blanks. */
} else if (edit_cell != span->cell &&
(col == span->right || col == end_col)) {
GnmCell const *cell = span->cell;
int const start_span_col = span->left;
int const end_span_col = span->right;
int real_x = x;
ColRowInfo const *cell_col =
sheet_col_get_info (sheet, cell->pos.col);
int center_offset = cell_col->size_pixels/2;
int tmp_width = ci->size_pixels;
if (col != cell->pos.col)
style = sheet_style_get (sheet,
cell->pos.col, row);
/* x, y are relative to this cell origin, but the cell
* might be using columns to the left (if it is set to right
* justify or center justify) compute the pixel difference */
if (dir > 0 && start_span_col != cell->pos.col)
center_offset += scg_colrow_distance_get (
pane->simple.scg, TRUE,
start_span_col, cell->pos.col);
else if (dir < 0 && end_span_col != cell->pos.col)
center_offset += scg_colrow_distance_get (
pane->simple.scg, TRUE,
cell->pos.col, end_span_col);
if (start_span_col != col) {
offset = scg_colrow_distance_get (
pane->simple.scg, TRUE,
start_span_col, col);
tmp_width += offset;
if (dir > 0)
real_x -= offset;
sr.vertical [col] = NULL;
}
if (end_span_col != col) {
offset = scg_colrow_distance_get (
pane->simple.scg, TRUE,
col+1, end_span_col + 1);
tmp_width += offset;
if (dir < 0)
real_x -= offset;
}
if (show_function_cell_markers)
draw_function_marker (ig, cell, cr, real_x, y,
tmp_width,
ri->size_pixels, dir);
cell_draw (cell, cr,
real_x, y, tmp_width,
ri->size_pixels, center_offset,
show_extension_markers);
} else if (col != span->left)
sr.vertical [col] = NULL;
if (dir > 0)
x += ci->size_pixels;
}
gnm_style_borders_row_draw (prev_vert, &sr,
cr, start_x, y, y+ri->size_pixels,
colwidths, TRUE, dir);
/* In case there were hidden merges that trailed off the end */
while (merged_active != NULL) {
GnmRange const *r = merged_active->data;
ptr = merged_active;
merged_active = merged_active->next;
if (r->end.row <= row) {
ptr->next = merged_used;
merged_used = ptr;
MERGE_DEBUG (r, " : active3 -> used\n");
} else {
ptr->next = merged_active_seen;
merged_active_seen = ptr;
MERGE_DEBUG (r, " : active3 -> seen\n");
}
}
/* roll the pointers */
borders = prev_vert; prev_vert = sr.vertical;
sr.vertical = next_sr.vertical; next_sr.vertical = borders;
borders = sr.top; sr.top = sr.bottom;
sr.bottom = next_sr.top = next_sr.bottom; next_sr.bottom = borders;
styles = sr.styles; sr.styles = next_sr.styles; next_sr.styles = styles;
y += ri->size_pixels;
}
if (ig->bound.start.row > 0 && start_y < 1)
ig_cairo_draw_bound (ig, cr, start_x, 1, x, 1);
if (ig->bound.start.col > 0) {
if (canvas->direction == GOC_DIRECTION_RTL && start_x >= goc_canvas_get_width (canvas)) {
x = goc_canvas_get_width (canvas);
ig_cairo_draw_bound (ig, cr, x, start_y, x, y);
} else if (canvas->direction == GOC_DIRECTION_LTR && start_x < 1)
ig_cairo_draw_bound (ig, cr, 1, start_y, 1, y);
}
g_object_ref_sink (entry);
g_object_unref (entry);
g_slist_free (merged_used); /* merges with bottom in view */
g_slist_free (merged_active_seen); /* merges with bottom the view */
g_slist_free (merged_unused); /* merges in hidden rows */
g_return_val_if_fail (merged_active == NULL, TRUE);
return TRUE;
}
