void
splinepoint_deleting(F_spline *spline, F_point *previous_point, F_point *selected_point)
{
F_point *next_point;
F_sfactor *s_prev_point, *selected_sfactor;
next_point = selected_point->next;
set_temp_cursor(wait_cursor);
clean_up();
set_last_prevpoint(previous_point);
/* delete it and redraw underlying objects */
list_delete_spline(&objects.splines, spline);
draw_spline(spline, ERASE);
redisplay_spline(spline);
if (previous_point == NULL) {
spline->points = next_point;
if (open_spline(spline)) {
selected_sfactor = spline->sfactors->next;
spline->sfactors->next = selected_sfactor->next;
} else {
selected_sfactor = spline->sfactors;
spline->sfactors = spline->sfactors->next;
}
} else {
previous_point->next = next_point;
if ((next_point == NULL) && (open_spline(spline)))
previous_point = prev_point(spline->points, previous_point);
s_prev_point = search_sfactor(spline,previous_point);
selected_sfactor = s_prev_point->next;
s_prev_point->next = s_prev_point->next->next;
}
/* put it back in the list and draw the new spline */
list_add_spline(&objects.splines, spline);
/* redraw it and anything on top of it */
redisplay_spline(spline);
set_action_object(F_DELETE_POINT, O_SPLINE);
set_latestspline(spline);
set_last_selectedpoint(selected_point);
set_last_selectedsfactor(selected_sfactor);
set_last_nextpoint(next_point);
set_modifiedflag();
reset_cursor();
}
void
toggle_open_closed_spline(F_spline *spline, F_point *previous_point, F_point *selected_point)
{
F_point *last_pt;
F_sfactor *last_sfactor, *previous_sfactor, *selected_sfactor;
if (spline->points->next == NULL || spline->points->next->next == NULL) {
put_msg("Not enough points for a spline");
beep();
return; /* less than 3 points - don't close the spline */
}
last_pt = last_point(spline->points);
last_sfactor = search_sfactor(spline, last_pt);
if (previous_point == NULL)
{
previous_sfactor = NULL;
selected_sfactor = spline->sfactors;
}
else
{
previous_sfactor = search_sfactor(spline, previous_point);
selected_sfactor = previous_sfactor->next;
set_last_tension(selected_sfactor->s, previous_sfactor->s);
}
draw_spline(spline, ERASE);
if (closed_spline(spline))
{
if (spline->points != selected_point)
{
last_pt->next = spline->points;
last_sfactor->next = spline->sfactors;
previous_point->next = NULL;
previous_sfactor->next = NULL;
previous_sfactor->s = S_SPLINE_ANGULAR;
spline->points = selected_point;
spline->sfactors = selected_sfactor;
}
else
{
last_sfactor->s = S_SPLINE_ANGULAR;
}
spline->sfactors->s = S_SPLINE_ANGULAR;
spline->type = (x_spline(spline)) ? T_OPEN_XSPLINE :
(int_spline(spline)) ? T_OPEN_INTERP : T_OPEN_APPROX;
clean_up();
}
else
{
int type_tmp;
double s_tmp;
if(int_spline(spline))
{
s_tmp = S_SPLINE_INTERP;
type_tmp = T_CLOSED_INTERP;
}
else
if (x_spline(spline))
{
s_tmp = S_SPLINE_INTERP;
type_tmp = T_CLOSED_XSPLINE;
}
else
{
s_tmp = S_SPLINE_APPROX;
type_tmp = T_CLOSED_APPROX;
}
spline->sfactors->s = last_sfactor->s = s_tmp;
spline->type = type_tmp;
clean_up();
set_last_arrows(spline->for_arrow, spline->back_arrow);
spline->back_arrow = spline->for_arrow = NULL;
}
draw_spline(spline, PAINT);
set_action_object(F_OPEN_CLOSE, O_SPLINE);
set_last_selectedpoint(spline->points);
set_last_prevpoint(NULL);
set_latestspline(spline);
set_modifiedflag();
}
