fpcsrc/packages/libc/src/fstabh.inc


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


const
   _PATH_FSTAB = '/etc/fstab';
   _FSTAB = '/etc/fstab';
   FSTAB_RW = 'rw';
   FSTAB_RQ = 'rq';
   FSTAB_RO = 'ro';
   FSTAB_SW = 'sw';
   FSTAB_XX = 'xx';

type
   Pfstab = ^fstab;
   fstab = record
        fs_spec : Pchar;
        fs_file : Pchar;
        fs_vfstype : Pchar;
        fs_mntops : Pchar;
        fs_type : Pchar;
        fs_freq : longint;
        fs_passno : longint;
   end;


function getfsent:Pfstab;cdecl;external clib name 'getfsent';
function getfsspec(__name:Pchar):Pfstab;cdecl;external clib name 'getfsspec';
function getfsfile(__name:Pchar):Pfstab;cdecl;external clib name 'getfsfile';
function setfsent:longint;cdecl;external clib name 'setfsent';
procedure endfsent;cdecl;external clib name 'endfsent';


{ ---------------------------------------------------------------------
    Borland compatibility types
  ---------------------------------------------------------------------}

Type
  TFSTab = fstab;