static void iMatrixEditUpdateValue(Ihandle* ih)
{
char *value = iupMatrixEditGetValue(ih);
iupAttribSet(ih, "CELL_EDITED", "Yes");
if (ih->data->undo_redo) iupAttribSetClassObject(ih, "UNDOPUSHBEGIN", "EDITCELL");
iupMatrixSetValue(ih, ih->data->edit_lin, ih->data->edit_col, value, 1);
if (ih->data->undo_redo) iupAttribSetClassObject(ih, "UNDOPUSHEND", NULL);
iupBaseCallValueChangedCb(ih);
iupAttribSet(ih, "CELL_EDITED", NULL);
iupMatrixPrepareDrawData(ih);
iupMatrixDrawCells(ih, ih->data->edit_lin, ih->data->edit_col, ih->data->edit_lin, ih->data->edit_col);
}
void iupMatrixMemReAllocColumns(Ihandle* ih, int old_num, int num, int base)
{
int lin, col, end, diff_num, shift_num;
if (ih->data->undo_redo) iupAttribSetClassObject(ih, "UNDOCLEAR", NULL);
/* base is the first column where the change started */
/* If it doesn't have enough columns allocated, then allocate more space */
if (num > ih->data->columns.num_alloc) /* this also implicates that also num>old_num */
{
ih->data->columns.num_alloc = num;
/* new space are allocated at the end, later we need to move the old data and clear the available space */
if (!ih->data->callback_mode)
{
for(lin = 0; lin < ih->data->lines.num_alloc; lin++)
ih->data->cells[lin] = (ImatCell*)realloc(ih->data->cells[lin], ih->data->columns.num_alloc*sizeof(ImatCell));
}
ih->data->columns.dt = (ImatLinCol*)realloc(ih->data->columns.dt, ih->data->columns.num_alloc*sizeof(ImatLinCol));
if (ih->data->numeric_columns)
ih->data->numeric_columns = (ImatNumericData*)realloc(ih->data->numeric_columns, ih->data->columns.num_alloc*sizeof(ImatNumericData));
}
if (old_num==num)
return;
if (num>old_num) /* ADD */
{
/* even if (old_num-base)>(num-old_num) memmove will correctly copy the memory */
/* then clear the openned space starting at base */
diff_num = num-old_num; /* size of the openned space */
shift_num = old_num-base; /* size of the data to be moved (base maximum is old_num) */
end = base+diff_num;
/* shift the old data, opening space for new data, from base to end */
if (shift_num)
{
if (!ih->data->callback_mode)
for (lin = 0; lin < ih->data->lines.num_alloc; lin++) /* all lines, shift_num columns */
memmove(ih->data->cells[lin]+end, ih->data->cells[lin]+base, shift_num*sizeof(ImatCell));
memmove(ih->data->columns.dt+end, ih->data->columns.dt+base, shift_num*sizeof(ImatLinCol));
if (ih->data->numeric_columns)
memmove(ih->data->numeric_columns+end, ih->data->numeric_columns+base, shift_num*sizeof(ImatNumericData));
}
/* then clear the openned space starting at base */
if (!ih->data->callback_mode)
for (lin = 0; lin < ih->data->lines.num_alloc; lin++) /* all lines, diff_num columns */
memset(ih->data->cells[lin]+base, 0, diff_num*sizeof(ImatCell));
memset(ih->data->columns.dt+base, 0, diff_num*sizeof(ImatLinCol));
if (ih->data->numeric_columns)
memset(ih->data->numeric_columns+base, 0, diff_num*sizeof(ImatNumericData));
}
else /* DEL */
{
diff_num = old_num-num; /* size of the removed space */
shift_num = num-base; /* size of the data to be moved */
end = base+diff_num;
/* release memory from the opened space */
if (!ih->data->callback_mode)
{
for (lin = 0; lin < ih->data->lines.num_alloc; lin++) /* all lines, base-end columns */
{
for(col = base; col < end; col++)
{
ImatCell* cell = &(ih->data->cells[lin][col]);
if (cell->value)
{
free(cell->value);
cell->value = NULL;
}
cell->flags = 0;
}
}
}
/* move the old data to opened space from end to base */
/* even if (num-base)>(old_num-num) memmove will correctly copy the memory */
if (shift_num)
{
if (!ih->data->callback_mode)
for (lin = 0; lin < ih->data->lines.num_alloc; lin++) /* all lines, shift_num columns */
memmove(ih->data->cells[lin]+base, ih->data->cells[lin]+end, shift_num*sizeof(ImatCell));
memmove(ih->data->columns.dt+base, ih->data->columns.dt+end, shift_num*sizeof(ImatLinCol));
if (ih->data->numeric_columns)
memmove(ih->data->numeric_columns+base, ih->data->numeric_columns+end, shift_num*sizeof(ImatNumericData));
}
/* then clear the remaining space starting at num */
if (!ih->data->callback_mode)
for (lin = 0; lin < ih->data->lines.num_alloc; lin++) /* all lines, diff_num columns */
memset(ih->data->cells[lin]+num, 0, diff_num*sizeof(ImatCell));
memset(ih->data->columns.dt+num, 0, diff_num*sizeof(ImatLinCol));
if (ih->data->numeric_columns)
memset(ih->data->numeric_columns+num, 0, diff_num*sizeof(ImatNumericData));
}
}
void iupMatrixMemReAllocLines(Ihandle* ih, int old_num, int num, int base)
{
int lin, col, end, diff_num, shift_num;
if (ih->data->undo_redo) iupAttribSetClassObject(ih, "UNDOCLEAR", NULL);
/* base is the first line where the change started */
/* If it doesn't have enough lines allocated, then allocate more space */
if (num > ih->data->lines.num_alloc) /* this also implicates that num>old_num */
{
int old_alloc = ih->data->lines.num_alloc;
ih->data->lines.num_alloc = num;
if (!ih->data->callback_mode)
{
ih->data->cells = (ImatCell**)realloc(ih->data->cells, ih->data->lines.num_alloc*sizeof(ImatCell*));
/* new space are allocated at the end, later we need to move the old data and clear the available space */
for(lin = old_alloc; lin < num; lin++)
ih->data->cells[lin] = (ImatCell*)calloc(ih->data->columns.num_alloc, sizeof(ImatCell));
}
ih->data->lines.dt = (ImatLinCol*)realloc(ih->data->lines.dt, ih->data->lines.num_alloc*sizeof(ImatLinCol));
if (ih->data->sort_line_index)
ih->data->sort_line_index = (int*)realloc(ih->data->sort_line_index, ih->data->lines.num_alloc*sizeof(int));
}
if (old_num==num)
return;
if (num>old_num) /* ADD */
{
diff_num = num-old_num; /* size of the openned space */
shift_num = old_num-base; /* size of the data to be moved (base maximum is old_num) */
end = base+diff_num;
/* shift the old data, opening space for new data, from base to end */
/* do it in reverse order to avoid overlapping */
if (shift_num)
{
if (!ih->data->callback_mode)
for (lin = shift_num-1; lin >= 0; lin--) /* all columns, shift_num lines */
memmove(ih->data->cells[lin+end], ih->data->cells[lin+base], ih->data->columns.num_alloc*sizeof(ImatCell));
memmove(ih->data->lines.dt+end, ih->data->lines.dt+base, shift_num*sizeof(ImatLinCol));
if (ih->data->sort_line_index)
memmove(ih->data->sort_line_index+end, ih->data->sort_line_index+base, shift_num*sizeof(int));
}
/* then clear the new space starting at base */
if (!ih->data->callback_mode)
for (lin = 0; lin < diff_num; lin++) /* all columns, diff_num lines */
memset(ih->data->cells[lin+base], 0, ih->data->columns.num_alloc*sizeof(ImatCell));
memset(ih->data->lines.dt+base, 0, diff_num*sizeof(ImatLinCol));
if (ih->data->sort_line_index)
{
memset(ih->data->sort_line_index+base, 0, diff_num*sizeof(int));
/* update indices */
if (ih->data->sort_has_index)
for(lin=1; lin<num; lin++)
if (ih->data->sort_line_index[lin] >= base)
ih->data->sort_line_index[lin] += diff_num;
}
}
else /* DEL */
{
diff_num = old_num-num; /* size of the removed space */
shift_num = num-base; /* size of the data to be moved */
end = base+diff_num;
/* release memory from the opened space */
if (!ih->data->callback_mode)
{
for(lin = base; lin < end; lin++) /* all columns, base-end lines */
{
for (col = 0; col < ih->data->columns.num_alloc; col++)
{
ImatCell* cell = &(ih->data->cells[lin][col]);
if (cell->value)
{
free(cell->value);
cell->value = NULL;
}
cell->flags = 0;
}
}
}
/* move the old data to opened space from end to base */
if (shift_num)
{
if (!ih->data->callback_mode)
for (lin = 0; lin < shift_num; lin++) /* all columns, shift_num lines */
memmove(ih->data->cells[lin+base], ih->data->cells[lin+end], ih->data->columns.num_alloc*sizeof(ImatCell));
memmove(ih->data->lines.dt+base, ih->data->lines.dt+end, shift_num*sizeof(ImatLinCol));
if (ih->data->sort_line_index)
memmove(ih->data->sort_line_index+base, ih->data->sort_line_index+end, shift_num*sizeof(int));
}
/* then clear the remaining space starting at num */
if (!ih->data->callback_mode)
for (lin = 0; lin < diff_num; lin++) /* all columns, diff_num lines */
memset(ih->data->cells[lin+num], 0, ih->data->columns.num_alloc*sizeof(ImatCell));
memset(ih->data->lines.dt+num, 0, diff_num*sizeof(ImatLinCol));
if (ih->data->sort_line_index)
{
memset(ih->data->sort_line_index+num, 0, diff_num*sizeof(int));
/* update indices */
if (ih->data->sort_has_index)
for(lin=1; lin<num; lin++)
if (ih->data->sort_line_index[lin] >= base)
ih->data->sort_line_index[lin] -= diff_num;
}
}
}
