|
|
@@ -1,167 +0,0 @@
|
|
|
-{
|
|
|
- $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
|
|
|
-
|
|
|
-}
|
|
|
-
|
|
|
-{
|
|
|
- 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;
|
|
|
-}
|
|
|
-{
|
|
|
-{ 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;
|
|
|
-}
|
|
|
-
|
|
|
-{
|
|
|
-
|
|
|
- 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.14 2004-02-06 23:06:16 florian
|
|
|
- - killed tsyscallregs
|
|
|
-
|
|
|
- Revision 1.13 2004/01/11 09:56:20 jonas
|
|
|
- * moved tstatfs from systypes.inc to ptypes.inc to fix make cycle with
|
|
|
- -dFPC_USE_LIBC (systypes.inc is now completely commented out)
|
|
|
-
|
|
|
- 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
|
|
|
-
|
|
|
-}
|
|
|
-
|
peter