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();
}
static void
init_splinepointmoving(void)
{
set_action_on();
/* turn off all markers */
update_markers(0);
from_x = cur_x = moved_point->x;
from_y = cur_y = moved_point->y;
set_cursor(crosshair_cursor);
if (open_spline(cur_s)) {
if (left_point == NULL || right_point == NULL) {
if (left_point != NULL) {
fix_x = left_point->x;
fix_y = left_point->y;
} else if (right_point != NULL) {
fix_x = right_point->x;
fix_y = right_point->y;
}
if (latexline_mode || latexarrow_mode) {
canvas_locmove_proc = latex_line;
canvas_ref_proc = elastic_line;
cur_latexcursor = crosshair_cursor;
} else if (mountain_mode || manhattan_mode) {
canvas_locmove_proc = constrainedangle_line;
canvas_ref_proc = elastic_line;
} else {
/* freehand line */
canvas_locmove_proc = reshaping_line;
canvas_ref_proc = elastic_linelink;
}
} else {
/* linelink, always freehand */
force_noanglegeom();
canvas_locmove_proc = reshaping_line;
canvas_ref_proc = elastic_linelink;
}
} else {
/* must be closed spline */
force_noanglegeom();
canvas_locmove_proc = reshaping_line;
canvas_ref_proc = elastic_linelink;
if (left_point == NULL) {
for (left_point = right_point;
left_point->next != NULL;
left_point = left_point->next);
}
if (right_point == NULL) {
right_point = cur_s->points; /* take the first */
}
}
/* show current length(s) */
(canvas_locmove_proc)(cur_x, cur_y);
elastic_linelink();
canvas_leftbut_proc = fix_movedsplinepoint;
canvas_rightbut_proc = cancel_movedsplinepoint;
}
int
close_to_spline(F_spline *spline, int xp, int yp, int d, int *px, int *py, int *lx1, int *ly1, int *lx2, int *ly2)
{
float precision;
tx = xp; ty = yp; /* test point */
td = d; /* tolerance */
isfirst = True;
precision = HIGH_PRECISION;
if (open_spline(spline))
compute_open_spline(spline, precision);
else
compute_closed_spline(spline, precision);
if (DONE) {
*px = foundx;
*py = foundy;
*lx1 = px1;
*ly1 = py1;
*lx2 = px2;
*ly2 = py2;
}
return DONE;
}
void
spline_line(F_spline *s)
{
F_line *l;
F_point *tmppoint;
/* Now we turn s into a line */
if ((l = create_line()) == NULL)
return;
if (open_spline(s)) {
l->type = T_POLYLINE;
l->points = s->points;
} else {
l->type = T_POLYGON;
if ((l->points = create_point())==NULL)
return;
tmppoint = last_point(s->points);
l->points->x = tmppoint->x;
l->points->y = tmppoint->y;
l->points->next = copy_points(s->points);
}
l->style = s->style;
l->thickness = s->thickness;
l->pen_color = s->pen_color;
l->fill_color = s->fill_color;
l->depth = s->depth;
l->style_val = s->style_val;
l->cap_style = s->cap_style;
l->join_style = cur_joinstyle;
l->pen_style = s->pen_style;
l->radius = DEFAULT;
l->fill_style = s->fill_style;
if (s->for_arrow) {
l->for_arrow = create_arrow();
l->for_arrow->type = s->for_arrow->type;
l->for_arrow->style = s->for_arrow->style;
l->for_arrow->thickness = s->for_arrow->thickness;
l->for_arrow->wd = s->for_arrow->wd;
l->for_arrow->ht = s->for_arrow->ht;
} else {
l->for_arrow = NULL;
}
if (s->back_arrow) {
l->back_arrow = create_arrow();
l->back_arrow->type = s->back_arrow->type;
l->back_arrow->style = s->back_arrow->style;
l->back_arrow->thickness = s->back_arrow->thickness;
l->back_arrow->wd = s->back_arrow->wd;
l->back_arrow->ht = s->back_arrow->ht;
} else {
l->back_arrow = NULL;
}
/* now we have finished creating the line, we can get rid of the spline */
delete_spline(s);
/* and put in the new line */
mask_toggle_linemarker(l);
list_add_line(&objects.lines, l);
redisplay_line(l);
set_action_object(F_CONVERT, O_SPLINE);
set_latestline(l);
set_modifiedflag();
return;
}
