intersection.h

/*****************************************************************************
 * VCLib                                                                     *
 * Visual Computing Library                                                  *
 *                                                                           *
 * Copyright(C) 2021-2025                                                    *
 * Visual Computing Lab                                                      *
 * ISTI - Italian National Research Council                                  *
 *                                                                           *
 * All rights reserved.                                                      *
 *                                                                           *
 * This program is free software; you can redistribute it and/or modify      *
 * it under the terms of the Mozilla Public License Version 2.0 as published *
 * by the Mozilla Foundation; either version 2 of the License, or            *
 * (at your option) any later version.                                       *
 *                                                                           *
 * This program 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              *
 * Mozilla Public License Version 2.0                                        *
 * (https://www.mozilla.org/en-US/MPL/2.0/) for more details.                *
 ****************************************************************************/
 
#ifndef VCL_ALGORITHMS_MESH_INTERSECTION_H
#define VCL_ALGORITHMS_MESH_INTERSECTION_H
 
#include <vclib/algorithms/core/intersection/element.h>
#include <vclib/mesh/requirements.h>
 
namespace vcl {
 
template<
    EdgeMeshConcept EdgeMesh,
    FaceMeshConcept MeshType,
    PlaneConcept    PlaneType>
EdgeMesh intersection(const MeshType& m, const PlaneType& pl)
{
    using VertexType = MeshType::VertexType;
    using FaceType   = MeshType::FaceType;
    using CoordType  = VertexType::CoordType;
 
    EdgeMesh em;
 
    std::vector<double> qH(m.vertexContainerSize());
 
    for (const VertexType& v : m.vertices())
        qH[m.index(v)] = pl.dist(v.coord());
 
    for (const FaceType& f : m.faces()) {
        std::vector<CoordType> ptVec;
        std::vector<CoordType> nmVec;
        for (uint j = 0; j < f.vertexNumber(); ++j) {
            if (qH[m.index(f.vertex(j))] == 0) {
                ptVec.push_back(f.vertex(j)->coord());
                if constexpr (HasPerVertexNormal<MeshType>) {
                    if (isPerVertexNormalAvailable(m)) {
                        nmVec.push_back(f.vertex(j)->normal());
                    }
                }
            }
            else if (
                (qH[m.index(f.vertex(j))] * qH[m.index(f.vertexMod(j + 1))]) <
                0) {
                const CoordType& p0 = f.vertex(j)->coord();
                const CoordType& p1 = f.vertexMod(j + 1)->coord();
 
                float q0 = qH[m.index(f.vertex(j))];
                float q1 = qH[m.index(f.vertexMod(j + 1))];
 
                std::pair<CoordType, CoordType> seg(p0, p1);
                CoordType pp = pl.segmentIntersection(seg);
                ptVec.push_back(pp);
                if constexpr (HasPerVertexNormal<MeshType>) {
                    if (isPerVertexNormalAvailable(m)) {
                        using NormalType     = VertexType::NormalType;
                        const NormalType& n0 = f.vertex(j)->normal();
                        const NormalType& n1 = f.vertexMod(j + 1)->normal();
                        CoordType         nn =
                            (n0 * fabs(q1) + n1 * fabs(q0)) / fabs(q0 - q1);
                        nmVec.push_back(nn);
                    }
                }
            }
        }
        if (ptVec.size() >= 2) {
            uint eid              = em.addEdge();
            uint v0               = em.addVertices(2);
            uint v1               = v0 + 1;
            em.vertex(v0).coord() = ptVec[0];
            em.vertex(v1).coord() = ptVec[1];
            em.edge(eid).setVertex(0, v0);
            em.edge(eid).setVertex(1, v1);
            if constexpr (
                HasPerVertexNormal<MeshType> && HasPerVertexNormal<EdgeMesh>) {
                if (isPerVertexNormalAvailable(m) &&
                    isPerVertexNormalAvailable(em)) {
                    em.vertex(v0).normal() = nmVec[0];
                    em.vertex(v1).normal() = nmVec[1];
                }
            }
        }
    }
 
    //    // Clean-up: Remove duplicate vertex
    //    tri::Clean<EdgeMeshType>::RemoveDuplicateVertex(em);
 
    //    // Clean-up: Sort edges ensuring orientation coherence
    //    for (size_t j = 1; j < em.edge.size(); j++) {
    //        auto& n = em.edge[j - 1].V(1);
    //        for (size_t i = j; i < em.edge.size(); i++) {
    //            auto& ei = em.edge[i];
    //            if (ei.V(1) == n)
    //                std::swap(ei.V(0), ei.V(1));
    //            if (ei.V(0) == n) {
    //                std::swap(em.edge[j], em.edge[i]);
    //                break;
    //            }
    //        }
    //    }
 
    return em;
}
 
template<FaceMeshConcept MeshType, typename SScalar>
MeshType intersection(
    const MeshType&        m,
    const Sphere<SScalar>& sphere,
    double                 tol)
{
    using VertexType = MeshType::VertexType;
    using CoordType  = VertexType::CoordType;
    using ScalarType = CoordType::ScalarType;
    using FaceType   = MeshType::FaceType;
 
    auto faceSphereIntersectionFilter = [&sphere](const FaceType& f) -> bool {
        return intersect(f, sphere);
    };
 
    MeshType res = perFaceMeshFilter(m, faceSphereIntersectionFilter);
 
    uint i = 0;
    while (i < res.faceContainerSize()) {
        FaceType& f = res.face(i);
 
        CoordType                         witness;
        std::pair<ScalarType, ScalarType> ires(0, 0);
 
        bool allIn = true;
        for (const auto* v : f.vertices()) {
            allIn = allIn && sphere.isInside(v->coord());
        }
        if (!allIn && intersect(f, sphere, witness, ires)) {
            if (faceArea(f) > tol) {
                uint v0 = res.addVertices(3);
                uint v1 = v0 + 1;
                uint v2 = v0 + 2;
                uint fi = res.addFaces(4);
 
                FaceType& f = res.face(i);
 
                res.vertex(v0).importFrom(*f.vertex(0), false);
                res.vertex(v0).coord() =
                    (f.vertex(0)->coord() + f.vertex(1)->coord()) / 2;
                res.vertex(v1).importFrom(*f.vertex(1), false);
                res.vertex(v1).coord() =
                    (f.vertex(1)->coord() + f.vertex(2)->coord()) / 2;
                res.vertex(v2).importFrom(*f.vertex(2), false);
                res.vertex(v2).coord() =
                    (f.vertex(2)->coord() + f.vertex(0)->coord()) / 2;
 
                res.face(fi).importFrom(f, false);
                res.face(fi).setVertices(
                    f.vertex(0), &res.vertex(v0), &res.vertex(v2));
 
                ++fi;
                res.face(fi).importFrom(f, false);
                res.face(fi).setVertices(
                    f.vertex(1), &res.vertex(v1), &res.vertex(v0));
 
                ++fi;
                res.face(fi).importFrom(f, false);
                res.face(fi).setVertices(
                    &res.vertex(v0), &res.vertex(v1), &res.vertex(v2));
 
                ++fi;
                res.face(fi).importFrom(f, false);
                res.face(fi).setVertices(
                    &res.vertex(v2), &res.vertex(v1), f.vertex(2));
 
                res.deleteFace(i);
            }
        }
        if (ires.first > 0.0) { // closest point - radius. If >0 is outside
            res.deleteFace(i);
        }
 
        ++i;
    }
 
    return res;
}
 
template<FaceMeshConcept MeshType, typename SScalar>
MeshType intersection(const MeshType& m, const Sphere<SScalar>& sphere)
{
    double tol = M_PI * sphere.radius() * sphere.radius() / 100000;
    return intersection(m, sphere, tol);
}
 
} // namespace vcl
 
#endif // VCL_ALGORITHMS_MESH_INTERSECTION_H