$extrastylesheet
Olena  User documentation 2.1
An Image Processing Platform
 All Classes Namespaces Functions Variables Typedefs Enumerations Enumerator Friends Groups Pages
show_links_single_up_right_aligned.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/value/rgb8.hh>
35 #include <mln/value/label_16.hh>
36 #include <mln/literal/colors.hh>
37 
38 #include <mln/io/pbm/load.hh>
39 #include <mln/io/ppm/save.hh>
40 
41 #include <mln/math/pi.hh>
42 
43 #include <mln/draw/line.hh>
44 
45 #include <scribo/primitive/extract/components.hh>
46 #include <scribo/primitive/link/with_single_up_link.hh>
47 #include <scribo/primitive/link/compute.hh>
48 #include <scribo/filter/object_links_right_aligned.hh>
49 
50 #include <scribo/draw/bounding_boxes.hh>
51 
52 #include <scribo/debug/linked_bboxes_image.hh>
53 #include <scribo/debug/usage.hh>
54 
55 
56 const char *args_desc[][2] =
57 {
58  { "input.pbm", "A binary image. True for objects and False for the "
59  "background." },
60  { "dmax", "The maximum lookup distance. (common value : 300)" },
61  {0, 0}
62 };
63 
64 
65 int main(int argc, char* argv[])
66 {
67  using namespace scribo;
68  using namespace scribo::primitive::internal;
69  using namespace mln;
70 
71  if (argc != 4)
72  return scribo::debug::usage(argv,
73  "Show sucessful/unsuccessful up links "
74  "between components.",
75  "input.pbm dmax output.ppm",
76  args_desc);
77 
78  typedef image2d<bool> I;
79  I input;
80  io::pbm::load(input, argv[1]);
81 
82  // Finding objects.
83  value::label_16 nbboxes;
84  typedef image2d<value::label_16> L;
85  component_set<L> comps
86  = scribo::primitive::extract::components(input, c8(), nbboxes);
87 
89  up_links = primitive::link::with_single_up_link(comps,
90  atoi(argv[2]),
91  anchor::Right);
92 
93  // Filtering.
94  up_links = filter::object_links_right_aligned(up_links, 5);
95 
96 
98  literal::blue,
99  literal::green,
100  anchor::StrictRight),
101  argv[3]);
102 }