Changeset 1875 for XIOS/dev/dev_ym/XIOS_COUPLING/src/node/coupler_in.cpp

Timestamp:

05/12/20 11:52:13 (4 years ago)

Author:

ymipsl

Message:

XIOS coupling branch
Some updates.

First coupling test is beginning to work...

YM

File:

• XIOS/dev/dev_ym/XIOS_COUPLING/src/node/coupler_in.cpp (modified) (3 diffs)

XIOS/dev/dev_ym/XIOS_COUPLING/src/node/coupler_in.cpp

@@ -51 +51 @@
    CATCH_DUMP_ATTR
 
+   const string& CCouplerIn::getCouplingContextId(void)
+   {
+     if (couplingContextId_.empty())
+     {
+       vector<string> vectStr=splitRegex(context,"::") ;
+       string poolId=vectStr[0] ;
+       string serviceId=poolId ;
+       string contextId=vectStr[1] ;
+       int contextLeader ;
+       int type = CServicesManager::CLIENT ;
+       couplingContextId_=CXios::getContextsManager()->getServerContextName(poolId, serviceId, 0, type, contextId) ;
+     }
+     return couplingContextId_ ;
+   }
+
    void CCouplerIn::createInterCommunicator(void)
    TRY
@@ -60 +75 @@
      }
      CContext* contextPtr = CContext::getCurrent();
-     contextPtr->addCouplingChanel(context, false) ;
+     contextPtr->addCouplingChanel(getCouplingContextId(), false) ;
    }
    CATCH_DUMP_ATTR
@@ -132 +147 @@
    CATCH
 
-
+  /*!
+   * assign the context associated to the coupler to the enabled fields
+   */
+   void  CCouplerIn::assignContext(void)
+   {
+     client_ = CContext::getCurrent()->getCouplerInClient(getCouplingContextId());
+     for (auto& field : getEnabledFields()) field->setContextClient(client_) ; 
+   }
 
    //----------------------------------------------------------------