2 * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 * Copyright (C) 2006 - INRIA - Allan CORNET
4 * Copyright (C) 2010 - DIGITEO - Allan CORNET
6 * This file must be used under the terms of the CeCILL.
7 * This source file is licensed as described in the file COPYING, which
8 * you should have received as part of this distribution. The terms
9 * are also available at
10 * http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
13 /*--------------------------------------------------------------------------*/
14 #include "gw_fileio.h"
15 #include "callFunctionFromGateway.h"
17 #include "api_scilab.h"
18 /*--------------------------------------------------------------------------*/
19 /* interface function */
20 /*--------------------------------------------------------------------------*/
21 static gw_generic_table Tab[] =
24 {sci_mputstr, "mputstr"},
25 {sci_mclose, "mclose"},
28 {sci_mgetstr, "mgetstr"},
32 {sci_mclearerr, "mclearerr"},
33 {sci_mfprintf, "mfprintf"},
34 {sci_scanf, "mscanf"},
35 {sci_fscanf, "mfscanf"},
36 {sci_sscanf, "msscanf"},
37 {sci_fscanfMat, "fscanfMat"},
38 {sci_fprintfMat, "fprintfMat"},
39 {sci_merror, "merror"},
40 {sci_findfiles, "findfiles"},
41 {sci_maxfiles, "maxfiles"},
42 {sci_getdrives, "getdrives"},
43 {sci_fullpath, "fullpath"},
44 {sci_deletefile, "deletefile"},
45 {sci_pathsep, "pathsep"},
46 {sci_filesep, "filesep"},
47 {sci_getlongpathname, "getlongpathname"},
48 {sci_getshortpathname, "getshortpathname"},
49 {sci_fileext, "fileext"},
51 {sci_removedir, "removedir"},
52 {sci_createdir, "createdir"},
55 {sci_fileinfo, "fileinfo"},
56 {sci_newest, "newest"},
57 {sci_getrelativefilename, "getrelativefilename"},
58 {sci_get_absolute_file_path, "get_absolute_file_path"},
59 {sci_copyfile, "copyfile"},
60 {sci_isfile, "isfile"},
61 {sci_fileparts, "fileparts"},
62 {sci_movefile, "movefile"},
63 {sci_basename, "basename"},
64 {sci_pathconvert, "pathconvert"},
68 {sci_tempname, "tempname"},
69 {sci_getURL, "getURL"},
70 {sci_splitURL, "splitURL"},
71 {sci_archive_list,"archiveList"}
73 /*--------------------------------------------------------------------------*/
80 pvApiCtx = (StrCtx*)MALLOC(sizeof(StrCtx));
83 pvApiCtx->pstName = (char*)Tab[Fin - 1].name;
84 callFunctionFromGateway(Tab, SIZE_CURRENT_GENERIC_TABLE(Tab));
87 /*--------------------------------------------------------------------------*/