This file is indexed.

/usr/include/scilab/import.h is in scilab-include 5.5.2-4+b1.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
/*  Scicos
*
*  Copyright (C) INRIA - METALAU Project <scicos@inria.fr>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*
* See the file ./license.txt
*/
#ifndef __IMPORT_H__
#define __IMPORT_H__

#include "machine.h"

#include "dynlib_scicos.h"

#include "scicos_block4.h"

typedef struct
{
    int lnk;
    int pos;
} outtb_el;

typedef struct
{
    double* x;            /* continuous state */
    int *nx;          /* length of continuous state  */
    int * xptr;        /* vector of pointers on block states */
    int * zcptr;       /* vector of pointers on block zero crosses */
    double* z;            /* discrete state */
    int *nz;          /* length of discrete state */
    int* zptr;        /* vector of pointers on block states */
    int *noz;         /* scalar number of object discrete states */
    void **oz;            /* pointer array of object discrete states */
    int *ozsz;        /* vector of dimension of object discrete states */
    int *oztyp;       /* vector of type of object discrete states */
    int *ozptr;       /* vector of pointers on object discrete states */
    double* g;            /* zero crossing state */
    int *ng;          /* length of zero crossing register */
    int* mod;         /* modes of the blocks */
    int *nmod;        /* length of mod register */
    int* modptr;      /* vector of pointers */
    int* iz;          /* vectors of labels */
    int* izptr;       /* vector of pointers on block labels */
    int* uid;         /* vectors of uids */
    int* uidptr;      /* vector of pointers on block uids */
    int* inpptr;      /* vector of pointers on block inputs */
    int* inplnk;      /* vector of pointers on input link */
    int* outptr;      /* vector of pointers on block outputs */
    int* outlnk;      /* vector of pointers on output link */
    double * rpar;        /* vector of real parameters */
    int* rpptr;       /* vector of pointers on block real parameters */
    int* ipar;        /* vector of integer parameters */
    int* ipptr;       /* vector of pointers on block integer parameters */
    void **opar;          /* pointer array of object parameters */
    int *oparsz;      /* vector of dimension of object parameters */
    int *opartyp;     /* vector of type of object parameters */
    int *opptr;       /* vector of pointers on object parameters */
    int *nblk;        /* number of  blocks */
    void **outtbptr;      /* vector of pointer of object of outtb */
    int *outtbsz;     /* vector of size of object of outtb */
    int *outtbtyp;    /* vector of type of object of outtb */
    int *nlnk;        /* number of object of outtb */
    int* subs;        /*  */
    int *nsubs;       /*  */
    double* tevts;        /*  */
    int* evtspt;      /*  */
    int *nevts;       /*  */
    int *pointi;      /*  */
    int *iord;        /*  */
    int *niord;       /*  */
    int *oord;        /*  */
    int *noord;       /*  */
    int *zord;        /*  */
    int *nzord;       /*  */
    int *funptr;      /* block indexes */
    int *funtyp;      /* block types */
    int *ztyp;        /* block types */
    int *cord;        /* block types */
    int *ncord;       /* */
    int *ordclk;      /* block types */
    int *nordclk;     /* size of ordclk */
    int *clkptr;      /* block types */
    int *ordptr;      /* block types */
    int *nordptr;     /* */
    int *critev;      /* block types */
    int *iwa;         /* integer work space of size nevts */
    int *mask;        /* integer work space ng for mask */
    scicos_block *blocks; /* scicos_block structure ptr */
    double *t0;           /* scalar initial time of simulation  */
    double *tf;           /* scalar final time of simulation    */
    double *Atol;         /* scalar absolute tolerance of solvers of diff. equa. */
    double *rtol;         /* scalar relative tolerance of solvers of diff. equa. */
    double *ttol;         /* scalar time tolerance of solvers of diff. equa. */
    double *deltat;       /* deltat */
    double *hmax;         /* hmax */
    outtb_el *outtb_elem; /* table (of size 2) coding each indexes of element of matrix in a same array */
    int *nelem;       /* total unit element */
    int *xprop;       /* xproperties (of size nx) */
    double *xd;           /* derivative of continuous state */
} ScicosImport;

SCICOS_IMPEXP ScicosImport* getscicosimportptr(void);

SCICOS_IMPEXP int getscicosvarsfromimport(char *what, void **v, int *nv, int *mv);

SCICOS_IMPEXP void C2F(getouttb)(int *nsize, int *nvec, double *outtc);

SCICOS_IMPEXP void C2F(getlabel)(int *kfun, char *label, int *n);

SCICOS_IMPEXP int C2F(getscilabel)(int *kfun, int label[], int *n);

#endif /* __IMPORT_H__ */