mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-10-31 08:31:49 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			124 lines
		
	
	
		
			7.3 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			124 lines
		
	
	
		
			7.3 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| {
 | |
|     This file is part of the Free Pascal run time library.
 | |
|     Copyright (c) 2005 by Ales Katona
 | |
| 
 | |
|     Contains BSD specific errors for error.pp in rtl/unix
 | |
| 
 | |
|     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.
 | |
| 
 | |
|  **********************************************************************}
 | |
| 
 | |
| {$warning FIX ME, I'am from FreeBSD }
 | |
| const
 | |
|   sys_errn=93;
 | |
|   sys_errlist:array[0..sys_errn-1] of pchar = (
 | |
|         'Success',                              { 0 }
 | |
|         'Operation not permitted',              { EPERM }
 | |
|         'No such file or directory',            { ENOENT }
 | |
|         'No such process',                      { ESRCH }
 | |
|         'Interrupted system call',              { EINTR }
 | |
|         'I/O error',                            { EIO }
 | |
|         'No such device or address',            { ENXIO }
 | |
|         'Arg list too long',                    { E2BIG }
 | |
|         'Exec format error',                    { ENOEXEC }
 | |
|         'Bad file number',                      { EBADF }
 | |
|         'No child processes',                   { ECHILD }
 | |
|         'Resource deadlock avoided',   { EDEADLK was EAGAIN }
 | |
|         'Out of memory',                        { ENOMEM }
 | |
|         'Permission denied',                    { EACCES }
 | |
|         'Bad address',                          { EFAULT }
 | |
|         'Block device required',                { ENOTBLK }
 | |
|         'Device or resource busy',              { EBUSY }
 | |
|         'File exists',                          { EEXIST }
 | |
|         'Cross-device link',                    { EXDEV }
 | |
|         'No such device',                       { ENODEV }
 | |
|         'Not a directory',                      { ENOTDIR }
 | |
|         'Is a directory',                       { EISDIR }
 | |
|         'Invalid argument',                     { EINVAL }
 | |
|         'File table overflow',                  { ENFILE }
 | |
|         'Too many open files',                  { EMFILE }
 | |
|         'Not a typewriter',                     { ENOTTY }
 | |
|         'Text (code segment) file busy',        { ETXTBSY  Text file busy.  The new process was
 | |
|                                                     a pure procedure (shared text) file which was
 | |
|                                                     open for writing by another process, or file
 | |
|                                                     which was open for writing by another process,
 | |
|                                                     or while the pure procedure file was being
 | |
|                                                     executed an open(2) call requested write access
 | |
|                                                     requested write access.}
 | |
|         'File too large',                       { EFBIG }
 | |
|         'No space left on device',              { ENOSPC }
 | |
|         'Illegal seek',                         { ESPIPE }
 | |
|         'Read-only file system',                { EROFS }
 | |
|         'Too many links',                       { EMLINK }
 | |
|         'Broken pipe',                          { EPIPE }
 | |
|         'Math argument out of domain of func',  { EDOM }
 | |
|         'Math result not representable',        { ERANGE }
 | |
|         'Resource temporarily unavailable',        { EAGAIN }
 | |
|         'Operation now in progress',      { EINPROGRESS }
 | |
|         'Operation already in progress', { EALREADY	}
 | |
| // ipc/network software -- argument errors
 | |
|         'Socket operation on non-socket',    { ENOTSOCK }
 | |
|         'Destination address required',     { EDESTADDRREQ }
 | |
|         'Message too long',                     { EMSGSIZE }
 | |
|         'Protocol wrong type for socket', { EPROTOTYPE }
 | |
|         'Protocol not available',               { ENOPROTOOPT }
 | |
|         'Protocol not supported',              { EPROTONOSUPPORT }
 | |
|         'Socket type not supported',         { ESOCKTNOSUPPORT }
 | |
|         'Operation not supported',             { EOPNOTSUPP }
 | |
|         'Protocol family not supported',      { EPFNOSUPPORT }
 | |
|         'Address family not supported by protocol family',  { EAFNOSUPPORT }
 | |
|         'Address already in use',                { EADDRINUSE }
 | |
|         'Can''t assign requested address',  { EADDRNOTAVAIL }
 | |
| // ipc/network software -- operational errors
 | |
|         'Network is down',                            { ENETDOWN }
 | |
|         'Network is unreachable',                 { ENETUNREACH }
 | |
|         'Network dropped connection on reset', { ENETRESET }
 | |
|         'Software caused connection abort',   { ECONNABORTED }
 | |
|         'Connection reset by peer',                 { ECONNRESET }
 | |
|         'No buffer space available',                { ENOBUFS }
 | |
|         'Socket is already connected',            { EISCONN }
 | |
|         'Socket is not connected',                    { ENOTCONN }
 | |
|         'Can''t send after socket shutdown',    { ESHUTDOWN }
 | |
|         'Too many references: can''t splice',   { ETOOMANYREFS }
 | |
|         'Operation timed out',                           { ETIMEDOUT }
 | |
|         'Connection refused',                           { ECONNREFUSED }
 | |
|         'Too many levels of symbolic links',     { ELOOP }
 | |
|         'File name too long',                              { ENAMETOOLONG }
 | |
|         'Host is down',                                       { EHOSTDOWN }
 | |
|         'No route to host',                                  { EHOSTUNREACH }
 | |
|         'Directory not empty',                            { ENOTEMPTY }
 | |
|         'Too many processes',                           { EPROCLIM }
 | |
|         'Too many users',                                   { EUSERS }
 | |
|         'Disc quota exceeded',                           { EDQUOT }
 | |
| // Network File System
 | |
|         'Stale NFS file handle',                              { ESTALE }
 | |
|         'Too many levels of remote in path',        { EREMOTE }
 | |
|         'RPC struct is bad',                                    { EBADRPC }
 | |
|         'RPC version wrong',                                { ERPCMISMATCH }
 | |
|         'RPC prog. not avail',                                { EPROGUNAVAIL }
 | |
|         'Program version wrong',                          { EPROGMISMATCH }
 | |
|         'Bad procedure for program',                    { EPROCUNAVAIL }
 | |
|         'No locks available',                                   { ENOLCK }
 | |
|         'Function not implemented',                       { ENOSYS }
 | |
|         'Inappropriate file type or format',              { EFTYPE }
 | |
|         'Authentication error',                                 { EAUTH }
 | |
|         'Need authenticator',                                   { ENEEDAUTH }
 | |
|         'Identifier removed',                                   { EIDRM }
 | |
|         'No message of desired type',                   { ENOMSG }
 | |
|         'Value too large to be stored in data type', { EOVERFLOW }
 | |
|         'Operation canceled',                                  { ECANCELED }
 | |
|         'Illegal byte sequence',                                { EILSEQ }
 | |
|         'Attribute not found',                                    { ENOATTR }
 | |
|         'Programming error',                                    { EDOOFUS }
 | |
|         'Bad message',                                            { EBADMSG }
 | |
|         'Multihop attempted',                                   { EMULTIHOP }
 | |
|         'Link has been severed',                              { ENOLINK }
 | |
|         'Protocol error'                                             { EPROTO }
 | |
| );
 | |
| 
 | 
