home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / gnat-2.06-src.tgz / tar.out / fsf / gnat / ada / i-csycon.ads < prev    next >
Text File  |  1996-09-28  |  5KB  |  132 lines
  1. -----------------------------------------------------------------------------
  2. --                                                                         --
  3. --                GNU ADA RUNTIME LIBRARY (GNARL) COMPONENTS               --
  4. --                                                                         --
  5. --         I n t e r f a c e s . C . S y s t e m _ C o n s t a n t s       --
  6. --                                                                         --
  7. --                                 S p e c                                 --
  8. --                                                                         --
  9. --                            $Revision: 1.9 $                             --
  10. --                                                                         --
  11. --     Copyright (c) 1991,1992,1993,1994,1995 FSU, All Rights Reserved     --
  12. --                                                                         --
  13. -- GNARL is free software; you can redistribute it and/or modify it  under --
  14. -- terms  of  the  GNU  Library General Public License as published by the --
  15. -- Free Software Foundation; either version 2, or  (at  your  option)  any --
  16. -- later  version.   GNARL is distributed in the hope that it will be use- --
  17. -- ful, but but WITHOUT ANY WARRANTY; without even the implied warranty of --
  18. -- MERCHANTABILITY  or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Gen- --
  19. -- eral Library Public License for more details.  You should have received --
  20. -- a  copy of the GNU Library General Public License along with GNARL; see --
  21. -- file COPYING.LIB.  If not,  write to the  Free Software Foundation, 675 --
  22. -- Mass Ave, Cambridge, MA 02139, USA.                                     --
  23. --                                                                         --
  24. -----------------------------------------------------------------------------
  25.  
  26. package Interfaces.C.System_Constants is
  27.  
  28.    pthread_t_size : constant Integer := 4;
  29.    pthread_attr_t_size : constant Integer := 52;
  30.    pthread_mutexattr_t_size : constant Integer := 12;
  31.    pthread_mutex_t_size : constant Integer := 32;
  32.    pthread_condattr_t_size : constant Integer := 4;
  33.    pthread_cond_t_size : constant Integer := 20;
  34.    pthread_key_t_size : constant Integer := 4;
  35.    jmp_buf_size : constant Integer := 36;
  36.    sigjmp_buf_size : constant Integer := 40;
  37.    sigset_t_size : constant Integer := 4;
  38.  
  39.    --  The sizes of structures  (in bytes) and offsets of their components
  40.    --  (in bits).  These are used to lay out the equivalent Ada records.
  41.    siginfo_size : constant Integer := 12;
  42.    si_signo_offset : constant Integer := 0;
  43.    si_code_offset : constant Integer := 32;
  44.    sigaction_size : constant Integer := 12;
  45.    sa_handler_offset : constant Integer := 0;
  46.    sa_mask_offset : constant Integer := 32;
  47.    sa_flags_offset : constant Integer := 64;
  48.    timespec_size : constant Integer := 8;
  49.    tv_sec_offset : constant Integer := 0;
  50.    tv_nsec_offset : constant Integer := 32;
  51.  
  52.    SIG_BLOCK : constant := 1;
  53.    SIG_UNBLOCK : constant := 2;
  54.    SIG_SETMASK : constant := 4;
  55.    SA_NOCLDSTOP : constant := 8;
  56.    SA_SIGINFO : constant := 0;
  57.    SIG_ERR : constant := -1;
  58.    SIG_DFL : constant := 0;
  59.    SIG_IGN : constant := 1;
  60.    SIGNULL : constant := 0;
  61.    SIGHUP  : constant := 1;
  62.    SIGINT  : constant := 2;
  63.    SIGQUIT : constant := 3;
  64.    SIGILL  : constant := 4;
  65.    SIGABRT : constant := 6;
  66.    SIGFPE  : constant := 8;
  67.    SIGKILL : constant := 9;
  68.    SIGSEGV : constant := 11;
  69.    SIGPIPE : constant := 13;
  70.    SIGALRM : constant := 14;
  71.    SIGTERM : constant := 15;
  72.    SIGSTOP : constant := 17;
  73.    SIGTSTP : constant := 18;
  74.    SIGCONT : constant := 19;
  75.    SIGCHLD : constant := 20;
  76.    SIGTTIN : constant := 21;
  77.    SIGTTOU : constant := 22;
  78.    SIGUSR1 : constant := 30;
  79.    SIGUSR2 : constant := 31;
  80.    NSIG    : constant := 32;
  81.    --  OS specific signals represented as an array
  82.    type Sig_Array is array (positive range <>) of integer;
  83.    OS_Specific_Sync_Sigs : Sig_Array :=
  84.      (NSIG, 5, 7, 10);
  85.    OS_Specific_Async_Sigs : Sig_Array :=
  86.      (NSIG, 12, 16, 23, 24, 25, 26, 27, 28, 29);
  87.    --  End of OS specific signals representation
  88.    EPERM    : constant := 1;
  89.    ENOENT   : constant := 2;
  90.    ESRCH    : constant := 3;
  91.    EINTR    : constant := 4;
  92.    EIO      : constant := 5;
  93.    ENXIO    : constant := 6;
  94.    E2BIG    : constant := 7;
  95.    ENOEXEC  : constant := 8;
  96.    EBADF    : constant := 9;
  97.    ECHILD   : constant := 10;
  98.    EAGAIN   : constant := 11;
  99.    ENOMEM   : constant := 12;
  100.    EACCES   : constant := 13;
  101.    EFAULT   : constant := 14;
  102.    ENOTBLK  : constant := 15;
  103.    EBUSY    : constant := 16;
  104.    EEXIST   : constant := 17;
  105.    EXDEV    : constant := 18;
  106.    ENODEV   : constant := 19;
  107.    ENOTDIR  : constant := 20;
  108.    EISDIR   : constant := 21;
  109.    EINVAL   : constant := 22;
  110.    ENFILE   : constant := 23;
  111.    EMFILE   : constant := 24;
  112.    ENOTTY   : constant := 25;
  113.    ETXTBSY  : constant := 26;
  114.    EFBIG    : constant := 27;
  115.    ENOSPC   : constant := 28;
  116.    ESPIPE   : constant := 29;
  117.    EROFS    : constant := 30;
  118.    EMLINK   : constant := 31;
  119.    EPIPE    : constant := 32;
  120.    ENAMETOOLONG : constant := 63;
  121.    ENOTEMPTY    : constant := 66;
  122.    EDEADLK  : constant := 78;
  123.    ENOLCK   : constant := 79;
  124.    ENOSYS   : constant := 90;
  125.    ENOTSUP  : constant := 91;
  126.    NO_PRIO_INHERIT : constant := 0;
  127.    PRIO_INHERIT : constant := 1;
  128.    PRIO_PROTECT : constant := 2;
  129.    Add_Prio : constant Integer := 2;
  130.  
  131. end Interfaces.C.System_Constants;
  132.