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

#include <OpenGl_GlCore11.hxx>

#include <OpenGl_LineAttributes.hxx>
#include <OpenGl_Context.hxx>

IMPLEMENT_STANDARD_RTTIEXT(OpenGl_LineAttributes,OpenGl_Resource)

// =======================================================================
// function : OpenGl_LineAttributes
// purpose  :
// =======================================================================
OpenGl_LineAttributes::OpenGl_LineAttributes()
: myTypeOfHatch (0),
  myIsEnabled (true)
{
  //
}

// =======================================================================
// function : ~OpenGl_LineAttributes
// purpose  :
// =======================================================================
OpenGl_LineAttributes::~OpenGl_LineAttributes()
{
  Release (NULL);
}

// =======================================================================
// function : Release
// purpose  :
// =======================================================================
void OpenGl_LineAttributes::Release (OpenGl_Context* theGlCtx)
{
  // Delete surface patterns
#if !defined(GL_ES_VERSION_2_0)
  if (theGlCtx != NULL && theGlCtx->IsValid())
  {
    for (OpenGl_MapOfHatchStylesAndIds::Iterator anIter (myStyles); anIter.More(); anIter.Next())
    {
      theGlCtx->core11->glDeleteLists ((GLuint)anIter.Value(), 1);
    }
  }
#else
    (void )theGlCtx;
#endif
    myStyles.Clear();
}

// =======================================================================
// function : init
// purpose  :
// =======================================================================
unsigned int OpenGl_LineAttributes::init (const OpenGl_Context* theGlCtx,
                                          const Handle(Graphic3d_HatchStyle)& theStyle)
{
#if !defined(GL_ES_VERSION_2_0)
  if (theGlCtx->core11 == NULL)
  {
    return 0;
  }

  const unsigned int aListId = glGenLists(1);
  theGlCtx->core11->glNewList ((GLuint)aListId, GL_COMPILE);
  theGlCtx->core11->glPolygonStipple ((const GLubyte*)theStyle->Pattern());
  theGlCtx->core11->glEndList();
  return aListId;
#else
  (void )theGlCtx;
  (void )theStyle;
  return 0;
#endif
}

// =======================================================================
// function : SetTypeOfHatch
// purpose  :
// =======================================================================
int OpenGl_LineAttributes::SetTypeOfHatch (const OpenGl_Context*               theGlCtx,
                                           const Handle(Graphic3d_HatchStyle)& theStyle)
{
  // Return if not initialized
  if (theStyle.IsNull())
  {
    return 0;
  }

  const int anOldType = myTypeOfHatch;

  unsigned int aGpuListId = 0;
  if (!myStyles.Find (theStyle, aGpuListId))
  {
    aGpuListId = init (theGlCtx, theStyle);
    myStyles.Bind (theStyle, aGpuListId);
  }

#if !defined(GL_ES_VERSION_2_0)
  if (theGlCtx->core11 == NULL)
  {
    return 0;
  }
  else if (theStyle->HatchType() != 0)
  {
    theGlCtx->core11->glCallList ((GLuint)aGpuListId);

    if (myIsEnabled)
    {
      theGlCtx->core11fwd->glEnable (GL_POLYGON_STIPPLE);
    }
  }
  else
  {
    theGlCtx->core11fwd->glDisable (GL_POLYGON_STIPPLE);
  }
#else
  (void )theGlCtx;
#endif
  myTypeOfHatch = theStyle->HatchType();

  return anOldType;
}

// =======================================================================
// function : SetEnabled
// purpose  :
// =======================================================================
bool OpenGl_LineAttributes::SetEnabled (const OpenGl_Context* theGlCtx,
                                        const bool theToEnable)
{
  // Return if not initialized
  if (myStyles.IsEmpty())
  {
    return false;
  }

  const bool anOldIsEnabled = myIsEnabled;

#if !defined(GL_ES_VERSION_2_0)
  if (theGlCtx->core11 == NULL)
  {
    return 0;
  }
  else if (theToEnable)
  {
    if (myTypeOfHatch != 0)
    {
      theGlCtx->core11fwd->glEnable (GL_POLYGON_STIPPLE);
    }
  }
  else
  {
    theGlCtx->core11fwd->glDisable (GL_POLYGON_STIPPLE);
  }
#else
  (void )theGlCtx;
#endif
  myIsEnabled = theToEnable;

  return anOldIsEnabled;
}