fpc/rtl/linux/systypes.inc

167 lines
4.2 KiB
PHP

{
$Id$
This file is part of the Free Pascal run time library.
Copyright (c) 1999-2000 by Michael Van Canneyt,
member of the Free Pascal development team.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
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.
**********************************************************************}
type
{
Linux system calls take arguments as follows :
i386 m68k ppc
%eax %d0 r0 System call number
%ebx %d1 r3 first argument
%ecx %d2 r4 second argument
%edx %d3 r5 third argumens
%esi %d3 r6 fourth argument
%edi %d4 r7 fifth argument
That is why we define a special type, with only these arguments
To make it processor independent, we don't give any system dependent
names, but the rather abstract reg1,reg2 etc;
SysCallRegs=record
reg1,reg2,reg3,reg4,reg5,reg6 : longint;
end;
PSysCallRegs=^SysCallRegs;
TSysCallRegs=SysCallRegs;
}
{
{ The following are records for system calls }
dirent = packed record
ino,
off : longint;
reclen : word;
name : array [0..255] of char;
end;
pdirent =^dirent;
TDirEnt = dirent;
TDir = packed record
fd : integer;
loc : longint;
size : integer;
buf : pdirent;
{The following are used in libc, but NOT in the linux kernel sources ??}
nextoff: longint;
dd_max : integer; {size of buf. Irrelevant, as buf is of type dirent}
lock : pointer;
end;
PDir =^TDir;
}
{ can't put definition in stat.inc because stat.inc is also included in }
{ bunxtype.inc, which is used together with ptypes.inc, which defines }
{ def_t in another way :( }
{
{$ifdef cpui386}
dev_t = word;
{$else cpui386}
{$ifdef cpum68k}
dev_t = word;
{$else cpum68k}
{$ifdef cpupowerpc}
dev_t = cardinal;
{$else cpupowerpc}
{$ifdef cpusparc}
dev_t = cardinal;
{$else cpusparc}
{$error dev_t unknown for this processor}
{$endif cpusparc}
{$endif cpupowerpc}
{$endif cpum68k}
{$endif cpui386}
}{
{ definition of stat record type }
{i stat.inc}
PStat=^Stat;
TStat=Stat;
}
TStatfs = packed record
fstype, { File system type }
bsize, { Optimal block trensfer size }
blocks, { Data blocks in system }
bfree, { free blocks in system }
bavail, { Available free blocks to non-root users }
files, { File nodes in system }
ffree, { Free file nodes in system }
fsid, { File system ID }
namelen : longint; { Maximum name length in system }
spare : array [0..6] of longint; { For later use }
end;
PStatFS=^TStatFS;
{
fdSet=array[0..31] of longint;{=1024 bits}
pfdset=^fdset;
TFDSet=fdset;
timeval = packed record
sec,usec:longint
end;
ptimeval=^timeval;
TTimeVal=timeval;
timespec = packed record
tv_sec,tv_nsec:longint;
end;
timezone = packed record
minuteswest,dsttime:longint;
end;
ptimezone =^timezone;
TTimeZone = timezone;
utsname = packed record
sysname,
nodename,
release,
version,
machine,
domainname : Array[0..64] of char;
end;
PUTSName=^UTSName;
TUTSName=UTSName;
}
{
$Log$
Revision 1.12 2003-09-14 20:15:01 marco
* Unix reform stage two. Remove all calls from Unix that exist in Baseunix.
Revision 1.11 2003/08/21 22:24:52 olle
- removed parameter from fpc_iocheck
Revision 1.10 2003/07/08 21:23:24 peter
* sparc fixes
Revision 1.9 2003/07/08 14:18:40 peter
* fdset changed to 1024 bits
Revision 1.8 2003/05/15 22:50:50 jonas
* the stat type is processor-dependent
* the dev_t tpye is processor dependent. Don't use it in the stat type
however, as that one is also used at a time where dev_t is already
defined as qword
Revision 1.7 2002/09/07 16:01:20 peter
* old logs removed and tabs fixed
Revision 1.6 2002/07/29 17:50:02 florian
+ added register location description for ppc
}