source: XIOS/trunk/src/interface/c/iccontext.cpp @ 1542

Last change on this file since 1542 was 1542, checked in by oabramkina, 2 years ago

Replacing Boost's unordered_map and shared_pointer by its STL counterparts.

Two notes for Curie:

  • one can see the content of unordered_map with ddt only if XIOS has been compiled with gnu
  • XIOS will not compile any more with pgi (all available versions use old STL which are not up to the c++11 norms)
  • Property copyright set to
    Software name : XIOS (Xml I/O Server)
    http://forge.ipsl.jussieu.fr/ioserver
    Creation date : January 2009
    Licence : CeCCIL version2
    see license file in root directory : Licence_CeCILL_V2-en.txt
    or http://www.cecill.info/licences/Licence_CeCILL_V2-en.html
    Holder : CEA/LSCE (Laboratoire des Sciences du CLimat et de l'Environnement)
    CNRS/IPSL (Institut Pierre Simon Laplace)
    Project Manager : Yann Meurdesoif
    yann.meurdesoif@cea.fr
  • Property svn:eol-style set to native
File size: 2.7 KB
Line 
1/* ************************************************************************** *
2 *      Copyright © IPSL/LSCE, xios, Avril 2010 - Octobre 2011         *
3 * ************************************************************************** */
4
5#include <boost/multi_array.hpp>
6
7#include <memory>
8
9#include "xios.hpp"
10
11#include "attribute_template.hpp"
12#include "object_template.hpp"
13#include "group_template.hpp"
14
15#include "calendar_type.hpp"
16
17#include "icutil.hpp"
18#include "timer.hpp"
19#include "context.hpp"
20
21extern "C"
22{
23// /////////////////////////////// Définitions ////////////////////////////// //
24
25   // ----------------------- Redéfinition de types ----------------------------
26
27   typedef enum { D360 = 0 , ALLLEAP, NOLEAP, JULIAN, GREGORIAN } XCalendarType ;
28
29   typedef xios::CContext * XContextPtr;
30
31   // ------------------------ Création des handle -----------------------------
32
33   void cxios_context_handle_create (XContextPtr * _ret, const char * _id, int _id_len)
34   {
35      std::string id;
36      if (!cstr2string(_id, _id_len, id)) return;
37      CTimer::get("XIOS").resume() ;
38
39      std::vector<xios::CContext*> def_vector =
40            xios::CContext::getRoot()->getChildList();
41
42      for (std::size_t i = 0; i < def_vector.size(); i++)
43      {
44          if (def_vector[i]->getId().compare(id) == 0)
45          {
46            *_ret = def_vector[i];
47             CTimer::get("XIOS").suspend() ;
48            return;
49          }
50      }
51       CTimer::get("XIOS").suspend() ;
52       ERROR("void cxios_context_handle_create (XContextPtr * _ret, const char * _id, int _id_len)",
53             << "Context "<<id<<"  unknown");
54      // Lever une exeception ici
55   }
56
57   // ------------------------ Changements de contextes ------------------------
58
59   void cxios_context_get_current(XContextPtr* context)
60   {
61      CTimer::get("XIOS").resume();
62      *context = CContext::getCurrent();
63      CTimer::get("XIOS").suspend();
64   }
65
66   void cxios_context_set_current(XContextPtr context, bool withswap)
67   {
68      CTimer::get("XIOS").resume() ;
69      CContext::setCurrent(context->getId());
70      CTimer::get("XIOS").suspend() ;
71   }
72
73   // -------------------- Vérification des identifiants -----------------------
74
75   void cxios_context_valid_id (bool * _ret, const char * _id, int _id_len)
76   {
77      std::string id;
78      if (!cstr2string(_id, _id_len, id)) return;
79
80      CTimer::get("XIOS").resume();
81      std::vector<xios::CContext*> def_vector =
82            xios::CContext::getRoot()->getChildList();
83
84      *_ret = false;
85      for (std::size_t i = 0; i < def_vector.size(); i++)
86      {
87        if (def_vector[i]->getId().compare(id) == 0)
88        {
89          *_ret = true;
90          break;
91        }
92      }
93      CTimer::get("XIOS").suspend();
94   }
95} // extern "C"
Note: See TracBrowser for help on using the repository browser.