# -*- coding: utf-8 -*-
# Copyright (C) 2014-2020  EDF R&D
#
# This library is free software; you can redistribute it and/or
# modify it under the terms of the GNU Lesser General Public
# License as published by the Free Software Foundation; either
# version 2.1 of the License, or (at your option) any later version.
#
# This library 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 GNU
# Lesser General Public License for more details.
#
# You should have received a copy of the GNU Lesser General Public
# License along with this library; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
#
# See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
#

import logging
from .geomsmesh import geompy
import math
from .distance2 import distance2
import traceback
from .fissError import fissError

# -----------------------------------------------------------------------------
# --- zone de defaut extraite du maillage

def creeZoneDefautMaillage(maillagesSains, shapeDefaut, tailleDefaut,
                           nomZones, coordsNoeudsFissure):
  """Identification de la zone à remailler, opérations sur le maillage de l'objet sain.

  La zone à remailler est définie à partir d'un objet géométrique
  ou à partir d'un jeu de points et d'une distance d'influence.
  @param maillagesSains : (le maillage de l'objet initial, booleen isHexa)
  @param shapeDefaut : objet géométrique représentant la fissure
  (selon les cas, un point central, ou une shape plus complexe, dont on ne garde que les vertices)
  @param tailleDefaut : distance d'influence définissant la zone à remailler:
  tous les éléments du maillage initial qui pénètrent dans cette zone
  sont détectés
  @param nomZones : préfixe des noms de groupes créés dans le maillage initial. S'il y a un groupe de noeuds
  @coordsNoeudsFissure : jeu de points donné par une liste (x1,y1,z1, x2,y2,z2, ...)
  @return (origShapes, verticesShapes, dmoyen) liste id subShapes, listes noeuds de bord, longueur arête moyenne bord
  """
  logging.info("start")
  logging.debug("distance d'influence (tailleDefaut) = %f" % tailleDefaut)
  #print ("  shapeDefaut : {}".format(shapeDefaut))
  #print ("  nomZones : {}".format(nomZones))

  maillageSain = maillagesSains[0]
  isHexa = maillagesSains[1]
  lists = maillageSain.CreateHoleSkin(tailleDefaut, shapeDefaut, nomZones, coordsNoeudsFissure)

  #print("lists = {}".format(lists))

  trace = True
  origShapes = list()
  verticesShapes = list()

  cumul = 0. # somme des distances carrées entre point ordonnés (taille des arêtes)
  nb = 0     # nombre d'arêtes évaluées

  for aList in lists:
    aShape = aList[0]
    origShapes.append(aShape)
    vertices = list()
    xyz0 = maillageSain.GetNodeXYZ(aList[1])
    ###vertices.append(geompy.MakeVertex(xyz0[0], xyz0[1], xyz0[2])) pourquoi pas le premier ?
    #print ("  node 0 {} : {}".format(aList[1],xyz0))
    #print (xyz0)
    for node in aList[2:]:
      xyz = maillageSain.GetNodeXYZ(node)
      #print ("  node {} : {}".format(node,xyz))
      cumul += distance2(xyz, xyz0)
      xyz0 = xyz
      #logging.debug("    node %s %s", node, xyz)
      vertices.append(geompy.MakeVertex(xyz[0], xyz[1], xyz[2]))
    nb += len(aList) - 2
    verticesShapes.append(vertices)
  #print ("nb = {}".format(nb))
  #print ("cumul = {}".format(cumul))

  if (nb == 0):
    texte = "La zone à remailler n'est pas détectée correctement.<br>"
    texte += "Cause possible :<ul>"
    texte += "<li>La distance d'influence est trop petite. "
    texte += "L'ordre de grandeur minimal correspond à la taille des mailles du maillage sain dans la zone à remailler.</li></ul>"
    raise fissError(traceback.extract_stack(),texte)

  dmoyen = math.sqrt(cumul/float(nb)) # ~ taille de l'arête moyenne du maillage global
  return origShapes, verticesShapes, dmoyen