//----------------------------------------------------------------------------
//  EgalTech 2015-2015
//----------------------------------------------------------------------------
// File : DrillingData.cpp       Data : 04.06.15          Versione : 1.6f1
// Contenuto : Implementazione struttura dati lavorazione di foratura.
//
//
//
// Modifiche : 04.06.15 DS Creazione modulo.
//
//
//----------------------------------------------------------------------------

//--------------------------- Include ----------------------------------------
#include "stdafx.h"
#include "DrillingData.h"
#include "MachiningDataFactory.h"
#include "MachiningConst.h"
#include "/EgtDev/Include/EmkToolConst.h"
#include "/EgtDev/Include/EmkSimuGenConst.h"
#include "/EgtDev/Include/EGnStringUtils.h"
#include <array>
#include <cassert>

using namespace std ;

//----------------------------------------------------------------------------
enum nDrillingKey {
   KEY_AB = 0,
   KEY_AI,
   KEY_DH,
   KEY_EAL,
   KEY_F,
   KEY_FE,
   KEY_FS,
   KEY_FT,
   KEY_INV,
   KEY_LAT,
   KEY_LSE,
   KEY_LSS,
   KEY_NAME,
   KEY_NNS,
   KEY_NNU,
   KEY_OFF,
   KEY_OVL,
   KEY_PR,
   KEY_PS,
   KEY_S,
   KEY_SAL,
   KEY_SCC,
   KEY_ST,
   KEY_SUBTYPE,
   KEY_TNAME,
   KEY_TUUID,
   KEY_UUID,
   KEY_ZZZ} ;        // rappresenta il numero di elementi

static const array<string,KEY_ZZZ> sDrillingKey = {
   "AB",
   "AI",
   "DH",
   "EAL",
   "F",
   "FE",
   "FS",
   "FT",
   "INV",
   "LAT",
   "LSE",
   "LSS",
   "NAME",
   "NNS",
   "NNU",
   "OFF",
   "OVL",
   "PR",
   "PS",
   "S",
   "SAL",
   "SCC",
   "ST",
   "SUB",
   "TN",
   "TU",
   "UUID"} ;

//----------------------------------------------------------------------------
MCHDATA_REGISTER( MT_DRILLING, "DRILLING", DrillingData) ;

//----------------------------------------------------------------------------
DrillingData*
DrillingData::Clone( void) const
{
  // alloco oggetto
   DrillingData* pDdata = new(nothrow) DrillingData ;
  // copio i dati
   if ( pDdata != nullptr) {
      if ( ! pDdata->CopyFrom( this)) {
         delete pDdata ;
         return nullptr ;
      }
   }
   return pDdata ;
}

//----------------------------------------------------------------------------
bool
DrillingData::CopyFrom( const MachiningData* pMdata)
{
  // è inutile copiare se sorgente coincide con destinazione
   if ( pMdata == this)
      return true ;
  // la sorgente deve essere dello stesso tipo
   const DrillingData* pDdata = GetDrillingData( pMdata) ;
   if ( pDdata == nullptr)
      return false ;
  // eseguo copia
   m_Uuid = pDdata->m_Uuid ;
   m_sName = pDdata->m_sName ;
   m_ToolUuid = pDdata->m_ToolUuid ;
   m_sToolName = pDdata->m_sToolName ;
   m_sBlockedAxis = pDdata->m_sBlockedAxis ;
   m_sInitAngs = pDdata->m_sInitAngs ;
   m_nSolCh = pDdata->m_nSolCh ;
   m_dSpeed = pDdata->m_dSpeed ;
   m_dFeed = pDdata->m_dFeed ;
   m_dEndFeed = pDdata->m_dEndFeed ;
   m_dStartFeed = pDdata->m_dStartFeed ;
   m_dTipFeed = pDdata->m_dTipFeed ;
   m_bInvert = pDdata->m_bInvert ;
   m_sDepth = pDdata->m_sDepth ;
   m_dStartPos = pDdata->m_dStartPos ;
   m_dStartSlowLen = pDdata->m_dStartSlowLen ;
   m_dEndSlowLen = pDdata->m_dEndSlowLen ;
   m_dThroughAddLen = pDdata->m_dThroughAddLen ;
   m_dStep = pDdata->m_dStep ;
   m_dReturnPos = pDdata->m_dReturnPos ;
   m_nSubType = pDdata->m_nSubType ;
   m_sOffset = pDdata->m_sOffset ;
   m_sOverlap = pDdata->m_sOverlap ;
   m_dStartAddLen = pDdata->m_dStartAddLen ;
   m_dEndAddLen = pDdata->m_dEndAddLen ;
   m_sSysNotes = pDdata->m_sSysNotes ;
   m_sUserNotes = pDdata->m_sUserNotes ;
   return true ;
}

//----------------------------------------------------------------------------
bool
DrillingData::SameAs(const MachiningData* pMdata) const
{
  // se coincide con altro -> uguali
   if ( pMdata == this)
      return true ;
  // se sono di tipo diverso -> diversi
   const DrillingData* pDdata = GetDrillingData( pMdata) ;
   if ( pDdata == nullptr)
      return false ;
  // confronto termine a termine
   return ( m_Uuid == pDdata->m_Uuid  &&
            m_sName == pDdata->m_sName  &&
            m_ToolUuid == pDdata->m_ToolUuid  &&
            m_sToolName == pDdata->m_sToolName  &&
            m_sBlockedAxis == pDdata->m_sBlockedAxis  &&
            m_sInitAngs == pDdata->m_sInitAngs  &&
            m_nSolCh == pDdata->m_nSolCh  &&
            abs( m_dSpeed - pDdata->m_dSpeed) < EPS_MACH_ANG_PAR  &&
            abs( m_dFeed - pDdata->m_dFeed) < EPS_MACH_LEN_PAR  &&
            abs( m_dEndFeed - pDdata->m_dEndFeed) < EPS_MACH_LEN_PAR  &&
            abs( m_dStartFeed - pDdata->m_dStartFeed) < EPS_MACH_LEN_PAR  &&
            abs( m_dTipFeed - pDdata->m_dTipFeed) < EPS_MACH_LEN_PAR  &&
            m_bInvert == pDdata->m_bInvert  &&
            m_sDepth == pDdata->m_sDepth  &&
            abs( m_dStartPos - pDdata->m_dStartPos) < EPS_MACH_LEN_PAR  &&
            abs( m_dStartSlowLen - pDdata->m_dStartSlowLen) < EPS_MACH_LEN_PAR  &&
            abs( m_dEndSlowLen - pDdata->m_dEndSlowLen) < EPS_MACH_LEN_PAR  &&
            abs( m_dThroughAddLen - pDdata->m_dThroughAddLen) < EPS_MACH_LEN_PAR  &&
            abs( m_dStep - pDdata->m_dStep) < EPS_MACH_LEN_PAR  &&
            abs( m_dReturnPos - pDdata->m_dReturnPos) < EPS_MACH_LEN_PAR  &&
            m_nSubType == pDdata->m_nSubType  &&
            m_sOffset == pDdata->m_sOffset  &&
            m_sOverlap == pDdata->m_sOverlap  &&
            abs( m_dStartAddLen - pDdata->m_dStartAddLen) < EPS_MACH_LEN_PAR  &&
            abs( m_dEndAddLen - pDdata->m_dEndAddLen) < EPS_MACH_LEN_PAR  &&
            m_sSysNotes == pDdata->m_sSysNotes  &&
            m_sUserNotes == pDdata->m_sUserNotes) ;
}

//----------------------------------------------------------------------------
int
DrillingData::GetSize( void) const
{
  // in debug verifico validità ultimo campo
   assert( sDrillingKey[KEY_UUID] == "UUID") ;
   return KEY_ZZZ ;
}
//----------------------------------------------------------------------------
string
DrillingData::GetTitle( void) const
{
   return MCHDATA_GETNAME( DrillingData) ;
}

//----------------------------------------------------------------------------
int
FindDrillingKey( const string& sKey)
{
   auto TheRange = equal_range( sDrillingKey.cbegin(), sDrillingKey.cend(), sKey) ;
   if ( TheRange.first == TheRange.second)
      return - 1 ;
   return int( TheRange.first - sDrillingKey.cbegin()) ;
}

//----------------------------------------------------------------------------
bool
DrillingData::FromString( const string& sString, int& nKey)
{
  // separo chiave da valore
   string sKey, sVal ;
   SplitFirst( sString, "=", sKey, sVal) ;
  // riconosco la chiave
   nKey = FindDrillingKey( ToUpper( sKey)) ;
   bool bOk = ( nKey >= 0) ;
   switch ( nKey) {
   case KEY_AB :
      m_sBlockedAxis = sVal ;
      break ;
   case KEY_AI :
      m_sInitAngs = sVal ;
      break ;
   case KEY_DH :
      m_sDepth = sVal ;
      if ( m_sDepth.empty())
         m_sDepth = "TH" ;
      break ;
   case KEY_EAL :
      bOk = ::FromString( sVal, m_dEndAddLen) ;
      break ;
   case KEY_F :
      bOk = ::FromString( sVal, m_dFeed) ;
      break ;
   case KEY_FE :
      bOk = ::FromString( sVal, m_dEndFeed) ;
      break ;
   case KEY_FS :
      bOk = ::FromString( sVal, m_dStartFeed) ;
      break ;
   case KEY_FT :
      bOk = ::FromString( sVal, m_dTipFeed) ;
      break ;
   case KEY_INV :
      bOk = ::FromString( sVal, m_bInvert) ;
      break ;
   case KEY_LAT :
      bOk = ::FromString( sVal, m_dThroughAddLen) ;
      break ;
   case KEY_LSE :
      bOk = ::FromString( sVal, m_dEndSlowLen) ;
      break ;
   case KEY_LSS :
      bOk = ::FromString( sVal, m_dStartSlowLen) ;
      break ;
   case KEY_NAME :
      m_sName = sVal ;
      bOk = ! m_sName.empty() ;
      break ;
   case KEY_NNS :
      m_sSysNotes = sVal ;
      break ;
   case KEY_NNU :
      m_sUserNotes = sVal ;
      break ;
   case KEY_OFF :
      m_sOffset = sVal ;
      if ( m_sOffset.empty())
         m_sOffset = "0" ;
      break ;
   case KEY_OVL :
      m_sOverlap = sVal ;
      if ( m_sOverlap.empty())
         m_sOverlap = "0" ;
      break ;
   case KEY_PR :
      bOk = ::FromString( sVal, m_dReturnPos) ;
      break ;
   case KEY_PS :
      bOk = ::FromString( sVal, m_dStartPos) ;
      break ;
   case KEY_S :
      bOk = ::FromString( sVal, m_dSpeed) ;
      break ;
   case KEY_SAL :
      bOk = ::FromString( sVal, m_dStartAddLen) ;
      break ;
   case KEY_SCC :
      bOk = ::FromString( sVal, m_nSolCh) ;
      break ;
   case KEY_ST :
      bOk = ::FromString( sVal, m_dStep) ;
      break ;
   case KEY_TNAME :
      m_sToolName = sVal ;
      break ;
   case KEY_TUUID :
      bOk = ::FromString( sVal, m_ToolUuid) ;
      break ;
   case KEY_SUBTYPE :
      bOk = ::FromString( sVal, m_nSubType) ;
      break ;
   case KEY_UUID :
      bOk = ::FromString( sVal, m_Uuid) ;
      break ;
   default :
      bOk = false ;
      break ;
   }
   return bOk ;
}

//----------------------------------------------------------------------------
string
DrillingData::ToString( int nKey) const
{
   switch ( nKey) {
   case KEY_AB : return ( sDrillingKey[KEY_AB] + "=" +  m_sBlockedAxis) ;
   case KEY_AI : return ( sDrillingKey[KEY_AI] + "=" +  m_sInitAngs) ;
   case KEY_DH : return ( sDrillingKey[KEY_DH] + "=" + m_sDepth) ;
   case KEY_EAL : return ( sDrillingKey[KEY_EAL] + "=" + ::ToString( m_dEndAddLen)) ;
   case KEY_F : return ( sDrillingKey[KEY_F] + "=" + ::ToString( m_dFeed)) ;
   case KEY_FE : return ( sDrillingKey[KEY_FE] + "=" + ::ToString( m_dEndFeed)) ;
   case KEY_FS : return ( sDrillingKey[KEY_FS] + "=" + ::ToString( m_dStartFeed)) ;
   case KEY_FT : return ( sDrillingKey[KEY_FT] + "=" + ::ToString( m_dTipFeed)) ;
   case KEY_INV : return ( sDrillingKey[KEY_INV] + "=" + ::ToString( m_bInvert)) ;
   case KEY_LAT : return ( sDrillingKey[KEY_LAT] + "=" + ::ToString( m_dThroughAddLen)) ;
   case KEY_LSE : return ( sDrillingKey[KEY_LSE] + "=" + ::ToString( m_dEndSlowLen)) ;
   case KEY_LSS : return ( sDrillingKey[KEY_LSS] + "=" + ::ToString( m_dStartSlowLen)) ;
   case KEY_NAME : return ( sDrillingKey[KEY_NAME] + "=" + m_sName) ;
   case KEY_NNS : return ( sDrillingKey[KEY_NNS] + "=" + m_sSysNotes) ;
   case KEY_NNU : return ( sDrillingKey[KEY_NNU] + "=" + m_sUserNotes) ;
   case KEY_OFF : return ( sDrillingKey[KEY_OFF] + "=" + m_sOffset) ;
   case KEY_OVL : return ( sDrillingKey[KEY_OVL] + "=" + m_sOverlap) ;
   case KEY_PR : return ( sDrillingKey[KEY_PR] + "=" + ::ToString( m_dReturnPos)) ;
   case KEY_PS : return ( sDrillingKey[KEY_PS] + "=" + ::ToString( m_dStartPos)) ;
   case KEY_S : return ( sDrillingKey[KEY_S] + "=" + ::ToString( m_dSpeed)) ;
   case KEY_SAL : return ( sDrillingKey[KEY_SAL] + "=" + ::ToString( m_dStartAddLen)) ;
   case KEY_SCC : return ( sDrillingKey[KEY_SCC] + "=" + ::ToString( m_nSolCh)) ;
   case KEY_ST : return ( sDrillingKey[KEY_ST] + "=" + ::ToString( m_dStep)) ;
   case KEY_TNAME : return ( sDrillingKey[KEY_TNAME] + "=" + m_sToolName) ;
   case KEY_TUUID : return ( sDrillingKey[KEY_TUUID] + "=" + ::ToString( m_ToolUuid)) ;
   case KEY_SUBTYPE : return ( sDrillingKey[KEY_SUBTYPE] + "=" + ::ToString( m_nSubType)) ;
   case KEY_UUID : return ( sDrillingKey[KEY_UUID] + "=" + ::ToString( m_Uuid)) ;
   default : return "" ;
   }
}

//----------------------------------------------------------------------------
bool
DrillingData::IsOptional( int nKey) const
{
   return ( nKey == KEY_AB  ||  nKey == KEY_AI  ||  nKey == KEY_EAL  ||  nKey == KEY_F  ||
            nKey == KEY_FE  ||  nKey == KEY_FS  ||  nKey == KEY_FT  ||
            nKey == KEY_NNS  ||  nKey == KEY_NNU  ||  nKey == KEY_S ||  nKey == KEY_SAL  ||
            nKey == KEY_SUBTYPE  ||  nKey == KEY_OFF  ||  nKey == KEY_OVL  ||  nKey == KEY_SCC) ;
}

//----------------------------------------------------------------------------
bool
DrillingData::VerifySolCh( int nVal) const
{
   return IsValidOperationScc( nVal) ;
}

//----------------------------------------------------------------------------
bool
DrillingData::VerifyTool( const ToolsMgr* pToolsMgr, const string& sVal, const ToolData*& pTdata) const
{
   if ( pToolsMgr == nullptr)
      return false ;
   pTdata =  pToolsMgr->GetTool( sVal) ;
   if ( pTdata == nullptr)
      return false ;
   if ( ( pTdata->m_nType & TF_DRILLBIT) == 0  &&
        pTdata->m_nType != TT_MILL_STD)
      return false ;
   return true ;
}

//----------------------------------------------------------------------------
bool
DrillingData::GetTool( const ToolsMgr* pToolsMgr, const ToolData*& pTdata) const
{
   if ( pToolsMgr == nullptr)
      return false ;
   pTdata = pToolsMgr->GetTool( m_ToolUuid) ;
   return ( pTdata != nullptr) ;
}

//----------------------------------------------------------------------------
bool
DrillingData::SetParam( int nType, bool bVal)
{
   switch ( nType) {
   case MPA_INVERT :
      m_bInvert = bVal ;
      return true ;
   }
   return false ;
}

//----------------------------------------------------------------------------
bool
DrillingData::SetParam( int nType, int nVal)
{
   switch ( nType) {
   case MPA_SUBTYPE :
      m_nSubType = nVal ;
      return true ;
   case MPA_SCC :
      if ( ! VerifySolCh( nVal))
         return false ;
      m_nSolCh = nVal ;
      return true ;
   }
   return false ;
}

//----------------------------------------------------------------------------
bool
DrillingData::SetParam( int nType, double dVal)
{
   switch ( nType) {
   case MPA_SPEED :
      m_dSpeed = dVal ;
      return true ;
   case MPA_FEED :
      m_dFeed = dVal ;
      return true ;
   case MPA_STARTFEED :
      m_dStartFeed = dVal ;
      return true ;
   case MPA_ENDFEED :
      m_dEndFeed = dVal ;
      return true ;
   case MPA_TIPFEED :
      m_dTipFeed = dVal ;
      return true ;
   case MPA_DEPTH :
      m_sDepth = ::ToString( dVal) ;
      return true ;
   case MPA_STARTPOS :
      m_dStartPos = dVal ;
      return true ;
   case MPA_STARTSLOWLEN :
      m_dStartSlowLen = dVal ;
      return true ;
   case MPA_ENDSLOWLEN :
      m_dEndSlowLen = dVal ;
      return true ;
   case MPA_THROUADDLEN :
      m_dThroughAddLen = dVal ;
      return true ;
   case MPA_STEP :
      m_dStep = dVal ;
      return true ;
   case MPA_RETURNPOS :
      m_dReturnPos = dVal ;
      return true ;
   case MPA_OVERLAP :
      m_sOverlap = ::ToString( dVal) ;
      return true ;
   case MPA_STARTADDLEN :
      m_dStartAddLen = dVal ;
      return true ;
   case MPA_ENDADDLEN :
      m_dEndAddLen = dVal ;
      return true ;
   case MPA_OFFSET :
      m_sOffset = ::ToString( dVal) ;
      return true ; 
   }
   return false ;
}

//----------------------------------------------------------------------------
bool
DrillingData::SetParam( int nType, const string& sVal)
{
   switch ( nType) {
   case MPA_NAME :
      m_sName = sVal ;
      return true ;
   case MPA_TOOL :
      m_sToolName = sVal ;
      return true ;
   case MPA_DEPTH_STR :
      m_sDepth = sVal ;
      return true ;
   case MPA_TUUID :
      return ::FromString( sVal, m_ToolUuid) ;
   case MPA_UUID :
      return ::FromString( sVal, m_Uuid) ;
   case MPA_SYSNOTES :
      m_sSysNotes = sVal ;
      return true ;
   case MPA_USERNOTES :
      m_sUserNotes = sVal ;
      return true ;
   case MPA_OVERLAP_STR :
      m_sOverlap = sVal ;
      return true ;
   case MPA_OFFSET_STR :
      m_sOffset = sVal ;
      return true ;
   case MPA_INITANGS :
      m_sInitAngs = sVal ;
      return true ;
   case MPA_BLOCKEDAXIS :
      m_sBlockedAxis = sVal ;
      return true ;
   }
   return false ;
}

//----------------------------------------------------------------------------
bool
DrillingData::ResetTool( void)
{
   m_sToolName.clear() ;
   m_ToolUuid.Clear() ;
   return true ;
}

//----------------------------------------------------------------------------
bool
DrillingData::GetParam( int nType, bool& bVal) const
{
   switch ( nType) {
   case MPA_INVERT :
      bVal = m_bInvert ;
      return true ;
   }
   bVal = false ;
   return false ;
}

//----------------------------------------------------------------------------
bool
DrillingData::GetParam( int nType, int& nVal) const
{
   switch ( nType) {
   case MPA_TYPE :
      nVal = MT_DRILLING ;
      return true ;
   case MPA_SUBTYPE :
      nVal = m_nSubType ;
      return true ;
   case MPA_SCC :
      nVal = m_nSolCh ;
      return true ;
   }
   nVal = 0 ;
   return false ;
}

//----------------------------------------------------------------------------
bool
DrillingData::GetParam( int nType, double& dVal) const
{
   switch ( nType) {
   case MPA_SPEED :
      dVal = m_dSpeed ;
      return true ;
   case MPA_FEED :
      dVal = m_dFeed ;
      return true ;
   case MPA_STARTFEED :
      dVal = m_dStartFeed ;
      return true ;
   case MPA_ENDFEED :
      dVal = m_dEndFeed ;
      return true ;
   case MPA_TIPFEED :
      dVal = m_dTipFeed ;
      return true ;
   case MPA_STARTPOS :
      dVal = m_dStartPos ;
      return true ;
   case MPA_STARTSLOWLEN :
      dVal = m_dStartSlowLen ;
      return true ;
   case MPA_ENDSLOWLEN :
      dVal = m_dEndSlowLen ;
      return true ;
   case MPA_THROUADDLEN :
      dVal = m_dThroughAddLen ;
      return true ;
   case MPA_STEP :
      dVal = m_dStep ;
      return true ;
   case MPA_RETURNPOS :
      dVal = m_dReturnPos ;
      return true ;
   case MPA_STARTADDLEN :
      dVal = m_dStartAddLen ;
      return true ;
   case MPA_ENDADDLEN :
      dVal = m_dEndAddLen ;
      return true ;
   }
   dVal = 0 ;
   return false ;
}

//----------------------------------------------------------------------------
bool
DrillingData::GetParam( int nType, string& sVal) const
{
   switch ( nType) {
   case MPA_NAME :
      sVal = m_sName ;
      return true ;
   case MPA_TOOL :
      sVal = m_sToolName ;
      return true ;
   case MPA_DEPTH_STR :
      sVal = m_sDepth ;
      return true ;
   case MPA_TUUID :
      sVal = ::ToString( m_ToolUuid) ;
      return true ;
   case MPA_UUID :
      sVal = ::ToString( m_Uuid) ;
      return true ;
   case MPA_SYSNOTES :
      sVal = m_sSysNotes ;
      return true ;
   case MPA_USERNOTES :
      sVal = m_sUserNotes ;
      return true ;
   case MPA_OVERLAP_STR :
      sVal = m_sOverlap ;
      return true ;
   case MPA_OFFSET_STR :
      sVal = m_sOffset ;
      return true ;
   case MPA_INITANGS :
      sVal = m_sInitAngs ;
      return true ;
   case MPA_BLOCKEDAXIS :
      sVal = m_sBlockedAxis ;
      return true ;
   }
   sVal = "" ;
   return false ;
}