$extrastylesheet
Olena  User documentation 2.1
An Image Processing Platform
 All Classes Namespaces Functions Variables Typedefs Enumerations Enumerator Friends Groups Pages
lines_thick_and_thin.cc
1 // Copyright (C) 2011 EPITA Research and Development Laboratory (LRDE)
2 //
3 // This file is part of Olena.
4 //
5 // Olena is free software: you can redistribute it and/or modify it under
6 // the terms of the GNU General Public License as published by the Free
7 // Software Foundation, version 2 of the License.
8 //
9 // Olena is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 // General Public License for more details.
13 //
14 // You should have received a copy of the GNU General Public License
15 // along with Olena. If not, see <http://www.gnu.org/licenses/>.
16 //
17 // As a special exception, you may use this file as part of a free
18 // software project without restriction. Specifically, if other files
19 // instantiate templates or use macros or inline functions from this
20 // file, or you compile this file and link it with other files to produce
21 // an executable, this file does not by itself cause the resulting
22 // executable to be covered by the GNU General Public License. This
23 // exception does not however invalidate any other reasons why the
24 // executable file might be covered by the GNU General Public License.
25 
26 #include <scribo/primitive/extract/lines_h_thick_and_thin.hh>
27 #include <scribo/preprocessing/rotate_90.hh>
28 
29 #include <scribo/debug/usage.hh>
30 
31 #include <mln/core/alias/neighb2d.hh>
32 #include <mln/labeling/compute.hh>
33 #include <mln/labeling/foreground.hh>
34 
35 
36 const char *args_desc[][2] =
37 {
38  { "input.pbm", "A binary image." },
39  { "output.pbm", " A binary image with thick and thin horizontal"
40  " separators." },
41  { "length", "The minimum length of the lines. (default : 101)" },
42  { "delta", "The lookhead distance between a line pixel and the background."
43  " (default : 3)" },
44  {0, 0}
45 };
46 
47 
48 int main(int argc, char *argv[])
49 {
50  if (argc != 3 && argc != 4 && argc != 5)
51  return scribo::debug::usage(argv,
52  "Extract thick and thin horizontal lines",
53  "input.pbm output.pbm [length] [delta]",
54  args_desc);
55 
56  unsigned
57  length = 101,
58  delta = 3;
59 
60  if (argc >= 4)
61  length = atoi(argv[3]);
62  if (argc >= 5)
63  delta = atoi(argv[4]);
64 
65  using namespace mln;
66  using namespace scribo;
67 
68  typedef image2d<bool> I;
69 
70  I input;
71  io::pbm::load(input, argv[1]);
72 
73  // Cleanup components on borders
74  {
75  typedef scribo::def::lbl_type V;
76  V nlabels;
77  mln_ch_value_(I,V) lbl = labeling::foreground(input, c8(), nlabels);
78  mln::util::array<box2d>
79  bbox = labeling::compute(accu::shape::bbox<point2d>(), lbl, nlabels);
80 
81  const box2d& b = input.domain();
82  for_all_ncomponents(e, nlabels)
83  if (bbox(e).pmin().row() == b.pmin().row()
84  || bbox(e).pmax().row() == b.pmax().row()
85  || bbox(e).pmin().col() == b.pmin().col()
86  || bbox(e).pmax().col() == b.pmax().col())
87  data::fill(((input | bbox(e)).rw() | (pw::value(lbl) == pw::cst(e))).rw(), false);
88  }
89 
90  I hseparators = primitive::extract::lines_h_thick_and_thin(
91  input, length, delta);
92  I vseparators = preprocessing::rotate_90(
93  primitive::extract::lines_h_thick_and_thin(
94  preprocessing::rotate_90(input), length, delta, 0.1, 0.80, 2), false);
95 
96  I separators = duplicate(vseparators);
97  separators += hseparators;
98 
99  io::pbm::save(separators, argv[2]);
100 }