$extrastylesheet
Olena  User documentation 2.1
An Image Processing Platform
 All Classes Namespaces Functions Variables Typedefs Enumerations Enumerator Friends Groups Pages
show_links_several_right_overlap.cc
1 // Copyright (C) 2009, 2010, 2011 EPITA Research and Development
2 // Laboratory (LRDE)
3 //
4 // This file is part of Olena.
5 //
6 // Olena is free software: you can redistribute it and/or modify it under
7 // the terms of the GNU General Public License as published by the Free
8 // Software Foundation, version 2 of the License.
9 //
10 // Olena is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 // General Public License for more details.
14 //
15 // You should have received a copy of the GNU General Public License
16 // along with Olena. If not, see <http://www.gnu.org/licenses/>.
17 //
18 // As a special exception, you may use this file as part of a free
19 // software project without restriction. Specifically, if other files
20 // instantiate templates or use macros or inline functions from this
21 // file, or you compile this file and link it with other files to produce
22 // an executable, this file does not by itself cause the resulting
23 // executable to be covered by the GNU General Public License. This
24 // exception does not however invalidate any other reasons why the
25 // executable file might be covered by the GNU General Public License.
26 
27 #include <iostream>
28 
29 #include <mln/core/image/image2d.hh>
30 #include <mln/core/alias/neighb2d.hh>
31 
32 #include <mln/data/convert.hh>
33 
34 #include <mln/util/couple.hh>
35 
36 #include <mln/value/rgb8.hh>
37 #include <mln/value/label_16.hh>
38 #include <mln/literal/colors.hh>
39 
40 #include <mln/io/pbm/load.hh>
41 #include <mln/io/ppm/save.hh>
42 
43 #include <mln/draw/line.hh>
44 
45 #include <scribo/primitive/extract/components.hh>
46 #include <scribo/primitive/link/internal/link_several_dmax_base.hh>
47 #include <scribo/primitive/link/internal/compute_anchor.hh>
48 #include <scribo/primitive/link/compute_several.hh>
49 
50 #include <scribo/draw/bounding_boxes.hh>
51 #include <scribo/debug/usage.hh>
52 
53 
54 namespace scribo
55 {
56 
57  template <typename I, typename L>
58  struct several_right_overlap_debug_functor
59  : public primitive::link::internal::link_several_dmax_base<L, several_right_overlap_debug_functor<I, L> >
60  {
61  typedef several_right_overlap_debug_functor<I, L> self_t;
62  typedef
63  primitive::link::internal::link_several_dmax_base<L, self_t> super_;
64 
65  public:
66  typedef mln_site(L) P;
67 
68  several_right_overlap_debug_functor(const I& input,
69  const component_set<L>& comps,
70  unsigned dmax)
71  : super_(comps, dmax)
72  {
73  this->anchors_.append(anchor::Top);
74  this->anchors_.append(anchor::Bottom);
75  this->anchors_.append(anchor::Center);
76 
77  output_ = data::convert(value::rgb8(), input);
78  scribo::draw::bounding_boxes(output_, comps, literal::blue);
79  mln_postcondition(output_.is_valid());
80  }
81 
82 
84  finalize_link_(unsigned current_object)
85  {
87  c = super_::finalize_link_(current_object);
88 
89  if (c.first() != anchor::Invalid)
90  {
91  mln_site(L)
92  p = primitive::link::internal::compute_anchor(this->components_,
93  current_object,
94  c.first());
95  mln::draw::line(output_, p, c.second(), literal::green);
96  }
97 
98  return c;
99  }
100 
101  mln_site(L)
102  start_point_(unsigned current_object, anchor::Type anchor)
103  {
104  return primitive::link::internal::compute_anchor(this->components_,
105  current_object,
106  anchor);
107  }
108 
109 
110  void compute_next_site_(P& p)
111  {
112  ++p.col();
113  }
114 
115 
116  image2d<value::rgb8> output_;
117  };
118 
119 
120 }
121 
122 
123 const char *args_desc[][2] =
124 {
125  { "input.pbm", "A binary image. True for objects and False for the background." },
126  { "max_nbh_dist", "The maximum lookup distance. (common value : 30)" },
127  {0, 0}
128 };
129 
130 
131 int main(int argc, char* argv[])
132 {
133  using namespace scribo;
134  using namespace scribo::primitive::internal;
135  using namespace mln;
136 
137  if (argc != 4)
138  return scribo::debug::usage(argv,
139  "Show sucessful/unsuccessful right links "
140  "between components.",
141  "input.pbm max_nbh_dist output.ppm",
142  args_desc);
143 
144  typedef image2d<bool> I;
145  I input;
146  io::pbm::load(input, argv[1]);
147 
148  // Finding objects.
149  value::label_16 nbboxes;
150  typedef image2d<value::label_16> L;
151  component_set<L> comps
152  = scribo::primitive::extract::components(input, c8(), nbboxes);
153 
154  // Write debug image.
155  several_right_overlap_debug_functor<I, L> functor(input,
156  comps, atoi(argv[2]));
158 
159  io::ppm::save(functor.output_, argv[3]);
160 }