#!/usr/bin/env python3
# -*- coding: utf-8 -*-
"""

"""

import math
import numpy as npy


npy.seterr(divide='raise')
from datetime import datetime

import matplotlib.pyplot as plt
from mpl_toolkits.mplot3d import Axes3D

import volmdlr
import volmdlr.templates

        
import dessia_common as dc

import webbrowser
import os
import tempfile
import subprocess

# TODO: put voldmlr metadata in this freecad header
STEP_HEADER = '''ISO-10303-21;
HEADER;
FILE_DESCRIPTION(('{name}'),'2;1');
FILE_NAME('{filename}','{timestamp}',('Author'),(''),'Volmdlr v{version}','','Unknown');
FILE_SCHEMA(('AUTOMOTIVE_DESIGN {{ 1 0 10303 214 1 1 1 1 }}'));
ENDSEC;
DATA;
#1 = APPLICATION_PROTOCOL_DEFINITION('international standard','automotive_design',2000,#2);
#2 = APPLICATION_CONTEXT('core data for automotive mechanical design processes');
#3 = ( LENGTH_UNIT() NAMED_UNIT(*) SI_UNIT(.MILLI.,.METRE.) );
#4 = ( NAMED_UNIT(*) PLANE_ANGLE_UNIT() SI_UNIT($,.RADIAN.) );
#5 = ( NAMED_UNIT(*) SI_UNIT($,.STERADIAN.) SOLID_ANGLE_UNIT() );
#6 = UNCERTAINTY_MEASURE_WITH_UNIT(LENGTH_MEASURE(1.E-07),#3,'distance_accuracy_value','confusion accuracy');
#7 = ( GEOMETRIC_REPRESENTATION_CONTEXT(3) GLOBAL_UNCERTAINTY_ASSIGNED_CONTEXT((#6)) GLOBAL_UNIT_ASSIGNED_CONTEXT ((#3,#4,#5)) REPRESENTATION_CONTEXT('Context #1','3D Context with UNIT and UNCERTAINTY') );
'''

STEP_FOOTER = '''ENDSEC;
END-ISO-10303-21;
'''

def find_and_replace(string, find, replace):
    """
    Finds a string in a string and replace it
    """
    index = string.find(find)
    if index != -1:
        try:
            # verifie si il reste pas des chiffre apres
            int(string[index + len(find)])
        except (ValueError, IndexError):
            # on remplace
            return string[:index] + replace + string[index + len(find):]
        else:
            return string[:index] + find_and_replace(string[index + len(find)],
                                                     find, replace)
    return string



def set_to_list(step_set):
    char_list = step_set.split(',')
    char_list[0] = char_list[0][1:]
    char_list[-1] = char_list[-1][:-1]
    return [elem for elem in char_list]


def delete_node_and_predecessors(graph, node):
    predecessors = list(graph.predecessors(node))
    graph.remove_node(node)
    for predecessor in predecessors:
        delete_node_and_predecessors(graph, predecessor)


def delete_node_and_successors(graph, node):
    successors = list(graph.successors(node))
    graph.remove_node(node)
    for successor in successors:
        delete_node_and_successors(graph, successor)


def clockwise_angle(vector1, vector2):
    """
    Return the clockwise angle in radians between vector1 and vector2.
    """
    vector0 = volmdlr.O2D
    if vector0 in (vector1, vector2):
        return 0

    dot = vector1.dot(vector2)
    norm_vec_1 = vector1.norm()
    norm_vec_2 = vector2.norm()
    sol = dot / (norm_vec_1 * norm_vec_2)
    cross = vector1.cross(vector2)
    if math.isclose(sol, 1, abs_tol=1e-6):
        inner_angle = 0
    elif math.isclose(sol, -1, abs_tol=1e-6):
        inner_angle = math.pi
    else:
        inner_angle = math.acos(sol)

    if cross < 0:
        return inner_angle

    return volmdlr.TWO_PI - inner_angle


def vectors3d_angle(vector1, vector2):
    dot = vector1.dot(vector2)
    theta = math.acos(dot / (vector1.norm() * vector2.norm()))

    return theta


def sin_cos_angle(u1, u2):
    """
    cos(theta)=u1, sin(theta)=u2
    returns an angle between 0 and 2pi
    """
    if u1 < -1:
        u1 = -1
    elif u1 > 1:
        u1 = 1
    if u2 < -1:
        u2 = -1
    elif u2 > 1:
        u2 = 1

    if u1 > 0:
        if u2 >= 0:
            theta = math.acos(u1)
        else:
            theta = volmdlr.TWO_PI + math.asin(u2)
    else:
        if u2 >= 0:
            theta = math.acos(u1)
        else:
            theta = volmdlr.TWO_PI - math.acos(u1)
    if math.isclose(theta, volmdlr.TWO_PI, abs_tol=1e-9):
        return 0.
    return theta


def delete_double_pos(points, triangles):
    points_to_indexes = {}

    for index, point in enumerate(points):
        if point not in points_to_indexes:
            points_to_indexes[point] = [index]
        else:
            points_to_indexes[point].append(index)

    new_points = []
    index_to_modified_index = {}
    for i, (point, indexes) in enumerate(points_to_indexes.items()):
        new_points.append(point)
        index_to_modified_index[indexes[0]] = i

    index_to_new_index = {}

    for indexes in points_to_indexes.values():
        for index in indexes[1:]:
            index_to_new_index[index] = indexes[0]

    new_triangles = []
    for face_triangles in triangles:
        if face_triangles is None:
            continue
        # print('face_triangles', face_triangles)
        new_face_triangles = []
        for triangle_ in face_triangles:
            # print('triangle', triangle)
            new_triangle = []
            for index in triangle_:
                if index in index_to_new_index:
                    modified_index = index_to_modified_index[
                        index_to_new_index[index]]
                else:
                    modified_index = index_to_modified_index[index]
                new_triangle.append(modified_index)
            new_face_triangles.append(tuple(new_triangle))
        new_triangles.append(new_face_triangles)

    return new_points, new_triangles


def determinant(vec1, vec2, vec3):
    a = npy.array((vec1.vector, vec2.vector, vec3.vector))
    return npy.linalg.det(a)


def delete_double_point(list_point):
    points = []
    for pt in list_point:
        if pt not in points:
            points.append(pt)
        else:
            continue
    return points


def max_pos(list_of_float):
    pos_max, max_float = 0, list_of_float[0]
    for pos, fl in enumerate(list_of_float):
        if pos == 0:
            continue
        else:
            if fl > max_float:
                max_float = fl
                pos_max = pos
    return max_float, pos_max


def min_pos(list_of_float):
    pos_min, min_float = 0, list_of_float[0]
    for pos, fl in enumerate(list_of_float):
        if pos == 0:
            continue
        else:
            if fl < min_float:
                min_float = fl
                pos_min = pos
    return min_float, pos_min


def check_singularity(all_points):
    plus_pi, moins_pi = [], []
    for enum, pt in enumerate(all_points):
        if pt.vector[0] > math.pi * 1.01:
            plus_pi.append(enum)
        elif pt.vector[0] < math.pi * 0.99:
            moins_pi.append(enum)

    if len(moins_pi) <= 2 and len(all_points) > 4:
        for pos in moins_pi:
            new_pt = all_points[pos].copy() + volmdlr.Point2D((volmdlr.TWO_PI, 0))
            if new_pt.vector[0] > volmdlr.TWO_PI:
                new_pt.vector[0] = volmdlr.TWO_PI
            all_points[pos] = new_pt
    elif len(plus_pi) <= 2 and len(all_points) > 4:
        for pos in plus_pi:
            new_pt = all_points[pos].copy() - volmdlr.Point2D((volmdlr.TWO_PI, 0))
            if new_pt.vector[0] < 0:
                new_pt.vector[0] = 0
            all_points[pos] = new_pt
    if 3 * len(moins_pi) <= len(plus_pi) and len(all_points) > 4:
        for pos in moins_pi:
            new_pt = all_points[pos].copy() + volmdlr.Point2D((volmdlr.TWO_PI, 0))
            if new_pt.vector[0] > volmdlr.TWO_PI:
                new_pt.vector[0] = volmdlr.TWO_PI
            all_points[pos] = new_pt
    elif 3 * len(plus_pi) <= len(moins_pi) and len(all_points) > 4:
        for pos in plus_pi:
            new_pt = all_points[pos].copy() - volmdlr.Point2D((volmdlr.TWO_PI, 0))
            if new_pt.vector[0] < 0:
                new_pt.vector[0] = 0
            all_points[pos] = new_pt

    return all_points


def posangle_arc(start, end, radius, frame=None):
    if frame is None:
        p1_new, p2_new = start, end
    else:
        p1_new, p2_new = frame.new_coordinates(start), frame.new_coordinates(end)
    # Angle pour le p1
    u1, u2 = p1_new.x / radius, p1_new.y / radius
    theta1 = sin_cos_angle(u1, u2)
    # Angle pour le p2
    u3, u4 = p2_new.x / radius, p2_new.y / radius
    theta2 = sin_cos_angle(u3, u4)

    if math.isclose(theta1, theta2, abs_tol=1e-6):
        if math.isclose(theta2, 0, abs_tol=1e-6):
            theta2 += volmdlr.TWO_PI
        elif math.isclose(theta1, volmdlr.TWO_PI, abs_tol=1e-6):
            theta1 -= volmdlr.TWO_PI

    return theta1, theta2


def clockwise_interior_from_circle3d(start, end, circle):
    """
    Returns the clockwise interior point between start and end on the circle
    """
    start2d = start.to_2d(plane_origin=circle.frame.origin,
                          x=circle.frame.u, y=circle.frame.v)
    end2d = end.to_2d(plane_origin=circle.frame.origin,
                      x=circle.frame.u, y=circle.frame.v)

    # Angle pour le p1
    u1, u2 = start2d.x / circle.radius, start2d.y / circle.radius
    theta1 = sin_cos_angle(u1, u2)
    # Angle pour le p2
    u3, u4 = end2d.x / circle.radius, end2d.y / circle.radius
    theta2 = sin_cos_angle(u3, u4)

    if theta1 > theta2:
        theta3 = (theta1 + theta2) / 2
    elif theta2 > theta1:
        theta3 = (theta1 + theta2) / 2 + volmdlr.TWO_PI / 2
    else:
        raise NotImplementedError

    if theta3 > volmdlr.TWO_PI:
        theta3 -= volmdlr.TWO_PI

    interior2d = volmdlr.Point2D(circle.radius*math.cos(theta3),
                                 circle.radius*math.sin(theta3))
    interior3d = interior2d.to_3d(plane_origin=circle.frame.origin,
                                  vx=circle.frame.u, vy=circle.frame.v)
    return interior3d



def offset_angle(trigo, angle_start, angle_end):
    if trigo:
        offset = angle_start
    else:
        offset = angle_end
    if angle_start > angle_end:
        angle = angle_start - angle_end
    else:
        angle = angle_end - angle_start
    return offset, angle


def angle_principal_measure(angle, min_angle=-math.pi):
    """
    returns angle between O and 2 pi
    """
    max_angle = min_angle + volmdlr.TWO_PI
    angle = angle % (volmdlr.TWO_PI)

    if math.isclose(angle, min_angle, abs_tol=1e-9):
        return min_angle
    if math.isclose(angle, max_angle, abs_tol=1e-9):
        return max_angle

    return angle

def step_ids_to_str(ids):
    return ','.join(['#{}'.format(i) for i in ids])

class CompositePrimitive(dc.DessiaObject):
    def __init__(self, name=''):
        self.name = name

        dc.DessiaObject.__init__(self, name=name)
    def primitive_to_index(self, primitive):
        if not self._utd_primitives_to_index:
            self._primitives_to_index = {p: ip for ip, p in enumerate(self.primitives)}
            self._utd_primitives_to_index = True
        return self._primitives_to_index[primitive]
    
    def update_basis_primitives(self):
        basis_primitives = []
        for primitive in self.primitives:
            if hasattr(primitive, 'basis_primitives'):
                basis_primitives.extend(primitive.basis_primitives)
            else:
                basis_primitives.append(primitive)

        self.basis_primitives = basis_primitives

class Primitive2D(CompositePrimitive):
    def __init__(self, name=''):
        self.name = name

        dc.DessiaObject.__init__(self, name=name)


class CompositePrimitive2D(Primitive2D):
    """
    A collection of simple primitives
    """
    _non_serializable_attributes = ['name', '_utd_primitives_to_index',
                                    '_primitives_to_index']   
    _non_hash_attributes = ['name', '_utd_primitives_to_index',
                            '_primitives_to_index']

    def __init__(self, primitives, name=''):
        Primitive2D.__init__(self, name)
        self.primitives = primitives
        self.update_basis_primitives()

        self._utd_primitives_to_index = False


    # def primitive_to_index(self, primitive):
    #     if not self._utd_primitives_to_index:
    #         self._primitives_to_index = {p: ip for ip, p in enumerate(self.primitives)}
    #         self._utd_primitives_to_index = True
    #     return self._primitives_to_index[primitive]
        
    
    
    # def update_basis_primitives(self):
    #     basis_primitives = []
    #     for primitive in self.primitives:
    #         if hasattr(primitive, 'basis_primitives'):
    #             basis_primitives.extend(primitive.basis_primitives)
    #         else:
    #             basis_primitives.append(primitive)

    #     self.basis_primitives = basis_primitives
        

    def rotation(self, center, angle, copy=True):
        if copy:
            return self.__class__([p.rotation(center, angle, copy=True) \
                                   for p in self.primitives])
        else:
            for p in self.primitives:
                p.rotation(center, angle, copy=False)
            self.update_basis_primitives()

    def translation(self, offset, copy=True):
        if copy:
            return self.__class__([p.translation(offset, copy=True) \
                                   for p in self.primitives])
        else:
            for p in self.primitives:
                p.translation(offset, copy=False)
            self.update_basis_primitives()

    def frame_mapping(self, frame, side, copy=True):
        """
        side = 'old' or 'new'
        """
        if copy:
            return self.__class__([p.frame_mapping(frame, side, copy=True) \
                                   for p in self.primitives])
        else:
            for p in self.primitives:
                p.frame_mapping(frame, side, copy=False)
            self.update_basis_primitives()


    def plot(self, ax=None, color='k', alpha=1,
             plot_points=False, equal_aspect=True):

        if ax is None:
            fig, ax = plt.subplots()

        if equal_aspect:
            ax.set_aspect('equal')

        for element in self.primitives:
            element.plot(ax=ax, color=color) #, plot_points=plot_points)

        ax.margins(0.1)
        plt.show()

        return ax

    def plot_data(self, name, fill=None, color='black', stroke_width=0.2,
                  opacity=1):
        plot_data = {}
        plot_data['fill'] = fill
        plot_data['name'] = name
        plot_data['type'] = 'wire'
        plot_data['plot_data'] = []
        for item in self.primitives:
            plot_data['plot_data'].append(item.plot_data(color=color,
                                                         stroke_width=stroke_width,
                                                         opacity=opacity))
        return plot_data



class Primitive3D(CompositePrimitive):
    def __init__(self, color=None, alpha=1, name=''):
        self.color = color
        self.alpha = alpha

        dc.DessiaObject.__init__(self, name=name)

    def volmdlr_primitives(self):
        return [self]

    def babylon_meshes(self):
        mesh = self.triangulation()
        positions, indices = mesh.to_babylon()

        babylon_mesh = {'positions': positions,
                        'indices': indices,
                        'alpha': self.alpha,
                        'name': self.name
                        }

        if self.color is None:
            babylon_mesh['color'] = [0.8, 0.8, 0.8]
        else:
            babylon_mesh['color'] = list(self.color)

        return [babylon_mesh]



class CompositePrimitive3D(Primitive3D):
    _standalone_in_db = True
    _eq_is_data_eq = True
    _non_serializable_attributes = ['basis_primitives']
    _non_eq_attributes = ['name', 'basis_primitives']
    _non_hash_attributes = []
    """
    A collection of simple primitives3D
    """

    def __init__(self, primitives, name=''):
        self.primitives = primitives

        Primitive3D.__init__(self, name=name)
        self._utd_primitives_to_index = False
        
    # def primitive_to_index(self, primitive):
    #     if not self._utd_primitives_to_index:
    #         self._primitives_to_index = {p: ip for ip, p in enumerate(self.primitives)}
    #         self._utd_primitives_to_index = True
    #     return self._primitives_to_index[primitive]



    # def update_basis_primitives(self):
    #     # TODO: This is a copy/paste from CompositePrimitive2D, in the future make a Common abstract class
    #     basis_primitives = []
    #     for primitive in self.primitives:
    #         if hasattr(primitive, 'basis_primitives'):
    #             basis_primitives.extend(primitive.primitives)
    #         else:
    #             basis_primitives.append(primitive)

    #     self.basis_primitives = basis_primitives

    # # def to_2d(self, plane_origin, x, y):
    # #     if name is None:
    # #         name = '2D of {}'.format(self.name)
    # #     primitives2d = [p.to_2d(plane_origin, x, y) for p in self.primitives]
    # #     return CompositePrimitive2D(primitives2d, name)

    def plot(self, ax=None, equal_aspect=True, color='k', alpha=1):
        if ax is None:
            fig = plt.figure()
            ax = Axes3D(fig)
        else:
            fig = None
        # if equal_aspect:
        #     ax.set_aspect('equal')

        for primitive in self.primitives:
            primitive.plot(ax=ax, color=color, alpha=alpha)



        return ax


class BoundingBox(dc.DessiaObject):
    """
    An axis aligned boundary box
    """

    def __init__(self, xmin, xmax, ymin, ymax, zmin, zmax, name=''):
        self.xmin = xmin
        self.xmax = xmax
        self.ymin = ymin
        self.ymax = ymax
        self.zmin = zmin
        self.zmax = zmax
        
        self.center = (self.points[0] + self.points[-2]) / 2
        self.name = name

    def __hash__(self):
        return sum([hash(p) for p in self.points])

    def __add__(self, other_bbox):
        return BoundingBox(min(self.xmin, other_bbox.xmin),
                           max(self.xmax, other_bbox.xmax),
                           min(self.ymin, other_bbox.ymin),
                           max(self.ymax, other_bbox.ymax),
                           min(self.zmin, other_bbox.zmin),
                           max(self.zmax, other_bbox.zmax))

    def __iter__(self):
        return [self.xmin, self.xmax, self.ymin, self.ymax, self.zmin, self.zmax]

    @property
    def points(self):
        return [volmdlr.Point3D(self.xmin, self.ymin, self.zmin), \
                volmdlr.Point3D(self.xmax, self.ymin, self.zmin), \
                volmdlr.Point3D(self.xmax, self.ymax, self.zmin), \
                volmdlr.Point3D(self.xmin, self.ymax, self.zmin), \
                volmdlr.Point3D(self.xmin, self.ymin, self.zmax), \
                volmdlr.Point3D(self.xmax, self.ymin, self.zmax), \
                volmdlr.Point3D(self.xmax, self.ymax, self.zmax), \
                volmdlr.Point3D(self.xmin, self.ymax, self.zmax)]

    def plot(self, ax=None, color=''):
        fig = plt.figure()
        if ax is None:
            ax = fig.add_subplot(111, projection='3d')

        bbox_edges = [[self.points[0], self.points[1]],
                      [self.points[0], self.points[3]],
                      [self.points[0], self.points[4]],
                      [self.points[1], self.points[2]],
                      [self.points[1], self.points[5]],
                      [self.points[2], self.points[3]],
                      [self.points[2], self.points[6]],
                      [self.points[3], self.points[7]],
                      [self.points[4], self.points[5]],
                      [self.points[5], self.points[6]],
                      [self.points[6], self.points[7]],
                      [self.points[7], self.points[4]]]

        x = [p[0] for p in self.points]
        y = [p[1] for p in self.points]
        z = [p[2] for p in self.points]
        ax.scatter(x, y, z)
        for edge in bbox_edges:
            ax.plot3D([edge[0][0], edge[1][0]],
                      [edge[0][1], edge[1][1]],
                      [edge[0][2], edge[1][2]],
                      'gray')
        ax.set_xlabel('X Label')
        ax.set_ylabel('Y Label')
        ax.set_zlabel('Z Label')
        plt.show()
        return ax

    @classmethod
    def from_points(cls, points):
        # if len(points) == 0:
        #     return (0, 0, 0, 0, 0, 0)
        xmin = min([pt.x for pt in points])
        xmax = max([pt.x for pt in points])
        ymin = min([pt.y for pt in points])
        ymax = max([pt.y for pt in points])
        zmin = min([pt.z for pt in points])
        zmax = max([pt.z for pt in points])
        return cls(xmin, xmax, ymin, ymax, zmin, zmax)

    def to_frame(self):
        x = volmdlr.Vector3D((self.xmax - self.xmin), 0, 0)
        y = volmdlr.Vector3D(0, (self.ymax - self.ymin), 0)
        z = volmdlr.Vector3D(0, 0, (self.zmax - self.zmin))
        return volmdlr.Frame3D(self.center, x, y, z)

    def volume(self):
        return (self.xmax - self.xmin) * (self.ymax - self.ymin) * (
                    self.zmax - self.zmin)

    def bbox_intersection(self, bbox2):
        return (self.xmin < bbox2.xmax and self.xmax > bbox2.xmin \
                and self.ymin < bbox2.ymax and self.ymax > bbox2.ymin \
                and self.zmin < bbox2.zmax and self.zmax > bbox2.zmin)

    def is_inside_bbox(self, bbox2):
        return (self.xmin > bbox2.xmin and self.xmax < bbox2.xmax \
                and self.ymin > bbox2.ymin and self.ymax < bbox2.ymax \
                and self.zmin > bbox2.zmin and self.zmax < bbox2.zmax)

    def intersection_volume(self, bbox2):
        if not self.bbox_intersection(bbox2):
            return 0
        if self.is_inside_bbox(bbox2) or bbox2.is_inside_bbox(self):
            return min(self.volume(), bbox2.volume())

        lx = min(self.xmax, bbox2.xmax) - max(self.xmin, bbox2.xmin)
        ly = min(self.ymax, bbox2.ymax) - max(self.ymin, bbox2.ymin)
        lz = min(self.zmax, bbox2.zmax) - max(self.zmin, bbox2.zmin)

        return lx * ly * lz

    # def intersection_volume(self, bbox2):
    #     if not self.bbox_intersection(bbox2):
    #         return 0
    #
    #     permute_bbox1 = self
    #     permute_bbox2 = bbox2
    #
    #     if permute_bbox2.xmin < permute_bbox1.xmin:
    #         permute_bbox1, permute_bbox2 = permute_bbox2, permute_bbox1
    #     lx = permute_bbox1.xmax - permute_bbox2.xmin
    #
    #     if permute_bbox2.ymin < permute_bbox1.ymin:
    #         permute_bbox1, permute_bbox2 = permute_bbox2, permute_bbox1
    #     ly = permute_bbox1.ymax - permute_bbox2.ymin
    #
    #     if permute_bbox2.zmin < permute_bbox1.zmin:
    #         permute_bbox1, permute_bbox2 = permute_bbox2, permute_bbox1
    #     lz = permute_bbox1.zmax - permute_bbox2.zmin
    #
    #     return lx*ly*lz

    def distance_to_bbox(self, bbox2):
        if self.bbox_intersection(bbox2):
            return 0

        permute_bbox1 = self
        permute_bbox2 = bbox2

        if permute_bbox2.xmin < permute_bbox1.xmin:
            permute_bbox1, permute_bbox2 = permute_bbox2, permute_bbox1
        dx = permute_bbox2.xmin - permute_bbox1.xmax
        if dx < 0:
            dx = 0

        if permute_bbox2.ymin < permute_bbox1.ymin:
            permute_bbox1, permute_bbox2 = permute_bbox2, permute_bbox1
        dy = permute_bbox2.ymin - permute_bbox1.ymax
        if dy < 0:
            dy = 0

        if permute_bbox2.zmin < permute_bbox1.zmin:
            permute_bbox1, permute_bbox2 = permute_bbox2, permute_bbox1
        dz = permute_bbox2.zmin - permute_bbox1.zmax
        if dz < 0:
            dz = 0

        return (dx ** 2 + dy ** 2 + dz ** 2) ** 0.5

    def point_belongs(self, point):
        return self.xmin < point[0] and point[0] < self.xmax \
               and self.ymin < point[1] and point[1] < self.ymax \
               and self.zmin < point[2] and point[2] < self.zmax

    def distance_to_point(self, point):
        if self.point_belongs(point):
            return min([self.xmax - point[0], point[0] - self.xmin,
                        self.ymax - point[1], point[1] - self.ymin,
                        self.zmax - point[2], point[2] - self.zmin])
        else:
            if point[0] < self.xmin:
                dx = self.xmin - point[0]
            elif self.xmax < point[0]:
                dx = point[0] - self.xmax
            else:
                dx = 0

            if point[1] < self.ymin:
                dy = self.ymin - point[1]
            elif self.ymax < point[1]:
                dy = point[1] - self.ymax
            else:
                dy = 0

            if point[2] < self.zmin:
                dz = self.zmin - point[2]
            elif self.zmax < point[2]:
                dz = point[2] - self.zmax
            else:
                dz = 0
        return (dx ** 2 + dy ** 2 + dz ** 2) ** 0.5

    # def distance_between_two_points_on_bbox(self, point1, point2):
    #
    #     if math.isclose(point1[0], self.xmin, abs_tol=1e-8):
    #         face_point1 = 5
    #     elif math.isclose(point1[0], self.xmax, abs_tol=1e-8):
    #         face_point1 = 3
    #     elif math.isclose(point1[1], self.ymin, abs_tol=1e-8):
    #         face_point1 = 4
    #     elif math.isclose(point1[1], self.ymax, abs_tol=1e-8):
    #         face_point1 = 2
    #     elif math.isclose(point1[2], self.zmin, abs_tol=1e-8):
    #         face_point1 = 6
    #     elif math.isclose(point1[2], self.zmax, abs_tol=1e-8):
    #         face_point1 = 1
    #     else:
    #         raise NotImplementedError
    #
    #     if math.isclose(point2[0], self.xmin, abs_tol=1e-8):
    #         face_point2 = 5
    #     elif math.isclose(point2[0], self.xmax, abs_tol=1e-8):
    #         face_point2 = 3
    #     elif math.isclose(point2[1], self.ymin, abs_tol=1e-8):
    #         face_point2 = 4
    #     elif math.isclose(point2[1], self.ymax, abs_tol=1e-8):
    #         face_point2 = 2
    #     elif math.isclose(point2[2], self.zmin, abs_tol=1e-8):
    #         face_point2 = 6
    #     elif math.isclose(point2[2], self.zmax, abs_tol=1e-8):
    #         face_point2 = 1
    #     else:
    #         raise NotImplementedError
    #
    #     point1_copy = point1.copy()
    #     point2_copy = point2.copy()
    #     if face_point1 > face_point2:
    #         point1, point2 = point2, point1
    #         face_point1, face_point2 = face_point2, face_point1
    #
    #     # The points are on the same face
    #     if face_point1 == face_point2:
    #         return point1.point_distance(point2)
    #
    #     deltax = self.xmax - self.xmin
    #     deltay = self.ymax - self.ymin
    #     deltaz = self.zmax - self.zmin
    #
    #     point1_2d_coordinate_dict = {1: volmdlr.Point2D((point1[
    #                                                  0] - self.xmin - deltax / 2,
    #                                              point1[
    #                                                  1] - self.ymin - deltay / 2)),
    #                                  2: volmdlr.Point2D((point1[
    #                                                  2] - self.zmin - deltaz / 2,
    #                                              point1[
    #                                                  0] - self.xmin - deltax / 2)),
    #                                  3: volmdlr.Point2D((point1[
    #                                                  1] - self.ymin - deltay / 2,
    #                                              point1[
    #                                                  2] - self.zmin - deltaz / 2)),
    #                                  4: volmdlr.Point2D((point1[
    #                                                  0] - self.xmin - deltax / 2,
    #                                              point1[
    #                                                  2] - self.zmin - deltaz / 2)),
    #                                  5: volmdlr.Point2D((point1[
    #                                                  2] - self.zmin - deltaz / 2,
    #                                              point1[
    #                                                  1] - self.ymin - deltay / 2)),
    #                                  6: volmdlr.Point2D((point1[
    #                                                  1] - self.ymin - deltay / 2,
    #                                              point1[
    #                                                  0] - self.xmin - deltax / 2))}
    #
    #     point2_2d_coordinate_dict = {1: volmdlr.Point2D((point2[
    #                                                  0] - self.xmin - deltax / 2,
    #                                              point2[
    #                                                  1] - self.ymin - deltay / 2)),
    #                                  2: volmdlr.Point2D((point2[
    #                                                  2] - self.zmin - deltaz / 2,
    #                                              point2[
    #                                                  0] - self.xmin - deltax / 2)),
    #                                  3: volmdlr.Point2D((point2[
    #                                                  1] - self.ymin - deltay / 2,
    #                                              point2[
    #                                                  2] - self.zmin - deltaz / 2)),
    #                                  4: volmdlr.Point2D((point2[
    #                                                  0] - self.xmin - deltax / 2,
    #                                              point2[
    #                                                  2] - self.zmin - deltaz / 2)),
    #                                  5: volmdlr.Point2D((point2[
    #                                                  2] - self.zmin - deltaz / 2,
    #                                              point2[
    #                                                  1] - self.ymin - deltay / 2)),
    #                                  6: volmdlr.Point2D((point2[
    #                                                  1] - self.ymin - deltay / 2,
    #                                              point2[
    #                                                  0] - self.xmin - deltax / 2))}
    #
    #     vertex_2d_coordinate_dict = {1: [volmdlr.Point2D((
    #                                              self.xmin - self.xmin - deltax / 2,
    #                                              self.ymin - self.ymin - deltay / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.xmin - self.xmin - deltax / 2,
    #                                              self.ymax - self.ymin - deltay / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.xmax - self.xmin - deltax / 2,
    #                                              self.ymax - self.ymin - deltay / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.xmax - self.xmin - deltax / 2,
    #                                              self.ymin - self.ymin - deltay / 2))],
    #                                  2: [volmdlr.Point2D((
    #                                              self.zmin - self.zmin - deltaz / 2,
    #                                              self.xmin - self.xmin - deltax / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.zmin - self.zmin - deltaz / 2,
    #                                              self.xmax - self.xmin - deltax / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.zmax - self.zmin - deltaz / 2,
    #                                              self.xmax - self.xmin - deltax / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.zmax - self.zmin - deltaz / 2,
    #                                              self.xmin - self.xmin - deltax / 2))],
    #                                  3: [volmdlr.Point2D((
    #                                              self.ymin - self.ymin - deltay / 2,
    #                                              self.zmin - self.zmin - deltaz / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.ymin - self.ymin - deltay / 2,
    #                                              self.zmax - self.zmin - deltaz / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.ymax - self.ymin - deltay / 2,
    #                                              self.zmax - self.zmin - deltaz / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.ymax - self.ymin - deltay / 2,
    #                                              self.zmin - self.zmin - deltaz / 2))],
    #                                  4: [volmdlr.Point2D((
    #                                              self.xmin - self.xmin - deltax / 2,
    #                                              self.zmin - self.zmin - deltaz / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.xmin - self.xmin - deltax / 2,
    #                                              self.zmax - self.zmin - deltaz / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.xmax - self.xmin - deltax / 2,
    #                                              self.zmax - self.zmin - deltaz / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.xmax - self.xmin - deltax / 2,
    #                                              self.zmin - self.zmin - deltaz / 2))],
    #                                  5: [volmdlr.Point2D((
    #                                              self.zmin - self.zmin - deltaz / 2,
    #                                              self.ymin - self.ymin - deltay / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.zmin - self.zmin - deltaz / 2,
    #                                              self.ymax - self.ymin - deltay / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.zmax - self.zmin - deltaz / 2,
    #                                              self.ymax - self.ymin - deltay / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.zmax - self.zmin - deltaz / 2,
    #                                              self.ymin - self.ymin - deltay / 2))],
    #                                  6: [volmdlr.Point2D((
    #                                              self.ymin - self.ymin - deltay / 2,
    #                                              self.xmin - self.xmin - deltax / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.ymin - self.ymin - deltay / 2,
    #                                              self.xmax - self.xmin - deltax / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.ymax - self.ymin - deltay / 2,
    #                                              self.xmax - self.xmin - deltax / 2)),
    #                                      volmdlr.Point2D((
    #                                              self.ymax - self.ymin - deltay / 2,
    #                                              self.xmin - self.xmin - deltax / 2))], }
    #
    #     vertex_to_3d_dict = {1: (2, self.zmax, 0, 1),
    #                          2: (1, self.ymax, 2, 0),
    #                          3: (0, self.xmax, 1, 2),
    #                          4: (1, self.ymin, 0, 2),
    #                          5: (0, self.xmin, 2, 1),
    #                          6: (2, self.zmin, 1, 0)}
    #
    #     offset_dict = {0: self.xmin + deltax / 2,
    #                    1: self.ymin + deltay / 2,
    #                    2: self.zmin + deltaz / 2}
    #
    #     opposite_face_dict = {1: 6, 2: 4, 3: 5, 4: 2, 5: 3, 6: 1}
    #
    #     combination_dict = {
    #         (1, 2): volmdlr.Frame2D(volmdlr.Point2D(0, deltay / 2 + deltaz / 2),
    #                         volmdlr.Vector2D(0, -1), volmdlr.Vector2D(1, 0)),
    #         (2, 1): volmdlr.Frame2D(volmdlr.Point2D(deltay / 2 + deltaz / 2, 0),
    #                         volmdlr.Vector2D(0, 1), volmdlr.Vector2D(-1, 0)),
    #         (1, 3): volmdlr.Frame2D(volmdlr.Point2D(deltax / 2 + deltaz / 2, 0),
    #                         volmdlr.Vector2D(0, 1), volmdlr.Vector2D(-1, 0)),
    #         (3, 1): volmdlr.Frame2D(volmdlr.Point2D(0, deltax / 2 + deltaz / 2),
    #                         volmdlr.Vector2D(0, -1), volmdlr.Vector2D(1, 0)),
    #         (1, 4): volmdlr.Frame2D(volmdlr.Point2D(0, -deltay / 2 - deltaz / 2),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (4, 1): volmdlr.Frame2D(volmdlr.Point2D(-deltay / 2 - deltaz / 2, 0),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (1, 5): volmdlr.Frame2D(volmdlr.Point2D(-deltax / 2 - deltaz / 2, 0),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (5, 1): volmdlr.Frame2D(volmdlr.Point2D(0, -deltax / 2 - deltaz / 2),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (2, 3): volmdlr.Frame2D(volmdlr.Point2D(0, deltax / 2 + deltay / 2),
    #                         volmdlr.Vector2D(0, -1), volmdlr.Vector2D(1, 0)),
    #         (3, 2): volmdlr.Frame2D(volmdlr.Point2D(deltax / 2 + deltay / 2, 0),
    #                         volmdlr.Vector2D(0, 1), volmdlr.Vector2D(-1, 0)),
    #         (2, 5): volmdlr.Frame2D(volmdlr.Point2D(0, -deltax / 2 - deltay / 2),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (5, 2): volmdlr.Frame2D(volmdlr.Point2D(-deltax / 2 - deltay / 2, 0),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (2, 6): volmdlr.Frame2D(volmdlr.Point2D(-deltaz / 2 - deltay / 2, 0),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (6, 2): volmdlr.Frame2D(volmdlr.Point2D(0, -deltaz / 2 - deltay / 2),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (3, 4): volmdlr.Frame2D(volmdlr.Point2D(-deltay / 2 - deltax / 2, 0),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (4, 3): volmdlr.Frame2D(volmdlr.Point2D(0, -deltay / 2 - deltax / 2),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (3, 6): volmdlr.Frame2D(volmdlr.Point2D(0, -deltaz / 2 - deltax / 2),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (6, 3): volmdlr.Frame2D(volmdlr.Point2D(-deltaz / 2 - deltax / 2, 0),
    #                         volmdlr.Vector2D(1, 0), volmdlr.Vector2D(0, 1)),
    #         (4, 5): volmdlr.Frame2D(volmdlr.Point2D(-deltax / 2 - deltay / 2, 0),
    #                         volmdlr.Vector2D(0, 1), volmdlr.Vector2D(-1, 0)),
    #         (5, 4): volmdlr.Frame2D(volmdlr.Point2D(0, -deltax / 2 - deltay / 2),
    #                         volmdlr.Vector2D(0, -1), volmdlr.Vector2D(1, 0)),
    #         (4, 6): volmdlr.Frame2D(volmdlr.Point2D(0, -deltaz / 2 - deltay / 2),
    #                         volmdlr.Vector2D(0, -1), volmdlr.Vector2D(1, 0)),
    #         (6, 4): volmdlr.Frame2D(volmdlr.Point2D(-deltaz / 2 - deltay / 2, 0),
    #                         volmdlr.Vector2D(0, 1), volmdlr.Vector2D(-1, 0)),
    #         (5, 6): volmdlr.Frame2D(volmdlr.Point2D(-deltaz / 2 - deltax / 2, 0),
    #                         volmdlr.Vector2D(0, 1), volmdlr.Vector2D(-1, 0)),
    #         (6, 5): volmdlr.Frame2D(volmdlr.Point2D(0, -deltaz / 2 - deltax / 2),
    #                         volmdlr.Vector2D(0, -1), volmdlr.Vector2D(1, 0))
    #     }
    #
    #     point1_2d = point1_2d_coordinate_dict[face_point1]
    #     point2_2d = point2_2d_coordinate_dict[face_point2]
    #
    #     # The points are on adjacent faces
    #     if opposite_face_dict[face_point1] != face_point2:
    #         frame = combination_dict[(face_point1, face_point2)]
    #         net_point2 = frame.OldCoordinates(point2_2d)
    #
    #         # Computes the 3D intersection between the net_line and the edges of the face_point1
    #         net_line = edges.LineSegment2D(point1_2d, net_point2)
    #         vertex_points = vertex_2d_coordinate_dict[face_point1]
    #         edge_lines = [edges.LineSegment2D(p1, p2) for p1, p2 in
    #                       zip(vertex_points,
    #                           vertex_points[1:] + [vertex_points[0]])]
    #         for line in edge_lines:
    #             edge_intersection_point, a, b = volmdlr.Point2D.LinesIntersection(
    #                 net_line, line, curvilinear_abscissa=True)
    #             if edge_intersection_point is not None \
    #                     and a > 0 and a < 1 and b > 0 and b < 1:
    #                 break
    #         offset_indice, offset, indice1, indice2 = vertex_to_3d_dict[
    #             face_point1]
    #         disordered_coordinate = [
    #             (indice1, edge_intersection_point[0] + offset_dict[indice1]),
    #             (indice2, edge_intersection_point[1] + offset_dict[indice2]),
    #             (offset_indice, offset)]
    #         disordered_coordinate = sorted(disordered_coordinate,
    #                                        key=lambda a: a[0])
    #         intersection_point_3d = volmdlr.Point3D(
    #             tuple([p[1] for p in disordered_coordinate]))
    #
    #         mesures = [Measure3D(point1_copy, intersection_point_3d),
    #                    Measure3D(intersection_point_3d, point2_copy)]
    #
    #         return mesures
    #
    #     # The points are on opposite faces
    #     else:
    #         net_points2_and_frame = []
    #
    #         faces_number = [1, 2, 3, 4, 5, 6]
    #         faces_number.remove(face_point1)
    #         faces_number.remove(face_point2)
    #         pathes = []
    #         for face_nb in faces_number:
    #             path = [(face_point1, face_nb), (face_nb, face_point2)]
    #             pathes.append(path)
    #
    #         for path in pathes:
    #             frame1 = combination_dict[(path[0][0], path[0][1])]
    #             frame2 = combination_dict[(path[1][0], path[1][1])]
    #             frame = frame1 + frame2
    #             net_points2_and_frame.append(
    #                 (volmdlr.Point2D(frame.OldCoordinates(point2_2d).vector), frame))
    #         net_point2, frame = min(net_points2_and_frame,
    #                                 key=lambda pt: pt[0].point_distance(
    #                                     point1_2d))
    #         net_line = LineSegment2D(point1_2d, net_point2)
    #
    #         # Computes the 3D intersection between the net_line and the edges of the face_point1
    #         vertex_points = vertex_2d_coordinate_dict[face_point1]
    #         edge_lines = [LineSegment2D(p1, p2) for p1, p2 in
    #                       zip(vertex_points,
    #                           vertex_points[1:] + [vertex_points[0]])]
    #         for line in edge_lines:
    #             edge_intersection_point1, a, b = Point2D.LinesIntersection(
    #                 net_line, line, curvilinear_abscissa=True)
    #             if edge_intersection_point1 is not None \
    #                     and a > 0 and a < 1 and b > 0 and b < 1:
    #                 break
    #         offset_indice, offset, indice1, indice2 = vertex_to_3d_dict[
    #             face_point1]
    #         disordered_coordinate = [
    #             (indice1, edge_intersection_point1[0] + offset_dict[indice1]),
    #             (indice2, edge_intersection_point1[1] + offset_dict[indice2]),
    #             (offset_indice, offset)]
    #         disordered_coordinate = sorted(disordered_coordinate,
    #                                        key=lambda a: a[0])
    #         intersection_point1_3d = volmdlr.Point3D(
    #             tuple([p[1] for p in disordered_coordinate]))
    #
    #         # Computes the 3D intersection between the net_line and the edges of the face_point2
    #         vertex_points = [frame.OldCoordinates(p) for p in
    #                          vertex_2d_coordinate_dict[face_point2]]
    #         edge_lines = [LineSegment2D(p1, p2) for p1, p2 in
    #                       zip(vertex_points,
    #                           vertex_points[1:] + [vertex_points[0]])]
    #         for line in edge_lines:
    #             edge_intersection_point2, a, b = volmdlr.Point2D.LinesIntersection(
    #                 net_line, line, curvilinear_abscissa=True)
    #             if edge_intersection_point2 is not None \
    #                     and a > 0 and a < 1 and b > 0 and b < 1:
    #                 break
    #         edge_intersection_point2 = volmdlr.Point2D(
    #             frame.new_coordinates(edge_intersection_point2))
    #         offset_indice, offset, indice1, indice2 = vertex_to_3d_dict[
    #             face_point2]
    #         disordered_coordinate = [
    #             (indice1, edge_intersection_point2[0] + offset_dict[indice1]),
    #             (indice2, edge_intersection_point2[1] + offset_dict[indice2]),
    #             (offset_indice, offset)]
    #         disordered_coordinate = sorted(disordered_coordinate,
    #                                        key=lambda a: a[0])
    #         intersection_point2_3d = volmdlr.Point3D(
    #             tuple([p[1] for p in disordered_coordinate]))
    #
    #         if point1 == point1_copy:
    #             mesures = [Measure3D(point1, intersection_point1_3d),
    #                        Measure3D(intersection_point1_3d,
    #                                  intersection_point2_3d),
    #                        Measure3D(intersection_point2_3d, point2)]
    #         else:
    #             mesures = [Measure3D(point2, intersection_point2_3d),
    #                        Measure3D(intersection_point2_3d,
    #                                  intersection_point1_3d),
    #                        Measure3D(intersection_point1_3d, point1)]
    #         return mesures

    def babylon_script(self):
        height = self.ymax - self.ymin
        width = self.xmax - self.xmin
        depth = self.zmax - self.zmin
        s = 'var box = BABYLON.MeshBuilder.CreateBox("box", {{height: {}, width: {}, depth: {}}}, scene);\n'.format(
            height, width, depth)
        s += 'box.setPositionWithLocalVector(new BABYLON.Vector3({},{},{}));\n'.format(
            self.center[0], self.center[1], self.center[2])
        s += 'var bboxmat = new BABYLON.StandardMaterial("bboxmat", scene);\n'
        s += 'bboxmat.alpha = 0.4;\n'
        s += 'var DTWidth = {};\n'.format(width * 60)
        s += 'var DTHeight = {};\n'.format(height * 60)
        s += 'var font_type = "Arial";\n'
        s += 'var text = "{}";\n'.format(self.name)
        s += 'var dynamicTexture = new BABYLON.DynamicTexture("DynamicTexture", {width:DTWidth, height:DTHeight}, scene);\n'
        s += 'var ctx = dynamicTexture.getContext();\n'
        s += 'var size = 0.8;\n'
        s += 'ctx.font = size + "px " + font_type;\n'
        s += 'var textWidth = ctx.measureText(text).width;\n'
        s += 'var ratio = textWidth/size;\n'
        s += 'var font_size = Math.floor(DTWidth / ratio);\n'
        s += 'var font = font_size + "px " + font_type;\n'
        s += 'dynamicTexture.drawText(text, null, null, font, "#000000", "#ffffff", false);\n'
        s += 'bboxmat.diffuseTexture = dynamicTexture;\n'
        s += 'box.material = bboxmat;\n'
        return s




class VolumeModel(dc.DessiaObject):
    _standalone_in_db = True
    _eq_is_data_eq = True
    _non_serializable_attributes = ['shells', 'bounding_box']
    _non_eq_attributes = ['name', 'shells', 'bounding_box', 'contours',
                          'faces']
    _non_hash_attributes = ['name', 'shells', 'bounding_box', 'contours',
                          'faces']
    """
    :param groups: A list of two element tuple. The first element is a string naming the group and the second element is a list of primitives of the group
    """

    def __init__(self, primitives, name=''):
        self.primitives = primitives
        self.name = name
        self.shells = []
        # if self.primitives:
        #     self.shells = self._extract_shells()
        # if self.shells:

        self.bounding_box = self._bounding_box()
        # else:
        #     self.bounding_box = BoundingBox(-1, 1, -1, 1, -1, 1)

    def __hash__(self):
        return sum([hash(p) for p in self.primitives])

    # def _extract_shells(self):
    #     shells = []
    #     for primitive in self.primitives:
    #         if isinstance(primitive, Shell3D):
    #             shells.append(primitive)
    #     return shells

    def __eq__(self, other):
        if self.__class__.__name__ != other.__class__.__name__:
            return False
        equ = True
        if len(self.primitives) != len(other.primitives):
            return False
        for p1, p2 in zip(self.primitives, other.primitives):
            equ = equ and p1 == p2
        return equ

    def volume(self):
        volume = 0
        for primitive in self.primitives:
            volume += primitive.volume()
        return volume

    def rotation(self, center, axis, angle, copy=True):
        if copy:
            new_primitives = [
                primitive.rotation(center, axis, angle, copy=True) for
                primitive in self.primitives]
            return VolumeModel(new_primitives, self.name)
        else:
            for primitive in self.primitives:
                primitive.rotation(center, axis, angle, copy=False)
            self.bounding_box = self._bounding_box()

    def translation(self, offset, copy=True):
        if copy:
            new_primitives = [primitive.translation(offset, copy=True) for
                              primitive in self.primitives]
            return VolumeModel(new_primitives, self.name)
        else:
            for primitives in self.primitives:
                primitives.translation(offset, copy=False)
            self.bounding_box = self._bounding_box()

    def frame_mapping(self, frame, side, copy=True):
        """
        side = 'old' or 'new'
        """
        if copy:
            new_primitives = [primitive.frame_mapping(frame, side, copy=True)
                              for primitive in self.primitives]
            return VolumeModel(new_primitives, self.name)
        else:
            for primitives in self.primitives:
                primitives.frame_mapping(frame, side, copy=False)
            self.bounding_box = self._bounding_box()

    def copy(self):
        new_primitives = [primitive.copy() for primitive in self.primitives]
        return VolumeModel(new_primitives, self.name)

    def _bounding_box(self):
        bboxes = []
        points = []
        for primitive in self.primitives:
            if hasattr(primitive, 'bounding_box'):
                bboxes.append(primitive.bounding_box)
            else:
                if primitive.__class__.__name__ == 'volmdlr.Point3D':
                    points.append(primitive)
        if bboxes:
            xmin = min([box.xmin for box in bboxes])
            xmax = max([box.xmax for box in bboxes])
            ymin = min([box.ymin for box in bboxes])
            ymax = max([box.ymax for box in bboxes])
            zmin = min([box.zmin for box in bboxes])
            zmax = max([box.zmax for box in bboxes])
        elif points:
            xmin = min([p[0] for p in points])
            xmax = max([p[0] for p in points])
            ymin = min([p[1] for p in points])
            ymax = max([p[1] for p in points])
            zmin = min([p[2] for p in points])
            zmax = max([p[2] for p in points])
        else:
            # raise ValueError('Bounding box cant be determined')
            return BoundingBox(-1, 1, -1, 1, 1 - 1, 1)
        return BoundingBox(xmin, xmax, ymin, ymax, zmin, zmax)

    def plot2d(self, ax=None, color=None):
        fig = plt.figure()
        if ax is None:
            ax = fig.add_subplot(111, projection='3d')

        for i, shell in enumerate(self.shells):
            bbox = shell.bbox()
            bbox.plot(ax, color[i])

        return ax

    def plot(self, equal_aspect=True):
        """
        Matplotlib plot of model.
        To use for debug.
        """
        fig = plt.figure()
        ax = fig.add_subplot(111, projection='3d', adjustable='box')
        for primitive in self.primitives:
            primitive.plot(ax)
        if equal_aspect:
            ax.set_aspect('equal')

        ax.margins(0.1)
        return ax

    def freecad_script(self, fcstd_filepath,
                      freecad_lib_path='/usr/lib/freecad/lib',
                      export_types=('fcstd',),
                      save_to='',
                      tolerance=0.0001):
        """
        Generate python a FreeCAD definition of model
        :param fcstd_filename: a filename without extension to give the name at the fcstd part written in python code
        :type fcstd_filename:str
        """
        fcstd_filepath = os.path.abspath(fcstd_filepath)
        fcstd_filepath = fcstd_filepath.replace('\\', '\\\\')
        freecad_lib_path = freecad_lib_path.replace('\\', '\\\\')

        s = '# -*- coding: utf-8 -*-\n'
        if freecad_lib_path != '':
            s += "import sys\nsys.path.append('" + freecad_lib_path + "')\n"

        s += "import math\nimport FreeCAD as fc\nimport Part\n\ndoc=fc.newDocument('doc')\n\n"
        for ip, primitive in enumerate(self.primitives):
            if primitive.name == '':
                primitive_name = 'Primitive_{}'.format(ip)
            else:
                primitive_name = 'Primitive_{}_{}'.format(ip, primitive.name)
            s += "part = doc.addObject('App::Part','{}')\n".format(
                primitive_name)
            if hasattr(primitive, 'FreeCADExport'):
                sp = primitive.FreeCADExport(ip)
                if sp != '':
                    #                        s += (sp+'\n')
                    s += (sp)
                    s += 'shapeobj = doc.addObject("Part::Feature","{}")\n'.format(
                        primitive_name)
                    # if isinstance(primitive, BSplineCurve3D) \
                    #         or isinstance(primitive, BSplineSurface3D) \
                    #         or isinstance(primitive, Circle3D) \
                    #         or isinstance(primitive, LineSegment3D) \
                    #         or isinstance(primitive, Ellipse3D):
                    #     #                            print(primitive)
                    #     #                            s += 'S = Part.Shape([primitive{}])\n'.format(ip)
                    #     #                            s += 'shapeobj.Shape = S\n'
                    #     s += 'shapeobj.Shape = primitive{}.toShape()\n'.format(
                    #         ip)
                    # else:
                    s += "shapeobj.Shape = primitive{}\n".format(ip)
                    s += 'part.addObject(shapeobj)\n\n'.format(ip,
                                                               primitive.name)
            # --------------------DEBUG-------------------
        #                else:
        #                    raise NotImplementedError
        # ---------------------------------------------

        s += 'doc.recompute()\n'
        if 'fcstd' in export_types:
            s += "doc.saveAs('" + fcstd_filepath + ".fcstd')\n\n"
        if 'stl' in export_types:
            s += "import Mesh\nMesh.export(doc.Objects,'{}.stl', tolerance={})\n".format(
                fcstd_filepath, tolerance)
        if 'step' in export_types:
            s += "Part.export(doc.Objects,'{}.step')\n".format(fcstd_filepath)

        if save_to != '':
            with open(os.path.abspath(save_to), 'w') as file:
                file.write(s)
        return s

    def freecad_export(self, fcstd_filepath,
                      python_path='python3',
                      freecad_lib_path='/usr/lib/freecad/lib',
                      export_types=('fcstd',),
                      tolerance=0.0001):
        """
        Export model to .fcstd FreeCAD standard

        :param python_path: path of python binded to freecad

            * on windows: something like C:\\\\Program Files\\\\FreeCAD X.XX\\\\bin\\\\python
            * on linux: python if installed by a dstribution package
        :param filepath: path of fcstd file (without extension)
        :param freecad_lib_path: FreeCAD.so lib path (/usr/lib/freecad/lib in general)
        :param tolerance: the tolerance of tesselation for mesh exports

        """
        fcstd_filepath = os.path.abspath(fcstd_filepath)
        s = self.freecad_script(fcstd_filepath,
                               freecad_lib_path=freecad_lib_path,
                               export_types=export_types,
                               tolerance=tolerance)
        with tempfile.NamedTemporaryFile(suffix=".py", delete=False) as f:
            f.write(bytes(s, 'utf8'))

        arg = f.name
        output = subprocess.call([python_path, arg])

        f.close()
        os.remove(f.name)
        return output

    # def babylon_script(self, use_cdn=True, debug=False):
    #
    #     # env = Environment(loader=PackageLoader('volmdlr', 'templates'),
    #     #                   autoescape=select_autoescape(['html', 'xml']))
    #     #
    #     # template = env.get_template('babylon.html')
    #
    #     bbox = self._bounding_box()
    #     center = bbox.center
    #     max_length = max([bbox.xmax - bbox.xmin,
    #                       bbox.ymax - bbox.ymin,
    #                       bbox.zmax - bbox.zmin])
    #
    #     primitives_strings = []
    #     for primitive in self.primitives:
    #         if hasattr(primitive, 'babylon_script'):
    #             primitives_strings.append(primitive.babylon_script())
    #
    #     return template.render(name=self.name,
    #                            center=tuple(center),
    #                            length=2 * max_length,
    #                            primitives_strings=primitives_strings,
    #                            use_cdn=use_cdn,
    #                            debug=debug)
    #
    # def babylonjs_from_script(self, page_name=None, use_cdn=True, debug=False):
    #     script = self.babylon_script(use_cdn=use_cdn, debug=debug)
    #
    #     if page_name is None:
    #         with tempfile.NamedTemporaryFile(suffix=".html",
    #                                          delete=False) as file:
    #             file.write(bytes(script, 'utf8'))
    #         page_name = file.name
    #     else:
    #         page_name += '.html'
    #         with open(page_name, 'w')  as file:
    #             file.write(script)
    #
    #     webbrowser.open('file://' + os.path.realpath(page_name))

    def babylon_data(self):
        meshes = []
        for primitive in self.primitives:
            if hasattr(primitive, 'babylon_meshes'):
                meshes.extend(primitive.babylon_meshes())
        bbox = self._bounding_box()
        center = bbox.center
        max_length = max([bbox.xmax - bbox.xmin,
                          bbox.ymax - bbox.ymin,
                          bbox.zmax - bbox.zmin])

        babylon_data = {'meshes': meshes,
                        'max_length': max_length,
                        'center': list(center)}
        return babylon_data

    @classmethod
    def babylonjs_from_babylon_data(cls, babylon_data, page_name='Volmdlr model',
                                    use_cdn=True, debug=False):

        if use_cdn:
            script = volmdlr.templates.babylon_unpacker_cdn_header#.substitute(name=page_name)
        else:
            script = volmdlr.templates.babylon_unpacker_embedded_header#.substitute(name=page_name)

        script += volmdlr.templates.babylon_unpacker_body_template.substitute(
                        babylon_data=babylon_data)

        if page_name is None:
            with tempfile.NamedTemporaryFile(suffix=".html",
                                             delete=False) as file:
                file.write(bytes(script, 'utf8'))
            page_name = file.name
        else:
            page_name += '.html'
            with open(page_name, 'w')  as file:
                file.write(script)

        webbrowser.open('file://' + os.path.realpath(page_name))

    def babylonjs(self, page_name=None, use_cdn=True, debug=False):
        babylon_data = self.babylon_data()
        self.babylonjs_from_babylon_data(babylon_data, page_name=page_name,
                                         use_cdn=use_cdn, debug=debug)

    def to_stl(self, filepath):
        mesh = self.primitives[0].triangulation()
        for primitive in self.primitives[1:]:
            mesh.merge_mesh(primitive.triangulation())
        import volmdlr.stl as vmstl
        stl = vmstl.Stl.from_display_mesh(mesh)
        stl.save_to_binary_file(filepath)
        
    
    def to_step(self, filepath):
        
        
        if isinstance(filepath, str):
            if not (filepath.endswith('.step') or filepath.endswith('.stp')):
                filepath += '.step'
            file = open(filepath, 'w')
        else:
            file = filepath
        
        step_content = STEP_HEADER.format(name=self.name,
                                          filename='',
                                          timestamp=datetime.now().isoformat(),
                                          version=volmdlr.__version__)
        current_id = 8

        for primitive in self.primitives:
            primitive_content, primitive_id = primitive.to_step(current_id)

            step_content += primitive_content

            product_definition_context_id = primitive_id + 1
            step_content += "#{} = PRODUCT_DEFINITION_CONTEXT('part definition',#2,'design');\n"\
                .format(product_definition_context_id)

            product_context_id = product_definition_context_id + 1
            step_content += "#{} = PRODUCT_CONTEXT('',#2,'mechanical');\n".format(product_context_id)
            product_id = product_context_id + 1
            step_content += "#{} = PRODUCT('{}','{}','',(#{}));\n".format(product_id,
                                                                          primitive.name,
                                                                          primitive.name,
                                                                          product_context_id)
            product_definition_formation_id = product_id + 1
            step_content += "#{} = PRODUCT_DEFINITION_FORMATION('','',#{});\n".format(product_definition_formation_id, product_id)
            product_definition_id = product_definition_formation_id + 1
            step_content += "#{} = PRODUCT_DEFINITION('design','',#{},#{});\n".format(product_definition_id,
                                                                                    product_definition_formation_id,
                                                                                    product_definition_context_id)
            product_definition_shape_id = product_definition_id + 1
            step_content += "#{} = PRODUCT_DEFINITION_SHAPE('','',#{});\n".format(product_definition_shape_id, product_definition_id)
            shape_definition_repr_id = product_definition_shape_id + 1
            step_content += "#{} = SHAPE_DEFINITION_REPRESENTATION(#{},#{});\n".format(shape_definition_repr_id,
                                                                                      product_definition_shape_id,
                                                                                      primitive_id
                                                                                      )
            product_related_category = shape_definition_repr_id + 1
            step_content += "#{} = PRODUCT_RELATED_PRODUCT_CATEGORY('part',$,(#{}));\n".format(
                product_related_category,
                product_id
                )
            draughting_id = product_related_category + 1
            step_content += "#{} = DRAUGHTING_PRE_DEFINED_CURVE_FONT('continuous');\n".format(
                draughting_id)
            color_id = draughting_id + 1
            primitive_color = (1, 1, 1)
            if hasattr(primitive, 'color'):
                primitive_color = primitive.color
            step_content += "#{} = COLOUR_RGB('',{}, {}, {});\n".format(
                color_id,
                round(float(primitive_color[0]), 4),
                round(float(primitive_color[1]), 4),
                round(float(primitive_color[2]), 4)
            )

            curve_style_id = color_id + 1
            step_content += "#{} = CURVE_STYLE('',#{},POSITIVE_LENGTH_MEASURE(0.1),#{});\n".format(
                    curve_style_id, draughting_id, color_id)

            fill_area_color_id = curve_style_id + 1
            step_content += "#{} = FILL_AREA_STYLE_COLOUR('',#{});\n".format(
                    fill_area_color_id, color_id)

            fill_area_id = fill_area_color_id + 1
            step_content += "#{} = FILL_AREA_STYLE('',#{});\n".format(
                    fill_area_id, fill_area_color_id)

            suface_fill_area_id = fill_area_id + 1
            step_content += "#{} = SURFACE_STYLE_FILL_AREA(#{});\n".format(
                    suface_fill_area_id, fill_area_id)

            suface_side_style_id = suface_fill_area_id + 1
            step_content += "#{} = SURFACE_SIDE_STYLE('',(#{}));\n".format(
                    suface_side_style_id, suface_fill_area_id)

            suface_style_usage_id = suface_side_style_id + 1
            step_content += "#{} = SURFACE_STYLE_USAGE(.BOTH.,#{});\n".format(
                    suface_style_usage_id, suface_side_style_id)

            presentation_style_id = suface_style_usage_id + 1

            step_content += "#{} = PRESENTATION_STYLE_ASSIGNMENT((#{},#{}));\n".format(
                    presentation_style_id, suface_style_usage_id, curve_style_id)

            styled_item_id = presentation_style_id + 1
            step_content += "#{} = STYLED_ITEM('color',(#{}),#{});\n".format(
                    styled_item_id, presentation_style_id, primitive_id)

            current_id = styled_item_id + 1

        step_content += STEP_FOOTER
        
        file.write(step_content)
        if isinstance(filepath, str):
            file.close()

class MovingVolumeModel(VolumeModel):
    def __init__(self, primitives, step_frames, name=''):
        VolumeModel.__init__(self, primitives=primitives, name=name)
        self.step_frames = step_frames

        if not self.is_consistent():
            raise dc.ConsistencyError

    def is_consistent(self):
        n_primitives = len(self.primitives)
        for frames in self.step_frames:
            if len(frames) != n_primitives:
                return False
        return True

    def step_volume_model(self, istep):
        primitives = []
        for primitive, frame in zip(self.primitives, self.step_frames[istep]):
            primitives.append(
                primitive.frame_mapping(frame, side='old', copy=True))
        return VolumeModel(primitives)

    # def babylon_script(self, use_cdn=True, debug=False):
    #
    #     env = Environment(loader=PackageLoader('volmdlr', 'templates'),
    #                       autoescape=select_autoescape(['html', 'xml']))
    #
    #     template = env.get_template('babylon.html')
    #
    #     bbox = self._bounding_box()
    #     center = bbox.center
    #     max_length = max([bbox.xmax - bbox.xmin,
    #                       bbox.ymax - bbox.ymin,
    #                       bbox.zmax - bbox.zmin])
    #
    #     primitives_strings = []
    #     for primitive in self.primitives:
    #         if hasattr(primitive, 'babylon_script'):
    #             primitives_strings.append(primitive.babylon_script())
    #
    #     positions = []
    #     orientations = []
    #     for step in self.step_frames:
    #         step_positions = []
    #         step_orientations = []
    #
    #         for frame in step:
    #             step_positions.append(list(frame.origin))
    #             step_orientations.append([list(frame.u),
    #                                       list(frame.v),
    #                                       list(frame.w)])
    #
    #         positions.append(step_positions)
    #         orientations.append(step_orientations)
    #
    #     return template.render(name=self.name,
    #                            center=tuple(center),
    #                            length=2 * max_length,
    #                            primitives_strings=primitives_strings,
    #                            positions=positions,
    #                            orientations=orientations,
    #                            use_cdn=use_cdn,
    #                            debug=debug)

    def babylon_data(self):
        meshes = []
        primitives_to_meshes = []
        for ip, primitive in enumerate(self.primitives):
            if hasattr(primitive, 'babylon_meshes'):
                meshes.extend(primitive.babylon_meshes())
                primitives_to_meshes.append(ip)

        bbox = self._bounding_box()
        center = bbox.center
        max_length = max([bbox.xmax - bbox.xmin,
                          bbox.ymax - bbox.ymin,
                          bbox.zmax - bbox.zmin])

        steps = []
        for istep, frames in enumerate(self.step_frames):

            # step_positions = []
            # step_orientations = []
            step = {'time': istep}
            for iframe, frame in enumerate(frames):
                if iframe in primitives_to_meshes:
                    imesh = primitives_to_meshes.index(iframe)
                    step[imesh] = {}
                    step[imesh]['position'] = list(round(frame.origin, 6))
                    step[imesh]['orientations'] = [list(round(frame.u, 6)),
                                                   list(round(frame.v, 6)),
                                                   list(round(frame.w, 6))]

            steps.append(step)

        babylon_data = {'meshes': meshes,
                        'max_length': max_length,
                        'center': list(center),
                        'steps': steps}
        return babylon_data