OCCT

// Created on: 1992-05-06
// Created by: Jacques GOUSSARD
// Copyright (c) 1992-1999 Matra Datavision
// Copyright (c) 1999-2014 OPEN CASCADE SAS
//
// This file is part of Open CASCADE Technology software library.
//
// This library is free software; you can redistribute it and/or modify it under
// the terms of the GNU Lesser General Public License version 2.1 as published
// by the Free Software Foundation, with special exception defined in the file
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
// distribution for complete text of the license and disclaimer of any warranty.
//
// Alternatively, this file may be used under the terms of Open CASCADE
// commercial license or contractual agreement.

#include <Adaptor3d_HVertex.hxx>
#include <gp_Pnt.hxx>
#include <IntPatch_Point.hxx>
#include <IntSurf_PntOn2S.hxx>
#include <IntSurf_Transition.hxx>

#include <cstdio>

void IntPatch_Point::SetValue(const gp_Pnt& Pt, const double Tol, const bool Tangent)
{
  onS1    = false;
  onS2    = false;
  vtxonS1 = false;
  vtxonS2 = false;
  mult    = false;
  tgt     = Tangent;
  pt.SetValue(Pt);
  tol = Tol;
}

void IntPatch_Point::SetVertex(const bool OnFirst, const occ::handle<Adaptor3d_HVertex>& V)
{
  if (OnFirst)
  {
    onS1    = true;
    vtxonS1 = true;
    vS1     = V;
  }
  else
  {
    onS2    = true;
    vtxonS2 = true;
    vS2     = V;
  }
}

void IntPatch_Point::SetArc(const bool                            OnFirst,
                            const occ::handle<Adaptor2d_Curve2d>& A,
                            const double                          Param,
                            const IntSurf_Transition&             TLine,
                            const IntSurf_Transition&             TArc)
{
  if (OnFirst)
  {
    onS1     = true;
    arcS1    = A;
    traline1 = TLine;
    tra1     = TArc;
    prm1     = Param;
  }
  else
  {
    onS2     = true;
    arcS2    = A;
    traline2 = TLine;
    tra2     = TArc;
    prm2     = Param;
  }
}

void IntPatch_Point::ReverseTransition()
{
  if (onS1)
  {
    IntSurf_Transition TLine;
    switch (traline1.TransitionType())
    {
      case IntSurf_In:
        TLine.SetValue(false, IntSurf_Out);
        break;
      case IntSurf_Out:
        TLine.SetValue(false, IntSurf_In);
        break;
      default:
        break;
    }
    traline1 = TLine;
    IntSurf_Transition TArc;
    switch (tra1.TransitionType())
    {
      case IntSurf_In:
        TArc.SetValue(false, IntSurf_Out);
        break;
      case IntSurf_Out:
        TArc.SetValue(false, IntSurf_In);
        break;
      default:
        break;
    }
    tra1 = TArc;
  }
  if (onS2)
  {
    IntSurf_Transition TLine;
    switch (traline2.TransitionType())
    {
      case IntSurf_In:
        TLine.SetValue(false, IntSurf_Out);
        break;
      case IntSurf_Out:
        TLine.SetValue(false, IntSurf_In);
        break;
      default:
        break;
    }
    traline2 = TLine;
    IntSurf_Transition TArc;
    switch (tra2.TransitionType())
    {
      case IntSurf_In:
        TArc.SetValue(false, IntSurf_Out);
        break;
      case IntSurf_Out:
        TArc.SetValue(false, IntSurf_In);
        break;
      default:
        break;
    }
    tra2 = TArc;
  }
}

#include <IntSurf_Situation.hxx>
#include <IntSurf_TypeTrans.hxx>

static void DumpTransition(const IntSurf_Transition& T)
{
  IntSurf_TypeTrans typetrans = T.TransitionType();
  if (typetrans == IntSurf_In)
  {
    std::cout << " In  ";
  }
  else if (typetrans == IntSurf_Out)
  {
    std::cout << " Out ";
  }
  else if (typetrans == IntSurf_Undecided)
  {
    std::cout << " Und.";
  }
  else if (typetrans == IntSurf_Touch)
  {
    std::cout << " Touch ";
    if (T.Situation() == IntSurf_Inside)
    {
      std::cout << " Inside ";
    }
    else if (T.Situation() == IntSurf_Outside)
    {
      std::cout << " Outside";
    }
    else
    {
      std::cout << " Unknown";
    }
    if (T.IsOpposite())
    {
      std::cout << "     Opposite ";
    }
    else
    {
      std::cout << " Non_Opposite ";
    }
  }

  if (typetrans != IntSurf_Undecided)
  {
    if (T.IsTangent())
    {
      std::cout << " Tangent    ";
    }
    else
    {
      std::cout << " Non_Tangent";
    }
  }
}

#include <Standard_Transient.hxx>

void IntPatch_Point::Dump() const
{
  std::cout << "----------- IntPatch_Point : " << '\n';
  double u1, v1, u2, v2;
  pt.Parameters(u1, v1, u2, v2);

  printf("P(%+10.20f,%+10.20f,%+10.20f) UV1(%+10.20f,%+10.20f)  UV2(%+10.20f,%+10.20f) "
         "(Para:%+10.20f)\n",
         (double)(pt.Value().X()),
         (double)(pt.Value().Y()),
         (double)(pt.Value().Z()),
         (double)u1,
         (double)v1,
         (double)u2,
         (double)v2,
         (double)para);
  if (onS1)
  {
    printf("*OnS1*  par=%+10.20f arc1=%10p", (double)prm1, (void*)arcS1.operator->());
  }
  if (vtxonS1)
  {
    printf(" *Vtx1*  vtx1=%10p", (void*)vS1.operator->());
  }
  if (onS1 || vtxonS1)
  {
    printf("\n");
  }
  if (onS2)
  {
    printf("*OnS2*  par=%+10.20f arc2=%10p", (double)prm2, (void*)arcS2.operator->());
  }
  if (vtxonS2)
  {
    printf(" *Vtx2*  vtx2=%10p", (void*)vS2.operator->());
  }

  if (onS2 || vtxonS2)
  {
    printf("\n");
  }
  fflush(stdout);

  if (onS1 || onS2)
  {
    std::cout << " tgt:" << ((tgt) ? 1 : 0) << "   mult:" << ((mult) ? 1 : 0);
    if (onS1)
    {
      std::cout << "\n-traline1  : ";
      DumpTransition(traline1);
      std::cout << "  -tra1  : ";
      DumpTransition(tra1);
    }
    if (onS2)
    {
      std::cout << "\n-traline2  : ";
      DumpTransition(traline2);
      std::cout << "  -tra2  : ";
      DumpTransition(tra2);
    }
    std::cout << '\n';
  }
  std::cout << "\nToler = " << Tolerance();
  std::cout << '\n';
}