mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 20:48:06 +02:00
86 lines
2.3 KiB
PHP
86 lines
2.3 KiB
PHP
{
|
|
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.
|
|
|
|
Constants for Unix unit.
|
|
|
|
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.
|
|
|
|
**********************************************************************}
|
|
|
|
|
|
const
|
|
|
|
{ Things for LSEEK call}
|
|
Seek_set = 0;
|
|
Seek_Cur = 1;
|
|
Seek_End = 2;
|
|
|
|
{ Things for OPEN call - after include/sys/fcntl.h,
|
|
BSD specifies these constants in hex }
|
|
Open_Accmode = 3;
|
|
Open_RdOnly = 0;
|
|
Open_WrOnly = 1;
|
|
Open_RdWr = 2;
|
|
Open_NonBlock = 4;
|
|
Open_Append = 8;
|
|
// Open_ShLock = $10;
|
|
// Open_ExLock = $20;
|
|
// Open_ASync = $40;
|
|
// Open_FSync = $80;
|
|
// Open_NoFollow = $100;
|
|
Open_Create = $100; {BSD convention}
|
|
Open_Creat = $100; {Linux convention}
|
|
Open_Trunc = $200;
|
|
Open_Excl = $400;
|
|
Open_NoCTTY = $800;
|
|
|
|
{ The waitpid uses the following options:}
|
|
Wait_NoHang = 1;
|
|
Wait_UnTraced = 2;
|
|
Wait_Any = -1;
|
|
Wait_MyPGRP = 0;
|
|
|
|
|
|
{ Constants to check stat.mode - checked all STAT constants with BSD}
|
|
STAT_IFMT = $f000; {00170000 }
|
|
STAT_IFSOCK = $c000; {0140000 }
|
|
STAT_IFLNK = $a000; {0120000 }
|
|
STAT_IFREG = $8000; {0100000 }
|
|
STAT_IFBLK = $6000; {0060000 }
|
|
STAT_IFDIR = $4000; {0040000 }
|
|
STAT_IFCHR = $2000; {0020000 }
|
|
STAT_IFIFO = $1000; {0010000 }
|
|
STAT_ISUID = $0800; {0004000 }
|
|
STAT_ISGID = $0400; {0002000 }
|
|
STAT_ISVTX = $0200; {0001000}
|
|
{ Constants to check permissions all }
|
|
STAT_IRWXO = $7;
|
|
STAT_IROTH = $4;
|
|
STAT_IWOTH = $2;
|
|
STAT_IXOTH = $1;
|
|
|
|
STAT_IRWXG = STAT_IRWXO shl 3;
|
|
STAT_IRGRP = STAT_IROTH shl 3;
|
|
STAT_IWGRP = STAT_IWOTH shl 3;
|
|
STAT_IXGRP = STAT_IXOTH shl 3;
|
|
|
|
STAT_IRWXU = STAT_IRWXO shl 6;
|
|
STAT_IRUSR = STAT_IROTH shl 6;
|
|
STAT_IWUSR = STAT_IWOTH shl 6;
|
|
STAT_IXUSR = STAT_IXOTH shl 6;
|
|
|
|
{Constansts Termios/Ioctl (used in Do_IsDevice) }
|
|
IOCtl_TCGETS= (ord('T') shl 8) or 1; // TCGETS is also in termios.inc, but the sysunix needs only this
|
|
|
|
ITimer_Real =0;
|
|
ITimer_Virtual =1;
|
|
ITimer_Prof =2;
|
|
|