ModHausdorffT.cc 12 KB
Newer Older
Jan Möbius's avatar
Jan Möbius committed
1 2 3
/*===========================================================================*\
 *                                                                           *
 *                               OpenMesh                                    *
Jan Möbius's avatar
Jan Möbius committed
4
 *      Copyright (C) 2001-2013 by Computer Graphics Group, RWTH Aachen      *
Jan Möbius's avatar
Jan Möbius committed
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
 *                           www.openmesh.org                                *
 *                                                                           *
 *---------------------------------------------------------------------------*
 *  This file is part of OpenMesh.                                           *
 *                                                                           *
 *  OpenMesh is free software: you can redistribute it and/or modify         *
 *  it under the terms of the GNU Lesser General Public License as           *
 *  published by the Free Software Foundation, either version 3 of           *
 *  the License, or (at your option) any later version with the              *
 *  following exceptions:                                                    *
 *                                                                           *
 *  If other files instantiate templates or use macros                       *
 *  or inline functions from this file, or you compile this file and         *
 *  link it with other files to produce an executable, this file does        *
 *  not by itself cause the resulting executable to be covered by the        *
 *  GNU Lesser General Public License. This exception does not however       *
 *  invalidate any other reasons why the executable file might be            *
 *  covered by the GNU Lesser General Public License.                        *
 *                                                                           *
 *  OpenMesh is distributed in the hope that it will be useful,              *
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of           *
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the            *
 *  GNU Lesser General Public License for more details.                      *
 *                                                                           *
 *  You should have received a copy of the GNU LesserGeneral Public          *
 *  License along with OpenMesh.  If not,                                    *
 *  see <http://www.gnu.org/licenses/>.                                      *
 *                                                                           *
\*===========================================================================*/

/*===========================================================================*\
 *                                                                           *
Jan Möbius's avatar
Jan Möbius committed
37 38
 *   $Revision$                                                        *
 *   $Date$                   *
Jan Möbius's avatar
Jan Möbius committed
39 40 41 42 43 44 45 46 47 48 49 50 51
 *                                                                           *
\*===========================================================================*/

/** \file ModHausdorffT.cc
 */


//=============================================================================
//
//  CLASS ModHausdorffT - IMPLEMENTATION
//
//=============================================================================

52
#define OPENMESH_DECIMATER_MODHAUSDORFFT_C
Jan Möbius's avatar
Jan Möbius committed
53 54 55 56 57 58 59 60 61 62 63 64 65 66


//== INCLUDES =================================================================

#include "ModHausdorffT.hh"


//== NAMESPACES ===============================================================

namespace OpenMesh  {
namespace Decimater {

//== IMPLEMENTATION ==========================================================

67 68 69
template <class MeshT>
typename ModHausdorffT<MeshT>::Scalar
ModHausdorffT<MeshT>::
Jan Möbius's avatar
Jan Möbius committed
70 71 72
distPointTriangleSquared( const Point& _p,
                          const Point& _v0,
                          const Point& _v1,
73
                          const Point& _v2 )
Jan Möbius's avatar
Jan Möbius committed
74
{
75 76 77 78
  const Point v0v1 = _v1 - _v0;
  const Point v0v2 = _v2 - _v0;
  const Point n = v0v1 % v0v2; // not normalized !
  const double d = n.sqrnorm();
Jan Möbius's avatar
Jan Möbius committed
79 80 81 82 83 84


  // Check if the triangle is degenerated
  if (d < FLT_MIN && d > -FLT_MIN) {
    return -1.0;
  }
85
  const double invD = 1.0 / d;
Jan Möbius's avatar
Jan Möbius committed
86 87 88

  // these are not needed for every point, should still perform
  // better with many points against one triangle
89 90 91 92
  const Point v1v2 = _v2 - _v1;
  const double inv_v0v2_2 = 1.0 / v0v2.sqrnorm();
  const double inv_v0v1_2 = 1.0 / v0v1.sqrnorm();
  const double inv_v1v2_2 = 1.0 / v1v2.sqrnorm();
Jan Möbius's avatar
Jan Möbius committed
93 94


Jan Möbius's avatar
Jan Möbius committed
95 96
  Point v0p = _p - _v0;
  Point t = v0p % n;
Jan Möbius's avatar
Jan Möbius committed
97
  typename Point::value_type  s01, s02, s12;
98 99
  const double a = (t | v0v2) * -invD;
  const double b = (t | v0v1) * invD;
Jan Möbius's avatar
Jan Möbius committed
100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131

  if (a < 0)
  {
    // Calculate the distance to an edge or a corner vertex
    s02 = ( v0v2 | v0p ) * inv_v0v2_2;
    if (s02 < 0.0)
    {
      s01 = ( v0v1 | v0p ) * inv_v0v1_2;
      if (s01 <= 0.0) {
        v0p = _v0;
      } else if (s01 >= 1.0) {
        v0p = _v1;
      } else {
        v0p = _v0 + v0v1 * s01;
      }
    } else if (s02 > 1.0) {
      s12 = ( v1v2 | ( _p - _v1 )) * inv_v1v2_2;
      if (s12 >= 1.0) {
        v0p = _v2;
      } else if (s12 <= 0.0) {
        v0p = _v1;
      } else {
        v0p = _v1 + v1v2 * s12;
      }
    } else {
      v0p = _v0 + v0v2 * s02;
    }
  } else if (b < 0.0) {
    // Calculate the distance to an edge or a corner vertex
    s01 = ( v0v1 | v0p ) * inv_v0v1_2;
    if (s01 < 0.0)
    {
132
  const Point n = v0v1 % v0v2; // not normalized !
Jan Möbius's avatar
Jan Möbius committed
133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178
      s02 = ( v0v2 |  v0p ) * inv_v0v2_2;
      if (s02 <= 0.0) {
        v0p = _v0;
      } else if (s02 >= 1.0) {
        v0p = _v2;
      } else {
        v0p = _v0 + v0v2 * s02;
      }
    } else if (s01 > 1.0) {
      s12 = ( v1v2 | ( _p - _v1 )) * inv_v1v2_2;
      if (s12 >= 1.0) {
        v0p = _v2;
      } else if (s12 <= 0.0) {
        v0p = _v1;
      } else {
        v0p = _v1 + v1v2 * s12;
      }
    } else {
      v0p = _v0 + v0v1 * s01;
    }
  } else if (a+b > 1.0) {
    // Calculate the distance to an edge or a corner vertex
    s12 = ( v1v2 | ( _p - _v1 )) * inv_v1v2_2;
    if (s12 >= 1.0) {
      s02 = ( v0v2 | v0p ) * inv_v0v2_2;
      if (s02 <= 0.0) {
        v0p = _v0;
      } else if (s02 >= 1.0) {
        v0p = _v2;
      } else {
        v0p = _v0 + v0v2*s02;
      }
    } else if (s12 <= 0.0) {
      s01 = ( v0v1 |  v0p ) * inv_v0v1_2;
      if (s01 <= 0.0) {
        v0p = _v0;
      } else if (s01 >= 1.0) {
        v0p = _v1;
      } else {
        v0p = _v0 + v0v1 * s01;
      }
    } else {
      v0p = _v1 + v1v2 * s12;
    }
  } else {
    // Calculate the distance to an interior point of the triangle
179
    return ( (_p - n*((n|v0p) * invD)) - _p).sqrnorm();
Jan Möbius's avatar
Jan Möbius committed
180 181
  }

182
  return (v0p - _p).sqrnorm();
Jan Möbius's avatar
Jan Möbius committed
183 184 185
}


186
template <class MeshT>
Jan Möbius's avatar
Jan Möbius committed
187
void
188
ModHausdorffT<MeshT>::
Jan Möbius's avatar
Jan Möbius committed
189 190 191 192 193
initialize()
{
  typename Mesh::FIter  f_it(mesh_.faces_begin()), f_end(mesh_.faces_end());

  for (; f_it!=f_end; ++f_it)
Jan Möbius's avatar
Jan Möbius committed
194
    mesh_.property(points_, *f_it).clear();
Jan Möbius's avatar
Jan Möbius committed
195 196 197 198 199 200
}


//-----------------------------------------------------------------------------


201
template <class MeshT>
Jan Möbius's avatar
Jan Möbius committed
202
float
203
ModHausdorffT<MeshT>::
Jan Möbius's avatar
Jan Möbius committed
204 205 206 207 208
collapse_priority(const CollapseInfo& _ci)
{
  std::vector<FaceHandle>        faces;   faces.reserve(20);
  typename Mesh::VertexFaceIter  vf_it;
  typename Mesh::FaceHandle      fh;
209
  const typename Mesh::Scalar    sqr_tolerace = tolerance_*tolerance_;
Jan Möbius's avatar
Jan Möbius committed
210 211 212
  typename Mesh::CFVIter         fv_it;
  bool                           ok;

213 214 215
  // Clear the temporary point storage
  tmp_points_.clear();

Jan Möbius's avatar
Jan Möbius committed
216 217
  // collect all points to be tested
  // collect all faces to be tested against
Jan Möbius's avatar
Jan Möbius committed
218
  for (vf_it=mesh_.vf_iter(_ci.v0); vf_it.is_valid(); ++vf_it) {
Jan Möbius's avatar
Jan Möbius committed
219
    fh = *vf_it;
Jan Möbius's avatar
Jan Möbius committed
220 221 222 223 224

    if (fh != _ci.fl && fh != _ci.fr)
      faces.push_back(fh);

    Points& pts = mesh_.property(points_, fh);
225
    std::copy(pts.begin(), pts.end(), std::back_inserter(tmp_points_));
Jan Möbius's avatar
Jan Möbius committed
226 227 228
  }

  // add point to be removed
229
  tmp_points_.push_back(_ci.p0);
Jan Möbius's avatar
Jan Möbius committed
230 231 232

  // setup iterators
  typename std::vector<FaceHandle>::iterator  fh_it, fh_end(faces.end());
233
  typename Points::const_iterator             p_it, p_end(tmp_points_.end());
Jan Möbius's avatar
Jan Möbius committed
234 235 236 237 238 239

  // simulate collapse
  mesh_.set_point(_ci.v0, _ci.p1);

  // for each point: try to find a face such that error is < tolerance
  ok = true;
240

241
  for (p_it=tmp_points_.begin(); ok && p_it!=p_end; ++p_it) {
Jan Möbius's avatar
Jan Möbius committed
242 243 244
    ok = false;

    for (fh_it=faces.begin(); !ok && fh_it!=fh_end; ++fh_it) {
Jan Möbius's avatar
Jan Möbius committed
245 246 247 248
      fv_it=mesh_.cfv_iter(*fh_it);
      const Point& p0 = mesh_.point(*fv_it);
      const Point& p1 = mesh_.point(*(++fv_it));
      const Point& p2 = mesh_.point(*(++fv_it));
Jan Möbius's avatar
Jan Möbius committed
249

250
      if (  distPointTriangleSquared(*p_it, p0, p1, p2) <= sqr_tolerace)
Jan Möbius's avatar
Jan Möbius committed
251 252 253 254 255 256 257 258 259 260 261 262
        ok = true;
    }
  }

  // undo simulation changes
  mesh_.set_point(_ci.v0, _ci.p0);

  return ( ok ? Base::LEGAL_COLLAPSE : Base::ILLEGAL_COLLAPSE );
}

//-----------------------------------------------------------------------------

263 264 265 266 267 268 269 270 271 272 273 274 275
template<class MeshT>
void ModHausdorffT<MeshT>::set_error_tolerance_factor(double _factor) {
  if (_factor >= 0.0 && _factor <= 1.0) {
    // the smaller the factor, the smaller tolerance gets
    // thus creating a stricter constraint
    // division by error_tolerance_factor_ is for normalization
    Scalar tolerance = tolerance_ * _factor / this->error_tolerance_factor_;
    set_tolerance(tolerance);
    this->error_tolerance_factor_ = _factor;
  }
}

//-----------------------------------------------------------------------------
Jan Möbius's avatar
Jan Möbius committed
276

277
template <class MeshT>
Jan Möbius's avatar
Jan Möbius committed
278
void
279
ModHausdorffT<MeshT>::
Jan Möbius's avatar
Jan Möbius committed
280 281 282 283 284 285 286 287 288
postprocess_collapse(const CollapseInfo& _ci)
{
  typename Mesh::VertexFaceIter  vf_it;
  FaceHandle                     fh;
  std::vector<FaceHandle>        faces;


  // collect points & neighboring triangles

289
  tmp_points_.clear();
Jan Möbius's avatar
Jan Möbius committed
290 291 292
  faces.reserve(20);

  // collect active faces and their points
Jan Möbius's avatar
Jan Möbius committed
293
  for (vf_it=mesh_.vf_iter(_ci.v1); vf_it.is_valid(); ++vf_it) {
Jan Möbius's avatar
Jan Möbius committed
294
    fh = *vf_it;
Jan Möbius's avatar
Jan Möbius committed
295 296 297
    faces.push_back(fh);

    Points& pts = mesh_.property(points_, fh);
298
    std::copy(pts.begin(), pts.end(), std::back_inserter(tmp_points_));
Jan Möbius's avatar
Jan Möbius committed
299 300 301 302 303 304 305 306
    pts.clear();
  }
  if (faces.empty()) return; // should not happen anyway...


  // collect points of the 2 deleted faces
  if ((fh=_ci.fl).is_valid()) {
    Points& pts = mesh_.property(points_, fh);
307
    std::copy(pts.begin(), pts.end(), std::back_inserter(tmp_points_));
Jan Möbius's avatar
Jan Möbius committed
308 309 310 311
    pts.clear();
  }
  if ((fh=_ci.fr).is_valid()) {
    Points& pts = mesh_.property(points_, fh);
312
    std::copy(pts.begin(), pts.end(), std::back_inserter(tmp_points_));
Jan Möbius's avatar
Jan Möbius committed
313 314 315 316
    pts.clear();
  }

  // add the deleted point
317
  tmp_points_.push_back(_ci.p0);
Jan Möbius's avatar
Jan Möbius committed
318 319 320 321


  // setup iterators
  typename std::vector<FaceHandle>::iterator  fh_it, fh_end(faces.end());
322
  typename Points::const_iterator             p_it, p_end(tmp_points_.end());
Jan Möbius's avatar
Jan Möbius committed
323 324 325 326 327

  // re-distribute points
  Scalar                  emin, e;
  typename Mesh::CFVIter  fv_it;

328
  for (p_it=tmp_points_.begin(); p_it!=p_end; ++p_it) {
Jan Möbius's avatar
Jan Möbius committed
329 330 331
    emin = FLT_MAX;

    for (fh_it=faces.begin(); fh_it!=fh_end; ++fh_it) {
Jan Möbius's avatar
Jan Möbius committed
332 333 334 335
      fv_it=mesh_.cfv_iter(*fh_it);
      const Point& p0 = mesh_.point(*fv_it);
      const Point& p1 = mesh_.point(*(++fv_it));
      const Point& p2 = mesh_.point(*(++fv_it));
Jan Möbius's avatar
Jan Möbius committed
336

337
      e =  distPointTriangleSquared(*p_it, p0, p1, p2);
Jan Möbius's avatar
Jan Möbius committed
338 339 340 341 342 343 344 345 346 347 348 349 350 351 352
      if (e < emin) {
        emin = e;
        fh   = *fh_it;
      }

    }

    mesh_.property(points_, fh).push_back(*p_it);
  }
}


//-----------------------------------------------------------------------------


353 354 355
template <class MeshT>
typename ModHausdorffT<MeshT>::Scalar
ModHausdorffT<MeshT>::
Jan Möbius's avatar
Jan Möbius committed
356 357 358 359 360 361 362 363 364 365 366 367 368
compute_sqr_error(FaceHandle _fh, const Point& _p) const
{
  typename Mesh::CFVIter           fv_it = mesh_.cfv_iter(_fh);
  const Point&                     p0    = mesh_.point(fv_it);
  const Point&                     p1    = mesh_.point(++fv_it);
  const Point&                     p2    = mesh_.point(++fv_it);

  const Points&                    points = mesh_.property(points_, _fh);
  typename Points::const_iterator  p_it   = points.begin();
  typename Points::const_iterator  p_end  = points.end();

  Point  dummy;
  Scalar e;
369 370
  Scalar emax =  distPointTriangleSquared(_p, p0, p1, p2);

371

Jan Möbius's avatar
Jan Möbius committed
372

Jan Möbius's avatar
Jan Möbius committed
373
  for (; p_it!=p_end; ++p_it) {
374
    e =  distPointTriangleSquared(*p_it, p0, p1, p2);
Jan Möbius's avatar
Jan Möbius committed
375 376 377 378 379 380 381 382 383 384 385 386
    if (e > emax)
      emax = e;
  }

  return emax;
}


//=============================================================================
}
}
//=============================================================================