Scilab [trunk]: scilab/modules/fileio/src/c/files.h Source File

00001 /*------------------------------------------------------------------------*/
00002 /* Copyright INRIA 2006                                                   */
00003 /* Authors : Sylvestre ledru                                              */
00004 /*------------------------------------------------------------------------*/
00005 #ifndef __FILES_H__
00006 #define __FILES_H__
00007 #include "machine.h"
00008 
00009 void C2F(getfiledesc)(integer *fd);
00010 
00011 void C2F(addfile)(integer *fd, FILE *fa, integer *swap, integer *type, integer *mode, char *filename, integer *ierr);
00012 
00013 void C2F(getfileinfo)(integer *fd, FILE *fa, integer *swap, integer *type, integer *mode, char *filename, integer *lf, integer *ierr);
00014 
00015 void C2F(getfiletype)(integer *fd, integer *type, integer *ierr);
00016 
00017 void C2F(delfile)(integer *fd);
00018 
00019 int Status2Mode(char *status);
00020 
00021 FILE *GetFile(integer *fd);
00022 
00023 int GetSwap(integer *fd);
00024 
00025 int islittle_endian(void);
00026 
00027 int C2F(getendian)(void);
00028 
00029 void C2F(mopen)(int *fd, char *file, char *status, int *f_swap, double *res, int *error);
00030 
00031 void C2F(mclose) (integer *fd, double *res);
00032 
00033 void C2F(meof) (integer *fd, double *res);
00034 
00035 void C2F(merror) (integer *fd, double *res);
00036 
00037 void C2F(mclearerr) (integer *fd);
00038 
00039 void C2F(mseek) (integer *fd, integer *offset, char *flag, integer *err);
00040 
00041 void C2F(mtell) (integer *fd, double *offset, integer *err);
00042 
00043 void C2F(mputnc) (integer *fd, void * res, integer *n1, char *type, integer *ierr);
00044 
00045 void mput2 (FILE *fa, integer swap2, double *res, integer n, char *type, integer *ierr);
00046 
00047 void C2F(mput) (integer *fd, double *res, integer *n, char *type, integer *ierr);
00048 
00049 void C2F(mgetnc)(integer *fd, void * res, integer *n1, char *type, integer *ierr);
00050 
00051 void mget2(FILE *fa, integer swap, double *res, integer n, char *type, integer *ierr);
00052 
00053 void C2F(mget) (integer *fd, double *res, integer *n, char *type, integer *ierr);
00054 
00055 void C2F(mgetstr) (integer *fd, char **start, integer *n, integer *ierr);
00056 
00057 void C2F(mgetstr1) (integer *fd, char *start, integer *n, integer *ierr);
00058 
00059 void C2F(mputstr) (int *fd, char *str, double *res, int *ierr);
00060 
00061 #endif /* __FILES_H__ */