// Boost.Geometry (aka GGL, Generic Geometry Library) test file
//
// Copyright Barend Gehrels 2007-2009, Geodan, Amsterdam, the Netherlands
// Use, modification and distribution is subject to the Boost Software License,
// Version 1.0. (See accompanying file LICENSE_1_0.txt or copy at
// http://www.boost.org/LICENSE_1_0.txt)


//#define BOOST_GEOMETRY_DEBUG_ENRICH
//#define BOOST_GEOMETRY_DEBUG_RELATIVE_ORDER

// Include the single-geometry version
#define BOOST_GEOMETRY_TEST_MULTI
#include <algorithms/overlay/traverse.cpp>



#include <boost/geometry/multi/core/ring_type.hpp>

#include <boost/geometry/multi/algorithms/num_points.hpp>
#include <boost/geometry/multi/algorithms/detail/overlay/get_turns.hpp>
#include <boost/geometry/multi/algorithms/detail/overlay/copy_segments.hpp>
#include <boost/geometry/multi/algorithms/detail/overlay/copy_segment_point.hpp>
#include <boost/geometry/multi/algorithms/detail/sections/get_full_section.hpp>

#include <boost/geometry/multi/geometries/multi_linestring.hpp>
#include <boost/geometry/multi/geometries/multi_polygon.hpp>

#include <boost/geometry/extensions/gis/io/wkt/read_wkt_multi.hpp>


#include "multi_overlay_cases.hpp"

#if defined(TEST_WITH_SVG)
#  include "multi_svg_mapper.hpp"
#endif


// Because multi-intersections are similar to single,
// we don't have to test all cases.
// We only check "double" and the simplex (two triangles)
// and cases which are specific to multi (if any)


template <typename T>
void test_all()
{
//goto wrong;
    namespace ov = bg::detail::overlay;

    typedef bg::model::multi_polygon
        <
            bg::model::polygon
                <
                    bg::model::point<T, 2, bg::cs::cartesian>
                >
        > multi_polygon;

    typedef boost::tuple<int, double> Tuple;


    // Intersections:
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "simplex", boost::make_tuple(2, 6.42),
            case_multi_simplex[0], case_multi_simplex[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_65_multi", boost::make_tuple(1, 1),
            case_65_multi[0], case_65_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_66_multi", boost::make_tuple(1, 1),
            case_66_multi[0], case_66_multi[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_67_multi", boost::make_tuple(1, 1),
            case_67_multi[0], case_67_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_69_multi", boost::make_tuple(1, 1),
            case_69_multi[0], case_69_multi[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_71_multi", boost::make_tuple(2, 2),
            case_71_multi[0], case_71_multi[1]
        );

    // #72, note that it intersects into 2 shapes,
    // the third one is done by assemble (see intersection #72)
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_72_multi", boost::make_tuple(2, 1.35),
            case_72_multi[0], case_72_multi[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_73_multi", boost::make_tuple(2, 2),
            case_73_multi[0], case_73_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_74_multi", boost::make_tuple(2, 3),
            case_74_multi[0], case_74_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_75_multi", boost::make_tuple(1, 1),
            case_75_multi[0], case_75_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_77_multi", boost::make_tuple(5, 9),
            case_77_multi[0], case_77_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_78_multi", boost::make_tuple(3, 22),
            case_78_multi[0], case_78_multi[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_80_multi", boost::make_tuple(1, 0.5),
            case_80_multi[0], case_80_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_81_multi", boost::make_tuple(1, 0.25),
            case_81_multi[0], case_81_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_83_multi", boost::make_tuple(3, 1.25),
            case_83_multi[0], case_83_multi[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_91_multi", boost::make_tuple(2, 1.0),
            case_91_multi[0], case_91_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_92_multi", boost::make_tuple(3, 1.5),
            case_92_multi[0], case_92_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_93_multi", boost::make_tuple(2, 1.25),
            case_93_multi[0], case_93_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_96_multi", boost::make_tuple(2, 1.0),
            case_96_multi[0], case_96_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_98_multi", boost::make_tuple(4, 3.0),
            case_98_multi[0], case_98_multi[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_99_multi", boost::make_tuple(3, 1.75),
            case_99_multi[0], case_99_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_100_multi", boost::make_tuple(2, 1.5),
            case_100_multi[0], case_100_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_101_multi", boost::make_tuple(1, 22.25),
            case_101_multi[0], case_101_multi[1]
        );


    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "case_recursive_boxes_2", boost::make_tuple(1, 91),
            case_recursive_boxes_2[0], case_recursive_boxes_2[1]
        );

    // Unions


    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "simplex", boost::make_tuple(1, 14.58),
            case_multi_simplex[0], case_multi_simplex[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_61_multi", boost::make_tuple(1, 4),
            case_61_multi[0], case_61_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_62_multi", boost::make_tuple(1, 1 /*UU 2, 2 */),
            case_62_multi[0], case_62_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_63_multi", boost::make_tuple(1, 1 /*UU 2, 2 */),
            case_63_multi[0], case_63_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_64_multi", boost::make_tuple(1, 3),
            case_64_multi[0], case_64_multi[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_66_multi", boost::make_tuple(1, 4 /*UU 3, 7 */),
            case_66_multi[0], case_66_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_68_multi", boost::make_tuple(1, 4 /*UU 2, 5 */),
            case_68_multi[0], case_68_multi[1]
        );
    // 71: single-polygon generates 2 shapes, multi-polygon
    //     generates 1 shape, both are self-tangent and OK
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_71_multi", boost::make_tuple(1, 9),
            case_71_multi[0], case_71_multi[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_72_multi", boost::make_tuple(1, 10.65),
            case_72_multi[0], case_72_multi[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_73_multi", boost::make_tuple(1, 3),
            case_73_multi[0], case_73_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_74_multi", boost::make_tuple(2, 17),
            case_74_multi[0], case_74_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_75_multi", boost::make_tuple(1, 1 /*UU 5, 5 */),
            case_75_multi[0], case_75_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_76_multi", boost::make_tuple(2, 5 /*UU 6, 6 */),
            case_76_multi[0], case_76_multi[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_80_multi", boost::make_tuple(1, 9.25),
            case_80_multi[0], case_80_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_81_multi", boost::make_tuple(1, 3.25),
            case_81_multi[0], case_81_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_82_multi", boost::make_tuple(3, 4),
            case_82_multi[0], case_82_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_84_multi", boost::make_tuple(1, 4),
            case_84_multi[0], case_84_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_85_multi", boost::make_tuple(1, 3.5),
            case_85_multi[0], case_85_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_86_multi", boost::make_tuple(1, 4),
            case_86_multi[0], case_86_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_87_multi", boost::make_tuple(1, 6),
            case_87_multi[0], case_87_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_88_multi", boost::make_tuple(2, 4),
            case_88_multi[0], case_88_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_89_multi", boost::make_tuple(1, 6),
            case_89_multi[0], case_89_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_90_multi", boost::make_tuple(1, 7.5),
            case_90_multi[0], case_90_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_92_multi", boost::make_tuple(2, 6.25),
            case_92_multi[0], case_92_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_94_multi", boost::make_tuple(1, 10.0),
            case_94_multi[0], case_94_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_95_multi", boost::make_tuple(2, 6.5),
            case_95_multi[0], case_95_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_96_multi", boost::make_tuple(1, 3.5),
            case_96_multi[0], case_96_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_97_multi", boost::make_tuple(1, 3.75),
            case_97_multi[0], case_97_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_102_multi", boost::make_tuple(3, 24.25),
            case_102_multi[0], case_102_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_103_multi", boost::make_tuple(1, 25),
            case_103_multi[0], case_103_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_104_multi", boost::make_tuple(1, 25),
            case_104_multi[0], case_104_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_105_multi", boost::make_tuple(1, 25),
            case_105_multi[0], case_105_multi[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_106_multi", boost::make_tuple(1, 25),
            case_106_multi[0], case_106_multi[1]
        );


    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_recursive_boxes_1", boost::make_tuple(2, 97),
            case_recursive_boxes_1[0], case_recursive_boxes_1[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_union>,  Tuple>
        (
            "case_recursive_boxes_3", boost::make_tuple(8, 49.5),
            case_recursive_boxes_3[0], case_recursive_boxes_3[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "pie_21_7_21_0_3", boost::make_tuple(2, 818824.56678),
            pie_21_7_21_0_3[0], pie_21_7_21_0_3[1]
        );

    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "pie_23_19_5_0_2", boost::make_tuple(2, 2948602.3911823),
            pie_23_19_5_0_2[0], pie_23_19_5_0_2[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "pie_7_14_5_0_7", boost::make_tuple(2, 490804.56678),
            pie_7_14_5_0_7[0], pie_7_14_5_0_7[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "pie_16_16_9_0_2", boost::make_tuple(2, 1146795),
            pie_16_16_9_0_2[0], pie_16_16_9_0_2[1]
        );
    test_overlay<multi_polygon, multi_polygon,
        test_traverse<ov::operation_intersection>,  Tuple>
        (
            "pie_7_2_1_0_15", boost::make_tuple(2, 490585.5),
            pie_7_2_1_0_15[0], pie_7_2_1_0_15[1]
        );

}


int test_main(int, char* [])
{
    test_all<double>();

    return 0;
}