MEDlinkInfo.c
Aller à la documentation de ce fichier.00001 
00002 
00003 
00004 
00005 
00006 
00007 
00008 
00009 
00010 
00011 
00012 
00013 
00014 
00015 
00016 
00017 
00018 
00019 #include <med.h>
00020 #include <med_config.h>
00021 #include <med_outils.h>
00022 
00023 #include <string.h>
00024 #include <stdlib.h>
00025 
00037 med_err
00038 MEDlinkInfo(const med_idt             fid,
00039             const int                 linkit,
00040             char              * const meshname,
00041             med_int           * const linksize )
00042 {
00043   med_err _ret=-1;
00044   char    _path[MED_TAILLE_LIENS+MED_NAME_SIZE+1]=MED_LIENS;
00045   int     _num=linkit-1;
00046 
00047   
00048 
00049 
00050   _MEDmodeErreurVerrouiller();
00051 
00052   
00053 
00054 
00055   if ( _MEDobjectGetName(fid, _path ,_num, meshname) < 0 ) {
00056     MED_ERR_(_ret,MED_ERR_ACCESS,MED_ERR_DATAGROUP,_path);
00057     ISCRUTE_int(linkit);
00058     goto ERROR;
00059   }
00060   *linksize =  MEDlinkInfoByName(fid,meshname );
00061 
00062   if (*linksize <0) _ret=*linksize; else _ret = 0;
00063  ERROR:
00064 
00065   return _ret;
00066 }