$extrastylesheet
Olena  User documentation 2.1
An Image Processing Platform
 All Classes Namespaces Functions Variables Typedefs Enumerations Enumerator Friends Groups Pages
objects_large.cc
1 // Copyright (C) 2009, 2010 EPITA Research and Development Laboratory
2 // (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 <mln/core/image/image2d.hh>
28 #include <mln/core/alias/neighb2d.hh>
29 #include <mln/data/convert.hh>
30 #include <mln/io/pbm/all.hh>
31 
32 #include <mln/value/label_16.hh>
33 
34 #include <scribo/primitive/extract/components.hh>
35 #include <scribo/filter/objects_large.hh>
36 #include <scribo/debug/usage.hh>
37 
38 const char *args_desc[][2] =
39 {
40  { "input.pbm", "A binary image. 'True' for objects, 'False' for the "
41  "background." },
42  { "max_area", "The maximum object area value. Objects with an area greater"
43  " than this value are removed." },
44  {0, 0}
45 };
46 
47 int main(int argc, char *argv[])
48 {
49  using namespace mln;
50  using namespace scribo;
51 
52  if (argc != 4)
53  return scribo::debug::usage(argv,
54  "Filter too large objects",
55  "input.pbm max_area output.pbm",
56  args_desc);
57 
58  mln_trace("main");
59 
60  typedef image2d<bool> I;
61  I input;
62  io::pbm::load(input, argv[1]);
63 
64  typedef value::label_16 V;
65  V nobjects;
66  typedef image2d<V> L;
67  component_set<L> comps
68  = scribo::primitive::extract::components(input, c8(), nobjects);
69 
71  filtered = scribo::filter::components_large(comps, atoi(argv[2]));
72  io::pbm::save(data::convert(bool(), filtered.labeled_image()), argv[3]);
73 
74 
75 }