//----------------------------------------------------------------------------
//  EgalTech 2014-2014
//----------------------------------------------------------------------------
// File : API_GdbObjAttribs.cpp      Data : 03.09.14       Versione : 1.5i1
// Contenuto : Funzioni sugli attributi degli oggetti di GeomDB per API.
//
//
//
// Modifiche : 03.09.14 DS Creazione modulo.
//
//
//----------------------------------------------------------------------------

//--------------------------- Include ----------------------------------------
#include "stdafx.h"
#include "API.h"
#include "API_Macro.h"
#include "/EgtDev/Include/EInAPI.h"
#include "/EgtDev/Include/EGkStringUtils3d.h"
#include "/EgtDev/Include/EGnStringConverter.h"
#include "/EgtDev/Include/EgtPointerOwner.h"

using namespace std ;


//-----------------------------------------------------------------------------
BOOL
__stdcall EgtSetLevel( int nId, int nLevel)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // imposto il livello
   return ( pGeomDB->SetLevel( nId, nLevel) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtRevertLevel( int nId)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // porto il livello allo stato precedente
   return ( pGeomDB->RevertLevel( nId) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetLevel( int nId, int* pnLevel)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // verifico il parametro
   if ( pnLevel == nullptr)
      return FALSE ;
  // recupero il livello
   return ( pGeomDB->GetLevel( nId, *pnLevel) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetCalcLevel( int nId, int* pnLevel)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // verifico il parametro
   if ( pnLevel == nullptr)
      return FALSE ;
  // recupero il modo
   return ( pGeomDB->GetCalcLevel( nId, *pnLevel) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtSetMode( int nId, int nMode)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // imposto il modo
   return ( pGeomDB->SetMode( nId, nMode) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtRevertMode( int nId)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // porto il modo allo stato precedente
   return ( pGeomDB->RevertMode( nId) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetMode( int nId, int* pnMode)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // verifico il parametro
   if ( pnMode == nullptr)
      return FALSE ;
  // recupero il modo
   return ( pGeomDB->GetMode( nId, *pnMode) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetCalcMode( int nId, int* pnMode)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // verifico il parametro
   if ( pnMode == nullptr)
      return FALSE ;
  // recupero il modo
   return ( pGeomDB->GetCalcMode( nId, *pnMode) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtSetStatus( int nId, int nStat)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // imposto il modo
   bool bOk = pGeomDB->SetStatus( nId, nStat) ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sStat = "'ON'" ;
      if ( nStat == GDB_ST_SEL)
         sStat = "'SEL'" ;
      else if ( nStat == GDB_ST_OFF)
         sStat = "'OFF'" ;
      string sLua = "EgtSetStatus(" + ToString( nId) + "," +
                                      sStat + ")" +
                    " -- Ok=" + ToString( bOk) ;
      LOG_INFO( GetCmdLogger(), sLua.c_str()) ;
   }
  // restituisco risultato
   return ( bOk ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtRevertStatus( int nId)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // porto lo stato al valore precedente
   return ( pGeomDB->RevertStatus( nId) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetStatus( int nId, int* pnStat)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // verifico il parametro
   if ( pnStat == nullptr)
      return FALSE ;
  // recupero il modo
   return ( pGeomDB->GetStatus( nId, *pnStat) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetCalcStatus( int nId, int* pnStat)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // verifico il parametro
   if ( pnStat == nullptr)
      return FALSE ;
  // recupero il modo
   return ( pGeomDB->GetCalcStatus( nId, *pnStat) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtSetMark( int nId)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // imposto l'evidenziazione
   return ( pGeomDB->SetMark( nId) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtResetMark( int nId)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // cancello l'evidenziazione
   return ( pGeomDB->ResetMark( nId) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetMark( int nId, BOOL* pbMark)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // verifico il parametro
   if ( pbMark == nullptr)
      return FALSE ;
  // recupero il modo
   return ( pGeomDB->GetMark( nId, *pbMark) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetCalcMark( int nId, BOOL* pbMark)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // verifico il parametro
   if ( pbMark == nullptr)
      return FALSE ;
  // recupero il modo
   return ( pGeomDB->GetCalcMark( nId, *pbMark) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtStdColor( const wchar_t* wsName, int StdCol[4])
{
   Color ColStd ;
   if ( GetStdColor( wstrztoA( wsName), ColStd)) {
      StdCol[0] = ColStd.GetIntRed() ;
      StdCol[1] = ColStd.GetIntGreen() ;
      StdCol[2] = ColStd.GetIntBlue() ;
      StdCol[3] = ColStd.GetIntAlpha() ;
      return TRUE ;
   }
   return FALSE ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtSetColor( int nId, const int ObjCol[4])
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // sistemo il colore
   Color cCol( ObjCol) ;
   bool bOk = true ;
  // assegno il colore a un singolo oggetto
   if ( nId != GDB_ID_SEL) {
      bOk = pGeomDB->SetMaterial( nId, cCol) ;
   }
  // assegno il colore ai selezionati
   else {
      int nI = pGeomDB->GetFirstSelectedObj() ;
      while ( nI != GDB_ID_NULL  &&  bOk) {
         if ( ! pGeomDB->SetMaterial( nI, cCol))
            bOk = false ;
         nI = pGeomDB->GetNextSelectedObj() ;
      }
   }
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtSetColor(" + ( nId != GDB_ID_SEL ? ToString( nId): "GDB_ID_SEL") + ",{" +
                                     ToString( cCol) + "})" +
                    " -- Ok=" + ToString( bOk) ;
      LOG_INFO( GetCmdLogger(), sLua.c_str()) ;
   }
  // restituisco risultato
   return ( bOk ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtResetColor( int nId)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
   bool bOk = true ;
  // tolgo il colore a un singolo oggetto
   if ( nId != GDB_ID_SEL) {
      bOk = pGeomDB->SetMaterial( nId, GDB_MT_PARENT) ;
   }
  // tolgo il colore ai selezionati
   else {
      int nI = pGeomDB->GetFirstSelectedObj() ;
      while ( nI != GDB_ID_NULL  &&  bOk) {
         if ( ! pGeomDB->SetMaterial( nI, GDB_MT_PARENT))
            bOk = false ;
         nI = pGeomDB->GetNextSelectedObj() ;
      }
   }
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtResetColor(" + ( nId != GDB_ID_SEL ? ToString( nId): "GDB_ID_SEL") + ")" +
                    " -- Ok=" + ToString( bOk) ;
      LOG_INFO( GetCmdLogger(), sLua.c_str()) ;
   }
  // restituisco risultato
   return ( bOk ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetColor( int nId, int ObjCol[4])
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // recupero il colore
   Color cCol ;
   if ( pGeomDB->GetMaterial( nId, cCol)) {
      ObjCol[0] = cCol.GetIntRed() ;
      ObjCol[1] = cCol.GetIntGreen() ;
      ObjCol[2] = cCol.GetIntBlue() ;
      ObjCol[3] = cCol.GetIntAlpha() ;
      return TRUE ;
   }
   else
      return FALSE ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetCalcColor( int nId, int ObjCol[4])
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // recupero il colore
   Color cCol ;
   if ( pGeomDB->GetCalcMaterial( nId, cCol)) {
      ObjCol[0] = cCol.GetIntRed() ;
      ObjCol[1] = cCol.GetIntGreen() ;
      ObjCol[2] = cCol.GetIntBlue() ;
      ObjCol[3] = cCol.GetIntAlpha() ;
      return TRUE ;
   }
   else
      return FALSE ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtSetName( int nId, const wchar_t* wsName)
{
   return ( EgtSetName( nId, wstrztoA( wsName)) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
bool
EgtSetName( int nId, const string& sName)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, false)
  // assegno il nome
   bool bOk = pGeomDB->SetName( nId, sName) ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtSetName(" + ToString( nId) + ",'" +
                                    sName + "')" +
                    " -- Ok=" + ToString( bOk) ;
      LOG_INFO( GetCmdLogger(), sLua.c_str()) ;
   }
  // restituisco risultato
   return bOk ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetName( int nId, wchar_t*& wsName)
{
   if ( &wsName == nullptr)
      return false ;
   string sName ;
   if ( ! EgtGetName( nId, sName))
      return FALSE ;
   wsName = _wcsdup( stringtoW( sName)) ;
   return  (( wsName == nullptr) ? FALSE : TRUE) ;
}

//-----------------------------------------------------------------------------
bool
EgtGetName( int nId, string& sName)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, false)
  // recupero il nome
   return pGeomDB->GetName( nId, sName) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtExistsName( int nId)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // verifico esistenza del nome
   return ( pGeomDB->ExistsName( nId) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtRemoveName( int nId)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // rimuovo il nome
   bool bOk = pGeomDB->RemoveName( nId) ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtRemoveName(" + ToString( nId) + ")" +
                    " -- Ok=" + ToString( bOk) ;
      LOG_INFO( GetCmdLogger(), sLua.c_str()) ;
   }
  // restituisco risultato
   return ( bOk ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtSetInfo( int nId, const wchar_t* wsKey, const wchar_t* wsInfo)
{
   return ( EgtSetInfo( nId, wstrztoA( wsKey), wstrztoA( wsInfo)) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
bool
EgtSetInfo( int nId, const string& sKey, const string& sInfo)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // assegno la info
   bool bOk = pGeomDB->SetInfo( nId, sKey, sInfo) ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtSetInfo(" + ToString( nId) + ",'" +
                                    sKey + "','" +
                                    sInfo + "')" +
                    " -- Ok=" + ToString( bOk) ;
      LOG_INFO( GetCmdLogger(), sLua.c_str()) ;
   }
  // restituisco risultato
   return bOk ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtSetInfoInt( int nId, const wchar_t* wsKey, int nInfo)
{
   return ( EgtSetInfo( nId, wstrztoA( wsKey), nInfo) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
bool
EgtSetInfo( int nId, const string& sKey, int nInfo)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // assegno la info
   return pGeomDB->SetInfo( nId, sKey, nInfo) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetInfo( int nId, const wchar_t* wsKey, wchar_t*& wsInfo)
{
   string sInfo ;
   if ( ! EgtGetInfo( nId, wstrztoA( wsKey), sInfo))
      return FALSE ;
   wsInfo = _wcsdup( stringtoW( sInfo)) ;
   return  (( wsInfo == nullptr) ? FALSE : TRUE) ;
}

//-----------------------------------------------------------------------------
bool
EgtGetInfo( int nId, const string& sKey, string& sInfo)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // recupero info
   return pGeomDB->GetInfo( nId, sKey, sInfo) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtGetInfoInt( int nId, const wchar_t* wsKey, int* pnInfo)
{
  // verifico il parametro
   if ( pnInfo == nullptr)
      return FALSE ;
  // recupero info
   return ( EgtGetInfo( nId, wstrztoA( wsKey), *pnInfo) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
bool
EgtGetInfo( int nId, const string& sKey, int& nInfo)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // recupero la info
   return pGeomDB->GetInfo( nId, sKey, nInfo) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtExistsInfo( int nId, const wchar_t* wsKey)
{
   return ( EgtExistsInfo( nId, wstrztoA( wsKey)) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
bool
EgtExistsInfo( int nId, const string& sKey)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // verifico esistenza info
   return pGeomDB->ExistsInfo( nId, sKey) ;
}

//-----------------------------------------------------------------------------
BOOL
__stdcall EgtRemoveInfo( int nId, const wchar_t* wsKey)
{
   return ( EgtRemoveInfo( nId, wstrztoA( wsKey)) ? TRUE : FALSE) ;
}

//-----------------------------------------------------------------------------
bool
EgtRemoveInfo( int nId, const string& sKey)
{
   IGeomDB* pGeomDB = GetCurrGeomDB() ;
   VERIFY_GEOMDB( pGeomDB, FALSE)
  // rimuovo la info
   bool bOk = pGeomDB->RemoveInfo( nId, sKey) ;
  // se richiesto, salvo il comando Lua equivalente
   if ( IsCmdLog()) {
      string sLua = "EgtRemoveInfo(" + ToString( nId) + ",'" +
                                    sKey + "')" +
                    " -- Ok=" + ToString( bOk) ;
      LOG_INFO( GetCmdLogger(), sLua.c_str()) ;
   }
  // restituisco risultato
   return bOk ;
}