|
|
@@ -0,0 +1,116 @@
|
|
|
+{
|
|
|
+ $Id$
|
|
|
+ This file is part of the Free Pascal run time library.
|
|
|
+ Copyright (c) 2001 by Free Pascal development team
|
|
|
+
|
|
|
+ This file implements all the base types and limits required
|
|
|
+ for a minimal POSIX compliant subset required to port the compiler
|
|
|
+ to a new OS.
|
|
|
+
|
|
|
+ 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.
|
|
|
+
|
|
|
+ **********************************************************************}
|
|
|
+
|
|
|
+{***********************************************************************}
|
|
|
+{ POSIX TYPE DEFINITIONS }
|
|
|
+{***********************************************************************}
|
|
|
+
|
|
|
+{ Introduced defines
|
|
|
+ - 64bitarch (for 64-bits Linux systems, test system was idefix
|
|
|
+ - 64bitfs (should be on if libc switches to a 64-bit system.
|
|
|
+
|
|
|
+All three tested systems (PPC,Alpha,2x i386) gave the same POSIX limits,
|
|
|
+and all three 32-bit systems returned completely identical types too
|
|
|
+(everything 32-bit except dev_t, which is assumed to be a result of devfs
|
|
|
+introduction)
|
|
|
+}
|
|
|
+
|
|
|
+Type
|
|
|
+ { the following type definitions are compiler dependant }
|
|
|
+ { and system dependant }
|
|
|
+
|
|
|
+ cint8 = shortint;
|
|
|
+ cuint8 = byte;
|
|
|
+ cuint16= word;
|
|
|
+ cint16 = smallint;
|
|
|
+ cint32 = longint;
|
|
|
+ cuint32= cardinal;
|
|
|
+ cint64 = int64;
|
|
|
+{$ifndef VER_1_0}
|
|
|
+ cuint64= qword;
|
|
|
+{$else
|
|
|
+ cuint64= int64;
|
|
|
+{$endif}
|
|
|
+
|
|
|
+ cint = longint; { minimum range is : 32-bit }
|
|
|
+ cuint = Cardinal; { minimum range is : 32-bit }
|
|
|
+ {$ifdef 64bitarch}
|
|
|
+ clong = int64;
|
|
|
+ {$ifdef VER_1_0}
|
|
|
+ culong = int64;
|
|
|
+ {$else}
|
|
|
+ culong = qword;
|
|
|
+ {$endif}
|
|
|
+ {$else}
|
|
|
+ clong = longint;
|
|
|
+ culong = Cardinal;
|
|
|
+ {$endif}
|
|
|
+ cshort = integer;
|
|
|
+ cushort= word;
|
|
|
+
|
|
|
+{$ifndef VER_1_0}
|
|
|
+ dev_t = cuint64; { used for device numbers }
|
|
|
+{$else}
|
|
|
+ dev_t = int64;
|
|
|
+ gid_t = cuint32; { used for group IDs }
|
|
|
+ ino_t = clong; { used for file serial numbers }
|
|
|
+ mode_t = cuint32; { used for file attributes }
|
|
|
+ nlink_t = cuint32; { used for link counts }
|
|
|
+ {$ifdef 64BitArch}
|
|
|
+ off_t = cint64; { used for file sizes }
|
|
|
+ {$else}
|
|
|
+ {$ifdef 64BitFS}
|
|
|
+ off_t = cint64;
|
|
|
+ {$else}
|
|
|
+ off_t = cint;
|
|
|
+ pid_t = cint32; { used as process identifier }
|
|
|
+ {$endif}
|
|
|
+ {$endif}
|
|
|
+ {$ifdef 64bitarch}
|
|
|
+ size_t = cuint64; { as definied in the C standard}
|
|
|
+ ssize_t = cint64; { used by function for returning number of bytes }
|
|
|
+ {$else}
|
|
|
+ size_t = cuint32; { as definied in the C standard}
|
|
|
+ ssize_t = cint32; { used by function for returning number of bytes }
|
|
|
+ {$endif}
|
|
|
+ uid_t = cuint32; { used for user ID type }
|
|
|
+ {$ifdef 64bitarch
|
|
|
+ clock_t = cuint64;
|
|
|
+ time_t = cint64; { used for returning the time }
|
|
|
+ {$else}
|
|
|
+ clock_t = culong;
|
|
|
+ time_t = clong; { used for returning the time }
|
|
|
+ {$endif]
|
|
|
+ socklen_t= cuint32;
|
|
|
+
|
|
|
+CONST
|
|
|
+ { System limits, POSIX value in parentheses, used for buffer and stack allocation }
|
|
|
+ { took idefix' values}
|
|
|
+
|
|
|
+ ARG_MAX = 131072; {4096} { Maximum number of argument size }
|
|
|
+ NAME_MAX = 255; {14} { Maximum number of bytes in filename }
|
|
|
+ PATH_MAX = 4095; {255} { Maximum number of bytes in pathname }
|
|
|
+
|
|
|
+{
|
|
|
+ $Log$
|
|
|
+ Revision 1.1 2002-10-29 16:47:17 marco
|
|
|
+ * Linux versions
|
|
|
+
|
|
|
+
|
|
|
+}
|
|
|
+
|
marco