vpFeatureVanishingPoint.cpp

/*
 * ViSP, open source Visual Servoing Platform software.
 * Copyright (C) 2005 - 2025 by Inria. All rights reserved.
 *
 * This software is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 * See the file LICENSE.txt at the root directory of this source
 * distribution for additional information about the GNU GPL.
 *
 * For using ViSP with software that can not be combined with the GNU
 * GPL, please contact Inria about acquiring a ViSP Professional
 * Edition License.
 *
 * See https://visp.inria.fr for more information.
 *
 * This software was developed at:
 * Inria Rennes - Bretagne Atlantique
 * Campus Universitaire de Beaulieu
 * 35042 Rennes Cedex
 * France
 *
 * If you have questions regarding the use of this file, please contact
 * Inria at visp@inria.fr
 *
 * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
 * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 *
 * Description:
 * 2D vanishing point visual feature (Z coordinate in 3D space is infinity)
 *
 * Authors:
 * Odile Bourquardez
 */

#include <visp3/visual_features/vpBasicFeature.h>
#include <visp3/visual_features/vpFeatureVanishingPoint.h>
 
// Exception
#include <visp3/core/vpException.h>
#include <visp3/visual_features/vpFeatureException.h>
 
// Debug trace
#include <visp3/core/vpDebug.h>
 
// math
#include <visp3/core/vpMath.h>
 
#include <visp3/core/vpFeatureDisplay.h>
 
BEGIN_VISP_NAMESPACE
  void vpFeatureVanishingPoint::init()
{
  // Feature dimension
  dim_s = 5;
  nbParameters = 5;
  m_select = 0;
 
  // memory allocation
  s.resize(dim_s);
  if (flags == nullptr)
    flags = new bool[nbParameters];
  for (unsigned int i = 0; i < nbParameters; i++)
    flags[i] = false;
}

vpFeatureVanishingPoint::vpFeatureVanishingPoint() { init(); }

void vpFeatureVanishingPoint::set_x(double x)
{
  s[0] = x;
  flags[0] = true;
  m_select |= selectX();
}

double vpFeatureVanishingPoint::get_x() const { return s[0]; }

void vpFeatureVanishingPoint::set_y(double y)
{
  s[1] = y;
  flags[1] = true;
  m_select |= selectY();
}

double vpFeatureVanishingPoint::get_y() const { return s[1]; }

void vpFeatureVanishingPoint::set_xy(double x, double y)
{
  set_x(x);
  set_y(y);
  m_select = selectX() | selectY();
}

void vpFeatureVanishingPoint::setOneOverRho(double one_over_rho)
{
  s[2] = one_over_rho;
  flags[2] = true;
  m_select |= selectOneOverRho();
}

void vpFeatureVanishingPoint::setAtanOneOverRho(double atan_one_over_rho)
{
  s[3] = atan_one_over_rho;
  flags[3] = true;
  m_select |= selectAtanOneOverRho();
}

double vpFeatureVanishingPoint::getOneOverRho() const { return s[2]; }

double vpFeatureVanishingPoint::getAtanOneOverRho() const { return s[3]; }

void vpFeatureVanishingPoint::setAlpha(double alpha)
{
  s[4] = alpha;
  flags[4] = true;
  m_select |= selectAlpha();
}

double vpFeatureVanishingPoint::getAlpha() const { return s[4]; }

vpMatrix vpFeatureVanishingPoint::interaction(unsigned int select)
{
  vpMatrix L;
 
  L.resize(0, 6);
 
  if (deallocate == vpBasicFeature::user) {
    for (unsigned int i = 0; i < nbParameters; i++) {
      if (flags[i] == false) {
        switch (i) {
        case 0:
          vpTRACE("Warning !!!  The interaction matrix is computed but x was not set yet");
          break;
        case 1:
          vpTRACE("Warning !!!  The interaction matrix is computed but y was not set yet");
          break;
        case 2:
          vpTRACE("Warning !!! The interaction matrix is computed but 1/rho was not set yet");
          break;
        case 3:
          vpTRACE("Warning !!! The interaction matrix is computed but atan(1/rho) was not set yet");
          break;
        case 4:
          vpTRACE("Warning !!! The interaction matrix is computed but alpha was not set yet");
          break;
        default:
          vpTRACE("Problem during the reading of the variable flags");
        }
      }
    }
    resetFlags();
  }
 
  if (vpFeatureVanishingPoint::selectX() & select) {
    double x = get_x();
    double y = get_y();
    vpMatrix Lx(1, 6);
    Lx = 0;
 
    Lx[0][0] = 0.;
    Lx[0][1] = 0.;
    Lx[0][2] = 0.;
    Lx[0][3] = x * y;
    Lx[0][4] = -(1 + x * x);
    Lx[0][5] = y;
 
    L = vpMatrix::stack(L, Lx);
  }
 
  if (vpFeatureVanishingPoint::selectY() & select) {
    double x = get_x();
    double y = get_y();
    vpMatrix Ly(1, 6);
    Ly = 0;
 
    Ly[0][0] = 0;
    Ly[0][1] = 0.;
    Ly[0][2] = 0.;
    Ly[0][3] = 1 + y * y;
    Ly[0][4] = -x * y;
    Ly[0][5] = -x;
 
    L = vpMatrix::stack(L, Ly);
  }
 
  if (vpFeatureVanishingPoint::selectOneOverRho() & select) {
    double one_over_rho = getOneOverRho();
    double alpha = getAlpha();
    vpMatrix Lone_over_rho(1, 6);
    double rho2 = 1. + one_over_rho * one_over_rho;
 
    Lone_over_rho[0][0] = 0.;
    Lone_over_rho[0][1] = 0.;
    Lone_over_rho[0][2] = 0.;
    Lone_over_rho[0][3] = -rho2 * sin(alpha);
    Lone_over_rho[0][4] = rho2 * cos(alpha);
    Lone_over_rho[0][5] = 0.;
 
    L = vpMatrix::stack(L, Lone_over_rho);
  }
 
  if (vpFeatureVanishingPoint::selectAtanOneOverRho() & select) {
    double alpha = getAlpha();
    vpMatrix Latan_one_over_rho(1, 6);
 
    Latan_one_over_rho[0][0] = 0.;
    Latan_one_over_rho[0][1] = 0.;
    Latan_one_over_rho[0][2] = 0.;
    Latan_one_over_rho[0][3] = -sin(alpha);
    Latan_one_over_rho[0][4] = cos(alpha);
    Latan_one_over_rho[0][5] = 0.;
 
    L = vpMatrix::stack(L, Latan_one_over_rho);
  }
 
  if (vpFeatureVanishingPoint::selectAlpha() & select) {
    double one_over_rho = getOneOverRho();
    double alpha = getAlpha();
    vpMatrix Lalpha(1, 6);
 
    Lalpha[0][0] = 0;
    Lalpha[0][1] = 0.;
    Lalpha[0][2] = 0.;
    Lalpha[0][3] = cos(alpha) * one_over_rho;
    Lalpha[0][4] = sin(alpha) * one_over_rho;
    Lalpha[0][5] = -1.;
 
    L = vpMatrix::stack(L, Lalpha);
  }
 
  return L;
}

vpColVector vpFeatureVanishingPoint::error(const vpBasicFeature &s_star, unsigned int select)
{
  vpColVector e(0);
 
  if (vpFeatureVanishingPoint::selectX() & select) {
    vpColVector ex(1);
    ex[0] = s[0] - s_star[0];
 
    e = vpColVector::stack(e, ex);
  }
 
  if (vpFeatureVanishingPoint::selectY() & select) {
    vpColVector ey(1);
    ey[0] = s[1] - s_star[1];
    e = vpColVector::stack(e, ey);
  }
 
  if (vpFeatureVanishingPoint::selectOneOverRho() & select) {
    vpColVector e_one_over_rho(1);
    e_one_over_rho[0] = s[2] - s_star[2];
 
    e = vpColVector::stack(e, e_one_over_rho);
  }
 
  if (vpFeatureVanishingPoint::selectAtanOneOverRho() & select) {
    vpColVector e_atan_one_over_rho(1);
    e_atan_one_over_rho[0] = s[3] - s_star[3];
 
    e = vpColVector::stack(e, e_atan_one_over_rho);
  }
 
  if (vpFeatureVanishingPoint::selectAlpha() & select) {
    vpColVector e_alpha(1);
    double err = s[4] - s_star[4];
 
    if (err < -M_PI)
      err += 2 * M_PI;
    if (err > M_PI)
      err -= 2 * M_PI;
 
    e_alpha[0] = err;
    e = vpColVector::stack(e, e_alpha);
  }
 
  return e;
}

void vpFeatureVanishingPoint::print(unsigned int select) const
{
  std::cout << "Vanishing point:";
  if (vpFeatureVanishingPoint::selectX() & select)
    std::cout << " x=" << get_x();
  if (vpFeatureVanishingPoint::selectY() & select)
    std::cout << " y=" << get_y();
  if (vpFeatureVanishingPoint::selectOneOverRho() & select) {
    std::cout << " 1/rho=" << getOneOverRho();
  }
  if (vpFeatureVanishingPoint::selectAtanOneOverRho() & select) {
    std::cout << " atan(1/rho)=" << getAtanOneOverRho();
  }
  if (vpFeatureVanishingPoint::selectAlpha() & select) {
    std::cout << " alpha=" << getAlpha();
  }
  std::cout << std::endl;
}

vpFeatureVanishingPoint &vpFeatureVanishingPoint::buildFrom(const double &x, const double &y)
{
  set_xy(x, y);
  return *this;
}

void vpFeatureVanishingPoint::display(const vpCameraParameters &cam, const vpImage<unsigned char> &I,
                                      const vpColor &color, unsigned int thickness) const
{
  if ((vpFeatureVanishingPoint::selectX() & m_select) || (vpFeatureVanishingPoint::selectY() & m_select)) {
    double x, y;
    x = get_x();
    y = get_y();
 
    vpFeatureDisplay::displayPoint(x, y, cam, I, color, thickness);
  }
  else if (vpFeatureVanishingPoint::selectOneOverRho() & m_select) {
    double one_over_rho = getOneOverRho();
    double alpha = getAlpha();
    double x = cos(alpha) / one_over_rho;
    double y = sin(alpha) / one_over_rho;
    vpFeatureDisplay::displayPoint(x, y, cam, I, color, thickness);
  }
  else if (vpFeatureVanishingPoint::selectAtanOneOverRho() & m_select) {
    double atan_one_over_rho = getAtanOneOverRho();
    double alpha = getAlpha();
    double x = cos(alpha) / tan(atan_one_over_rho);
    double y = sin(alpha) / tan(atan_one_over_rho);
    vpFeatureDisplay::displayPoint(x, y, cam, I, color, thickness);
  }
}

void vpFeatureVanishingPoint::display(const vpCameraParameters &cam, const vpImage<vpRGBa> &I, const vpColor &color,
                                      unsigned int thickness) const
{
  if ((vpFeatureVanishingPoint::selectX() & m_select) || (vpFeatureVanishingPoint::selectY() & m_select)) {
    double x, y;
    x = get_x();
    y = get_y();
 
    vpFeatureDisplay::displayPoint(x, y, cam, I, color, thickness);
  }
  else if (vpFeatureVanishingPoint::selectOneOverRho() & m_select) {
    double one_over_rho = getOneOverRho();
    double alpha = getAlpha();
    double x = cos(alpha) / one_over_rho;
    double y = sin(alpha) / one_over_rho;
    vpFeatureDisplay::displayPoint(x, y, cam, I, color, thickness);
  }
  else if (vpFeatureVanishingPoint::selectAtanOneOverRho() & m_select) {
    double atan_one_over_rho = getAtanOneOverRho();
    double alpha = getAlpha();
    double x = cos(alpha) / tan(atan_one_over_rho);
    double y = sin(alpha) / tan(atan_one_over_rho);
    vpFeatureDisplay::displayPoint(x, y, cam, I, color, thickness);
  }
}

vpFeatureVanishingPoint *vpFeatureVanishingPoint::duplicate() const
{
  vpFeatureVanishingPoint *feature = new vpFeatureVanishingPoint;
  return feature;
}

unsigned int vpFeatureVanishingPoint::selectX() { return FEATURE_LINE[0]; }

unsigned int vpFeatureVanishingPoint::selectY() { return FEATURE_LINE[1]; }

unsigned int vpFeatureVanishingPoint::selectOneOverRho() { return FEATURE_LINE[2]; }

unsigned int vpFeatureVanishingPoint::selectAtanOneOverRho() { return FEATURE_LINE[3]; }

unsigned int vpFeatureVanishingPoint::selectAlpha() { return FEATURE_LINE[4]; }
END_VISP_NAMESPACE