// Copyright (c) 1999-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 <Vrml_PointLight.hxx>

Vrml_PointLight::Vrml_PointLight()
    : myOnOff(Standard_True),
      myIntensity(1),
      myColor(Quantity_NOC_WHITE),
      myLocation(0, 0, 1)
{
  //
}

Vrml_PointLight::Vrml_PointLight(const Standard_Boolean aOnOff,
                                 const Standard_Real    aIntensity,
                                 const Quantity_Color&  aColor,
                                 const gp_Vec&          aLocation)
{
  if (aIntensity < 0. || aIntensity > 1.)
  {
    throw Standard_Failure("Error : Light intensity must be in the range 0.0 to 1.0, inclusive.");
  }
  myOnOff     = aOnOff;
  myIntensity = aIntensity;
  myColor     = aColor;
  myLocation  = aLocation;
}

void Vrml_PointLight::SetOnOff(const Standard_Boolean aOnOff)
{
  myOnOff = aOnOff;
}

Standard_Boolean Vrml_PointLight::OnOff() const
{
  return myOnOff;
}

void Vrml_PointLight::SetIntensity(const Standard_Real aIntensity)
{
  if (aIntensity < 0. || aIntensity > 1.)
  {
    throw Standard_Failure("Error : Light intensity must be in the range 0.0 to 1.0, inclusive.");
  }
  myIntensity = aIntensity;
}

Standard_Real Vrml_PointLight::Intensity() const
{
  return myIntensity;
}

void Vrml_PointLight::SetColor(const Quantity_Color& aColor)
{
  myColor = aColor;
}

Quantity_Color Vrml_PointLight::Color() const
{
  return myColor;
}

void Vrml_PointLight::SetLocation(const gp_Vec& aLocation)
{
  myLocation = aLocation;
}

gp_Vec Vrml_PointLight::Location() const
{
  return myLocation;
}

Standard_OStream& Vrml_PointLight::Print(Standard_OStream& anOStream) const
{
  anOStream << "PointLight {\n";

  if (myOnOff != Standard_True)
  {
    anOStream << "    on\t\tFALSE\n";
    //    anOStream << myOnOff << "\n";
  }

  if (Abs(myIntensity - 1) > 0.0001)
  {
    anOStream << "    intensity\t";
    anOStream << myIntensity << "\n";
  }

  if (Abs(myColor.Red() - 1) > 0.0001 || Abs(myColor.Green() - 1) > 0.0001
      || Abs(myColor.Blue() - 1) > 0.0001)
  {
    NCollection_Vec3<Standard_Real> aColor_sRGB;
    myColor.Values(aColor_sRGB.r(), aColor_sRGB.g(), aColor_sRGB.b(), Quantity_TOC_sRGB);
    anOStream << "    color\t";
    anOStream << aColor_sRGB.r() << " " << aColor_sRGB.g() << " " << aColor_sRGB.b() << "\n";
  }

  if (Abs(myLocation.X() - 0) > 0.0001 || Abs(myLocation.Y() - 0) > 0.0001
      || Abs(myLocation.Z() - 1) > 0.0001)
  {
    anOStream << "    location\t";
    anOStream << myLocation.X() << " " << myLocation.Y() << " " << myLocation.Z() << "\n";
  }

  anOStream << "}\n";
  return anOStream;
}