File: wrapper.c

package info (click to toggle)
graphviz 14.1.2-1
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 139,476 kB
  • sloc: ansic: 142,288; cpp: 11,975; python: 7,883; makefile: 4,044; yacc: 3,030; xml: 2,972; tcl: 2,495; sh: 1,391; objc: 1,159; java: 560; lex: 423; perl: 243; awk: 156; pascal: 139; php: 58; ruby: 49; cs: 31; sed: 1
file content (81 lines) | stat: -rw-r--r-- 2,872 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
/*************************************************************************
 * Copyright (c) 2011 AT&T Intellectual Property
 * All rights reserved. This program and the accompanying materials
 * are made available under the terms of the Eclipse Public License v1.0
 * which accompanies this distribution, and is available at
 * https://www.eclipse.org/legal/epl-v10.html
 *
 * Contributors: Details at https://graphviz.org
 *************************************************************************/

#include "config.h"

#include "Plegal_arrangement.h"
#include "simple.h"
#include <pathplan/pathgeom.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include <util/alloc.h>
#include <util/gv_math.h>
#include <util/list.h>
#include <util/prisize_t.h>

static bool eq_pt(const struct position v, const struct intersection w) {
  return is_exactly_equal(v.x, w.x) && is_exactly_equal(v.y, w.y);
}

int Plegal_arrangement(Ppoly_t **polys, size_t n_polys) {

  intersections_t ilist = {0};

  struct polygon *polygon_list = gv_calloc(n_polys, sizeof(struct polygon));

  size_t nverts = 0;
  for (size_t i = 0; i < n_polys; i++)
    nverts += polys[i]->pn;

  struct vertex *vertex_list = gv_calloc(nverts, sizeof(struct vertex));

  for (size_t i = 0, vno = 0; i < n_polys; i++) {
    polygon_list[i].start = &vertex_list[vno];
    for (size_t j = 0; j < polys[i]->pn; j++) {
      vertex_list[vno].pos.x = polys[i]->ps[j].x;
      vertex_list[vno].pos.y = polys[i]->ps[j].y;
      vertex_list[vno].poly = &polygon_list[i];
      vno++;
    }
    polygon_list[i].finish = &vertex_list[vno - 1];
  }

  find_ints(vertex_list, nverts, &ilist);

  int rv = 1;
  for (size_t i = 0; i < LIST_SIZE(&ilist); i++) {
    struct intersection inter = LIST_GET(&ilist, i);
    const struct position vft = inter.firstv->pos;
    const struct position avft = after(inter.firstv)->pos;
    const struct position vsd = inter.secondv->pos;
    const struct position avsd = after(inter.secondv)->pos;
    if ((!is_exactly_equal(vft.x, avft.x) &&
         !is_exactly_equal(vsd.x, avsd.x)) ||
        (is_exactly_equal(vft.x, avft.x) && !eq_pt(vft, inter) &&
         !eq_pt(avft, inter)) ||
        (is_exactly_equal(vsd.x, avsd.x) && !eq_pt(vsd, inter) &&
         !eq_pt(avsd, inter))) {
      rv = 0;
      fprintf(stderr, "\nintersection %" PRISIZE_T " at %.3f %.3f\n", i,
              inter.x, inter.y);
      fprintf(stderr, "seg#1 : (%.3f, %.3f) (%.3f, %.3f)\n",
              inter.firstv->pos.x, inter.firstv->pos.y,
              after(inter.firstv)->pos.x, after(inter.firstv)->pos.y);
      fprintf(stderr, "seg#2 : (%.3f, %.3f) (%.3f, %.3f)\n",
              inter.secondv->pos.x, inter.secondv->pos.y,
              after(inter.secondv)->pos.x, after(inter.secondv)->pos.y);
    }
  }
  free(polygon_list);
  free(vertex_list);
  LIST_FREE(&ilist);
  return rv;
}