source: XIOS/dev/dev_ym/XIOS_COUPLING/src/interface/c/icdomain.cpp @ 1869

Last change on this file since 1869 was 1622, checked in by oabramkina, 6 years ago

Exception handling on trunk.

To activate it, compilation flag -DXIOS_EXCEPTION should be added.
  • 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.1 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 "icutil.hpp"
16#include "timer.hpp"
17#include "domain.hpp"
18
19extern "C"
20{
21// /////////////////////////////// Définitions ////////////////////////////// //
22
23   // ----------------------- Redéfinition de types ----------------------------
24
25   typedef xios::CDomain      * XDomainPtr;
26   typedef xios::CDomainGroup * XDomainGroupPtr;
27
28   // ------------------------ Création des handle -----------------------------
29   
30   void cxios_domain_handle_create (XDomainPtr * _ret, const char * _id, int _id_len)
31   TRY
32   {
33      std::string id; 
34      if (!cstr2string(_id, _id_len, id)) return;
35      CTimer::get("XIOS").resume() ;
36      *_ret = CDomain::get(id);
37      CTimer::get("XIOS").suspend() ;
38   }
39   CATCH_DUMP_STACK
40   
41   void cxios_domaingroup_handle_create (XDomainGroupPtr * _ret, const char * _id, int _id_len)
42   TRY
43   {
44      std::string id; 
45      if (!cstr2string(_id, _id_len, id)) return;
46
47      CTimer::get("XIOS").resume() ;
48      *_ret = CDomainGroup::get(id);
49      CTimer::get("XIOS").suspend() ;
50   }
51   CATCH_DUMP_STACK
52
53   // -------------------- Vérification des identifiants -----------------------
54
55   void cxios_domain_valid_id (bool * _ret, const char * _id, int _id_len)
56   TRY
57   {
58      std::string id;
59      if (!cstr2string(_id, _id_len, id)) return;
60
61      CTimer::get("XIOS").resume() ;
62      *_ret = CDomain::has(id);
63      CTimer::get("XIOS").suspend() ;
64   }
65   CATCH_DUMP_STACK
66
67   void cxios_domaingroup_valid_id (bool * _ret, const char * _id, int _id_len)
68   TRY
69   {
70      std::string id;
71      if (!cstr2string(_id, _id_len, id)) return;
72      CTimer::get("XIOS").resume() ;
73      *_ret = CDomainGroup::has(id);
74      CTimer::get("XIOS").suspend() ;
75   }
76   CATCH_DUMP_STACK
77} // extern "C"
Note: See TracBrowser for help on using the repository browser.