source: XIOS/dev/dev_ym/XIOS_COUPLING/src/interface/c/icfile.cpp @ 2243

Last change on this file since 2243 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#include <memory>
7
8#include "xios.hpp"
9
10#include "attribute_template.hpp"
11#include "object_template.hpp"
12#include "group_template.hpp"
13
14#include "icutil.hpp"
15#include "timer.hpp"
16#include "file.hpp"
17
18extern "C"
19{
20// /////////////////////////////// Définitions ////////////////////////////// //
21
22   // ----------------------- Redéfinition de types ----------------------------
23   
24   typedef xios::CFile      * XFilePtr;
25   typedef xios::CFileGroup * XFileGroupPtr;
26
27   // ------------------------ Création des handle -----------------------------
28   
29   void cxios_file_handle_create (XFilePtr * _ret, const char * _id, int _id_len)
30   TRY
31   {
32      std::string id; 
33      if (!cstr2string(_id, _id_len, id)) return;
34      CTimer::get("XIOS").resume() ;
35      *_ret = CFile::get(id);
36      CTimer::get("XIOS").suspend() ;
37   }
38   CATCH_DUMP_STACK
39   
40   void cxios_filegroup_handle_create (XFileGroupPtr * _ret, const char * _id, int _id_len)
41   TRY
42   {
43      std::string id; 
44      if (!cstr2string(_id, _id_len, id)) return;
45      CTimer::get("XIOS").resume() ;
46      *_ret = CFileGroup::get(id);
47      CTimer::get("XIOS").suspend() ;
48   }
49   CATCH_DUMP_STACK
50
51   // -------------------- Vérification des identifiants -----------------------
52
53   void cxios_file_valid_id (bool * _ret, const char * _id, int _id_len)
54   TRY
55   {
56      std::string id;
57      if (!cstr2string(_id, _id_len, id)) return;
58      CTimer::get("XIOS").resume() ;
59      *_ret = CFile::has(id);
60      CTimer::get("XIOS").suspend() ;
61   }
62   CATCH_DUMP_STACK
63
64   void cxios_filegroup_valid_id (bool * _ret, const char * _id, int _id_len)
65   TRY
66   {
67      std::string id;
68      if (!cstr2string(_id, _id_len, id)) return;
69      CTimer::get("XIOS").resume() ;
70      *_ret = CFileGroup::has(id);
71      CTimer::get("XIOS").suspend() ;
72   }
73   CATCH_DUMP_STACK
74} // extern "C"
Note: See TracBrowser for help on using the repository browser.