Skip to content

Instantly share code, notes, and snippets.

@ytomino

ytomino/c-bsm-audit.ads

Last active November 4, 2020 20:36
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ytomino/339ab994f7e1232974f2 to your computer and use it in GitHub Desktop.
Save ytomino/339ab994f7e1232974f2 to your computer and use it in GitHub Desktop.
Download ZIP
i686-pc-freebsd8
Raw
c-bsm-audit.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.types;
package C.bsm.audit is
pragma Preelaborate;
subtype au_id_t is sys.types.uid_t;
subtype au_id_t_ptr is sys.types.uid_t_ptr;
subtype au_id_t_const_ptr is sys.types.uid_t_const_ptr;
subtype au_asid_t is sys.types.pid_t;
subtype au_event_t is sys.types.u_int16_t;
subtype au_emod_t is sys.types.u_int16_t;
subtype au_class_t is sys.types.u_int32_t;
subtype au_asflgs_t is sys.types.u_int64_t;
type struct_au_tid;
type struct_au_tid is record
port : aliased sys.types.dev_t;
machine : aliased sys.types.u_int32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_au_tid);
subtype au_tid_t is struct_au_tid;
type struct_au_tid_addr;
type struct_au_tid_addr is record
at_port : aliased sys.types.dev_t;
at_type : aliased sys.types.u_int32_t;
at_addr : aliased sys.types.u_int32_t_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_au_tid_addr);
subtype au_tid_addr_t is struct_au_tid_addr;
type struct_au_mask;
type struct_au_mask is record
am_success : aliased unsigned_int;
am_failure : aliased unsigned_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_au_mask);
subtype au_mask_t is struct_au_mask;
type struct_auditinfo;
type struct_auditinfo is record
ai_auid : aliased au_id_t;
ai_mask : aliased au_mask_t;
ai_termid : aliased au_tid_t;
ai_asid : aliased au_asid_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_auditinfo);
type struct_auditinfo_ptr is access all struct_auditinfo;
for struct_auditinfo_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_auditinfo_ptr);
pragma Convention (C, struct_auditinfo_ptr);
type struct_auditinfo_const_ptr is access constant struct_auditinfo;
for struct_auditinfo_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_auditinfo_const_ptr);
pragma Convention (C, struct_auditinfo_const_ptr);
subtype auditinfo_t is struct_auditinfo;
type struct_auditinfo_addr;
type struct_auditinfo_addr is record
ai_auid : aliased au_id_t;
ai_mask : aliased au_mask_t;
ai_termid : aliased au_tid_addr_t;
ai_asid : aliased au_asid_t;
ai_flags : aliased au_asflgs_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_auditinfo_addr);
type struct_auditinfo_addr_ptr is access all struct_auditinfo_addr;
for struct_auditinfo_addr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_auditinfo_addr_ptr);
pragma Convention (C, struct_auditinfo_addr_ptr);
type struct_auditinfo_addr_const_ptr is
access constant struct_auditinfo_addr;
for struct_auditinfo_addr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_auditinfo_addr_const_ptr);
pragma Convention (C, struct_auditinfo_addr_const_ptr);
subtype auditinfo_addr_t is struct_auditinfo_addr;
subtype auditinfo_addr_t_ptr is struct_auditinfo_addr_ptr;
type struct_auditpinfo;
type struct_auditpinfo is record
ap_pid : aliased sys.types.pid_t;
ap_auid : aliased au_id_t;
ap_mask : aliased au_mask_t;
ap_termid : aliased au_tid_t;
ap_asid : aliased au_asid_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_auditpinfo);
subtype auditpinfo_t is struct_auditpinfo;
type struct_auditpinfo_addr;
type struct_auditpinfo_addr is record
ap_pid : aliased sys.types.pid_t;
ap_auid : aliased au_id_t;
ap_mask : aliased au_mask_t;
ap_termid : aliased au_tid_addr_t;
ap_asid : aliased au_asid_t;
ap_flags : aliased au_asflgs_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_auditpinfo_addr);
subtype auditpinfo_addr_t is struct_auditpinfo_addr;
type struct_au_session;
type struct_au_session is record
as_aia_p : aliased auditinfo_addr_t_ptr;
as_mask : aliased au_mask_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_au_session);
subtype au_session_t is struct_au_session;
type struct_au_token (<>) is limited private;
subtype token_t is struct_au_token;
type struct_au_qctrl;
type struct_au_qctrl is record
aq_hiwater : aliased signed_int;
aq_lowater : aliased signed_int;
aq_bufsz : aliased signed_int;
aq_delay : aliased signed_int;
aq_minfree : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_au_qctrl);
subtype au_qctrl_t is struct_au_qctrl;
type struct_audit_stat;
type struct_audit_stat is record
as_version : aliased unsigned_int;
as_numevent : aliased unsigned_int;
as_generated : aliased signed_int;
as_nonattrib : aliased signed_int;
as_kernel : aliased signed_int;
as_audit : aliased signed_int;
as_auditctl : aliased signed_int;
as_enqueue : aliased signed_int;
as_written : aliased signed_int;
as_wblocked : aliased signed_int;
as_rblocked : aliased signed_int;
as_dropped : aliased signed_int;
as_totalsize : aliased signed_int;
as_memused : aliased unsigned_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_audit_stat);
subtype au_stat_t is struct_audit_stat;
type struct_audit_fstat;
type struct_audit_fstat is record
af_filesz : aliased sys.types.u_int64_t;
af_currsz : aliased sys.types.u_int64_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_audit_fstat);
subtype au_fstat_t is struct_audit_fstat;
type struct_au_evclass_map;
type struct_au_evclass_map is record
ec_number : aliased au_event_t;
ec_class : aliased au_class_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_au_evclass_map);
subtype au_evclass_map_t is struct_au_evclass_map;
function audit (a1 : void_const_ptr; a2 : signed_int) return signed_int;
pragma Import (C, audit, "audit");
function auditon (a1 : signed_int; a2 : void_ptr; a3 : signed_int)
return signed_int;
pragma Import (C, auditon, "auditon");
function auditctl (a1 : access constant char) return signed_int;
pragma Import (C, auditctl, "auditctl");
function getauid (a1 : access au_id_t) return signed_int;
pragma Import (C, getauid, "getauid");
function setauid (a1 : access constant au_id_t) return signed_int;
pragma Import (C, setauid, "setauid");
function getaudit (a1 : access struct_auditinfo) return signed_int;
pragma Import (C, getaudit, "getaudit");
function setaudit (a1 : access constant struct_auditinfo)
return signed_int;
pragma Import (C, setaudit, "setaudit");
function getaudit_addr (a1 : access struct_auditinfo_addr;
a2 : signed_int) return signed_int;
pragma Import (C, getaudit_addr, "getaudit_addr");
function setaudit_addr (a1 : access constant struct_auditinfo_addr;
a2 : signed_int) return signed_int;
pragma Import (C, setaudit_addr, "setaudit_addr");
AQ_BUFSZ : constant := 32767;
AQ_HIWATER : constant := 100;
AQ_LOWATER : constant := 10;
AQ_MAXBUFSZ : constant := 1048576;
AQ_MAXHIGH : constant := 10000;
AT_IPC_MSG : constant := 1;
AT_IPC_SEM : constant := 2;
AT_IPC_SHM : constant := 3;
AUC_AUDITING : constant := 1;
AUC_DISABLED : constant := -1;
AUC_NOAUDIT : constant := 2;
AUC_UNSET : constant := 0;
AUDITDEV_FILENAME : constant char_array (0 .. 5) := "audit"
& char'Val (0);
AUDIT_AHLT : constant := 2;
AUDIT_ARGE : constant := 8;
AUDIT_ARGV : constant := 4;
AUDIT_CNT : constant := 1;
AUDIT_GROUP : constant := 128;
AUDIT_HARD_LIMIT_FREE_BLOCKS : constant := 4;
AUDIT_PATH : constant := 512;
AUDIT_PERZONE : constant := 8192;
AUDIT_PUBLIC : constant := 2048;
AUDIT_RECORD_MAGIC : constant := -2104881381;
AUDIT_SCNT : constant := 1024;
AUDIT_SEQ : constant := 16;
AUDIT_TRAIL : constant := 256;
AUDIT_TRIGGER_CLOSE_AND_DIE : constant := 4;
AUDIT_TRIGGER_EXPIRE_TRAILS : constant := 8;
AUDIT_TRIGGER_FILE : constant char_array (0 .. 10) := "/dev/audit"
& char'Val (0);
AUDIT_TRIGGER_INITIALIZE : constant := 7;
AUDIT_TRIGGER_LOW_SPACE : constant := 1;
AUDIT_TRIGGER_MAX : constant := 8;
AUDIT_TRIGGER_MIN : constant := 1;
AUDIT_TRIGGER_NO_SPACE : constant := 5;
AUDIT_TRIGGER_READ_FILE : constant := 3;
AUDIT_TRIGGER_ROTATE_KERNEL : constant := 2;
AUDIT_TRIGGER_ROTATE_USER : constant := 6;
AUDIT_USER : constant := 64;
AUDIT_WINDATA : constant := 32;
AUDIT_ZONENAME : constant := 4096;
AU_ASSIGN_ASID : constant := -1;
AU_DEFAUDITID : constant := 4294967295;
AU_DEFAUDITSID : constant := 0;
AU_FS_MINFREE : constant := 20;
AU_IPv4 : constant := 4;
AU_IPv6 : constant := 16;
A_GETCAR : constant := 9;
A_GETCLASS : constant := 22;
A_GETCOND : constant := 37;
A_GETCWD : constant := 8;
A_GETFSIZE : constant := 27;
A_GETKAUDIT : constant := 29;
A_GETKMASK : constant := 4;
A_GETPINFO : constant := 24;
A_GETPINFO_ADDR : constant := 28;
A_GETPOLICY : constant := 33;
A_GETQCTRL : constant := 35;
A_GETSINFO_ADDR : constant := 32;
A_GETSTAT : constant := 12;
A_OLDGETCOND : constant := 20;
A_OLDGETPOLICY : constant := 2;
A_OLDGETQCTRL : constant := 6;
A_OLDSETCOND : constant := 21;
A_OLDSETPOLICY : constant := 3;
A_OLDSETQCTRL : constant := 7;
A_SENDTRIGGER : constant := 31;
A_SETCLASS : constant := 23;
A_SETCOND : constant := 38;
A_SETFSIZE : constant := 26;
A_SETKAUDIT : constant := 30;
A_SETKMASK : constant := 5;
A_SETPMASK : constant := 25;
A_SETPOLICY : constant := 34;
A_SETQCTRL : constant := 36;
A_SETSMASK : constant := 15;
A_SETSTAT : constant := 13;
A_SETUMASK : constant := 14;
MAXAUDITDATA : constant := 32767;
MAX_AUDIT_RECORDS : constant := 20;
MAX_AUDIT_RECORD_SIZE : constant := 32767;
MIN_AUDIT_FILE_SIZE : constant := 524288;
-- _BSM_AUDIT_H (empty)
private
type struct_au_token is null record;
end C.bsm.audit;
Raw
c-bsm.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.bsm is
pragma Preelaborate;
end C.bsm;
Raw
c-dirent.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.dirent;
with C.sys.qpthreadtypes;
package C.dirent is
pragma Preelaborate;
subtype struct_dirent is sys.dirent.struct_dirent;
-- DTTOIF renames sys.dirent.DTTOIF (function macro)
DT_BLK : constant := sys.dirent.DT_BLK;
DT_CHR : constant := sys.dirent.DT_CHR;
DT_DIR : constant := sys.dirent.DT_DIR;
DT_FIFO : constant := sys.dirent.DT_FIFO;
DT_LNK : constant := sys.dirent.DT_LNK;
DT_REG : constant := sys.dirent.DT_REG;
DT_SOCK : constant := sys.dirent.DT_SOCK;
DT_UNKNOWN : constant := sys.dirent.DT_UNKNOWN;
DT_WHT : constant := sys.dirent.DT_WHT;
-- IFTODT renames sys.dirent.IFTODT (function macro)
MAXNAMLEN : constant := sys.dirent.MAXNAMLEN;
-- GENERIC_DIRSIZ renames sys.dirent.GENERIC_DIRSIZ (uninterpretable)
-- SYS_DIRENT_H renames sys.dirent.SYS_DIRENT_H (empty)
type struct_telldir (<>) is limited private;
type struct_telldir_ptr is access all struct_telldir;
for struct_telldir_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_telldir_ptr);
pragma Convention (C, struct_telldir_ptr);
type struct_dirdesc;
type struct_dirdesc is record
dd_fd : aliased signed_int;
dd_loc : aliased signed_long;
dd_size : aliased signed_long;
dd_buf : aliased char_ptr;
dd_len : aliased signed_int;
dd_seek : aliased signed_long;
dd_rewind : aliased signed_long;
dd_flags : aliased signed_int;
dd_lock : aliased sys.qpthreadtypes.struct_pthread_mutex_ptr;
dd_td : aliased struct_telldir_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_dirdesc);
type struct_dirdesc_ptr is access all struct_dirdesc;
for struct_dirdesc_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_dirdesc_ptr);
pragma Convention (C, struct_dirdesc_ptr);
subtype DIR is struct_dirdesc;
subtype DIR_ptr is struct_dirdesc_ptr;
type access_80c75e70 is access function (
a1 : access sys.dirent.struct_dirent_const_ptr;
a2 : access sys.dirent.struct_dirent_const_ptr) return signed_int;
pragma Convention (C, access_80c75e70);
function alphasort (a1 : access sys.dirent.struct_dirent_const_ptr;
a2 : access sys.dirent.struct_dirent_const_ptr) return signed_int;
pragma Import (C, alphasort, "alphasort");
function opendir2 (a1 : access constant char; a2 : signed_int)
return DIR_ptr;
pragma Import (C, opendir2, "__opendir2");
function getdents (a1 : signed_int; a2 : access char; a3 : signed_int)
return signed_int;
pragma Import (C, getdents, "getdents");
function getdirentries (a1 : signed_int; a2 : access char;
a3 : signed_int; a4 : access signed_long) return signed_int;
pragma Import (C, getdirentries, "getdirentries");
function opendir (a1 : access constant char) return DIR_ptr;
pragma Import (C, opendir, "opendir");
function fdopendir (a1 : signed_int) return DIR_ptr;
pragma Import (C, fdopendir, "fdopendir");
function readdir (a1 : access DIR) return sys.dirent.struct_dirent_ptr;
pragma Import (C, readdir, "readdir");
function readdir_r (a1 : access DIR; a2 : access sys.dirent.struct_dirent;
a3 : access sys.dirent.struct_dirent_ptr) return signed_int;
pragma Import (C, readdir_r, "readdir_r");
procedure rewinddir (a1 : access DIR);
pragma Import (C, rewinddir, "rewinddir");
type access_f6096fae is access function (
a1 : access constant sys.dirent.struct_dirent) return signed_int;
pragma Convention (C, access_f6096fae);
function scandir (a1 : access constant char;
a2 : access sys.dirent.struct_dirent_ptr_ptr; a3 : access_f6096fae;
a4 : access_80c75e70) return signed_int;
pragma Import (C, scandir, "scandir");
procedure seekdir (a1 : access DIR; a2 : signed_long);
pragma Import (C, seekdir, "seekdir");
function telldir (a1 : access DIR) return signed_long;
pragma Import (C, telldir, "telldir");
function closedir (a1 : access DIR) return signed_int;
pragma Import (C, closedir, "closedir");
DIRBLKSIZ : constant := 1024;
DTF_HIDEW : constant := 1;
DTF_NODUP : constant := 2;
DTF_REWIND : constant := 4;
-- _DIRENT_H_ (empty)
DTF_READALL : constant := 8;
-- d_ino (unparsible)
-- dirfd (uninterpretable)
private
type struct_telldir is null record;
end C.dirent;
Raw
c-dlfcn.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
package C.dlfcn is
pragma Preelaborate;
type struct_dl_info;
type struct_dl_info is record
dli_fname : aliased char_const_ptr;
dli_fbase : aliased void_ptr;
dli_sname : aliased char_const_ptr;
dli_saddr : aliased void_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_dl_info);
type struct_dl_info_ptr is access all struct_dl_info;
for struct_dl_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_dl_info_ptr);
pragma Convention (C, struct_dl_info_ptr);
subtype Dl_info is struct_dl_info;
subtype Dl_info_ptr is struct_dl_info_ptr;
type struct_dlfunc_arg;
type struct_dlfunc_arg is record
dlfunc_dummy : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_dlfunc_arg);
type access_c35b40bc is access procedure (a1 : struct_dlfunc_arg);
pragma Convention (C, access_c35b40bc);
subtype dlfunc_t is access_c35b40bc;
type struct_dl_serpath;
type struct_dl_serpath is record
dls_name : aliased char_ptr;
dls_flags : aliased unsigned_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_dl_serpath);
type struct_dl_serpath_array is array (size_t range <>) of
aliased struct_dl_serpath;
pragma Convention (C, struct_dl_serpath_array);
subtype Dl_serpath is struct_dl_serpath;
subtype Dl_serpath_array is struct_dl_serpath_array;
type struct_dl_serinfo;
type struct_dl_serinfo is record
dls_size : aliased stddef.size_t;
dls_cnt : aliased unsigned_int;
dls_serpath : aliased Dl_serpath_array (0 .. 0);
end record;
pragma Convention (C_Pass_By_Copy, struct_dl_serinfo);
subtype Dl_serinfo is struct_dl_serinfo;
function dlclose (a1 : void_ptr) return signed_int;
pragma Import (C, dlclose, "dlclose");
function dlerror return char_ptr;
pragma Import (C, dlerror, "dlerror");
function dlopen (a1 : access constant char; a2 : signed_int)
return void_ptr;
pragma Import (C, dlopen, "dlopen");
function dlsym (a1 : void_ptr; a2 : access constant char) return void_ptr;
pragma Import (C, dlsym, "dlsym");
function dladdr (a1 : void_const_ptr; a2 : access Dl_info)
return signed_int;
pragma Import (C, dladdr, "dladdr");
function dlfunc (a1 : void_ptr; a2 : access constant char)
return dlfunc_t;
pragma Import (C, dlfunc, "dlfunc");
function dlinfo (a1 : void_ptr; a2 : signed_int; a3 : void_ptr)
return signed_int;
pragma Import (C, dlinfo, "dlinfo");
type access_db2276bc is access function (context : void_ptr)
return void_ptr;
pragma Convention (C, access_db2276bc);
type access_8e5b5843 is access procedure (lock : void_ptr);
pragma Convention (C, access_8e5b5843);
type access_f45d1247 is access procedure (lock : void_ptr);
pragma Convention (C, access_f45d1247);
type access_660976ee is access procedure (lock : void_ptr);
pragma Convention (C, access_660976ee);
type access_1d16021d is access procedure (lock : void_ptr);
pragma Convention (C, access_1d16021d);
type access_79134dc4 is access procedure (context : void_ptr);
pragma Convention (C, access_79134dc4);
procedure dllockinit (context : void_ptr; lock_create : access_db2276bc;
rlock_acquire : access_8e5b5843; wlock_acquire : access_f45d1247;
lock_release : access_660976ee; lock_destroy : access_1d16021d;
context_destroy : access_79134dc4);
pragma Import (C, dllockinit, "dllockinit");
function dlvsym (a1 : void_ptr; a2 : access constant char;
a3 : access constant char) return void_ptr;
pragma Import (C, dlvsym, "dlvsym");
RTLD_DEFAULT : constant void_ptr := void_ptr (System'To_Address (-2));
RTLD_DI_LINKMAP : constant := 2;
RTLD_DI_MAX : constant := 6;
RTLD_DI_ORIGIN : constant := 6;
RTLD_DI_SERINFO : constant := 4;
RTLD_DI_SERINFOSIZE : constant := 5;
RTLD_GLOBAL : constant := 256;
RTLD_LAZY : constant := 1;
RTLD_LOCAL : constant := 0;
RTLD_MODEMASK : constant := 3;
RTLD_NEXT : constant void_ptr := void_ptr (System'To_Address (-1));
RTLD_NODELETE : constant := 4096;
RTLD_NOLOAD : constant := 8192;
RTLD_NOW : constant := 2;
RTLD_SELF : constant void_ptr := void_ptr (System'To_Address (-3));
RTLD_TRACE : constant := 512;
-- _DLFCN_H_ (empty)
end C.dlfcn;
Raw
c-errno.adb
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package body C.errno is
function errno return signed_int is
begin
return error.all;
end errno;
end C.errno;
Raw
c-errno.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.errno is
pragma Preelaborate;
function error return signed_int_ptr;
pragma Import (C, error, "__error");
E2BIG : constant := 7;
EACCES : constant := 13;
EADDRINUSE : constant := 48;
EADDRNOTAVAIL : constant := 49;
EAFNOSUPPORT : constant := 47;
EAGAIN : constant := 35;
EALREADY : constant := 37;
EAUTH : constant := 80;
EBADF : constant := 9;
EBADMSG : constant := 89;
EBADRPC : constant := 72;
EBUSY : constant := 16;
ECANCELED : constant := 85;
ECHILD : constant := 10;
ECONNABORTED : constant := 53;
ECONNREFUSED : constant := 61;
ECONNRESET : constant := 54;
EDEADLK : constant := 11;
EDESTADDRREQ : constant := 39;
EDOM : constant := 33;
EDOOFUS : constant := 88;
EDQUOT : constant := 69;
EEXIST : constant := 17;
EFAULT : constant := 14;
EFBIG : constant := 27;
EFTYPE : constant := 79;
EHOSTDOWN : constant := 64;
EHOSTUNREACH : constant := 65;
EIDRM : constant := 82;
EILSEQ : constant := 86;
EINPROGRESS : constant := 36;
EINTR : constant := 4;
EINVAL : constant := 22;
EIO : constant := 5;
EISCONN : constant := 56;
EISDIR : constant := 21;
ELAST : constant := 93;
ELOOP : constant := 62;
EMFILE : constant := 24;
EMLINK : constant := 31;
EMSGSIZE : constant := 40;
EMULTIHOP : constant := 90;
ENAMETOOLONG : constant := 63;
ENEEDAUTH : constant := 81;
ENETDOWN : constant := 50;
ENETRESET : constant := 52;
ENETUNREACH : constant := 51;
ENFILE : constant := 23;
ENOATTR : constant := 87;
ENOBUFS : constant := 55;
ENODEV : constant := 19;
ENOENT : constant := 2;
ENOEXEC : constant := 8;
ENOLCK : constant := 77;
ENOLINK : constant := 91;
ENOMEM : constant := 12;
ENOMSG : constant := 83;
ENOPROTOOPT : constant := 42;
ENOSPC : constant := 28;
ENOSYS : constant := 78;
ENOTBLK : constant := 15;
ENOTCAPABLE : constant := 93;
ENOTCONN : constant := 57;
ENOTDIR : constant := 20;
ENOTEMPTY : constant := 66;
ENOTSOCK : constant := 38;
ENOTSUP : constant := 45;
ENOTTY : constant := 25;
ENXIO : constant := 6;
EOPNOTSUPP : constant := 45;
EOVERFLOW : constant := 84;
EPERM : constant := 1;
EPFNOSUPPORT : constant := 46;
EPIPE : constant := 32;
EPROCLIM : constant := 67;
EPROCUNAVAIL : constant := 76;
EPROGMISMATCH : constant := 75;
EPROGUNAVAIL : constant := 74;
EPROTO : constant := 92;
EPROTONOSUPPORT : constant := 43;
EPROTOTYPE : constant := 41;
ERANGE : constant := 34;
EREMOTE : constant := 71;
EROFS : constant := 30;
ERPCMISMATCH : constant := 73;
ESHUTDOWN : constant := 58;
ESOCKTNOSUPPORT : constant := 44;
ESPIPE : constant := 29;
ESRCH : constant := 3;
ESTALE : constant := 70;
ETIMEDOUT : constant := 60;
ETOOMANYREFS : constant := 59;
ETXTBSY : constant := 26;
EUSERS : constant := 68;
EWOULDBLOCK : constant := 35;
EXDEV : constant := 18;
-- _SYS_ERRNO_H_ (empty)
function errno return signed_int;
pragma Inline_Always (errno);
end C.errno;
Raw
c-fcntl.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.types;
package C.fcntl is
pragma Preelaborate;
type struct_flock;
type struct_flock is record
l_start : aliased sys.types.off_t;
l_len : aliased sys.types.off_t;
l_pid : aliased sys.types.pid_t;
l_type : aliased signed_short;
l_whence : aliased signed_short;
l_sysid : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_flock);
type struct_oflock;
type struct_oflock is record
l_start : aliased sys.types.off_t;
l_len : aliased sys.types.off_t;
l_pid : aliased sys.types.pid_t;
l_type : aliased signed_short;
l_whence : aliased signed_short;
end record;
pragma Convention (C_Pass_By_Copy, struct_oflock);
function open (a1 : access constant char; a2 : signed_int)
return signed_int;
function open (a1 : access constant char; a2 : signed_int;
a3 : sys.types.mode_t) return signed_int;
pragma Import (C, open, "open");
function creat (a1 : access constant char; a2 : sys.types.mode_t)
return signed_int;
pragma Import (C, creat, "creat");
function fcntl (a1 : signed_int; a2 : signed_int) return signed_int;
function fcntl (a1 : signed_int; a2 : signed_int; a3 : signed_int)
return signed_int;
pragma Import (C, fcntl, "fcntl");
function openat (a1 : signed_int; a2 : access constant char;
a3 : signed_int) return signed_int;
pragma Import (C, openat, "openat");
function posix_fadvise (a1 : signed_int; a2 : sys.types.off_t;
a3 : sys.types.off_t; a4 : signed_int) return signed_int;
pragma Import (C, posix_fadvise, "posix_fadvise");
function posix_fallocate (a1 : signed_int; a2 : sys.types.off_t;
a3 : sys.types.off_t) return signed_int;
pragma Import (C, posix_fallocate, "posix_fallocate");
function flock (a1 : signed_int; a2 : signed_int) return signed_int;
pragma Import (C, flock, "flock");
AT_EACCESS : constant := 256;
AT_FDCWD : constant := -100;
AT_REMOVEDIR : constant := 2048;
AT_SYMLINK_FOLLOW : constant := 1024;
AT_SYMLINK_NOFOLLOW : constant := 512;
FAPPEND : constant := 8;
FASYNC : constant := 64;
FD_CLOEXEC : constant := 1;
FFSYNC : constant := 128;
FNDELAY : constant := 4;
FNONBLOCK : constant := 4;
FRDAHEAD : constant := 512;
FREAD : constant := 1;
FWRITE : constant := 2;
F_CANCEL : constant := 5;
F_DUP2FD : constant := 10;
F_DUP2FD_CLOEXEC : constant := 18;
F_DUPFD : constant := 0;
F_DUPFD_CLOEXEC : constant := 17;
F_GETFD : constant := 1;
F_GETFL : constant := 3;
F_GETLK : constant := 11;
F_GETOWN : constant := 5;
F_OGETLK : constant := 7;
F_OSETLK : constant := 8;
F_OSETLKW : constant := 9;
F_RDAHEAD : constant := 16;
F_RDLCK : constant := 1;
F_READAHEAD : constant := 15;
F_SETFD : constant := 2;
F_SETFL : constant := 4;
F_SETLK : constant := 12;
F_SETLKW : constant := 13;
F_SETLK_REMOTE : constant := 14;
F_SETOWN : constant := 6;
F_UNLCK : constant := 2;
F_UNLCKSYS : constant := 4;
F_WRLCK : constant := 3;
LOCK_EX : constant := 2;
LOCK_NB : constant := 4;
LOCK_SH : constant := 1;
LOCK_UN : constant := 8;
O_ACCMODE : constant := 3;
O_APPEND : constant := 8;
O_ASYNC : constant := 64;
O_CLOEXEC : constant := 1048576;
O_CREAT : constant := 512;
O_DIRECT : constant := 65536;
O_DIRECTORY : constant := 131072;
O_EXCL : constant := 2048;
O_EXEC : constant := 262144;
O_EXLOCK : constant := 32;
O_FSYNC : constant := 128;
O_NDELAY : constant := 4;
O_NOCTTY : constant := 32768;
O_NOFOLLOW : constant := 256;
O_NONBLOCK : constant := 4;
O_RDONLY : constant := 0;
O_RDWR : constant := 2;
O_SHLOCK : constant := 16;
O_SYNC : constant := 128;
O_TRUNC : constant := 1024;
O_TTY_INIT : constant := 524288;
O_WRONLY : constant := 1;
POSIX_FADV_DONTNEED : constant := 4;
POSIX_FADV_NOREUSE : constant := 5;
POSIX_FADV_NORMAL : constant := 0;
POSIX_FADV_RANDOM : constant := 1;
POSIX_FADV_SEQUENTIAL : constant := 2;
POSIX_FADV_WILLNEED : constant := 3;
-- _SYS_FCNTL_H_ (empty)
end C.fcntl;
Raw
c-fnmatch.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.fnmatch is
pragma Preelaborate;
function fnmatch (a1 : access constant char; a2 : access constant char;
a3 : signed_int) return signed_int;
pragma Import (C, fnmatch, "fnmatch");
FNM_CASEFOLD : constant := 16;
FNM_FILE_NAME : constant := 2;
FNM_IGNORECASE : constant := 16;
FNM_LEADING_DIR : constant := 8;
FNM_NOESCAPE : constant := 1;
FNM_NOMATCH : constant := 1;
FNM_NOSYS : constant := -1;
FNM_PATHNAME : constant := 2;
FNM_PERIOD : constant := 4;
-- _FNMATCH_H_ (empty)
end C.fnmatch;
Raw
c-grp.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.sys.types;
package C.grp is
pragma Preelaborate;
type struct_group;
type struct_group is record
gr_name : aliased char_ptr;
gr_passwd : aliased char_ptr;
gr_gid : aliased sys.types.gid_t;
gr_mem : aliased char_ptr_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_group);
type struct_group_ptr is access all struct_group;
for struct_group_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_group_ptr);
pragma Convention (C, struct_group_ptr);
type struct_group_ptr_ptr is access all struct_group_ptr;
for struct_group_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_group_ptr_ptr);
pragma Convention (C, struct_group_ptr_ptr);
procedure endgrent;
pragma Import (C, endgrent, "endgrent");
function getgrent return struct_group_ptr;
pragma Import (C, getgrent, "getgrent");
function getgrgid (a1 : sys.types.gid_t) return struct_group_ptr;
pragma Import (C, getgrgid, "getgrgid");
function getgrnam (a1 : access constant char) return struct_group_ptr;
pragma Import (C, getgrnam, "getgrnam");
function group_from_gid (a1 : sys.types.gid_t; a2 : signed_int)
return char_const_ptr;
pragma Import (C, group_from_gid, "group_from_gid");
function setgrent return signed_int;
pragma Import (C, setgrent, "setgrent");
function getgrgid_r (a1 : sys.types.gid_t; a2 : access struct_group;
a3 : access char; a4 : stddef.size_t; a5 : access struct_group_ptr)
return signed_int;
pragma Import (C, getgrgid_r, "getgrgid_r");
function getgrnam_r (a1 : access constant char; a2 : access struct_group;
a3 : access char; a4 : stddef.size_t; a5 : access struct_group_ptr)
return signed_int;
pragma Import (C, getgrnam_r, "getgrnam_r");
function getgrent_r (a1 : access struct_group; a2 : access char;
a3 : stddef.size_t; a4 : access struct_group_ptr) return signed_int;
pragma Import (C, getgrent_r, "getgrent_r");
function setgroupent (a1 : signed_int) return signed_int;
pragma Import (C, setgroupent, "setgroupent");
-- _GRP_H_ (empty)
PATH_GROUP : constant char_array (0 .. 10) := "/etc/group" & char'Val (0);
end C.grp;
Raw
c-iconv.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.wchar;
package C.iconv is
pragma Preelaborate;
qlibiconv_version : aliased signed_int;
pragma Import (C, qlibiconv_version, "_libiconv_version");
subtype libiconv_t is void_ptr;
function libiconv_open (tocode : access constant char;
fromcode : access constant char) return libiconv_t;
pragma Import (C, libiconv_open, "libiconv_open");
function libiconv (cd : libiconv_t; inbuf : access char_const_ptr;
inbytesleft : access stddef.size_t; outbuf : access char_ptr;
outbytesleft : access stddef.size_t) return stddef.size_t;
pragma Import (C, libiconv, "libiconv");
function libiconv_close (cd : libiconv_t) return signed_int;
pragma Import (C, libiconv_close, "libiconv_close");
type struct_bee58aca is record
dummy1 : aliased void_ptr_array (0 .. 27);
dummy2 : aliased wchar.mbstate_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_bee58aca);
type struct_bee58aca_ptr is access all struct_bee58aca;
for struct_bee58aca_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_bee58aca_ptr);
pragma Convention (C, struct_bee58aca_ptr);
subtype iconv_allocation_t is struct_bee58aca;
subtype iconv_allocation_t_ptr is struct_bee58aca_ptr;
function libiconv_open_into (tocode : access constant char;
fromcode : access constant char; resultp : access iconv_allocation_t)
return signed_int;
pragma Import (C, libiconv_open_into, "libiconv_open_into");
function libiconvctl (cd : libiconv_t; request : signed_int;
argument : void_ptr) return signed_int;
pragma Import (C, libiconvctl, "libiconvctl");
type access_069d8c52 is access procedure (uc : unsigned_int;
data : void_ptr);
pragma Convention (C, access_069d8c52);
subtype iconv_unicode_char_hook is access_069d8c52;
type access_1a7d4d6c is access procedure (wc : stddef.wchar_t;
data : void_ptr);
pragma Convention (C, access_1a7d4d6c);
subtype iconv_wide_char_hook is access_1a7d4d6c;
type struct_iconv_hooks;
type struct_iconv_hooks is record
uc_hook : aliased iconv_unicode_char_hook;
wc_hook : aliased iconv_wide_char_hook;
data : aliased void_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_iconv_hooks);
type access_6b7e84c8 is access procedure (
buf : access constant unsigned_int; buflen : stddef.size_t;
callback_arg : void_ptr);
pragma Convention (C, access_6b7e84c8);
type access_1cd5579e is access procedure (inbuf : access constant char;
inbufsize : stddef.size_t; write_replacement : access_6b7e84c8;
callback_arg : void_ptr; data : void_ptr);
pragma Convention (C, access_1cd5579e);
subtype iconv_unicode_mb_to_uc_fallback is access_1cd5579e;
type access_3e46a4e4 is access procedure (buf : access constant char;
buflen : stddef.size_t; callback_arg : void_ptr);
pragma Convention (C, access_3e46a4e4);
type access_2a40a803 is access procedure (code : unsigned_int;
write_replacement : access_3e46a4e4; callback_arg : void_ptr;
data : void_ptr);
pragma Convention (C, access_2a40a803);
subtype iconv_unicode_uc_to_mb_fallback is access_2a40a803;
type access_f2e0a55f is access procedure (
buf : access constant stddef.wchar_t; buflen : stddef.size_t;
callback_arg : void_ptr);
pragma Convention (C, access_f2e0a55f);
type access_b1188cae is access procedure (inbuf : access constant char;
inbufsize : stddef.size_t; write_replacement : access_f2e0a55f;
callback_arg : void_ptr; data : void_ptr);
pragma Convention (C, access_b1188cae);
subtype iconv_wchar_mb_to_wc_fallback is access_b1188cae;
type access_ef0e60db is access procedure (buf : access constant char;
buflen : stddef.size_t; callback_arg : void_ptr);
pragma Convention (C, access_ef0e60db);
type access_d14919e8 is access procedure (code : stddef.wchar_t;
write_replacement : access_ef0e60db; callback_arg : void_ptr;
data : void_ptr);
pragma Convention (C, access_d14919e8);
subtype iconv_wchar_wc_to_mb_fallback is access_d14919e8;
type struct_iconv_fallbacks;
type struct_iconv_fallbacks is record
mb_to_uc_fallback : aliased iconv_unicode_mb_to_uc_fallback;
uc_to_mb_fallback : aliased iconv_unicode_uc_to_mb_fallback;
mb_to_wc_fallback : aliased iconv_wchar_mb_to_wc_fallback;
wc_to_mb_fallback : aliased iconv_wchar_wc_to_mb_fallback;
data : aliased void_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_iconv_fallbacks);
type access_b7907248 is access function (namescount : unsigned_int;
names : access char_const_ptr; data : void_ptr) return signed_int;
pragma Convention (C, access_b7907248);
procedure libiconvlist (do_one : access_b7907248; data : void_ptr);
pragma Import (C, libiconvlist, "libiconvlist");
function iconv_canonicalize (name : access constant char)
return char_const_ptr;
pragma Import (C, iconv_canonicalize, "iconv_canonicalize");
procedure libiconv_set_relocation_prefix (
orig_prefix : access constant char;
curr_prefix : access constant char);
pragma Import (C, libiconv_set_relocation_prefix,
"libiconv_set_relocation_prefix");
ICONV_GET_DISCARD_ILSEQ : constant := 3;
ICONV_GET_TRANSLITERATE : constant := 1;
ICONV_SET_DISCARD_ILSEQ : constant := 4;
ICONV_SET_FALLBACKS : constant := 6;
ICONV_SET_HOOKS : constant := 5;
ICONV_SET_TRANSLITERATE : constant := 2;
ICONV_TRIVIALP : constant := 0;
-- _LIBICONV_H (empty)
LIBICONV_VERSION : constant := 270;
function iconv (cd : libiconv_t; inbuf : access char_const_ptr;
inbytesleft : access stddef.size_t; outbuf : access char_ptr;
outbytesleft : access stddef.size_t) return stddef.size_t
renames libiconv;
function iconv_close (cd : libiconv_t) return signed_int
renames libiconv_close;
function iconv_open (tocode : access constant char;
fromcode : access constant char) return libiconv_t
renames libiconv_open;
function iconv_open_into (tocode : access constant char;
fromcode : access constant char; resultp : access iconv_allocation_t)
return signed_int renames libiconv_open_into;
subtype iconv_t is libiconv_t;
function iconvctl (cd : libiconv_t; request : signed_int;
argument : void_ptr) return signed_int renames libiconvctl;
procedure iconvlist (do_one : access_b7907248; data : void_ptr)
renames libiconvlist;
end C.iconv;
Raw
c-machine-elf.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.machine.elf is
pragma Preelaborate;
type access_e823f645 is access procedure;
pragma Convention (C, access_e823f645);
type union_31e6136b (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
a_val : signed_long;
when 1 =>
a_ptr : void_ptr;
when others =>
a_fcn : access_e823f645;
end case;
end record;
pragma Unchecked_Union (union_31e6136b);
pragma Convention (C_Pass_By_Copy, union_31e6136b);
type struct_109b26f0 is record
a_type : aliased signed_int;
a_un : aliased union_31e6136b;
end record;
pragma Convention (C_Pass_By_Copy, struct_109b26f0);
subtype Elf32_Auxinfo is struct_109b26f0;
subtype Elf_Auxinfo is Elf32_Auxinfo;
AT_BASE : constant := 7;
AT_COUNT : constant := 16;
AT_EGID : constant := 14;
AT_ENTRY : constant := 9;
AT_EUID : constant := 12;
AT_EXECFD : constant := 2;
AT_EXECPATH : constant := 15;
AT_FLAGS : constant := 8;
AT_GID : constant := 13;
AT_IGNORE : constant := 1;
AT_NOTELF : constant := 10;
AT_NULL : constant := 0;
AT_PAGESZ : constant := 6;
AT_PHDR : constant := 3;
AT_PHENT : constant := 4;
AT_PHNUM : constant := 5;
AT_UID : constant := 11;
ELF_ARCH : constant := 3;
-- ELF_MACHINE_OK (function macro)
ELF_TARG_CLASS : constant := 1;
ELF_TARG_DATA : constant := 1;
ELF_TARG_MACH : constant := 3;
ELF_TARG_VER : constant := 1;
ET_DYN_LOAD_ADDR : constant := 16781312;
R_386_COUNT : constant := 38;
MACHINE_ELF_H : constant := 1;
ELF_WORD_SIZE : constant := 32;
end C.machine.elf;
Raw
c-machine-endian.adb
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with System.Machine_Code; use System.Machine_Code;
package body C.machine.endian is
function bswap64 (x : qtypes.uint64_t) return qtypes.uint64_t is
begin
return qtypes.uint64_t'(Shift_Right (x, 56)) or (
qtypes.uint64_t'(Shift_Right (x, 40))
and unsigned_long_long'(65280)) or (qtypes.uint64_t'(Shift_Right (x,
24)) and unsigned_long_long'(16711680)) or (
qtypes.uint64_t'(Shift_Right (x, 8)) and unsigned_long_long'Mod (
-16777216)) or (qtypes.uint64_t'(Shift_Left (x, 8))
and 1095216660480) or (qtypes.uint64_t'(Shift_Left (x, 24))
and 280375465082880) or (qtypes.uint64_t'(Shift_Left (x, 40))
and 71776119061217280) or qtypes.uint64_t'(Shift_Left (x, 56));
end bswap64;
function bswap32 (x : qtypes.uint32_t) return qtypes.uint32_t is
begin
declare
function Extension_Statement_22bad06c return qtypes.uint32_t;
function Extension_Statement_22bad06c
return qtypes.uint32_t is
begin
declare
qqX : qtypes.uint32_t := x;
begin
Asm ("bswap %0",
Outputs => qtypes.uint32_t'Asm_Output ("+r", qqX),
Volatile => True);
return qqX;
end;
end Extension_Statement_22bad06c;
begin
return Extension_Statement_22bad06c;
end;
end bswap32;
function bswap16 (x : qtypes.uint16_t) return qtypes.uint16_t is
begin
return qtypes.uint16_t'(Shift_Left (x, 8))
or qtypes.uint16_t'(Shift_Right (x, 8));
end bswap16;
end C.machine.endian;
Raw
c-machine-endian.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
package C.machine.endian is
pragma Preelaborate;
function bswap64 (x : qtypes.uint64_t) return qtypes.uint64_t;
pragma Convention (C, bswap64);
pragma Inline (bswap64);
function bswap32 (x : qtypes.uint32_t) return qtypes.uint32_t;
pragma Convention (C, bswap32);
pragma Inline (bswap32);
function bswap16 (x : qtypes.uint16_t) return qtypes.uint16_t;
pragma Convention (C, bswap16);
pragma Inline (bswap16);
BIG_ENDIAN : constant := 4321;
BYTE_ORDER : constant := 1234;
LITTLE_ENDIAN : constant := 1234;
PDP_ENDIAN : constant := 3412;
qBIG_ENDIAN : constant := 4321;
qBYTE_ORDER : constant := 1234;
qLITTLE_ENDIAN : constant := 1234;
-- _MACHINE_ENDIAN_H_ (empty)
qPDP_ENDIAN : constant := 3412;
QUAD_HIGHWORD : constant := 1;
QUAD_LOWWORD : constant := 0;
-- __byte_swap_int (function macro)
-- __byte_swap_int_var (function macro)
-- __htonl (function macro)
-- __htons (function macro)
-- __ntohl (function macro)
-- __ntohs (function macro)
end C.machine.endian;
Raw
c-machine-param.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.machine.param is
pragma Preelaborate;
-- ALIGN (function macro)
ALIGNBYTES : constant := 3;
-- ALIGNED_POINTER (function macro)
CACHE_LINE_SHIFT : constant := 7;
CACHE_LINE_SIZE : constant := 128;
IOPAGES : constant := 2;
KSTACK_GUARD_PAGES : constant := 1;
KSTACK_PAGES : constant := 2;
MACHINE : constant char_array (0 .. 4) := "i386" & char'Val (0);
MACHINE_ARCH : constant char_array (0 .. 4) := "i386" & char'Val (0);
MAXCPU : constant := 1;
MAXPAGESIZES : constant := 2;
-- MID_MACHINE (unparsible)
NBPDR : constant := 4194304;
NBPTD : constant := 4096;
-- NPDEPG (unparsible)
-- NPDEPTD (unparsible)
NPGPTD : constant := 1;
NPGPTD_SHIFT : constant := 10;
-- NPTEPG (unparsible)
PAGE_MASK : constant := 4095;
PAGE_SHIFT : constant := 12;
PAGE_SIZE : constant := 4096;
PDRMASK : constant := 4194303;
PDRSHIFT : constant := 22;
VM_BCACHE_SIZE_MAX : constant := 209715200;
VM_SWZONE_SIZE_MAX : constant := 33554432;
-- _ALIGN (function macro)
qALIGNBYTES : constant := 3;
-- _MACHINE_PARAM_H_ (empty)
-- __HAVE_ACPI (empty)
-- __PCI_REROUTE_INTERRUPT (empty)
-- atop (function macro)
-- i386_btop (function macro)
-- i386_ptob (function macro)
-- pgtok (function macro)
-- ptoa (function macro)
-- round_4mpage (function macro)
-- round_page (function macro)
-- trunc_4mpage (function macro)
-- trunc_page (function macro)
end C.machine.param;
Raw
c-machine-qlimits.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.machine.qlimits is
pragma Preelaborate;
-- _MACHINE__LIMITS_H_ (empty)
CHAR_BIT : constant := 8;
INT_MAX : constant := 2147483647;
INT_MIN : constant := -2147483648;
LLONG_MAX : constant := 9223372036854775807;
LLONG_MIN : constant := -9223372036854775808;
LONG_BIT : constant := 32;
LONG_MAX : constant := 2147483647;
LONG_MIN : constant := -2147483648;
MINSIGSTKSZ : constant := 2048;
OFF_MAX : constant := 9223372036854775807;
OFF_MIN : constant := -9223372036854775808;
QUAD_MAX : constant := 9223372036854775807;
QUAD_MIN : constant := -9223372036854775808;
SCHAR_MAX : constant := 127;
SCHAR_MIN : constant := -128;
SHRT_MAX : constant := 32767;
SHRT_MIN : constant := -32768;
SIZE_T_MAX : constant := 4294967295;
SSIZE_MAX : constant := 2147483647;
UCHAR_MAX : constant := 255;
UINT_MAX : constant := 4294967295;
ULLONG_MAX : constant := 18446744073709551615;
ULONG_MAX : constant := 4294967295;
UQUAD_MAX : constant := 18446744073709551615;
USHRT_MAX : constant := 65535;
WORD_BIT : constant := 32;
end C.machine.qlimits;
Raw
c-machine-qstdint.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.machine.qstdint is
pragma Preelaborate;
-- INT16_C (function macro)
INT16_MAX : constant := 32767;
INT16_MIN : constant := -32768;
-- INT32_C (function macro)
INT32_MAX : constant := 2147483647;
INT32_MIN : constant := -2147483648;
-- INT64_C (has # or ##)
INT64_MAX : constant := 9223372036854775807;
INT64_MIN : constant := -9223372036854775808;
-- INT8_C (function macro)
INT8_MAX : constant := 127;
INT8_MIN : constant := -128;
-- INTMAX_C (has # or ##)
INTMAX_MAX : constant := 9223372036854775807;
INTMAX_MIN : constant := -9223372036854775808;
INTPTR_MAX : constant := 2147483647;
INTPTR_MIN : constant := -2147483648;
INT_FAST16_MAX : constant := 2147483647;
INT_FAST16_MIN : constant := -2147483648;
INT_FAST32_MAX : constant := 2147483647;
INT_FAST32_MIN : constant := -2147483648;
INT_FAST64_MAX : constant := 9223372036854775807;
INT_FAST64_MIN : constant := -9223372036854775808;
INT_FAST8_MAX : constant := 2147483647;
INT_FAST8_MIN : constant := -2147483648;
INT_LEAST16_MAX : constant := 32767;
INT_LEAST16_MIN : constant := -32768;
INT_LEAST32_MAX : constant := 2147483647;
INT_LEAST32_MIN : constant := -2147483648;
INT_LEAST64_MAX : constant := 9223372036854775807;
INT_LEAST64_MIN : constant := -9223372036854775808;
INT_LEAST8_MAX : constant := 127;
INT_LEAST8_MIN : constant := -128;
PTRDIFF_MAX : constant := 2147483647;
PTRDIFF_MIN : constant := -2147483648;
SIG_ATOMIC_MAX : constant := 2147483647;
SIG_ATOMIC_MIN : constant := -2147483648;
SIZE_MAX : constant := 4294967295;
-- UINT16_C (function macro)
UINT16_MAX : constant := 65535;
-- UINT32_C (has # or ##)
UINT32_MAX : constant := 4294967295;
-- UINT64_C (has # or ##)
UINT64_MAX : constant := 18446744073709551615;
-- UINT8_C (function macro)
UINT8_MAX : constant := 255;
-- UINTMAX_C (has # or ##)
UINTMAX_MAX : constant := 18446744073709551615;
UINTPTR_MAX : constant := 4294967295;
UINT_FAST16_MAX : constant := 4294967295;
UINT_FAST32_MAX : constant := 4294967295;
UINT_FAST64_MAX : constant := 18446744073709551615;
UINT_FAST8_MAX : constant := 4294967295;
UINT_LEAST16_MAX : constant := 65535;
UINT_LEAST32_MAX : constant := 4294967295;
UINT_LEAST64_MAX : constant := 18446744073709551615;
UINT_LEAST8_MAX : constant := 255;
WCHAR_MAX : constant := 2147483647;
WCHAR_MIN : constant := -2147483648;
WINT_MAX : constant := 2147483647;
WINT_MIN : constant := -2147483648;
-- _MACHINE__STDINT_H_ (empty)
end C.machine.qstdint;
Raw
c-machine-qtypes.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.machine.qtypes is
pragma Preelaborate;
subtype int8_t is signed_char;
subtype uint8_t is unsigned_char;
subtype uint8_t_array is unsigned_char_array;
subtype uint8_t_const_ptr is unsigned_char_const_ptr;
subtype uint8_t_ptr is unsigned_char_ptr;
subtype uint8_t_ptr_ptr is unsigned_char_ptr_ptr;
subtype int16_t is signed_short;
subtype uint16_t is unsigned_short;
subtype uint16_t_array is unsigned_short_array;
subtype int32_t is signed_int;
subtype int32_t_const_ptr is signed_int_const_ptr;
subtype int32_t_ptr is signed_int_ptr;
subtype int32_t_array is signed_int_array;
subtype uint32_t is unsigned_int;
subtype uint32_t_array is unsigned_int_array;
subtype uint32_t_ptr is unsigned_int_ptr;
subtype uint32_t_const_ptr is unsigned_int_const_ptr;
subtype int64_t is signed_long_long;
subtype int64_t_ptr is signed_long_long_ptr;
subtype int64_t_const_ptr is signed_long_long_const_ptr;
subtype uint64_t is unsigned_long_long;
subtype uint64_t_array is unsigned_long_long_array;
subtype clock_t is unsigned_long;
subtype cpumask_t is unsigned_int;
subtype critical_t is int32_t;
subtype double_t is long_double;
subtype float_t is long_double;
subtype intfptr_t is int32_t;
subtype intmax_t is int64_t;
subtype intptr_t is int32_t;
subtype int_fast8_t is int32_t;
subtype int_fast16_t is int32_t;
subtype int_fast32_t is int32_t;
subtype int_fast64_t is int64_t;
subtype int_least8_t is int8_t;
subtype int_least16_t is int16_t;
subtype int_least32_t is int32_t;
subtype int_least64_t is int64_t;
subtype ptrdiff_t is Standard.C.ptrdiff_t;
subtype register_t is int32_t;
subtype segsz_t is int32_t;
subtype size_t is Standard.C.size_t;
subtype ssize_t is int32_t;
subtype time_t is int32_t;
subtype time_t_const_ptr is int32_t_const_ptr;
subtype time_t_ptr is int32_t_ptr;
subtype uintfptr_t is uint32_t;
subtype uintmax_t is uint64_t;
subtype uintptr_t is uint32_t;
subtype uintptr_t_array is uint32_t_array;
subtype uint_fast8_t is uint32_t;
subtype uint_fast16_t is uint32_t;
subtype uint_fast32_t is uint32_t;
subtype uint_fast64_t is uint64_t;
subtype uint_least8_t is uint8_t;
subtype uint_least16_t is uint16_t;
subtype uint_least32_t is uint32_t;
subtype uint_least64_t is uint64_t;
subtype u_register_t is uint32_t;
subtype vm_offset_t is uint32_t;
subtype vm_ooffset_t is int64_t;
subtype vm_paddr_t is uint32_t;
subtype vm_pindex_t is uint64_t;
subtype vm_size_t is uint32_t;
subtype va_list is builtin_va_list;
subtype qqgnuc_va_list is va_list;
-- _MACHINE__TYPES_H_ (empty)
-- __GNUC_VA_LIST (empty)
-- __NO_STRICT_ALIGNMENT (empty)
end C.machine.qtypes;
Raw
c-machine-signal.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.qsigset;
package C.machine.signal is
pragma Preelaborate;
subtype sig_atomic_t is signed_int;
type struct_sigcontext;
type struct_sigcontext is record
sc_mask : aliased sys.qsigset.struct_sigset;
sc_onstack : aliased signed_int;
sc_gs : aliased signed_int;
sc_fs : aliased signed_int;
sc_es : aliased signed_int;
sc_ds : aliased signed_int;
sc_edi : aliased signed_int;
sc_esi : aliased signed_int;
sc_ebp : aliased signed_int;
sc_isp : aliased signed_int;
sc_ebx : aliased signed_int;
sc_edx : aliased signed_int;
sc_ecx : aliased signed_int;
sc_eax : aliased signed_int;
sc_trapno : aliased signed_int;
sc_err : aliased signed_int;
sc_eip : aliased signed_int;
sc_cs : aliased signed_int;
sc_efl : aliased signed_int;
sc_esp : aliased signed_int;
sc_ss : aliased signed_int;
sc_len : aliased signed_int;
sc_fpformat : aliased signed_int;
sc_ownedfp : aliased signed_int;
sc_flags : aliased signed_int;
sc_fpstate : aliased signed_int_array (0 .. 127);
sc_fsbase : aliased signed_int;
sc_gsbase : aliased signed_int;
sc_xfpustate : aliased signed_int;
sc_xfpustate_len : aliased signed_int;
sc_spare2 : aliased signed_int_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_sigcontext);
-- _MACHINE_SIGNAL_H_ (empty)
-- .sc_eflags renames .sc_efl (accessor)
-- .sc_fp renames .sc_ebp (accessor)
-- .sc_pc renames .sc_eip (accessor)
-- .sc_ps renames .sc_efl (accessor)
-- .sc_sp renames .sc_esp (accessor)
end C.machine.signal;
Raw
c-machine-trap.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.machine.trap is
pragma Preelaborate;
BUS_PAGE_FAULT : constant := 12;
BUS_SEGM_FAULT : constant := 30;
BUS_SEGNP_FAULT : constant := 26;
BUS_STK_FAULT : constant := 27;
FPE_FLTDIV_TRAP : constant := 3;
FPE_FLTOVF_TRAP : constant := 4;
FPE_FLTUND_TRAP : constant := 5;
FPE_FPU_NP_TRAP : constant := 6;
FPE_INTDIV_TRAP : constant := 2;
FPE_INTOVF_TRAP : constant := 1;
FPE_SUBRNG_TRAP : constant := 7;
ILL_ALIGN_FAULT : constant := 14;
ILL_FPOP_FAULT : constant := 24;
ILL_PRIVIN_FAULT : constant := 1;
-- ILL_RESAD_FAULT (unparsible)
-- ILL_RESOP_FAULT (unparsible)
T_ALIGNFLT : constant := 14;
T_ARITHTRAP : constant := 6;
T_BOUND : constant := 21;
T_BPTFLT : constant := 3;
T_DIVIDE : constant := 18;
T_DNA : constant := 22;
T_DOUBLEFLT : constant := 23;
T_DTRACE_PROBE : constant := 33;
T_DTRACE_RET : constant := 32;
T_FPOPFLT : constant := 24;
T_MCHK : constant := 28;
T_NMI : constant := 19;
T_OFLOW : constant := 20;
T_PAGEFLT : constant := 12;
T_PRIVINFLT : constant := 1;
T_PROTFLT : constant := 9;
T_RESERVED : constant := 30;
T_SEGNPFLT : constant := 26;
T_STKFLT : constant := 27;
T_TRCTRAP : constant := 10;
T_TSSFLT : constant := 25;
T_USER : constant := 256;
T_XMMFLT : constant := 29;
-- _MACHINE_TRAP_H_ (empty)
end C.machine.trap;
Raw
c-machine-ucontext.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
package C.machine.ucontext is
pragma Preelaborate;
type struct_mcontext;
type struct_mcontext is record
mc_onstack : aliased qtypes.register_t;
mc_gs : aliased qtypes.register_t;
mc_fs : aliased qtypes.register_t;
mc_es : aliased qtypes.register_t;
mc_ds : aliased qtypes.register_t;
mc_edi : aliased qtypes.register_t;
mc_esi : aliased qtypes.register_t;
mc_ebp : aliased qtypes.register_t;
mc_isp : aliased qtypes.register_t;
mc_ebx : aliased qtypes.register_t;
mc_edx : aliased qtypes.register_t;
mc_ecx : aliased qtypes.register_t;
mc_eax : aliased qtypes.register_t;
mc_trapno : aliased qtypes.register_t;
mc_err : aliased qtypes.register_t;
mc_eip : aliased qtypes.register_t;
mc_cs : aliased qtypes.register_t;
mc_eflags : aliased qtypes.register_t;
mc_esp : aliased qtypes.register_t;
mc_ss : aliased qtypes.register_t;
mc_len : aliased signed_int;
mc_fpformat : aliased signed_int;
mc_ownedfp : aliased signed_int;
mc_flags : aliased qtypes.register_t;
mc_fpstate : aliased signed_int_array (0 .. 127);
mc_fsbase : aliased qtypes.register_t;
mc_gsbase : aliased qtypes.register_t;
mc_xfpustate : aliased qtypes.register_t;
mc_xfpustate_len : aliased qtypes.register_t;
mc_spare2 : aliased signed_int_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_mcontext);
subtype mcontext_t is struct_mcontext;
-- _MACHINE_UCONTEXT_H_ (empty)
MC_FLAG_MASK : constant := 7;
MC_FPFMT_387 : constant := 65537;
MC_FPFMT_NODEV : constant := 65536;
MC_FPFMT_XMM : constant := 65538;
MC_FPOWNED_FPU : constant := 131073;
MC_FPOWNED_NONE : constant := 131072;
MC_FPOWNED_PCB : constant := 131074;
MC_HASBASES : constant := 2;
MC_HASFPXSTATE : constant := 4;
MC_HASSEGS : constant := 1;
end C.machine.ucontext;
Raw
c-machine.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.machine is
pragma Preelaborate;
end C.machine;
Raw
c-malloc_np.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
package C.malloc_np is
pragma Preelaborate;
function malloc_usable_size (ptr : void_const_ptr) return stddef.size_t;
pragma Import (C, malloc_usable_size, "malloc_usable_size");
-- _MALLOC_NP_H_ (empty)
end C.malloc_np;
Raw
c-netdb.adb
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package body C.netdb is
function h_errno return signed_int is
begin
return qqh_errno.all;
end h_errno;
end C.netdb;
Raw
c-netdb.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.stdint;
with C.sys.socket;
package C.netdb is
pragma Preelaborate;
type struct_hostent;
type struct_hostent is record
h_name : aliased char_ptr;
h_aliases : aliased char_ptr_ptr;
h_addrtype : aliased signed_int;
h_length : aliased signed_int;
h_addr_list : aliased char_ptr_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_hostent);
type struct_hostent_ptr is access all struct_hostent;
for struct_hostent_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_hostent_ptr);
pragma Convention (C, struct_hostent_ptr);
type struct_hostent_ptr_ptr is access all struct_hostent_ptr;
for struct_hostent_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_hostent_ptr_ptr);
pragma Convention (C, struct_hostent_ptr_ptr);
type struct_netent;
type struct_netent is record
n_name : aliased char_ptr;
n_aliases : aliased char_ptr_ptr;
n_addrtype : aliased signed_int;
n_net : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_netent);
type struct_netent_ptr is access all struct_netent;
for struct_netent_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_netent_ptr);
pragma Convention (C, struct_netent_ptr);
type struct_netent_ptr_ptr is access all struct_netent_ptr;
for struct_netent_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_netent_ptr_ptr);
pragma Convention (C, struct_netent_ptr_ptr);
type struct_servent;
type struct_servent is record
s_name : aliased char_ptr;
s_aliases : aliased char_ptr_ptr;
s_port : aliased signed_int;
s_proto : aliased char_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_servent);
type struct_servent_ptr is access all struct_servent;
for struct_servent_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_servent_ptr);
pragma Convention (C, struct_servent_ptr);
type struct_servent_ptr_ptr is access all struct_servent_ptr;
for struct_servent_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_servent_ptr_ptr);
pragma Convention (C, struct_servent_ptr_ptr);
type struct_protoent;
type struct_protoent is record
p_name : aliased char_ptr;
p_aliases : aliased char_ptr_ptr;
p_proto : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_protoent);
type struct_protoent_ptr is access all struct_protoent;
for struct_protoent_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_protoent_ptr);
pragma Convention (C, struct_protoent_ptr);
type struct_protoent_ptr_ptr is access all struct_protoent_ptr;
for struct_protoent_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_protoent_ptr_ptr);
pragma Convention (C, struct_protoent_ptr_ptr);
type struct_addrinfo;
type struct_addrinfo_ptr is access all struct_addrinfo;
for struct_addrinfo_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_addrinfo_ptr);
pragma Convention (C, struct_addrinfo_ptr);
type struct_addrinfo_ptr_ptr is access all struct_addrinfo_ptr;
for struct_addrinfo_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_addrinfo_ptr_ptr);
pragma Convention (C, struct_addrinfo_ptr_ptr);
type struct_addrinfo is record
ai_flags : aliased signed_int;
ai_family : aliased signed_int;
ai_socktype : aliased signed_int;
ai_protocol : aliased signed_int;
ai_addrlen : aliased sys.socket.socklen_t;
ai_canonname : aliased char_ptr;
ai_addr : aliased sys.socket.struct_sockaddr_ptr;
ai_next : aliased struct_addrinfo_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_addrinfo);
type struct_addrinfo_const_ptr is access constant struct_addrinfo;
for struct_addrinfo_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_addrinfo_const_ptr);
pragma Convention (C, struct_addrinfo_const_ptr);
procedure endhostent;
pragma Import (C, endhostent, "endhostent");
procedure endnetent;
pragma Import (C, endnetent, "endnetent");
procedure endprotoent;
pragma Import (C, endprotoent, "endprotoent");
procedure endservent;
pragma Import (C, endservent, "endservent");
function gethostbyaddr (a1 : void_const_ptr; a2 : sys.socket.socklen_t;
a3 : signed_int) return struct_hostent_ptr;
pragma Import (C, gethostbyaddr, "gethostbyaddr");
function gethostbyname (a1 : access constant char)
return struct_hostent_ptr;
pragma Import (C, gethostbyname, "gethostbyname");
function gethostent return struct_hostent_ptr;
pragma Import (C, gethostent, "gethostent");
function getnetbyaddr (a1 : stdint.uint32_t; a2 : signed_int)
return struct_netent_ptr;
pragma Import (C, getnetbyaddr, "getnetbyaddr");
function getnetbyname (a1 : access constant char)
return struct_netent_ptr;
pragma Import (C, getnetbyname, "getnetbyname");
function getnetent return struct_netent_ptr;
pragma Import (C, getnetent, "getnetent");
function getprotobyname (a1 : access constant char)
return struct_protoent_ptr;
pragma Import (C, getprotobyname, "getprotobyname");
function getprotobynumber (a1 : signed_int) return struct_protoent_ptr;
pragma Import (C, getprotobynumber, "getprotobynumber");
function getprotoent return struct_protoent_ptr;
pragma Import (C, getprotoent, "getprotoent");
function getservbyname (a1 : access constant char;
a2 : access constant char) return struct_servent_ptr;
pragma Import (C, getservbyname, "getservbyname");
function getservbyport (a1 : signed_int; a2 : access constant char)
return struct_servent_ptr;
pragma Import (C, getservbyport, "getservbyport");
function getservent return struct_servent_ptr;
pragma Import (C, getservent, "getservent");
procedure sethostent (a1 : signed_int);
pragma Import (C, sethostent, "sethostent");
procedure setnetent (a1 : signed_int);
pragma Import (C, setnetent, "setnetent");
procedure setprotoent (a1 : signed_int);
pragma Import (C, setprotoent, "setprotoent");
function getaddrinfo (a1 : access constant char;
a2 : access constant char; a3 : access constant struct_addrinfo;
a4 : access struct_addrinfo_ptr) return signed_int;
pragma Import (C, getaddrinfo, "getaddrinfo");
function getnameinfo (a1 : access constant sys.socket.struct_sockaddr;
a2 : sys.socket.socklen_t; a3 : access char; a4 : stddef.size_t;
a5 : access char; a6 : stddef.size_t; a7 : signed_int)
return signed_int;
pragma Import (C, getnameinfo, "getnameinfo");
procedure freeaddrinfo (a1 : access struct_addrinfo);
pragma Import (C, freeaddrinfo, "freeaddrinfo");
function gai_strerror (a1 : signed_int) return char_const_ptr;
pragma Import (C, gai_strerror, "gai_strerror");
procedure setservent (a1 : signed_int);
pragma Import (C, setservent, "setservent");
procedure endnetgrent;
pragma Import (C, endnetgrent, "endnetgrent");
procedure freehostent (a1 : access struct_hostent);
pragma Import (C, freehostent, "freehostent");
function gethostbyaddr_r (a1 : void_const_ptr; a2 : sys.socket.socklen_t;
a3 : signed_int; a4 : access struct_hostent; a5 : access char;
a6 : stddef.size_t; a7 : access struct_hostent_ptr;
a8 : access signed_int) return signed_int;
pragma Import (C, gethostbyaddr_r, "gethostbyaddr_r");
function gethostbyname_r (a1 : access constant char;
a2 : access struct_hostent; a3 : access char; a4 : stddef.size_t;
a5 : access struct_hostent_ptr; a6 : access signed_int)
return signed_int;
pragma Import (C, gethostbyname_r, "gethostbyname_r");
function gethostbyname2 (a1 : access constant char; a2 : signed_int)
return struct_hostent_ptr;
pragma Import (C, gethostbyname2, "gethostbyname2");
function gethostbyname2_r (a1 : access constant char; a2 : signed_int;
a3 : access struct_hostent; a4 : access char; a5 : stddef.size_t;
a6 : access struct_hostent_ptr; a7 : access signed_int)
return signed_int;
pragma Import (C, gethostbyname2_r, "gethostbyname2_r");
function gethostent_r (a1 : access struct_hostent; a2 : access char;
a3 : stddef.size_t; a4 : access struct_hostent_ptr;
a5 : access signed_int) return signed_int;
pragma Import (C, gethostent_r, "gethostent_r");
function getipnodebyaddr (a1 : void_const_ptr; a2 : stddef.size_t;
a3 : signed_int; a4 : access signed_int) return struct_hostent_ptr;
pragma Import (C, getipnodebyaddr, "getipnodebyaddr");
function getipnodebyname (a1 : access constant char; a2 : signed_int;
a3 : signed_int; a4 : access signed_int) return struct_hostent_ptr;
pragma Import (C, getipnodebyname, "getipnodebyname");
function getnetbyaddr_r (a1 : stdint.uint32_t; a2 : signed_int;
a3 : access struct_netent; a4 : access char; a5 : stddef.size_t;
a6 : access struct_netent_ptr; a7 : access signed_int)
return signed_int;
pragma Import (C, getnetbyaddr_r, "getnetbyaddr_r");
function getnetbyname_r (a1 : access constant char;
a2 : access struct_netent; a3 : access char; a4 : stddef.size_t;
a5 : access struct_netent_ptr; a6 : access signed_int)
return signed_int;
pragma Import (C, getnetbyname_r, "getnetbyname_r");
function getnetent_r (a1 : access struct_netent; a2 : access char;
a3 : stddef.size_t; a4 : access struct_netent_ptr;
a5 : access signed_int) return signed_int;
pragma Import (C, getnetent_r, "getnetent_r");
function getnetgrent (a1 : access char_ptr; a2 : access char_ptr;
a3 : access char_ptr) return signed_int;
pragma Import (C, getnetgrent, "getnetgrent");
function getprotobyname_r (a1 : access constant char;
a2 : access struct_protoent; a3 : access char; a4 : stddef.size_t;
a5 : access struct_protoent_ptr) return signed_int;
pragma Import (C, getprotobyname_r, "getprotobyname_r");
function getprotobynumber_r (a1 : signed_int; a2 : access struct_protoent;
a3 : access char; a4 : stddef.size_t; a5 : access struct_protoent_ptr)
return signed_int;
pragma Import (C, getprotobynumber_r, "getprotobynumber_r");
function getprotoent_r (a1 : access struct_protoent; a2 : access char;
a3 : stddef.size_t; a4 : access struct_protoent_ptr) return signed_int;
pragma Import (C, getprotoent_r, "getprotoent_r");
function getservbyname_r (a1 : access constant char;
a2 : access constant char; a3 : access struct_servent;
a4 : access char; a5 : stddef.size_t; a6 : access struct_servent_ptr)
return signed_int;
pragma Import (C, getservbyname_r, "getservbyname_r");
function getservbyport_r (a1 : signed_int; a2 : access constant char;
a3 : access struct_servent; a4 : access char; a5 : stddef.size_t;
a6 : access struct_servent_ptr) return signed_int;
pragma Import (C, getservbyport_r, "getservbyport_r");
function getservent_r (a1 : access struct_servent; a2 : access char;
a3 : stddef.size_t; a4 : access struct_servent_ptr) return signed_int;
pragma Import (C, getservent_r, "getservent_r");
procedure herror (a1 : access constant char);
pragma Import (C, herror, "herror");
function hstrerror (a1 : signed_int) return char_const_ptr;
pragma Import (C, hstrerror, "hstrerror");
function innetgr (a1 : access constant char; a2 : access constant char;
a3 : access constant char; a4 : access constant char)
return signed_int;
pragma Import (C, innetgr, "innetgr");
procedure setnetgrent (a1 : access constant char);
pragma Import (C, setnetgrent, "setnetgrent");
function qqh_errno return signed_int_ptr;
pragma Import (C, qqh_errno, "__h_errno");
AI_ADDRCONFIG : constant := 1024;
AI_ALL : constant := 256;
AI_CANONNAME : constant := 2;
AI_DEFAULT : constant := 1536;
AI_MASK : constant := 1039;
AI_NUMERICHOST : constant := 4;
AI_NUMERICSERV : constant := 8;
AI_PASSIVE : constant := 1;
AI_V4MAPPED : constant := 2048;
AI_V4MAPPED_CFG : constant := 512;
EAI_AGAIN : constant := 2;
EAI_BADFLAGS : constant := 3;
EAI_BADHINTS : constant := 12;
EAI_FAIL : constant := 4;
EAI_FAMILY : constant := 5;
EAI_MAX : constant := 15;
EAI_MEMORY : constant := 6;
EAI_NONAME : constant := 8;
EAI_OVERFLOW : constant := 14;
EAI_PROTOCOL : constant := 13;
EAI_SERVICE : constant := 9;
EAI_SOCKTYPE : constant := 10;
EAI_SYSTEM : constant := 11;
HOST_NOT_FOUND : constant := 1;
NETDB_INTERNAL : constant := -1;
NETDB_SUCCESS : constant := 0;
NI_DGRAM : constant := 16;
NI_MAXHOST : constant := 1025;
NI_MAXSERV : constant := 32;
NI_NAMEREQD : constant := 4;
NI_NOFQDN : constant := 1;
NI_NUMERICHOST : constant := 2;
NI_NUMERICSERV : constant := 8;
NO_ADDRESS : constant := 4;
NO_DATA : constant := 4;
NO_RECOVERY : constant := 3;
SCOPE_DELIMITER : constant char := '%';
TRY_AGAIN : constant := 2;
-- _NETDB_H_ (empty)
PATH_HEQUIV : constant char_array (0 .. 16) := "/etc/hosts.equiv"
& char'Val (0);
PATH_HOSTS : constant char_array (0 .. 10) := "/etc/hosts" & char'Val (0);
PATH_NETWORKS : constant char_array (0 .. 13) := "/etc/networks"
& char'Val (0);
PATH_PROTOCOLS : constant char_array (0 .. 14) := "/etc/protocols"
& char'Val (0);
PATH_SERVICES : constant char_array (0 .. 13) := "/etc/services"
& char'Val (0);
PATH_SERVICES_DB : constant char_array (0 .. 19) := "/var/db/services.db"
& char'Val (0);
-- h_addr (unparsible)
function h_errno return signed_int;
pragma Inline_Always (h_errno);
end C.netdb;
Raw
c-netinet-in_h.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stdint;
with C.sys.socket;
with C.sys.types;
package C.netinet.in_h is
pragma Preelaborate;
type struct_in_addr;
type struct_in_addr is record
s_addr : aliased sys.types.in_addr_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_in_addr);
type struct_in_addr_ptr is access all struct_in_addr;
for struct_in_addr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_in_addr_ptr);
pragma Convention (C, struct_in_addr_ptr);
type struct_sockaddr_in;
type struct_sockaddr_in is record
sin_len : aliased stdint.uint8_t;
sin_family : aliased sys.socket.sa_family_t;
sin_port : aliased sys.types.in_port_t;
sin_addr : aliased struct_in_addr;
sin_zero : aliased char_array (0 .. 7);
end record;
pragma Convention (C_Pass_By_Copy, struct_sockaddr_in);
function htonl (a1 : stdint.uint32_t) return stdint.uint32_t;
pragma Import (C, htonl, "htonl");
function htons (a1 : stdint.uint16_t) return stdint.uint16_t;
pragma Import (C, htons, "htons");
function ntohl (a1 : stdint.uint32_t) return stdint.uint32_t;
pragma Import (C, ntohl, "ntohl");
function ntohs (a1 : stdint.uint16_t) return stdint.uint16_t;
pragma Import (C, ntohs, "ntohs");
type struct_ip_mreq;
type struct_ip_mreq is record
imr_multiaddr : aliased struct_in_addr;
imr_interface : aliased struct_in_addr;
end record;
pragma Convention (C_Pass_By_Copy, struct_ip_mreq);
type struct_ip_mreqn;
type struct_ip_mreqn is record
imr_multiaddr : aliased struct_in_addr;
imr_address : aliased struct_in_addr;
imr_ifindex : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_ip_mreqn);
type struct_ip_mreq_source;
type struct_ip_mreq_source is record
imr_multiaddr : aliased struct_in_addr;
imr_sourceaddr : aliased struct_in_addr;
imr_interface : aliased struct_in_addr;
end record;
pragma Convention (C_Pass_By_Copy, struct_ip_mreq_source);
type struct_group_req;
type struct_group_req is record
gr_interface : aliased stdint.uint32_t;
gr_group : aliased sys.socket.struct_sockaddr_storage;
end record;
pragma Convention (C_Pass_By_Copy, struct_group_req);
type struct_group_source_req;
type struct_group_source_req is record
gsr_interface : aliased stdint.uint32_t;
gsr_group : aliased sys.socket.struct_sockaddr_storage;
gsr_source : aliased sys.socket.struct_sockaddr_storage;
end record;
pragma Convention (C_Pass_By_Copy, struct_group_source_req);
type struct_msfilterreq;
type struct_msfilterreq is record
msfr_ifindex : aliased stdint.uint32_t;
msfr_fmode : aliased stdint.uint32_t;
msfr_nsrcs : aliased stdint.uint32_t;
msfr_group : aliased sys.socket.struct_sockaddr_storage;
msfr_srcs : aliased sys.socket.struct_sockaddr_storage_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_msfilterreq);
function setipv4sourcefilter (a1 : signed_int; a2 : struct_in_addr;
a3 : struct_in_addr; a4 : stdint.uint32_t; a5 : stdint.uint32_t;
a6 : access struct_in_addr) return signed_int;
pragma Import (C, setipv4sourcefilter, "setipv4sourcefilter");
function getipv4sourcefilter (a1 : signed_int; a2 : struct_in_addr;
a3 : struct_in_addr; a4 : access stdint.uint32_t;
a5 : access stdint.uint32_t; a6 : access struct_in_addr)
return signed_int;
pragma Import (C, getipv4sourcefilter, "getipv4sourcefilter");
function setsourcefilter (a1 : signed_int; a2 : stdint.uint32_t;
a3 : access sys.socket.struct_sockaddr; a4 : sys.socket.socklen_t;
a5 : stdint.uint32_t; a6 : stdint.uint32_t;
a7 : access sys.socket.struct_sockaddr_storage) return signed_int;
pragma Import (C, setsourcefilter, "setsourcefilter");
function getsourcefilter (a1 : signed_int; a2 : stdint.uint32_t;
a3 : access sys.socket.struct_sockaddr; a4 : sys.socket.socklen_t;
a5 : access stdint.uint32_t; a6 : access stdint.uint32_t;
a7 : access sys.socket.struct_sockaddr_storage) return signed_int;
pragma Import (C, getsourcefilter, "getsourcefilter");
-- CTL_IPPROTO_NAMES (unparsible)
INADDR_ALLHOSTS_GROUP : constant := 3758096385;
INADDR_ALLMDNS_GROUP : constant := 3758096635;
INADDR_ALLRPTS_GROUP : constant := 3758096406;
INADDR_ALLRTRS_GROUP : constant := 3758096386;
INADDR_ANY : constant := 0;
INADDR_BROADCAST : constant := 4294967295;
INADDR_CARP_GROUP : constant := 3758096402;
INADDR_LOOPBACK : constant := 2130706433;
INADDR_MAX_LOCAL_GROUP : constant := 3758096639;
INADDR_NONE : constant := -1;
INADDR_PFSYNC_GROUP : constant := 3758096624;
INADDR_UNSPEC_GROUP : constant := 3758096384;
INET_ADDRSTRLEN : constant := 16;
-- IN_ANY_LOCAL (function macro)
-- IN_BADCLASS (function macro)
-- IN_CLASSA (function macro)
IN_CLASSA_HOST : constant := 16777215;
IN_CLASSA_MAX : constant := 128;
IN_CLASSA_NET : constant := -16777216;
IN_CLASSA_NSHIFT : constant := 24;
-- IN_CLASSB (function macro)
IN_CLASSB_HOST : constant := 65535;
IN_CLASSB_MAX : constant := 65536;
IN_CLASSB_NET : constant := -65536;
IN_CLASSB_NSHIFT : constant := 16;
-- IN_CLASSC (function macro)
IN_CLASSC_HOST : constant := 255;
IN_CLASSC_NET : constant := -256;
IN_CLASSC_NSHIFT : constant := 8;
-- IN_CLASSD (function macro)
IN_CLASSD_HOST : constant := 268435455;
IN_CLASSD_NET : constant := -268435456;
IN_CLASSD_NSHIFT : constant := 28;
-- IN_EXPERIMENTAL (function macro)
-- IN_LINKLOCAL (function macro)
-- IN_LOCAL_GROUP (function macro)
-- IN_LOOPBACK (function macro)
IN_LOOPBACKNET : constant := 127;
-- IN_MULTICAST (function macro)
-- IN_PRIVATE (function macro)
-- IN_ZERONET (function macro)
IPCTL_ACCEPTSOURCEROUTE : constant := 13;
IPCTL_DEFTTL : constant := 3;
IPCTL_DIRECTEDBROADCAST : constant := 9;
IPCTL_FASTFORWARDING : constant := 14;
IPCTL_FORWARDING : constant := 1;
IPCTL_GIF_TTL : constant := 16;
IPCTL_INTRQDROPS : constant := 11;
IPCTL_INTRQMAXLEN : constant := 10;
IPCTL_KEEPFAITH : constant := 15;
IPCTL_MAXID : constant := 17;
-- IPCTL_NAMES (unparsible)
IPCTL_RTEXPIRE : constant := 5;
IPCTL_RTMAXCACHE : constant := 7;
IPCTL_RTMINEXPIRE : constant := 6;
IPCTL_SENDREDIRECTS : constant := 2;
IPCTL_SOURCEROUTE : constant := 8;
IPCTL_STATS : constant := 12;
IPPORT_EPHEMERALFIRST : constant := 10000;
IPPORT_EPHEMERALLAST : constant := 65535;
IPPORT_HIFIRSTAUTO : constant := 49152;
IPPORT_HILASTAUTO : constant := 65535;
IPPORT_MAX : constant := 65535;
IPPORT_RESERVED : constant := 1024;
IPPORT_RESERVEDSTART : constant := 600;
IPPROTO_3PC : constant := 34;
IPPROTO_ADFS : constant := 68;
IPPROTO_AH : constant := 51;
IPPROTO_AHIP : constant := 61;
IPPROTO_APES : constant := 99;
IPPROTO_ARGUS : constant := 13;
IPPROTO_AX25 : constant := 93;
IPPROTO_BHA : constant := 49;
IPPROTO_BLT : constant := 30;
IPPROTO_BRSATMON : constant := 76;
IPPROTO_CARP : constant := 112;
IPPROTO_CFTP : constant := 62;
IPPROTO_CHAOS : constant := 16;
IPPROTO_CMTP : constant := 38;
IPPROTO_CPHB : constant := 73;
IPPROTO_CPNX : constant := 72;
IPPROTO_DDP : constant := 37;
IPPROTO_DGP : constant := 86;
IPPROTO_DIVERT : constant := 258;
IPPROTO_DONE : constant := 257;
IPPROTO_DSTOPTS : constant := 60;
IPPROTO_EGP : constant := 8;
IPPROTO_EMCON : constant := 14;
IPPROTO_ENCAP : constant := 98;
IPPROTO_EON : constant := 80;
IPPROTO_ESP : constant := 50;
IPPROTO_ETHERIP : constant := 97;
IPPROTO_FRAGMENT : constant := 44;
IPPROTO_GGP : constant := 3;
IPPROTO_GMTP : constant := 100;
IPPROTO_GRE : constant := 47;
IPPROTO_HELLO : constant := 63;
IPPROTO_HMP : constant := 20;
IPPROTO_HOPOPTS : constant := 0;
IPPROTO_ICMP : constant := 1;
IPPROTO_ICMPV6 : constant := 58;
IPPROTO_IDP : constant := 22;
IPPROTO_IDPR : constant := 35;
IPPROTO_IDRP : constant := 45;
IPPROTO_IGMP : constant := 2;
IPPROTO_IGP : constant := 85;
IPPROTO_IGRP : constant := 88;
IPPROTO_IL : constant := 40;
IPPROTO_INLSP : constant := 52;
IPPROTO_INP : constant := 32;
IPPROTO_IP : constant := 0;
IPPROTO_IPCOMP : constant := 108;
IPPROTO_IPCV : constant := 71;
IPPROTO_IPEIP : constant := 94;
IPPROTO_IPIP : constant := 4;
IPPROTO_IPPC : constant := 67;
IPPROTO_IPV4 : constant := 4;
IPPROTO_IPV6 : constant := 41;
IPPROTO_IRTP : constant := 28;
IPPROTO_KRYPTOLAN : constant := 65;
IPPROTO_LARP : constant := 91;
IPPROTO_LEAF1 : constant := 25;
IPPROTO_LEAF2 : constant := 26;
IPPROTO_MAX : constant := 256;
IPPROTO_MAXID : constant := 52;
IPPROTO_MEAS : constant := 19;
IPPROTO_MHRP : constant := 48;
IPPROTO_MICP : constant := 95;
IPPROTO_MOBILE : constant := 55;
IPPROTO_MTP : constant := 92;
IPPROTO_MUX : constant := 18;
IPPROTO_ND : constant := 77;
IPPROTO_NHRP : constant := 54;
IPPROTO_NONE : constant := 59;
IPPROTO_NSP : constant := 31;
IPPROTO_NVPII : constant := 11;
IPPROTO_OLD_DIVERT : constant := 254;
IPPROTO_OSPFIGP : constant := 89;
IPPROTO_PFSYNC : constant := 240;
IPPROTO_PGM : constant := 113;
IPPROTO_PIGP : constant := 9;
IPPROTO_PIM : constant := 103;
IPPROTO_PRM : constant := 21;
IPPROTO_PUP : constant := 12;
IPPROTO_PVP : constant := 75;
IPPROTO_RAW : constant := 255;
IPPROTO_RCCMON : constant := 10;
IPPROTO_RDP : constant := 27;
IPPROTO_ROUTING : constant := 43;
IPPROTO_RSVP : constant := 46;
IPPROTO_RVD : constant := 66;
IPPROTO_SATEXPAK : constant := 64;
IPPROTO_SATMON : constant := 69;
IPPROTO_SCCSP : constant := 96;
IPPROTO_SCTP : constant := 132;
IPPROTO_SDRP : constant := 42;
IPPROTO_SEP : constant := 33;
IPPROTO_SKIP : constant := 57;
IPPROTO_SPACER : constant := 32767;
IPPROTO_SRPC : constant := 90;
IPPROTO_ST : constant := 7;
IPPROTO_SVMTP : constant := 82;
IPPROTO_SWIPE : constant := 53;
IPPROTO_TCF : constant := 87;
IPPROTO_TCP : constant := 6;
IPPROTO_TLSP : constant := 56;
IPPROTO_TP : constant := 29;
IPPROTO_TPXX : constant := 39;
IPPROTO_TRUNK1 : constant := 23;
IPPROTO_TRUNK2 : constant := 24;
IPPROTO_TTP : constant := 84;
IPPROTO_UDP : constant := 17;
IPPROTO_VINES : constant := 83;
IPPROTO_VISA : constant := 70;
IPPROTO_VMTP : constant := 81;
IPPROTO_WBEXPAK : constant := 79;
IPPROTO_WBMON : constant := 78;
IPPROTO_WSN : constant := 74;
IPPROTO_XNET : constant := 15;
IPPROTO_XTP : constant := 36;
IP_ADD_MEMBERSHIP : constant := 12;
IP_ADD_SOURCE_MEMBERSHIP : constant := 70;
IP_BINDANY : constant := 24;
IP_BLOCK_SOURCE : constant := 72;
IP_DEFAULT_MULTICAST_LOOP : constant := 1;
IP_DEFAULT_MULTICAST_TTL : constant := 1;
IP_DONTFRAG : constant := 67;
IP_DROP_MEMBERSHIP : constant := 13;
IP_DROP_SOURCE_MEMBERSHIP : constant := 71;
IP_DUMMYNET3 : constant := 49;
IP_DUMMYNET_CONFIGURE : constant := 60;
IP_DUMMYNET_DEL : constant := 61;
IP_DUMMYNET_FLUSH : constant := 62;
IP_DUMMYNET_GET : constant := 64;
IP_FAITH : constant := 22;
IP_FW3 : constant := 48;
IP_FW_ADD : constant := 50;
IP_FW_DEL : constant := 51;
IP_FW_FLUSH : constant := 52;
IP_FW_GET : constant := 54;
IP_FW_NAT_CFG : constant := 56;
IP_FW_NAT_DEL : constant := 57;
IP_FW_NAT_GET_CONFIG : constant := 58;
IP_FW_NAT_GET_LOG : constant := 59;
IP_FW_RESETLOG : constant := 55;
IP_FW_TABLE_ADD : constant := 40;
IP_FW_TABLE_DEL : constant := 41;
IP_FW_TABLE_FLUSH : constant := 42;
IP_FW_TABLE_GETSIZE : constant := 43;
IP_FW_TABLE_LIST : constant := 44;
IP_FW_ZERO : constant := 53;
IP_HDRINCL : constant := 2;
IP_IPSEC_POLICY : constant := 21;
IP_MAX_GROUP_SRC_FILTER : constant := 512;
IP_MAX_MEMBERSHIPS : constant := 4095;
IP_MAX_SOCK_MUTE_FILTER : constant := 128;
IP_MAX_SOCK_SRC_FILTER : constant := 128;
IP_MAX_SOURCE_FILTER : constant := 1024;
IP_MINTTL : constant := 66;
IP_MIN_MEMBERSHIPS : constant := 31;
IP_MSFILTER : constant := 74;
IP_MULTICAST_IF : constant := 9;
IP_MULTICAST_LOOP : constant := 11;
IP_MULTICAST_TTL : constant := 10;
IP_MULTICAST_VIF : constant := 14;
IP_ONESBCAST : constant := 23;
IP_OPTIONS : constant := 1;
IP_PORTRANGE : constant := 19;
IP_PORTRANGE_DEFAULT : constant := 0;
IP_PORTRANGE_HIGH : constant := 1;
IP_PORTRANGE_LOW : constant := 2;
IP_RECVDSTADDR : constant := 7;
IP_RECVIF : constant := 20;
IP_RECVOPTS : constant := 5;
IP_RECVRETOPTS : constant := 6;
IP_RECVTOS : constant := 68;
IP_RECVTTL : constant := 65;
IP_RETOPTS : constant := 8;
IP_RSVP_OFF : constant := 16;
IP_RSVP_ON : constant := 15;
IP_RSVP_VIF_OFF : constant := 18;
IP_RSVP_VIF_ON : constant := 17;
IP_SENDSRCADDR : constant := 7;
IP_TOS : constant := 3;
IP_TTL : constant := 4;
IP_UNBLOCK_SOURCE : constant := 73;
MCAST_BLOCK_SOURCE : constant := 84;
MCAST_EXCLUDE : constant := 2;
MCAST_INCLUDE : constant := 1;
MCAST_JOIN_GROUP : constant := 80;
MCAST_JOIN_SOURCE_GROUP : constant := 82;
MCAST_LEAVE_GROUP : constant := 81;
MCAST_LEAVE_SOURCE_GROUP : constant := 83;
MCAST_UNBLOCK_SOURCE : constant := 85;
MCAST_UNDEFINED : constant := 0;
-- _BYTEORDER_FUNC_DEFINED (empty)
-- _BYTEORDER_PROTOTYPED (empty)
-- _NETINET_IN_H_ (empty)
-- _STRUCT_IN_ADDR_DECLARED (empty)
-- __MSFILTERREQ_DEFINED (empty)
end C.netinet.in_h;
Raw
c-netinet.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.netinet is
pragma Preelaborate;
end C.netinet;
Raw
c-netinet6-in6.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.stdint;
with C.sys.socket;
with C.sys.types;
package C.netinet6.in6 is
pragma Preelaborate;
subtype uint8_t_array16 is stdint.uint8_t_array (0 .. 15);
type struct_in6_addr;
type union_b1b74b10 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
u6_addr8 : stdint.uint8_t_array (0 .. 15);
when 1 =>
u6_addr16 : stdint.uint16_t_array (0 .. 7);
when others =>
u6_addr32 : stdint.uint32_t_array (0 .. 3);
end case;
end record;
pragma Unchecked_Union (union_b1b74b10);
pragma Convention (C_Pass_By_Copy, union_b1b74b10);
type struct_in6_addr is record
u6_addr : aliased union_b1b74b10;
end record;
pragma Convention (C_Pass_By_Copy, struct_in6_addr);
type struct_in6_addr_const_ptr is access constant struct_in6_addr;
for struct_in6_addr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_in6_addr_const_ptr);
pragma Convention (C, struct_in6_addr_const_ptr);
type struct_in6_addr_ptr is access all struct_in6_addr;
for struct_in6_addr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_in6_addr_ptr);
pragma Convention (C, struct_in6_addr_ptr);
type struct_sockaddr_in6;
type struct_sockaddr_in6 is record
sin6_len : aliased stdint.uint8_t;
sin6_family : aliased sys.socket.sa_family_t;
sin6_port : aliased sys.types.in_port_t;
sin6_flowinfo : aliased stdint.uint32_t;
sin6_addr : aliased struct_in6_addr;
sin6_scope_id : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_sockaddr_in6);
in6addr_any : aliased struct_in6_addr;
pragma Import (C, in6addr_any, "in6addr_any");
in6addr_loopback : aliased struct_in6_addr;
pragma Import (C, in6addr_loopback, "in6addr_loopback");
in6addr_nodelocal_allnodes : aliased struct_in6_addr;
pragma Import (C, in6addr_nodelocal_allnodes,
"in6addr_nodelocal_allnodes");
in6addr_linklocal_allnodes : aliased struct_in6_addr;
pragma Import (C, in6addr_linklocal_allnodes,
"in6addr_linklocal_allnodes");
in6addr_linklocal_allrouters : aliased struct_in6_addr;
pragma Import (C, in6addr_linklocal_allrouters,
"in6addr_linklocal_allrouters");
in6addr_linklocal_allv2routers : aliased struct_in6_addr;
pragma Import (C, in6addr_linklocal_allv2routers,
"in6addr_linklocal_allv2routers");
type struct_route_in6;
type struct_rtentry (<>) is limited private;
type struct_rtentry_ptr is access all struct_rtentry;
for struct_rtentry_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_rtentry_ptr);
pragma Convention (C, struct_rtentry_ptr);
type struct_llentry (<>) is limited private;
type struct_llentry_ptr is access all struct_llentry;
for struct_llentry_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_llentry_ptr);
pragma Convention (C, struct_llentry_ptr);
type struct_route_in6 is record
ro_rt : aliased struct_rtentry_ptr;
ro_lle : aliased struct_llentry_ptr;
ro_dst : aliased struct_sockaddr_in6;
end record;
pragma Convention (C_Pass_By_Copy, struct_route_in6);
type struct_ipv6_mreq;
type struct_ipv6_mreq is record
ipv6mr_multiaddr : aliased struct_in6_addr;
ipv6mr_interface : aliased unsigned_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_ipv6_mreq);
type struct_in6_pktinfo;
type struct_in6_pktinfo is record
ipi6_addr : aliased struct_in6_addr;
ipi6_ifindex : aliased unsigned_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_in6_pktinfo);
type struct_ip6_mtuinfo;
type struct_ip6_mtuinfo is record
ip6m_addr : aliased struct_sockaddr_in6;
ip6m_mtu : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_ip6_mtuinfo);
function inet6_option_space (a1 : signed_int) return signed_int;
pragma Import (C, inet6_option_space, "inet6_option_space");
function inet6_option_init (a1 : void_ptr;
a2 : access sys.socket.struct_cmsghdr_ptr; a3 : signed_int)
return signed_int;
pragma Import (C, inet6_option_init, "inet6_option_init");
function inet6_option_append (a1 : access sys.socket.struct_cmsghdr;
a2 : access constant stdint.uint8_t; a3 : signed_int; a4 : signed_int)
return signed_int;
pragma Import (C, inet6_option_append, "inet6_option_append");
function inet6_option_alloc (a1 : access sys.socket.struct_cmsghdr;
a2 : signed_int; a3 : signed_int; a4 : signed_int)
return stdint.uint8_t_ptr;
pragma Import (C, inet6_option_alloc, "inet6_option_alloc");
function inet6_option_next (
a1 : access constant sys.socket.struct_cmsghdr;
a2 : access stdint.uint8_t_ptr) return signed_int;
pragma Import (C, inet6_option_next, "inet6_option_next");
function inet6_option_find (
a1 : access constant sys.socket.struct_cmsghdr;
a2 : access stdint.uint8_t_ptr; a3 : signed_int) return signed_int;
pragma Import (C, inet6_option_find, "inet6_option_find");
function inet6_rthdr_space (a1 : signed_int; a2 : signed_int)
return stddef.size_t;
pragma Import (C, inet6_rthdr_space, "inet6_rthdr_space");
function inet6_rthdr_init (a1 : void_ptr; a2 : signed_int)
return sys.socket.struct_cmsghdr_ptr;
pragma Import (C, inet6_rthdr_init, "inet6_rthdr_init");
function inet6_rthdr_add (a1 : access sys.socket.struct_cmsghdr;
a2 : access constant struct_in6_addr; a3 : unsigned_int)
return signed_int;
pragma Import (C, inet6_rthdr_add, "inet6_rthdr_add");
function inet6_rthdr_lasthop (a1 : access sys.socket.struct_cmsghdr;
a2 : unsigned_int) return signed_int;
pragma Import (C, inet6_rthdr_lasthop, "inet6_rthdr_lasthop");
function inet6_rthdr_segments (
a1 : access constant sys.socket.struct_cmsghdr) return signed_int;
pragma Import (C, inet6_rthdr_segments, "inet6_rthdr_segments");
function inet6_rthdr_getaddr (a1 : access sys.socket.struct_cmsghdr;
a2 : signed_int) return struct_in6_addr_ptr;
pragma Import (C, inet6_rthdr_getaddr, "inet6_rthdr_getaddr");
function inet6_rthdr_getflags (
a1 : access constant sys.socket.struct_cmsghdr; a2 : signed_int)
return signed_int;
pragma Import (C, inet6_rthdr_getflags, "inet6_rthdr_getflags");
function inet6_opt_init (a1 : void_ptr; a2 : sys.socket.socklen_t)
return signed_int;
pragma Import (C, inet6_opt_init, "inet6_opt_init");
function inet6_opt_append (a1 : void_ptr; a2 : sys.socket.socklen_t;
a3 : signed_int; a4 : stdint.uint8_t; a5 : sys.socket.socklen_t;
a6 : stdint.uint8_t; a7 : access void_ptr) return signed_int;
pragma Import (C, inet6_opt_append, "inet6_opt_append");
function inet6_opt_finish (a1 : void_ptr; a2 : sys.socket.socklen_t;
a3 : signed_int) return signed_int;
pragma Import (C, inet6_opt_finish, "inet6_opt_finish");
function inet6_opt_set_val (a1 : void_ptr; a2 : signed_int; a3 : void_ptr;
a4 : sys.socket.socklen_t) return signed_int;
pragma Import (C, inet6_opt_set_val, "inet6_opt_set_val");
function inet6_opt_next (a1 : void_ptr; a2 : sys.socket.socklen_t;
a3 : signed_int; a4 : access stdint.uint8_t;
a5 : access sys.socket.socklen_t; a6 : access void_ptr)
return signed_int;
pragma Import (C, inet6_opt_next, "inet6_opt_next");
function inet6_opt_find (a1 : void_ptr; a2 : sys.socket.socklen_t;
a3 : signed_int; a4 : stdint.uint8_t; a5 : access sys.socket.socklen_t;
a6 : access void_ptr) return signed_int;
pragma Import (C, inet6_opt_find, "inet6_opt_find");
function inet6_opt_get_val (a1 : void_ptr; a2 : signed_int; a3 : void_ptr;
a4 : sys.socket.socklen_t) return signed_int;
pragma Import (C, inet6_opt_get_val, "inet6_opt_get_val");
function inet6_rth_space (a1 : signed_int; a2 : signed_int)
return sys.socket.socklen_t;
pragma Import (C, inet6_rth_space, "inet6_rth_space");
function inet6_rth_init (a1 : void_ptr; a2 : sys.socket.socklen_t;
a3 : signed_int; a4 : signed_int) return void_ptr;
pragma Import (C, inet6_rth_init, "inet6_rth_init");
function inet6_rth_add (a1 : void_ptr;
a2 : access constant struct_in6_addr) return signed_int;
pragma Import (C, inet6_rth_add, "inet6_rth_add");
function inet6_rth_reverse (a1 : void_const_ptr; a2 : void_ptr)
return signed_int;
pragma Import (C, inet6_rth_reverse, "inet6_rth_reverse");
function inet6_rth_segments (a1 : void_const_ptr) return signed_int;
pragma Import (C, inet6_rth_segments, "inet6_rth_segments");
function inet6_rth_getaddr (a1 : void_const_ptr; a2 : signed_int)
return struct_in6_addr_ptr;
pragma Import (C, inet6_rth_getaddr, "inet6_rth_getaddr");
ICMP6_FILTER : constant := 18;
ICMPV6CTL_ND6_ONLINKNSRFC4861 : constant := 47;
-- IN6ADDR_ANY_INIT (plase type with #pragma instance)
-- IN6ADDR_INTFACELOCAL_ALLNODES_INIT (plase type with #pragma instance)
-- IN6ADDR_LINKLOCAL_ALLNODES_INIT (plase type with #pragma instance)
-- IN6ADDR_LINKLOCAL_ALLROUTERS_INIT (plase type with #pragma instance)
-- IN6ADDR_LINKLOCAL_ALLV2ROUTERS_INIT (plase type with #pragma instance)
-- IN6ADDR_LOOPBACK_INIT (plase type with #pragma instance)
-- IN6ADDR_NODELOCAL_ALLNODES_INIT (plase type with #pragma instance)
-- IN6_ARE_ADDR_EQUAL (unparsible)
-- IN6_IS_ADDR_LINKLOCAL (uninterpretable)
-- IN6_IS_ADDR_LOOPBACK (uninterpretable)
-- IN6_IS_ADDR_MC_GLOBAL (uninterpretable)
-- IN6_IS_ADDR_MC_LINKLOCAL (uninterpretable)
-- IN6_IS_ADDR_MC_NODELOCAL (uninterpretable)
-- IN6_IS_ADDR_MC_ORGLOCAL (uninterpretable)
-- IN6_IS_ADDR_MC_SITELOCAL (uninterpretable)
-- IN6_IS_ADDR_MULTICAST (uninterpretable)
-- IN6_IS_ADDR_SITELOCAL (uninterpretable)
-- IN6_IS_ADDR_UNSPECIFIED (uninterpretable)
-- IN6_IS_ADDR_V4COMPAT (uninterpretable)
-- IN6_IS_ADDR_V4MAPPED (uninterpretable)
INET6_ADDRSTRLEN : constant := 46;
IPV6CTL_ACCEPT_RTADV : constant := 12;
IPV6CTL_ADDRCTLPOLICY : constant := 38;
IPV6CTL_AUTO_FLOWLABEL : constant := 17;
IPV6CTL_AUTO_LINKLOCAL : constant := 35;
IPV6CTL_DAD_COUNT : constant := 16;
IPV6CTL_DEFHLIM : constant := 3;
IPV6CTL_DEFMCASTHLIM : constant := 18;
IPV6CTL_FORWARDING : constant := 1;
IPV6CTL_FORWSRCRT : constant := 5;
IPV6CTL_GIF_HLIM : constant := 19;
IPV6CTL_HDRNESTLIMIT : constant := 15;
IPV6CTL_KAME_VERSION : constant := 20;
IPV6CTL_KEEPFAITH : constant := 13;
IPV6CTL_LOG_INTERVAL : constant := 14;
IPV6CTL_MAXFRAGPACKETS : constant := 9;
IPV6CTL_MAXFRAGS : constant := 41;
IPV6CTL_MAXID : constant := 48;
IPV6CTL_MCAST_PMTU : constant := 44;
IPV6CTL_MRTPROTO : constant := 8;
IPV6CTL_MRTSTATS : constant := 7;
IPV6CTL_PREFER_TEMPADDR : constant := 37;
IPV6CTL_RIP6STATS : constant := 36;
IPV6CTL_RR_PRUNE : constant := 22;
IPV6CTL_RTEXPIRE : constant := 25;
IPV6CTL_RTMAXCACHE : constant := 27;
IPV6CTL_RTMINEXPIRE : constant := 26;
IPV6CTL_SENDREDIRECTS : constant := 2;
IPV6CTL_SOURCECHECK : constant := 10;
IPV6CTL_SOURCECHECK_LOGINT : constant := 11;
IPV6CTL_STATS : constant := 6;
IPV6CTL_STEALTH : constant := 45;
IPV6CTL_TEMPPLTIME : constant := 33;
IPV6CTL_TEMPVLTIME : constant := 34;
IPV6CTL_USETEMPADDR : constant := 32;
IPV6CTL_USE_DEFAULTZONE : constant := 39;
IPV6CTL_USE_DEPRECATED : constant := 21;
IPV6CTL_V6ONLY : constant := 24;
IPV6PORT_ANONMAX : constant := 65535;
IPV6PORT_ANONMIN : constant := 49152;
IPV6PORT_RESERVED : constant := 1024;
IPV6PORT_RESERVEDMAX : constant := 1023;
IPV6PORT_RESERVEDMIN : constant := 600;
IPV6PROTO_MAXID : constant := 104;
IPV6_AUTOFLOWLABEL : constant := 59;
IPV6_BINDANY : constant := 64;
IPV6_BINDV6ONLY : constant := 27;
IPV6_CHECKSUM : constant := 26;
IPV6_DEFAULT_MULTICAST_HOPS : constant := 1;
IPV6_DEFAULT_MULTICAST_LOOP : constant := 1;
IPV6_DONTFRAG : constant := 62;
IPV6_DSTOPTS : constant := 50;
IPV6_FAITH : constant := 29;
IPV6_FW_ADD : constant := 30;
IPV6_FW_DEL : constant := 31;
IPV6_FW_FLUSH : constant := 32;
IPV6_FW_GET : constant := 34;
IPV6_FW_ZERO : constant := 33;
IPV6_HOPLIMIT : constant := 47;
IPV6_HOPOPTS : constant := 49;
IPV6_IPSEC_POLICY : constant := 28;
IPV6_JOIN_GROUP : constant := 12;
IPV6_LEAVE_GROUP : constant := 13;
IPV6_MAX_GROUP_SRC_FILTER : constant := 512;
IPV6_MAX_MEMBERSHIPS : constant := 4095;
IPV6_MAX_SOCK_SRC_FILTER : constant := 128;
IPV6_MIN_MEMBERSHIPS : constant := 31;
IPV6_MSFILTER : constant := 74;
IPV6_MULTICAST_HOPS : constant := 10;
IPV6_MULTICAST_IF : constant := 9;
IPV6_MULTICAST_LOOP : constant := 11;
IPV6_NEXTHOP : constant := 48;
IPV6_PATHMTU : constant := 44;
IPV6_PKTINFO : constant := 46;
IPV6_PORTRANGE : constant := 14;
IPV6_PORTRANGE_DEFAULT : constant := 0;
IPV6_PORTRANGE_HIGH : constant := 1;
IPV6_PORTRANGE_LOW : constant := 2;
IPV6_PREFER_TEMPADDR : constant := 63;
IPV6_RECVDSTOPTS : constant := 40;
IPV6_RECVHOPLIMIT : constant := 37;
IPV6_RECVHOPOPTS : constant := 39;
IPV6_RECVPATHMTU : constant := 43;
IPV6_RECVPKTINFO : constant := 36;
IPV6_RECVRTHDR : constant := 38;
IPV6_RECVTCLASS : constant := 57;
IPV6_RTHDR : constant := 51;
IPV6_RTHDRDSTOPTS : constant := 35;
IPV6_RTHDR_LOOSE : constant := 0;
IPV6_RTHDR_STRICT : constant := 1;
IPV6_RTHDR_TYPE_0 : constant := 0;
IPV6_SOCKOPT_RESERVED1 : constant := 3;
IPV6_TCLASS : constant := 61;
IPV6_UNICAST_HOPS : constant := 4;
IPV6_USE_MIN_MTU : constant := 42;
IPV6_V6ONLY : constant := 27;
-- M_AUTHIPDGM (unparsible)
-- M_AUTHIPHDR (unparsible)
-- M_DECRYPTED (unparsible)
-- M_LOOP (unparsible)
-- M_RTALERT_MLD (unparsible)
-- SIN6_LEN (empty)
-- _NETINET6_IN6_H_ (empty)
-- __IPV6_ADDR_MC_SCOPE (uninterpretable)
IPV6_ADDR_SCOPE_GLOBAL : constant := 14;
IPV6_ADDR_SCOPE_INTFACELOCAL : constant := 1;
IPV6_ADDR_SCOPE_LINKLOCAL : constant := 2;
IPV6_ADDR_SCOPE_NODELOCAL : constant := 1;
IPV6_ADDR_SCOPE_ORGLOCAL : constant := 8;
IPV6_ADDR_SCOPE_SITELOCAL : constant := 5;
KAME_VERSION : constant char_array (0 .. 7) := "FreeBSD" & char'Val (0);
-- __KAME__ (empty)
-- .s6_addr renames .__u6_addr.__u6_addr8 (accessor)
private
type struct_rtentry is null record;
type struct_llentry is null record;
end C.netinet6.in6;
Raw
c-netinet6.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.netinet6 is
pragma Preelaborate;
end C.netinet6;
Raw
c-poll.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.poll is
pragma Preelaborate;
subtype nfds_t is unsigned_int;
type struct_pollfd;
type struct_pollfd is record
fd : aliased signed_int;
events : aliased signed_short;
revents : aliased signed_short;
end record;
pragma Convention (C_Pass_By_Copy, struct_pollfd);
type struct_pollfd_array is array (size_t range <>) of
aliased struct_pollfd;
pragma Convention (C, struct_pollfd_array);
type struct_pollfd_ptr is access all struct_pollfd;
for struct_pollfd_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pollfd_ptr);
pragma Convention (C, struct_pollfd_ptr);
function poll (pfd : access struct_pollfd; nfds : nfds_t;
timeout : signed_int) return signed_int;
pragma Import (C, poll, "poll");
INFTIM : constant := -1;
POLLERR : constant := 8;
POLLHUP : constant := 16;
POLLIN : constant := 1;
POLLINIGNEOF : constant := 8192;
POLLNVAL : constant := 32;
POLLOUT : constant := 4;
POLLPRI : constant := 2;
POLLRDBAND : constant := 128;
POLLRDNORM : constant := 64;
POLLSTANDARD : constant := 511;
POLLWRBAND : constant := 256;
POLLWRNORM : constant := 4;
-- _SYS_POLL_H_ (empty)
end C.poll;
Raw
c-pthread.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with Ada.Unchecked_Conversion;
with C.machine.qtypes;
with C.sched;
with C.signal;
with C.stddef;
with C.sys.qpthreadtypes;
with C.sys.qsigset;
with C.sys.qtypes;
with C.sys.select_h;
with C.sys.signal;
with C.sys.timespec;
with C.sys.types;
with C.sys.ucontext;
package C.pthread is
pragma Preelaborate;
function Cast is new Ada.Unchecked_Conversion (signed_int,
sys.qpthreadtypes.struct_pthread_mutex_ptr);
sys_signame : char_const_ptr_array renames signal.sys_signame;
sys_siglist : char_const_ptr_array renames signal.sys_siglist;
sys_nsig : signed_int renames signal.sys_nsig;
subtype qqpthread_t is signal.pthread_t;
function C_raise (a1 : signed_int) return signed_int
renames signal.C_raise;
function kill (a1 : sys.qtypes.pid_t; a2 : signed_int) return signed_int
renames signal.kill;
function pthread_kill (a1 : access sys.qpthreadtypes.struct_pthread;
a2 : signed_int) return signed_int renames signal.pthread_kill;
function pthread_sigmask (a1 : signed_int;
a2 : access constant sys.qsigset.sigset_t;
a3 : access sys.qsigset.sigset_t) return signed_int
renames signal.pthread_sigmask;
function sigaction (a1 : signed_int;
a2 : access constant sys.signal.struct_sigaction;
a3 : access sys.signal.struct_sigaction) return signed_int
renames signal.sigaction;
function sigaddset (a1 : access sys.select_h.sigset_t; a2 : signed_int)
return signed_int renames signal.sigaddset;
function sigdelset (a1 : access sys.select_h.sigset_t; a2 : signed_int)
return signed_int renames signal.sigdelset;
function sigemptyset (a1 : access sys.select_h.sigset_t) return signed_int
renames signal.sigemptyset;
function sigfillset (a1 : access sys.select_h.sigset_t) return signed_int
renames signal.sigfillset;
function sigismember (a1 : access constant sys.select_h.sigset_t;
a2 : signed_int) return signed_int renames signal.sigismember;
function sigpending (a1 : access sys.select_h.sigset_t) return signed_int
renames signal.sigpending;
function sigprocmask (a1 : signed_int;
a2 : access constant sys.select_h.sigset_t;
a3 : access sys.select_h.sigset_t) return signed_int
renames signal.sigprocmask;
function sigsuspend (a1 : access constant sys.select_h.sigset_t)
return signed_int renames signal.sigsuspend;
function sigwait (a1 : access constant sys.select_h.sigset_t;
a2 : access signed_int) return signed_int renames signal.sigwait;
function sigqueue (a1 : sys.qtypes.pid_t; a2 : signed_int;
a3 : sys.signal.union_sigval) return signed_int
renames signal.sigqueue;
function sigtimedwait (a1 : access constant sys.select_h.sigset_t;
a2 : access sys.signal.siginfo_t;
a3 : access constant sys.timespec.struct_timespec) return signed_int
renames signal.sigtimedwait;
function sigwaitinfo (a1 : access constant sys.select_h.sigset_t;
a2 : access sys.signal.siginfo_t) return signed_int
renames signal.sigwaitinfo;
function killpg (a1 : sys.qtypes.pid_t; a2 : signed_int) return signed_int
renames signal.killpg;
function sigaltstack (a1 : access constant sys.signal.stack_t;
a2 : access sys.signal.stack_t) return signed_int
renames signal.sigaltstack;
function sighold (a1 : signed_int) return signed_int
renames signal.sighold;
function sigignore (a1 : signed_int) return signed_int
renames signal.sigignore;
function sigpause (a1 : signed_int) return signed_int
renames signal.sigpause;
function sigrelse (a1 : signed_int) return signed_int
renames signal.sigrelse;
-- sigset renames signal.sigset (anonymous type)
function xsi_sigpause (a1 : signed_int) return signed_int
renames signal.xsi_sigpause;
function siginterrupt (a1 : signed_int; a2 : signed_int) return signed_int
renames signal.siginterrupt;
procedure psignal (a1 : unsigned_int; a2 : access constant char)
renames signal.psignal;
function sigblock (a1 : signed_int) return signed_int
renames signal.sigblock;
function sigreturn (a1 : access constant sys.ucontext.struct_ucontext)
return signed_int renames signal.sigreturn;
function sigsetmask (a1 : signed_int) return signed_int
renames signal.sigsetmask;
function sigstack (a1 : access constant sys.signal.struct_sigstack;
a2 : access sys.signal.struct_sigstack) return signed_int
renames signal.sigstack;
function sigvec (a1 : signed_int; a2 : access sys.signal.struct_sigvec;
a3 : access sys.signal.struct_sigvec) return signed_int
renames signal.sigvec;
-- SIGNAL_H renames signal.SIGNAL_H (empty)
subtype struct_pthread is sys.qpthreadtypes.struct_pthread;
subtype struct_pthread_attr is sys.qpthreadtypes.struct_pthread_attr;
subtype struct_pthread_cond is sys.qpthreadtypes.struct_pthread_cond;
subtype struct_pthread_cond_attr is
sys.qpthreadtypes.struct_pthread_cond_attr;
subtype struct_pthread_mutex is sys.qpthreadtypes.struct_pthread_mutex;
subtype struct_pthread_mutex_attr is
sys.qpthreadtypes.struct_pthread_mutex_attr;
subtype struct_pthread_once is sys.qpthreadtypes.struct_pthread_once;
subtype struct_pthread_rwlock is sys.qpthreadtypes.struct_pthread_rwlock;
subtype struct_pthread_rwlockattr is
sys.qpthreadtypes.struct_pthread_rwlockattr;
subtype struct_pthread_barrier is
sys.qpthreadtypes.struct_pthread_barrier;
subtype struct_pthread_barrier_attr is
sys.qpthreadtypes.struct_pthread_barrier_attr;
subtype struct_pthread_spinlock is
sys.qpthreadtypes.struct_pthread_spinlock;
subtype pthread_t is sys.qpthreadtypes.pthread_t;
subtype pthread_attr_t is sys.qpthreadtypes.pthread_attr_t;
subtype pthread_mutex_t is sys.qpthreadtypes.pthread_mutex_t;
subtype pthread_mutexattr_t is sys.qpthreadtypes.pthread_mutexattr_t;
subtype pthread_cond_t is sys.qpthreadtypes.pthread_cond_t;
subtype pthread_condattr_t is sys.qpthreadtypes.pthread_condattr_t;
subtype pthread_key_t is sys.qpthreadtypes.pthread_key_t;
subtype pthread_once_t is sys.qpthreadtypes.pthread_once_t;
subtype pthread_rwlock_t is sys.qpthreadtypes.pthread_rwlock_t;
subtype pthread_rwlockattr_t is sys.qpthreadtypes.pthread_rwlockattr_t;
subtype pthread_barrier_t is sys.qpthreadtypes.pthread_barrier_t;
subtype struct_pthread_barrierattr is
sys.qpthreadtypes.struct_pthread_barrierattr;
subtype pthread_barrierattr_t is sys.qpthreadtypes.pthread_barrierattr_t;
subtype pthread_spinlock_t is sys.qpthreadtypes.pthread_spinlock_t;
subtype pthread_addr_t is sys.qpthreadtypes.pthread_addr_t;
subtype pthread_startroutine_t is
sys.qpthreadtypes.pthread_startroutine_t;
-- PTHREAD_T_DECLARED renames sys.qpthreadtypes.PTHREAD_T_DECLARED (empty)
-- SYS_PTHREADTYPES_H renames sys.qpthreadtypes.SYS_PTHREADTYPES_H (empty)
type enum_pthread_mutextype;
type enum_pthread_mutextype is (PTHREAD_MUTEX_ERRORCHECK,
PTHREAD_MUTEX_RECURSIVE, PTHREAD_MUTEX_NORMAL,
PTHREAD_MUTEX_ADAPTIVE_NP, PTHREAD_MUTEX_TYPE_MAX);
for enum_pthread_mutextype use (PTHREAD_MUTEX_ERRORCHECK => 1,
PTHREAD_MUTEX_RECURSIVE => 2, PTHREAD_MUTEX_NORMAL => 3,
PTHREAD_MUTEX_ADAPTIVE_NP => 4, PTHREAD_MUTEX_TYPE_MAX => 5);
pragma Convention (C, enum_pthread_mutextype);
type struct_pthread_cleanup_info;
type struct_pthread_cleanup_info is record
pthread_cleanup_pad : aliased machine.qtypes.uintptr_t_array (0 .. 7);
end record;
pragma Convention (C_Pass_By_Copy, struct_pthread_cleanup_info);
type struct_pthread_cleanup_info_ptr is
access all struct_pthread_cleanup_info;
for struct_pthread_cleanup_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_cleanup_info_ptr);
pragma Convention (C, struct_pthread_cleanup_info_ptr);
type access_e823f645 is access procedure;
pragma Convention (C, access_e823f645);
function pthread_atfork (a1 : access_e823f645; a2 : access_e823f645;
a3 : access_e823f645) return signed_int;
pragma Import (C, pthread_atfork, "pthread_atfork");
function pthread_attr_destroy (
a1 : access sys.qpthreadtypes.pthread_attr_t) return signed_int;
pragma Import (C, pthread_attr_destroy, "pthread_attr_destroy");
function pthread_attr_getstack (
a1 : access constant sys.qpthreadtypes.pthread_attr_t;
a2 : access void_ptr; a3 : access stddef.size_t) return signed_int;
pragma Import (C, pthread_attr_getstack, "pthread_attr_getstack");
function pthread_attr_getstacksize (
a1 : access constant sys.qpthreadtypes.pthread_attr_t;
a2 : access stddef.size_t) return signed_int;
pragma Import (C, pthread_attr_getstacksize, "pthread_attr_getstacksize");
function pthread_attr_getguardsize (
a1 : access constant sys.qpthreadtypes.pthread_attr_t;
a2 : access stddef.size_t) return signed_int;
pragma Import (C, pthread_attr_getguardsize, "pthread_attr_getguardsize");
function pthread_attr_getstackaddr (
a1 : access constant sys.qpthreadtypes.pthread_attr_t;
a2 : access void_ptr) return signed_int;
pragma Import (C, pthread_attr_getstackaddr, "pthread_attr_getstackaddr");
function pthread_attr_getdetachstate (
a1 : access constant sys.qpthreadtypes.pthread_attr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_attr_getdetachstate,
"pthread_attr_getdetachstate");
function pthread_attr_init (a1 : access sys.qpthreadtypes.pthread_attr_t)
return signed_int;
pragma Import (C, pthread_attr_init, "pthread_attr_init");
function pthread_attr_setstacksize (
a1 : access sys.qpthreadtypes.pthread_attr_t; a2 : stddef.size_t)
return signed_int;
pragma Import (C, pthread_attr_setstacksize, "pthread_attr_setstacksize");
function pthread_attr_setguardsize (
a1 : access sys.qpthreadtypes.pthread_attr_t; a2 : stddef.size_t)
return signed_int;
pragma Import (C, pthread_attr_setguardsize, "pthread_attr_setguardsize");
function pthread_attr_setstack (
a1 : access sys.qpthreadtypes.pthread_attr_t; a2 : void_ptr;
a3 : stddef.size_t) return signed_int;
pragma Import (C, pthread_attr_setstack, "pthread_attr_setstack");
function pthread_attr_setstackaddr (
a1 : access sys.qpthreadtypes.pthread_attr_t; a2 : void_ptr)
return signed_int;
pragma Import (C, pthread_attr_setstackaddr, "pthread_attr_setstackaddr");
function pthread_attr_setdetachstate (
a1 : access sys.qpthreadtypes.pthread_attr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_attr_setdetachstate,
"pthread_attr_setdetachstate");
function pthread_barrier_destroy (
a1 : access sys.qpthreadtypes.pthread_barrier_t) return signed_int;
pragma Import (C, pthread_barrier_destroy, "pthread_barrier_destroy");
function pthread_barrier_init (
a1 : access sys.qpthreadtypes.pthread_barrier_t;
a2 : access constant sys.qpthreadtypes.pthread_barrierattr_t;
a3 : unsigned_int) return signed_int;
pragma Import (C, pthread_barrier_init, "pthread_barrier_init");
function pthread_barrier_wait (
a1 : access sys.qpthreadtypes.pthread_barrier_t) return signed_int;
pragma Import (C, pthread_barrier_wait, "pthread_barrier_wait");
function pthread_barrierattr_destroy (
a1 : access sys.qpthreadtypes.pthread_barrierattr_t) return signed_int;
pragma Import (C, pthread_barrierattr_destroy,
"pthread_barrierattr_destroy");
function pthread_barrierattr_getpshared (
a1 : access constant sys.qpthreadtypes.pthread_barrierattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_barrierattr_getpshared,
"pthread_barrierattr_getpshared");
function pthread_barrierattr_init (
a1 : access sys.qpthreadtypes.pthread_barrierattr_t) return signed_int;
pragma Import (C, pthread_barrierattr_init, "pthread_barrierattr_init");
function pthread_barrierattr_setpshared (
a1 : access sys.qpthreadtypes.pthread_barrierattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_barrierattr_setpshared,
"pthread_barrierattr_setpshared");
function pthread_condattr_destroy (
a1 : access sys.qpthreadtypes.pthread_condattr_t) return signed_int;
pragma Import (C, pthread_condattr_destroy, "pthread_condattr_destroy");
function pthread_condattr_getclock (
a1 : access constant sys.qpthreadtypes.pthread_condattr_t;
a2 : access sys.types.clockid_t) return signed_int;
pragma Import (C, pthread_condattr_getclock, "pthread_condattr_getclock");
function pthread_condattr_getpshared (
a1 : access constant sys.qpthreadtypes.pthread_condattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_condattr_getpshared,
"pthread_condattr_getpshared");
function pthread_condattr_init (
a1 : access sys.qpthreadtypes.pthread_condattr_t) return signed_int;
pragma Import (C, pthread_condattr_init, "pthread_condattr_init");
function pthread_condattr_setclock (
a1 : access sys.qpthreadtypes.pthread_condattr_t;
a2 : sys.types.clockid_t) return signed_int;
pragma Import (C, pthread_condattr_setclock, "pthread_condattr_setclock");
function pthread_condattr_setpshared (
a1 : access sys.qpthreadtypes.pthread_condattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_condattr_setpshared,
"pthread_condattr_setpshared");
function pthread_cond_broadcast (
a1 : access sys.qpthreadtypes.pthread_cond_t) return signed_int;
pragma Import (C, pthread_cond_broadcast, "pthread_cond_broadcast");
function pthread_cond_destroy (
a1 : access sys.qpthreadtypes.pthread_cond_t) return signed_int;
pragma Import (C, pthread_cond_destroy, "pthread_cond_destroy");
function pthread_cond_init (a1 : access sys.qpthreadtypes.pthread_cond_t;
a2 : access constant sys.qpthreadtypes.pthread_condattr_t)
return signed_int;
pragma Import (C, pthread_cond_init, "pthread_cond_init");
function pthread_cond_signal (
a1 : access sys.qpthreadtypes.pthread_cond_t) return signed_int;
pragma Import (C, pthread_cond_signal, "pthread_cond_signal");
function pthread_cond_timedwait (
a1 : access sys.qpthreadtypes.pthread_cond_t;
a2 : access sys.qpthreadtypes.pthread_mutex_t;
a3 : access constant sys.timespec.struct_timespec) return signed_int;
pragma Import (C, pthread_cond_timedwait, "pthread_cond_timedwait");
function pthread_cond_wait (a1 : access sys.qpthreadtypes.pthread_cond_t;
a2 : access sys.qpthreadtypes.pthread_mutex_t) return signed_int;
pragma Import (C, pthread_cond_wait, "pthread_cond_wait");
type access_684b1476 is access function (a1 : void_ptr) return void_ptr;
pragma Convention (C, access_684b1476);
function pthread_create (a1 : access sys.qpthreadtypes.pthread_t;
a2 : access constant sys.qpthreadtypes.pthread_attr_t;
a3 : access_684b1476; a4 : void_ptr) return signed_int;
pragma Import (C, pthread_create, "pthread_create");
function pthread_detach (a1 : access sys.qpthreadtypes.struct_pthread)
return signed_int;
pragma Import (C, pthread_detach, "pthread_detach");
function pthread_equal (a1 : access sys.qpthreadtypes.struct_pthread;
a2 : access sys.qpthreadtypes.struct_pthread) return signed_int;
pragma Import (C, pthread_equal, "pthread_equal");
type access_9f60b0f8 is access procedure (a1 : void_ptr);
pragma Convention (C, access_9f60b0f8);
procedure pthread_exit (a1 : void_ptr);
pragma No_Return (pthread_exit);
pragma Import (C, pthread_exit, "pthread_exit");
function pthread_getspecific (a1 : sys.qpthreadtypes.pthread_key_t)
return void_ptr;
pragma Import (C, pthread_getspecific, "pthread_getspecific");
function pthread_getcpuclockid (
a1 : access sys.qpthreadtypes.struct_pthread;
a2 : access sys.types.clockid_t) return signed_int;
pragma Import (C, pthread_getcpuclockid, "pthread_getcpuclockid");
function pthread_join (a1 : access sys.qpthreadtypes.struct_pthread;
a2 : access void_ptr) return signed_int;
pragma Import (C, pthread_join, "pthread_join");
function pthread_key_create (a1 : access sys.qpthreadtypes.pthread_key_t;
a2 : access_9f60b0f8) return signed_int;
pragma Import (C, pthread_key_create, "pthread_key_create");
function pthread_key_delete (a1 : sys.qpthreadtypes.pthread_key_t)
return signed_int;
pragma Import (C, pthread_key_delete, "pthread_key_delete");
function pthread_mutexattr_init (
a1 : access sys.qpthreadtypes.pthread_mutexattr_t) return signed_int;
pragma Import (C, pthread_mutexattr_init, "pthread_mutexattr_init");
function pthread_mutexattr_destroy (
a1 : access sys.qpthreadtypes.pthread_mutexattr_t) return signed_int;
pragma Import (C, pthread_mutexattr_destroy, "pthread_mutexattr_destroy");
function pthread_mutexattr_getpshared (
a1 : access constant sys.qpthreadtypes.pthread_mutexattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_mutexattr_getpshared,
"pthread_mutexattr_getpshared");
function pthread_mutexattr_gettype (
a1 : access sys.qpthreadtypes.pthread_mutexattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_mutexattr_gettype, "pthread_mutexattr_gettype");
function pthread_mutexattr_settype (
a1 : access sys.qpthreadtypes.pthread_mutexattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_mutexattr_settype, "pthread_mutexattr_settype");
function pthread_mutexattr_setpshared (
a1 : access sys.qpthreadtypes.pthread_mutexattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_mutexattr_setpshared,
"pthread_mutexattr_setpshared");
function pthread_mutex_destroy (
a1 : access sys.qpthreadtypes.pthread_mutex_t) return signed_int;
pragma Import (C, pthread_mutex_destroy, "pthread_mutex_destroy");
function pthread_mutex_init (
a1 : access sys.qpthreadtypes.pthread_mutex_t;
a2 : access constant sys.qpthreadtypes.pthread_mutexattr_t)
return signed_int;
pragma Import (C, pthread_mutex_init, "pthread_mutex_init");
function pthread_mutex_lock (
a1 : access sys.qpthreadtypes.pthread_mutex_t) return signed_int;
pragma Import (C, pthread_mutex_lock, "pthread_mutex_lock");
function pthread_mutex_trylock (
a1 : access sys.qpthreadtypes.pthread_mutex_t) return signed_int;
pragma Import (C, pthread_mutex_trylock, "pthread_mutex_trylock");
function pthread_mutex_timedlock (
a1 : access sys.qpthreadtypes.pthread_mutex_t;
a2 : access constant sys.timespec.struct_timespec) return signed_int;
pragma Import (C, pthread_mutex_timedlock, "pthread_mutex_timedlock");
function pthread_mutex_unlock (
a1 : access sys.qpthreadtypes.pthread_mutex_t) return signed_int;
pragma Import (C, pthread_mutex_unlock, "pthread_mutex_unlock");
function pthread_once (a1 : access sys.qpthreadtypes.pthread_once_t;
a2 : access_e823f645) return signed_int;
pragma Import (C, pthread_once, "pthread_once");
function pthread_rwlock_destroy (
a1 : access sys.qpthreadtypes.pthread_rwlock_t) return signed_int;
pragma Import (C, pthread_rwlock_destroy, "pthread_rwlock_destroy");
function pthread_rwlock_init (
a1 : access sys.qpthreadtypes.pthread_rwlock_t;
a2 : access constant sys.qpthreadtypes.pthread_rwlockattr_t)
return signed_int;
pragma Import (C, pthread_rwlock_init, "pthread_rwlock_init");
function pthread_rwlock_rdlock (
a1 : access sys.qpthreadtypes.pthread_rwlock_t) return signed_int;
pragma Import (C, pthread_rwlock_rdlock, "pthread_rwlock_rdlock");
function pthread_rwlock_timedrdlock (
a1 : access sys.qpthreadtypes.pthread_rwlock_t;
a2 : access constant sys.timespec.struct_timespec) return signed_int;
pragma Import (C, pthread_rwlock_timedrdlock,
"pthread_rwlock_timedrdlock");
function pthread_rwlock_timedwrlock (
a1 : access sys.qpthreadtypes.pthread_rwlock_t;
a2 : access constant sys.timespec.struct_timespec) return signed_int;
pragma Import (C, pthread_rwlock_timedwrlock,
"pthread_rwlock_timedwrlock");
function pthread_rwlock_tryrdlock (
a1 : access sys.qpthreadtypes.pthread_rwlock_t) return signed_int;
pragma Import (C, pthread_rwlock_tryrdlock, "pthread_rwlock_tryrdlock");
function pthread_rwlock_trywrlock (
a1 : access sys.qpthreadtypes.pthread_rwlock_t) return signed_int;
pragma Import (C, pthread_rwlock_trywrlock, "pthread_rwlock_trywrlock");
function pthread_rwlock_unlock (
a1 : access sys.qpthreadtypes.pthread_rwlock_t) return signed_int;
pragma Import (C, pthread_rwlock_unlock, "pthread_rwlock_unlock");
function pthread_rwlock_wrlock (
a1 : access sys.qpthreadtypes.pthread_rwlock_t) return signed_int;
pragma Import (C, pthread_rwlock_wrlock, "pthread_rwlock_wrlock");
function pthread_rwlockattr_init (
a1 : access sys.qpthreadtypes.pthread_rwlockattr_t) return signed_int;
pragma Import (C, pthread_rwlockattr_init, "pthread_rwlockattr_init");
function pthread_rwlockattr_getpshared (
a1 : access constant sys.qpthreadtypes.pthread_rwlockattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_rwlockattr_getpshared,
"pthread_rwlockattr_getpshared");
function pthread_rwlockattr_setpshared (
a1 : access sys.qpthreadtypes.pthread_rwlockattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_rwlockattr_setpshared,
"pthread_rwlockattr_setpshared");
function pthread_rwlockattr_destroy (
a1 : access sys.qpthreadtypes.pthread_rwlockattr_t) return signed_int;
pragma Import (C, pthread_rwlockattr_destroy,
"pthread_rwlockattr_destroy");
function pthread_self return sys.qpthreadtypes.pthread_t;
pragma Import (C, pthread_self, "pthread_self");
function pthread_setspecific (a1 : sys.qpthreadtypes.pthread_key_t;
a2 : void_const_ptr) return signed_int;
pragma Import (C, pthread_setspecific, "pthread_setspecific");
function pthread_spin_init (
a1 : access sys.qpthreadtypes.pthread_spinlock_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_spin_init, "pthread_spin_init");
function pthread_spin_destroy (
a1 : access sys.qpthreadtypes.pthread_spinlock_t) return signed_int;
pragma Import (C, pthread_spin_destroy, "pthread_spin_destroy");
function pthread_spin_lock (
a1 : access sys.qpthreadtypes.pthread_spinlock_t) return signed_int;
pragma Import (C, pthread_spin_lock, "pthread_spin_lock");
function pthread_spin_trylock (
a1 : access sys.qpthreadtypes.pthread_spinlock_t) return signed_int;
pragma Import (C, pthread_spin_trylock, "pthread_spin_trylock");
function pthread_spin_unlock (
a1 : access sys.qpthreadtypes.pthread_spinlock_t) return signed_int;
pragma Import (C, pthread_spin_unlock, "pthread_spin_unlock");
function pthread_cancel (a1 : access sys.qpthreadtypes.struct_pthread)
return signed_int;
pragma Import (C, pthread_cancel, "pthread_cancel");
function pthread_setcancelstate (a1 : signed_int; a2 : access signed_int)
return signed_int;
pragma Import (C, pthread_setcancelstate, "pthread_setcancelstate");
function pthread_setcanceltype (a1 : signed_int; a2 : access signed_int)
return signed_int;
pragma Import (C, pthread_setcanceltype, "pthread_setcanceltype");
procedure pthread_testcancel;
pragma Import (C, pthread_testcancel, "pthread_testcancel");
function pthread_getprio (a1 : access sys.qpthreadtypes.struct_pthread)
return signed_int;
pragma Import (C, pthread_getprio, "pthread_getprio");
function pthread_setprio (a1 : access sys.qpthreadtypes.struct_pthread;
a2 : signed_int) return signed_int;
pragma Import (C, pthread_setprio, "pthread_setprio");
procedure pthread_yield;
pragma Import (C, pthread_yield, "pthread_yield");
function pthread_mutexattr_getprioceiling (
a1 : access sys.qpthreadtypes.pthread_mutexattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_mutexattr_getprioceiling,
"pthread_mutexattr_getprioceiling");
function pthread_mutexattr_setprioceiling (
a1 : access sys.qpthreadtypes.pthread_mutexattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_mutexattr_setprioceiling,
"pthread_mutexattr_setprioceiling");
function pthread_mutex_getprioceiling (
a1 : access sys.qpthreadtypes.pthread_mutex_t; a2 : access signed_int)
return signed_int;
pragma Import (C, pthread_mutex_getprioceiling,
"pthread_mutex_getprioceiling");
function pthread_mutex_setprioceiling (
a1 : access sys.qpthreadtypes.pthread_mutex_t; a2 : signed_int;
a3 : access signed_int) return signed_int;
pragma Import (C, pthread_mutex_setprioceiling,
"pthread_mutex_setprioceiling");
function pthread_mutexattr_getprotocol (
a1 : access sys.qpthreadtypes.pthread_mutexattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_mutexattr_getprotocol,
"pthread_mutexattr_getprotocol");
function pthread_mutexattr_setprotocol (
a1 : access sys.qpthreadtypes.pthread_mutexattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_mutexattr_setprotocol,
"pthread_mutexattr_setprotocol");
function pthread_attr_getinheritsched (
a1 : access constant sys.qpthreadtypes.pthread_attr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_attr_getinheritsched,
"pthread_attr_getinheritsched");
function pthread_attr_getschedparam (
a1 : access constant sys.qpthreadtypes.pthread_attr_t;
a2 : access sched.struct_sched_param) return signed_int;
pragma Import (C, pthread_attr_getschedparam,
"pthread_attr_getschedparam");
function pthread_attr_getschedpolicy (
a1 : access constant sys.qpthreadtypes.pthread_attr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_attr_getschedpolicy,
"pthread_attr_getschedpolicy");
function pthread_attr_getscope (
a1 : access constant sys.qpthreadtypes.pthread_attr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_attr_getscope, "pthread_attr_getscope");
function pthread_attr_setinheritsched (
a1 : access sys.qpthreadtypes.pthread_attr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_attr_setinheritsched,
"pthread_attr_setinheritsched");
function pthread_attr_setschedparam (
a1 : access sys.qpthreadtypes.pthread_attr_t;
a2 : access constant sched.struct_sched_param) return signed_int;
pragma Import (C, pthread_attr_setschedparam,
"pthread_attr_setschedparam");
function pthread_attr_setschedpolicy (
a1 : access sys.qpthreadtypes.pthread_attr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_attr_setschedpolicy,
"pthread_attr_setschedpolicy");
function pthread_attr_setscope (
a1 : access sys.qpthreadtypes.pthread_attr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_attr_setscope, "pthread_attr_setscope");
function pthread_getschedparam (
pthread : access sys.qpthreadtypes.struct_pthread;
a2 : access signed_int; a3 : access sched.struct_sched_param)
return signed_int;
pragma Import (C, pthread_getschedparam, "pthread_getschedparam");
function pthread_setschedparam (
a1 : access sys.qpthreadtypes.struct_pthread; a2 : signed_int;
a3 : access constant sched.struct_sched_param) return signed_int;
pragma Import (C, pthread_setschedparam, "pthread_setschedparam");
function pthread_getconcurrency return signed_int;
pragma Import (C, pthread_getconcurrency, "pthread_getconcurrency");
function pthread_setconcurrency (a1 : signed_int) return signed_int;
pragma Import (C, pthread_setconcurrency, "pthread_setconcurrency");
procedure pthread_cleanup_push_imp (a1 : access_9f60b0f8; a2 : void_ptr;
a3 : access struct_pthread_cleanup_info);
pragma Import (C, pthread_cleanup_push_imp, "__pthread_cleanup_push_imp");
procedure pthread_cleanup_pop_imp (a1 : signed_int);
pragma Import (C, pthread_cleanup_pop_imp, "__pthread_cleanup_pop_imp");
function PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP (Value : signed_int := 1)
return sys.qpthreadtypes.pthread_mutex_t renames Cast;
PTHREAD_BARRIER_SERIAL_THREAD : constant := -1;
PTHREAD_CANCELED : constant void_ptr := void_ptr (System'To_Address (1));
PTHREAD_CANCEL_ASYNCHRONOUS : constant := 2;
PTHREAD_CANCEL_DEFERRED : constant := 0;
PTHREAD_CANCEL_DISABLE : constant := 1;
PTHREAD_CANCEL_ENABLE : constant := 0;
PTHREAD_COND_INITIALIZER : constant sys.qpthreadtypes.pthread_cond_t :=
null;
PTHREAD_CREATE_DETACHED : constant := 1;
PTHREAD_CREATE_JOINABLE : constant := 0;
PTHREAD_DESTRUCTOR_ITERATIONS : constant := 4;
PTHREAD_DETACHED : constant := 1;
PTHREAD_DONE_INIT : constant := 1;
PTHREAD_EXPLICIT_SCHED : constant := 0;
PTHREAD_INHERIT_SCHED : constant := 4;
PTHREAD_KEYS_MAX : constant := 256;
PTHREAD_MUTEX_DEFAULT : constant enum_pthread_mutextype :=
PTHREAD_MUTEX_ERRORCHECK;
PTHREAD_MUTEX_INITIALIZER : constant sys.qpthreadtypes.pthread_mutex_t :=
null;
PTHREAD_NEEDS_INIT : constant := 0;
PTHREAD_NOFLOAT : constant := 8;
PTHREAD_ONCE_INIT : constant sys.qpthreadtypes.struct_pthread_once := (
state => 0, mutex => null);
PTHREAD_PRIO_INHERIT : constant := 1;
PTHREAD_PRIO_NONE : constant := 0;
PTHREAD_PRIO_PROTECT : constant := 2;
PTHREAD_PROCESS_PRIVATE : constant := 0;
PTHREAD_PROCESS_SHARED : constant := 1;
PTHREAD_RWLOCK_INITIALIZER : constant
sys.qpthreadtypes.pthread_rwlock_t := null;
PTHREAD_SCOPE_PROCESS : constant := 0;
PTHREAD_SCOPE_SYSTEM : constant := 2;
PTHREAD_STACK_MIN : constant := 2048;
PTHREAD_THREADS_MAX : constant := 4294967295;
-- _PTHREAD_H_ (empty)
pthread_attr_default : constant void_ptr := void_ptr (System'To_Address (
0));
-- pthread_cleanup_pop (unparsible)
-- pthread_cleanup_push (unparsible)
pthread_condattr_default : constant void_ptr := void_ptr (
System'To_Address (0));
pthread_mutexattr_default : constant void_ptr := void_ptr (
System'To_Address (0));
end C.pthread;
Raw
c-pthread_np.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.sys.cpuset;
with C.sys.qpthreadtypes;
with C.sys.timespec;
package C.pthread_np is
pragma Preelaborate;
type access_78dba53f is access procedure (
a1 : access sys.qpthreadtypes.struct_pthread;
a2 : access sys.qpthreadtypes.struct_pthread);
pragma Convention (C, access_78dba53f);
subtype pthread_switch_routine_t is access_78dba53f;
function pthread_attr_setcreatesuspend_np (
a1 : access sys.qpthreadtypes.pthread_attr_t) return signed_int;
pragma Import (C, pthread_attr_setcreatesuspend_np,
"pthread_attr_setcreatesuspend_np");
function pthread_attr_get_np (
a1 : access sys.qpthreadtypes.struct_pthread;
a2 : access sys.qpthreadtypes.pthread_attr_t) return signed_int;
pragma Import (C, pthread_attr_get_np, "pthread_attr_get_np");
function pthread_attr_getaffinity_np (
a1 : access constant sys.qpthreadtypes.pthread_attr_t;
a2 : stddef.size_t; a3 : access sys.cpuset.cpuset_t) return signed_int;
pragma Import (C, pthread_attr_getaffinity_np,
"pthread_attr_getaffinity_np");
function pthread_attr_setaffinity_np (
a1 : access sys.qpthreadtypes.pthread_attr_t; a2 : stddef.size_t;
a3 : access constant sys.cpuset.cpuset_t) return signed_int;
pragma Import (C, pthread_attr_setaffinity_np,
"pthread_attr_setaffinity_np");
function pthread_getaffinity_np (
a1 : access sys.qpthreadtypes.struct_pthread; a2 : stddef.size_t;
a3 : access sys.cpuset.cpuset_t) return signed_int;
pragma Import (C, pthread_getaffinity_np, "pthread_getaffinity_np");
function pthread_main_np return signed_int;
pragma Import (C, pthread_main_np, "pthread_main_np");
function pthread_multi_np return signed_int;
pragma Import (C, pthread_multi_np, "pthread_multi_np");
function pthread_mutexattr_getkind_np (
a1 : access sys.qpthreadtypes.struct_pthread_mutex_attr)
return signed_int;
pragma Import (C, pthread_mutexattr_getkind_np,
"pthread_mutexattr_getkind_np");
function pthread_mutexattr_setkind_np (
a1 : access sys.qpthreadtypes.pthread_mutexattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_mutexattr_setkind_np,
"pthread_mutexattr_setkind_np");
procedure pthread_resume_all_np;
pragma Import (C, pthread_resume_all_np, "pthread_resume_all_np");
function pthread_resume_np (a1 : access sys.qpthreadtypes.struct_pthread)
return signed_int;
pragma Import (C, pthread_resume_np, "pthread_resume_np");
procedure pthread_set_name_np (
a1 : access sys.qpthreadtypes.struct_pthread;
a2 : access constant char);
pragma Import (C, pthread_set_name_np, "pthread_set_name_np");
function pthread_mutex_getspinloops_np (
mutex : access sys.qpthreadtypes.pthread_mutex_t;
count : access signed_int) return signed_int;
pragma Import (C, pthread_mutex_getspinloops_np,
"pthread_mutex_getspinloops_np");
function pthread_mutex_setspinloops_np (
mutex : access sys.qpthreadtypes.pthread_mutex_t; count : signed_int)
return signed_int;
pragma Import (C, pthread_mutex_setspinloops_np,
"pthread_mutex_setspinloops_np");
function pthread_mutex_getyieldloops_np (
mutex : access sys.qpthreadtypes.pthread_mutex_t;
count : access signed_int) return signed_int;
pragma Import (C, pthread_mutex_getyieldloops_np,
"pthread_mutex_getyieldloops_np");
function pthread_mutex_setyieldloops_np (
mutex : access sys.qpthreadtypes.pthread_mutex_t; count : signed_int)
return signed_int;
pragma Import (C, pthread_mutex_setyieldloops_np,
"pthread_mutex_setyieldloops_np");
function pthread_mutex_isowned_np (
mutex : access sys.qpthreadtypes.pthread_mutex_t) return signed_int;
pragma Import (C, pthread_mutex_isowned_np, "pthread_mutex_isowned_np");
function pthread_setaffinity_np (
a1 : access sys.qpthreadtypes.struct_pthread; a2 : stddef.size_t;
a3 : access constant sys.cpuset.cpuset_t) return signed_int;
pragma Import (C, pthread_setaffinity_np, "pthread_setaffinity_np");
function pthread_single_np return signed_int;
pragma Import (C, pthread_single_np, "pthread_single_np");
procedure pthread_suspend_all_np;
pragma Import (C, pthread_suspend_all_np, "pthread_suspend_all_np");
function pthread_suspend_np (a1 : access sys.qpthreadtypes.struct_pthread)
return signed_int;
pragma Import (C, pthread_suspend_np, "pthread_suspend_np");
function pthread_switch_add_np (a1 : pthread_switch_routine_t)
return signed_int;
pragma Import (C, pthread_switch_add_np, "pthread_switch_add_np");
function pthread_switch_delete_np (a1 : pthread_switch_routine_t)
return signed_int;
pragma Import (C, pthread_switch_delete_np, "pthread_switch_delete_np");
function pthread_timedjoin_np (
a1 : access sys.qpthreadtypes.struct_pthread; a2 : access void_ptr;
a3 : access constant sys.timespec.struct_timespec) return signed_int;
pragma Import (C, pthread_timedjoin_np, "pthread_timedjoin_np");
-- _PTHREAD_NP_H_ (empty)
end C.pthread_np;
Raw
c-pwd.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.sys.types;
package C.pwd is
pragma Preelaborate;
type struct_passwd;
type struct_passwd is record
pw_name : aliased char_ptr;
pw_passwd : aliased char_ptr;
pw_uid : aliased sys.types.uid_t;
pw_gid : aliased sys.types.gid_t;
pw_change : aliased sys.types.time_t;
pw_class : aliased char_ptr;
pw_gecos : aliased char_ptr;
pw_dir : aliased char_ptr;
pw_shell : aliased char_ptr;
pw_expire : aliased sys.types.time_t;
pw_fields : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_passwd);
type struct_passwd_ptr is access all struct_passwd;
for struct_passwd_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_passwd_ptr);
pragma Convention (C, struct_passwd_ptr);
type struct_passwd_ptr_ptr is access all struct_passwd_ptr;
for struct_passwd_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_passwd_ptr_ptr);
pragma Convention (C, struct_passwd_ptr_ptr);
function getpwnam (a1 : access constant char) return struct_passwd_ptr;
pragma Import (C, getpwnam, "getpwnam");
function getpwuid (a1 : sys.types.uid_t) return struct_passwd_ptr;
pragma Import (C, getpwuid, "getpwuid");
procedure endpwent;
pragma Import (C, endpwent, "endpwent");
function getpwent return struct_passwd_ptr;
pragma Import (C, getpwent, "getpwent");
procedure setpwent;
pragma Import (C, setpwent, "setpwent");
function getpwnam_r (a1 : access constant char; a2 : access struct_passwd;
a3 : access char; a4 : stddef.size_t; a5 : access struct_passwd_ptr)
return signed_int;
pragma Import (C, getpwnam_r, "getpwnam_r");
function getpwuid_r (a1 : sys.types.uid_t; a2 : access struct_passwd;
a3 : access char; a4 : stddef.size_t; a5 : access struct_passwd_ptr)
return signed_int;
pragma Import (C, getpwuid_r, "getpwuid_r");
function getpwent_r (a1 : access struct_passwd; a2 : access char;
a3 : stddef.size_t; a4 : access struct_passwd_ptr) return signed_int;
pragma Import (C, getpwent_r, "getpwent_r");
function setpassent (a1 : signed_int) return signed_int;
pragma Import (C, setpassent, "setpassent");
function user_from_uid (a1 : sys.types.uid_t; a2 : signed_int)
return char_const_ptr;
pragma Import (C, user_from_uid, "user_from_uid");
MASTERPASSWD : constant char_array (0 .. 13) := "master.passwd"
& char'Val (0);
MP_DB : constant char_array (0 .. 6) := "pwd.db" & char'Val (0);
PASSWD : constant char_array (0 .. 6) := "passwd" & char'Val (0);
PASSWORD_EFMT1 : constant char := '_';
PASSWORD_LEN : constant := 128;
PATH_MASTERPASSWD : constant char_array (0 .. 18) := "/etc/master.passwd"
& char'Val (0);
PATH_MP_DB : constant char_array (0 .. 11) := "/etc/pwd.db"
& char'Val (0);
PATH_PASSWD : constant char_array (0 .. 11) := "/etc/passwd"
& char'Val (0);
PATH_PWD : constant char_array (0 .. 4) := "/etc" & char'Val (0);
PATH_PWD_MKDB : constant char_array (0 .. 18) := "/usr/sbin/pwd_mkdb"
& char'Val (0);
PATH_SMP_DB : constant char_array (0 .. 12) := "/etc/spwd.db"
& char'Val (0);
PWD_CURRENT_VERSION : constant char := char'Val (4);
-- _PWD_H_ (empty)
PWD_VERSION_KEY : constant char_array (0 .. 8) := char'Val (255)
& "VERSION" & char'Val (0);
-- _PWF (function macro)
PWF_CHANGE : constant := 16;
PWF_CLASS : constant := 32;
PWF_DIR : constant := 128;
PWF_EXPIRE : constant := 512;
PWF_FILES : constant := 4096;
PWF_GECOS : constant := 64;
PWF_GID : constant := 8;
PWF_HESIOD : constant := 12288;
PWF_NAME : constant := 1;
PWF_NIS : constant := 8192;
PWF_PASSWD : constant := 2;
PWF_SHELL : constant := 256;
PWF_SOURCE : constant := 12288;
PWF_UID : constant := 4;
PW_KEYBYNAME : constant char := '1';
PW_KEYBYNUM : constant char := '2';
PW_KEYBYUID : constant char := '3';
PW_KEYYPBYNUM : constant char := '5';
PW_KEYYPENABLED : constant char := '4';
-- _PW_VERSIONED (function macro)
PW_VERSION_MASK : constant char := char'Val (240);
SMP_DB : constant char_array (0 .. 7) := "spwd.db" & char'Val (0);
end C.pwd;
Raw
c-qctype.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.qtypes;
package C.qctype is
pragma Preelaborate;
function runetype (a1 : sys.qtypes.ct_rune_t) return unsigned_long;
pragma Import (C, runetype, "___runetype");
function qqqtolower (a1 : sys.qtypes.ct_rune_t)
return sys.qtypes.ct_rune_t;
pragma Import (C, qqqtolower, "___tolower");
function qqqtoupper (a1 : sys.qtypes.ct_rune_t)
return sys.qtypes.ct_rune_t;
pragma Import (C, qqqtoupper, "___toupper");
mb_sb_limit : aliased signed_int;
pragma Import (C, mb_sb_limit, "__mb_sb_limit");
function maskrune (a1 : sys.qtypes.ct_rune_t; a2 : unsigned_long)
return signed_int;
pragma Import (C, maskrune, "__maskrune");
function sbmaskrune (a1 : sys.qtypes.ct_rune_t; a2 : unsigned_long)
return signed_int;
pragma Import (C, sbmaskrune, "__sbmaskrune");
function istype (a1 : sys.qtypes.ct_rune_t; a2 : unsigned_long)
return signed_int;
pragma Import (C, istype, "__istype");
function sbistype (a1 : sys.qtypes.ct_rune_t; a2 : unsigned_long)
return signed_int;
pragma Import (C, sbistype, "__sbistype");
function isctype (a1 : sys.qtypes.ct_rune_t; a2 : unsigned_long)
return signed_int;
pragma Import (C, isctype, "__isctype");
function toupper (a1 : sys.qtypes.ct_rune_t) return sys.qtypes.ct_rune_t;
pragma Import (C, toupper, "__toupper");
function sbtoupper (a1 : sys.qtypes.ct_rune_t)
return sys.qtypes.ct_rune_t;
pragma Import (C, sbtoupper, "__sbtoupper");
function tolower (a1 : sys.qtypes.ct_rune_t) return sys.qtypes.ct_rune_t;
pragma Import (C, tolower, "__tolower");
function sbtolower (a1 : sys.qtypes.ct_rune_t)
return sys.qtypes.ct_rune_t;
pragma Import (C, sbtolower, "__sbtolower");
function wcwidth (a1 : sys.qtypes.ct_rune_t) return signed_int;
pragma Import (C, wcwidth, "__wcwidth");
CTYPE_A : constant := 256;
CTYPE_B : constant := 131072;
CTYPE_C : constant := 512;
CTYPE_D : constant := 1024;
CTYPE_G : constant := 2048;
CTYPE_I : constant := 524288;
CTYPE_L : constant := 4096;
CTYPE_P : constant := 8192;
CTYPE_Q : constant := 2097152;
CTYPE_R : constant := 262144;
CTYPE_S : constant := 16384;
CTYPE_SW0 : constant := 536870912;
CTYPE_SW1 : constant := 1073741824;
CTYPE_SW2 : constant := -2147483648;
CTYPE_SW3 : constant := -1073741824;
CTYPE_SWM : constant := -536870912;
CTYPE_SWS : constant := 30;
CTYPE_T : constant := 1048576;
CTYPE_U : constant := 32768;
CTYPE_X : constant := 65536;
-- __CTYPE_H_ (empty)
end C.qctype;
Raw
c-sched.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.timespec;
with C.sys.types;
package C.sched is
pragma Preelaborate;
type struct_sched_param;
type struct_sched_param is record
sched_priority : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_sched_param);
type struct_sched_param_ptr is access all struct_sched_param;
for struct_sched_param_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sched_param_ptr);
pragma Convention (C, struct_sched_param_ptr);
type struct_sched_param_const_ptr is access constant struct_sched_param;
for struct_sched_param_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sched_param_const_ptr);
pragma Convention (C, struct_sched_param_const_ptr);
function sched_get_priority_max (a1 : signed_int) return signed_int;
pragma Import (C, sched_get_priority_max, "sched_get_priority_max");
function sched_get_priority_min (a1 : signed_int) return signed_int;
pragma Import (C, sched_get_priority_min, "sched_get_priority_min");
function sched_getparam (a1 : sys.types.pid_t;
a2 : access struct_sched_param) return signed_int;
pragma Import (C, sched_getparam, "sched_getparam");
function sched_getscheduler (a1 : sys.types.pid_t) return signed_int;
pragma Import (C, sched_getscheduler, "sched_getscheduler");
function sched_rr_get_interval (a1 : sys.types.pid_t;
a2 : access sys.timespec.struct_timespec) return signed_int;
pragma Import (C, sched_rr_get_interval, "sched_rr_get_interval");
function sched_setparam (a1 : sys.types.pid_t;
a2 : access constant struct_sched_param) return signed_int;
pragma Import (C, sched_setparam, "sched_setparam");
function sched_setscheduler (a1 : sys.types.pid_t; a2 : signed_int;
a3 : access constant struct_sched_param) return signed_int;
pragma Import (C, sched_setscheduler, "sched_setscheduler");
function sched_yield return signed_int;
pragma Import (C, sched_yield, "sched_yield");
SCHED_FIFO : constant := 1;
SCHED_OTHER : constant := 2;
SCHED_RR : constant := 3;
-- _SCHED_H_ (empty)
end C.sched;
Raw
c-signal.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.qpthreadtypes;
with C.sys.qsigset;
with C.sys.qtimeval;
with C.sys.qtypes;
with C.sys.select_h;
with C.sys.signal;
with C.sys.timespec;
with C.sys.ucontext;
package C.signal is
pragma Preelaborate;
subtype qqfd_mask_array32 is sys.select_h.qqfd_mask_array (0 .. 31);
subtype qqfd_mask is sys.select_h.qqfd_mask;
subtype fd_mask is sys.select_h.fd_mask;
subtype sigset_t is sys.select_h.sigset_t;
subtype struct_fd_set is sys.select_h.struct_fd_set;
subtype fd_set is sys.select_h.fd_set;
function pselect (a1 : signed_int; a2 : access sys.select_h.fd_set;
a3 : access sys.select_h.fd_set; a4 : access sys.select_h.fd_set;
a5 : access constant sys.timespec.struct_timespec;
a6 : access constant sys.select_h.sigset_t) return signed_int
renames sys.select_h.pselect;
function C_select (a1 : signed_int; a2 : access sys.select_h.fd_set;
a3 : access sys.select_h.fd_set; a4 : access sys.select_h.fd_set;
a5 : access sys.qtimeval.struct_timeval) return signed_int
renames sys.select_h.C_select;
-- FD_CLR renames sys.select_h.FD_CLR (uninterpretable)
-- FD_COPY renames sys.select_h.FD_COPY (function macro)
-- FD_ISSET renames sys.select_h.FD_ISSET (uninterpretable)
-- FD_SET renames sys.select_h.FD_SET (uninterpretable)
FD_SETSIZE : constant := sys.select_h.FD_SETSIZE;
-- FD_ZERO renames sys.select_h.FD_ZERO (function macro)
NFDBITS : constant := sys.select_h.NFDBITS;
qNFDBITS : constant := sys.select_h.qNFDBITS;
-- SELECT_DECLARED renames sys.select_h.SELECT_DECLARED (empty)
-- SIGSET_T_DECLARED renames sys.select_h.SIGSET_T_DECLARED (empty)
-- SYS_SELECT_H renames sys.select_h.SYS_SELECT_H (empty)
-- fdset_mask renames sys.select_h.fdset_mask (function macro)
-- howmany renames sys.select_h.howmany (function macro)
-- .fds_bits renames .__fds_bits (accessor)
-- subtype sighandler_t is ... (function type)
subtype union_sigval is sys.signal.union_sigval;
subtype struct_sigevent is sys.signal.struct_sigevent;
subtype struct_siginfo is sys.signal.struct_siginfo;
subtype siginfo_t is sys.signal.siginfo_t;
subtype struct_sigaction is sys.signal.struct_sigaction;
subtype sig_t is sys.signal.sig_t;
-- subtype siginfohandler_t is ... (function type)
subtype struct_sigaltstack is sys.signal.struct_sigaltstack;
subtype stack_t is sys.signal.stack_t;
subtype struct_sigvec is sys.signal.struct_sigvec;
subtype struct_sigstack is sys.signal.struct_sigstack;
function signal (a1 : signed_int; a2 : sys.signal.sighandler_t_ptr)
return sys.signal.sighandler_t_ptr renames sys.signal.signal;
function BADSIG (Value : signed_int := -1)
return sys.signal.sighandler_t_ptr renames sys.signal.BADSIG;
BUS_ADRALN : constant := sys.signal.BUS_ADRALN;
BUS_ADRERR : constant := sys.signal.BUS_ADRERR;
BUS_OBJERR : constant := sys.signal.BUS_OBJERR;
CLD_CONTINUED : constant := sys.signal.CLD_CONTINUED;
CLD_DUMPED : constant := sys.signal.CLD_DUMPED;
CLD_EXITED : constant := sys.signal.CLD_EXITED;
CLD_KILLED : constant := sys.signal.CLD_KILLED;
CLD_STOPPED : constant := sys.signal.CLD_STOPPED;
CLD_TRAPPED : constant := sys.signal.CLD_TRAPPED;
FPE_FLTDIV : constant := sys.signal.FPE_FLTDIV;
FPE_FLTINV : constant := sys.signal.FPE_FLTINV;
FPE_FLTOVF : constant := sys.signal.FPE_FLTOVF;
FPE_FLTRES : constant := sys.signal.FPE_FLTRES;
FPE_FLTSUB : constant := sys.signal.FPE_FLTSUB;
FPE_FLTUND : constant := sys.signal.FPE_FLTUND;
FPE_INTDIV : constant := sys.signal.FPE_INTDIV;
FPE_INTOVF : constant := sys.signal.FPE_INTOVF;
ILL_BADSTK : constant := sys.signal.ILL_BADSTK;
ILL_COPROC : constant := sys.signal.ILL_COPROC;
ILL_ILLADR : constant := sys.signal.ILL_ILLADR;
ILL_ILLOPC : constant := sys.signal.ILL_ILLOPC;
ILL_ILLOPN : constant := sys.signal.ILL_ILLOPN;
ILL_ILLTRP : constant := sys.signal.ILL_ILLTRP;
ILL_PRVOPC : constant := sys.signal.ILL_PRVOPC;
ILL_PRVREG : constant := sys.signal.ILL_PRVREG;
MINSIGSTKSZ : constant := sys.signal.MINSIGSTKSZ;
NSIG : constant := sys.signal.NSIG;
POLL_ERR : constant := sys.signal.POLL_ERR;
POLL_HUP : constant := sys.signal.POLL_HUP;
POLL_IN : constant := sys.signal.POLL_IN;
POLL_MSG : constant := sys.signal.POLL_MSG;
POLL_OUT : constant := sys.signal.POLL_OUT;
POLL_PRI : constant := sys.signal.POLL_PRI;
SA_NOCLDSTOP : constant := sys.signal.SA_NOCLDSTOP;
SA_NOCLDWAIT : constant := sys.signal.SA_NOCLDWAIT;
SA_NODEFER : constant := sys.signal.SA_NODEFER;
SA_ONSTACK : constant := sys.signal.SA_ONSTACK;
SA_RESETHAND : constant := sys.signal.SA_RESETHAND;
SA_RESTART : constant := sys.signal.SA_RESTART;
SA_SIGINFO : constant := sys.signal.SA_SIGINFO;
SEGV_ACCERR : constant := sys.signal.SEGV_ACCERR;
SEGV_MAPERR : constant := sys.signal.SEGV_MAPERR;
SIGABRT : constant := sys.signal.SIGABRT;
SIGALRM : constant := sys.signal.SIGALRM;
SIGBUS : constant := sys.signal.SIGBUS;
SIGCHLD : constant := sys.signal.SIGCHLD;
SIGCONT : constant := sys.signal.SIGCONT;
SIGEMT : constant := sys.signal.SIGEMT;
SIGEV_KEVENT : constant := sys.signal.SIGEV_KEVENT;
SIGEV_NONE : constant := sys.signal.SIGEV_NONE;
SIGEV_SIGNAL : constant := sys.signal.SIGEV_SIGNAL;
SIGEV_THREAD : constant := sys.signal.SIGEV_THREAD;
SIGEV_THREAD_ID : constant := sys.signal.SIGEV_THREAD_ID;
SIGFPE : constant := sys.signal.SIGFPE;
SIGHUP : constant := sys.signal.SIGHUP;
SIGILL : constant := sys.signal.SIGILL;
SIGINFO : constant := sys.signal.SIGINFO;
SIGINT : constant := sys.signal.SIGINT;
SIGIO : constant := sys.signal.SIGIO;
SIGIOT : constant := sys.signal.SIGIOT;
SIGKILL : constant := sys.signal.SIGKILL;
SIGLWP : constant := sys.signal.SIGLWP;
SIGPIPE : constant := sys.signal.SIGPIPE;
SIGPROF : constant := sys.signal.SIGPROF;
SIGQUIT : constant := sys.signal.SIGQUIT;
SIGRTMAX : constant := sys.signal.SIGRTMAX;
SIGRTMIN : constant := sys.signal.SIGRTMIN;
SIGSEGV : constant := sys.signal.SIGSEGV;
SIGSTKSZ : constant := sys.signal.SIGSTKSZ;
SIGSTOP : constant := sys.signal.SIGSTOP;
SIGSYS : constant := sys.signal.SIGSYS;
SIGTERM : constant := sys.signal.SIGTERM;
SIGTHR : constant := sys.signal.SIGTHR;
SIGTRAP : constant := sys.signal.SIGTRAP;
SIGTSTP : constant := sys.signal.SIGTSTP;
SIGTTIN : constant := sys.signal.SIGTTIN;
SIGTTOU : constant := sys.signal.SIGTTOU;
SIGURG : constant := sys.signal.SIGURG;
SIGUSR1 : constant := sys.signal.SIGUSR1;
SIGUSR2 : constant := sys.signal.SIGUSR2;
SIGVTALRM : constant := sys.signal.SIGVTALRM;
SIGWINCH : constant := sys.signal.SIGWINCH;
SIGXCPU : constant := sys.signal.SIGXCPU;
SIGXFSZ : constant := sys.signal.SIGXFSZ;
SIG_BLOCK : constant := sys.signal.SIG_BLOCK;
SIG_DFL : sys.signal.sighandler_t_ptr renames sys.signal.SIG_DFL;
function SIG_ERR (Value : signed_int := -1)
return sys.signal.sighandler_t_ptr renames sys.signal.SIG_ERR;
function SIG_HOLD (Value : signed_int := 3)
return sys.signal.sighandler_t_ptr renames sys.signal.SIG_HOLD;
function SIG_IGN (Value : signed_int := 1)
return sys.signal.sighandler_t_ptr renames sys.signal.SIG_IGN;
SIG_SETMASK : constant := sys.signal.SIG_SETMASK;
SIG_UNBLOCK : constant := sys.signal.SIG_UNBLOCK;
SI_ASYNCIO : constant := sys.signal.SI_ASYNCIO;
SI_KERNEL : constant := sys.signal.SI_KERNEL;
SI_MESGQ : constant := sys.signal.SI_MESGQ;
SI_NOINFO : constant := sys.signal.SI_NOINFO;
SI_QUEUE : constant := sys.signal.SI_QUEUE;
SI_TIMER : constant := sys.signal.SI_TIMER;
SI_UNDEFINED : constant := sys.signal.SI_UNDEFINED;
SI_USER : constant := sys.signal.SI_USER;
SS_DISABLE : constant := sys.signal.SS_DISABLE;
SS_ONSTACK : constant := sys.signal.SS_ONSTACK;
SV_INTERRUPT : constant := sys.signal.SV_INTERRUPT;
SV_NOCLDSTOP : constant := sys.signal.SV_NOCLDSTOP;
SV_NODEFER : constant := sys.signal.SV_NODEFER;
SV_ONSTACK : constant := sys.signal.SV_ONSTACK;
SV_RESETHAND : constant := sys.signal.SV_RESETHAND;
SV_SIGINFO : constant := sys.signal.SV_SIGINFO;
TRAP_BRKPT : constant := sys.signal.TRAP_BRKPT;
TRAP_DTRACE : constant := sys.signal.TRAP_DTRACE;
TRAP_TRACE : constant := sys.signal.TRAP_TRACE;
-- SYS_SIGNAL_H renames sys.signal.SYS_SIGNAL_H (empty)
-- .sa_handler renames .__sigaction_u.__sa_handler (accessor)
-- .sa_sigaction renames .__sigaction_u.__sa_sigaction (accessor)
-- .si_band renames ._reason._poll._band (accessor)
-- .si_mqd renames ._reason._mesgq._mqd (accessor)
-- .si_overrun renames ._reason._timer._overrun (accessor)
-- .si_timerid renames ._reason._timer._timerid (accessor)
-- .si_trapno renames ._reason._fault._trapno (accessor)
-- .sigev_notify_attributes renames ._sigev_un._sigev_thread.... (accessor)
-- .sigev_notify_function renames ._sigev_un._sigev_thread._f... (accessor)
-- .sigev_notify_kqueue renames .sigev_signo (accessor)
-- .sigev_notify_thread_id renames ._sigev_un._threadid (accessor)
-- sigmask renames sys.signal.sigmask (function macro)
-- .sv_onstack renames .sv_flags (accessor)
sys_signame : aliased char_const_ptr_array (0 .. 31);
pragma Import (C, sys_signame, "sys_signame");
sys_siglist : aliased char_const_ptr_array (0 .. 31);
pragma Import (C, sys_siglist, "sys_siglist");
sys_nsig : aliased signed_int;
pragma Import (C, sys_nsig, "sys_nsig");
subtype pthread_t is sys.qpthreadtypes.struct_pthread_ptr;
function C_raise (a1 : signed_int) return signed_int;
pragma Import (C, C_raise, "raise");
function kill (a1 : sys.qtypes.pid_t; a2 : signed_int) return signed_int;
pragma Import (C, kill, "kill");
function pthread_kill (a1 : access sys.qpthreadtypes.struct_pthread;
a2 : signed_int) return signed_int;
pragma Import (C, pthread_kill, "pthread_kill");
function pthread_sigmask (a1 : signed_int;
a2 : access constant sys.qsigset.sigset_t;
a3 : access sys.qsigset.sigset_t) return signed_int;
pragma Import (C, pthread_sigmask, "pthread_sigmask");
function sigaction (a1 : signed_int;
a2 : access constant sys.signal.struct_sigaction;
a3 : access sys.signal.struct_sigaction) return signed_int;
pragma Import (C, sigaction, "sigaction");
function sigaddset (a1 : access sys.select_h.sigset_t; a2 : signed_int)
return signed_int;
pragma Import (C, sigaddset, "sigaddset");
function sigdelset (a1 : access sys.select_h.sigset_t; a2 : signed_int)
return signed_int;
pragma Import (C, sigdelset, "sigdelset");
function sigemptyset (a1 : access sys.select_h.sigset_t)
return signed_int;
pragma Import (C, sigemptyset, "sigemptyset");
function sigfillset (a1 : access sys.select_h.sigset_t) return signed_int;
pragma Import (C, sigfillset, "sigfillset");
function sigismember (a1 : access constant sys.select_h.sigset_t;
a2 : signed_int) return signed_int;
pragma Import (C, sigismember, "sigismember");
function sigpending (a1 : access sys.select_h.sigset_t) return signed_int;
pragma Import (C, sigpending, "sigpending");
function sigprocmask (a1 : signed_int;
a2 : access constant sys.select_h.sigset_t;
a3 : access sys.select_h.sigset_t) return signed_int;
pragma Import (C, sigprocmask, "sigprocmask");
function sigsuspend (a1 : access constant sys.select_h.sigset_t)
return signed_int;
pragma Import (C, sigsuspend, "sigsuspend");
function sigwait (a1 : access constant sys.select_h.sigset_t;
a2 : access signed_int) return signed_int;
pragma Import (C, sigwait, "sigwait");
function sigqueue (a1 : sys.qtypes.pid_t; a2 : signed_int;
a3 : sys.signal.union_sigval) return signed_int;
pragma Import (C, sigqueue, "sigqueue");
function sigtimedwait (a1 : access constant sys.select_h.sigset_t;
a2 : access sys.signal.siginfo_t;
a3 : access constant sys.timespec.struct_timespec) return signed_int;
pragma Import (C, sigtimedwait, "sigtimedwait");
function sigwaitinfo (a1 : access constant sys.select_h.sigset_t;
a2 : access sys.signal.siginfo_t) return signed_int;
pragma Import (C, sigwaitinfo, "sigwaitinfo");
function killpg (a1 : sys.qtypes.pid_t; a2 : signed_int)
return signed_int;
pragma Import (C, killpg, "killpg");
function sigaltstack (a1 : access constant sys.signal.stack_t;
a2 : access sys.signal.stack_t) return signed_int;
pragma Import (C, sigaltstack, "sigaltstack");
function sighold (a1 : signed_int) return signed_int;
pragma Import (C, sighold, "sighold");
function sigignore (a1 : signed_int) return signed_int;
pragma Import (C, sigignore, "sigignore");
function sigpause (a1 : signed_int) return signed_int;
pragma Import (C, sigpause, "sigpause");
function sigrelse (a1 : signed_int) return signed_int;
pragma Import (C, sigrelse, "sigrelse");
type access_51bb14fb is access procedure (a1 : signed_int);
pragma Convention (C, access_51bb14fb);
function sigset (a1 : signed_int; a2 : access_51bb14fb)
return access_51bb14fb;
pragma Import (C, sigset, "sigset");
function xsi_sigpause (a1 : signed_int) return signed_int;
pragma Import (C, xsi_sigpause, "xsi_sigpause");
function siginterrupt (a1 : signed_int; a2 : signed_int)
return signed_int;
pragma Import (C, siginterrupt, "siginterrupt");
procedure psignal (a1 : unsigned_int; a2 : access constant char);
pragma Import (C, psignal, "psignal");
function sigblock (a1 : signed_int) return signed_int;
pragma Import (C, sigblock, "sigblock");
function sigreturn (a1 : access constant sys.ucontext.struct_ucontext)
return signed_int;
pragma Import (C, sigreturn, "sigreturn");
function sigsetmask (a1 : signed_int) return signed_int;
pragma Import (C, sigsetmask, "sigsetmask");
function sigstack (a1 : access constant sys.signal.struct_sigstack;
a2 : access sys.signal.struct_sigstack) return signed_int;
pragma Import (C, sigstack, "sigstack");
function sigvec (a1 : signed_int; a2 : access sys.signal.struct_sigvec;
a3 : access sys.signal.struct_sigvec) return signed_int;
pragma Import (C, sigvec, "sigvec");
-- _SIGNAL_H_ (empty)
end C.signal;
Raw
c-spawn.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sched;
with C.sys.select_h;
with C.sys.types;
package C.spawn is
pragma Preelaborate;
type struct_posix_spawnattr (<>) is limited private;
type struct_posix_spawnattr_ptr is access all struct_posix_spawnattr;
for struct_posix_spawnattr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_posix_spawnattr_ptr);
pragma Convention (C, struct_posix_spawnattr_ptr);
type struct_posix_spawnattr_ptr_const_ptr is
access constant struct_posix_spawnattr_ptr;
for struct_posix_spawnattr_ptr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_posix_spawnattr_ptr_const_ptr);
pragma Convention (C, struct_posix_spawnattr_ptr_const_ptr);
type struct_posix_spawnattr_ptr_ptr is
access all struct_posix_spawnattr_ptr;
for struct_posix_spawnattr_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_posix_spawnattr_ptr_ptr);
pragma Convention (C, struct_posix_spawnattr_ptr_ptr);
subtype posix_spawnattr_t is struct_posix_spawnattr_ptr;
subtype posix_spawnattr_t_const_ptr is
struct_posix_spawnattr_ptr_const_ptr;
subtype posix_spawnattr_t_ptr is struct_posix_spawnattr_ptr_ptr;
type struct_posix_spawn_file_actions (<>) is limited private;
type struct_posix_spawn_file_actions_ptr is
access all struct_posix_spawn_file_actions;
for struct_posix_spawn_file_actions_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_posix_spawn_file_actions_ptr);
pragma Convention (C, struct_posix_spawn_file_actions_ptr);
type struct_posix_spawn_file_actions_ptr_const_ptr is
access constant struct_posix_spawn_file_actions_ptr;
for struct_posix_spawn_file_actions_ptr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_posix_spawn_file_actions_ptr_const_ptr);
pragma Convention (C, struct_posix_spawn_file_actions_ptr_const_ptr);
type struct_posix_spawn_file_actions_ptr_ptr is
access all struct_posix_spawn_file_actions_ptr;
for struct_posix_spawn_file_actions_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_posix_spawn_file_actions_ptr_ptr);
pragma Convention (C, struct_posix_spawn_file_actions_ptr_ptr);
subtype posix_spawn_file_actions_t is struct_posix_spawn_file_actions_ptr;
subtype posix_spawn_file_actions_t_const_ptr is
struct_posix_spawn_file_actions_ptr_const_ptr;
subtype posix_spawn_file_actions_t_ptr is
struct_posix_spawn_file_actions_ptr_ptr;
function posix_spawn (a1 : access sys.types.pid_t;
a2 : access constant char;
a3 : access constant posix_spawn_file_actions_t;
a4 : access constant posix_spawnattr_t; a5 : access char_ptr;
a6 : access char_ptr) return signed_int;
pragma Import (C, posix_spawn, "posix_spawn");
function posix_spawnp (a1 : access sys.types.pid_t;
a2 : access constant char;
a3 : access constant posix_spawn_file_actions_t;
a4 : access constant posix_spawnattr_t; a5 : access char_ptr;
a6 : access char_ptr) return signed_int;
pragma Import (C, posix_spawnp, "posix_spawnp");
function posix_spawn_file_actions_init (
a1 : access posix_spawn_file_actions_t) return signed_int;
pragma Import (C, posix_spawn_file_actions_init,
"posix_spawn_file_actions_init");
function posix_spawn_file_actions_destroy (
a1 : access posix_spawn_file_actions_t) return signed_int;
pragma Import (C, posix_spawn_file_actions_destroy,
"posix_spawn_file_actions_destroy");
function posix_spawn_file_actions_addopen (
a1 : access posix_spawn_file_actions_t; a2 : signed_int;
a3 : access constant char; a4 : signed_int; a5 : sys.types.mode_t)
return signed_int;
pragma Import (C, posix_spawn_file_actions_addopen,
"posix_spawn_file_actions_addopen");
function posix_spawn_file_actions_adddup2 (
a1 : access posix_spawn_file_actions_t; a2 : signed_int;
a3 : signed_int) return signed_int;
pragma Import (C, posix_spawn_file_actions_adddup2,
"posix_spawn_file_actions_adddup2");
function posix_spawn_file_actions_addclose (
a1 : access posix_spawn_file_actions_t; a2 : signed_int)
return signed_int;
pragma Import (C, posix_spawn_file_actions_addclose,
"posix_spawn_file_actions_addclose");
function posix_spawnattr_init (a1 : access posix_spawnattr_t)
return signed_int;
pragma Import (C, posix_spawnattr_init, "posix_spawnattr_init");
function posix_spawnattr_destroy (a1 : access posix_spawnattr_t)
return signed_int;
pragma Import (C, posix_spawnattr_destroy, "posix_spawnattr_destroy");
function posix_spawnattr_getflags (a1 : access constant posix_spawnattr_t;
a2 : access signed_short) return signed_int;
pragma Import (C, posix_spawnattr_getflags, "posix_spawnattr_getflags");
function posix_spawnattr_getpgroup (
a1 : access constant posix_spawnattr_t; a2 : access sys.types.pid_t)
return signed_int;
pragma Import (C, posix_spawnattr_getpgroup, "posix_spawnattr_getpgroup");
function posix_spawnattr_getschedparam (
a1 : access constant posix_spawnattr_t;
a2 : access sched.struct_sched_param) return signed_int;
pragma Import (C, posix_spawnattr_getschedparam,
"posix_spawnattr_getschedparam");
function posix_spawnattr_getschedpolicy (
a1 : access constant posix_spawnattr_t; a2 : access signed_int)
return signed_int;
pragma Import (C, posix_spawnattr_getschedpolicy,
"posix_spawnattr_getschedpolicy");
function posix_spawnattr_getsigdefault (
a1 : access constant posix_spawnattr_t;
a2 : access sys.select_h.sigset_t) return signed_int;
pragma Import (C, posix_spawnattr_getsigdefault,
"posix_spawnattr_getsigdefault");
function posix_spawnattr_getsigmask (
a1 : access constant posix_spawnattr_t;
sigmask : access sys.select_h.sigset_t) return signed_int;
pragma Import (C, posix_spawnattr_getsigmask,
"posix_spawnattr_getsigmask");
function posix_spawnattr_setflags (a1 : access posix_spawnattr_t;
a2 : signed_short) return signed_int;
pragma Import (C, posix_spawnattr_setflags, "posix_spawnattr_setflags");
function posix_spawnattr_setpgroup (a1 : access posix_spawnattr_t;
a2 : sys.types.pid_t) return signed_int;
pragma Import (C, posix_spawnattr_setpgroup, "posix_spawnattr_setpgroup");
function posix_spawnattr_setschedparam (a1 : access posix_spawnattr_t;
a2 : access constant sched.struct_sched_param) return signed_int;
pragma Import (C, posix_spawnattr_setschedparam,
"posix_spawnattr_setschedparam");
function posix_spawnattr_setschedpolicy (a1 : access posix_spawnattr_t;
a2 : signed_int) return signed_int;
pragma Import (C, posix_spawnattr_setschedpolicy,
"posix_spawnattr_setschedpolicy");
function posix_spawnattr_setsigdefault (a1 : access posix_spawnattr_t;
a2 : access constant sys.select_h.sigset_t) return signed_int;
pragma Import (C, posix_spawnattr_setsigdefault,
"posix_spawnattr_setsigdefault");
function posix_spawnattr_setsigmask (a1 : access posix_spawnattr_t;
a2 : access constant sys.select_h.sigset_t) return signed_int;
pragma Import (C, posix_spawnattr_setsigmask,
"posix_spawnattr_setsigmask");
POSIX_SPAWN_RESETIDS : constant := 1;
POSIX_SPAWN_SETPGROUP : constant := 2;
POSIX_SPAWN_SETSCHEDPARAM : constant := 4;
POSIX_SPAWN_SETSCHEDULER : constant := 8;
POSIX_SPAWN_SETSIGDEF : constant := 16;
POSIX_SPAWN_SETSIGMASK : constant := 32;
-- _SPAWN_H_ (empty)
private
type struct_posix_spawnattr is null record;
type struct_posix_spawn_file_actions is null record;
end C.spawn;
Raw
c-stddef.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.qtypes;
package C.stddef is
pragma Preelaborate;
subtype ptrdiff_t is Standard.C.ptrdiff_t;
subtype size_t is Standard.C.size_t;
subtype size_t_ptr is Standard.C.size_t_ptr;
subtype rune_t is sys.qtypes.rune_t;
subtype wchar_t is Standard.C.wchar_t;
subtype wchar_t_ptr is Standard.C.wchar_t_ptr;
subtype wchar_t_ptr_ptr is Standard.C.wchar_t_ptr_ptr;
subtype wchar_t_const_ptr is Standard.C.wchar_t_const_ptr;
subtype wchar_t_const_ptr_ptr is Standard.C.wchar_t_const_ptr_ptr;
C_NULL : constant void_ptr := void_ptr (System'To_Address (0));
-- _ANSI_STDDEF_H (empty)
-- _BSD_PTRDIFF_T_ (empty)
-- _BSD_SIZE_T_ (empty)
-- _BSD_SIZE_T_DEFINED_ (empty)
-- _GCC_PTRDIFF_T (empty)
-- _GCC_SIZE_T (empty)
-- _GCC_WCHAR_T (empty)
-- _PTRDIFF_T (empty)
-- _PTRDIFF_T_ (empty)
-- _PTRDIFF_T_DECLARED (empty)
-- _RUNE_T_DECLARED (empty)
-- _SIZET_ (empty)
-- _SIZE_T (empty)
-- _SIZE_T_ (empty)
-- _SIZE_T_DECLARED (empty)
-- _SIZE_T_DEFINED (empty)
-- _SIZE_T_DEFINED_ (empty)
-- _STDDEF_H (empty)
-- _STDDEF_H_ (empty)
-- _SYS_SIZE_T_H (empty)
-- _T_PTRDIFF (empty)
-- _T_PTRDIFF_ (empty)
-- _T_SIZE (empty)
-- _T_SIZE_ (empty)
-- _T_WCHAR (empty)
-- _T_WCHAR_ (empty)
-- _WCHAR_T (empty)
-- _WCHAR_T_ (empty)
-- _WCHAR_T_DECLARED (empty)
-- _WCHAR_T_DEFINED (empty)
-- _WCHAR_T_DEFINED_ (empty)
-- _WCHAR_T_H (empty)
-- __INT_WCHAR_T_H (empty)
-- __PTRDIFF_T (empty)
-- __SIZE_T (empty)
-- __SIZE_T__ (empty)
-- __WCHAR_T (empty)
-- __WCHAR_T__ (empty)
-- ___int_ptrdiff_t_h (empty)
-- ___int_size_t_h (empty)
-- ___int_wchar_t_h (empty)
-- __size_t__ (empty)
-- __wchar_t__ (empty)
-- offsetof (unparsible)
end C.stddef;
Raw
c-stdint.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
package C.stdint is
pragma Preelaborate;
subtype int8_t is machine.qtypes.int8_t;
subtype int16_t is machine.qtypes.int16_t;
subtype int32_t is machine.qtypes.int32_t;
subtype int32_t_array is machine.qtypes.int32_t_array;
subtype int64_t is machine.qtypes.int64_t;
subtype uint8_t is machine.qtypes.uint8_t;
subtype uint8_t_array is machine.qtypes.uint8_t_array;
subtype uint8_t_const_ptr is machine.qtypes.uint8_t_const_ptr;
subtype uint8_t_ptr is machine.qtypes.uint8_t_ptr;
subtype uint8_t_ptr_ptr is machine.qtypes.uint8_t_ptr_ptr;
subtype uint16_t is machine.qtypes.uint16_t;
subtype uint16_t_array is machine.qtypes.uint16_t_array;
subtype uint32_t is machine.qtypes.uint32_t;
subtype uint32_t_ptr is machine.qtypes.uint32_t_ptr;
subtype uint32_t_array is machine.qtypes.uint32_t_array;
subtype uint64_t is machine.qtypes.uint64_t;
subtype uint64_t_array is machine.qtypes.uint64_t_array;
subtype int_least8_t is machine.qtypes.int_least8_t;
subtype int_least16_t is machine.qtypes.int_least16_t;
subtype int_least32_t is machine.qtypes.int_least32_t;
subtype int_least64_t is machine.qtypes.int_least64_t;
subtype uint_least8_t is machine.qtypes.uint_least8_t;
subtype uint_least16_t is machine.qtypes.uint_least16_t;
subtype uint_least32_t is machine.qtypes.uint_least32_t;
subtype uint_least64_t is machine.qtypes.uint_least64_t;
subtype int_fast8_t is machine.qtypes.int_fast8_t;
subtype int_fast16_t is machine.qtypes.int_fast16_t;
subtype int_fast32_t is machine.qtypes.int_fast32_t;
subtype int_fast64_t is machine.qtypes.int_fast64_t;
subtype uint_fast8_t is machine.qtypes.uint_fast8_t;
subtype uint_fast16_t is machine.qtypes.uint_fast16_t;
subtype uint_fast32_t is machine.qtypes.uint_fast32_t;
subtype uint_fast64_t is machine.qtypes.uint_fast64_t;
subtype intmax_t is machine.qtypes.intmax_t;
subtype uintmax_t is machine.qtypes.uintmax_t;
subtype intptr_t is machine.qtypes.intptr_t;
subtype uintptr_t is machine.qtypes.uintptr_t;
-- _INT16_T_DECLARED (empty)
-- _INT32_T_DECLARED (empty)
-- _INT64_T_DECLARED (empty)
-- _INT8_T_DECLARED (empty)
-- _INTPTR_T_DECLARED (empty)
-- _SYS_STDINT_H_ (empty)
-- _UINT16_T_DECLARED (empty)
-- _UINT32_T_DECLARED (empty)
-- _UINT64_T_DECLARED (empty)
-- _UINT8_T_DECLARED (empty)
-- _GCC_WRAP_STDINT_H (empty)
end C.stdint;
Raw
c-stdio.adb
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package body C.stdio is
function sputc (c : signed_int; p : access FILE) return signed_int is
begin
declare
function Assign_8c30e133 return signed_int;
function Assign_8c30e133 return signed_int is
Left : signed_int renames p.w;
begin
Left := Left - 1;
return Left;
end Assign_8c30e133;
begin
if Assign_8c30e133 >= 0 or else (p.w >= p.lbfsize
and then char'Val (c) /= char'Val (10))
then
declare
function Assign_83fe4b1f return unsigned_char;
function Assign_42c81b2d return unsigned_char_ptr;
function Assign_83fe4b1f return unsigned_char is
Left : unsigned_char renames Assign_42c81b2d.all;
begin
Left := unsigned_char'Mod (c);
return Left;
end Assign_83fe4b1f;
function Assign_42c81b2d return unsigned_char_ptr is
Left : unsigned_char_ptr renames p.p;
Previous : constant unsigned_char_ptr := Left;
begin
Left := Cast (Cast (Left)
+ unsigned_char_ptr'Size / Standard'Storage_Unit);
return Previous;
end Assign_42c81b2d;
begin
return signed_int (Assign_83fe4b1f);
end;
else
return swbuf (c, p);
end if;
end;
end sputc;
end C.stdio;
Raw
c-stdio.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with Ada.Unchecked_Conversion;
with C.machine.qtypes;
with C.stddef;
with C.sys.qpthreadtypes;
with C.sys.qtypes;
with C.sys.types;
package C.stdio is
pragma Preelaborate;
function Cast is new Ada.Unchecked_Conversion (unsigned_char_ptr,
ptrdiff_t);
function Cast is new Ada.Unchecked_Conversion (ptrdiff_t,
unsigned_char_ptr);
subtype fpos_t is sys.qtypes.off_t;
subtype fpos_t_ptr is sys.qtypes.off_t_ptr;
subtype fpos_t_const_ptr is sys.qtypes.off_t_const_ptr;
subtype va_list is machine.qtypes.va_list;
type struct_sbuf;
type struct_sbuf is record
base : aliased unsigned_char_ptr;
size : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_sbuf);
type struct_sFILE;
type access_75829e8b is access function (a1 : void_ptr) return signed_int;
pragma Convention (C, access_75829e8b);
type access_42f5c4aa is access function (a1 : void_ptr; a2 : access char;
a3 : signed_int) return signed_int;
pragma Convention (C, access_42f5c4aa);
type access_592a47b1 is access function (a1 : void_ptr; a2 : fpos_t;
a3 : signed_int) return fpos_t;
pragma Convention (C, access_592a47b1);
type access_5304e973 is access function (a1 : void_ptr;
a2 : access constant char; a3 : signed_int) return signed_int;
pragma Convention (C, access_5304e973);
type struct_sFILE is record
p : aliased unsigned_char_ptr;
r : aliased signed_int;
w : aliased signed_int;
flags : aliased signed_short;
file : aliased signed_short;
bf : aliased struct_sbuf;
lbfsize : aliased signed_int;
cookie : aliased void_ptr;
close : aliased access_75829e8b;
read : aliased access_42f5c4aa;
seek : aliased access_592a47b1;
write : aliased access_5304e973;
ub : aliased struct_sbuf;
up : aliased unsigned_char_ptr;
ur : aliased signed_int;
ubuf : aliased unsigned_char_array (0 .. 2);
nbuf : aliased unsigned_char_array (0 .. 0);
lb : aliased struct_sbuf;
blksize : aliased signed_int;
offset : aliased fpos_t;
fl_mutex : aliased sys.qpthreadtypes.struct_pthread_mutex_ptr;
fl_owner : aliased sys.qpthreadtypes.struct_pthread_ptr;
fl_count : aliased signed_int;
orientation : aliased signed_int;
mbstate : aliased sys.qtypes.mbstate_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_sFILE);
type struct_sFILE_ptr is access all struct_sFILE;
for struct_sFILE_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sFILE_ptr);
pragma Convention (C, struct_sFILE_ptr);
subtype FILE is struct_sFILE;
subtype FILE_ptr is struct_sFILE_ptr;
stdinp : aliased FILE_ptr;
pragma Import (C, stdinp, "__stdinp");
stdoutp : aliased FILE_ptr;
pragma Import (C, stdoutp, "__stdoutp");
stderrp : aliased FILE_ptr;
pragma Import (C, stderrp, "__stderrp");
procedure clearerr (a1 : access FILE);
pragma Import (C, clearerr, "clearerr");
function fclose (a1 : access FILE) return signed_int;
pragma Import (C, fclose, "fclose");
function feof (a1 : access FILE) return signed_int;
pragma Import (C, feof, "feof");
function ferror (a1 : access FILE) return signed_int;
pragma Import (C, ferror, "ferror");
function fflush (a1 : access FILE) return signed_int;
pragma Import (C, fflush, "fflush");
function fgetc (a1 : access FILE) return signed_int;
pragma Import (C, fgetc, "fgetc");
function fgetpos (a1 : access FILE; a2 : access fpos_t) return signed_int;
pragma Import (C, fgetpos, "fgetpos");
function fgets (a1 : access char; a2 : signed_int; a3 : access FILE)
return char_ptr;
pragma Import (C, fgets, "fgets");
function fopen (a1 : access constant char; a2 : access constant char)
return FILE_ptr;
pragma Import (C, fopen, "fopen");
function fprintf (a1 : access FILE; a2 : access constant char)
return signed_int;
pragma Import (C, fprintf, "fprintf");
function fputc (a1 : signed_int; a2 : access FILE) return signed_int;
pragma Import (C, fputc, "fputc");
function fputs (a1 : access constant char; a2 : access FILE)
return signed_int;
pragma Import (C, fputs, "fputs");
function fread (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t;
a4 : access FILE) return stddef.size_t;
pragma Import (C, fread, "fread");
function freopen (a1 : access constant char; a2 : access constant char;
a3 : access FILE) return FILE_ptr;
pragma Import (C, freopen, "freopen");
function fscanf (a1 : access FILE; a2 : access constant char)
return signed_int;
pragma Import (C, fscanf, "fscanf");
function fseek (a1 : access FILE; a2 : signed_long; a3 : signed_int)
return signed_int;
pragma Import (C, fseek, "fseek");
function fsetpos (a1 : access FILE; a2 : access constant fpos_t)
return signed_int;
pragma Import (C, fsetpos, "fsetpos");
function ftell (a1 : access FILE) return signed_long;
pragma Import (C, ftell, "ftell");
function fwrite (a1 : void_const_ptr; a2 : stddef.size_t;
a3 : stddef.size_t; a4 : access FILE) return stddef.size_t;
pragma Import (C, fwrite, "fwrite");
function getc (a1 : access FILE) return signed_int;
pragma Import (C, getc, "getc");
function getchar return signed_int;
pragma Import (C, getchar, "getchar");
function gets (a1 : access char) return char_ptr;
pragma Import (C, gets, "gets");
procedure perror (a1 : access constant char);
pragma Import (C, perror, "perror");
function printf (a1 : access constant char) return signed_int;
pragma Import (C, printf, "printf");
function putc (a1 : signed_int; a2 : access FILE) return signed_int;
pragma Import (C, putc, "putc");
function putchar (a1 : signed_int) return signed_int;
pragma Import (C, putchar, "putchar");
function puts (a1 : access constant char) return signed_int;
pragma Import (C, puts, "puts");
function remove (a1 : access constant char) return signed_int;
pragma Import (C, remove, "remove");
function rename (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, rename, "rename");
procedure rewind (a1 : access FILE);
pragma Import (C, rewind, "rewind");
function scanf (a1 : access constant char) return signed_int;
pragma Import (C, scanf, "scanf");
procedure setbuf (a1 : access FILE; a2 : access char);
pragma Import (C, setbuf, "setbuf");
function setvbuf (a1 : access FILE; a2 : access char; a3 : signed_int;
a4 : stddef.size_t) return signed_int;
pragma Import (C, setvbuf, "setvbuf");
function sprintf (a1 : access char; a2 : access constant char)
return signed_int;
pragma Import (C, sprintf, "sprintf");
function sscanf (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, sscanf, "sscanf");
function tmpfile return FILE_ptr;
pragma Import (C, tmpfile, "tmpfile");
function tmpnam (a1 : access char) return char_ptr;
pragma Import (C, tmpnam, "tmpnam");
function ungetc (a1 : signed_int; a2 : access FILE) return signed_int;
pragma Import (C, ungetc, "ungetc");
function vfprintf (a1 : access FILE; a2 : access constant char;
a3 : machine.qtypes.va_list) return signed_int;
pragma Import (C, vfprintf, "vfprintf");
function vprintf (a1 : access constant char; a2 : machine.qtypes.va_list)
return signed_int;
pragma Import (C, vprintf, "vprintf");
function vsprintf (a1 : access char; a2 : access constant char;
a3 : machine.qtypes.va_list) return signed_int;
pragma Import (C, vsprintf, "vsprintf");
function snprintf (a1 : access char; a2 : stddef.size_t;
a3 : access constant char) return signed_int;
pragma Import (C, snprintf, "snprintf");
function vfscanf (a1 : access FILE; a2 : access constant char;
a3 : machine.qtypes.va_list) return signed_int;
pragma Import (C, vfscanf, "vfscanf");
function vscanf (a1 : access constant char; a2 : machine.qtypes.va_list)
return signed_int;
pragma Import (C, vscanf, "vscanf");
function vsnprintf (a1 : access char; a2 : stddef.size_t;
a3 : access constant char; a4 : machine.qtypes.va_list)
return signed_int;
pragma Import (C, vsnprintf, "vsnprintf");
function vsscanf (a1 : access constant char; a2 : access constant char;
a3 : machine.qtypes.va_list) return signed_int;
pragma Import (C, vsscanf, "vsscanf");
function ctermid (a1 : access char) return char_ptr;
pragma Import (C, ctermid, "ctermid");
function fdopen (a1 : signed_int; a2 : access constant char)
return FILE_ptr;
pragma Import (C, fdopen, "fdopen");
function fileno (a1 : access FILE) return signed_int;
pragma Import (C, fileno, "fileno");
function pclose (a1 : access FILE) return signed_int;
pragma Import (C, pclose, "pclose");
function popen (a1 : access constant char; a2 : access constant char)
return FILE_ptr;
pragma Import (C, popen, "popen");
function ftrylockfile (a1 : access FILE) return signed_int;
pragma Import (C, ftrylockfile, "ftrylockfile");
procedure flockfile (a1 : access FILE);
pragma Import (C, flockfile, "flockfile");
procedure funlockfile (a1 : access FILE);
pragma Import (C, funlockfile, "funlockfile");
function getc_unlocked (a1 : access FILE) return signed_int;
pragma Import (C, getc_unlocked, "getc_unlocked");
function getchar_unlocked return signed_int;
pragma Import (C, getchar_unlocked, "getchar_unlocked");
function putc_unlocked (a1 : signed_int; a2 : access FILE)
return signed_int;
pragma Import (C, putc_unlocked, "putc_unlocked");
function putchar_unlocked (a1 : signed_int) return signed_int;
pragma Import (C, putchar_unlocked, "putchar_unlocked");
procedure clearerr_unlocked (a1 : access FILE);
pragma Import (C, clearerr_unlocked, "clearerr_unlocked");
function feof_unlocked (a1 : access FILE) return signed_int;
pragma Import (C, feof_unlocked, "feof_unlocked");
function ferror_unlocked (a1 : access FILE) return signed_int;
pragma Import (C, ferror_unlocked, "ferror_unlocked");
function fileno_unlocked (a1 : access FILE) return signed_int;
pragma Import (C, fileno_unlocked, "fileno_unlocked");
function fseeko (a1 : access FILE; a2 : sys.qtypes.off_t; a3 : signed_int)
return signed_int;
pragma Import (C, fseeko, "fseeko");
function ftello (a1 : access FILE) return sys.qtypes.off_t;
pragma Import (C, ftello, "ftello");
function getw (a1 : access FILE) return signed_int;
pragma Import (C, getw, "getw");
function putw (a1 : signed_int; a2 : access FILE) return signed_int;
pragma Import (C, putw, "putw");
function tempnam (a1 : access constant char; a2 : access constant char)
return char_ptr;
pragma Import (C, tempnam, "tempnam");
function getdelim (a1 : access char_ptr; a2 : access stddef.size_t;
a3 : signed_int; a4 : access FILE) return sys.types.ssize_t;
pragma Import (C, getdelim, "getdelim");
function renameat (a1 : signed_int; a2 : access constant char;
a3 : signed_int; a4 : access constant char) return signed_int;
pragma Import (C, renameat, "renameat");
function vdprintf (a1 : signed_int; a2 : access constant char;
a3 : machine.qtypes.va_list) return signed_int;
pragma Import (C, vdprintf, "vdprintf");
function asprintf (a1 : access char_ptr; a2 : access constant char)
return signed_int;
pragma Import (C, asprintf, "asprintf");
function ctermid_r (a1 : access char) return char_ptr;
pragma Import (C, ctermid_r, "ctermid_r");
procedure fcloseall;
pragma Import (C, fcloseall, "fcloseall");
function fgetln (a1 : access FILE; a2 : access stddef.size_t)
return char_ptr;
pragma Import (C, fgetln, "fgetln");
function fmtcheck (a1 : access constant char; a2 : access constant char)
return char_const_ptr;
pragma Import (C, fmtcheck, "fmtcheck");
function fpurge (a1 : access FILE) return signed_int;
pragma Import (C, fpurge, "fpurge");
procedure setbuffer (a1 : access FILE; a2 : access char; a3 : signed_int);
pragma Import (C, setbuffer, "setbuffer");
function setlinebuf (a1 : access FILE) return signed_int;
pragma Import (C, setlinebuf, "setlinebuf");
function vasprintf (a1 : access char_ptr; a2 : access constant char;
a3 : machine.qtypes.va_list) return signed_int;
pragma Import (C, vasprintf, "vasprintf");
sys_nerr : aliased signed_int;
pragma Import (C, sys_nerr, "sys_nerr");
sys_errlist : aliased char_const_ptr_array (0 .. 0);
pragma Import (C, sys_errlist, "sys_errlist");
function funopen (a1 : void_const_ptr; a2 : access_42f5c4aa;
a3 : access_5304e973; a4 : access_592a47b1; a5 : access_75829e8b)
return FILE_ptr;
pragma Import (C, funopen, "funopen");
function srget (a1 : access FILE) return signed_int;
pragma Import (C, srget, "__srget");
function swbuf (a1 : signed_int; a2 : access FILE) return signed_int;
pragma Import (C, swbuf, "__swbuf");
function sputc (c : signed_int; p : access FILE) return signed_int;
pragma Convention (C, sputc);
pragma Inline (sputc);
isthreaded : aliased signed_int;
pragma Import (C, isthreaded, "__isthreaded");
BUFSIZ : constant := 1024;
EOF : constant := -1;
FILENAME_MAX : constant := 1024;
FOPEN_MAX : constant := 20;
L_ctermid : constant := 1024;
L_cuserid : constant := 17;
L_tmpnam : constant := 1024;
P_tmpdir : constant char_array (0 .. 9) := "/var/tmp/" & char'Val (0);
TMP_MAX : constant := 308915776;
-- _FSTDIO (empty)
IOFBF : constant := 0;
IOLBF : constant := 1;
IONBF : constant := 2;
-- _STDIO_H_ (empty)
-- _STDSTREAM_DECLARED (empty)
-- _VA_LIST_DECLARED (empty)
SALC : constant := 16384;
SAPP : constant := 256;
SEOF : constant := 32;
SERR : constant := 64;
SIGN : constant := 32768;
SLBF : constant := 1;
SMBF : constant := 128;
SMOD : constant := 8192;
SNBF : constant := 2;
SNPT : constant := 2048;
SOFF : constant := 4096;
SOPT : constant := 1024;
SRD : constant := 4;
SRW : constant := 16;
SSTR : constant := 512;
SWR : constant := 8;
-- __sclearerr (uninterpretable)
-- __sfeof (uninterpretable)
-- __sferror (uninterpretable)
-- __sfileno (uninterpretable)
-- __sgetc (uninterpretable)
-- fropen (function macro)
-- fwopen (function macro)
stderr : FILE_ptr renames stderrp;
stdin : FILE_ptr renames stdinp;
stdout : FILE_ptr renames stdoutp;
end C.stdio;
Raw
c-stdlib.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
with C.stddef;
with C.sys.qtypes;
package C.stdlib is
pragma Preelaborate;
type struct_ff97bb1b is record
quot : aliased signed_int;
F_rem : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_ff97bb1b);
subtype div_t is struct_ff97bb1b;
type struct_89fb9f46 is record
quot : aliased signed_long;
F_rem : aliased signed_long;
end record;
pragma Convention (C_Pass_By_Copy, struct_89fb9f46);
subtype ldiv_t is struct_89fb9f46;
qqmb_cur_max : aliased signed_int;
pragma Import (C, qqmb_cur_max, "__mb_cur_max");
type access_e823f645 is access procedure;
pragma Convention (C, access_e823f645);
procedure C_abort;
pragma No_Return (C_abort);
pragma Import (C, C_abort, "abort");
function C_abs (a1 : signed_int) return signed_int;
pragma Import (C, C_abs, "abs");
function atexit (a1 : access_e823f645) return signed_int;
pragma Import (C, atexit, "atexit");
function atof (a1 : access constant char) return double;
pragma Import (C, atof, "atof");
function atoi (a1 : access constant char) return signed_int;
pragma Import (C, atoi, "atoi");
function atol (a1 : access constant char) return signed_long;
pragma Import (C, atol, "atol");
type access_8e0a8157 is access function (a1 : void_const_ptr;
a2 : void_const_ptr) return signed_int;
pragma Convention (C, access_8e0a8157);
function bsearch (a1 : void_const_ptr; a2 : void_const_ptr;
a3 : stddef.size_t; a4 : stddef.size_t; a5 : access_8e0a8157)
return void_ptr;
pragma Import (C, bsearch, "bsearch");
function calloc (a1 : stddef.size_t; a2 : stddef.size_t) return void_ptr;
pragma Import (C, calloc, "calloc");
function div (a1 : signed_int; a2 : signed_int) return div_t;
pragma Import (C, div, "div");
procedure C_exit (a1 : signed_int);
pragma No_Return (C_exit);
pragma Import (C, C_exit, "exit");
procedure free (a1 : void_ptr);
pragma Import (C, free, "free");
function getenv (a1 : access constant char) return char_ptr;
pragma Import (C, getenv, "getenv");
function labs (a1 : signed_long) return signed_long;
pragma Import (C, labs, "labs");
function ldiv (a1 : signed_long; a2 : signed_long) return ldiv_t;
pragma Import (C, ldiv, "ldiv");
function malloc (a1 : stddef.size_t) return void_ptr;
pragma Import (C, malloc, "malloc");
function mblen (a1 : access constant char; a2 : stddef.size_t)
return signed_int;
pragma Import (C, mblen, "mblen");
function mbstowcs (a1 : access stddef.wchar_t; a2 : access constant char;
a3 : stddef.size_t) return stddef.size_t;
pragma Import (C, mbstowcs, "mbstowcs");
function mbtowc (a1 : access stddef.wchar_t; a2 : access constant char;
a3 : stddef.size_t) return signed_int;
pragma Import (C, mbtowc, "mbtowc");
procedure qsort (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t;
a4 : access_8e0a8157);
pragma Import (C, qsort, "qsort");
function rand return signed_int;
pragma Import (C, rand, "rand");
function realloc (a1 : void_ptr; a2 : stddef.size_t) return void_ptr;
pragma Import (C, realloc, "realloc");
procedure srand (a1 : unsigned_int);
pragma Import (C, srand, "srand");
function strtod (a1 : access constant char; a2 : access char_ptr)
return double;
pragma Import (C, strtod, "strtod");
function strtof (a1 : access constant char; a2 : access char_ptr)
return float;
pragma Import (C, strtof, "strtof");
function strtol (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return signed_long;
pragma Import (C, strtol, "strtol");
function strtold (a1 : access constant char; a2 : access char_ptr)
return long_double;
pragma Import (C, strtold, "strtold");
function strtoul (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return unsigned_long;
pragma Import (C, strtoul, "strtoul");
function C_system (a1 : access constant char) return signed_int;
pragma Import (C, C_system, "system");
function wctomb (a1 : access char; a2 : stddef.wchar_t) return signed_int;
pragma Import (C, wctomb, "wctomb");
function wcstombs (a1 : access char; a2 : access constant stddef.wchar_t;
a3 : stddef.size_t) return stddef.size_t;
pragma Import (C, wcstombs, "wcstombs");
type struct_b28d2b0f is record
quot : aliased signed_long_long;
F_rem : aliased signed_long_long;
end record;
pragma Convention (C_Pass_By_Copy, struct_b28d2b0f);
subtype lldiv_t is struct_b28d2b0f;
function atoll (a1 : access constant char) return signed_long_long;
pragma Import (C, atoll, "atoll");
function llabs (a1 : signed_long_long) return signed_long_long;
pragma Import (C, llabs, "llabs");
function lldiv (a1 : signed_long_long; a2 : signed_long_long)
return lldiv_t;
pragma Import (C, lldiv, "lldiv");
function strtoll (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return signed_long_long;
pragma Import (C, strtoll, "strtoll");
function strtoull (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return unsigned_long_long;
pragma Import (C, strtoull, "strtoull");
procedure C_qExit_U (a1 : signed_int);
pragma No_Return (C_qExit_U);
pragma Import (C, C_qExit_U, "_Exit");
function posix_memalign (a1 : access void_ptr; a2 : stddef.size_t;
a3 : stddef.size_t) return signed_int;
pragma Import (C, posix_memalign, "posix_memalign");
function rand_r (a1 : access unsigned_int) return signed_int;
pragma Import (C, rand_r, "rand_r");
function realpath (a1 : access constant char; a2 : access char)
return char_ptr;
pragma Import (C, realpath, "realpath");
function setenv (a1 : access constant char; a2 : access constant char;
a3 : signed_int) return signed_int;
pragma Import (C, setenv, "setenv");
function unsetenv (a1 : access constant char) return signed_int;
pragma Import (C, unsetenv, "unsetenv");
function getsubopt (a1 : access char_ptr; a2 : access char_ptr;
a3 : access char_ptr) return signed_int;
pragma Import (C, getsubopt, "getsubopt");
function a64l (a1 : access constant char) return signed_long;
pragma Import (C, a64l, "a64l");
function drand48 return double;
pragma Import (C, drand48, "drand48");
function erand48 (a1 : access unsigned_short) return double;
pragma Import (C, erand48, "erand48");
function grantpt (a1 : signed_int) return signed_int;
pragma Import (C, grantpt, "grantpt");
function initstate (a1 : unsigned_long; a2 : access char;
a3 : signed_long) return char_ptr;
pragma Import (C, initstate, "initstate");
function jrand48 (a1 : access unsigned_short) return signed_long;
pragma Import (C, jrand48, "jrand48");
function l64a (a1 : signed_long) return char_ptr;
pragma Import (C, l64a, "l64a");
procedure lcong48 (a1 : access unsigned_short);
pragma Import (C, lcong48, "lcong48");
function lrand48 return signed_long;
pragma Import (C, lrand48, "lrand48");
function mrand48 return signed_long;
pragma Import (C, mrand48, "mrand48");
function nrand48 (a1 : access unsigned_short) return signed_long;
pragma Import (C, nrand48, "nrand48");
function posix_openpt (a1 : signed_int) return signed_int;
pragma Import (C, posix_openpt, "posix_openpt");
function ptsname (a1 : signed_int) return char_ptr;
pragma Import (C, ptsname, "ptsname");
function putenv (a1 : access char) return signed_int;
pragma Import (C, putenv, "putenv");
function random return signed_long;
pragma Import (C, random, "random");
function seed48 (a1 : access unsigned_short) return unsigned_short_ptr;
pragma Import (C, seed48, "seed48");
function setstate (a1 : access char) return char_ptr;
pragma Import (C, setstate, "setstate");
procedure srand48 (a1 : signed_long);
pragma Import (C, srand48, "srand48");
procedure srandom (a1 : unsigned_long);
pragma Import (C, srandom, "srandom");
function unlockpt (a1 : signed_int) return signed_int;
pragma Import (C, unlockpt, "unlockpt");
malloc_options : aliased char_const_ptr;
pragma Import (C, malloc_options, "_malloc_options");
type access_2169f274 is access procedure (a1 : access constant char;
a2 : access constant char; a3 : access constant char;
a4 : access constant char);
pragma Convention (C, access_2169f274);
malloc_message : aliased access_2169f274;
pragma Import (C, malloc_message, "_malloc_message");
procedure abort2 (a1 : access constant char; a2 : signed_int;
a3 : access void_ptr);
pragma No_Return (abort2);
pragma Import (C, abort2, "abort2");
function arc4random return machine.qtypes.uint32_t;
pragma Import (C, arc4random, "arc4random");
procedure arc4random_addrandom (a1 : access unsigned_char;
a2 : signed_int);
pragma Import (C, arc4random_addrandom, "arc4random_addrandom");
procedure arc4random_buf (a1 : void_ptr; a2 : stddef.size_t);
pragma Import (C, arc4random_buf, "arc4random_buf");
procedure arc4random_stir;
pragma Import (C, arc4random_stir, "arc4random_stir");
function arc4random_uniform (a1 : machine.qtypes.uint32_t)
return machine.qtypes.uint32_t;
pragma Import (C, arc4random_uniform, "arc4random_uniform");
function getbsize (a1 : access signed_int; a2 : access signed_long)
return char_ptr;
pragma Import (C, getbsize, "getbsize");
function cgetcap (a1 : access char; a2 : access constant char;
a3 : signed_int) return char_ptr;
pragma Import (C, cgetcap, "cgetcap");
function cgetclose return signed_int;
pragma Import (C, cgetclose, "cgetclose");
function cgetent (a1 : access char_ptr; a2 : access char_ptr;
a3 : access constant char) return signed_int;
pragma Import (C, cgetent, "cgetent");
function cgetfirst (a1 : access char_ptr; a2 : access char_ptr)
return signed_int;
pragma Import (C, cgetfirst, "cgetfirst");
function cgetmatch (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, cgetmatch, "cgetmatch");
function cgetnext (a1 : access char_ptr; a2 : access char_ptr)
return signed_int;
pragma Import (C, cgetnext, "cgetnext");
function cgetnum (a1 : access char; a2 : access constant char;
a3 : access signed_long) return signed_int;
pragma Import (C, cgetnum, "cgetnum");
function cgetset (a1 : access constant char) return signed_int;
pragma Import (C, cgetset, "cgetset");
function cgetstr (a1 : access char; a2 : access constant char;
a3 : access char_ptr) return signed_int;
pragma Import (C, cgetstr, "cgetstr");
function cgetustr (a1 : access char; a2 : access constant char;
a3 : access char_ptr) return signed_int;
pragma Import (C, cgetustr, "cgetustr");
function daemon (a1 : signed_int; a2 : signed_int) return signed_int;
pragma Import (C, daemon, "daemon");
function devname (a1 : sys.qtypes.dev_t; a2 : sys.qtypes.mode_t)
return char_ptr;
pragma Import (C, devname, "devname");
function devname_r (a1 : sys.qtypes.dev_t; a2 : sys.qtypes.mode_t;
a3 : access char; a4 : signed_int) return char_ptr;
pragma Import (C, devname_r, "devname_r");
function fdevname (a1 : signed_int) return char_ptr;
pragma Import (C, fdevname, "fdevname");
function fdevname_r (a1 : signed_int; a2 : access char; a3 : signed_int)
return char_ptr;
pragma Import (C, fdevname_r, "fdevname_r");
function getloadavg (a1 : access double; a2 : signed_int)
return signed_int;
pragma Import (C, getloadavg, "getloadavg");
function getprogname return char_const_ptr;
pragma Import (C, getprogname, "getprogname");
function heapsort (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t;
a4 : access_8e0a8157) return signed_int;
pragma Import (C, heapsort, "heapsort");
function l64a_r (a1 : signed_long; a2 : access char; a3 : signed_int)
return signed_int;
pragma Import (C, l64a_r, "l64a_r");
function mergesort (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t;
a4 : access_8e0a8157) return signed_int;
pragma Import (C, mergesort, "mergesort");
type access_c9f43fd7 is access function (a1 : void_ptr;
a2 : void_const_ptr; a3 : void_const_ptr) return signed_int;
pragma Convention (C, access_c9f43fd7);
procedure qsort_r (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t;
a4 : void_ptr; a5 : access_c9f43fd7);
pragma Import (C, qsort_r, "qsort_r");
function radixsort (a1 : access unsigned_char_const_ptr; a2 : signed_int;
a3 : access constant unsigned_char; a4 : unsigned_int)
return signed_int;
pragma Import (C, radixsort, "radixsort");
function reallocf (a1 : void_ptr; a2 : stddef.size_t) return void_ptr;
pragma Import (C, reallocf, "reallocf");
function rpmatch (a1 : access constant char) return signed_int;
pragma Import (C, rpmatch, "rpmatch");
procedure setprogname (a1 : access constant char);
pragma Import (C, setprogname, "setprogname");
function sradixsort (a1 : access unsigned_char_const_ptr; a2 : signed_int;
a3 : access constant unsigned_char; a4 : unsigned_int)
return signed_int;
pragma Import (C, sradixsort, "sradixsort");
procedure sranddev;
pragma Import (C, sranddev, "sranddev");
procedure srandomdev;
pragma Import (C, srandomdev, "srandomdev");
function strtonum (a1 : access constant char; a2 : signed_long_long;
a3 : signed_long_long; a4 : access char_const_ptr)
return signed_long_long;
pragma Import (C, strtonum, "strtonum");
function strtoq (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return machine.qtypes.int64_t;
pragma Import (C, strtoq, "strtoq");
function strtouq (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return machine.qtypes.uint64_t;
pragma Import (C, strtouq, "strtouq");
suboptarg : aliased char_ptr;
pragma Import (C, suboptarg, "suboptarg");
EXIT_FAILURE : constant := 1;
EXIT_SUCCESS : constant := 0;
MB_CUR_MAX : signed_int renames qqmb_cur_max;
RAND_MAX : constant := 2147483647;
-- _STDLIB_H_ (empty)
-- alloca (function macro)
end C.stdlib;
Raw
c-string.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.sys.types;
package C.string is
pragma Preelaborate;
function memccpy (a1 : void_ptr; a2 : void_const_ptr; a3 : signed_int;
a4 : stddef.size_t) return void_ptr;
pragma Import (C, memccpy, "memccpy");
function memchr (a1 : void_const_ptr; a2 : signed_int; a3 : stddef.size_t)
return void_ptr;
pragma Import (C, memchr, "memchr");
function memrchr (a1 : void_const_ptr; a2 : signed_int;
a3 : stddef.size_t) return void_ptr;
pragma Import (C, memrchr, "memrchr");
function memcmp (a1 : void_const_ptr; a2 : void_const_ptr;
a3 : stddef.size_t) return signed_int;
pragma Import (C, memcmp, "memcmp");
function memcpy (a1 : void_ptr; a2 : void_const_ptr; a3 : stddef.size_t)
return void_ptr;
pragma Import (C, memcpy, "memcpy");
function memmem (a1 : void_const_ptr; a2 : stddef.size_t;
a3 : void_const_ptr; a4 : stddef.size_t) return void_ptr;
pragma Import (C, memmem, "memmem");
function memmove (a1 : void_ptr; a2 : void_const_ptr; a3 : stddef.size_t)
return void_ptr;
pragma Import (C, memmove, "memmove");
function memset (a1 : void_ptr; a2 : signed_int; a3 : stddef.size_t)
return void_ptr;
pragma Import (C, memset, "memset");
function stpcpy (a1 : access char; a2 : access constant char)
return char_ptr;
pragma Import (C, stpcpy, "stpcpy");
function stpncpy (a1 : access char; a2 : access constant char;
a3 : stddef.size_t) return char_ptr;
pragma Import (C, stpncpy, "stpncpy");
function strcasestr (a1 : access constant char; a2 : access constant char)
return char_ptr;
pragma Import (C, strcasestr, "strcasestr");
function strcat (a1 : access char; a2 : access constant char)
return char_ptr;
pragma Import (C, strcat, "strcat");
function strchr (a1 : access constant char; a2 : signed_int)
return char_ptr;
pragma Import (C, strchr, "strchr");
function strcmp (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, strcmp, "strcmp");
function strcoll (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, strcoll, "strcoll");
function strcpy (a1 : access char; a2 : access constant char)
return char_ptr;
pragma Import (C, strcpy, "strcpy");
function strcspn (a1 : access constant char; a2 : access constant char)
return stddef.size_t;
pragma Import (C, strcspn, "strcspn");
function strdup (a1 : access constant char) return char_ptr;
pragma Import (C, strdup, "strdup");
function strerror (a1 : signed_int) return char_ptr;
pragma Import (C, strerror, "strerror");
function strerror_r (a1 : signed_int; a2 : access char;
a3 : stddef.size_t) return signed_int;
pragma Import (C, strerror_r, "strerror_r");
function strlcat (a1 : access char; a2 : access constant char;
a3 : stddef.size_t) return stddef.size_t;
pragma Import (C, strlcat, "strlcat");
function strlcpy (a1 : access char; a2 : access constant char;
a3 : stddef.size_t) return stddef.size_t;
pragma Import (C, strlcpy, "strlcpy");
function strlen (a1 : access constant char) return stddef.size_t;
pragma Import (C, strlen, "strlen");
procedure strmode (a1 : signed_int; a2 : access char);
pragma Import (C, strmode, "strmode");
function strncat (a1 : access char; a2 : access constant char;
a3 : stddef.size_t) return char_ptr;
pragma Import (C, strncat, "strncat");
function strncmp (a1 : access constant char; a2 : access constant char;
a3 : stddef.size_t) return signed_int;
pragma Import (C, strncmp, "strncmp");
function strncpy (a1 : access char; a2 : access constant char;
a3 : stddef.size_t) return char_ptr;
pragma Import (C, strncpy, "strncpy");
function strndup (a1 : access constant char; a2 : stddef.size_t)
return char_ptr;
pragma Import (C, strndup, "strndup");
function strnlen (a1 : access constant char; a2 : stddef.size_t)
return stddef.size_t;
pragma Import (C, strnlen, "strnlen");
function strnstr (a1 : access constant char; a2 : access constant char;
a3 : stddef.size_t) return char_ptr;
pragma Import (C, strnstr, "strnstr");
function strpbrk (a1 : access constant char; a2 : access constant char)
return char_ptr;
pragma Import (C, strpbrk, "strpbrk");
function strrchr (a1 : access constant char; a2 : signed_int)
return char_ptr;
pragma Import (C, strrchr, "strrchr");
function strsep (a1 : access char_ptr; a2 : access constant char)
return char_ptr;
pragma Import (C, strsep, "strsep");
function strsignal (a1 : signed_int) return char_ptr;
pragma Import (C, strsignal, "strsignal");
function strspn (a1 : access constant char; a2 : access constant char)
return stddef.size_t;
pragma Import (C, strspn, "strspn");
function strstr (a1 : access constant char; a2 : access constant char)
return char_ptr;
pragma Import (C, strstr, "strstr");
function strtok (a1 : access char; a2 : access constant char)
return char_ptr;
pragma Import (C, strtok, "strtok");
function strtok_r (a1 : access char; a2 : access constant char;
a3 : access char_ptr) return char_ptr;
pragma Import (C, strtok_r, "strtok_r");
function strxfrm (a1 : access char; a2 : access constant char;
a3 : stddef.size_t) return stddef.size_t;
pragma Import (C, strxfrm, "strxfrm");
procedure swab (a1 : void_const_ptr; a2 : void_ptr;
a3 : sys.types.ssize_t);
pragma Import (C, swab, "swab");
-- _STRING_H_ (empty)
-- _SWAB_DECLARED (empty)
end C.string;
Raw
c-strings.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
package C.strings is
pragma Preelaborate;
function bcmp (a1 : void_const_ptr; a2 : void_const_ptr;
a3 : stddef.size_t) return signed_int;
pragma Import (C, bcmp, "bcmp");
procedure bcopy (a1 : void_const_ptr; a2 : void_ptr; a3 : stddef.size_t);
pragma Import (C, bcopy, "bcopy");
procedure bzero (a1 : void_ptr; a2 : stddef.size_t);
pragma Import (C, bzero, "bzero");
function ffs (a1 : signed_int) return signed_int;
pragma Import (C, ffs, "ffs");
function ffsl (a1 : signed_long) return signed_int;
pragma Import (C, ffsl, "ffsl");
function ffsll (a1 : signed_long_long) return signed_int;
pragma Import (C, ffsll, "ffsll");
function fls (a1 : signed_int) return signed_int;
pragma Import (C, fls, "fls");
function flsl (a1 : signed_long) return signed_int;
pragma Import (C, flsl, "flsl");
function flsll (a1 : signed_long_long) return signed_int;
pragma Import (C, flsll, "flsll");
function index (a1 : access constant char; a2 : signed_int)
return char_ptr;
pragma Import (C, index, "index");
function rindex (a1 : access constant char; a2 : signed_int)
return char_ptr;
pragma Import (C, rindex, "rindex");
function strcasecmp (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, strcasecmp, "strcasecmp");
function strncasecmp (a1 : access constant char;
a2 : access constant char; a3 : stddef.size_t) return signed_int;
pragma Import (C, strncasecmp, "strncasecmp");
-- _STRINGS_H_ (empty)
end C.strings;
Raw
c-sys-cdefs.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.cdefs is
pragma Preelaborate;
-- _SYS_CDEFS_H_ (empty)
-- __BEGIN_DECLS (empty)
BSD_VISIBLE : constant := 1;
CC_SUPPORTS_DYNAMIC_ARRAY_INIT : constant := 1;
CC_SUPPORTS_INLINE : constant := 1;
CC_SUPPORTS_VARADIC_XXX : constant := 1;
CC_SUPPORTS_WARNING : constant := 1;
qqCC_SUPPORTSqqqFUNCqq : constant := 1;
qqCC_SUPPORTSqqqINLINE : constant := 1;
qqCC_SUPPORTSqqqINLINEqq : constant := 1;
-- __CONCAT (unparsible)
-- __CONCAT1 (has # or ##)
-- __COPYRIGHT (unparsible)
-- __DECONST (function macro)
-- __DEQUALIFY (function macro)
-- __DEVOLATILE (function macro)
-- __END_DECLS (empty)
-- __FBSDID (unparsible)
GNUCLIKE_ASM : constant := 3;
GNUCLIKE_ATTRIBUTE_MODE_DI : constant := 1;
GNUCLIKE_BUILTIN_CONSTANT_P : constant := 1;
GNUCLIKE_BUILTIN_MEMCPY : constant := 1;
GNUCLIKE_BUILTIN_NEXT_ARG : constant := 1;
GNUCLIKE_BUILTIN_STDARG : constant := 1;
GNUCLIKE_BUILTIN_VAALIST : constant := 1;
GNUCLIKE_BUILTIN_VARARGS : constant := 1;
GNUCLIKE_CTOR_SECTION_HANDLING : constant := 1;
-- __GNUCLIKE_MATH_BUILTIN_CONSTANTS (empty)
-- __GNUCLIKE_MATH_BUILTIN_RELOPS (empty)
GNUCLIKE_OFFSETOF : constant := 1;
GNUCLIKE_SECTION : constant := 1;
GNUCLIKE_TYPEOF : constant := 1;
-- __GNUC_PREREQ__ (function macro)
GNUC_VA_LIST_COMPATIBILITY : constant := 1;
-- __IDSTRING (unparsible)
ISO_C_VISIBLE : constant := 1999;
-- __LONG_LONG_SUPPORTED (empty)
-- __P (function macro)
POSIX_VISIBLE : constant := 200809;
-- __RCSID (unparsible)
-- __RCSID_SOURCE (unparsible)
-- __SCCSID (unparsible)
-- __STRING (has # or ##)
XSI_VISIBLE : constant := 700;
-- __XSTRING (function macro)
-- __aligned (parameterized declaration-specifiers)
-- __always_inline (attribute)
-- __dead2 (attribute)
pragma Convention_Identifier (exported, C);
-- __format_arg (parameterized declaration-specifiers)
-- __gnu89_inline (alias of extern inline)
pragma Convention_Identifier (hidden, C);
-- __malloc_like (attribute)
-- __noinline (attribute)
-- __nonnull (parameterized declaration-specifiers)
-- __offsetof (unparsible)
-- __packed (attribute)
-- __predict_false (function macro)
-- __predict_true (function macro)
-- __printf0like (empty)
-- __printflike (parameterized declaration-specifiers)
-- __pure (attribute)
-- __pure2 (attribute)
-- __rangeof (unparsible)
-- __scanflike (parameterized declaration-specifiers)
-- __section (parameterized declaration-specifiers)
-- __strong_reference (has # or ##)
-- __sym_compat (has # or ##)
-- __sym_default (has # or ##)
-- __unused (attribute)
-- __used (attribute)
-- __volatile (alias of volatile)
-- __warn_references (has # or ##)
-- __weak_reference (has # or ##)
end C.sys.cdefs;
Raw
c-sys-cpuset.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.sys.types;
package C.sys.cpuset is
pragma Preelaborate;
type struct_cpuset;
type struct_cpuset is record
bits : aliased signed_long_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_cpuset);
type struct_cpuset_ptr is access all struct_cpuset;
for struct_cpuset_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_cpuset_ptr);
pragma Convention (C, struct_cpuset_ptr);
type struct_cpuset_const_ptr is access constant struct_cpuset;
for struct_cpuset_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_cpuset_const_ptr);
pragma Convention (C, struct_cpuset_const_ptr);
subtype cpuset_t is struct_cpuset;
subtype cpuset_t_ptr is struct_cpuset_ptr;
subtype cpuset_t_const_ptr is struct_cpuset_const_ptr;
function cpuset (a1 : access types.cpusetid_t) return signed_int;
pragma Import (C, cpuset, "cpuset");
function cpuset_setid (a1 : types.cpuwhich_t; a2 : types.id_t;
a3 : types.cpusetid_t) return signed_int;
pragma Import (C, cpuset_setid, "cpuset_setid");
function cpuset_getid (a1 : types.cpulevel_t; a2 : types.cpuwhich_t;
a3 : types.id_t; a4 : access types.cpusetid_t) return signed_int;
pragma Import (C, cpuset_getid, "cpuset_getid");
function cpuset_getaffinity (a1 : types.cpulevel_t; a2 : types.cpuwhich_t;
a3 : types.id_t; a4 : stddef.size_t; a5 : access cpuset_t)
return signed_int;
pragma Import (C, cpuset_getaffinity, "cpuset_getaffinity");
function cpuset_setaffinity (a1 : types.cpulevel_t; a2 : types.cpuwhich_t;
a3 : types.id_t; a4 : stddef.size_t; a5 : access constant cpuset_t)
return signed_int;
pragma Import (C, cpuset_setaffinity, "cpuset_setaffinity");
CPUSET_DEFAULT : constant := 0;
CPUSET_INVALID : constant := -1;
-- CPU_AND (uninterpretable)
-- CPU_CLR (uninterpretable)
-- CPU_CMP (uninterpretable)
-- CPU_COPY (function macro)
-- CPU_EMPTY (uninterpretable)
-- CPU_FILL (uninterpretable)
-- CPU_ISSET (uninterpretable)
CPU_LEVEL_CPUSET : constant := 2;
CPU_LEVEL_ROOT : constant := 1;
CPU_LEVEL_WHICH : constant := 3;
CPU_MAXSIZE : constant := 128;
-- CPU_NAND (uninterpretable)
-- CPU_OR (uninterpretable)
-- CPU_OVERLAP (uninterpretable)
-- CPU_SET (uninterpretable)
CPU_SETSIZE : constant := 128;
-- CPU_SUBSET (uninterpretable)
CPU_WHICH_CPUSET : constant := 3;
CPU_WHICH_IRQ : constant := 4;
CPU_WHICH_JAIL : constant := 5;
CPU_WHICH_PID : constant := 2;
CPU_WHICH_TID : constant := 1;
-- CPU_ZERO (uninterpretable)
NCPUBITS : constant := 32;
NCPUWORDS : constant := 4;
-- _SYS_CPUSET_H_ (empty)
-- __cpuset_mask (function macro)
end C.sys.cpuset;
Raw
c-sys-dirent.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
package C.sys.dirent is
pragma Preelaborate;
type struct_dirent;
type struct_dirent is record
d_ino : aliased machine.qtypes.uint32_t;
d_reclen : aliased machine.qtypes.uint16_t;
d_type : aliased machine.qtypes.uint8_t;
d_namlen : aliased machine.qtypes.uint8_t;
d_name : aliased char_array (0 .. 255);
end record;
pragma Convention (C_Pass_By_Copy, struct_dirent);
type struct_dirent_const_ptr is access constant struct_dirent;
for struct_dirent_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_dirent_const_ptr);
pragma Convention (C, struct_dirent_const_ptr);
type struct_dirent_const_ptr_ptr is access all struct_dirent_const_ptr;
for struct_dirent_const_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_dirent_const_ptr_ptr);
pragma Convention (C, struct_dirent_const_ptr_ptr);
type struct_dirent_ptr is access all struct_dirent;
for struct_dirent_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_dirent_ptr);
pragma Convention (C, struct_dirent_ptr);
type struct_dirent_ptr_ptr is access all struct_dirent_ptr;
for struct_dirent_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_dirent_ptr_ptr);
pragma Convention (C, struct_dirent_ptr_ptr);
type struct_dirent_ptr_ptr_ptr is access all struct_dirent_ptr_ptr;
for struct_dirent_ptr_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_dirent_ptr_ptr_ptr);
pragma Convention (C, struct_dirent_ptr_ptr_ptr);
-- DTTOIF (function macro)
DT_BLK : constant := 6;
DT_CHR : constant := 2;
DT_DIR : constant := 4;
DT_FIFO : constant := 1;
DT_LNK : constant := 10;
DT_REG : constant := 8;
DT_SOCK : constant := 12;
DT_UNKNOWN : constant := 0;
DT_WHT : constant := 14;
-- IFTODT (function macro)
MAXNAMLEN : constant := 255;
-- _GENERIC_DIRSIZ (uninterpretable)
-- _SYS_DIRENT_H_ (empty)
end C.sys.dirent;
Raw
c-sys-elf.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.elf is
pragma Preelaborate;
-- _SYS_ELF_H_ (empty)
end C.sys.elf;
Raw
c-sys-elf32.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stdint;
with C.sys.elf_common;
package C.sys.elf32 is
pragma Preelaborate;
subtype Elf32_Addr is stdint.uint32_t;
subtype Elf32_Half is stdint.uint16_t;
subtype Elf32_Off is stdint.uint32_t;
subtype Elf32_Sword is stdint.int32_t;
subtype Elf32_Word is stdint.uint32_t;
subtype Elf32_Lword is stdint.uint64_t;
subtype Elf32_Hashelt is Elf32_Word;
subtype Elf32_Size is Elf32_Word;
subtype Elf32_Ssize is Elf32_Sword;
type struct_e7ce7873 is record
e_ident : aliased unsigned_char_array (0 .. 15);
e_type : aliased Elf32_Half;
e_machine : aliased Elf32_Half;
e_version : aliased Elf32_Word;
e_entry : aliased Elf32_Addr;
e_phoff : aliased Elf32_Off;
e_shoff : aliased Elf32_Off;
e_flags : aliased Elf32_Word;
e_ehsize : aliased Elf32_Half;
e_phentsize : aliased Elf32_Half;
e_phnum : aliased Elf32_Half;
e_shentsize : aliased Elf32_Half;
e_shnum : aliased Elf32_Half;
e_shstrndx : aliased Elf32_Half;
end record;
pragma Convention (C_Pass_By_Copy, struct_e7ce7873);
subtype Elf32_Ehdr is struct_e7ce7873;
type struct_bb310157 is record
sh_name : aliased Elf32_Word;
sh_type : aliased Elf32_Word;
sh_flags : aliased Elf32_Word;
sh_addr : aliased Elf32_Addr;
sh_offset : aliased Elf32_Off;
sh_size : aliased Elf32_Word;
sh_link : aliased Elf32_Word;
sh_info : aliased Elf32_Word;
sh_addralign : aliased Elf32_Word;
sh_entsize : aliased Elf32_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_bb310157);
subtype Elf32_Shdr is struct_bb310157;
type struct_913c6639 is record
p_type : aliased Elf32_Word;
p_offset : aliased Elf32_Off;
p_vaddr : aliased Elf32_Addr;
p_paddr : aliased Elf32_Addr;
p_filesz : aliased Elf32_Word;
p_memsz : aliased Elf32_Word;
p_flags : aliased Elf32_Word;
p_align : aliased Elf32_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_913c6639);
type struct_913c6639_const_ptr is access constant struct_913c6639;
for struct_913c6639_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_913c6639_const_ptr);
pragma Convention (C, struct_913c6639_const_ptr);
subtype Elf32_Phdr is struct_913c6639;
subtype Elf32_Phdr_const_ptr is struct_913c6639_const_ptr;
type union_64e205c2 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
d_val : Elf32_Word;
when others =>
d_ptr : Elf32_Addr;
end case;
end record;
pragma Unchecked_Union (union_64e205c2);
pragma Convention (C_Pass_By_Copy, union_64e205c2);
type struct_d055e11c is record
d_tag : aliased Elf32_Sword;
d_un : aliased union_64e205c2;
end record;
pragma Convention (C_Pass_By_Copy, struct_d055e11c);
subtype Elf32_Dyn is struct_d055e11c;
type struct_4e155aa1 is record
r_offset : aliased Elf32_Addr;
r_info : aliased Elf32_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_4e155aa1);
subtype Elf32_Rel is struct_4e155aa1;
type struct_04712804 is record
r_offset : aliased Elf32_Addr;
r_info : aliased Elf32_Word;
r_addend : aliased Elf32_Sword;
end record;
pragma Convention (C_Pass_By_Copy, struct_04712804);
subtype Elf32_Rela is struct_04712804;
subtype Elf32_Nhdr is elf_common.Elf_Note;
type struct_2fc48ff8 is record
m_value : aliased Elf32_Lword;
m_info : aliased Elf32_Word;
m_poffset : aliased Elf32_Word;
m_repeat : aliased Elf32_Half;
m_stride : aliased Elf32_Half;
end record;
pragma Convention (C_Pass_By_Copy, struct_2fc48ff8);
subtype Elf32_Move is struct_2fc48ff8;
type union_ed01a622 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
c_val : Elf32_Word;
when others =>
c_ptr : Elf32_Addr;
end case;
end record;
pragma Unchecked_Union (union_ed01a622);
pragma Convention (C_Pass_By_Copy, union_ed01a622);
type struct_e784e152 is record
c_tag : aliased Elf32_Word;
c_un : aliased union_ed01a622;
end record;
pragma Convention (C_Pass_By_Copy, struct_e784e152);
subtype Elf32_Cap is struct_e784e152;
type struct_d8980635 is record
st_name : aliased Elf32_Word;
st_value : aliased Elf32_Addr;
st_size : aliased Elf32_Word;
st_info : aliased unsigned_char;
st_other : aliased unsigned_char;
st_shndx : aliased Elf32_Half;
end record;
pragma Convention (C_Pass_By_Copy, struct_d8980635);
subtype Elf32_Sym is struct_d8980635;
type struct_8241fd7f is record
vd_version : aliased Elf32_Half;
vd_flags : aliased Elf32_Half;
vd_ndx : aliased Elf32_Half;
vd_cnt : aliased Elf32_Half;
vd_hash : aliased Elf32_Word;
vd_aux : aliased Elf32_Word;
vd_next : aliased Elf32_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_8241fd7f);
subtype Elf32_Verdef is struct_8241fd7f;
type struct_c0f28b77 is record
vda_name : aliased Elf32_Word;
vda_next : aliased Elf32_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_c0f28b77);
subtype Elf32_Verdaux is struct_c0f28b77;
type struct_2a426af2 is record
vn_version : aliased Elf32_Half;
vn_cnt : aliased Elf32_Half;
vn_file : aliased Elf32_Word;
vn_aux : aliased Elf32_Word;
vn_next : aliased Elf32_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_2a426af2);
subtype Elf32_Verneed is struct_2a426af2;
type struct_0fd9151d is record
vna_hash : aliased Elf32_Word;
vna_flags : aliased Elf32_Half;
vna_other : aliased Elf32_Half;
vna_name : aliased Elf32_Word;
vna_next : aliased Elf32_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_0fd9151d);
subtype Elf32_Vernaux is struct_0fd9151d;
subtype Elf32_Versym is Elf32_Half;
type struct_221cb081 is record
si_boundto : aliased Elf32_Half;
si_flags : aliased Elf32_Half;
end record;
pragma Convention (C_Pass_By_Copy, struct_221cb081);
subtype Elf32_Syminfo is struct_221cb081;
-- ELF32_M_INFO (function macro)
-- ELF32_M_SIZE (function macro)
-- ELF32_M_SYM (function macro)
-- ELF32_R_INFO (function macro)
-- ELF32_R_SYM (function macro)
-- ELF32_R_TYPE (function macro)
-- ELF32_ST_BIND (function macro)
-- ELF32_ST_INFO (function macro)
-- ELF32_ST_TYPE (function macro)
-- ELF32_ST_VISIBILITY (function macro)
SYS_ELF32_H : constant := 1;
end C.sys.elf32;
Raw
c-sys-elf64.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stdint;
with C.sys.elf_common;
package C.sys.elf64 is
pragma Preelaborate;
subtype Elf64_Addr is stdint.uint64_t;
subtype Elf64_Half is stdint.uint16_t;
subtype Elf64_Off is stdint.uint64_t;
subtype Elf64_Sword is stdint.int32_t;
subtype Elf64_Sxword is stdint.int64_t;
subtype Elf64_Word is stdint.uint32_t;
subtype Elf64_Lword is stdint.uint64_t;
subtype Elf64_Xword is stdint.uint64_t;
subtype Elf64_Hashelt is Elf64_Word;
subtype Elf64_Size is Elf64_Xword;
subtype Elf64_Ssize is Elf64_Sxword;
type struct_921a1f84 is record
e_ident : aliased unsigned_char_array (0 .. 15);
e_type : aliased Elf64_Half;
e_machine : aliased Elf64_Half;
e_version : aliased Elf64_Word;
e_entry : aliased Elf64_Addr;
e_phoff : aliased Elf64_Off;
e_shoff : aliased Elf64_Off;
e_flags : aliased Elf64_Word;
e_ehsize : aliased Elf64_Half;
e_phentsize : aliased Elf64_Half;
e_phnum : aliased Elf64_Half;
e_shentsize : aliased Elf64_Half;
e_shnum : aliased Elf64_Half;
e_shstrndx : aliased Elf64_Half;
end record;
pragma Convention (C_Pass_By_Copy, struct_921a1f84);
subtype Elf64_Ehdr is struct_921a1f84;
type struct_6fce450b is record
sh_name : aliased Elf64_Word;
sh_type : aliased Elf64_Word;
sh_flags : aliased Elf64_Xword;
sh_addr : aliased Elf64_Addr;
sh_offset : aliased Elf64_Off;
sh_size : aliased Elf64_Xword;
sh_link : aliased Elf64_Word;
sh_info : aliased Elf64_Word;
sh_addralign : aliased Elf64_Xword;
sh_entsize : aliased Elf64_Xword;
end record;
pragma Convention (C_Pass_By_Copy, struct_6fce450b);
subtype Elf64_Shdr is struct_6fce450b;
type struct_6b067204 is record
p_type : aliased Elf64_Word;
p_flags : aliased Elf64_Word;
p_offset : aliased Elf64_Off;
p_vaddr : aliased Elf64_Addr;
p_paddr : aliased Elf64_Addr;
p_filesz : aliased Elf64_Xword;
p_memsz : aliased Elf64_Xword;
p_align : aliased Elf64_Xword;
end record;
pragma Convention (C_Pass_By_Copy, struct_6b067204);
subtype Elf64_Phdr is struct_6b067204;
type union_ff3bac19 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
d_val : Elf64_Xword;
when others =>
d_ptr : Elf64_Addr;
end case;
end record;
pragma Unchecked_Union (union_ff3bac19);
pragma Convention (C_Pass_By_Copy, union_ff3bac19);
type struct_40dc3d09 is record
d_tag : aliased Elf64_Sxword;
d_un : aliased union_ff3bac19;
end record;
pragma Convention (C_Pass_By_Copy, struct_40dc3d09);
subtype Elf64_Dyn is struct_40dc3d09;
type struct_d7062c72 is record
r_offset : aliased Elf64_Addr;
r_info : aliased Elf64_Xword;
end record;
pragma Convention (C_Pass_By_Copy, struct_d7062c72);
subtype Elf64_Rel is struct_d7062c72;
type struct_73dddb05 is record
r_offset : aliased Elf64_Addr;
r_info : aliased Elf64_Xword;
r_addend : aliased Elf64_Sxword;
end record;
pragma Convention (C_Pass_By_Copy, struct_73dddb05);
subtype Elf64_Rela is struct_73dddb05;
subtype Elf64_Nhdr is elf_common.Elf_Note;
type struct_c9b2d2a4 is record
m_value : aliased Elf64_Lword;
m_info : aliased Elf64_Xword;
m_poffset : aliased Elf64_Xword;
m_repeat : aliased Elf64_Half;
m_stride : aliased Elf64_Half;
end record;
pragma Convention (C_Pass_By_Copy, struct_c9b2d2a4);
subtype Elf64_Move is struct_c9b2d2a4;
type union_ed0fbff1 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
c_val : Elf64_Xword;
when others =>
c_ptr : Elf64_Addr;
end case;
end record;
pragma Unchecked_Union (union_ed0fbff1);
pragma Convention (C_Pass_By_Copy, union_ed0fbff1);
type struct_51ccf004 is record
c_tag : aliased Elf64_Xword;
c_un : aliased union_ed0fbff1;
end record;
pragma Convention (C_Pass_By_Copy, struct_51ccf004);
subtype Elf64_Cap is struct_51ccf004;
type struct_c151c2e7 is record
st_name : aliased Elf64_Word;
st_info : aliased unsigned_char;
st_other : aliased unsigned_char;
st_shndx : aliased Elf64_Half;
st_value : aliased Elf64_Addr;
st_size : aliased Elf64_Xword;
end record;
pragma Convention (C_Pass_By_Copy, struct_c151c2e7);
subtype Elf64_Sym is struct_c151c2e7;
type struct_531ebf7d is record
vd_version : aliased Elf64_Half;
vd_flags : aliased Elf64_Half;
vd_ndx : aliased Elf64_Half;
vd_cnt : aliased Elf64_Half;
vd_hash : aliased Elf64_Word;
vd_aux : aliased Elf64_Word;
vd_next : aliased Elf64_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_531ebf7d);
subtype Elf64_Verdef is struct_531ebf7d;
type struct_8d1214f8 is record
vda_name : aliased Elf64_Word;
vda_next : aliased Elf64_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_8d1214f8);
subtype Elf64_Verdaux is struct_8d1214f8;
type struct_f85c7dd7 is record
vn_version : aliased Elf64_Half;
vn_cnt : aliased Elf64_Half;
vn_file : aliased Elf64_Word;
vn_aux : aliased Elf64_Word;
vn_next : aliased Elf64_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_f85c7dd7);
subtype Elf64_Verneed is struct_f85c7dd7;
type struct_e91e01d7 is record
vna_hash : aliased Elf64_Word;
vna_flags : aliased Elf64_Half;
vna_other : aliased Elf64_Half;
vna_name : aliased Elf64_Word;
vna_next : aliased Elf64_Word;
end record;
pragma Convention (C_Pass_By_Copy, struct_e91e01d7);
subtype Elf64_Vernaux is struct_e91e01d7;
subtype Elf64_Versym is Elf64_Half;
type struct_9ec38ba1 is record
si_boundto : aliased Elf64_Half;
si_flags : aliased Elf64_Half;
end record;
pragma Convention (C_Pass_By_Copy, struct_9ec38ba1);
subtype Elf64_Syminfo is struct_9ec38ba1;
-- ELF64_M_INFO (function macro)
-- ELF64_M_SIZE (function macro)
-- ELF64_M_SYM (function macro)
-- ELF64_R_INFO (function macro)
-- ELF64_R_SYM (function macro)
-- ELF64_R_TYPE (function macro)
-- ELF64_R_TYPE_DATA (function macro)
-- ELF64_R_TYPE_ID (function macro)
-- ELF64_R_TYPE_INFO (function macro)
-- ELF64_ST_BIND (function macro)
-- ELF64_ST_INFO (function macro)
-- ELF64_ST_TYPE (function macro)
-- ELF64_ST_VISIBILITY (function macro)
SYS_ELF64_H : constant := 1;
end C.sys.elf64;
Raw
c-sys-elf_common.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.types;
package C.sys.elf_common is
pragma Preelaborate;
type struct_d15a1067 is record
n_namesz : aliased types.u_int32_t;
n_descsz : aliased types.u_int32_t;
n_type : aliased types.u_int32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_d15a1067);
subtype Elf_Note is struct_d15a1067;
type struct_6a986419 is record
gh_nbuckets : aliased types.u_int32_t;
gh_symndx : aliased types.u_int32_t;
gh_maskwords : aliased types.u_int32_t;
gh_shift2 : aliased types.u_int32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_6a986419);
subtype Elf_GNU_Hash_Header is struct_6a986419;
CA_SUNW_HW_1 : constant := 1;
CA_SUNW_NULL : constant := 0;
CA_SUNW_SF_1 : constant := 2;
DF_1_BIND_NOW : constant := 1;
DF_1_GLOBAL : constant := 2;
DF_1_LOADFLTR : constant := 16;
DF_1_NODEFLIB : constant := 2048;
DF_1_NODELETE : constant := 8;
DF_1_NOOPEN : constant := 64;
DF_1_ORIGIN : constant := 128;
DF_BIND_NOW : constant := 8;
DF_ORIGIN : constant := 1;
DF_STATIC_TLS : constant := 16;
DF_SYMBOLIC : constant := 2;
DF_TEXTREL : constant := 4;
DT_ADDRRNGHI : constant := 1879047935;
DT_ADDRRNGLO : constant := 1879047680;
DT_AUDIT : constant := 1879047932;
DT_AUXILIARY : constant := 2147483645;
DT_BIND_NOW : constant := 24;
DT_CHECKSUM : constant := 1879047672;
DT_CONFIG : constant := 1879047930;
DT_DEBUG : constant := 21;
DT_DEPAUDIT : constant := 1879047931;
DT_DEPRECATED_SPARC_REGISTER : constant := 117440513;
DT_ENCODING : constant := 32;
DT_FEATURE_1 : constant := 1879047676;
DT_FILTER : constant := 2147483647;
DT_FINI : constant := 13;
DT_FINI_ARRAY : constant := 26;
DT_FINI_ARRAYSZ : constant := 28;
DT_FLAGS : constant := 30;
DT_FLAGS_1 : constant := 1879048187;
DT_GNU_HASH : constant := 1879047925;
DT_HASH : constant := 4;
DT_HIOS : constant := 1879044096;
DT_HIPROC : constant := 2147483647;
DT_INIT : constant := 12;
DT_INIT_ARRAY : constant := 25;
DT_INIT_ARRAYSZ : constant := 27;
DT_JMPREL : constant := 23;
DT_LOOS : constant := 1610612749;
DT_LOPROC : constant := 1879048192;
DT_MAXPOSTAGS : constant := 34;
DT_MOVEENT : constant := 1879047674;
DT_MOVESZ : constant := 1879047675;
DT_MOVETAB : constant := 1879047934;
DT_NEEDED : constant := 1;
DT_NULL : constant := 0;
DT_PLTGOT : constant := 3;
DT_PLTPAD : constant := 1879047933;
DT_PLTPADSZ : constant := 1879047673;
DT_PLTREL : constant := 20;
DT_PLTRELSZ : constant := 2;
DT_POSFLAG_1 : constant := 1879047677;
DT_PREINIT_ARRAY : constant := 32;
DT_PREINIT_ARRAYSZ : constant := 33;
DT_REL : constant := 17;
DT_RELA : constant := 7;
DT_RELACOUNT : constant := 1879048185;
DT_RELAENT : constant := 9;
DT_RELASZ : constant := 8;
DT_RELCOUNT : constant := 1879048186;
DT_RELENT : constant := 19;
DT_RELSZ : constant := 18;
DT_RPATH : constant := 15;
DT_RUNPATH : constant := 29;
DT_SONAME : constant := 14;
DT_STRSZ : constant := 10;
DT_STRTAB : constant := 5;
DT_SUNW_AUXILIARY : constant := 1610612749;
DT_SUNW_CAP : constant := 1610612752;
DT_SUNW_FILTER : constant := 1610612751;
DT_SUNW_RTLDINF : constant := 1610612750;
DT_SYMBOLIC : constant := 16;
DT_SYMENT : constant := 11;
DT_SYMINENT : constant := 1879047679;
DT_SYMINFO : constant := 1879047935;
DT_SYMINSZ : constant := 1879047678;
DT_SYMTAB : constant := 6;
DT_TEXTREL : constant := 22;
DT_USED : constant := 2147483646;
DT_VALRNGHI : constant := 1879047679;
DT_VALRNGLO : constant := 1879047424;
DT_VERDEF : constant := 1879048188;
DT_VERDEFNUM : constant := 1879048189;
DT_VERNEED : constant := 1879048190;
DT_VERNEEDNUM : constant := 1879048191;
DT_VERSYM : constant := 1879048176;
EI_ABIVERSION : constant := 8;
EI_CLASS : constant := 4;
EI_DATA : constant := 5;
EI_MAG0 : constant := 0;
EI_MAG1 : constant := 1;
EI_MAG2 : constant := 2;
EI_MAG3 : constant := 3;
EI_NIDENT : constant := 16;
EI_OSABI : constant := 7;
EI_PAD : constant := 9;
EI_VERSION : constant := 6;
ELFCLASS32 : constant := 1;
ELFCLASS64 : constant := 2;
ELFCLASSNONE : constant := 0;
ELFDATA2LSB : constant := 1;
ELFDATA2MSB : constant := 2;
ELFDATANONE : constant := 0;
ELFMAG : constant char_array (0 .. 4) := char'Val (127) & "ELF"
& char'Val (0);
ELFMAG0 : constant := 127;
ELFMAG1 : constant char := 'E';
ELFMAG2 : constant char := 'L';
ELFMAG3 : constant char := 'F';
ELFOSABI_86OPEN : constant := 5;
ELFOSABI_AIX : constant := 7;
ELFOSABI_ARM : constant := 97;
ELFOSABI_AROS : constant := 15;
ELFOSABI_FREEBSD : constant := 9;
ELFOSABI_HPUX : constant := 1;
ELFOSABI_HURD : constant := 4;
ELFOSABI_IRIX : constant := 8;
ELFOSABI_LINUX : constant := 3;
ELFOSABI_MODESTO : constant := 11;
ELFOSABI_MONTEREY : constant := 7;
ELFOSABI_NETBSD : constant := 2;
ELFOSABI_NONE : constant := 0;
ELFOSABI_NSK : constant := 14;
ELFOSABI_OPENBSD : constant := 12;
ELFOSABI_OPENVMS : constant := 13;
ELFOSABI_SOLARIS : constant := 6;
ELFOSABI_STANDALONE : constant := 255;
ELFOSABI_SYSV : constant := 0;
ELFOSABI_TRU64 : constant := 10;
EM_386 : constant := 3;
EM_486 : constant := 6;
EM_68HC05 : constant := 72;
EM_68HC08 : constant := 71;
EM_68HC11 : constant := 70;
EM_68HC12 : constant := 53;
EM_68HC16 : constant := 69;
EM_68K : constant := 4;
EM_860 : constant := 7;
EM_88K : constant := 5;
EM_960 : constant := 19;
EM_ALPHA : constant := 36902;
EM_ALPHA_STD : constant := 41;
EM_AMD64 : constant := 62;
EM_ARC : constant := 45;
EM_ARCA : constant := 109;
EM_ARC_A5 : constant := 93;
EM_ARM : constant := 40;
EM_AVR : constant := 83;
EM_BLACKFIN : constant := 106;
EM_COLDFIRE : constant := 52;
EM_CR : constant := 103;
EM_CRIS : constant := 76;
EM_D10V : constant := 85;
EM_D30V : constant := 86;
EM_F2MC16 : constant := 104;
EM_FIREPATH : constant := 78;
EM_FR20 : constant := 37;
EM_FR30 : constant := 84;
EM_FX66 : constant := 66;
EM_H8S : constant := 48;
EM_H8_300 : constant := 46;
EM_H8_300H : constant := 47;
EM_H8_500 : constant := 49;
EM_HUANY : constant := 81;
EM_IA_64 : constant := 50;
EM_IP2K : constant := 101;
EM_JAVELIN : constant := 77;
EM_M32 : constant := 1;
EM_M32R : constant := 88;
EM_MAX : constant := 102;
EM_ME16 : constant := 59;
EM_MIPS : constant := 8;
EM_MIPS_RS3_LE : constant := 10;
EM_MIPS_RS4_BE : constant := 10;
EM_MIPS_X : constant := 51;
EM_MMA : constant := 54;
EM_MMIX : constant := 80;
EM_MN10200 : constant := 90;
EM_MN10300 : constant := 89;
EM_MSP430 : constant := 105;
EM_NCPU : constant := 56;
EM_NDR1 : constant := 57;
EM_NONE : constant := 0;
EM_NS32K : constant := 97;
EM_OPENRISC : constant := 92;
EM_PARISC : constant := 15;
EM_PCP : constant := 55;
EM_PDSP : constant := 63;
EM_PJ : constant := 91;
EM_PPC : constant := 20;
EM_PPC64 : constant := 21;
EM_PRISM : constant := 82;
EM_RCE : constant := 39;
EM_RH32 : constant := 38;
EM_S370 : constant := 9;
EM_S390 : constant := 22;
EM_SEP : constant := 108;
EM_SE_C33 : constant := 107;
EM_SH : constant := 42;
EM_SNP1K : constant := 99;
EM_SPARC : constant := 2;
EM_SPARC32PLUS : constant := 18;
EM_SPARCV9 : constant := 43;
EM_ST100 : constant := 60;
EM_ST19 : constant := 74;
EM_ST200 : constant := 100;
EM_ST7 : constant := 68;
EM_ST9PLUS : constant := 67;
EM_STARCORE : constant := 58;
EM_SVX : constant := 73;
EM_TINYJ : constant := 61;
EM_TMM_GPP : constant := 96;
EM_TPC : constant := 98;
EM_TRICORE : constant := 44;
EM_UNICORE : constant := 110;
EM_V800 : constant := 36;
EM_V850 : constant := 87;
EM_VAX : constant := 75;
EM_VIDEOCORE : constant := 95;
EM_VPP500 : constant := 17;
EM_X86_64 : constant := 62;
EM_XTENSA : constant := 94;
EM_ZSP : constant := 79;
ET_CORE : constant := 4;
ET_DYN : constant := 3;
ET_EXEC : constant := 2;
ET_HIOS : constant := 65279;
ET_HIPROC : constant := 65535;
ET_LOOS : constant := 65024;
ET_LOPROC : constant := 65280;
ET_NONE : constant := 0;
ET_REL : constant := 1;
EV_CURRENT : constant := 1;
EV_NONE : constant := 0;
-- IS_ELF (uninterpretable)
NT_FPREGSET : constant := 2;
NT_PRPSINFO : constant := 3;
NT_PRSTATUS : constant := 1;
NT_THRMISC : constant := 7;
OLD_EI_BRAND : constant := 8;
PF_MASKOS : constant := 267386880;
PF_MASKPROC : constant := -268435456;
PF_R : constant := 4;
PF_W : constant := 2;
PF_X : constant := 1;
PN_XNUM : constant := 65535;
PT_DYNAMIC : constant := 2;
PT_GNU_EH_FRAME : constant := 1685382480;
PT_GNU_RELRO : constant := 1685382482;
PT_GNU_STACK : constant := 1685382481;
PT_HIOS : constant := 1879048191;
PT_HIPROC : constant := 2147483647;
PT_HISUNW : constant := 1879048191;
PT_INTERP : constant := 3;
PT_LOAD : constant := 1;
PT_LOOS : constant := 1610612736;
PT_LOPROC : constant := 1879048192;
PT_LOSUNW : constant := 1879048186;
PT_NOTE : constant := 4;
PT_NULL : constant := 0;
PT_PHDR : constant := 6;
PT_SHLIB : constant := 5;
PT_SUNWBSS : constant := 1879048186;
PT_SUNWCAP : constant := 1879048189;
PT_SUNWDTRACE : constant := 1879048188;
PT_SUNWSTACK : constant := 1879048187;
PT_SUNW_UNWIND : constant := 1684333904;
PT_TLS : constant := 7;
R_386_32 : constant := 1;
R_386_COPY : constant := 5;
R_386_GLOB_DAT : constant := 6;
R_386_GOT32 : constant := 3;
R_386_GOTOFF : constant := 9;
R_386_GOTPC : constant := 10;
R_386_JMP_SLOT : constant := 7;
R_386_NONE : constant := 0;
R_386_PC32 : constant := 2;
R_386_PLT32 : constant := 4;
R_386_RELATIVE : constant := 8;
R_386_TLS_DTPMOD32 : constant := 35;
R_386_TLS_DTPOFF32 : constant := 36;
R_386_TLS_GD : constant := 18;
R_386_TLS_GD_32 : constant := 24;
R_386_TLS_GD_CALL : constant := 26;
R_386_TLS_GD_POP : constant := 27;
R_386_TLS_GD_PUSH : constant := 25;
R_386_TLS_GOTIE : constant := 16;
R_386_TLS_IE : constant := 15;
R_386_TLS_IE_32 : constant := 33;
R_386_TLS_LDM : constant := 19;
R_386_TLS_LDM_32 : constant := 28;
R_386_TLS_LDM_CALL : constant := 30;
R_386_TLS_LDM_POP : constant := 31;
R_386_TLS_LDM_PUSH : constant := 29;
R_386_TLS_LDO_32 : constant := 32;
R_386_TLS_LE : constant := 17;
R_386_TLS_LE_32 : constant := 34;
R_386_TLS_TPOFF : constant := 14;
R_386_TLS_TPOFF32 : constant := 37;
R_ARM_ABS12 : constant := 6;
R_ARM_ABS16 : constant := 5;
R_ARM_ABS32 : constant := 2;
R_ARM_ABS8 : constant := 8;
R_ARM_AMP_VCALL9 : constant := 12;
R_ARM_COPY : constant := 20;
R_ARM_GLOB_DAT : constant := 21;
R_ARM_GNU_VTENTRY : constant := 100;
R_ARM_GNU_VTINHERIT : constant := 101;
R_ARM_GOT32 : constant := 26;
R_ARM_GOTOFF : constant := 24;
R_ARM_GOTPC : constant := 25;
R_ARM_JUMP_SLOT : constant := 22;
R_ARM_NONE : constant := 0;
R_ARM_PC13 : constant := 4;
R_ARM_PC24 : constant := 1;
R_ARM_PLT32 : constant := 27;
R_ARM_RABS32 : constant := 253;
R_ARM_RBASE : constant := 255;
R_ARM_REL32 : constant := 3;
R_ARM_RELATIVE : constant := 23;
R_ARM_RPC24 : constant := 254;
R_ARM_RREL32 : constant := 252;
R_ARM_RSBREL32 : constant := 250;
R_ARM_SBREL32 : constant := 9;
R_ARM_SWI24 : constant := 13;
R_ARM_THM_ABS5 : constant := 7;
R_ARM_THM_PC22 : constant := 10;
R_ARM_THM_PC8 : constant := 11;
R_ARM_THM_RPC22 : constant := 251;
R_ARM_THM_SWI8 : constant := 14;
R_ARM_THM_XPC22 : constant := 16;
R_ARM_TLS_DTPMOD32 : constant := 17;
R_ARM_TLS_DTPOFF32 : constant := 18;
R_ARM_TLS_TPOFF32 : constant := 19;
R_ARM_XPC25 : constant := 15;
R_IA_64_DIR32LSB : constant := 37;
R_IA_64_DIR32MSB : constant := 36;
R_IA_64_DIR64LSB : constant := 39;
R_IA_64_DIR64MSB : constant := 38;
R_IA_64_DTPMOD64LSB : constant := 167;
R_IA_64_DTPMOD64MSB : constant := 166;
R_IA_64_DTPREL14 : constant := 177;
R_IA_64_DTPREL22 : constant := 178;
R_IA_64_DTPREL32LSB : constant := 181;
R_IA_64_DTPREL32MSB : constant := 180;
R_IA_64_DTPREL64I : constant := 179;
R_IA_64_DTPREL64LSB : constant := 183;
R_IA_64_DTPREL64MSB : constant := 182;
R_IA_64_FPTR32LSB : constant := 69;
R_IA_64_FPTR32MSB : constant := 68;
R_IA_64_FPTR64I : constant := 67;
R_IA_64_FPTR64LSB : constant := 71;
R_IA_64_FPTR64MSB : constant := 70;
R_IA_64_GPREL22 : constant := 42;
R_IA_64_GPREL32LSB : constant := 45;
R_IA_64_GPREL32MSB : constant := 44;
R_IA_64_GPREL64I : constant := 43;
R_IA_64_GPREL64LSB : constant := 47;
R_IA_64_GPREL64MSB : constant := 46;
R_IA_64_IMM14 : constant := 33;
R_IA_64_IMM22 : constant := 34;
R_IA_64_IMM64 : constant := 35;
R_IA_64_IPLTLSB : constant := 129;
R_IA_64_IPLTMSB : constant := 128;
R_IA_64_LDXMOV : constant := 135;
R_IA_64_LTOFF22 : constant := 50;
R_IA_64_LTOFF22X : constant := 134;
R_IA_64_LTOFF64I : constant := 51;
R_IA_64_LTOFF_DTPMOD22 : constant := 170;
R_IA_64_LTOFF_DTPREL22 : constant := 186;
R_IA_64_LTOFF_FPTR22 : constant := 82;
R_IA_64_LTOFF_FPTR32LSB : constant := 85;
R_IA_64_LTOFF_FPTR32MSB : constant := 84;
R_IA_64_LTOFF_FPTR64I : constant := 83;
R_IA_64_LTOFF_FPTR64LSB : constant := 87;
R_IA_64_LTOFF_FPTR64MSB : constant := 86;
R_IA_64_LTOFF_TPREL22 : constant := 154;
R_IA_64_LTV32LSB : constant := 117;
R_IA_64_LTV32MSB : constant := 116;
R_IA_64_LTV64LSB : constant := 119;
R_IA_64_LTV64MSB : constant := 118;
R_IA_64_NONE : constant := 0;
R_IA_64_PCREL21B : constant := 73;
R_IA_64_PCREL21BI : constant := 121;
R_IA_64_PCREL21F : constant := 75;
R_IA_64_PCREL21M : constant := 74;
R_IA_64_PCREL22 : constant := 122;
R_IA_64_PCREL32LSB : constant := 77;
R_IA_64_PCREL32MSB : constant := 76;
R_IA_64_PCREL60B : constant := 72;
R_IA_64_PCREL64I : constant := 123;
R_IA_64_PCREL64LSB : constant := 79;
R_IA_64_PCREL64MSB : constant := 78;
R_IA_64_PLTOFF22 : constant := 58;
R_IA_64_PLTOFF64I : constant := 59;
R_IA_64_PLTOFF64LSB : constant := 63;
R_IA_64_PLTOFF64MSB : constant := 62;
R_IA_64_REL32LSB : constant := 109;
R_IA_64_REL32MSB : constant := 108;
R_IA_64_REL64LSB : constant := 111;
R_IA_64_REL64MSB : constant := 110;
R_IA_64_SECREL32LSB : constant := 101;
R_IA_64_SECREL32MSB : constant := 100;
R_IA_64_SECREL64LSB : constant := 103;
R_IA_64_SECREL64MSB : constant := 102;
R_IA_64_SEGREL32LSB : constant := 93;
R_IA_64_SEGREL32MSB : constant := 92;
R_IA_64_SEGREL64LSB : constant := 95;
R_IA_64_SEGREL64MSB : constant := 94;
R_IA_64_SUB : constant := 133;
R_IA_64_TPREL14 : constant := 145;
R_IA_64_TPREL22 : constant := 146;
R_IA_64_TPREL64I : constant := 147;
R_IA_64_TPREL64LSB : constant := 151;
R_IA_64_TPREL64MSB : constant := 150;
R_MIPS_16 : constant := 1;
R_MIPS_26 : constant := 4;
R_MIPS_32 : constant := 2;
R_MIPS_CALL16 : constant := 11;
R_MIPS_CALLHI16 : constant := 30;
R_MIPS_CALLLO16 : constant := 31;
R_MIPS_GOT16 : constant := 9;
R_MIPS_GOTHI16 : constant := 21;
R_MIPS_GOTLO16 : constant := 22;
R_MIPS_GPREL16 : constant := 7;
R_MIPS_GPREL32 : constant := 12;
R_MIPS_HI16 : constant := 5;
R_MIPS_LITERAL : constant := 8;
R_MIPS_LO16 : constant := 6;
R_MIPS_NONE : constant := 0;
R_MIPS_PC16 : constant := 10;
R_MIPS_REL32 : constant := 3;
R_PPC_ADDR14 : constant := 7;
R_PPC_ADDR14_BRNTAKEN : constant := 9;
R_PPC_ADDR14_BRTAKEN : constant := 8;
R_PPC_ADDR16 : constant := 3;
R_PPC_ADDR16_HA : constant := 6;
R_PPC_ADDR16_HI : constant := 5;
R_PPC_ADDR16_LO : constant := 4;
R_PPC_ADDR24 : constant := 2;
R_PPC_ADDR32 : constant := 1;
R_PPC_COPY : constant := 19;
R_PPC_DTPMOD32 : constant := 68;
R_PPC_DTPREL16 : constant := 74;
R_PPC_DTPREL16_HA : constant := 77;
R_PPC_DTPREL16_HI : constant := 76;
R_PPC_DTPREL16_LO : constant := 75;
R_PPC_DTPREL32 : constant := 78;
R_PPC_EMB_BIT_FLD : constant := 115;
R_PPC_EMB_MRKREF : constant := 110;
R_PPC_EMB_NADDR16 : constant := 102;
R_PPC_EMB_NADDR16_HA : constant := 105;
R_PPC_EMB_NADDR16_HI : constant := 104;
R_PPC_EMB_NADDR16_LO : constant := 103;
R_PPC_EMB_NADDR32 : constant := 101;
R_PPC_EMB_RELSDA : constant := 116;
R_PPC_EMB_RELSEC16 : constant := 111;
R_PPC_EMB_RELST_HA : constant := 114;
R_PPC_EMB_RELST_HI : constant := 113;
R_PPC_EMB_RELST_LO : constant := 112;
R_PPC_EMB_SDA21 : constant := 109;
R_PPC_EMB_SDA2I16 : constant := 107;
R_PPC_EMB_SDA2REL : constant := 108;
R_PPC_EMB_SDAI16 : constant := 106;
R_PPC_GLOB_DAT : constant := 20;
R_PPC_GOT16 : constant := 14;
R_PPC_GOT16_HA : constant := 17;
R_PPC_GOT16_HI : constant := 16;
R_PPC_GOT16_LO : constant := 15;
R_PPC_GOT_TLSGD16 : constant := 79;
R_PPC_GOT_TLSGD16_HA : constant := 82;
R_PPC_GOT_TLSGD16_HI : constant := 81;
R_PPC_GOT_TLSGD16_LO : constant := 80;
R_PPC_GOT_TLSLD16 : constant := 83;
R_PPC_GOT_TLSLD16_HA : constant := 86;
R_PPC_GOT_TLSLD16_HI : constant := 85;
R_PPC_GOT_TLSLD16_LO : constant := 84;
R_PPC_GOT_TPREL16 : constant := 87;
R_PPC_GOT_TPREL16_HA : constant := 90;
R_PPC_GOT_TPREL16_HI : constant := 89;
R_PPC_GOT_TPREL16_LO : constant := 88;
R_PPC_JMP_SLOT : constant := 21;
R_PPC_LOCAL24PC : constant := 23;
R_PPC_NONE : constant := 0;
R_PPC_PLT16_HA : constant := 31;
R_PPC_PLT16_HI : constant := 30;
R_PPC_PLT16_LO : constant := 29;
R_PPC_PLT32 : constant := 27;
R_PPC_PLTREL24 : constant := 18;
R_PPC_PLTREL32 : constant := 28;
R_PPC_REL14 : constant := 11;
R_PPC_REL14_BRNTAKEN : constant := 13;
R_PPC_REL14_BRTAKEN : constant := 12;
R_PPC_REL24 : constant := 10;
R_PPC_REL32 : constant := 26;
R_PPC_RELATIVE : constant := 22;
R_PPC_SDAREL16 : constant := 32;
R_PPC_SECTOFF : constant := 33;
R_PPC_SECTOFF_HA : constant := 36;
R_PPC_SECTOFF_HI : constant := 35;
R_PPC_SECTOFF_LO : constant := 34;
R_PPC_TLS : constant := 67;
R_PPC_TPREL16 : constant := 69;
R_PPC_TPREL16_HA : constant := 72;
R_PPC_TPREL16_HI : constant := 71;
R_PPC_TPREL16_LO : constant := 70;
R_PPC_TPREL32 : constant := 73;
R_PPC_UADDR16 : constant := 25;
R_PPC_UADDR32 : constant := 24;
R_SPARC_10 : constant := 30;
R_SPARC_11 : constant := 31;
R_SPARC_13 : constant := 11;
R_SPARC_16 : constant := 2;
R_SPARC_22 : constant := 10;
R_SPARC_32 : constant := 3;
R_SPARC_5 : constant := 44;
R_SPARC_6 : constant := 45;
R_SPARC_64 : constant := 32;
R_SPARC_7 : constant := 43;
R_SPARC_8 : constant := 1;
R_SPARC_COPY : constant := 19;
R_SPARC_DISP16 : constant := 5;
R_SPARC_DISP32 : constant := 6;
R_SPARC_DISP64 : constant := 46;
R_SPARC_DISP8 : constant := 4;
R_SPARC_GLOB_DAT : constant := 20;
R_SPARC_GLOB_JMP : constant := 42;
R_SPARC_GOT10 : constant := 13;
R_SPARC_GOT13 : constant := 14;
R_SPARC_GOT22 : constant := 15;
R_SPARC_H44 : constant := 50;
R_SPARC_HH22 : constant := 34;
R_SPARC_HI22 : constant := 9;
R_SPARC_HIPLT22 : constant := 25;
R_SPARC_HIX22 : constant := 48;
R_SPARC_HM10 : constant := 35;
R_SPARC_JMP_SLOT : constant := 21;
R_SPARC_L44 : constant := 52;
R_SPARC_LM22 : constant := 36;
R_SPARC_LO10 : constant := 12;
R_SPARC_LOPLT10 : constant := 26;
R_SPARC_LOX10 : constant := 49;
R_SPARC_M44 : constant := 51;
R_SPARC_NONE : constant := 0;
R_SPARC_OLO10 : constant := 33;
R_SPARC_PC10 : constant := 16;
R_SPARC_PC22 : constant := 17;
R_SPARC_PCPLT10 : constant := 29;
R_SPARC_PCPLT22 : constant := 28;
R_SPARC_PCPLT32 : constant := 27;
R_SPARC_PC_HH22 : constant := 37;
R_SPARC_PC_HM10 : constant := 38;
R_SPARC_PC_LM22 : constant := 39;
R_SPARC_PLT32 : constant := 24;
R_SPARC_PLT64 : constant := 47;
R_SPARC_REGISTER : constant := 53;
R_SPARC_RELATIVE : constant := 22;
R_SPARC_TLS_DTPMOD32 : constant := 74;
R_SPARC_TLS_DTPMOD64 : constant := 75;
R_SPARC_TLS_DTPOFF32 : constant := 76;
R_SPARC_TLS_DTPOFF64 : constant := 77;
R_SPARC_TLS_GD_ADD : constant := 58;
R_SPARC_TLS_GD_CALL : constant := 59;
R_SPARC_TLS_GD_HI22 : constant := 56;
R_SPARC_TLS_GD_LO10 : constant := 57;
R_SPARC_TLS_IE_ADD : constant := 71;
R_SPARC_TLS_IE_HI22 : constant := 67;
R_SPARC_TLS_IE_LD : constant := 69;
R_SPARC_TLS_IE_LDX : constant := 70;
R_SPARC_TLS_IE_LO10 : constant := 68;
R_SPARC_TLS_LDM_ADD : constant := 62;
R_SPARC_TLS_LDM_CALL : constant := 63;
R_SPARC_TLS_LDM_HI22 : constant := 60;
R_SPARC_TLS_LDM_LO10 : constant := 61;
R_SPARC_TLS_LDO_ADD : constant := 66;
R_SPARC_TLS_LDO_HIX22 : constant := 64;
R_SPARC_TLS_LDO_LOX10 : constant := 65;
R_SPARC_TLS_LE_HIX22 : constant := 72;
R_SPARC_TLS_LE_LOX10 : constant := 73;
R_SPARC_TLS_TPOFF32 : constant := 78;
R_SPARC_TLS_TPOFF64 : constant := 79;
R_SPARC_UA16 : constant := 55;
R_SPARC_UA32 : constant := 23;
R_SPARC_UA64 : constant := 54;
R_SPARC_WDISP16 : constant := 40;
R_SPARC_WDISP19 : constant := 41;
R_SPARC_WDISP22 : constant := 8;
R_SPARC_WDISP30 : constant := 7;
R_SPARC_WPLT30 : constant := 18;
R_X86_64_16 : constant := 12;
R_X86_64_32 : constant := 10;
R_X86_64_32S : constant := 11;
R_X86_64_64 : constant := 1;
R_X86_64_8 : constant := 14;
R_X86_64_COPY : constant := 5;
R_X86_64_DTPMOD64 : constant := 16;
R_X86_64_DTPOFF32 : constant := 21;
R_X86_64_DTPOFF64 : constant := 17;
R_X86_64_GLOB_DAT : constant := 6;
R_X86_64_GOT32 : constant := 3;
R_X86_64_GOTPCREL : constant := 9;
R_X86_64_GOTTPOFF : constant := 22;
R_X86_64_JMP_SLOT : constant := 7;
R_X86_64_NONE : constant := 0;
R_X86_64_PC16 : constant := 13;
R_X86_64_PC32 : constant := 2;
R_X86_64_PC8 : constant := 15;
R_X86_64_PLT32 : constant := 4;
R_X86_64_RELATIVE : constant := 8;
R_X86_64_TLSGD : constant := 19;
R_X86_64_TLSLD : constant := 20;
R_X86_64_TPOFF32 : constant := 23;
R_X86_64_TPOFF64 : constant := 18;
SELFMAG : constant := 4;
SHF_ALLOC : constant := 2;
SHF_EXECINSTR : constant := 4;
SHF_GROUP : constant := 512;
SHF_INFO_LINK : constant := 64;
SHF_LINK_ORDER : constant := 128;
SHF_MASKOS : constant := 267386880;
SHF_MASKPROC : constant := -268435456;
SHF_MERGE : constant := 16;
SHF_OS_NONCONFORMING : constant := 256;
SHF_STRINGS : constant := 32;
SHF_TLS : constant := 1024;
SHF_WRITE : constant := 1;
SHN_ABS : constant := 65521;
SHN_COMMON : constant := 65522;
SHN_HIOS : constant := 65343;
SHN_HIPROC : constant := 65311;
SHN_HIRESERVE : constant := 65535;
SHN_LOOS : constant := 65312;
SHN_LOPROC : constant := 65280;
SHN_LORESERVE : constant := 65280;
SHN_UNDEF : constant := 0;
SHN_XINDEX : constant := 65535;
SHT_AMD64_UNWIND : constant := 1879048193;
SHT_DYNAMIC : constant := 6;
SHT_DYNSYM : constant := 11;
SHT_FINI_ARRAY : constant := 15;
SHT_GNU_HASH : constant := 1879048182;
SHT_GNU_verdef : constant := 1879048189;
SHT_GNU_verneed : constant := 1879048190;
SHT_GNU_versym : constant := 1879048191;
SHT_GROUP : constant := 17;
SHT_HASH : constant := 5;
SHT_HIOS : constant := 1879048191;
SHT_HIPROC : constant := 2147483647;
SHT_HISUNW : constant := 1879048191;
SHT_HIUSER : constant := -1;
SHT_INIT_ARRAY : constant := 14;
SHT_LOOS : constant := 1610612736;
SHT_LOPROC : constant := 1879048192;
SHT_LOSUNW : constant := 1879048180;
SHT_LOUSER : constant := -2147483648;
SHT_NOBITS : constant := 8;
SHT_NOTE : constant := 7;
SHT_NULL : constant := 0;
SHT_PREINIT_ARRAY : constant := 16;
SHT_PROGBITS : constant := 1;
SHT_REL : constant := 9;
SHT_RELA : constant := 4;
SHT_SHLIB : constant := 10;
SHT_STRTAB : constant := 3;
SHT_SUNW_ANNOTATE : constant := 1879048183;
SHT_SUNW_COMDAT : constant := 1879048187;
SHT_SUNW_DEBUG : constant := 1879048185;
SHT_SUNW_DEBUGSTR : constant := 1879048184;
SHT_SUNW_SIGNATURE : constant := 1879048182;
SHT_SUNW_cap : constant := 1879048181;
SHT_SUNW_dof : constant := 1879048180;
SHT_SUNW_move : constant := 1879048186;
SHT_SUNW_syminfo : constant := 1879048188;
SHT_SUNW_verdef : constant := 1879048189;
SHT_SUNW_verneed : constant := 1879048190;
SHT_SUNW_versym : constant := 1879048191;
SHT_SYMTAB : constant := 2;
SHT_SYMTAB_SHNDX : constant := 18;
STB_GLOBAL : constant := 1;
STB_HIOS : constant := 12;
STB_HIPROC : constant := 15;
STB_LOCAL : constant := 0;
STB_LOOS : constant := 10;
STB_LOPROC : constant := 13;
STB_WEAK : constant := 2;
STN_UNDEF : constant := 0;
STT_COMMON : constant := 5;
STT_FILE : constant := 4;
STT_FUNC : constant := 2;
STT_HIOS : constant := 12;
STT_HIPROC : constant := 15;
STT_LOOS : constant := 10;
STT_LOPROC : constant := 13;
STT_NOTYPE : constant := 0;
STT_NUM : constant := 7;
STT_OBJECT : constant := 1;
STT_SECTION : constant := 3;
STT_TLS : constant := 6;
STV_DEFAULT : constant := 0;
STV_ELIMINATE : constant := 6;
STV_EXPORTED : constant := 4;
STV_HIDDEN : constant := 2;
STV_INTERNAL : constant := 1;
STV_PROTECTED : constant := 3;
STV_SINGLETON : constant := 5;
SYMINFO_BT_EXTERN : constant := 65532;
SYMINFO_BT_LOWRESERVE : constant := 65280;
SYMINFO_BT_NONE : constant := 65533;
SYMINFO_BT_PARENT : constant := 65534;
SYMINFO_BT_SELF : constant := 65535;
SYMINFO_CURRENT : constant := 1;
SYMINFO_FLG_AUXILIARY : constant := 64;
SYMINFO_FLG_COPY : constant := 4;
SYMINFO_FLG_DIRECT : constant := 1;
SYMINFO_FLG_DIRECTBIND : constant := 16;
SYMINFO_FLG_FILTER : constant := 2;
SYMINFO_FLG_LAZYLOAD : constant := 8;
SYMINFO_FLG_NOEXTDIRECT : constant := 32;
SYMINFO_FLG_PASSTHRU : constant := 2;
SYMINFO_NONE : constant := 0;
SYMINFO_NUM : constant := 2;
VER_DEF_CURRENT : constant := 1;
-- VER_DEF_IDX (function macro)
VER_FLG_BASE : constant := 1;
VER_FLG_WEAK : constant := 2;
-- VER_NDX (function macro)
VER_NDX_GIVEN : constant := 2;
VER_NDX_GLOBAL : constant := 1;
VER_NDX_HIDDEN : constant := 32768;
VER_NDX_LOCAL : constant := 0;
VER_NEED_CURRENT : constant := 1;
VER_NEED_HIDDEN : constant := 32768;
-- VER_NEED_IDX (function macro)
VER_NEED_WEAK : constant := 32768;
SYS_ELF_COMMON_H : constant := 1;
end C.sys.elf_common;
Raw
c-sys-elf_generic.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.elf32;
package C.sys.elf_generic is
pragma Preelaborate;
subtype Elf_Addr is elf32.Elf32_Addr;
subtype Elf_Half is elf32.Elf32_Half;
subtype Elf_Off is elf32.Elf32_Off;
subtype Elf_Sword is elf32.Elf32_Sword;
subtype Elf_Word is elf32.Elf32_Word;
subtype Elf_Ehdr is elf32.Elf32_Ehdr;
subtype Elf_Shdr is elf32.Elf32_Shdr;
subtype Elf_Phdr is elf32.Elf32_Phdr;
subtype Elf_Phdr_const_ptr is elf32.Elf32_Phdr_const_ptr;
subtype Elf_Dyn is elf32.Elf32_Dyn;
subtype Elf_Rel is elf32.Elf32_Rel;
subtype Elf_Rela is elf32.Elf32_Rela;
subtype Elf_Sym is elf32.Elf32_Sym;
subtype Elf_Verdef is elf32.Elf32_Verdef;
subtype Elf_Verdaux is elf32.Elf32_Verdaux;
subtype Elf_Verneed is elf32.Elf32_Verneed;
subtype Elf_Vernaux is elf32.Elf32_Vernaux;
subtype Elf_Versym is elf32.Elf32_Versym;
subtype Elf_Hashelt is elf32.Elf32_Hashelt;
subtype Elf_Size is elf32.Elf32_Size;
subtype Elf_Ssize is elf32.Elf32_Ssize;
ELF_CLASS : constant := 1;
ELF_DATA : constant := 1;
-- ELF_R_INFO (function macro)
-- ELF_R_SYM (function macro)
-- ELF_R_TYPE (function macro)
-- ELF_ST_BIND (function macro)
-- ELF_ST_INFO (function macro)
-- ELF_ST_TYPE (function macro)
SYS_ELF_GENERIC_H : constant := 1;
-- __ELFN (unparsible)
-- __ElfN (unparsible)
-- __ElfType (unparsible)
-- __elfN (unparsible)
end C.sys.elf_generic;
Raw
c-sys-file.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.fcntl;
with C.stddef;
with C.sys.types;
package C.sys.file is
pragma Preelaborate;
subtype struct_flock is C.fcntl.struct_flock;
subtype struct_oflock is C.fcntl.struct_oflock;
function open (a1 : access constant char; a2 : signed_int)
return signed_int renames C.fcntl.open;
function open (a1 : access constant char; a2 : signed_int;
a3 : types.mode_t) return signed_int renames C.fcntl.open;
function creat (a1 : access constant char; a2 : types.mode_t)
return signed_int renames C.fcntl.creat;
function fcntl (a1 : signed_int; a2 : signed_int) return signed_int
renames C.fcntl.fcntl;
function fcntl (a1 : signed_int; a2 : signed_int; a3 : signed_int)
return signed_int renames C.fcntl.fcntl;
function openat (a1 : signed_int; a2 : access constant char;
a3 : signed_int) return signed_int renames C.fcntl.openat;
function posix_fadvise (a1 : signed_int; a2 : types.off_t;
a3 : types.off_t; a4 : signed_int) return signed_int
renames C.fcntl.posix_fadvise;
function posix_fallocate (a1 : signed_int; a2 : types.off_t;
a3 : types.off_t) return signed_int renames C.fcntl.posix_fallocate;
function flock (a1 : signed_int; a2 : signed_int) return signed_int
renames C.fcntl.flock;
AT_EACCESS : constant := C.fcntl.AT_EACCESS;
AT_FDCWD : constant := C.fcntl.AT_FDCWD;
AT_REMOVEDIR : constant := C.fcntl.AT_REMOVEDIR;
AT_SYMLINK_FOLLOW : constant := C.fcntl.AT_SYMLINK_FOLLOW;
AT_SYMLINK_NOFOLLOW : constant := C.fcntl.AT_SYMLINK_NOFOLLOW;
FAPPEND : constant := C.fcntl.FAPPEND;
FASYNC : constant := C.fcntl.FASYNC;
FD_CLOEXEC : constant := C.fcntl.FD_CLOEXEC;
FFSYNC : constant := C.fcntl.FFSYNC;
FNDELAY : constant := C.fcntl.FNDELAY;
FNONBLOCK : constant := C.fcntl.FNONBLOCK;
FRDAHEAD : constant := C.fcntl.FRDAHEAD;
FREAD : constant := C.fcntl.FREAD;
FWRITE : constant := C.fcntl.FWRITE;
F_CANCEL : constant := C.fcntl.F_CANCEL;
F_DUP2FD : constant := C.fcntl.F_DUP2FD;
F_DUP2FD_CLOEXEC : constant := C.fcntl.F_DUP2FD_CLOEXEC;
F_DUPFD : constant := C.fcntl.F_DUPFD;
F_DUPFD_CLOEXEC : constant := C.fcntl.F_DUPFD_CLOEXEC;
F_GETFD : constant := C.fcntl.F_GETFD;
F_GETFL : constant := C.fcntl.F_GETFL;
F_GETLK : constant := C.fcntl.F_GETLK;
F_GETOWN : constant := C.fcntl.F_GETOWN;
F_OGETLK : constant := C.fcntl.F_OGETLK;
F_OSETLK : constant := C.fcntl.F_OSETLK;
F_OSETLKW : constant := C.fcntl.F_OSETLKW;
F_RDAHEAD : constant := C.fcntl.F_RDAHEAD;
F_RDLCK : constant := C.fcntl.F_RDLCK;
F_READAHEAD : constant := C.fcntl.F_READAHEAD;
F_SETFD : constant := C.fcntl.F_SETFD;
F_SETFL : constant := C.fcntl.F_SETFL;
F_SETLK : constant := C.fcntl.F_SETLK;
F_SETLKW : constant := C.fcntl.F_SETLKW;
F_SETLK_REMOTE : constant := C.fcntl.F_SETLK_REMOTE;
F_SETOWN : constant := C.fcntl.F_SETOWN;
F_UNLCK : constant := C.fcntl.F_UNLCK;
F_UNLCKSYS : constant := C.fcntl.F_UNLCKSYS;
F_WRLCK : constant := C.fcntl.F_WRLCK;
LOCK_EX : constant := C.fcntl.LOCK_EX;
LOCK_NB : constant := C.fcntl.LOCK_NB;
LOCK_SH : constant := C.fcntl.LOCK_SH;
LOCK_UN : constant := C.fcntl.LOCK_UN;
O_ACCMODE : constant := C.fcntl.O_ACCMODE;
O_APPEND : constant := C.fcntl.O_APPEND;
O_ASYNC : constant := C.fcntl.O_ASYNC;
O_CLOEXEC : constant := C.fcntl.O_CLOEXEC;
O_CREAT : constant := C.fcntl.O_CREAT;
O_DIRECT : constant := C.fcntl.O_DIRECT;
O_DIRECTORY : constant := C.fcntl.O_DIRECTORY;
O_EXCL : constant := C.fcntl.O_EXCL;
O_EXEC : constant := C.fcntl.O_EXEC;
O_EXLOCK : constant := C.fcntl.O_EXLOCK;
O_FSYNC : constant := C.fcntl.O_FSYNC;
O_NDELAY : constant := C.fcntl.O_NDELAY;
O_NOCTTY : constant := C.fcntl.O_NOCTTY;
O_NOFOLLOW : constant := C.fcntl.O_NOFOLLOW;
O_NONBLOCK : constant := C.fcntl.O_NONBLOCK;
O_RDONLY : constant := C.fcntl.O_RDONLY;
O_RDWR : constant := C.fcntl.O_RDWR;
O_SHLOCK : constant := C.fcntl.O_SHLOCK;
O_SYNC : constant := C.fcntl.O_SYNC;
O_TRUNC : constant := C.fcntl.O_TRUNC;
O_TTY_INIT : constant := C.fcntl.O_TTY_INIT;
O_WRONLY : constant := C.fcntl.O_WRONLY;
POSIX_FADV_DONTNEED : constant := C.fcntl.POSIX_FADV_DONTNEED;
POSIX_FADV_NOREUSE : constant := C.fcntl.POSIX_FADV_NOREUSE;
POSIX_FADV_NORMAL : constant := C.fcntl.POSIX_FADV_NORMAL;
POSIX_FADV_RANDOM : constant := C.fcntl.POSIX_FADV_RANDOM;
POSIX_FADV_SEQUENTIAL : constant := C.fcntl.POSIX_FADV_SEQUENTIAL;
POSIX_FADV_WILLNEED : constant := C.fcntl.POSIX_FADV_WILLNEED;
-- SYS_FCNTL_H renames C.fcntl.SYS_FCNTL_H (empty)
type struct_xfile;
type struct_xfile is record
xf_size : aliased stddef.size_t;
xf_pid : aliased types.pid_t;
xf_uid : aliased types.uid_t;
xf_fd : aliased signed_int;
xf_file : aliased void_ptr;
xf_type : aliased signed_short;
xf_count : aliased signed_int;
xf_msgcount : aliased signed_int;
xf_offset : aliased types.off_t;
xf_data : aliased void_ptr;
xf_vnode : aliased void_ptr;
xf_flag : aliased types.u_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_xfile);
DTYPE_CRYPTO : constant := 6;
DTYPE_FIFO : constant := 4;
DTYPE_KQUEUE : constant := 5;
DTYPE_MQUEUE : constant := 7;
DTYPE_PIPE : constant := 3;
DTYPE_PTS : constant := 10;
DTYPE_SEM : constant := 9;
DTYPE_SHM : constant := 8;
DTYPE_SOCKET : constant := 2;
DTYPE_VNODE : constant := 1;
-- _SYS_FILE_H_ (empty)
end C.sys.file;
Raw
c-sys-filio.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.filio is
pragma Preelaborate;
type struct_fiodgname_arg;
type struct_fiodgname_arg is record
len : aliased signed_int;
buf : aliased void_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_fiodgname_arg);
FIOASYNC : constant := 2147772029;
FIOCLEX : constant := 536897025;
FIODGNAME : constant := 2148034168;
FIODTYPE : constant := 1074030202;
FIOGETLBA : constant := 1074030201;
FIOGETOWN : constant := 1074030203;
FIONBIO : constant := 2147772030;
FIONCLEX : constant := 536897026;
FIONREAD : constant := 1074030207;
FIONSPACE : constant := 1074030198;
FIONWRITE : constant := 1074030199;
FIOSEEKDATA : constant := 3221775969;
FIOSEEKHOLE : constant := 3221775970;
FIOSETOWN : constant := 2147772028;
-- _SYS_FILIO_H_ (empty)
end C.sys.filio;
Raw
c-sys-ioccom.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.ttycom;
package C.sys.ioccom is
pragma Preelaborate;
subtype struct_winsize is ttycom.struct_winsize;
H4DISC : constant := ttycom.H4DISC;
NETGRAPHDISC : constant := ttycom.NETGRAPHDISC;
PPPDISC : constant := ttycom.PPPDISC;
SLIPDISC : constant := ttycom.SLIPDISC;
TIOCCBRK : constant := ttycom.TIOCCBRK;
TIOCCDTR : constant := ttycom.TIOCCDTR;
TIOCCONS : constant := ttycom.TIOCCONS;
TIOCDRAIN : constant := ttycom.TIOCDRAIN;
TIOCEXCL : constant := ttycom.TIOCEXCL;
TIOCEXT : constant := ttycom.TIOCEXT;
TIOCFLUSH : constant := ttycom.TIOCFLUSH;
TIOCGDRAINWAIT : constant := ttycom.TIOCGDRAINWAIT;
TIOCGETA : constant := ttycom.TIOCGETA;
TIOCGETD : constant := ttycom.TIOCGETD;
TIOCGPGRP : constant := ttycom.TIOCGPGRP;
TIOCGPTN : constant := ttycom.TIOCGPTN;
TIOCGSID : constant := ttycom.TIOCGSID;
TIOCGWINSZ : constant := ttycom.TIOCGWINSZ;
TIOCMBIC : constant := ttycom.TIOCMBIC;
TIOCMBIS : constant := ttycom.TIOCMBIS;
TIOCMGDTRWAIT : constant := ttycom.TIOCMGDTRWAIT;
TIOCMGET : constant := ttycom.TIOCMGET;
TIOCMSDTRWAIT : constant := ttycom.TIOCMSDTRWAIT;
TIOCMSET : constant := ttycom.TIOCMSET;
TIOCM_CAR : constant := ttycom.TIOCM_CAR;
TIOCM_CD : constant := ttycom.TIOCM_CD;
TIOCM_CTS : constant := ttycom.TIOCM_CTS;
TIOCM_DCD : constant := ttycom.TIOCM_DCD;
TIOCM_DSR : constant := ttycom.TIOCM_DSR;
TIOCM_DTR : constant := ttycom.TIOCM_DTR;
TIOCM_LE : constant := ttycom.TIOCM_LE;
TIOCM_RI : constant := ttycom.TIOCM_RI;
TIOCM_RNG : constant := ttycom.TIOCM_RNG;
TIOCM_RTS : constant := ttycom.TIOCM_RTS;
TIOCM_SR : constant := ttycom.TIOCM_SR;
TIOCM_ST : constant := ttycom.TIOCM_ST;
TIOCNOTTY : constant := ttycom.TIOCNOTTY;
TIOCNXCL : constant := ttycom.TIOCNXCL;
TIOCOUTQ : constant := ttycom.TIOCOUTQ;
TIOCPKT : constant := ttycom.TIOCPKT;
TIOCPKT_DATA : constant := ttycom.TIOCPKT_DATA;
TIOCPKT_DOSTOP : constant := ttycom.TIOCPKT_DOSTOP;
TIOCPKT_FLUSHREAD : constant := ttycom.TIOCPKT_FLUSHREAD;
TIOCPKT_FLUSHWRITE : constant := ttycom.TIOCPKT_FLUSHWRITE;
TIOCPKT_IOCTL : constant := ttycom.TIOCPKT_IOCTL;
TIOCPKT_NOSTOP : constant := ttycom.TIOCPKT_NOSTOP;
TIOCPKT_START : constant := ttycom.TIOCPKT_START;
TIOCPKT_STOP : constant := ttycom.TIOCPKT_STOP;
TIOCPTMASTER : constant := ttycom.TIOCPTMASTER;
TIOCSBRK : constant := ttycom.TIOCSBRK;
TIOCSCTTY : constant := ttycom.TIOCSCTTY;
TIOCSDRAINWAIT : constant := ttycom.TIOCSDRAINWAIT;
TIOCSDTR : constant := ttycom.TIOCSDTR;
TIOCSETA : constant := ttycom.TIOCSETA;
TIOCSETAF : constant := ttycom.TIOCSETAF;
TIOCSETAW : constant := ttycom.TIOCSETAW;
TIOCSETD : constant := ttycom.TIOCSETD;
TIOCSIG : constant := ttycom.TIOCSIG;
TIOCSPGRP : constant := ttycom.TIOCSPGRP;
TIOCSTART : constant := ttycom.TIOCSTART;
TIOCSTAT : constant := ttycom.TIOCSTAT;
TIOCSTI : constant := ttycom.TIOCSTI;
TIOCSTOP : constant := ttycom.TIOCSTOP;
TIOCSWINSZ : constant := ttycom.TIOCSWINSZ;
TIOCTIMESTAMP : constant := ttycom.TIOCTIMESTAMP;
TIOCUCNTL : constant := ttycom.TIOCUCNTL;
TTYDISC : constant := ttycom.TTYDISC;
-- UIOCCMD renames ttycom.UIOCCMD (function macro)
-- SYS_TTYCOM_H renames ttycom.SYS_TTYCOM_H (empty)
function ioctl (a1 : signed_int; a2 : unsigned_long) return signed_int;
function ioctl (a1 : signed_int; a2 : unsigned_long;
a3 : access ttycom.struct_winsize) return signed_int;
pragma Import (C, ioctl, "ioctl");
-- IOCBASECMD (function macro)
-- IOCGROUP (function macro)
-- IOCPARM_LEN (function macro)
IOCPARM_MASK : constant := 8191;
IOCPARM_MAX : constant := 8192;
IOCPARM_SHIFT : constant := 13;
IOC_DIRMASK : constant := -536870912;
IOC_IN : constant := -2147483648;
IOC_INOUT : constant := -1073741824;
IOC_OUT : constant := 1073741824;
IOC_VOID : constant := 536870912;
-- _IO (function macro)
-- _IOC (function macro)
-- _IOR (function macro)
-- _IOW (function macro)
-- _IOWINT (function macro)
-- _IOWR (function macro)
-- _SYS_IOCCOM_H_ (empty)
end C.sys.ioccom;
Raw
c-sys-ioctl.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.ioccom;
with C.sys.ttycom;
package C.sys.ioctl is
pragma Preelaborate;
function ioctl (a1 : signed_int; a2 : unsigned_long) return signed_int
renames ioccom.ioctl;
function ioctl (a1 : signed_int; a2 : unsigned_long;
a3 : access ttycom.struct_winsize) return signed_int
renames ioccom.ioctl;
-- IOCBASECMD renames ioccom.IOCBASECMD (function macro)
-- IOCGROUP renames ioccom.IOCGROUP (function macro)
-- IOCPARM_LEN renames ioccom.IOCPARM_LEN (function macro)
IOCPARM_MASK : constant := ioccom.IOCPARM_MASK;
IOCPARM_MAX : constant := ioccom.IOCPARM_MAX;
IOCPARM_SHIFT : constant := ioccom.IOCPARM_SHIFT;
IOC_DIRMASK : constant := ioccom.IOC_DIRMASK;
IOC_IN : constant := ioccom.IOC_IN;
IOC_INOUT : constant := ioccom.IOC_INOUT;
IOC_OUT : constant := ioccom.IOC_OUT;
IOC_VOID : constant := ioccom.IOC_VOID;
-- IO renames ioccom.IO (function macro)
-- IOC renames ioccom.IOC (function macro)
-- IOR renames ioccom.IOR (function macro)
-- IOW renames ioccom.IOW (function macro)
-- IOWINT renames ioccom.IOWINT (function macro)
-- IOWR renames ioccom.IOWR (function macro)
-- SYS_IOCCOM_H renames ioccom.SYS_IOCCOM_H (empty)
subtype struct_winsize is ttycom.struct_winsize;
H4DISC : constant := ttycom.H4DISC;
NETGRAPHDISC : constant := ttycom.NETGRAPHDISC;
PPPDISC : constant := ttycom.PPPDISC;
SLIPDISC : constant := ttycom.SLIPDISC;
TIOCCBRK : constant := ttycom.TIOCCBRK;
TIOCCDTR : constant := ttycom.TIOCCDTR;
TIOCCONS : constant := ttycom.TIOCCONS;
TIOCDRAIN : constant := ttycom.TIOCDRAIN;
TIOCEXCL : constant := ttycom.TIOCEXCL;
TIOCEXT : constant := ttycom.TIOCEXT;
TIOCFLUSH : constant := ttycom.TIOCFLUSH;
TIOCGDRAINWAIT : constant := ttycom.TIOCGDRAINWAIT;
TIOCGETA : constant := ttycom.TIOCGETA;
TIOCGETD : constant := ttycom.TIOCGETD;
TIOCGPGRP : constant := ttycom.TIOCGPGRP;
TIOCGPTN : constant := ttycom.TIOCGPTN;
TIOCGSID : constant := ttycom.TIOCGSID;
TIOCGWINSZ : constant := ttycom.TIOCGWINSZ;
TIOCMBIC : constant := ttycom.TIOCMBIC;
TIOCMBIS : constant := ttycom.TIOCMBIS;
TIOCMGDTRWAIT : constant := ttycom.TIOCMGDTRWAIT;
TIOCMGET : constant := ttycom.TIOCMGET;
TIOCMSDTRWAIT : constant := ttycom.TIOCMSDTRWAIT;
TIOCMSET : constant := ttycom.TIOCMSET;
TIOCM_CAR : constant := ttycom.TIOCM_CAR;
TIOCM_CD : constant := ttycom.TIOCM_CD;
TIOCM_CTS : constant := ttycom.TIOCM_CTS;
TIOCM_DCD : constant := ttycom.TIOCM_DCD;
TIOCM_DSR : constant := ttycom.TIOCM_DSR;
TIOCM_DTR : constant := ttycom.TIOCM_DTR;
TIOCM_LE : constant := ttycom.TIOCM_LE;
TIOCM_RI : constant := ttycom.TIOCM_RI;
TIOCM_RNG : constant := ttycom.TIOCM_RNG;
TIOCM_RTS : constant := ttycom.TIOCM_RTS;
TIOCM_SR : constant := ttycom.TIOCM_SR;
TIOCM_ST : constant := ttycom.TIOCM_ST;
TIOCNOTTY : constant := ttycom.TIOCNOTTY;
TIOCNXCL : constant := ttycom.TIOCNXCL;
TIOCOUTQ : constant := ttycom.TIOCOUTQ;
TIOCPKT : constant := ttycom.TIOCPKT;
TIOCPKT_DATA : constant := ttycom.TIOCPKT_DATA;
TIOCPKT_DOSTOP : constant := ttycom.TIOCPKT_DOSTOP;
TIOCPKT_FLUSHREAD : constant := ttycom.TIOCPKT_FLUSHREAD;
TIOCPKT_FLUSHWRITE : constant := ttycom.TIOCPKT_FLUSHWRITE;
TIOCPKT_IOCTL : constant := ttycom.TIOCPKT_IOCTL;
TIOCPKT_NOSTOP : constant := ttycom.TIOCPKT_NOSTOP;
TIOCPKT_START : constant := ttycom.TIOCPKT_START;
TIOCPKT_STOP : constant := ttycom.TIOCPKT_STOP;
TIOCPTMASTER : constant := ttycom.TIOCPTMASTER;
TIOCSBRK : constant := ttycom.TIOCSBRK;
TIOCSCTTY : constant := ttycom.TIOCSCTTY;
TIOCSDRAINWAIT : constant := ttycom.TIOCSDRAINWAIT;
TIOCSDTR : constant := ttycom.TIOCSDTR;
TIOCSETA : constant := ttycom.TIOCSETA;
TIOCSETAF : constant := ttycom.TIOCSETAF;
TIOCSETAW : constant := ttycom.TIOCSETAW;
TIOCSETD : constant := ttycom.TIOCSETD;
TIOCSIG : constant := ttycom.TIOCSIG;
TIOCSPGRP : constant := ttycom.TIOCSPGRP;
TIOCSTART : constant := ttycom.TIOCSTART;
TIOCSTAT : constant := ttycom.TIOCSTAT;
TIOCSTI : constant := ttycom.TIOCSTI;
TIOCSTOP : constant := ttycom.TIOCSTOP;
TIOCSWINSZ : constant := ttycom.TIOCSWINSZ;
TIOCTIMESTAMP : constant := ttycom.TIOCTIMESTAMP;
TIOCUCNTL : constant := ttycom.TIOCUCNTL;
TTYDISC : constant := ttycom.TTYDISC;
-- UIOCCMD renames ttycom.UIOCCMD (function macro)
-- SYS_TTYCOM_H renames ttycom.SYS_TTYCOM_H (empty)
-- _SYS_IOCTL_H_ (empty)
end C.sys.ioctl;
Raw
c-sys-limits.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.limits is
pragma Preelaborate;
CHAR_BIT : constant := 8;
CHAR_MAX : constant := 127;
CHAR_MIN : constant := -128;
GID_MAX : constant := 4294967295;
INT_MAX : constant := 2147483647;
INT_MIN : constant := -2147483648;
LLONG_MAX : constant := 9223372036854775807;
LLONG_MIN : constant := -9223372036854775808;
LONG_BIT : constant := 32;
LONG_MAX : constant := 2147483647;
LONG_MIN : constant := -2147483648;
MQ_PRIO_MAX : constant := 64;
OFF_MAX : constant := 9223372036854775807;
OFF_MIN : constant := -9223372036854775808;
QUAD_MAX : constant := 9223372036854775807;
QUAD_MIN : constant := -9223372036854775808;
SCHAR_MAX : constant := 127;
SCHAR_MIN : constant := -128;
SHRT_MAX : constant := 32767;
SHRT_MIN : constant := -32768;
SIZE_T_MAX : constant := 4294967295;
SSIZE_MAX : constant := 2147483647;
UCHAR_MAX : constant := 255;
UID_MAX : constant := 4294967295;
UINT_MAX : constant := 4294967295;
ULLONG_MAX : constant := 18446744073709551615;
ULONG_MAX : constant := 4294967295;
UQUAD_MAX : constant := 18446744073709551615;
USHRT_MAX : constant := 65535;
WORD_BIT : constant := 32;
-- _SYS_LIMITS_H_ (empty)
end C.sys.limits;
Raw
c-sys-mman.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with Ada.Unchecked_Conversion;
with C.stddef;
with C.sys.types;
package C.sys.mman is
pragma Preelaborate;
function Cast is new Ada.Unchecked_Conversion (signed_int, char_ptr);
subtype u_char is types.u_char;
subtype u_short is types.u_short;
subtype u_int is types.u_int;
subtype u_long is types.u_long;
subtype ushort is types.ushort;
subtype uint is types.uint;
subtype u_int8_t is types.u_int8_t;
subtype u_int16_t is types.u_int16_t;
subtype u_int32_t is types.u_int32_t;
subtype u_int64_t is types.u_int64_t;
subtype u_quad_t is types.u_quad_t;
subtype quad_t is types.quad_t;
subtype qaddr_t is types.qaddr_t;
subtype caddr_t is types.caddr_t;
subtype c_caddr_t is types.c_caddr_t;
subtype v_caddr_t is types.v_caddr_t;
subtype blksize_t is types.blksize_t;
subtype cpuwhich_t is types.cpuwhich_t;
subtype cpulevel_t is types.cpulevel_t;
subtype cpusetid_t is types.cpusetid_t;
subtype blkcnt_t is types.blkcnt_t;
subtype clock_t is types.clock_t;
subtype clockid_t is types.clockid_t;
subtype cpumask_t is types.cpumask_t;
subtype critical_t is types.critical_t;
subtype daddr_t is types.daddr_t;
subtype dev_t is types.dev_t;
subtype fflags_t is types.fflags_t;
subtype fixpt_t is types.fixpt_t;
subtype fsblkcnt_t is types.fsblkcnt_t;
subtype fsfilcnt_t is types.fsfilcnt_t;
subtype gid_t is types.gid_t;
subtype in_addr_t is types.in_addr_t;
subtype in_port_t is types.in_port_t;
subtype id_t is types.id_t;
subtype ino_t is types.ino_t;
subtype key_t is types.key_t;
subtype lwpid_t is types.lwpid_t;
subtype mode_t is types.mode_t;
subtype accmode_t is types.accmode_t;
subtype nlink_t is types.nlink_t;
subtype off_t is types.off_t;
subtype pid_t is types.pid_t;
subtype register_t is types.register_t;
subtype rlim_t is types.rlim_t;
subtype segsz_t is types.segsz_t;
subtype ssize_t is types.ssize_t;
subtype suseconds_t is types.suseconds_t;
subtype time_t is types.time_t;
subtype timer_t is types.timer_t;
subtype mqd_t is types.mqd_t;
subtype u_register_t is types.u_register_t;
subtype uid_t is types.uid_t;
subtype useconds_t is types.useconds_t;
subtype vm_offset_t is types.vm_offset_t;
subtype vm_ooffset_t is types.vm_ooffset_t;
subtype vm_paddr_t is types.vm_paddr_t;
subtype vm_pindex_t is types.vm_pindex_t;
subtype vm_size_t is types.vm_size_t;
function ftruncate (a1 : signed_int; a2 : types.off_t) return signed_int
renames types.ftruncate;
function lseek (a1 : signed_int; a2 : types.off_t; a3 : signed_int)
return types.off_t renames types.lseek;
function mmap (a1 : void_ptr; a2 : stddef.size_t; a3 : signed_int;
a4 : signed_int; a5 : signed_int; a6 : types.off_t) return void_ptr
renames types.mmap;
function truncate (a1 : access constant char; a2 : types.off_t)
return signed_int renames types.truncate;
-- ACCMODE_T_DECLARED renames types.ACCMODE_T_DECLARED (empty)
-- BLKCNT_T_DECLARED renames types.BLKCNT_T_DECLARED (empty)
-- BLKSIZE_T_DECLARED renames types.BLKSIZE_T_DECLARED (empty)
-- CLOCKID_T_DECLARED renames types.CLOCKID_T_DECLARED (empty)
-- CLOCK_T_DECLARED renames types.CLOCK_T_DECLARED (empty)
-- DEV_T_DECLARED renames types.DEV_T_DECLARED (empty)
-- FFLAGS_T_DECLARED renames types.FFLAGS_T_DECLARED (empty)
-- FSBLKCNT_T_DECLARED renames types.FSBLKCNT_T_DECLARED (empty)
-- FTRUNCATE_DECLARED renames types.FTRUNCATE_DECLARED (empty)
-- GID_T_DECLARED renames types.GID_T_DECLARED (empty)
-- ID_T_DECLARED renames types.ID_T_DECLARED (empty)
-- INO_T_DECLARED renames types.INO_T_DECLARED (empty)
-- IN_ADDR_T_DECLARED renames types.IN_ADDR_T_DECLARED (empty)
-- IN_PORT_T_DECLARED renames types.IN_PORT_T_DECLARED (empty)
-- KEY_T_DECLARED renames types.KEY_T_DECLARED (empty)
-- LSEEK_DECLARED renames types.LSEEK_DECLARED (empty)
-- LWPID_T_DECLARED renames types.LWPID_T_DECLARED (empty)
-- MMAP_DECLARED renames types.MMAP_DECLARED (empty)
-- MODE_T_DECLARED renames types.MODE_T_DECLARED (empty)
-- MQD_T_DECLARED renames types.MQD_T_DECLARED (empty)
-- NLINK_T_DECLARED renames types.NLINK_T_DECLARED (empty)
-- OFF_T_DECLARED renames types.OFF_T_DECLARED (empty)
-- PID_T_DECLARED renames types.PID_T_DECLARED (empty)
-- RLIM_T_DECLARED renames types.RLIM_T_DECLARED (empty)
-- SSIZE_T_DECLARED renames types.SSIZE_T_DECLARED (empty)
-- SUSECONDS_T_DECLARED renames types.SUSECONDS_T_DECLARED (empty)
-- SYS_TYPES_H renames types.SYS_TYPES_H (empty)
-- TIMER_T_DECLARED renames types.TIMER_T_DECLARED (empty)
-- TIME_T_DECLARED renames types.TIME_T_DECLARED (empty)
-- TRUNCATE_DECLARED renames types.TRUNCATE_DECLARED (empty)
-- UID_T_DECLARED renames types.UID_T_DECLARED (empty)
-- USECONDS_T_DECLARED renames types.USECONDS_T_DECLARED (empty)
-- major renames types.major (function macro)
-- makedev renames types.makedev (function macro)
-- minor renames types.minor (function macro)
function getpagesizes (a1 : access stddef.size_t; a2 : signed_int)
return signed_int;
pragma Import (C, getpagesizes, "getpagesizes");
function madvise (a1 : void_ptr; a2 : stddef.size_t; a3 : signed_int)
return signed_int;
pragma Import (C, madvise, "madvise");
function mincore (a1 : void_const_ptr; a2 : stddef.size_t;
a3 : access char) return signed_int;
pragma Import (C, mincore, "mincore");
function minherit (a1 : void_ptr; a2 : stddef.size_t; a3 : signed_int)
return signed_int;
pragma Import (C, minherit, "minherit");
function mlock (a1 : void_const_ptr; a2 : stddef.size_t)
return signed_int;
pragma Import (C, mlock, "mlock");
function mprotect (a1 : void_const_ptr; a2 : stddef.size_t;
a3 : signed_int) return signed_int;
pragma Import (C, mprotect, "mprotect");
function msync (a1 : void_ptr; a2 : stddef.size_t; a3 : signed_int)
return signed_int;
pragma Import (C, msync, "msync");
function munlock (a1 : void_const_ptr; a2 : stddef.size_t)
return signed_int;
pragma Import (C, munlock, "munlock");
function munmap (a1 : void_ptr; a2 : stddef.size_t) return signed_int;
pragma Import (C, munmap, "munmap");
function posix_madvise (a1 : void_ptr; a2 : stddef.size_t;
a3 : signed_int) return signed_int;
pragma Import (C, posix_madvise, "posix_madvise");
function mlockall (a1 : signed_int) return signed_int;
pragma Import (C, mlockall, "mlockall");
function munlockall return signed_int;
pragma Import (C, munlockall, "munlockall");
function shm_open (a1 : access constant char; a2 : signed_int;
a3 : types.mode_t) return signed_int;
pragma Import (C, shm_open, "shm_open");
function shm_unlink (a1 : access constant char) return signed_int;
pragma Import (C, shm_unlink, "shm_unlink");
INHERIT_COPY : constant := 1;
INHERIT_NONE : constant := 2;
INHERIT_SHARE : constant := 0;
MADV_AUTOSYNC : constant := 7;
MADV_CORE : constant := 9;
MADV_DONTNEED : constant := 4;
MADV_FREE : constant := 5;
MADV_NOCORE : constant := 8;
MADV_NORMAL : constant := 0;
MADV_NOSYNC : constant := 6;
MADV_PROTECT : constant := 10;
MADV_RANDOM : constant := 1;
MADV_SEQUENTIAL : constant := 2;
MADV_WILLNEED : constant := 3;
MAP_ANON : constant := 4096;
MAP_ANONYMOUS : constant := 4096;
MAP_COPY : constant := 2;
MAP_FAILED : constant void_ptr := void_ptr (System'To_Address (-1));
MAP_FILE : constant := 0;
MAP_FIXED : constant := 16;
MAP_HASSEMAPHORE : constant := 512;
MAP_NOCORE : constant := 131072;
MAP_NORESERVE : constant := 64;
MAP_NOSYNC : constant := 2048;
MAP_PREFAULT_READ : constant := 262144;
MAP_PRIVATE : constant := 2;
MAP_RENAME : constant := 32;
MAP_RESERVED0080 : constant := 128;
MAP_RESERVED0100 : constant := 256;
MAP_SHARED : constant := 1;
MAP_STACK : constant := 1024;
MCL_CURRENT : constant := 1;
MCL_FUTURE : constant := 2;
MINCORE_INCORE : constant := 1;
MINCORE_MODIFIED : constant := 4;
MINCORE_MODIFIED_OTHER : constant := 16;
MINCORE_REFERENCED : constant := 2;
MINCORE_REFERENCED_OTHER : constant := 8;
MINCORE_SUPER : constant := 32;
MS_ASYNC : constant := 1;
MS_INVALIDATE : constant := 2;
MS_SYNC : constant := 0;
POSIX_MADV_DONTNEED : constant := 4;
POSIX_MADV_NORMAL : constant := 0;
POSIX_MADV_RANDOM : constant := 1;
POSIX_MADV_SEQUENTIAL : constant := 2;
POSIX_MADV_WILLNEED : constant := 3;
PROT_EXEC : constant := 4;
PROT_NONE : constant := 0;
PROT_READ : constant := 1;
PROT_WRITE : constant := 2;
function SHM_ANON (Value : signed_int := 1) return char_ptr renames Cast;
qMADV_DONTNEED : constant := 4;
qMADV_NORMAL : constant := 0;
qMADV_RANDOM : constant := 1;
qMADV_SEQUENTIAL : constant := 2;
qMADV_WILLNEED : constant := 3;
-- _SYS_MMAN_H_ (empty)
end C.sys.mman;
Raw
c-sys-mount.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.stdint;
with C.sys.qiovec;
with C.sys.socket;
with C.sys.stat;
with C.sys.types;
with C.sys.ucred;
package C.sys.mount is
pragma Preelaborate;
type struct_fsid;
type struct_fsid is record
val : aliased stdint.int32_t_array (0 .. 1);
end record;
pragma Convention (C_Pass_By_Copy, struct_fsid);
subtype fsid_t is struct_fsid;
type struct_fid;
type struct_fid is record
fid_len : aliased types.u_short;
fid_data0 : aliased types.u_short;
fid_data : aliased char_array (0 .. 15);
end record;
pragma Convention (C_Pass_By_Copy, struct_fid);
type struct_statfs;
type struct_statfs is record
f_version : aliased stdint.uint32_t;
f_type : aliased stdint.uint32_t;
f_flags : aliased stdint.uint64_t;
f_bsize : aliased stdint.uint64_t;
f_iosize : aliased stdint.uint64_t;
f_blocks : aliased stdint.uint64_t;
f_bfree : aliased stdint.uint64_t;
f_bavail : aliased stdint.int64_t;
f_files : aliased stdint.uint64_t;
f_ffree : aliased stdint.int64_t;
f_syncwrites : aliased stdint.uint64_t;
f_asyncwrites : aliased stdint.uint64_t;
f_syncreads : aliased stdint.uint64_t;
f_asyncreads : aliased stdint.uint64_t;
f_spare : aliased stdint.uint64_t_array (0 .. 9);
f_namemax : aliased stdint.uint32_t;
f_owner : aliased types.uid_t;
f_fsid : aliased fsid_t;
f_charspare : aliased char_array (0 .. 79);
f_fstypename : aliased char_array (0 .. 15);
f_mntfromname : aliased char_array (0 .. 87);
f_mntonname : aliased char_array (0 .. 87);
end record;
pragma Convention (C_Pass_By_Copy, struct_statfs);
type struct_statfs_ptr is access all struct_statfs;
for struct_statfs_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_statfs_ptr);
pragma Convention (C, struct_statfs_ptr);
type struct_statfs_ptr_ptr is access all struct_statfs_ptr;
for struct_statfs_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_statfs_ptr_ptr);
pragma Convention (C, struct_statfs_ptr_ptr);
type struct_fhandle;
type struct_fhandle is record
fh_fsid : aliased fsid_t;
fh_fid : aliased struct_fid;
end record;
pragma Convention (C_Pass_By_Copy, struct_fhandle);
type struct_fhandle_const_ptr is access constant struct_fhandle;
for struct_fhandle_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_fhandle_const_ptr);
pragma Convention (C, struct_fhandle_const_ptr);
type struct_fhandle_ptr is access all struct_fhandle;
for struct_fhandle_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_fhandle_ptr);
pragma Convention (C, struct_fhandle_ptr);
subtype fhandle_t is struct_fhandle;
subtype fhandle_t_ptr is struct_fhandle_ptr;
type struct_oexport_args;
type struct_oexport_args is record
ex_flags : aliased signed_int;
ex_root : aliased types.uid_t;
ex_anon : aliased ucred.struct_xucred;
ex_addr : aliased socket.struct_sockaddr_ptr;
ex_addrlen : aliased types.u_char;
ex_mask : aliased socket.struct_sockaddr_ptr;
ex_masklen : aliased types.u_char;
ex_indexfile : aliased char_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_oexport_args);
type struct_export_args;
type struct_export_args is record
ex_flags : aliased signed_int;
ex_root : aliased types.uid_t;
ex_anon : aliased ucred.struct_xucred;
ex_addr : aliased socket.struct_sockaddr_ptr;
ex_addrlen : aliased types.u_char;
ex_mask : aliased socket.struct_sockaddr_ptr;
ex_masklen : aliased types.u_char;
ex_indexfile : aliased char_ptr;
ex_numsecflavors : aliased signed_int;
ex_secflavors : aliased signed_int_array (0 .. 4);
end record;
pragma Convention (C_Pass_By_Copy, struct_export_args);
type struct_nfs_public;
type struct_mount (<>) is limited private;
type struct_mount_ptr is access all struct_mount;
for struct_mount_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_mount_ptr);
pragma Convention (C, struct_mount_ptr);
type struct_nfs_public is record
np_valid : aliased signed_int;
np_handle : aliased fhandle_t;
np_mount : aliased struct_mount_ptr;
np_index : aliased char_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_nfs_public);
type struct_vfsconf;
type struct_vfsconf_ptr is access all struct_vfsconf;
for struct_vfsconf_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vfsconf_ptr);
pragma Convention (C, struct_vfsconf_ptr);
type struct_vfsconf_ptr_ptr is access all struct_vfsconf_ptr;
for struct_vfsconf_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vfsconf_ptr_ptr);
pragma Convention (C, struct_vfsconf_ptr_ptr);
type struct_vfsops (<>) is limited private;
type struct_vfsops_ptr is access all struct_vfsops;
for struct_vfsops_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vfsops_ptr);
pragma Convention (C, struct_vfsops_ptr);
type struct_vfsoptdecl (<>) is limited private;
type struct_vfsoptdecl_ptr is access all struct_vfsoptdecl;
for struct_vfsoptdecl_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vfsoptdecl_ptr);
pragma Convention (C, struct_vfsoptdecl_ptr);
type struct_75381462 is record
tqe_next : aliased struct_vfsconf_ptr;
tqe_prev : aliased struct_vfsconf_ptr_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_75381462);
type struct_vfsconf is record
vfc_version : aliased types.u_int;
vfc_name : aliased char_array (0 .. 15);
vfc_vfsops : aliased struct_vfsops_ptr;
vfc_typenum : aliased signed_int;
vfc_refcount : aliased signed_int;
vfc_flags : aliased signed_int;
vfc_opts : aliased struct_vfsoptdecl_ptr;
vfc_list : aliased struct_75381462;
end record;
pragma Convention (C_Pass_By_Copy, struct_vfsconf);
type struct_xvfsconf;
type struct_xvfsconf is record
vfc_vfsops : aliased struct_vfsops_ptr;
vfc_name : aliased char_array (0 .. 15);
vfc_typenum : aliased signed_int;
vfc_refcount : aliased signed_int;
vfc_flags : aliased signed_int;
vfc_next : aliased struct_vfsconf_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_xvfsconf);
type struct_xvfsconf_ptr is access all struct_xvfsconf;
for struct_xvfsconf_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_xvfsconf_ptr);
pragma Convention (C, struct_xvfsconf_ptr);
type struct_ovfsconf;
type struct_ovfsconf is record
vfc_vfsops : aliased void_ptr;
vfc_name : aliased char_array (0 .. 31);
vfc_index : aliased signed_int;
vfc_refcount : aliased signed_int;
vfc_flags : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_ovfsconf);
subtype fsctlop_t is stdint.uint32_t;
type struct_vfsidctl;
type struct_vfsidctl is record
vc_vers : aliased signed_int;
vc_fsid : aliased fsid_t;
vc_fstypename : aliased char_array (0 .. 15);
vc_op : aliased fsctlop_t;
vc_ptr : aliased void_ptr;
vc_len : aliased stddef.size_t;
vc_spare : aliased types.u_int32_t_array (0 .. 11);
end record;
pragma Convention (C_Pass_By_Copy, struct_vfsidctl);
type struct_vfsquery;
type struct_vfsquery is record
vq_flags : aliased types.u_int32_t;
vq_spare : aliased types.u_int32_t_array (0 .. 30);
end record;
pragma Convention (C_Pass_By_Copy, struct_vfsquery);
type struct_uio (<>) is limited private;
function fhopen (a1 : access constant struct_fhandle; a2 : signed_int)
return signed_int;
pragma Import (C, fhopen, "fhopen");
function fhstat (a1 : access constant struct_fhandle;
a2 : access stat.struct_stat) return signed_int;
pragma Import (C, fhstat, "fhstat");
function fhstatfs (a1 : access constant struct_fhandle;
a2 : access struct_statfs) return signed_int;
pragma Import (C, fhstatfs, "fhstatfs");
function fstatfs (a1 : signed_int; a2 : access struct_statfs)
return signed_int;
pragma Import (C, fstatfs, "fstatfs");
function getfh (a1 : access constant char; a2 : access fhandle_t)
return signed_int;
pragma Import (C, getfh, "getfh");
function getfsstat (a1 : access struct_statfs; a2 : signed_long;
a3 : signed_int) return signed_int;
pragma Import (C, getfsstat, "getfsstat");
function getmntinfo (a1 : access struct_statfs_ptr; a2 : signed_int)
return signed_int;
pragma Import (C, getmntinfo, "getmntinfo");
function lgetfh (a1 : access constant char; a2 : access fhandle_t)
return signed_int;
pragma Import (C, lgetfh, "lgetfh");
function mount (a1 : access constant char; a2 : access constant char;
a3 : signed_int; a4 : void_ptr) return signed_int;
pragma Import (C, mount, "mount");
function nmount (a1 : access qiovec.struct_iovec; a2 : unsigned_int;
a3 : signed_int) return signed_int;
pragma Import (C, nmount, "nmount");
function statfs (a1 : access constant char; a2 : access struct_statfs)
return signed_int;
pragma Import (C, statfs, "statfs");
function unmount (a1 : access constant char; a2 : signed_int)
return signed_int;
pragma Import (C, unmount, "unmount");
function getvfsbyname (a1 : access constant char;
a2 : access struct_xvfsconf) return signed_int;
pragma Import (C, getvfsbyname, "getvfsbyname");
MAXFIDSZ : constant := 16;
MAXSECFLAVORS : constant := 5;
MFSNAMELEN : constant := 16;
MNAMELEN : constant := 88;
MNTK_ASYNC : constant := 2;
MNTK_DRAINING : constant := 16;
MNTK_EXTENDED_SHARED : constant := 64;
MNTK_LOOKUP_SHARED : constant := 1073741824;
MNTK_MPSAFE : constant := 536870912;
MNTK_MWAIT : constant := 33554432;
MNTK_NOINSMNTQ : constant := 8;
MNTK_NOKNOTE : constant := -2147483648;
MNTK_REFEXPIRE : constant := 32;
MNTK_SHARED_WRITES : constant := 128;
MNTK_SOFTDEP : constant := 4;
MNTK_SUSPEND : constant := 134217728;
MNTK_SUSPEND2 : constant := 67108864;
MNTK_SUSPENDED : constant := 268435456;
MNTK_UNMOUNT : constant := 16777216;
MNTK_UNMOUNTF : constant := 1;
MNT_ACLS : constant := 134217728;
MNT_ASYNC : constant := 64;
MNT_BYFSID : constant := 134217728;
MNT_CMDFLAGS : constant := 151977984;
MNT_DEFEXPORTED : constant := 512;
MNT_DELEXPORT : constant := 131072;
MNT_EXKERB : constant := 2048;
MNT_EXPORTANON : constant := 1024;
MNT_EXPORTED : constant := 256;
MNT_EXPUBLIC : constant := 536870912;
MNT_EXRDONLY : constant := 128;
MNT_FORCE : constant := 524288;
MNT_GJOURNAL : constant := 33554432;
MNT_IGNORE : constant := 8388608;
MNT_LAZY : constant := 3;
MNT_LOCAL : constant := 4096;
MNT_MULTILABEL : constant := 67108864;
MNT_NFS4ACLS : constant := 16;
MNT_NOATIME : constant := 268435456;
MNT_NOCLUSTERR : constant := 1073741824;
MNT_NOCLUSTERW : constant := -2147483648;
MNT_NOEXEC : constant := 4;
MNT_NOSUID : constant := 8;
MNT_NOSYMFOLLOW : constant := 4194304;
MNT_NOWAIT : constant := 2;
MNT_QUOTA : constant := 8192;
MNT_RDONLY : constant := 1;
MNT_RELOAD : constant := 262144;
MNT_ROOTFS : constant := 16384;
-- MNT_SHARED_WRITES (uninterpretable)
MNT_SNAPSHOT : constant := 16777216;
MNT_SOFTDEP : constant := 2097152;
MNT_SUIDDIR : constant := 1048576;
MNT_SUSPEND : constant := 4;
MNT_SYNCHRONOUS : constant := 2;
MNT_UNION : constant := 32;
MNT_UPDATE : constant := 65536;
MNT_UPDATEMASK : constant := -657424258;
MNT_USER : constant := 32768;
MNT_VISFLAGMASK : constant := -17760257;
MNT_WAIT : constant := 1;
STATFS_VERSION : constant := 537068824;
VFCF_DELEGADMIN : constant := 8388608;
VFCF_JAIL : constant := 4194304;
VFCF_LOOPBACK : constant := 1048576;
VFCF_NETWORK : constant := 131072;
VFCF_READONLY : constant := 262144;
VFCF_STATIC : constant := 65536;
VFCF_SYNTHETIC : constant := 524288;
VFCF_UNICODE : constant := 2097152;
VFS_CONF : constant := 2;
VFS_CTL_NOLOCKS : constant := 65539;
VFS_CTL_QUERY : constant := 65537;
VFS_CTL_TIMEO : constant := 65538;
VFS_CTL_VERS1 : constant := 1;
VFS_GENERIC : constant := 0;
VFS_MAXTYPENUM : constant := 1;
VFS_VFSCONF : constant := 0;
VQ_ASSIST : constant := 64;
VQ_DEAD : constant := 32;
VQ_FLAG0100 : constant := 256;
VQ_FLAG0200 : constant := 512;
VQ_FLAG0400 : constant := 1024;
VQ_FLAG0800 : constant := 2048;
VQ_FLAG1000 : constant := 4096;
VQ_FLAG2000 : constant := 8192;
VQ_FLAG4000 : constant := 16384;
VQ_FLAG8000 : constant := 32768;
VQ_LOWDISK : constant := 4;
VQ_MOUNT : constant := 8;
VQ_NEEDAUTH : constant := 2;
VQ_NOTRESP : constant := 1;
VQ_NOTRESPLOCK : constant := 128;
VQ_UNMOUNT : constant := 16;
-- _SYS_MOUNT_H_ (empty)
private
type struct_mount is null record;
type struct_vfsops is null record;
type struct_vfsoptdecl is null record;
type struct_uio is null record;
end C.sys.mount;
Raw
c-sys-param.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.param is
pragma Preelaborate;
BKVAMASK : constant := 16383;
BKVASIZE : constant := 16384;
BLKDEV_IOSIZE : constant := 4096;
BSD : constant := 199506;
BSD4_3 : constant := 1;
BSD4_4 : constant := 1;
CMASK : constant := 18;
DEV_BSHIFT : constant := 9;
DEV_BSIZE : constant := 512;
DFLTPHYS : constant := 65536;
FSCALE : constant := 2048;
FSHIFT : constant := 11;
-- MAX (function macro)
MAXBSIZE : constant := 65536;
MAXCOMLEN : constant := 19;
MAXDUMPPGS : constant := 16;
MAXHOSTNAMELEN : constant := 256;
MAXINTERP : constant := 32;
MAXLOGNAME : constant := 17;
MAXPATHLEN : constant := 1024;
MAXPHYS : constant := 131072;
MAXSYMLINKS : constant := 32;
MAXUPRC : constant := 40;
MCLBYTES : constant := 2048;
MCLSHIFT : constant := 11;
-- MIN (function macro)
MJUM16BYTES : constant := 16384;
MJUM9BYTES : constant := 9216;
MJUMPAGESIZE : constant := 4096;
MSIZE : constant := 256;
NBBY : constant := 8;
NBPW : constant := 4;
NCARGS : constant := 262144;
NGROUPS : constant := 1024;
NODEV : constant := 4294967295;
NOFILE : constant := 64;
NOGROUP : constant := 65535;
NZERO : constant := 0;
PBDRY : constant := 1024;
PCATCH : constant := 256;
PDROP : constant := 512;
PRIMASK : constant := 255;
SPECNAMELEN : constant := 63;
-- _SYS_PARAM_H_ (empty)
-- __FreeBSD_kernel__ (empty)
FreeBSD_version : constant := 804000;
-- btoc (function macro)
-- btodb (function macro)
-- clrbit (function macro)
-- ctob (function macro)
-- ctodb (function macro)
-- dbtob (function macro)
-- dbtoc (function macro)
-- howmany (function macro)
-- isclr (function macro)
-- isset (function macro)
-- member2struct (unparsible)
-- nitems (function macro)
-- powerof2 (function macro)
-- rounddown (function macro)
-- roundup (function macro)
-- roundup2 (function macro)
-- setbit (function macro)
end C.sys.param;
Raw
c-sys-qiovec.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
package C.sys.qiovec is
pragma Preelaborate;
type struct_iovec;
type struct_iovec is record
iov_base : aliased void_ptr;
iov_len : aliased stddef.size_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_iovec);
type struct_iovec_const_ptr is access constant struct_iovec;
for struct_iovec_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_iovec_const_ptr);
pragma Convention (C, struct_iovec_const_ptr);
type struct_iovec_ptr is access all struct_iovec;
for struct_iovec_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_iovec_ptr);
pragma Convention (C, struct_iovec_ptr);
-- _SYS__IOVEC_H_ (empty)
end C.sys.qiovec;
Raw
c-sys-qpthreadtypes.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.qpthreadtypes is
pragma Preelaborate;
type struct_pthread (<>) is limited private;
type struct_pthread_ptr is access all struct_pthread;
for struct_pthread_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_ptr);
pragma Convention (C, struct_pthread_ptr);
type struct_pthread_ptr_ptr is access all struct_pthread_ptr;
for struct_pthread_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_ptr_ptr);
pragma Convention (C, struct_pthread_ptr_ptr);
type struct_pthread_attr (<>) is limited private;
type struct_pthread_attr_ptr is access all struct_pthread_attr;
for struct_pthread_attr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_attr_ptr);
pragma Convention (C, struct_pthread_attr_ptr);
type struct_pthread_attr_ptr_ptr is access all struct_pthread_attr_ptr;
for struct_pthread_attr_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_attr_ptr_ptr);
pragma Convention (C, struct_pthread_attr_ptr_ptr);
type struct_pthread_attr_ptr_const_ptr is
access constant struct_pthread_attr_ptr;
for struct_pthread_attr_ptr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_attr_ptr_const_ptr);
pragma Convention (C, struct_pthread_attr_ptr_const_ptr);
type struct_pthread_cond (<>) is limited private;
type struct_pthread_cond_ptr is access all struct_pthread_cond;
for struct_pthread_cond_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_cond_ptr);
pragma Convention (C, struct_pthread_cond_ptr);
type struct_pthread_cond_ptr_ptr is access all struct_pthread_cond_ptr;
for struct_pthread_cond_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_cond_ptr_ptr);
pragma Convention (C, struct_pthread_cond_ptr_ptr);
type struct_pthread_cond_attr (<>) is limited private;
type struct_pthread_cond_attr_ptr is access all struct_pthread_cond_attr;
for struct_pthread_cond_attr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_cond_attr_ptr);
pragma Convention (C, struct_pthread_cond_attr_ptr);
type struct_pthread_cond_attr_ptr_ptr is
access all struct_pthread_cond_attr_ptr;
for struct_pthread_cond_attr_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_cond_attr_ptr_ptr);
pragma Convention (C, struct_pthread_cond_attr_ptr_ptr);
type struct_pthread_cond_attr_ptr_const_ptr is
access constant struct_pthread_cond_attr_ptr;
for struct_pthread_cond_attr_ptr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_cond_attr_ptr_const_ptr);
pragma Convention (C, struct_pthread_cond_attr_ptr_const_ptr);
type struct_pthread_mutex (<>) is limited private;
type struct_pthread_mutex_ptr is access all struct_pthread_mutex;
for struct_pthread_mutex_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_mutex_ptr);
pragma Convention (C, struct_pthread_mutex_ptr);
type struct_pthread_mutex_ptr_ptr is access all struct_pthread_mutex_ptr;
for struct_pthread_mutex_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_mutex_ptr_ptr);
pragma Convention (C, struct_pthread_mutex_ptr_ptr);
type struct_pthread_mutex_attr (<>) is limited private;
type struct_pthread_mutex_attr_ptr is
access all struct_pthread_mutex_attr;
for struct_pthread_mutex_attr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_mutex_attr_ptr);
pragma Convention (C, struct_pthread_mutex_attr_ptr);
type struct_pthread_mutex_attr_ptr_ptr is
access all struct_pthread_mutex_attr_ptr;
for struct_pthread_mutex_attr_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_mutex_attr_ptr_ptr);
pragma Convention (C, struct_pthread_mutex_attr_ptr_ptr);
type struct_pthread_mutex_attr_ptr_const_ptr is
access constant struct_pthread_mutex_attr_ptr;
for struct_pthread_mutex_attr_ptr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_mutex_attr_ptr_const_ptr);
pragma Convention (C, struct_pthread_mutex_attr_ptr_const_ptr);
type struct_pthread_once;
type struct_pthread_once_ptr is access all struct_pthread_once;
for struct_pthread_once_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_once_ptr);
pragma Convention (C, struct_pthread_once_ptr);
type struct_pthread_rwlock (<>) is limited private;
type struct_pthread_rwlock_ptr is access all struct_pthread_rwlock;
for struct_pthread_rwlock_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_rwlock_ptr);
pragma Convention (C, struct_pthread_rwlock_ptr);
type struct_pthread_rwlock_ptr_ptr is
access all struct_pthread_rwlock_ptr;
for struct_pthread_rwlock_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_rwlock_ptr_ptr);
pragma Convention (C, struct_pthread_rwlock_ptr_ptr);
type struct_pthread_rwlockattr (<>) is limited private;
type struct_pthread_rwlockattr_ptr is
access all struct_pthread_rwlockattr;
for struct_pthread_rwlockattr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_rwlockattr_ptr);
pragma Convention (C, struct_pthread_rwlockattr_ptr);
type struct_pthread_rwlockattr_ptr_const_ptr is
access constant struct_pthread_rwlockattr_ptr;
for struct_pthread_rwlockattr_ptr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_rwlockattr_ptr_const_ptr);
pragma Convention (C, struct_pthread_rwlockattr_ptr_const_ptr);
type struct_pthread_rwlockattr_ptr_ptr is
access all struct_pthread_rwlockattr_ptr;
for struct_pthread_rwlockattr_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_rwlockattr_ptr_ptr);
pragma Convention (C, struct_pthread_rwlockattr_ptr_ptr);
type struct_pthread_barrier (<>) is limited private;
type struct_pthread_barrier_ptr is access all struct_pthread_barrier;
for struct_pthread_barrier_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_barrier_ptr);
pragma Convention (C, struct_pthread_barrier_ptr);
type struct_pthread_barrier_ptr_ptr is
access all struct_pthread_barrier_ptr;
for struct_pthread_barrier_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_barrier_ptr_ptr);
pragma Convention (C, struct_pthread_barrier_ptr_ptr);
type struct_pthread_barrier_attr (<>) is limited private;
type struct_pthread_spinlock (<>) is limited private;
type struct_pthread_spinlock_ptr is access all struct_pthread_spinlock;
for struct_pthread_spinlock_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_spinlock_ptr);
pragma Convention (C, struct_pthread_spinlock_ptr);
type struct_pthread_spinlock_ptr_ptr is
access all struct_pthread_spinlock_ptr;
for struct_pthread_spinlock_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_spinlock_ptr_ptr);
pragma Convention (C, struct_pthread_spinlock_ptr_ptr);
subtype pthread_t is struct_pthread_ptr;
subtype pthread_t_ptr is struct_pthread_ptr_ptr;
subtype pthread_attr_t is struct_pthread_attr_ptr;
subtype pthread_attr_t_ptr is struct_pthread_attr_ptr_ptr;
subtype pthread_attr_t_const_ptr is struct_pthread_attr_ptr_const_ptr;
subtype pthread_mutex_t is struct_pthread_mutex_ptr;
subtype pthread_mutex_t_ptr is struct_pthread_mutex_ptr_ptr;
subtype pthread_mutexattr_t is struct_pthread_mutex_attr_ptr;
subtype pthread_mutexattr_t_ptr is struct_pthread_mutex_attr_ptr_ptr;
subtype pthread_mutexattr_t_const_ptr is
struct_pthread_mutex_attr_ptr_const_ptr;
subtype pthread_cond_t is struct_pthread_cond_ptr;
subtype pthread_cond_t_ptr is struct_pthread_cond_ptr_ptr;
subtype pthread_condattr_t is struct_pthread_cond_attr_ptr;
subtype pthread_condattr_t_ptr is struct_pthread_cond_attr_ptr_ptr;
subtype pthread_condattr_t_const_ptr is
struct_pthread_cond_attr_ptr_const_ptr;
subtype pthread_key_t is signed_int;
subtype pthread_key_t_ptr is signed_int_ptr;
subtype pthread_once_t is struct_pthread_once;
subtype pthread_once_t_ptr is struct_pthread_once_ptr;
subtype pthread_rwlock_t is struct_pthread_rwlock_ptr;
subtype pthread_rwlock_t_ptr is struct_pthread_rwlock_ptr_ptr;
subtype pthread_rwlockattr_t is struct_pthread_rwlockattr_ptr;
subtype pthread_rwlockattr_t_const_ptr is
struct_pthread_rwlockattr_ptr_const_ptr;
subtype pthread_rwlockattr_t_ptr is struct_pthread_rwlockattr_ptr_ptr;
subtype pthread_barrier_t is struct_pthread_barrier_ptr;
subtype pthread_barrier_t_ptr is struct_pthread_barrier_ptr_ptr;
type struct_pthread_barrierattr (<>) is limited private;
type struct_pthread_barrierattr_ptr is
access all struct_pthread_barrierattr;
for struct_pthread_barrierattr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_barrierattr_ptr);
pragma Convention (C, struct_pthread_barrierattr_ptr);
type struct_pthread_barrierattr_ptr_const_ptr is
access constant struct_pthread_barrierattr_ptr;
for struct_pthread_barrierattr_ptr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_barrierattr_ptr_const_ptr);
pragma Convention (C, struct_pthread_barrierattr_ptr_const_ptr);
type struct_pthread_barrierattr_ptr_ptr is
access all struct_pthread_barrierattr_ptr;
for struct_pthread_barrierattr_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pthread_barrierattr_ptr_ptr);
pragma Convention (C, struct_pthread_barrierattr_ptr_ptr);
subtype pthread_barrierattr_t is struct_pthread_barrierattr_ptr;
subtype pthread_barrierattr_t_const_ptr is
struct_pthread_barrierattr_ptr_const_ptr;
subtype pthread_barrierattr_t_ptr is struct_pthread_barrierattr_ptr_ptr;
subtype pthread_spinlock_t is struct_pthread_spinlock_ptr;
subtype pthread_spinlock_t_ptr is struct_pthread_spinlock_ptr_ptr;
subtype pthread_addr_t is void_ptr;
type access_914cded4 is access function (a1 : void_ptr) return void_ptr;
pragma Convention (C, access_914cded4);
subtype pthread_startroutine_t is access_914cded4;
type struct_pthread_once is record
state : aliased signed_int;
mutex : aliased pthread_mutex_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_pthread_once);
-- _PTHREAD_T_DECLARED (empty)
-- _SYS__PTHREADTYPES_H_ (empty)
private
type struct_pthread is null record;
type struct_pthread_attr is null record;
type struct_pthread_cond is null record;
type struct_pthread_cond_attr is null record;
type struct_pthread_mutex is null record;
type struct_pthread_mutex_attr is null record;
type struct_pthread_rwlock is null record;
type struct_pthread_rwlockattr is null record;
type struct_pthread_barrier is null record;
type struct_pthread_barrier_attr is null record;
type struct_pthread_spinlock is null record;
type struct_pthread_barrierattr is null record;
end C.sys.qpthreadtypes;
Raw
c-sys-qsigset.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
package C.sys.qsigset is
pragma Preelaborate;
type struct_sigset;
type struct_sigset is record
bits : aliased machine.qtypes.uint32_t_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_sigset);
type struct_sigset_const_ptr is access constant struct_sigset;
for struct_sigset_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigset_const_ptr);
pragma Convention (C, struct_sigset_const_ptr);
type struct_sigset_ptr is access all struct_sigset;
for struct_sigset_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigset_ptr);
pragma Convention (C, struct_sigset_ptr);
subtype sigset_t is struct_sigset;
subtype sigset_t_const_ptr is struct_sigset_const_ptr;
subtype sigset_t_ptr is struct_sigset_ptr;
-- _SIG_BIT (function macro)
-- _SIG_IDX (function macro)
SIG_MAXSIG : constant := 128;
-- _SIG_VALID (function macro)
-- _SIG_WORD (function macro)
SIG_WORDS : constant := 4;
-- _SYS__SIGSET_H_ (empty)
end C.sys.qsigset;
Raw
c-sys-qtimeval.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.types;
package C.sys.qtimeval is
pragma Preelaborate;
type struct_timeval;
type struct_timeval is record
tv_sec : aliased types.time_t;
tv_usec : aliased types.suseconds_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_timeval);
type struct_timeval_ptr is access all struct_timeval;
for struct_timeval_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_timeval_ptr);
pragma Convention (C, struct_timeval_ptr);
type struct_timeval_const_ptr is access constant struct_timeval;
for struct_timeval_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_timeval_const_ptr);
pragma Convention (C, struct_timeval_const_ptr);
type struct_timeval_array is array (size_t range <>) of
aliased struct_timeval;
pragma Convention (C, struct_timeval_array);
subtype struct_timeval_array2 is struct_timeval_array (0 .. 1);
-- _SYS__TIMEVAL_H_ (empty)
end C.sys.qtimeval;
Raw
c-sys-qtypes.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
package C.sys.qtypes is
pragma Preelaborate;
subtype blksize_t is machine.qtypes.uint32_t;
subtype blkcnt_t is machine.qtypes.int64_t;
subtype clockid_t is machine.qtypes.int32_t;
subtype clockid_t_ptr is machine.qtypes.int32_t_ptr;
subtype fflags_t is machine.qtypes.uint32_t;
subtype fsblkcnt_t is machine.qtypes.uint64_t;
subtype fsfilcnt_t is machine.qtypes.uint64_t;
subtype gid_t is machine.qtypes.uint32_t;
subtype gid_t_array is machine.qtypes.uint32_t_array;
subtype gid_t_ptr is machine.qtypes.uint32_t_ptr;
subtype gid_t_const_ptr is machine.qtypes.uint32_t_const_ptr;
subtype id_t is machine.qtypes.int64_t;
subtype ino_t is machine.qtypes.uint32_t;
subtype key_t is signed_long;
subtype lwpid_t is machine.qtypes.int32_t;
subtype mode_t is machine.qtypes.uint16_t;
subtype accmode_t is signed_int;
subtype nl_item is signed_int;
subtype nlink_t is machine.qtypes.uint16_t;
subtype off_t is machine.qtypes.int64_t;
subtype off_t_ptr is machine.qtypes.int64_t_ptr;
subtype off_t_const_ptr is machine.qtypes.int64_t_const_ptr;
subtype pid_t is machine.qtypes.int32_t;
subtype pid_t_ptr is machine.qtypes.int32_t_ptr;
subtype rlim_t is machine.qtypes.int64_t;
subtype sa_family_t is machine.qtypes.uint8_t;
subtype socklen_t is machine.qtypes.uint32_t;
subtype socklen_t_ptr is machine.qtypes.uint32_t_ptr;
subtype suseconds_t is signed_long;
type struct_timer (<>) is limited private;
type struct_timer_ptr is access all struct_timer;
for struct_timer_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_timer_ptr);
pragma Convention (C, struct_timer_ptr);
type struct_timer_ptr_ptr is access all struct_timer_ptr;
for struct_timer_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_timer_ptr_ptr);
pragma Convention (C, struct_timer_ptr_ptr);
subtype timer_t is struct_timer_ptr;
subtype timer_t_ptr is struct_timer_ptr_ptr;
type struct_mq (<>) is limited private;
type struct_mq_ptr is access all struct_mq;
for struct_mq_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_mq_ptr);
pragma Convention (C, struct_mq_ptr);
subtype mqd_t is struct_mq_ptr;
subtype uid_t is machine.qtypes.uint32_t;
subtype uid_t_ptr is machine.qtypes.uint32_t_ptr;
subtype uid_t_const_ptr is machine.qtypes.uint32_t_const_ptr;
subtype useconds_t is unsigned_int;
subtype cpuwhich_t is signed_int;
subtype cpulevel_t is signed_int;
subtype cpusetid_t is signed_int;
subtype cpusetid_t_ptr is signed_int_ptr;
subtype ct_rune_t is signed_int;
subtype rune_t is ct_rune_t;
subtype wchar_t is Standard.C.wchar_t;
subtype wint_t is ct_rune_t;
subtype dev_t is machine.qtypes.uint32_t;
subtype fixpt_t is machine.qtypes.uint32_t;
subtype fixpt_t_array is machine.qtypes.uint32_t_array;
type union_7d20fdff (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
mbstate8 : char_array (0 .. 127);
when others =>
mbstateL : machine.qtypes.int64_t;
end case;
end record;
pragma Unchecked_Union (union_7d20fdff);
pragma Convention (C_Pass_By_Copy, union_7d20fdff);
type union_7d20fdff_ptr is access all union_7d20fdff;
for union_7d20fdff_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (union_7d20fdff_ptr);
pragma Convention (C, union_7d20fdff_ptr);
type union_7d20fdff_const_ptr is access constant union_7d20fdff;
for union_7d20fdff_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (union_7d20fdff_const_ptr);
pragma Convention (C, union_7d20fdff_const_ptr);
subtype mbstate_t is union_7d20fdff;
subtype mbstate_t_ptr is union_7d20fdff_ptr;
subtype mbstate_t_const_ptr is union_7d20fdff_const_ptr;
-- _SYS__TYPES_H_ (empty)
private
type struct_timer is null record;
type struct_mq is null record;
end C.sys.qtypes;
Raw
c-sys-queue.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.queue is
pragma Preelaborate;
-- LIST_EMPTY (unparsible)
-- LIST_ENTRY (unparsible)
-- LIST_FIRST (unparsible)
-- LIST_FOREACH (unparsible)
-- LIST_FOREACH_SAFE (unparsible)
-- LIST_HEAD (unparsible)
-- LIST_HEAD_INITIALIZER (unparsible)
-- LIST_INIT (unparsible)
-- LIST_INSERT_AFTER (unparsible)
-- LIST_INSERT_BEFORE (unparsible)
-- LIST_INSERT_HEAD (unparsible)
-- LIST_NEXT (unparsible)
-- LIST_REMOVE (unparsible)
-- LIST_SWAP (unparsible)
-- QMD_LIST_CHECK_HEAD (empty)
-- QMD_LIST_CHECK_NEXT (empty)
-- QMD_LIST_CHECK_PREV (empty)
-- QMD_SAVELINK (empty)
-- QMD_TAILQ_CHECK_HEAD (empty)
-- QMD_TAILQ_CHECK_NEXT (empty)
-- QMD_TAILQ_CHECK_PREV (empty)
-- QMD_TAILQ_CHECK_TAIL (empty)
-- QMD_TRACE_ELEM (empty)
-- QMD_TRACE_HEAD (empty)
-- SLIST_EMPTY (unparsible)
-- SLIST_ENTRY (unparsible)
-- SLIST_FIRST (unparsible)
-- SLIST_FOREACH (unparsible)
-- SLIST_FOREACH_PREVPTR (unparsible)
-- SLIST_FOREACH_SAFE (unparsible)
-- SLIST_HEAD (unparsible)
-- SLIST_HEAD_INITIALIZER (unparsible)
-- SLIST_INIT (unparsible)
-- SLIST_INSERT_AFTER (unparsible)
-- SLIST_INSERT_HEAD (unparsible)
-- SLIST_NEXT (unparsible)
-- SLIST_REMOVE (unparsible)
-- SLIST_REMOVE_AFTER (unparsible)
-- SLIST_REMOVE_HEAD (unparsible)
-- SLIST_SWAP (unparsible)
-- STAILQ_CONCAT (unparsible)
-- STAILQ_EMPTY (unparsible)
-- STAILQ_ENTRY (unparsible)
-- STAILQ_FIRST (unparsible)
-- STAILQ_FOREACH (unparsible)
-- STAILQ_FOREACH_SAFE (unparsible)
-- STAILQ_HEAD (unparsible)
-- STAILQ_HEAD_INITIALIZER (unparsible)
-- STAILQ_INIT (unparsible)
-- STAILQ_INSERT_AFTER (unparsible)
-- STAILQ_INSERT_HEAD (unparsible)
-- STAILQ_INSERT_TAIL (unparsible)
-- STAILQ_LAST (unparsible)
-- STAILQ_NEXT (unparsible)
-- STAILQ_REMOVE (unparsible)
-- STAILQ_REMOVE_AFTER (unparsible)
-- STAILQ_REMOVE_HEAD (unparsible)
-- STAILQ_SWAP (unparsible)
-- TAILQ_CONCAT (unparsible)
-- TAILQ_EMPTY (unparsible)
-- TAILQ_ENTRY (unparsible)
-- TAILQ_FIRST (unparsible)
-- TAILQ_FOREACH (unparsible)
-- TAILQ_FOREACH_REVERSE (unparsible)
-- TAILQ_FOREACH_REVERSE_SAFE (unparsible)
-- TAILQ_FOREACH_SAFE (unparsible)
-- TAILQ_HEAD (unparsible)
-- TAILQ_HEAD_INITIALIZER (unparsible)
-- TAILQ_INIT (unparsible)
-- TAILQ_INSERT_AFTER (unparsible)
-- TAILQ_INSERT_BEFORE (unparsible)
-- TAILQ_INSERT_HEAD (unparsible)
-- TAILQ_INSERT_TAIL (unparsible)
-- TAILQ_LAST (unparsible)
-- TAILQ_NEXT (unparsible)
-- TAILQ_PREV (unparsible)
-- TAILQ_REMOVE (unparsible)
-- TAILQ_SWAP (unparsible)
-- TRACEBUF (empty)
-- TRASHIT (empty)
-- _SYS_QUEUE_H_ (empty)
end C.sys.queue;
Raw
c-sys-resource.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
with C.sys.qtimeval;
with C.sys.qtypes;
with C.sys.types;
package C.sys.resource is
pragma Preelaborate;
type struct_rusage;
type struct_rusage is record
ru_utime : aliased qtimeval.struct_timeval;
ru_stime : aliased qtimeval.struct_timeval;
ru_maxrss : aliased signed_long;
ru_ixrss : aliased signed_long;
ru_idrss : aliased signed_long;
ru_isrss : aliased signed_long;
ru_minflt : aliased signed_long;
ru_majflt : aliased signed_long;
ru_nswap : aliased signed_long;
ru_inblock : aliased signed_long;
ru_oublock : aliased signed_long;
ru_msgsnd : aliased signed_long;
ru_msgrcv : aliased signed_long;
ru_nsignals : aliased signed_long;
ru_nvcsw : aliased signed_long;
ru_nivcsw : aliased signed_long;
end record;
pragma Convention (C_Pass_By_Copy, struct_rusage);
type struct_rusage_ptr is access all struct_rusage;
for struct_rusage_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_rusage_ptr);
pragma Convention (C, struct_rusage_ptr);
type struct_rlimit;
type struct_rlimit is record
rlim_cur : aliased types.rlim_t;
rlim_max : aliased types.rlim_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_rlimit);
type struct_rlimit_ptr is access all struct_rlimit;
for struct_rlimit_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_rlimit_ptr);
pragma Convention (C, struct_rlimit_ptr);
type struct_rlimit_const_ptr is access constant struct_rlimit;
for struct_rlimit_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_rlimit_const_ptr);
pragma Convention (C, struct_rlimit_const_ptr);
type struct_orlimit;
type struct_orlimit is record
rlim_cur : aliased machine.qtypes.int32_t;
rlim_max : aliased machine.qtypes.int32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_orlimit);
type struct_loadavg;
type struct_loadavg is record
ldavg : aliased qtypes.fixpt_t_array (0 .. 2);
fscale : aliased signed_long;
end record;
pragma Convention (C_Pass_By_Copy, struct_loadavg);
function getpriority (a1 : signed_int; a2 : signed_int) return signed_int;
pragma Import (C, getpriority, "getpriority");
function getrlimit (a1 : signed_int; a2 : access struct_rlimit)
return signed_int;
pragma Import (C, getrlimit, "getrlimit");
function getrusage (a1 : signed_int; a2 : access struct_rusage)
return signed_int;
pragma Import (C, getrusage, "getrusage");
function setpriority (a1 : signed_int; a2 : signed_int; a3 : signed_int)
return signed_int;
pragma Import (C, setpriority, "setpriority");
function setrlimit (a1 : signed_int; a2 : access constant struct_rlimit)
return signed_int;
pragma Import (C, setrlimit, "setrlimit");
CPUSTATES : constant := 5;
CP_IDLE : constant := 4;
CP_INTR : constant := 3;
CP_NICE : constant := 1;
CP_SYS : constant := 2;
CP_USER : constant := 0;
PRIO_MAX : constant := 20;
PRIO_MIN : constant := -20;
PRIO_PGRP : constant := 1;
PRIO_PROCESS : constant := 0;
PRIO_USER : constant := 2;
RLIMIT_AS : constant := 10;
RLIMIT_CORE : constant := 4;
RLIMIT_CPU : constant := 0;
RLIMIT_DATA : constant := 2;
RLIMIT_FSIZE : constant := 1;
RLIMIT_MEMLOCK : constant := 6;
RLIMIT_NOFILE : constant := 8;
RLIMIT_NPROC : constant := 7;
RLIMIT_NPTS : constant := 11;
RLIMIT_RSS : constant := 5;
RLIMIT_SBSIZE : constant := 9;
RLIMIT_STACK : constant := 3;
RLIMIT_SWAP : constant := 12;
RLIMIT_VMEM : constant := 10;
RLIM_INFINITY : constant := 9223372036854775807;
RLIM_NLIMITS : constant := 13;
RUSAGE_CHILDREN : constant := -1;
RUSAGE_SELF : constant := 0;
RUSAGE_THREAD : constant := 1;
-- _SYS_RESOURCE_H_ (empty)
-- .ru_first renames .ru_ixrss (accessor)
-- .ru_last renames .ru_nivcsw (accessor)
end C.sys.resource;
Raw
c-sys-select_h.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.qsigset;
with C.sys.qtimeval;
with C.sys.timespec;
package C.sys.select_h is
pragma Preelaborate;
subtype qqfd_mask is unsigned_long;
subtype qqfd_mask_array is unsigned_long_array;
subtype qqfd_mask_array32 is qqfd_mask_array (0 .. 31);
subtype qqfd_mask_ptr is unsigned_long_ptr;
subtype fd_mask is qqfd_mask;
subtype sigset_t is qsigset.sigset_t;
subtype sigset_t_const_ptr is qsigset.sigset_t_const_ptr;
subtype sigset_t_ptr is qsigset.sigset_t_ptr;
type struct_fd_set;
type struct_fd_set is record
fds_bits : aliased qqfd_mask_array (0 .. 31);
end record;
pragma Convention (C_Pass_By_Copy, struct_fd_set);
type struct_fd_set_ptr is access all struct_fd_set;
for struct_fd_set_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_fd_set_ptr);
pragma Convention (C, struct_fd_set_ptr);
subtype fd_set is struct_fd_set;
subtype fd_set_ptr is struct_fd_set_ptr;
function pselect (a1 : signed_int; a2 : access fd_set; a3 : access fd_set;
a4 : access fd_set; a5 : access constant timespec.struct_timespec;
a6 : access constant sigset_t) return signed_int;
pragma Import (C, pselect, "pselect");
function C_select (a1 : signed_int; a2 : access fd_set;
a3 : access fd_set; a4 : access fd_set;
a5 : access qtimeval.struct_timeval) return signed_int;
pragma Import (C, C_select, "select");
-- FD_CLR (uninterpretable)
-- FD_COPY (function macro)
-- FD_ISSET (uninterpretable)
-- FD_SET (uninterpretable)
FD_SETSIZE : constant := 1024;
-- FD_ZERO (function macro)
NFDBITS : constant := 32;
qNFDBITS : constant := 32;
-- _SELECT_DECLARED (empty)
-- _SIGSET_T_DECLARED (empty)
-- _SYS_SELECT_H_ (empty)
-- __fdset_mask (function macro)
-- _howmany (function macro)
-- .fds_bits renames .__fds_bits (accessor)
end C.sys.select_h;
Raw
c-sys-signal.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with Ada.Unchecked_Conversion;
with C.machine.qtypes;
with C.sys.qtypes;
with C.sys.select_h;
package C.sys.signal is
pragma Preelaborate;
type access_9e366d3a is access procedure (a1 : signed_int);
pragma Convention (C, access_9e366d3a);
-- subtype __sighandler_t is ... (function type)
subtype sighandler_t_ptr is access_9e366d3a;
function Cast is new Ada.Unchecked_Conversion (signed_int,
sighandler_t_ptr);
type union_sigval;
type union_sigval (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
sival_int : signed_int;
when 1 =>
sival_ptr : void_ptr;
when 2 =>
sigval_int : signed_int;
when others =>
sigval_ptr : void_ptr;
end case;
end record;
pragma Unchecked_Union (union_sigval);
pragma Convention (C_Pass_By_Copy, union_sigval);
type struct_sigevent;
type access_98169444 is access procedure (a1 : union_sigval);
pragma Convention (C, access_98169444);
type struct_f5b91635 is record
F_function : aliased access_98169444;
attribute : aliased void_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_f5b91635);
type union_060e82c5 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
threadid : qtypes.lwpid_t;
when 1 =>
sigev_thread : struct_f5b91635;
when others =>
spare : signed_long_array (0 .. 7);
end case;
end record;
pragma Unchecked_Union (union_060e82c5);
pragma Convention (C_Pass_By_Copy, union_060e82c5);
type struct_sigevent is record
sigev_notify : aliased signed_int;
sigev_signo : aliased signed_int;
sigev_value : aliased union_sigval;
sigev_un : aliased union_060e82c5;
end record;
pragma Convention (C_Pass_By_Copy, struct_sigevent);
type struct_sigevent_ptr is access all struct_sigevent;
for struct_sigevent_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigevent_ptr);
pragma Convention (C, struct_sigevent_ptr);
type struct_siginfo;
type struct_b656d79f is record
trapno : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_b656d79f);
type struct_f17fa675 is record
timerid : aliased signed_int;
overrun : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_f17fa675);
type struct_e0a4dc4c is record
mqd : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_e0a4dc4c);
type struct_1a39969e is record
band : aliased signed_long;
end record;
pragma Convention (C_Pass_By_Copy, struct_1a39969e);
type struct_bd9baaca is record
spare1 : aliased signed_long;
spare2 : aliased signed_int_array (0 .. 6);
end record;
pragma Convention (C_Pass_By_Copy, struct_bd9baaca);
type union_8718c20e (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
fault : struct_b656d79f;
when 1 =>
timer : struct_f17fa675;
when 2 =>
mesgq : struct_e0a4dc4c;
when 3 =>
poll : struct_1a39969e;
when others =>
spare : struct_bd9baaca;
end case;
end record;
pragma Unchecked_Union (union_8718c20e);
pragma Convention (C_Pass_By_Copy, union_8718c20e);
type struct_siginfo is record
si_signo : aliased signed_int;
si_errno : aliased signed_int;
si_code : aliased signed_int;
si_pid : aliased qtypes.pid_t;
si_uid : aliased qtypes.uid_t;
si_status : aliased signed_int;
si_addr : aliased void_ptr;
si_value : aliased union_sigval;
reason : aliased union_8718c20e;
end record;
pragma Convention (C_Pass_By_Copy, struct_siginfo);
type struct_siginfo_ptr is access all struct_siginfo;
for struct_siginfo_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_siginfo_ptr);
pragma Convention (C, struct_siginfo_ptr);
subtype siginfo_t is struct_siginfo;
subtype siginfo_t_ptr is struct_siginfo_ptr;
type struct_sigaction;
type access_35f7489b is access procedure (a1 : signed_int;
a2 : access struct_siginfo; a3 : void_ptr);
pragma Convention (C, access_35f7489b);
type union_faba0d11 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
sa_handler : access_9e366d3a;
when others =>
sa_sigaction : access_35f7489b;
end case;
end record;
pragma Unchecked_Union (union_faba0d11);
pragma Convention (C_Pass_By_Copy, union_faba0d11);
type struct_sigaction is record
sigaction_u : aliased union_faba0d11;
sa_flags : aliased signed_int;
sa_mask : aliased select_h.sigset_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_sigaction);
type struct_sigaction_const_ptr is access constant struct_sigaction;
for struct_sigaction_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigaction_const_ptr);
pragma Convention (C, struct_sigaction_const_ptr);
type struct_sigaction_ptr is access all struct_sigaction;
for struct_sigaction_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigaction_ptr);
pragma Convention (C, struct_sigaction_ptr);
subtype sig_t is sighandler_t_ptr;
-- subtype __siginfohandler_t is ... (function type)
type struct_sigaltstack;
type struct_sigaltstack is record
ss_sp : aliased char_ptr;
ss_size : aliased machine.qtypes.size_t;
ss_flags : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_sigaltstack);
type struct_sigaltstack_const_ptr is access constant struct_sigaltstack;
for struct_sigaltstack_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigaltstack_const_ptr);
pragma Convention (C, struct_sigaltstack_const_ptr);
type struct_sigaltstack_ptr is access all struct_sigaltstack;
for struct_sigaltstack_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigaltstack_ptr);
pragma Convention (C, struct_sigaltstack_ptr);
subtype stack_t is struct_sigaltstack;
subtype stack_t_const_ptr is struct_sigaltstack_const_ptr;
subtype stack_t_ptr is struct_sigaltstack_ptr;
type struct_sigvec;
type struct_sigvec is record
sv_handler : aliased sighandler_t_ptr;
sv_mask : aliased signed_int;
sv_flags : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_sigvec);
type struct_sigvec_ptr is access all struct_sigvec;
for struct_sigvec_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigvec_ptr);
pragma Convention (C, struct_sigvec_ptr);
type struct_sigstack;
type struct_sigstack is record
ss_sp : aliased char_ptr;
ss_onstack : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_sigstack);
type struct_sigstack_const_ptr is access constant struct_sigstack;
for struct_sigstack_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigstack_const_ptr);
pragma Convention (C, struct_sigstack_const_ptr);
type struct_sigstack_ptr is access all struct_sigstack;
for struct_sigstack_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigstack_ptr);
pragma Convention (C, struct_sigstack_ptr);
function signal (a1 : signed_int; a2 : sighandler_t_ptr)
return sighandler_t_ptr;
pragma Import (C, signal, "signal");
function BADSIG (Value : signed_int := -1) return sighandler_t_ptr
renames Cast;
BUS_ADRALN : constant := 1;
BUS_ADRERR : constant := 2;
BUS_OBJERR : constant := 3;
CLD_CONTINUED : constant := 6;
CLD_DUMPED : constant := 3;
CLD_EXITED : constant := 1;
CLD_KILLED : constant := 2;
CLD_STOPPED : constant := 5;
CLD_TRAPPED : constant := 4;
FPE_FLTDIV : constant := 3;
FPE_FLTINV : constant := 7;
FPE_FLTOVF : constant := 4;
FPE_FLTRES : constant := 6;
FPE_FLTSUB : constant := 8;
FPE_FLTUND : constant := 5;
FPE_INTDIV : constant := 2;
FPE_INTOVF : constant := 1;
ILL_BADSTK : constant := 8;
ILL_COPROC : constant := 7;
ILL_ILLADR : constant := 3;
ILL_ILLOPC : constant := 1;
ILL_ILLOPN : constant := 2;
ILL_ILLTRP : constant := 4;
ILL_PRVOPC : constant := 5;
ILL_PRVREG : constant := 6;
MINSIGSTKSZ : constant := 2048;
NSIG : constant := 32;
POLL_ERR : constant := 4;
POLL_HUP : constant := 6;
POLL_IN : constant := 1;
POLL_MSG : constant := 3;
POLL_OUT : constant := 2;
POLL_PRI : constant := 5;
SA_NOCLDSTOP : constant := 8;
SA_NOCLDWAIT : constant := 32;
SA_NODEFER : constant := 16;
SA_ONSTACK : constant := 1;
SA_RESETHAND : constant := 4;
SA_RESTART : constant := 2;
SA_SIGINFO : constant := 64;
SEGV_ACCERR : constant := 2;
SEGV_MAPERR : constant := 1;
SIGABRT : constant := 6;
SIGALRM : constant := 14;
SIGBUS : constant := 10;
SIGCHLD : constant := 20;
SIGCONT : constant := 19;
SIGEMT : constant := 7;
SIGEV_KEVENT : constant := 3;
SIGEV_NONE : constant := 0;
SIGEV_SIGNAL : constant := 1;
SIGEV_THREAD : constant := 2;
SIGEV_THREAD_ID : constant := 4;
SIGFPE : constant := 8;
SIGHUP : constant := 1;
SIGILL : constant := 4;
SIGINFO : constant := 29;
SIGINT : constant := 2;
SIGIO : constant := 23;
SIGIOT : constant := 6;
SIGKILL : constant := 9;
SIGLWP : constant := 32;
SIGPIPE : constant := 13;
SIGPROF : constant := 27;
SIGQUIT : constant := 3;
SIGRTMAX : constant := 126;
SIGRTMIN : constant := 65;
SIGSEGV : constant := 11;
SIGSTKSZ : constant := 34816;
SIGSTOP : constant := 17;
SIGSYS : constant := 12;
SIGTERM : constant := 15;
SIGTHR : constant := 32;
SIGTRAP : constant := 5;
SIGTSTP : constant := 18;
SIGTTIN : constant := 21;
SIGTTOU : constant := 22;
SIGURG : constant := 16;
SIGUSR1 : constant := 30;
SIGUSR2 : constant := 31;
SIGVTALRM : constant := 26;
SIGWINCH : constant := 28;
SIGXCPU : constant := 24;
SIGXFSZ : constant := 25;
SIG_BLOCK : constant := 1;
SIG_DFL : constant sighandler_t_ptr := null;
function SIG_ERR (Value : signed_int := -1) return sighandler_t_ptr
renames Cast;
function SIG_HOLD (Value : signed_int := 3) return sighandler_t_ptr
renames Cast;
function SIG_IGN (Value : signed_int := 1) return sighandler_t_ptr
renames Cast;
SIG_SETMASK : constant := 3;
SIG_UNBLOCK : constant := 2;
SI_ASYNCIO : constant := 65540;
SI_KERNEL : constant := 65542;
SI_MESGQ : constant := 65541;
SI_NOINFO : constant := 0;
SI_QUEUE : constant := 65538;
SI_TIMER : constant := 65539;
SI_UNDEFINED : constant := 0;
SI_USER : constant := 65537;
SS_DISABLE : constant := 4;
SS_ONSTACK : constant := 1;
SV_INTERRUPT : constant := 2;
SV_NOCLDSTOP : constant := 8;
SV_NODEFER : constant := 16;
SV_ONSTACK : constant := 1;
SV_RESETHAND : constant := 4;
SV_SIGINFO : constant := 64;
TRAP_BRKPT : constant := 1;
TRAP_DTRACE : constant := 3;
TRAP_TRACE : constant := 2;
-- _SYS_SIGNAL_H_ (empty)
-- .sa_handler renames .__sigaction_u.__sa_handler (accessor)
-- .sa_sigaction renames .__sigaction_u.__sa_sigaction (accessor)
-- .si_band renames ._reason._poll._band (accessor)
-- .si_mqd renames ._reason._mesgq._mqd (accessor)
-- .si_overrun renames ._reason._timer._overrun (accessor)
-- .si_timerid renames ._reason._timer._timerid (accessor)
-- .si_trapno renames ._reason._fault._trapno (accessor)
-- .sigev_notify_attributes renames ._sigev_un._sigev_thread.... (accessor)
-- .sigev_notify_function renames ._sigev_un._sigev_thread._f... (accessor)
-- .sigev_notify_kqueue renames .sigev_signo (accessor)
-- .sigev_notify_thread_id renames ._sigev_un._threadid (accessor)
-- sigmask (function macro)
-- .sv_onstack renames .sv_flags (accessor)
end C.sys.signal;
Raw
c-sys-socket.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
with C.stddef;
with C.sys.qiovec;
with C.sys.qtypes;
with C.sys.types;
package C.sys.socket is
pragma Preelaborate;
subtype sa_family_t is qtypes.sa_family_t;
subtype socklen_t is qtypes.socklen_t;
subtype socklen_t_ptr is qtypes.socklen_t_ptr;
type struct_linger;
type struct_linger is record
l_onoff : aliased signed_int;
l_linger : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_linger);
type struct_accept_filter_arg;
type struct_accept_filter_arg is record
af_name : aliased char_array (0 .. 15);
af_arg : aliased char_array (0 .. 239);
end record;
pragma Convention (C_Pass_By_Copy, struct_accept_filter_arg);
type struct_sockaddr;
type struct_sockaddr is record
sa_len : aliased unsigned_char;
sa_family : aliased sa_family_t;
sa_data : aliased char_array (0 .. 13);
end record;
pragma Convention (C_Pass_By_Copy, struct_sockaddr);
type struct_sockaddr_ptr is access all struct_sockaddr;
for struct_sockaddr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sockaddr_ptr);
pragma Convention (C, struct_sockaddr_ptr);
type struct_sockaddr_const_ptr is access constant struct_sockaddr;
for struct_sockaddr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sockaddr_const_ptr);
pragma Convention (C, struct_sockaddr_const_ptr);
type struct_sockproto;
type struct_sockproto is record
sp_family : aliased unsigned_short;
sp_protocol : aliased unsigned_short;
end record;
pragma Convention (C_Pass_By_Copy, struct_sockproto);
type struct_sockaddr_storage;
type struct_sockaddr_storage is record
ss_len : aliased unsigned_char;
ss_family : aliased sa_family_t;
ss_pad1 : aliased char_array (0 .. 5);
ss_align : aliased machine.qtypes.int64_t;
ss_pad2 : aliased char_array (0 .. 111);
end record;
pragma Convention (C_Pass_By_Copy, struct_sockaddr_storage);
type struct_sockaddr_storage_ptr is access all struct_sockaddr_storage;
for struct_sockaddr_storage_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sockaddr_storage_ptr);
pragma Convention (C, struct_sockaddr_storage_ptr);
type struct_msghdr;
type struct_msghdr is record
msg_name : aliased void_ptr;
msg_namelen : aliased socklen_t;
msg_iov : aliased qiovec.struct_iovec_ptr;
msg_iovlen : aliased signed_int;
msg_control : aliased void_ptr;
msg_controllen : aliased socklen_t;
msg_flags : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_msghdr);
type struct_msghdr_ptr is access all struct_msghdr;
for struct_msghdr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_msghdr_ptr);
pragma Convention (C, struct_msghdr_ptr);
type struct_msghdr_const_ptr is access constant struct_msghdr;
for struct_msghdr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_msghdr_const_ptr);
pragma Convention (C, struct_msghdr_const_ptr);
type struct_cmsghdr;
type struct_cmsghdr is record
cmsg_len : aliased socklen_t;
cmsg_level : aliased signed_int;
cmsg_type : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_cmsghdr);
type struct_cmsghdr_ptr is access all struct_cmsghdr;
for struct_cmsghdr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_cmsghdr_ptr);
pragma Convention (C, struct_cmsghdr_ptr);
type struct_cmsghdr_ptr_ptr is access all struct_cmsghdr_ptr;
for struct_cmsghdr_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_cmsghdr_ptr_ptr);
pragma Convention (C, struct_cmsghdr_ptr_ptr);
type struct_cmsghdr_const_ptr is access constant struct_cmsghdr;
for struct_cmsghdr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_cmsghdr_const_ptr);
pragma Convention (C, struct_cmsghdr_const_ptr);
type struct_cmsgcred;
type struct_cmsgcred is record
cmcred_pid : aliased types.pid_t;
cmcred_uid : aliased types.uid_t;
cmcred_euid : aliased types.uid_t;
cmcred_gid : aliased types.gid_t;
cmcred_ngroups : aliased signed_short;
cmcred_groups : aliased types.gid_t_array (0 .. 15);
end record;
pragma Convention (C_Pass_By_Copy, struct_cmsgcred);
type struct_sockcred;
type struct_sockcred is record
sc_uid : aliased types.uid_t;
sc_euid : aliased types.uid_t;
sc_gid : aliased types.gid_t;
sc_egid : aliased types.gid_t;
sc_ngroups : aliased signed_int;
sc_groups : aliased types.gid_t_array (0 .. 0);
end record;
pragma Convention (C_Pass_By_Copy, struct_sockcred);
type struct_osockaddr;
type struct_osockaddr is record
sa_family : aliased unsigned_short;
sa_data : aliased char_array (0 .. 13);
end record;
pragma Convention (C_Pass_By_Copy, struct_osockaddr);
type struct_omsghdr;
type struct_omsghdr is record
msg_name : aliased char_ptr;
msg_namelen : aliased signed_int;
msg_iov : aliased qiovec.struct_iovec_ptr;
msg_iovlen : aliased signed_int;
msg_accrights : aliased char_ptr;
msg_accrightslen : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_omsghdr);
type struct_sf_hdtr;
type struct_sf_hdtr is record
headers : aliased qiovec.struct_iovec_ptr;
hdr_cnt : aliased signed_int;
trailers : aliased qiovec.struct_iovec_ptr;
trl_cnt : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_sf_hdtr);
type struct_sf_hdtr_ptr is access all struct_sf_hdtr;
for struct_sf_hdtr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sf_hdtr_ptr);
pragma Convention (C, struct_sf_hdtr_ptr);
function C_accept (a1 : signed_int; a2 : access struct_sockaddr;
a3 : access socklen_t) return signed_int;
pragma Import (C, C_accept, "accept");
function bind (a1 : signed_int; a2 : access constant struct_sockaddr;
a3 : socklen_t) return signed_int;
pragma Import (C, bind, "bind");
function connect (a1 : signed_int; a2 : access constant struct_sockaddr;
a3 : socklen_t) return signed_int;
pragma Import (C, connect, "connect");
function getpeername (a1 : signed_int; a2 : access struct_sockaddr;
a3 : access socklen_t) return signed_int;
pragma Import (C, getpeername, "getpeername");
function getsockname (a1 : signed_int; a2 : access struct_sockaddr;
a3 : access socklen_t) return signed_int;
pragma Import (C, getsockname, "getsockname");
function getsockopt (a1 : signed_int; a2 : signed_int; a3 : signed_int;
a4 : void_ptr; a5 : access socklen_t) return signed_int;
pragma Import (C, getsockopt, "getsockopt");
function listen (a1 : signed_int; a2 : signed_int) return signed_int;
pragma Import (C, listen, "listen");
function recv (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t;
a4 : signed_int) return types.ssize_t;
pragma Import (C, recv, "recv");
function recvfrom (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t;
a4 : signed_int; a5 : access struct_sockaddr; a6 : access socklen_t)
return types.ssize_t;
pragma Import (C, recvfrom, "recvfrom");
function recvmsg (a1 : signed_int; a2 : access struct_msghdr;
a3 : signed_int) return types.ssize_t;
pragma Import (C, recvmsg, "recvmsg");
function send (a1 : signed_int; a2 : void_const_ptr; a3 : stddef.size_t;
a4 : signed_int) return types.ssize_t;
pragma Import (C, send, "send");
function sendto (a1 : signed_int; a2 : void_const_ptr; a3 : stddef.size_t;
a4 : signed_int; a5 : access constant struct_sockaddr; a6 : socklen_t)
return types.ssize_t;
pragma Import (C, sendto, "sendto");
function sendmsg (a1 : signed_int; a2 : access constant struct_msghdr;
a3 : signed_int) return types.ssize_t;
pragma Import (C, sendmsg, "sendmsg");
function sendfile (a1 : signed_int; a2 : signed_int; a3 : types.off_t;
a4 : stddef.size_t; a5 : access struct_sf_hdtr;
a6 : access types.off_t; a7 : signed_int) return signed_int;
pragma Import (C, sendfile, "sendfile");
function setfib (a1 : signed_int) return signed_int;
pragma Import (C, setfib, "setfib");
function setsockopt (a1 : signed_int; a2 : signed_int; a3 : signed_int;
a4 : void_const_ptr; a5 : socklen_t) return signed_int;
pragma Import (C, setsockopt, "setsockopt");
function shutdown (a1 : signed_int; a2 : signed_int) return signed_int;
pragma Import (C, shutdown, "shutdown");
function sockatmark (a1 : signed_int) return signed_int;
pragma Import (C, sockatmark, "sockatmark");
function socket (a1 : signed_int; a2 : signed_int; a3 : signed_int)
return signed_int;
pragma Import (C, socket, "socket");
function socketpair (a1 : signed_int; a2 : signed_int; a3 : signed_int;
a4 : access signed_int) return signed_int;
pragma Import (C, socketpair, "socketpair");
AF_APPLETALK : constant := 16;
AF_ARP : constant := 35;
AF_ATM : constant := 30;
AF_BLUETOOTH : constant := 36;
AF_CCITT : constant := 10;
AF_CHAOS : constant := 5;
AF_CNT : constant := 21;
AF_COIP : constant := 20;
AF_DATAKIT : constant := 9;
AF_DECnet : constant := 12;
AF_DLI : constant := 13;
AF_E164 : constant := 26;
AF_ECMA : constant := 8;
AF_HYLINK : constant := 15;
AF_IEEE80211 : constant := 37;
AF_IMPLINK : constant := 3;
AF_INET : constant := 2;
AF_INET6 : constant := 28;
AF_IPX : constant := 23;
AF_ISDN : constant := 26;
AF_ISO : constant := 7;
AF_LAT : constant := 14;
AF_LINK : constant := 18;
AF_LOCAL : constant := 1;
AF_MAX : constant := 38;
AF_NATM : constant := 29;
AF_NETBIOS : constant := 6;
AF_NETGRAPH : constant := 32;
AF_OSI : constant := 7;
AF_PUP : constant := 4;
AF_ROUTE : constant := 17;
AF_SCLUSTER : constant := 34;
AF_SIP : constant := 24;
AF_SLOW : constant := 33;
AF_SNA : constant := 11;
AF_UNIX : constant := 1;
AF_UNSPEC : constant := 0;
AF_VENDOR00 : constant := 39;
AF_VENDOR01 : constant := 41;
AF_VENDOR02 : constant := 43;
AF_VENDOR03 : constant := 45;
AF_VENDOR04 : constant := 47;
AF_VENDOR05 : constant := 49;
AF_VENDOR06 : constant := 51;
AF_VENDOR07 : constant := 53;
AF_VENDOR08 : constant := 55;
AF_VENDOR09 : constant := 57;
AF_VENDOR10 : constant := 59;
AF_VENDOR11 : constant := 61;
AF_VENDOR12 : constant := 63;
AF_VENDOR13 : constant := 65;
AF_VENDOR14 : constant := 67;
AF_VENDOR15 : constant := 69;
AF_VENDOR16 : constant := 71;
AF_VENDOR17 : constant := 73;
AF_VENDOR18 : constant := 75;
AF_VENDOR19 : constant := 77;
AF_VENDOR20 : constant := 79;
AF_VENDOR21 : constant := 81;
AF_VENDOR22 : constant := 83;
AF_VENDOR23 : constant := 85;
AF_VENDOR24 : constant := 87;
AF_VENDOR25 : constant := 89;
AF_VENDOR26 : constant := 91;
AF_VENDOR27 : constant := 93;
AF_VENDOR28 : constant := 95;
AF_VENDOR29 : constant := 97;
AF_VENDOR30 : constant := 99;
AF_VENDOR31 : constant := 101;
AF_VENDOR32 : constant := 103;
AF_VENDOR33 : constant := 105;
AF_VENDOR34 : constant := 107;
AF_VENDOR35 : constant := 109;
AF_VENDOR36 : constant := 111;
AF_VENDOR37 : constant := 113;
AF_VENDOR38 : constant := 115;
AF_VENDOR39 : constant := 117;
AF_VENDOR40 : constant := 119;
AF_VENDOR41 : constant := 121;
AF_VENDOR42 : constant := 123;
AF_VENDOR43 : constant := 125;
AF_VENDOR44 : constant := 127;
AF_VENDOR45 : constant := 129;
AF_VENDOR46 : constant := 131;
AF_VENDOR47 : constant := 133;
CMGROUP_MAX : constant := 16;
-- CMSG_DATA (function macro)
-- CMSG_FIRSTHDR (uninterpretable)
-- CMSG_LEN (function macro)
-- CMSG_NXTHDR (uninterpretable)
-- CMSG_SPACE (function macro)
-- CTL_NET_NAMES (unparsible)
-- CTL_NET_RT_NAMES (unparsible)
MSG_COMPAT : constant := 32768;
MSG_CTRUNC : constant := 32;
MSG_DONTROUTE : constant := 4;
MSG_DONTWAIT : constant := 128;
MSG_EOF : constant := 256;
MSG_EOR : constant := 8;
MSG_NBIO : constant := 16384;
MSG_NOSIGNAL : constant := 131072;
MSG_NOTIFICATION : constant := 8192;
MSG_OOB : constant := 1;
MSG_PEEK : constant := 2;
MSG_TRUNC : constant := 16;
MSG_WAITALL : constant := 64;
NET_MAXID : constant := 38;
NET_RT_DUMP : constant := 1;
NET_RT_FLAGS : constant := 2;
NET_RT_IFLIST : constant := 3;
NET_RT_IFLISTL : constant := 5;
NET_RT_IFMALIST : constant := 4;
NET_RT_MAXID : constant := 6;
PF_APPLETALK : constant := 16;
PF_ARP : constant := 35;
PF_ATM : constant := 30;
PF_BLUETOOTH : constant := 36;
PF_CCITT : constant := 10;
PF_CHAOS : constant := 5;
PF_CNT : constant := 21;
PF_COIP : constant := 20;
PF_DATAKIT : constant := 9;
PF_DECnet : constant := 12;
PF_DLI : constant := 13;
PF_ECMA : constant := 8;
PF_HYLINK : constant := 15;
PF_IMPLINK : constant := 3;
PF_INET : constant := 2;
PF_INET6 : constant := 28;
PF_IPX : constant := 23;
PF_ISDN : constant := 26;
PF_ISO : constant := 7;
PF_KEY : constant := 27;
PF_LAT : constant := 14;
PF_LINK : constant := 18;
PF_LOCAL : constant := 1;
PF_MAX : constant := 38;
PF_NATM : constant := 29;
PF_NETBIOS : constant := 6;
PF_NETGRAPH : constant := 32;
PF_OSI : constant := 7;
PF_PIP : constant := 25;
PF_PUP : constant := 4;
PF_ROUTE : constant := 17;
PF_RTIP : constant := 22;
PF_SCLUSTER : constant := 34;
PF_SIP : constant := 24;
PF_SLOW : constant := 33;
PF_SNA : constant := 11;
PF_UNIX : constant := 1;
PF_UNSPEC : constant := 0;
PF_XTP : constant := 19;
PRU_FLUSH_RD : constant := 0;
PRU_FLUSH_RDWR : constant := 2;
PRU_FLUSH_WR : constant := 1;
SCM_BINTIME : constant := 4;
SCM_CREDS : constant := 3;
SCM_RIGHTS : constant := 1;
SCM_TIMESTAMP : constant := 2;
SF_MNOWAIT : constant := 2;
SF_NODISKIO : constant := 1;
SF_SYNC : constant := 4;
SHUT_RD : constant := 0;
SHUT_RDWR : constant := 2;
SHUT_WR : constant := 1;
-- SOCKCREDSIZE (function macro)
SOCK_DGRAM : constant := 2;
SOCK_MAXADDRLEN : constant := 255;
SOCK_RAW : constant := 3;
SOCK_RDM : constant := 4;
SOCK_SEQPACKET : constant := 5;
SOCK_STREAM : constant := 1;
SOL_SOCKET : constant := 65535;
SOMAXCONN : constant := 128;
SO_ACCEPTCONN : constant := 2;
SO_ACCEPTFILTER : constant := 4096;
SO_BINTIME : constant := 8192;
SO_BROADCAST : constant := 32;
SO_DEBUG : constant := 1;
SO_DONTROUTE : constant := 16;
SO_ERROR : constant := 4103;
SO_KEEPALIVE : constant := 8;
SO_LABEL : constant := 4105;
SO_LINGER : constant := 128;
SO_LISTENINCQLEN : constant := 4115;
SO_LISTENQLEN : constant := 4114;
SO_LISTENQLIMIT : constant := 4113;
SO_NOSIGPIPE : constant := 2048;
SO_NO_DDP : constant := 32768;
SO_NO_OFFLOAD : constant := 16384;
SO_OOBINLINE : constant := 256;
SO_PEERLABEL : constant := 4112;
SO_PROTOCOL : constant := 4118;
SO_PROTOTYPE : constant := 4118;
SO_RCVBUF : constant := 4098;
SO_RCVLOWAT : constant := 4100;
SO_RCVTIMEO : constant := 4102;
SO_REUSEADDR : constant := 4;
SO_REUSEPORT : constant := 512;
SO_SETFIB : constant := 4116;
SO_SNDBUF : constant := 4097;
SO_SNDLOWAT : constant := 4099;
SO_SNDTIMEO : constant := 4101;
SO_TIMESTAMP : constant := 1024;
SO_TYPE : constant := 4104;
SO_USELOOPBACK : constant := 64;
SO_VENDOR : constant := -2147483648;
-- _SA_FAMILY_T_DECLARED (empty)
-- _SOCKLEN_T_DECLARED (empty)
SS_ALIGNSIZE : constant := 8;
SS_MAXSIZE : constant := 128;
SS_PAD1SIZE : constant := 6;
SS_PAD2SIZE : constant := 112;
-- _STRUCT_SOCKADDR_STORAGE_DECLARED (empty)
-- _SYS_SOCKET_H_ (empty)
pseudo_AF_HDRCMPLT : constant := 31;
pseudo_AF_KEY : constant := 27;
pseudo_AF_PIP : constant := 25;
pseudo_AF_RTIP : constant := 22;
pseudo_AF_XTP : constant := 19;
end C.sys.socket;
Raw
c-sys-stat.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
with C.sys.qtypes;
with C.sys.timespec;
with C.sys.types;
package C.sys.stat is
pragma Preelaborate;
type struct_ostat;
type struct_ostat is record
st_dev : aliased machine.qtypes.uint16_t;
st_ino : aliased types.ino_t;
st_mode : aliased types.mode_t;
st_nlink : aliased types.nlink_t;
st_uid : aliased machine.qtypes.uint16_t;
st_gid : aliased machine.qtypes.uint16_t;
st_rdev : aliased machine.qtypes.uint16_t;
st_size : aliased machine.qtypes.int32_t;
st_atim : aliased timespec.struct_timespec;
st_mtim : aliased timespec.struct_timespec;
st_ctim : aliased timespec.struct_timespec;
st_blksize : aliased machine.qtypes.int32_t;
st_blocks : aliased machine.qtypes.int32_t;
st_flags : aliased types.fflags_t;
st_gen : aliased machine.qtypes.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_ostat);
type struct_stat;
type struct_stat is record
st_dev : aliased qtypes.dev_t;
st_ino : aliased types.ino_t;
st_mode : aliased types.mode_t;
st_nlink : aliased types.nlink_t;
st_uid : aliased types.uid_t;
st_gid : aliased types.gid_t;
st_rdev : aliased qtypes.dev_t;
st_atim : aliased timespec.struct_timespec;
st_mtim : aliased timespec.struct_timespec;
st_ctim : aliased timespec.struct_timespec;
st_size : aliased types.off_t;
st_blocks : aliased types.blkcnt_t;
st_blksize : aliased types.blksize_t;
st_flags : aliased types.fflags_t;
st_gen : aliased machine.qtypes.uint32_t;
st_lspare : aliased machine.qtypes.int32_t;
st_birthtimespec : aliased timespec.struct_timespec;
anonymous_1 : unsigned_int range 0 .. 4294967295;
anonymous_2 : unsigned_int range 0 .. 4294967295;
end record;
for struct_stat use record
st_dev at 0 range 0 .. 31;
st_ino at 0 range 32 .. 63;
st_mode at 0 range 64 .. 79;
st_nlink at 0 range 80 .. 95;
st_uid at 0 range 96 .. 127;
st_gid at 0 range 128 .. 159;
st_rdev at 0 range 160 .. 191;
st_atim at 0 range 192 .. 255;
st_mtim at 0 range 256 .. 319;
st_ctim at 0 range 320 .. 383;
st_size at 0 range 384 .. 447;
st_blocks at 0 range 448 .. 511;
st_blksize at 0 range 512 .. 543;
st_flags at 0 range 544 .. 575;
st_gen at 0 range 576 .. 607;
st_lspare at 0 range 608 .. 639;
st_birthtimespec at 0 range 640 .. 703;
anonymous_1 at 0 range 704 .. 735;
anonymous_2 at 0 range 736 .. 767;
end record;
pragma Convention (C_Pass_By_Copy, struct_stat);
type struct_stat_ptr is access all struct_stat;
for struct_stat_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_stat_ptr);
pragma Convention (C, struct_stat_ptr);
type struct_nstat;
type struct_nstat is record
st_dev : aliased qtypes.dev_t;
st_ino : aliased types.ino_t;
st_mode : aliased machine.qtypes.uint32_t;
st_nlink : aliased machine.qtypes.uint32_t;
st_uid : aliased types.uid_t;
st_gid : aliased types.gid_t;
st_rdev : aliased qtypes.dev_t;
st_atim : aliased timespec.struct_timespec;
st_mtim : aliased timespec.struct_timespec;
st_ctim : aliased timespec.struct_timespec;
st_size : aliased types.off_t;
st_blocks : aliased types.blkcnt_t;
st_blksize : aliased types.blksize_t;
st_flags : aliased types.fflags_t;
st_gen : aliased machine.qtypes.uint32_t;
st_birthtimespec : aliased timespec.struct_timespec;
anonymous_1 : unsigned_int range 0 .. 4294967295;
anonymous_2 : unsigned_int range 0 .. 4294967295;
end record;
for struct_nstat use record
st_dev at 0 range 0 .. 31;
st_ino at 0 range 32 .. 63;
st_mode at 0 range 64 .. 95;
st_nlink at 0 range 96 .. 127;
st_uid at 0 range 128 .. 159;
st_gid at 0 range 160 .. 191;
st_rdev at 0 range 192 .. 223;
st_atim at 0 range 224 .. 287;
st_mtim at 0 range 288 .. 351;
st_ctim at 0 range 352 .. 415;
st_size at 0 range 448 .. 511;
st_blocks at 0 range 512 .. 575;
st_blksize at 0 range 576 .. 607;
st_flags at 0 range 608 .. 639;
st_gen at 0 range 640 .. 671;
st_birthtimespec at 0 range 672 .. 735;
anonymous_1 at 0 range 736 .. 767;
anonymous_2 at 0 range 768 .. 799;
end record;
pragma Convention (C_Pass_By_Copy, struct_nstat);
function chflags (a1 : access constant char; a2 : unsigned_long)
return signed_int;
pragma Import (C, chflags, "chflags");
function chmod (a1 : access constant char; a2 : types.mode_t)
return signed_int;
pragma Import (C, chmod, "chmod");
function fchflags (a1 : signed_int; a2 : unsigned_long) return signed_int;
pragma Import (C, fchflags, "fchflags");
function fchmod (a1 : signed_int; a2 : types.mode_t) return signed_int;
pragma Import (C, fchmod, "fchmod");
function fchmodat (a1 : signed_int; a2 : access constant char;
a3 : types.mode_t; a4 : signed_int) return signed_int;
pragma Import (C, fchmodat, "fchmodat");
function fstat (a1 : signed_int; a2 : access struct_stat)
return signed_int;
pragma Import (C, fstat, "fstat");
function lchflags (a1 : access constant char; a2 : signed_int)
return signed_int;
pragma Import (C, lchflags, "lchflags");
function lchmod (a1 : access constant char; a2 : types.mode_t)
return signed_int;
pragma Import (C, lchmod, "lchmod");
function lstat (a1 : access constant char; a2 : access struct_stat)
return signed_int;
pragma Import (C, lstat, "lstat");
function mkdir (a1 : access constant char; a2 : types.mode_t)
return signed_int;
pragma Import (C, mkdir, "mkdir");
function mkfifo (a1 : access constant char; a2 : types.mode_t)
return signed_int;
pragma Import (C, mkfifo, "mkfifo");
function stat (a1 : access constant char; a2 : access struct_stat)
return signed_int;
pragma Import (C, stat, "stat");
function umask (a1 : types.mode_t) return types.mode_t;
pragma Import (C, umask, "umask");
function fstatat (a1 : signed_int; a2 : access constant char;
a3 : access struct_stat; a4 : signed_int) return signed_int;
pragma Import (C, fstatat, "fstatat");
function mkdirat (a1 : signed_int; a2 : access constant char;
a3 : types.mode_t) return signed_int;
pragma Import (C, mkdirat, "mkdirat");
function mkfifoat (a1 : signed_int; a2 : access constant char;
a3 : types.mode_t) return signed_int;
pragma Import (C, mkfifoat, "mkfifoat");
function mknodat (a1 : signed_int; a2 : access constant char;
a3 : types.mode_t; a4 : types.dev_t) return signed_int;
pragma Import (C, mknodat, "mknodat");
ACCESSPERMS : constant := 511;
ALLPERMS : constant := 4095;
DEFFILEMODE : constant := 438;
SF_APPEND : constant := 262144;
SF_ARCHIVED : constant := 65536;
SF_IMMUTABLE : constant := 131072;
SF_NOUNLINK : constant := 1048576;
SF_SETTABLE : constant := -65536;
SF_SNAPSHOT : constant := 2097152;
S_BLKSIZE : constant := 512;
S_IEXEC : constant := 64;
S_IFBLK : constant := 24576;
S_IFCHR : constant := 8192;
S_IFDIR : constant := 16384;
S_IFIFO : constant := 4096;
S_IFLNK : constant := 40960;
S_IFMT : constant := 61440;
S_IFREG : constant := 32768;
S_IFSOCK : constant := 49152;
S_IFWHT : constant := 57344;
S_IREAD : constant := 256;
S_IRGRP : constant := 32;
S_IROTH : constant := 4;
S_IRUSR : constant := 256;
S_IRWXG : constant := 56;
S_IRWXO : constant := 7;
S_IRWXU : constant := 448;
-- S_ISBLK (function macro)
-- S_ISCHR (function macro)
-- S_ISDIR (function macro)
-- S_ISFIFO (function macro)
S_ISGID : constant := 1024;
-- S_ISLNK (function macro)
-- S_ISREG (function macro)
-- S_ISSOCK (function macro)
S_ISTXT : constant := 512;
S_ISUID : constant := 2048;
S_ISVTX : constant := 512;
-- S_ISWHT (function macro)
S_IWGRP : constant := 16;
S_IWOTH : constant := 2;
S_IWRITE : constant := 128;
S_IWUSR : constant := 128;
S_IXGRP : constant := 8;
S_IXOTH : constant := 1;
S_IXUSR : constant := 64;
UF_APPEND : constant := 4;
UF_IMMUTABLE : constant := 2;
UF_NODUMP : constant := 1;
UF_NOUNLINK : constant := 16;
UF_OPAQUE : constant := 8;
UF_SETTABLE : constant := 65535;
-- _SYS_STAT_H_ (empty)
-- .st_birthtime renames .st_birthtimespec.tv_sec (accessor)
end C.sys.stat;
Raw
c-sys-syscall.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.syscall is
pragma Preelaborate;
SYS_MAXSYSCALL : constant := 532;
SYS_acl_aclcheck_fd : constant := 354;
SYS_acl_aclcheck_file : constant := 353;
SYS_acl_aclcheck_link : constant := 428;
SYS_acl_delete_fd : constant := 352;
SYS_acl_delete_file : constant := 351;
SYS_acl_delete_link : constant := 427;
SYS_acl_get_fd : constant := 349;
SYS_acl_get_file : constant := 347;
SYS_acl_get_link : constant := 425;
SYS_acl_set_fd : constant := 350;
SYS_acl_set_file : constant := 348;
SYS_acl_set_link : constant := 426;
SYS_getcwd : constant := 326;
SYS_mac_execve : constant := 415;
SYS_mac_get_fd : constant := 386;
SYS_mac_get_file : constant := 387;
SYS_mac_get_link : constant := 410;
SYS_mac_get_pid : constant := 409;
SYS_mac_get_proc : constant := 384;
SYS_mac_set_fd : constant := 388;
SYS_mac_set_file : constant := 389;
SYS_mac_set_link : constant := 411;
SYS_mac_set_proc : constant := 385;
SYS_semctl : constant := 510;
SYS_setugid : constant := 374;
SYSqqqsyscall : constant := 198;
SYS_sysctl : constant := 202;
SYS_umtx_lock : constant := 434;
SYS_umtx_op : constant := 454;
SYS_umtx_unlock : constant := 435;
SYS_abort2 : constant := 463;
SYS_accept : constant := 30;
SYS_access : constant := 33;
SYS_acct : constant := 51;
SYS_adjtime : constant := 140;
SYS_afs3_syscall : constant := 377;
SYS_aio_cancel : constant := 316;
SYS_aio_error : constant := 317;
SYS_aio_fsync : constant := 465;
SYS_aio_read : constant := 255;
SYS_aio_return : constant := 314;
SYS_aio_suspend : constant := 315;
SYS_aio_waitcomplete : constant := 359;
SYS_aio_write : constant := 256;
SYS_audit : constant := 445;
SYS_auditctl : constant := 453;
SYS_auditon : constant := 446;
SYS_bind : constant := 104;
SYS_break : constant := 17;
SYS_chdir : constant := 12;
SYS_chflags : constant := 34;
SYS_chmod : constant := 15;
SYS_chown : constant := 16;
SYS_chroot : constant := 61;
SYS_clock_getres : constant := 234;
SYS_clock_gettime : constant := 232;
SYS_clock_settime : constant := 233;
SYS_close : constant := 6;
SYS_closefrom : constant := 509;
SYS_connect : constant := 98;
SYS_cpuset : constant := 484;
SYS_cpuset_getaffinity : constant := 487;
SYS_cpuset_getid : constant := 486;
SYS_cpuset_setaffinity : constant := 488;
SYS_cpuset_setid : constant := 485;
SYS_dup : constant := 41;
SYS_dup2 : constant := 90;
SYS_eaccess : constant := 376;
SYS_execve : constant := 59;
SYS_exit : constant := 1;
SYS_extattr_delete_fd : constant := 373;
SYS_extattr_delete_file : constant := 358;
SYS_extattr_delete_link : constant := 414;
SYS_extattr_get_fd : constant := 372;
SYS_extattr_get_file : constant := 357;
SYS_extattr_get_link : constant := 413;
SYS_extattr_list_fd : constant := 437;
SYS_extattr_list_file : constant := 438;
SYS_extattr_list_link : constant := 439;
SYS_extattr_set_fd : constant := 371;
SYS_extattr_set_file : constant := 356;
SYS_extattr_set_link : constant := 412;
SYS_extattrctl : constant := 355;
SYS_faccessat : constant := 489;
SYS_fchdir : constant := 13;
SYS_fchflags : constant := 35;
SYS_fchmod : constant := 124;
SYS_fchmodat : constant := 490;
SYS_fchown : constant := 123;
SYS_fchownat : constant := 491;
SYS_fcntl : constant := 92;
SYS_fexecve : constant := 492;
SYS_fhopen : constant := 298;
SYS_fhstat : constant := 299;
SYS_fhstatfs : constant := 398;
SYS_flock : constant := 131;
SYS_fork : constant := 2;
SYS_fpathconf : constant := 192;
SYS_freebsd4_fhstatfs : constant := 297;
SYS_freebsd4_fstatfs : constant := 158;
SYS_freebsd4_getdomainname : constant := 162;
SYS_freebsd4_getfsstat : constant := 18;
SYS_freebsd4_sendfile : constant := 336;
SYS_freebsd4_setdomainname : constant := 163;
SYS_freebsd4_sigaction : constant := 342;
SYS_freebsd4_sigreturn : constant := 344;
SYS_freebsd4_statfs : constant := 157;
SYS_freebsd4_uname : constant := 164;
SYS_freebsd6_ftruncate : constant := 201;
SYS_freebsd6_lseek : constant := 199;
SYS_freebsd6_mmap : constant := 197;
SYS_freebsd6_pread : constant := 173;
SYS_freebsd6_pwrite : constant := 174;
SYS_freebsd6_truncate : constant := 200;
SYS_freebsd7_semctl : constant := 220;
SYS_freebsd7_msgctl : constant := 224;
SYS_freebsd7_shmctl : constant := 229;
SYS_fstat : constant := 189;
SYS_fstatat : constant := 493;
SYS_fstatfs : constant := 397;
SYS_fsync : constant := 95;
SYS_ftruncate : constant := 480;
SYS_futimes : constant := 206;
SYS_futimesat : constant := 494;
SYS_getaudit : constant := 449;
SYS_getaudit_addr : constant := 451;
SYS_getauid : constant := 447;
SYS_getcontext : constant := 421;
SYS_getdents : constant := 272;
SYS_getdirentries : constant := 196;
SYS_getdtablesize : constant := 89;
SYS_getegid : constant := 43;
SYS_geteuid : constant := 25;
SYS_getfh : constant := 161;
SYS_getfsstat : constant := 395;
SYS_getgid : constant := 47;
SYS_getgroups : constant := 79;
SYS_getitimer : constant := 86;
SYS_getlogin : constant := 49;
SYS_getpeername : constant := 31;
SYS_getpgid : constant := 207;
SYS_getpgrp : constant := 81;
SYS_getpid : constant := 20;
SYS_getppid : constant := 39;
SYS_getpriority : constant := 100;
SYS_getresgid : constant := 361;
SYS_getresuid : constant := 360;
SYS_getrlimit : constant := 194;
SYS_getrusage : constant := 117;
SYS_getsid : constant := 310;
SYS_getsockname : constant := 32;
SYS_getsockopt : constant := 118;
SYS_gettimeofday : constant := 116;
SYS_getuid : constant := 24;
SYS_gssd_syscall : constant := 505;
SYS_ioctl : constant := 54;
SYS_issetugid : constant := 253;
SYS_jail : constant := 338;
SYS_jail_attach : constant := 436;
SYS_jail_get : constant := 506;
SYS_jail_remove : constant := 508;
SYS_jail_set : constant := 507;
SYS_kenv : constant := 390;
SYS_kevent : constant := 363;
SYS_kill : constant := 37;
SYS_kldfind : constant := 306;
SYS_kldfirstmod : constant := 309;
SYS_kldload : constant := 304;
SYS_kldnext : constant := 307;
SYS_kldstat : constant := 308;
SYS_kldsym : constant := 337;
SYS_kldunload : constant := 305;
SYS_kldunloadf : constant := 444;
SYS_kmq_notify : constant := 461;
SYS_kmq_open : constant := 457;
SYS_kmq_setattr : constant := 458;
SYS_kmq_timedreceive : constant := 459;
SYS_kmq_timedsend : constant := 460;
SYS_kmq_unlink : constant := 462;
SYS_kqueue : constant := 362;
SYS_ksem_close : constant := 400;
SYS_ksem_destroy : constant := 408;
SYS_ksem_getvalue : constant := 407;
SYS_ksem_init : constant := 404;
SYS_ksem_open : constant := 405;
SYS_ksem_post : constant := 401;
SYS_ksem_timedwait : constant := 441;
SYS_ksem_trywait : constant := 403;
SYS_ksem_unlink : constant := 406;
SYS_ksem_wait : constant := 402;
SYS_ktimer_create : constant := 235;
SYS_ktimer_delete : constant := 236;
SYS_ktimer_getoverrun : constant := 239;
SYS_ktimer_gettime : constant := 238;
SYS_ktimer_settime : constant := 237;
SYS_ktrace : constant := 45;
SYS_lchflags : constant := 391;
SYS_lchmod : constant := 274;
SYS_lchown : constant := 254;
SYS_lgetfh : constant := 160;
SYS_link : constant := 9;
SYS_linkat : constant := 495;
SYS_lio_listio : constant := 257;
SYS_listen : constant := 106;
SYS_lpathconf : constant := 513;
SYS_lseek : constant := 478;
SYS_lstat : constant := 190;
SYS_lutimes : constant := 276;
SYS_mac_syscall : constant := 394;
SYS_madvise : constant := 75;
SYS_mincore : constant := 78;
SYS_minherit : constant := 250;
SYS_mkdir : constant := 136;
SYS_mkdirat : constant := 496;
SYS_mkfifo : constant := 132;
SYS_mkfifoat : constant := 497;
SYS_mknod : constant := 14;
SYS_mknodat : constant := 498;
SYS_mlock : constant := 203;
SYS_mlockall : constant := 324;
SYS_mmap : constant := 477;
SYS_modfind : constant := 303;
SYS_modfnext : constant := 302;
SYS_modnext : constant := 300;
SYS_modstat : constant := 301;
SYS_mount : constant := 21;
SYS_mprotect : constant := 74;
SYS_msgctl : constant := 511;
SYS_msgget : constant := 225;
SYS_msgrcv : constant := 227;
SYS_msgsnd : constant := 226;
SYS_msgsys : constant := 170;
SYS_msync : constant := 65;
SYS_munlock : constant := 204;
SYS_munlockall : constant := 325;
SYS_munmap : constant := 73;
SYS_nanosleep : constant := 240;
SYS_netbsd_lchown : constant := 275;
SYS_netbsd_msync : constant := 277;
SYS_nfssvc : constant := 155;
SYS_nfstat : constant := 279;
SYS_nlm_syscall : constant := 154;
SYS_nlstat : constant := 280;
SYS_nmount : constant := 378;
SYS_nnpfs_syscall : constant := 339;
SYS_nstat : constant := 278;
SYS_ntp_adjtime : constant := 176;
SYS_ntp_gettime : constant := 248;
SYS_oaio_read : constant := 318;
SYS_oaio_write : constant := 319;
SYS_olio_listio : constant := 320;
SYS_open : constant := 5;
SYS_openat : constant := 499;
SYS_openbsd_poll : constant := 252;
SYS_pathconf : constant := 191;
SYS_pipe : constant := 42;
SYS_poll : constant := 209;
SYS_posix_fadvise : constant := 531;
SYS_posix_fallocate : constant := 530;
SYS_posix_openpt : constant := 504;
SYS_pread : constant := 475;
SYS_preadv : constant := 289;
SYS_profil : constant := 44;
SYS_pselect : constant := 522;
SYS_ptrace : constant := 26;
SYS_pwrite : constant := 476;
SYS_pwritev : constant := 290;
SYS_quotactl : constant := 148;
SYS_read : constant := 3;
SYS_readlink : constant := 58;
SYS_readlinkat : constant := 500;
SYS_readv : constant := 120;
SYS_reboot : constant := 55;
SYS_recvfrom : constant := 29;
SYS_recvmsg : constant := 27;
SYS_rename : constant := 128;
SYS_renameat : constant := 501;
SYS_revoke : constant := 56;
SYS_rfork : constant := 251;
SYS_rmdir : constant := 137;
SYS_rtprio : constant := 166;
SYS_rtprio_thread : constant := 466;
SYS_sbrk : constant := 69;
SYS_sched_get_priority_max : constant := 332;
SYS_sched_get_priority_min : constant := 333;
SYS_sched_getparam : constant := 328;
SYS_sched_getscheduler : constant := 330;
SYS_sched_rr_get_interval : constant := 334;
SYS_sched_setparam : constant := 327;
SYS_sched_setscheduler : constant := 329;
SYS_sched_yield : constant := 331;
SYS_sctp_generic_recvmsg : constant := 474;
SYS_sctp_generic_sendmsg : constant := 472;
SYS_sctp_generic_sendmsg_iov : constant := 473;
SYS_sctp_peeloff : constant := 471;
SYS_select : constant := 93;
SYS_semget : constant := 221;
SYS_semop : constant := 222;
SYS_semsys : constant := 169;
SYS_sendfile : constant := 393;
SYS_sendmsg : constant := 28;
SYS_sendto : constant := 133;
SYS_setaudit : constant := 450;
SYS_setaudit_addr : constant := 452;
SYS_setauid : constant := 448;
SYS_setcontext : constant := 422;
SYS_setegid : constant := 182;
SYS_seteuid : constant := 183;
SYS_setfib : constant := 175;
SYS_setgid : constant := 181;
SYS_setgroups : constant := 80;
SYS_setitimer : constant := 83;
SYS_setlogin : constant := 50;
SYS_setpgid : constant := 82;
SYS_setpriority : constant := 96;
SYS_setregid : constant := 127;
SYS_setresgid : constant := 312;
SYS_setresuid : constant := 311;
SYS_setreuid : constant := 126;
SYS_setrlimit : constant := 195;
SYS_setsid : constant := 147;
SYS_setsockopt : constant := 105;
SYS_settimeofday : constant := 122;
SYS_setuid : constant := 23;
SYS_shm_open : constant := 482;
SYS_shm_unlink : constant := 483;
SYS_shmat : constant := 228;
SYS_shmctl : constant := 512;
SYS_shmdt : constant := 230;
SYS_shmget : constant := 231;
SYS_shmsys : constant := 171;
SYS_shutdown : constant := 134;
SYS_sigaction : constant := 416;
SYS_sigaltstack : constant := 53;
SYS_sigpending : constant := 343;
SYS_sigprocmask : constant := 340;
SYS_sigqueue : constant := 456;
SYS_sigreturn : constant := 417;
SYS_sigsuspend : constant := 341;
SYS_sigtimedwait : constant := 345;
SYS_sigwait : constant := 429;
SYS_sigwaitinfo : constant := 346;
SYS_socket : constant := 97;
SYS_socketpair : constant := 135;
SYS_sstk : constant := 70;
SYS_stat : constant := 188;
SYS_statfs : constant := 396;
SYS_swapcontext : constant := 423;
SYS_swapoff : constant := 424;
SYS_swapon : constant := 85;
SYS_symlink : constant := 57;
SYS_symlinkat : constant := 502;
SYS_sync : constant := 36;
SYS_sysarch : constant := 165;
SYS_syscall : constant := 0;
SYS_thr_create : constant := 430;
SYS_thr_exit : constant := 431;
SYS_thr_kill : constant := 433;
SYS_thr_kill2 : constant := 481;
SYS_thr_new : constant := 455;
SYS_thr_self : constant := 432;
SYS_thr_set_name : constant := 464;
SYS_thr_suspend : constant := 442;
SYS_thr_wake : constant := 443;
SYS_truncate : constant := 479;
SYS_umask : constant := 60;
SYS_undelete : constant := 205;
SYS_unlink : constant := 10;
SYS_unlinkat : constant := 503;
SYS_unmount : constant := 22;
SYS_utimes : constant := 138;
SYS_utrace : constant := 335;
SYS_uuidgen : constant := 392;
SYS_vadvise : constant := 72;
SYS_vfork : constant := 66;
SYS_wait4 : constant := 7;
SYS_write : constant := 4;
SYS_writev : constant := 121;
SYS_yield : constant := 321;
end C.sys.syscall;
Raw
c-sys-sysctl.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.sys.types;
package C.sys.sysctl is
pragma Preelaborate;
type struct_thread (<>) is limited private;
type struct_ctlname;
type struct_ctlname is record
ctl_name : aliased char_ptr;
ctl_type : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_ctlname);
function sysctl (a1 : access signed_int; a2 : types.u_int; a3 : void_ptr;
a4 : access stddef.size_t; a5 : void_ptr; a6 : stddef.size_t)
return signed_int;
pragma Import (C, sysctl, "sysctl");
function sysctlbyname (a1 : access constant char; a2 : void_ptr;
a3 : access stddef.size_t; a4 : void_ptr; a5 : stddef.size_t)
return signed_int;
pragma Import (C, sysctlbyname, "sysctlbyname");
function sysctlnametomib (a1 : access constant char;
a2 : access signed_int; a3 : access stddef.size_t) return signed_int;
pragma Import (C, sysctlnametomib, "sysctlnametomib");
CTLFLAG_ANYBODY : constant := 268435456;
CTLFLAG_DYING : constant := 65536;
CTLFLAG_DYN : constant := 33554432;
CTLFLAG_MPSAFE : constant := 262144;
CTLFLAG_NOLOCK : constant := 536870912;
CTLFLAG_PRISON : constant := 67108864;
CTLFLAG_RD : constant := -2147483648;
CTLFLAG_RDTUN : constant := -2146959360;
CTLFLAG_RW : constant := -1073741824;
CTLFLAG_SECURE : constant := 134217728;
CTLFLAG_SECURE1 : constant := 134217728;
CTLFLAG_SECURE2 : constant := 135266304;
CTLFLAG_SECURE3 : constant := 136314880;
CTLFLAG_SKIP : constant := 16777216;
CTLFLAG_TUN : constant := 524288;
CTLFLAG_VNET : constant := 131072;
CTLFLAG_WR : constant := 1073741824;
CTLMASK_SECURE : constant := 15728640;
CTLSHIFT_SECURE : constant := 20;
CTLTYPE : constant := 15;
CTLTYPE_INT : constant := 2;
CTLTYPE_LONG : constant := 7;
CTLTYPE_NODE : constant := 1;
CTLTYPE_OPAQUE : constant := 5;
CTLTYPE_QUAD : constant := 4;
CTLTYPE_STRING : constant := 3;
CTLTYPE_STRUCT : constant := 5;
CTLTYPE_UINT : constant := 6;
CTLTYPE_ULONG : constant := 8;
CTL_AUTO_START : constant := 256;
CTL_DEBUG : constant := 5;
CTL_HW : constant := 6;
-- CTL_HW_NAMES (unparsible)
CTL_KERN : constant := 1;
-- CTL_KERN_NAMES (unparsible)
CTL_MACHDEP : constant := 7;
CTL_MAXID : constant := 10;
CTL_MAXNAME : constant := 24;
-- CTL_NAMES (unparsible)
CTL_NET : constant := 4;
CTL_P1003_1B : constant := 9;
CTL_P1003_1B_AIO_LISTIO_MAX : constant := 15;
CTL_P1003_1B_AIO_MAX : constant := 16;
CTL_P1003_1B_AIO_PRIO_DELTA_MAX : constant := 17;
CTL_P1003_1B_ASYNCHRONOUS_IO : constant := 1;
CTL_P1003_1B_DELAYTIMER_MAX : constant := 18;
CTL_P1003_1B_FSYNC : constant := 11;
CTL_P1003_1B_MAPPED_FILES : constant := 2;
CTL_P1003_1B_MAXID : constant := 26;
CTL_P1003_1B_MEMLOCK : constant := 3;
CTL_P1003_1B_MEMLOCK_RANGE : constant := 4;
CTL_P1003_1B_MEMORY_PROTECTION : constant := 5;
CTL_P1003_1B_MESSAGE_PASSING : constant := 6;
CTL_P1003_1B_MQ_OPEN_MAX : constant := 19;
-- CTL_P1003_1B_NAMES (unparsible)
CTL_P1003_1B_PAGESIZE : constant := 20;
CTL_P1003_1B_PRIORITIZED_IO : constant := 7;
CTL_P1003_1B_PRIORITY_SCHEDULING : constant := 8;
CTL_P1003_1B_REALTIME_SIGNALS : constant := 9;
CTL_P1003_1B_RTSIG_MAX : constant := 21;
CTL_P1003_1B_SEMAPHORES : constant := 10;
CTL_P1003_1B_SEM_NSEMS_MAX : constant := 22;
CTL_P1003_1B_SEM_VALUE_MAX : constant := 23;
CTL_P1003_1B_SHARED_MEMORY_OBJECTS : constant := 12;
CTL_P1003_1B_SIGQUEUE_MAX : constant := 24;
CTL_P1003_1B_SYNCHRONIZED_IO : constant := 13;
CTL_P1003_1B_TIMERS : constant := 14;
CTL_P1003_1B_TIMER_MAX : constant := 25;
CTL_UNSPEC : constant := 0;
CTL_USER : constant := 8;
-- CTL_USER_NAMES (unparsible)
CTL_VFS : constant := 3;
-- CTL_VFS_NAMES (unparsible)
CTL_VM : constant := 2;
HW_BYTEORDER : constant := 4;
HW_DISKNAMES : constant := 8;
HW_DISKSTATS : constant := 9;
HW_FLOATINGPT : constant := 10;
HW_MACHINE : constant := 1;
HW_MACHINE_ARCH : constant := 11;
HW_MAXID : constant := 13;
HW_MODEL : constant := 2;
HW_NCPU : constant := 3;
HW_PAGESIZE : constant := 7;
HW_PHYSMEM : constant := 5;
HW_REALMEM : constant := 12;
HW_USERMEM : constant := 6;
KERN_ARGMAX : constant := 8;
KERN_ARND : constant := 37;
KERN_BOOTFILE : constant := 26;
KERN_BOOTTIME : constant := 21;
KERN_CLOCKRATE : constant := 12;
KERN_DUMMY : constant := 31;
KERN_DUMPDEV : constant := 29;
KERN_FILE : constant := 15;
KERN_HOSTID : constant := 11;
KERN_HOSTNAME : constant := 10;
KERN_HOSTUUID : constant := 36;
KERN_IOV_MAX : constant := 35;
KERN_IPC : constant := 30;
KERN_JOB_CONTROL : constant := 19;
KERN_LOGSIGEXIT : constant := 34;
KERN_MAXFILES : constant := 7;
KERN_MAXFILESPERPROC : constant := 27;
KERN_MAXID : constant := 38;
KERN_MAXPROC : constant := 6;
KERN_MAXPROCPERUID : constant := 28;
KERN_MAXVNODES : constant := 5;
KERN_NGROUPS : constant := 18;
KERN_NISDOMAINNAME : constant := 22;
KERN_NTP_PLL : constant := 25;
KERN_OSRELDATE : constant := 24;
KERN_OSRELEASE : constant := 2;
KERN_OSREV : constant := 3;
KERN_OSTYPE : constant := 1;
KERN_POSIX1 : constant := 17;
KERN_PROC : constant := 14;
KERN_PROC_ALL : constant := 0;
KERN_PROC_ARGS : constant := 7;
KERN_PROC_FILEDESC : constant := 33;
KERN_PROC_GID : constant := 11;
KERN_PROC_GROUPS : constant := 34;
KERN_PROC_INC_THREAD : constant := 16;
KERN_PROC_KSTACK : constant := 15;
KERN_PROC_OFILEDESC : constant := 14;
KERN_PROC_OSREL : constant := 40;
KERN_PROC_OVMMAP : constant := 13;
KERN_PROC_PATHNAME : constant := 12;
KERN_PROC_PGRP : constant := 2;
KERN_PROC_PID : constant := 1;
KERN_PROC_PROC : constant := 8;
KERN_PROC_RGID : constant := 10;
KERN_PROC_RUID : constant := 6;
KERN_PROC_SESSION : constant := 3;
KERN_PROC_SV_NAME : constant := 9;
KERN_PROC_TTY : constant := 4;
KERN_PROC_UID : constant := 5;
KERN_PROC_VMMAP : constant := 32;
KERN_PROF : constant := 16;
KERN_PS_STRINGS : constant := 32;
KERN_SAVED_IDS : constant := 20;
KERN_SECURELVL : constant := 9;
KERN_UPDATEINTERVAL : constant := 23;
KERN_USRSTACK : constant := 33;
KERN_VERSION : constant := 4;
KERN_VNODE : constant := 13;
KIPC_MAXSOCKBUF : constant := 1;
KIPC_MAX_DATALEN : constant := 7;
KIPC_MAX_HDR : constant := 6;
KIPC_MAX_LINKHDR : constant := 4;
KIPC_MAX_PROTOHDR : constant := 5;
KIPC_SOCKBUF_WASTE : constant := 2;
KIPC_SOMAXCONN : constant := 3;
OID_AUTO : constant := -1;
USER_BC_BASE_MAX : constant := 2;
USER_BC_DIM_MAX : constant := 3;
USER_BC_SCALE_MAX : constant := 4;
USER_BC_STRING_MAX : constant := 5;
USER_COLL_WEIGHTS_MAX : constant := 6;
USER_CS_PATH : constant := 1;
USER_EXPR_NEST_MAX : constant := 7;
USER_LINE_MAX : constant := 8;
USER_MAXID : constant := 21;
USER_POSIX2_CHAR_TERM : constant := 13;
USER_POSIX2_C_BIND : constant := 11;
USER_POSIX2_C_DEV : constant := 12;
USER_POSIX2_FORT_DEV : constant := 14;
USER_POSIX2_FORT_RUN : constant := 15;
USER_POSIX2_LOCALEDEF : constant := 16;
USER_POSIX2_SW_DEV : constant := 17;
USER_POSIX2_UPE : constant := 18;
USER_POSIX2_VERSION : constant := 10;
USER_RE_DUP_MAX : constant := 9;
USER_STREAM_MAX : constant := 19;
USER_TZNAME_MAX : constant := 20;
-- _SYS_SYSCTL_H_ (empty)
private
type struct_thread is null record;
end C.sys.sysctl;
Raw
c-sys-syslimits.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.syslimits is
pragma Preelaborate;
ARG_MAX : constant := 262144;
CHILD_MAX : constant := 40;
IOV_MAX : constant := 1024;
LINK_MAX : constant := 32767;
MAX_CANON : constant := 255;
MAX_INPUT : constant := 255;
NAME_MAX : constant := 255;
NGROUPS_MAX : constant := 1023;
OPEN_MAX : constant := 64;
PATH_MAX : constant := 1024;
PIPE_BUF : constant := 512;
-- _SYS_SYSLIMITS_H_ (empty)
end C.sys.syslimits;
Raw
c-sys-time.adb
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package body C.sys.time is
procedure bintime_addx (bt : access struct_bintime; x : stdint.uint64_t)
is
begin
declare
u : stdint.uint64_t;
begin
u := bt.frac;
declare
Left : stdint.uint64_t renames bt.frac;
begin
Left := Left + x;
end;
if u > bt.frac then
declare
Left : types.time_t renames bt.sec;
begin
Left := Left + 1;
end;
end if;
end;
end bintime_addx;
procedure bintime_add (bt : access struct_bintime;
bt2 : access constant struct_bintime) is
begin
declare
u : stdint.uint64_t;
begin
u := bt.frac;
declare
Left : stdint.uint64_t renames bt.frac;
begin
Left := Left + bt2.frac;
end;
if u > bt.frac then
declare
Left : types.time_t renames bt.sec;
begin
Left := Left + 1;
end;
end if;
declare
Left : types.time_t renames bt.sec;
begin
Left := Left + bt2.sec;
end;
end;
end bintime_add;
procedure bintime_sub (bt : access struct_bintime;
bt2 : access constant struct_bintime) is
begin
declare
u : stdint.uint64_t;
begin
u := bt.frac;
declare
Left : stdint.uint64_t renames bt.frac;
begin
Left := Left - bt2.frac;
end;
if u < bt.frac then
declare
Left : types.time_t renames bt.sec;
begin
Left := Left - 1;
end;
end if;
declare
Left : types.time_t renames bt.sec;
begin
Left := Left - bt2.sec;
end;
end;
end bintime_sub;
procedure bintime2timespec (bt : access constant struct_bintime;
ts : access timespec.struct_timespec) is
begin
ts.tv_sec := bt.sec;
ts.tv_nsec := signed_long (unsigned_long_long'(Shift_Right (1000000000
* unsigned_long_long (stdint.uint32_t (
stdint.uint64_t'(Shift_Right (bt.frac, 32)))), 32)));
end bintime2timespec;
procedure timespec2bintime (ts : access constant timespec.struct_timespec;
bt : access struct_bintime) is
begin
bt.sec := ts.tv_sec;
bt.frac := unsigned_long_long'Mod (ts.tv_nsec) * 18446744073;
end timespec2bintime;
procedure bintime2timeval (bt : access constant struct_bintime;
tv : access qtimeval.struct_timeval) is
begin
tv.tv_sec := bt.sec;
tv.tv_usec := types.suseconds_t (unsigned_long_long'(Shift_Right (
1000000 * unsigned_long_long (stdint.uint32_t (
stdint.uint64_t'(Shift_Right (bt.frac, 32)))), 32)));
end bintime2timeval;
procedure timeval2bintime (tv : access constant qtimeval.struct_timeval;
bt : access struct_bintime) is
begin
bt.sec := tv.tv_sec;
bt.frac := unsigned_long_long'Mod (tv.tv_usec) * 18446744073709;
end timeval2bintime;
end C.sys.time;
Raw
c-sys-time.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stdint;
with C.sys.qtimeval;
with C.sys.timespec;
with C.sys.types;
package C.sys.time is
pragma Preelaborate;
subtype struct_timeval is qtimeval.struct_timeval;
-- SYS_TIMEVAL_H renames qtimeval.SYS_TIMEVAL_H (empty)
type struct_timezone;
type struct_timezone is record
tz_minuteswest : aliased signed_int;
tz_dsttime : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_timezone);
type struct_timezone_const_ptr is access constant struct_timezone;
for struct_timezone_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_timezone_const_ptr);
pragma Convention (C, struct_timezone_const_ptr);
type struct_timezone_ptr is access all struct_timezone;
for struct_timezone_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_timezone_ptr);
pragma Convention (C, struct_timezone_ptr);
type struct_bintime;
type struct_bintime is record
sec : aliased types.time_t;
frac : aliased stdint.uint64_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_bintime);
type struct_bintime_ptr is access all struct_bintime;
for struct_bintime_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_bintime_ptr);
pragma Convention (C, struct_bintime_ptr);
type struct_bintime_const_ptr is access constant struct_bintime;
for struct_bintime_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_bintime_const_ptr);
pragma Convention (C, struct_bintime_const_ptr);
procedure bintime_addx (bt : access struct_bintime; x : stdint.uint64_t);
pragma Convention (C, bintime_addx);
pragma Inline (bintime_addx);
procedure bintime_add (bt : access struct_bintime;
bt2 : access constant struct_bintime);
pragma Convention (C, bintime_add);
pragma Inline (bintime_add);
procedure bintime_sub (bt : access struct_bintime;
bt2 : access constant struct_bintime);
pragma Convention (C, bintime_sub);
pragma Inline (bintime_sub);
procedure bintime2timespec (bt : access constant struct_bintime;
ts : access timespec.struct_timespec);
pragma Convention (C, bintime2timespec);
pragma Inline (bintime2timespec);
procedure timespec2bintime (ts : access constant timespec.struct_timespec;
bt : access struct_bintime);
pragma Convention (C, timespec2bintime);
pragma Inline (timespec2bintime);
procedure bintime2timeval (bt : access constant struct_bintime;
tv : access qtimeval.struct_timeval);
pragma Convention (C, bintime2timeval);
pragma Inline (bintime2timeval);
procedure timeval2bintime (tv : access constant qtimeval.struct_timeval;
bt : access struct_bintime);
pragma Convention (C, timeval2bintime);
pragma Inline (timeval2bintime);
type struct_itimerval;
type struct_itimerval is record
it_interval : aliased qtimeval.struct_timeval;
it_value : aliased qtimeval.struct_timeval;
end record;
pragma Convention (C_Pass_By_Copy, struct_itimerval);
type struct_itimerval_const_ptr is access constant struct_itimerval;
for struct_itimerval_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_itimerval_const_ptr);
pragma Convention (C, struct_itimerval_const_ptr);
type struct_itimerval_ptr is access all struct_itimerval;
for struct_itimerval_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_itimerval_ptr);
pragma Convention (C, struct_itimerval_ptr);
type struct_clockinfo;
type struct_clockinfo is record
hz : aliased signed_int;
tick : aliased signed_int;
spare : aliased signed_int;
stathz : aliased signed_int;
profhz : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_clockinfo);
function setitimer (a1 : signed_int;
a2 : access constant struct_itimerval; a3 : access struct_itimerval)
return signed_int;
pragma Import (C, setitimer, "setitimer");
function utimes (a1 : access constant char;
a2 : access constant qtimeval.struct_timeval) return signed_int;
pragma Import (C, utimes, "utimes");
function adjtime (a1 : access constant qtimeval.struct_timeval;
a2 : access qtimeval.struct_timeval) return signed_int;
pragma Import (C, adjtime, "adjtime");
function futimes (a1 : signed_int;
a2 : access constant qtimeval.struct_timeval) return signed_int;
pragma Import (C, futimes, "futimes");
function futimesat (a1 : signed_int; a2 : access constant char;
a3 : access qtimeval.struct_timeval) return signed_int;
pragma Import (C, futimesat, "futimesat");
function lutimes (a1 : access constant char;
a2 : access constant qtimeval.struct_timeval) return signed_int;
pragma Import (C, lutimes, "lutimes");
function settimeofday (a1 : access constant qtimeval.struct_timeval;
a2 : access constant struct_timezone) return signed_int;
pragma Import (C, settimeofday, "settimeofday");
function getitimer (a1 : signed_int; a2 : access struct_itimerval)
return signed_int;
pragma Import (C, getitimer, "getitimer");
function gettimeofday (a1 : access qtimeval.struct_timeval;
a2 : access struct_timezone) return signed_int;
pragma Import (C, gettimeofday, "gettimeofday");
DST_AUST : constant := 2;
DST_CAN : constant := 6;
DST_EET : constant := 5;
DST_MET : constant := 4;
DST_NONE : constant := 0;
DST_USA : constant := 1;
DST_WET : constant := 3;
ITIMER_PROF : constant := 2;
ITIMER_REAL : constant := 0;
ITIMER_VIRTUAL : constant := 1;
-- _SYS_TIME_H_ (empty)
-- timeradd (uninterpretable)
-- timerclear (uninterpretable)
-- timercmp (unparsible)
-- timerisset (uninterpretable)
-- timersub (uninterpretable)
end C.sys.time;
Raw
c-sys-timespec.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.types;
package C.sys.timespec is
pragma Preelaborate;
type struct_timespec;
type struct_timespec is record
tv_sec : aliased types.time_t;
tv_nsec : aliased signed_long;
end record;
pragma Convention (C_Pass_By_Copy, struct_timespec);
type struct_timespec_const_ptr is access constant struct_timespec;
for struct_timespec_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_timespec_const_ptr);
pragma Convention (C, struct_timespec_const_ptr);
type struct_timespec_ptr is access all struct_timespec;
for struct_timespec_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_timespec_ptr);
pragma Convention (C, struct_timespec_ptr);
type struct_itimerspec;
type struct_itimerspec is record
it_interval : aliased struct_timespec;
it_value : aliased struct_timespec;
end record;
pragma Convention (C_Pass_By_Copy, struct_itimerspec);
type struct_itimerspec_ptr is access all struct_itimerspec;
for struct_itimerspec_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_itimerspec_ptr);
pragma Convention (C, struct_itimerspec_ptr);
type struct_itimerspec_const_ptr is access constant struct_itimerspec;
for struct_itimerspec_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_itimerspec_const_ptr);
pragma Convention (C, struct_itimerspec_const_ptr);
-- TIMESPEC_TO_TIMEVAL (uninterpretable)
-- TIMEVAL_TO_TIMESPEC (uninterpretable)
-- _SYS_TIMESPEC_H_ (empty)
end C.sys.timespec;
Raw
c-sys-ttycom.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.ttycom is
pragma Preelaborate;
type struct_winsize;
type struct_winsize is record
ws_row : aliased unsigned_short;
ws_col : aliased unsigned_short;
ws_xpixel : aliased unsigned_short;
ws_ypixel : aliased unsigned_short;
end record;
pragma Convention (C_Pass_By_Copy, struct_winsize);
type struct_winsize_ptr is access all struct_winsize;
for struct_winsize_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_winsize_ptr);
pragma Convention (C, struct_winsize_ptr);
H4DISC : constant := 7;
NETGRAPHDISC : constant := 6;
PPPDISC : constant := 5;
SLIPDISC : constant := 4;
TIOCCBRK : constant := 536900730;
TIOCCDTR : constant := 536900728;
TIOCCONS : constant := 2147775586;
TIOCDRAIN : constant := 536900702;
TIOCEXCL : constant := 536900621;
TIOCEXT : constant := 2147775584;
TIOCFLUSH : constant := 2147775504;
TIOCGDRAINWAIT : constant := 1074033750;
TIOCGETA : constant := 1076655123;
TIOCGETD : constant := 1074033690;
TIOCGPGRP : constant := 1074033783;
TIOCGPTN : constant := 1074033679;
TIOCGSID : constant := 1074033763;
TIOCGWINSZ : constant := 1074295912;
TIOCMBIC : constant := 2147775595;
TIOCMBIS : constant := 2147775596;
TIOCMGDTRWAIT : constant := 1074033754;
TIOCMGET : constant := 1074033770;
TIOCMSDTRWAIT : constant := 2147775579;
TIOCMSET : constant := 2147775597;
TIOCM_CAR : constant := 64;
TIOCM_CD : constant := 64;
TIOCM_CTS : constant := 32;
TIOCM_DCD : constant := 64;
TIOCM_DSR : constant := 256;
TIOCM_DTR : constant := 2;
TIOCM_LE : constant := 1;
TIOCM_RI : constant := 128;
TIOCM_RNG : constant := 128;
TIOCM_RTS : constant := 4;
TIOCM_SR : constant := 16;
TIOCM_ST : constant := 8;
TIOCNOTTY : constant := 536900721;
TIOCNXCL : constant := 536900622;
TIOCOUTQ : constant := 1074033779;
TIOCPKT : constant := 2147775600;
TIOCPKT_DATA : constant := 0;
TIOCPKT_DOSTOP : constant := 32;
TIOCPKT_FLUSHREAD : constant := 1;
TIOCPKT_FLUSHWRITE : constant := 2;
TIOCPKT_IOCTL : constant := 64;
TIOCPKT_NOSTOP : constant := 16;
TIOCPKT_START : constant := 8;
TIOCPKT_STOP : constant := 4;
TIOCPTMASTER : constant := 536900636;
TIOCSBRK : constant := 536900731;
TIOCSCTTY : constant := 536900705;
TIOCSDRAINWAIT : constant := 2147775575;
TIOCSDTR : constant := 536900729;
TIOCSETA : constant := 2150396948;
TIOCSETAF : constant := 2150396950;
TIOCSETAW : constant := 2150396949;
TIOCSETD : constant := 2147775515;
TIOCSIG : constant := 537162847;
TIOCSPGRP : constant := 2147775606;
TIOCSTART : constant := 536900718;
TIOCSTAT : constant := 536900709;
TIOCSTI : constant := 2147578994;
TIOCSTOP : constant := 536900719;
TIOCSWINSZ : constant := 2148037735;
TIOCTIMESTAMP : constant := 1074295897;
TIOCUCNTL : constant := 2147775590;
TTYDISC : constant := 0;
-- UIOCCMD (function macro)
-- _SYS_TTYCOM_H_ (empty)
end C.sys.ttycom;
Raw
c-sys-ttydefaults.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.ttydefaults is
pragma Preelaborate;
CBRK : constant := 255;
CDISCARD : constant := 15;
CDSUSP : constant := 25;
CEOF : constant := 4;
CEOL : constant := 255;
CEOT : constant := 4;
CERASE : constant := 127;
CERASE2 : constant := 8;
CFLUSH : constant := 15;
CINTR : constant := 3;
CKILL : constant := 21;
CLNEXT : constant := 22;
CMIN : constant := 1;
CQUIT : constant := 28;
CREPRINT : constant := 18;
CRPRNT : constant := 18;
CSTART : constant := 17;
CSTATUS : constant := 20;
CSTOP : constant := 19;
CSUSP : constant := 26;
CTIME : constant := 0;
-- CTRL (function macro)
CWERASE : constant := 23;
TTYDEF_CFLAG : constant := 19200;
TTYDEF_IFLAG : constant := 11010;
TTYDEF_LFLAG : constant := 1483;
TTYDEF_LFLAG_ECHO : constant := 1483;
TTYDEF_LFLAG_NOECHO : constant := 1408;
TTYDEF_OFLAG : constant := 3;
TTYDEF_SPEED : constant := 9600;
-- _SYS_TTYDEFAULTS_H_ (empty)
end C.sys.ttydefaults;
Raw
c-sys-types.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
with C.stddef;
with C.sys.qtypes;
package C.sys.types is
pragma Preelaborate;
subtype u_char is unsigned_char;
subtype u_short is unsigned_short;
subtype u_int is unsigned_int;
subtype u_long is unsigned_long;
subtype u_long_ptr is unsigned_long_ptr;
subtype ushort is unsigned_short;
subtype uint is unsigned_int;
subtype u_int8_t is machine.qtypes.uint8_t;
subtype u_int16_t is machine.qtypes.uint16_t;
subtype u_int32_t is machine.qtypes.uint32_t;
subtype u_int32_t_array is machine.qtypes.uint32_t_array;
subtype u_int64_t is machine.qtypes.uint64_t;
subtype u_quad_t is machine.qtypes.uint64_t;
subtype quad_t is machine.qtypes.int64_t;
subtype quad_t_ptr is machine.qtypes.int64_t_ptr;
subtype qaddr_t is quad_t_ptr;
subtype caddr_t is char_ptr;
subtype c_caddr_t is char_const_ptr;
subtype v_caddr_t is char_volatile_ptr;
subtype blksize_t is qtypes.blksize_t;
subtype cpuwhich_t is qtypes.cpuwhich_t;
subtype cpulevel_t is qtypes.cpulevel_t;
subtype cpusetid_t is qtypes.cpusetid_t;
subtype cpusetid_t_ptr is qtypes.cpusetid_t_ptr;
subtype blkcnt_t is qtypes.blkcnt_t;
subtype clock_t is machine.qtypes.clock_t;
subtype clockid_t is qtypes.clockid_t;
subtype clockid_t_ptr is qtypes.clockid_t_ptr;
subtype cpumask_t is machine.qtypes.cpumask_t;
subtype critical_t is machine.qtypes.critical_t;
subtype daddr_t is machine.qtypes.int64_t;
subtype dev_t is qtypes.dev_t;
subtype fflags_t is qtypes.fflags_t;
subtype fixpt_t is qtypes.fixpt_t;
subtype fsblkcnt_t is qtypes.fsblkcnt_t;
subtype fsfilcnt_t is qtypes.fsfilcnt_t;
subtype gid_t is qtypes.gid_t;
subtype gid_t_array is qtypes.gid_t_array;
subtype gid_t_ptr is qtypes.gid_t_ptr;
subtype gid_t_const_ptr is qtypes.gid_t_const_ptr;
subtype in_addr_t is machine.qtypes.uint32_t;
subtype in_port_t is machine.qtypes.uint16_t;
subtype id_t is qtypes.id_t;
subtype ino_t is qtypes.ino_t;
subtype key_t is qtypes.key_t;
subtype lwpid_t is qtypes.lwpid_t;
subtype mode_t is qtypes.mode_t;
subtype accmode_t is qtypes.accmode_t;
subtype nlink_t is qtypes.nlink_t;
subtype off_t is qtypes.off_t;
subtype off_t_ptr is qtypes.off_t_ptr;
subtype pid_t is qtypes.pid_t;
subtype pid_t_ptr is qtypes.pid_t_ptr;
subtype register_t is machine.qtypes.register_t;
subtype rlim_t is qtypes.rlim_t;
subtype segsz_t is machine.qtypes.segsz_t;
subtype ssize_t is machine.qtypes.ssize_t;
subtype suseconds_t is qtypes.suseconds_t;
subtype time_t is machine.qtypes.time_t;
subtype time_t_const_ptr is machine.qtypes.time_t_const_ptr;
subtype time_t_ptr is machine.qtypes.time_t_ptr;
subtype timer_t is qtypes.timer_t;
subtype timer_t_ptr is qtypes.timer_t_ptr;
subtype mqd_t is qtypes.mqd_t;
subtype u_register_t is machine.qtypes.u_register_t;
subtype uid_t is qtypes.uid_t;
subtype uid_t_ptr is qtypes.uid_t_ptr;
subtype uid_t_const_ptr is qtypes.uid_t_const_ptr;
subtype useconds_t is qtypes.useconds_t;
subtype vm_offset_t is machine.qtypes.vm_offset_t;
subtype vm_ooffset_t is machine.qtypes.vm_ooffset_t;
subtype vm_paddr_t is machine.qtypes.vm_paddr_t;
subtype vm_pindex_t is machine.qtypes.vm_pindex_t;
subtype vm_size_t is machine.qtypes.vm_size_t;
-- #include <sys/_sigset.h>
-- #include <sys/_timeval.h>
-- #include <sys/timespec.h>
-- #include <sys/select.h>
function ftruncate (a1 : signed_int; a2 : off_t) return signed_int;
pragma Import (C, ftruncate, "ftruncate");
function lseek (a1 : signed_int; a2 : off_t; a3 : signed_int)
return off_t;
pragma Import (C, lseek, "lseek");
function mmap (a1 : void_ptr; a2 : stddef.size_t; a3 : signed_int;
a4 : signed_int; a5 : signed_int; a6 : off_t) return void_ptr;
pragma Import (C, mmap, "mmap");
function truncate (a1 : access constant char; a2 : off_t)
return signed_int;
pragma Import (C, truncate, "truncate");
-- _ACCMODE_T_DECLARED (empty)
-- _BLKCNT_T_DECLARED (empty)
-- _BLKSIZE_T_DECLARED (empty)
-- _CLOCKID_T_DECLARED (empty)
-- _CLOCK_T_DECLARED (empty)
-- _DEV_T_DECLARED (empty)
-- _FFLAGS_T_DECLARED (empty)
-- _FSBLKCNT_T_DECLARED (empty)
-- _FTRUNCATE_DECLARED (empty)
-- _GID_T_DECLARED (empty)
-- _ID_T_DECLARED (empty)
-- _INO_T_DECLARED (empty)
-- _IN_ADDR_T_DECLARED (empty)
-- _IN_PORT_T_DECLARED (empty)
-- _KEY_T_DECLARED (empty)
-- _LSEEK_DECLARED (empty)
-- _LWPID_T_DECLARED (empty)
-- _MMAP_DECLARED (empty)
-- _MODE_T_DECLARED (empty)
-- _MQD_T_DECLARED (empty)
-- _NLINK_T_DECLARED (empty)
-- _OFF_T_DECLARED (empty)
-- _PID_T_DECLARED (empty)
-- _RLIM_T_DECLARED (empty)
-- _SSIZE_T_DECLARED (empty)
-- _SUSECONDS_T_DECLARED (empty)
-- _SYS_TYPES_H_ (empty)
-- _TIMER_T_DECLARED (empty)
-- _TIME_T_DECLARED (empty)
-- _TRUNCATE_DECLARED (empty)
-- _UID_T_DECLARED (empty)
-- _USECONDS_T_DECLARED (empty)
-- major (function macro)
-- makedev (function macro)
-- minor (function macro)
end C.sys.types;
Raw
c-sys-ucontext.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.ucontext;
with C.sys.select_h;
with C.sys.signal;
package C.sys.ucontext is
pragma Preelaborate;
type struct_ucontext;
type struct_ucontext_ptr is access all struct_ucontext;
for struct_ucontext_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_ucontext_ptr);
pragma Convention (C, struct_ucontext_ptr);
type struct_ucontext is record
uc_sigmask : aliased select_h.sigset_t;
uc_mcontext : aliased machine.ucontext.mcontext_t;
uc_link : aliased struct_ucontext_ptr;
uc_stack : aliased signal.stack_t;
uc_flags : aliased signed_int;
spare : aliased signed_int_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_ucontext);
type struct_ucontext_const_ptr is access constant struct_ucontext;
for struct_ucontext_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_ucontext_const_ptr);
pragma Convention (C, struct_ucontext_const_ptr);
subtype ucontext_t is struct_ucontext;
subtype ucontext_t_ptr is struct_ucontext_ptr;
subtype ucontext_t_const_ptr is struct_ucontext_const_ptr;
function getcontext (a1 : access ucontext_t) return signed_int;
pragma Import (C, getcontext, "getcontext");
function getcontextx return ucontext_t_ptr;
pragma Import (C, getcontextx, "getcontextx");
function setcontext (a1 : access constant ucontext_t) return signed_int;
pragma Import (C, setcontext, "setcontext");
type access_e823f645 is access procedure;
pragma Convention (C, access_e823f645);
procedure makecontext (a1 : access ucontext_t; a2 : access_e823f645;
a3 : signed_int);
pragma Import (C, makecontext, "makecontext");
function signalcontext (a1 : access ucontext_t; a2 : signed_int;
a3 : signal.sighandler_t_ptr) return signed_int;
pragma Import (C, signalcontext, "signalcontext");
function swapcontext (a1 : access ucontext_t;
a2 : access constant ucontext_t) return signed_int;
pragma Import (C, swapcontext, "swapcontext");
function getcontextx_size return signed_int;
pragma Import (C, getcontextx_size, "__getcontextx_size");
function fillcontextx (ctx : access char) return signed_int;
pragma Import (C, fillcontextx, "__fillcontextx");
UCF_SWAPPED : constant := 1;
-- _SYS_UCONTEXT_H_ (empty)
end C.sys.ucontext;
Raw
c-sys-ucred.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.types;
package C.sys.ucred is
pragma Preelaborate;
type struct_xucred;
type struct_xucred is record
cr_version : aliased types.u_int;
cr_uid : aliased types.uid_t;
cr_ngroups : aliased signed_short;
cr_groups : aliased types.gid_t_array (0 .. 15);
cr_unused1 : aliased void_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_xucred);
XUCRED_VERSION : constant := 0;
XU_NGROUPS : constant := 16;
-- _SYS_UCRED_H_ (empty)
-- cr_gid (unparsible)
end C.sys.ucred;
Raw
c-sys-uio.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.qiovec;
with C.sys.types;
package C.sys.uio is
pragma Preelaborate;
subtype struct_iovec is qiovec.struct_iovec;
-- SYS_IOVEC_H renames qiovec.SYS_IOVEC_H (empty)
type enum_uio_rw;
type enum_uio_rw is (UIO_READ, UIO_WRITE);
for enum_uio_rw use (UIO_READ => 0, UIO_WRITE => 1);
pragma Convention (C, enum_uio_rw);
type enum_uio_seg;
type enum_uio_seg is (UIO_USERSPACE, UIO_SYSSPACE, UIO_NOCOPY);
for enum_uio_seg use (UIO_USERSPACE => 0, UIO_SYSSPACE => 1,
UIO_NOCOPY => 2);
pragma Convention (C, enum_uio_seg);
function readv (a1 : signed_int; a2 : access constant qiovec.struct_iovec;
a3 : signed_int) return types.ssize_t;
pragma Import (C, readv, "readv");
function writev (a1 : signed_int;
a2 : access constant qiovec.struct_iovec; a3 : signed_int)
return types.ssize_t;
pragma Import (C, writev, "writev");
function preadv (a1 : signed_int;
a2 : access constant qiovec.struct_iovec; a3 : signed_int;
a4 : types.off_t) return types.ssize_t;
pragma Import (C, preadv, "preadv");
function pwritev (a1 : signed_int;
a2 : access constant qiovec.struct_iovec; a3 : signed_int;
a4 : types.off_t) return types.ssize_t;
pragma Import (C, pwritev, "pwritev");
-- _SYS_UIO_H_ (empty)
end C.sys.uio;
Raw
c-sys-unistd.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys.unistd is
pragma Preelaborate;
F_OK : constant := 0;
L_INCR : constant := 1;
L_SET : constant := 0;
L_XTND : constant := 2;
RFCENVG : constant := 2048;
RFCFDG : constant := 4096;
RFCNAMEG : constant := 1024;
RFENVG : constant := 2;
RFFDG : constant := 4;
RFFLAGS : constant := 2148495476;
RFHIGHPID : constant := 262144;
RFKERNELONLY : constant := 2147876864;
RFLINUXTHPN : constant := 65536;
RFMEM : constant := 32;
RFNAMEG : constant := 1;
RFNOTEG : constant := 8;
RFNOWAIT : constant := 64;
RFPPWAIT : constant := 2147483648;
RFPROC : constant := 16;
RFSIGSHARE : constant := 16384;
RFSTOPPED : constant := 131072;
RFTHREAD : constant := 8192;
-- RFTSIGFLAGS (function macro)
RFTSIGMASK : constant := 255;
-- RFTSIGNUM (function macro)
RFTSIGSHIFT : constant := 20;
RFTSIGZMB : constant := 524288;
R_OK : constant := 4;
SEEK_CUR : constant := 1;
SEEK_DATA : constant := 3;
SEEK_END : constant := 2;
SEEK_HOLE : constant := 4;
SEEK_SET : constant := 0;
W_OK : constant := 2;
X_OK : constant := 1;
PC_ACL_EXTENDED : constant := 59;
PC_ACL_NFS4 : constant := 64;
PC_ACL_PATH_MAX : constant := 60;
PC_ALLOC_SIZE_MIN : constant := 10;
PC_ASYNC_IO : constant := 53;
PC_CAP_PRESENT : constant := 61;
PC_CHOWN_RESTRICTED : constant := 7;
PC_FILESIZEBITS : constant := 12;
PC_INF_PRESENT : constant := 62;
PC_LINK_MAX : constant := 1;
PC_MAC_PRESENT : constant := 63;
PC_MAX_CANON : constant := 2;
PC_MAX_INPUT : constant := 3;
PC_MIN_HOLE_SIZE : constant := 21;
PC_NAME_MAX : constant := 4;
PC_NO_TRUNC : constant := 8;
PC_PATH_MAX : constant := 5;
PC_PIPE_BUF : constant := 6;
PC_PRIO_IO : constant := 54;
PC_REC_INCR_XFER_SIZE : constant := 14;
PC_REC_MAX_XFER_SIZE : constant := 15;
PC_REC_MIN_XFER_SIZE : constant := 16;
PC_REC_XFER_ALIGN : constant := 17;
PC_SYMLINK_MAX : constant := 18;
PC_SYNC_IO : constant := 55;
PC_VDISABLE : constant := 9;
POSIX_ADVISORY_INFO : constant := 200112;
POSIX_ASYNCHRONOUS_IO : constant := 0;
POSIX_CHOWN_RESTRICTED : constant := 1;
POSIX_CLOCK_SELECTION : constant := -1;
POSIX_CPUTIME : constant := -1;
POSIX_FSYNC : constant := 200112;
POSIX_IPV6 : constant := 0;
POSIX_JOB_CONTROL : constant := 1;
POSIX_MAPPED_FILES : constant := 200112;
POSIX_MEMLOCK : constant := -1;
POSIX_MEMLOCK_RANGE : constant := 200112;
POSIX_MEMORY_PROTECTION : constant := 200112;
POSIX_MESSAGE_PASSING : constant := 200112;
POSIX_MONOTONIC_CLOCK : constant := 200112;
POSIX_NO_TRUNC : constant := 1;
POSIX_PRIORITIZED_IO : constant := -1;
POSIX_PRIORITY_SCHEDULING : constant := 200112;
POSIX_RAW_SOCKETS : constant := 200112;
POSIX_REALTIME_SIGNALS : constant := 200112;
POSIX_SEMAPHORES : constant := -1;
POSIX_SHARED_MEMORY_OBJECTS : constant := 200112;
POSIX_SPORADIC_SERVER : constant := -1;
POSIX_SYNCHRONIZED_IO : constant := -1;
POSIX_TIMEOUTS : constant := 200112;
POSIX_TIMERS : constant := 200112;
POSIX_TYPED_MEMORY_OBJECTS : constant := -1;
POSIX_VDISABLE : constant := 255;
POSIX_VERSION : constant := 200112;
-- _SYS_UNISTD_H_ (empty)
XOPEN_SHM : constant := 1;
XOPEN_STREAMS : constant := -1;
end C.sys.unistd;
Raw
c-sys-wait.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.resource;
with C.sys.types;
package C.sys.wait is
pragma Preelaborate;
function wait (a1 : access signed_int) return types.pid_t;
pragma Import (C, wait, "wait");
function waitpid (a1 : types.pid_t; a2 : access signed_int;
a3 : signed_int) return types.pid_t;
pragma Import (C, waitpid, "waitpid");
function wait3 (a1 : access signed_int; a2 : signed_int;
a3 : access resource.struct_rusage) return types.pid_t;
pragma Import (C, wait3, "wait3");
function wait4 (a1 : types.pid_t; a2 : access signed_int; a3 : signed_int;
a4 : access resource.struct_rusage) return types.pid_t;
pragma Import (C, wait4, "wait4");
WAIT_ANY : constant := -1;
WAIT_MYPGRP : constant := 0;
WCONTINUED : constant := 4;
-- WCOREDUMP (function macro)
WCOREFLAG : constant := 128;
-- WEXITSTATUS (function macro)
-- WIFCONTINUED (function macro)
-- WIFEXITED (function macro)
-- WIFSIGNALED (function macro)
-- WIFSTOPPED (function macro)
WLINUXCLONE : constant := -2147483648;
WNOHANG : constant := 1;
WNOWAIT : constant := 8;
WSTOPPED : constant := 2;
-- WSTOPSIG (function macro)
-- WTERMSIG (function macro)
WUNTRACED : constant := 2;
-- W_EXITCODE (function macro)
-- W_STOPCODE (function macro)
-- _SYS_WAIT_H_ (empty)
-- _WSTATUS (function macro)
qWSTOPPED : constant := 127;
-- _W_INT (function macro)
end C.sys.wait;
Raw
c-sys.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.sys is
pragma Preelaborate;
end C.sys;
Raw
c-termios.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.sys.types;
package C.termios is
pragma Preelaborate;
subtype tcflag_t is unsigned_int;
subtype cc_t is unsigned_char;
subtype cc_t_array is unsigned_char_array;
subtype speed_t is unsigned_int;
type struct_termios;
type struct_termios is record
c_iflag : aliased tcflag_t;
c_oflag : aliased tcflag_t;
c_cflag : aliased tcflag_t;
c_lflag : aliased tcflag_t;
c_cc : aliased cc_t_array (0 .. 19);
c_ispeed : aliased speed_t;
c_ospeed : aliased speed_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_termios);
type struct_termios_const_ptr is access constant struct_termios;
for struct_termios_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_termios_const_ptr);
pragma Convention (C, struct_termios_const_ptr);
type struct_termios_ptr is access all struct_termios;
for struct_termios_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_termios_ptr);
pragma Convention (C, struct_termios_ptr);
function cfgetispeed (a1 : access constant struct_termios) return speed_t;
pragma Import (C, cfgetispeed, "cfgetispeed");
function cfgetospeed (a1 : access constant struct_termios) return speed_t;
pragma Import (C, cfgetospeed, "cfgetospeed");
function cfsetispeed (a1 : access struct_termios; a2 : speed_t)
return signed_int;
pragma Import (C, cfsetispeed, "cfsetispeed");
function cfsetospeed (a1 : access struct_termios; a2 : speed_t)
return signed_int;
pragma Import (C, cfsetospeed, "cfsetospeed");
function tcgetattr (a1 : signed_int; a2 : access struct_termios)
return signed_int;
pragma Import (C, tcgetattr, "tcgetattr");
function tcsetattr (a1 : signed_int; a2 : signed_int;
a3 : access constant struct_termios) return signed_int;
pragma Import (C, tcsetattr, "tcsetattr");
function tcdrain (a1 : signed_int) return signed_int;
pragma Import (C, tcdrain, "tcdrain");
function tcflow (a1 : signed_int; a2 : signed_int) return signed_int;
pragma Import (C, tcflow, "tcflow");
function tcflush (a1 : signed_int; a2 : signed_int) return signed_int;
pragma Import (C, tcflush, "tcflush");
function tcsendbreak (a1 : signed_int; a2 : signed_int) return signed_int;
pragma Import (C, tcsendbreak, "tcsendbreak");
function tcgetsid (a1 : signed_int) return sys.types.pid_t;
pragma Import (C, tcgetsid, "tcgetsid");
function tcsetsid (a1 : signed_int; a2 : sys.types.pid_t)
return signed_int;
pragma Import (C, tcsetsid, "tcsetsid");
procedure cfmakeraw (a1 : access struct_termios);
pragma Import (C, cfmakeraw, "cfmakeraw");
function cfsetspeed (a1 : access struct_termios; a2 : speed_t)
return signed_int;
pragma Import (C, cfsetspeed, "cfsetspeed");
ALTWERASE : constant := 512;
B0 : constant := 0;
B110 : constant := 110;
B115200 : constant := 115200;
B1200 : constant := 1200;
B134 : constant := 134;
B14400 : constant := 14400;
B150 : constant := 150;
B1800 : constant := 1800;
B19200 : constant := 19200;
B200 : constant := 200;
B230400 : constant := 230400;
B2400 : constant := 2400;
B28800 : constant := 28800;
B300 : constant := 300;
B38400 : constant := 38400;
B460800 : constant := 460800;
B4800 : constant := 4800;
B50 : constant := 50;
B57600 : constant := 57600;
B600 : constant := 600;
B7200 : constant := 7200;
B75 : constant := 75;
B76800 : constant := 76800;
B921600 : constant := 921600;
B9600 : constant := 9600;
BRKINT : constant := 2;
CCAR_OFLOW : constant := 1048576;
-- CCEQ (function macro)
CCTS_OFLOW : constant := 65536;
CDSR_OFLOW : constant := 524288;
CDTR_IFLOW : constant := 262144;
CIGNORE : constant := 1;
CLOCAL : constant := 32768;
CREAD : constant := 2048;
CRTSCTS : constant := 196608;
CRTS_IFLOW : constant := 131072;
CS5 : constant := 0;
CS6 : constant := 256;
CS7 : constant := 512;
CS8 : constant := 768;
CSIZE : constant := 768;
CSTOPB : constant := 1024;
ECHO : constant := 8;
ECHOCTL : constant := 64;
ECHOE : constant := 2;
ECHOK : constant := 4;
ECHOKE : constant := 1;
ECHONL : constant := 16;
ECHOPRT : constant := 32;
EXTA : constant := 19200;
EXTB : constant := 38400;
EXTPROC : constant := 2048;
FLUSHO : constant := 8388608;
HUPCL : constant := 16384;
ICANON : constant := 256;
ICRNL : constant := 256;
IEXTEN : constant := 1024;
IGNBRK : constant := 1;
IGNCR : constant := 128;
IGNPAR : constant := 4;
IMAXBEL : constant := 8192;
INLCR : constant := 64;
INPCK : constant := 16;
ISIG : constant := 128;
ISTRIP : constant := 32;
IXANY : constant := 2048;
IXOFF : constant := 1024;
IXON : constant := 512;
MDMBUF : constant := 1048576;
NCCS : constant := 20;
NOFLSH : constant := -2147483648;
NOKERNINFO : constant := 33554432;
OCRNL : constant := 16;
ONLCR : constant := 2;
ONLRET : constant := 64;
ONOCR : constant := 32;
ONOEOT : constant := 8;
OPOST : constant := 1;
OXTABS : constant := 4;
PARENB : constant := 4096;
PARMRK : constant := 8;
PARODD : constant := 8192;
PENDIN : constant := 536870912;
TAB0 : constant := 0;
TAB3 : constant := 4;
TABDLY : constant := 4;
TCIFLUSH : constant := 1;
TCIOFF : constant := 3;
TCIOFLUSH : constant := 3;
TCION : constant := 4;
TCOFLUSH : constant := 2;
TCOOFF : constant := 1;
TCOON : constant := 2;
TCSADRAIN : constant := 1;
TCSAFLUSH : constant := 2;
TCSANOW : constant := 0;
TCSASOFT : constant := 16;
TOSTOP : constant := 4194304;
VDISCARD : constant := 15;
VDSUSP : constant := 11;
VEOF : constant := 0;
VEOL : constant := 1;
VEOL2 : constant := 2;
VERASE : constant := 3;
VERASE2 : constant := 7;
VINTR : constant := 8;
VKILL : constant := 5;
VLNEXT : constant := 14;
VMIN : constant := 16;
VQUIT : constant := 9;
VREPRINT : constant := 6;
VSTART : constant := 12;
VSTATUS : constant := 18;
VSTOP : constant := 13;
VSUSP : constant := 10;
VTIME : constant := 17;
VWERASE : constant := 4;
-- _SYS_TERMIOS_H_ (empty)
end C.termios;
Raw
c-time.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.sys.qtypes;
with C.sys.signal;
with C.sys.timespec;
with C.sys.types;
package C.time is
pragma Preelaborate;
subtype struct_timespec is sys.timespec.struct_timespec;
subtype struct_itimerspec is sys.timespec.struct_itimerspec;
-- TIMESPEC_TO_TIMEVAL renames sys.timespec.TIMESPEC_T... (uninterpretable)
-- TIMEVAL_TO_TIMESPEC renames sys.timespec.TIMEVAL_TO... (uninterpretable)
-- SYS_TIMESPEC_H renames sys.timespec.SYS_TIMESPEC_H (empty)
type struct_tm;
type struct_tm is record
tm_sec : aliased signed_int;
tm_min : aliased signed_int;
tm_hour : aliased signed_int;
tm_mday : aliased signed_int;
tm_mon : aliased signed_int;
tm_year : aliased signed_int;
tm_wday : aliased signed_int;
tm_yday : aliased signed_int;
tm_isdst : aliased signed_int;
tm_gmtoff : aliased signed_long;
tm_zone : aliased char_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_tm);
type struct_tm_const_ptr is access constant struct_tm;
for struct_tm_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_tm_const_ptr);
pragma Convention (C, struct_tm_const_ptr);
type struct_tm_ptr is access all struct_tm;
for struct_tm_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_tm_ptr);
pragma Convention (C, struct_tm_ptr);
tzname : aliased char_ptr_array (0 .. 0);
pragma Import (C, tzname, "tzname");
function asctime (a1 : access constant struct_tm) return char_ptr;
pragma Import (C, asctime, "asctime");
function clock return sys.types.clock_t;
pragma Import (C, clock, "clock");
function ctime (a1 : access constant sys.types.time_t) return char_ptr;
pragma Import (C, ctime, "ctime");
function difftime (a1 : sys.types.time_t; a2 : sys.types.time_t)
return double;
pragma Import (C, difftime, "difftime");
function gmtime (a1 : access constant sys.types.time_t)
return struct_tm_ptr;
pragma Import (C, gmtime, "gmtime");
function localtime (a1 : access constant sys.types.time_t)
return struct_tm_ptr;
pragma Import (C, localtime, "localtime");
function mktime (a1 : access struct_tm) return sys.types.time_t;
pragma Import (C, mktime, "mktime");
function strftime (a1 : access char; a2 : stddef.size_t;
a3 : access constant char; a4 : access constant struct_tm)
return stddef.size_t;
pragma Import (C, strftime, "strftime");
function time (a1 : access sys.types.time_t) return sys.types.time_t;
pragma Import (C, time, "time");
function timer_create (a1 : sys.types.clockid_t;
a2 : access sys.signal.struct_sigevent; a3 : access sys.types.timer_t)
return signed_int;
pragma Import (C, timer_create, "timer_create");
function timer_delete (a1 : access sys.qtypes.struct_timer)
return signed_int;
pragma Import (C, timer_delete, "timer_delete");
function timer_gettime (a1 : access sys.qtypes.struct_timer;
a2 : access sys.timespec.struct_itimerspec) return signed_int;
pragma Import (C, timer_gettime, "timer_gettime");
function timer_getoverrun (a1 : access sys.qtypes.struct_timer)
return signed_int;
pragma Import (C, timer_getoverrun, "timer_getoverrun");
function timer_settime (a1 : access sys.qtypes.struct_timer;
a2 : signed_int; a3 : access constant sys.timespec.struct_itimerspec;
a4 : access sys.timespec.struct_itimerspec) return signed_int;
pragma Import (C, timer_settime, "timer_settime");
procedure tzset;
pragma Import (C, tzset, "tzset");
function clock_getres (a1 : sys.types.clockid_t;
a2 : access sys.timespec.struct_timespec) return signed_int;
pragma Import (C, clock_getres, "clock_getres");
function clock_gettime (a1 : sys.types.clockid_t;
a2 : access sys.timespec.struct_timespec) return signed_int;
pragma Import (C, clock_gettime, "clock_gettime");
function clock_settime (a1 : sys.types.clockid_t;
a2 : access constant sys.timespec.struct_timespec) return signed_int;
pragma Import (C, clock_settime, "clock_settime");
function nanosleep (a1 : access constant sys.timespec.struct_timespec;
a2 : access sys.timespec.struct_timespec) return signed_int;
pragma Import (C, nanosleep, "nanosleep");
function asctime_r (a1 : access constant struct_tm; a2 : access char)
return char_ptr;
pragma Import (C, asctime_r, "asctime_r");
function ctime_r (a1 : access constant sys.types.time_t; a2 : access char)
return char_ptr;
pragma Import (C, ctime_r, "ctime_r");
function gmtime_r (a1 : access constant sys.types.time_t;
a2 : access struct_tm) return struct_tm_ptr;
pragma Import (C, gmtime_r, "gmtime_r");
function localtime_r (a1 : access constant sys.types.time_t;
a2 : access struct_tm) return struct_tm_ptr;
pragma Import (C, localtime_r, "localtime_r");
function strptime (a1 : access constant char; a2 : access constant char;
a3 : access struct_tm) return char_ptr;
pragma Import (C, strptime, "strptime");
function timezone (a1 : signed_int; a2 : signed_int) return char_ptr;
pragma Import (C, timezone, "timezone");
procedure tzsetwall;
pragma Import (C, tzsetwall, "tzsetwall");
function timelocal (a1 : access struct_tm) return sys.types.time_t;
pragma Import (C, timelocal, "timelocal");
function timegm (a1 : access struct_tm) return sys.types.time_t;
pragma Import (C, timegm, "timegm");
CLK_TCK : constant := 128;
CLOCKS_PER_SEC : constant := 128;
CLOCK_MONOTONIC : constant := 4;
CLOCK_MONOTONIC_FAST : constant := 12;
CLOCK_MONOTONIC_PRECISE : constant := 11;
CLOCK_PROF : constant := 2;
CLOCK_REALTIME : constant := 0;
CLOCK_REALTIME_FAST : constant := 10;
CLOCK_REALTIME_PRECISE : constant := 9;
CLOCK_SECOND : constant := 13;
CLOCK_THREAD_CPUTIME_ID : constant := 14;
CLOCK_UPTIME : constant := 5;
CLOCK_UPTIME_FAST : constant := 8;
CLOCK_UPTIME_PRECISE : constant := 7;
CLOCK_VIRTUAL : constant := 1;
TIMER_ABSTIME : constant := 1;
TIMER_RELTIME : constant := 0;
-- _TIME_H_ (empty)
end C.time;
Raw
c-unistd.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.stddef;
with C.stdint;
with C.sys.types;
with C.sys.unistd;
package C.unistd is
pragma Preelaborate;
subtype u_char is sys.types.u_char;
subtype u_short is sys.types.u_short;
subtype u_int is sys.types.u_int;
subtype u_long is sys.types.u_long;
subtype ushort is sys.types.ushort;
subtype uint is sys.types.uint;
subtype u_int8_t is sys.types.u_int8_t;
subtype u_int16_t is sys.types.u_int16_t;
subtype u_int32_t is sys.types.u_int32_t;
subtype u_int64_t is sys.types.u_int64_t;
subtype u_quad_t is sys.types.u_quad_t;
subtype quad_t is sys.types.quad_t;
subtype qaddr_t is sys.types.qaddr_t;
subtype caddr_t is sys.types.caddr_t;
subtype c_caddr_t is sys.types.c_caddr_t;
subtype v_caddr_t is sys.types.v_caddr_t;
subtype blksize_t is sys.types.blksize_t;
subtype cpuwhich_t is sys.types.cpuwhich_t;
subtype cpulevel_t is sys.types.cpulevel_t;
subtype cpusetid_t is sys.types.cpusetid_t;
subtype blkcnt_t is sys.types.blkcnt_t;
subtype clock_t is sys.types.clock_t;
subtype clockid_t is sys.types.clockid_t;
subtype cpumask_t is sys.types.cpumask_t;
subtype critical_t is sys.types.critical_t;
subtype daddr_t is sys.types.daddr_t;
subtype dev_t is sys.types.dev_t;
subtype fflags_t is sys.types.fflags_t;
subtype fixpt_t is sys.types.fixpt_t;
subtype fsblkcnt_t is sys.types.fsblkcnt_t;
subtype fsfilcnt_t is sys.types.fsfilcnt_t;
subtype gid_t is sys.types.gid_t;
subtype in_addr_t is sys.types.in_addr_t;
subtype in_port_t is sys.types.in_port_t;
subtype id_t is sys.types.id_t;
subtype ino_t is sys.types.ino_t;
subtype key_t is sys.types.key_t;
subtype lwpid_t is sys.types.lwpid_t;
subtype mode_t is sys.types.mode_t;
subtype accmode_t is sys.types.accmode_t;
subtype nlink_t is sys.types.nlink_t;
subtype off_t is sys.types.off_t;
subtype pid_t is sys.types.pid_t;
subtype register_t is sys.types.register_t;
subtype rlim_t is sys.types.rlim_t;
subtype segsz_t is sys.types.segsz_t;
subtype ssize_t is sys.types.ssize_t;
subtype suseconds_t is sys.types.suseconds_t;
subtype time_t is sys.types.time_t;
subtype timer_t is sys.types.timer_t;
subtype mqd_t is sys.types.mqd_t;
subtype u_register_t is sys.types.u_register_t;
subtype uid_t is sys.types.uid_t;
subtype useconds_t is sys.types.useconds_t;
subtype vm_offset_t is sys.types.vm_offset_t;
subtype vm_ooffset_t is sys.types.vm_ooffset_t;
subtype vm_paddr_t is sys.types.vm_paddr_t;
subtype vm_pindex_t is sys.types.vm_pindex_t;
subtype vm_size_t is sys.types.vm_size_t;
function ftruncate (a1 : signed_int; a2 : sys.types.off_t)
return signed_int renames sys.types.ftruncate;
function lseek (a1 : signed_int; a2 : sys.types.off_t; a3 : signed_int)
return sys.types.off_t renames sys.types.lseek;
function mmap (a1 : void_ptr; a2 : stddef.size_t; a3 : signed_int;
a4 : signed_int; a5 : signed_int; a6 : sys.types.off_t) return void_ptr
renames sys.types.mmap;
function truncate (a1 : access constant char; a2 : sys.types.off_t)
return signed_int renames sys.types.truncate;
-- ACCMODE_T_DECLARED renames sys.types.ACCMODE_T_DECLARED (empty)
-- BLKCNT_T_DECLARED renames sys.types.BLKCNT_T_DECLARED (empty)
-- BLKSIZE_T_DECLARED renames sys.types.BLKSIZE_T_DECLARED (empty)
-- CLOCKID_T_DECLARED renames sys.types.CLOCKID_T_DECLARED (empty)
-- CLOCK_T_DECLARED renames sys.types.CLOCK_T_DECLARED (empty)
-- DEV_T_DECLARED renames sys.types.DEV_T_DECLARED (empty)
-- FFLAGS_T_DECLARED renames sys.types.FFLAGS_T_DECLARED (empty)
-- FSBLKCNT_T_DECLARED renames sys.types.FSBLKCNT_T_DECLARED (empty)
-- FTRUNCATE_DECLARED renames sys.types.FTRUNCATE_DECLARED (empty)
-- GID_T_DECLARED renames sys.types.GID_T_DECLARED (empty)
-- ID_T_DECLARED renames sys.types.ID_T_DECLARED (empty)
-- INO_T_DECLARED renames sys.types.INO_T_DECLARED (empty)
-- IN_ADDR_T_DECLARED renames sys.types.IN_ADDR_T_DECLARED (empty)
-- IN_PORT_T_DECLARED renames sys.types.IN_PORT_T_DECLARED (empty)
-- KEY_T_DECLARED renames sys.types.KEY_T_DECLARED (empty)
-- LSEEK_DECLARED renames sys.types.LSEEK_DECLARED (empty)
-- LWPID_T_DECLARED renames sys.types.LWPID_T_DECLARED (empty)
-- MMAP_DECLARED renames sys.types.MMAP_DECLARED (empty)
-- MODE_T_DECLARED renames sys.types.MODE_T_DECLARED (empty)
-- MQD_T_DECLARED renames sys.types.MQD_T_DECLARED (empty)
-- NLINK_T_DECLARED renames sys.types.NLINK_T_DECLARED (empty)
-- OFF_T_DECLARED renames sys.types.OFF_T_DECLARED (empty)
-- PID_T_DECLARED renames sys.types.PID_T_DECLARED (empty)
-- RLIM_T_DECLARED renames sys.types.RLIM_T_DECLARED (empty)
-- SSIZE_T_DECLARED renames sys.types.SSIZE_T_DECLARED (empty)
-- SUSECONDS_T_DECLARED renames sys.types.SUSECONDS_T_DECLARED (empty)
-- SYS_TYPES_H renames sys.types.SYS_TYPES_H (empty)
-- TIMER_T_DECLARED renames sys.types.TIMER_T_DECLARED (empty)
-- TIME_T_DECLARED renames sys.types.TIME_T_DECLARED (empty)
-- TRUNCATE_DECLARED renames sys.types.TRUNCATE_DECLARED (empty)
-- UID_T_DECLARED renames sys.types.UID_T_DECLARED (empty)
-- USECONDS_T_DECLARED renames sys.types.USECONDS_T_DECLARED (empty)
-- major renames sys.types.major (function macro)
-- makedev renames sys.types.makedev (function macro)
-- minor renames sys.types.minor (function macro)
F_OK : constant := sys.unistd.F_OK;
L_INCR : constant := sys.unistd.L_INCR;
L_SET : constant := sys.unistd.L_SET;
L_XTND : constant := sys.unistd.L_XTND;
RFCENVG : constant := sys.unistd.RFCENVG;
RFCFDG : constant := sys.unistd.RFCFDG;
RFCNAMEG : constant := sys.unistd.RFCNAMEG;
RFENVG : constant := sys.unistd.RFENVG;
RFFDG : constant := sys.unistd.RFFDG;
RFFLAGS : constant := sys.unistd.RFFLAGS;
RFHIGHPID : constant := sys.unistd.RFHIGHPID;
RFKERNELONLY : constant := sys.unistd.RFKERNELONLY;
RFLINUXTHPN : constant := sys.unistd.RFLINUXTHPN;
RFMEM : constant := sys.unistd.RFMEM;
RFNAMEG : constant := sys.unistd.RFNAMEG;
RFNOTEG : constant := sys.unistd.RFNOTEG;
RFNOWAIT : constant := sys.unistd.RFNOWAIT;
RFPPWAIT : constant := sys.unistd.RFPPWAIT;
RFPROC : constant := sys.unistd.RFPROC;
RFSIGSHARE : constant := sys.unistd.RFSIGSHARE;
RFSTOPPED : constant := sys.unistd.RFSTOPPED;
RFTHREAD : constant := sys.unistd.RFTHREAD;
-- RFTSIGFLAGS renames sys.unistd.RFTSIGFLAGS (function macro)
RFTSIGMASK : constant := sys.unistd.RFTSIGMASK;
-- RFTSIGNUM renames sys.unistd.RFTSIGNUM (function macro)
RFTSIGSHIFT : constant := sys.unistd.RFTSIGSHIFT;
RFTSIGZMB : constant := sys.unistd.RFTSIGZMB;
R_OK : constant := sys.unistd.R_OK;
SEEK_CUR : constant := sys.unistd.SEEK_CUR;
SEEK_DATA : constant := sys.unistd.SEEK_DATA;
SEEK_END : constant := sys.unistd.SEEK_END;
SEEK_HOLE : constant := sys.unistd.SEEK_HOLE;
SEEK_SET : constant := sys.unistd.SEEK_SET;
W_OK : constant := sys.unistd.W_OK;
X_OK : constant := sys.unistd.X_OK;
PC_ACL_EXTENDED : constant := sys.unistd.PC_ACL_EXTENDED;
PC_ACL_NFS4 : constant := sys.unistd.PC_ACL_NFS4;
PC_ACL_PATH_MAX : constant := sys.unistd.PC_ACL_PATH_MAX;
PC_ALLOC_SIZE_MIN : constant := sys.unistd.PC_ALLOC_SIZE_MIN;
PC_ASYNC_IO : constant := sys.unistd.PC_ASYNC_IO;
PC_CAP_PRESENT : constant := sys.unistd.PC_CAP_PRESENT;
PC_CHOWN_RESTRICTED : constant := sys.unistd.PC_CHOWN_RESTRICTED;
PC_FILESIZEBITS : constant := sys.unistd.PC_FILESIZEBITS;
PC_INF_PRESENT : constant := sys.unistd.PC_INF_PRESENT;
PC_LINK_MAX : constant := sys.unistd.PC_LINK_MAX;
PC_MAC_PRESENT : constant := sys.unistd.PC_MAC_PRESENT;
PC_MAX_CANON : constant := sys.unistd.PC_MAX_CANON;
PC_MAX_INPUT : constant := sys.unistd.PC_MAX_INPUT;
PC_MIN_HOLE_SIZE : constant := sys.unistd.PC_MIN_HOLE_SIZE;
PC_NAME_MAX : constant := sys.unistd.PC_NAME_MAX;
PC_NO_TRUNC : constant := sys.unistd.PC_NO_TRUNC;
PC_PATH_MAX : constant := sys.unistd.PC_PATH_MAX;
PC_PIPE_BUF : constant := sys.unistd.PC_PIPE_BUF;
PC_PRIO_IO : constant := sys.unistd.PC_PRIO_IO;
PC_REC_INCR_XFER_SIZE : constant := sys.unistd.PC_REC_INCR_XFER_SIZE;
PC_REC_MAX_XFER_SIZE : constant := sys.unistd.PC_REC_MAX_XFER_SIZE;
PC_REC_MIN_XFER_SIZE : constant := sys.unistd.PC_REC_MIN_XFER_SIZE;
PC_REC_XFER_ALIGN : constant := sys.unistd.PC_REC_XFER_ALIGN;
PC_SYMLINK_MAX : constant := sys.unistd.PC_SYMLINK_MAX;
PC_SYNC_IO : constant := sys.unistd.PC_SYNC_IO;
PC_VDISABLE : constant := sys.unistd.PC_VDISABLE;
POSIX_ADVISORY_INFO : constant := sys.unistd.POSIX_ADVISORY_INFO;
POSIX_ASYNCHRONOUS_IO : constant := sys.unistd.POSIX_ASYNCHRONOUS_IO;
POSIX_CHOWN_RESTRICTED : constant := sys.unistd.POSIX_CHOWN_RESTRICTED;
POSIX_CLOCK_SELECTION : constant := sys.unistd.POSIX_CLOCK_SELECTION;
POSIX_CPUTIME : constant := sys.unistd.POSIX_CPUTIME;
POSIX_FSYNC : constant := sys.unistd.POSIX_FSYNC;
POSIX_IPV6 : constant := sys.unistd.POSIX_IPV6;
POSIX_JOB_CONTROL : constant := sys.unistd.POSIX_JOB_CONTROL;
POSIX_MAPPED_FILES : constant := sys.unistd.POSIX_MAPPED_FILES;
POSIX_MEMLOCK : constant := sys.unistd.POSIX_MEMLOCK;
POSIX_MEMLOCK_RANGE : constant := sys.unistd.POSIX_MEMLOCK_RANGE;
POSIX_MEMORY_PROTECTION : constant := sys.unistd.POSIX_MEMORY_PROTECTION;
POSIX_MESSAGE_PASSING : constant := sys.unistd.POSIX_MESSAGE_PASSING;
POSIX_MONOTONIC_CLOCK : constant := sys.unistd.POSIX_MONOTONIC_CLOCK;
POSIX_NO_TRUNC : constant := sys.unistd.POSIX_NO_TRUNC;
POSIX_PRIORITIZED_IO : constant := sys.unistd.POSIX_PRIORITIZED_IO;
POSIX_PRIORITY_SCHEDULING : constant :=
sys.unistd.POSIX_PRIORITY_SCHEDULING;
POSIX_RAW_SOCKETS : constant := sys.unistd.POSIX_RAW_SOCKETS;
POSIX_REALTIME_SIGNALS : constant := sys.unistd.POSIX_REALTIME_SIGNALS;
POSIX_SEMAPHORES : constant := sys.unistd.POSIX_SEMAPHORES;
POSIX_SHARED_MEMORY_OBJECTS : constant :=
sys.unistd.POSIX_SHARED_MEMORY_OBJECTS;
POSIX_SPORADIC_SERVER : constant := sys.unistd.POSIX_SPORADIC_SERVER;
POSIX_SYNCHRONIZED_IO : constant := sys.unistd.POSIX_SYNCHRONIZED_IO;
POSIX_TIMEOUTS : constant := sys.unistd.POSIX_TIMEOUTS;
POSIX_TIMERS : constant := sys.unistd.POSIX_TIMERS;
POSIX_TYPED_MEMORY_OBJECTS : constant :=
sys.unistd.POSIX_TYPED_MEMORY_OBJECTS;
POSIX_VDISABLE : constant := sys.unistd.POSIX_VDISABLE;
POSIX_VERSION : constant := sys.unistd.POSIX_VERSION;
-- SYS_UNISTD_H renames sys.unistd.SYS_UNISTD_H (empty)
XOPEN_SHM : constant := sys.unistd.XOPEN_SHM;
XOPEN_STREAMS : constant := sys.unistd.XOPEN_STREAMS;
procedure C_qexit (a1 : signed_int);
pragma No_Return (C_qexit);
pragma Import (C, C_qexit, "_exit");
function C_access (a1 : access constant char; a2 : signed_int)
return signed_int;
pragma Import (C, C_access, "access");
function alarm (a1 : unsigned_int) return unsigned_int;
pragma Import (C, alarm, "alarm");
function chdir (a1 : access constant char) return signed_int;
pragma Import (C, chdir, "chdir");
function chown (a1 : access constant char; a2 : sys.types.uid_t;
a3 : sys.types.gid_t) return signed_int;
pragma Import (C, chown, "chown");
function close (a1 : signed_int) return signed_int;
pragma Import (C, close, "close");
procedure closefrom (a1 : signed_int);
pragma Import (C, closefrom, "closefrom");
function dup (a1 : signed_int) return signed_int;
pragma Import (C, dup, "dup");
function dup2 (a1 : signed_int; a2 : signed_int) return signed_int;
pragma Import (C, dup2, "dup2");
function execl (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, execl, "execl");
function execle (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, execle, "execle");
function execlp (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, execlp, "execlp");
function execv (a1 : access constant char; a2 : access char_ptr)
return signed_int;
pragma Import (C, execv, "execv");
function execve (a1 : access constant char; a2 : access char_ptr;
a3 : access char_ptr) return signed_int;
pragma Import (C, execve, "execve");
function execvp (a1 : access constant char; a2 : access char_ptr)
return signed_int;
pragma Import (C, execvp, "execvp");
function fork return sys.types.pid_t;
pragma Import (C, fork, "fork");
function fpathconf (a1 : signed_int; a2 : signed_int) return signed_long;
pragma Import (C, fpathconf, "fpathconf");
function getcwd (a1 : access char; a2 : stddef.size_t) return char_ptr;
pragma Import (C, getcwd, "getcwd");
function getegid return sys.types.gid_t;
pragma Import (C, getegid, "getegid");
function geteuid return sys.types.uid_t;
pragma Import (C, geteuid, "geteuid");
function getgid return sys.types.gid_t;
pragma Import (C, getgid, "getgid");
function getgroups (a1 : signed_int; a2 : access sys.types.gid_t)
return signed_int;
pragma Import (C, getgroups, "getgroups");
function getlogin return char_ptr;
pragma Import (C, getlogin, "getlogin");
function getpgrp return sys.types.pid_t;
pragma Import (C, getpgrp, "getpgrp");
function getpid return sys.types.pid_t;
pragma Import (C, getpid, "getpid");
function getppid return sys.types.pid_t;
pragma Import (C, getppid, "getppid");
function getuid return sys.types.uid_t;
pragma Import (C, getuid, "getuid");
function isatty (a1 : signed_int) return signed_int;
pragma Import (C, isatty, "isatty");
function link (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, link, "link");
function pathconf (a1 : access constant char; a2 : signed_int)
return signed_long;
pragma Import (C, pathconf, "pathconf");
function pause return signed_int;
pragma Import (C, pause, "pause");
function pipe (a1 : access signed_int) return signed_int;
pragma Import (C, pipe, "pipe");
function read (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t)
return sys.types.ssize_t;
pragma Import (C, read, "read");
function rmdir (a1 : access constant char) return signed_int;
pragma Import (C, rmdir, "rmdir");
function setgid (a1 : sys.types.gid_t) return signed_int;
pragma Import (C, setgid, "setgid");
function setpgid (a1 : sys.types.pid_t; a2 : sys.types.pid_t)
return signed_int;
pragma Import (C, setpgid, "setpgid");
function setsid return sys.types.pid_t;
pragma Import (C, setsid, "setsid");
function setuid (a1 : sys.types.uid_t) return signed_int;
pragma Import (C, setuid, "setuid");
function sleep (a1 : unsigned_int) return unsigned_int;
pragma Import (C, sleep, "sleep");
function sysconf (a1 : signed_int) return signed_long;
pragma Import (C, sysconf, "sysconf");
function tcgetpgrp (a1 : signed_int) return sys.types.pid_t;
pragma Import (C, tcgetpgrp, "tcgetpgrp");
function tcsetpgrp (a1 : signed_int; a2 : sys.types.pid_t)
return signed_int;
pragma Import (C, tcsetpgrp, "tcsetpgrp");
function ttyname (a1 : signed_int) return char_ptr;
pragma Import (C, ttyname, "ttyname");
function ttyname_r (a1 : signed_int; a2 : access char; a3 : stddef.size_t)
return signed_int;
pragma Import (C, ttyname_r, "ttyname_r");
function unlink (a1 : access constant char) return signed_int;
pragma Import (C, unlink, "unlink");
function write (a1 : signed_int; a2 : void_const_ptr; a3 : stddef.size_t)
return sys.types.ssize_t;
pragma Import (C, write, "write");
function confstr (a1 : signed_int; a2 : access char; a3 : stddef.size_t)
return stddef.size_t;
pragma Import (C, confstr, "confstr");
function getopt (a1 : signed_int; a2 : access char_ptr;
a3 : access constant char) return signed_int;
pragma Import (C, getopt, "getopt");
optarg : aliased char_ptr;
pragma Import (C, optarg, "optarg");
optind : aliased signed_int;
pragma Import (C, optind, "optind");
opterr : aliased signed_int;
pragma Import (C, opterr, "opterr");
optopt : aliased signed_int;
pragma Import (C, optopt, "optopt");
function fsync (a1 : signed_int) return signed_int;
pragma Import (C, fsync, "fsync");
function getlogin_r (a1 : access char; a2 : signed_int) return signed_int;
pragma Import (C, getlogin_r, "getlogin_r");
function fchown (a1 : signed_int; a2 : sys.types.uid_t;
a3 : sys.types.gid_t) return signed_int;
pragma Import (C, fchown, "fchown");
function readlink (a1 : access constant char; a2 : access char;
a3 : stddef.size_t) return sys.types.ssize_t;
pragma Import (C, readlink, "readlink");
function gethostname (a1 : access char; a2 : stddef.size_t)
return signed_int;
pragma Import (C, gethostname, "gethostname");
function setegid (a1 : sys.types.gid_t) return signed_int;
pragma Import (C, setegid, "setegid");
function seteuid (a1 : sys.types.uid_t) return signed_int;
pragma Import (C, seteuid, "seteuid");
function getsid (pid : sys.types.pid_t) return signed_int;
pragma Import (C, getsid, "getsid");
function fchdir (a1 : signed_int) return signed_int;
pragma Import (C, fchdir, "fchdir");
function getpgid (pid : sys.types.pid_t) return signed_int;
pragma Import (C, getpgid, "getpgid");
function lchown (a1 : access constant char; a2 : sys.types.uid_t;
a3 : sys.types.gid_t) return signed_int;
pragma Import (C, lchown, "lchown");
function pread (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t;
a4 : sys.types.off_t) return sys.types.ssize_t;
pragma Import (C, pread, "pread");
function pwrite (a1 : signed_int; a2 : void_const_ptr; a3 : stddef.size_t;
a4 : sys.types.off_t) return sys.types.ssize_t;
pragma Import (C, pwrite, "pwrite");
function faccessat (a1 : signed_int; a2 : access constant char;
a3 : signed_int; a4 : signed_int) return signed_int;
pragma Import (C, faccessat, "faccessat");
function fchownat (a1 : signed_int; a2 : access constant char;
a3 : sys.types.uid_t; a4 : sys.types.gid_t; a5 : signed_int)
return signed_int;
pragma Import (C, fchownat, "fchownat");
function fexecve (a1 : signed_int; a2 : access char_ptr;
a3 : access char_ptr) return signed_int;
pragma Import (C, fexecve, "fexecve");
function linkat (a1 : signed_int; a2 : access constant char;
a3 : signed_int; a4 : access constant char; a5 : signed_int)
return signed_int;
pragma Import (C, linkat, "linkat");
function readlinkat (a1 : signed_int; a2 : access constant char;
a3 : access char; a4 : stddef.size_t) return sys.types.ssize_t;
pragma Import (C, readlinkat, "readlinkat");
function symlinkat (a1 : access constant char; a2 : signed_int;
a3 : access constant char) return signed_int;
pragma Import (C, symlinkat, "symlinkat");
function unlinkat (a1 : signed_int; a2 : access constant char;
a3 : signed_int) return signed_int;
pragma Import (C, unlinkat, "unlinkat");
function symlink (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, symlink, "symlink");
function crypt (a1 : access constant char; a2 : access constant char)
return char_ptr;
pragma Import (C, crypt, "crypt");
function encrypt (a1 : access char; a2 : signed_int) return signed_int;
pragma Import (C, encrypt, "encrypt");
function gethostid return signed_long;
pragma Import (C, gethostid, "gethostid");
function lockf (a1 : signed_int; a2 : signed_int; a3 : sys.types.off_t)
return signed_int;
pragma Import (C, lockf, "lockf");
function nice (a1 : signed_int) return signed_int;
pragma Import (C, nice, "nice");
function setpgrp (pid : sys.types.pid_t; pgrp : sys.types.pid_t)
return signed_int;
pragma Import (C, setpgrp, "setpgrp");
function setregid (a1 : sys.types.gid_t; a2 : sys.types.gid_t)
return signed_int;
pragma Import (C, setregid, "setregid");
function setreuid (a1 : sys.types.uid_t; a2 : sys.types.uid_t)
return signed_int;
pragma Import (C, setreuid, "setreuid");
procedure sync;
pragma Import (C, sync, "sync");
function brk (a1 : void_const_ptr) return signed_int;
pragma Import (C, brk, "brk");
function chroot (a1 : access constant char) return signed_int;
pragma Import (C, chroot, "chroot");
function getdtablesize return signed_int;
pragma Import (C, getdtablesize, "getdtablesize");
function getpagesize return signed_int;
pragma Import (C, getpagesize, "getpagesize");
function getpass (a1 : access constant char) return char_ptr;
pragma Import (C, getpass, "getpass");
function sbrk (a1 : stdint.intptr_t) return void_ptr;
pragma Import (C, sbrk, "sbrk");
function getwd (a1 : access char) return char_ptr;
pragma Import (C, getwd, "getwd");
function ualarm (a1 : sys.types.useconds_t; a2 : sys.types.useconds_t)
return sys.types.useconds_t;
pragma Import (C, ualarm, "ualarm");
function usleep (a1 : sys.types.useconds_t) return signed_int;
pragma Import (C, usleep, "usleep");
function vfork return sys.types.pid_t;
pragma Import (C, vfork, "vfork");
function acct (a1 : access constant char) return signed_int;
pragma Import (C, acct, "acct");
function async_daemon return signed_int;
pragma Import (C, async_daemon, "async_daemon");
function check_utility_compat (a1 : access constant char)
return signed_int;
pragma Import (C, check_utility_compat, "check_utility_compat");
function crypt_get_format return char_const_ptr;
pragma Import (C, crypt_get_format, "crypt_get_format");
function crypt_set_format (a1 : access constant char) return signed_int;
pragma Import (C, crypt_set_format, "crypt_set_format");
function des_cipher (a1 : access constant char; a2 : access char;
a3 : signed_long; a4 : signed_int) return signed_int;
pragma Import (C, des_cipher, "des_cipher");
function des_setkey (key : access constant char) return signed_int;
pragma Import (C, des_setkey, "des_setkey");
function eaccess (a1 : access constant char; a2 : signed_int)
return signed_int;
pragma Import (C, eaccess, "eaccess");
procedure endusershell;
pragma Import (C, endusershell, "endusershell");
function exect (a1 : access constant char; a2 : access char_ptr;
a3 : access char_ptr) return signed_int;
pragma Import (C, exect, "exect");
function execvP_U (a1 : access constant char; a2 : access constant char;
a3 : access char_ptr) return signed_int;
pragma Import (C, execvP_U, "execvP");
function feature_present (a1 : access constant char) return signed_int;
pragma Import (C, feature_present, "feature_present");
function fflagstostr (a1 : sys.types.u_long) return char_ptr;
pragma Import (C, fflagstostr, "fflagstostr");
function getdomainname (a1 : access char; a2 : signed_int)
return signed_int;
pragma Import (C, getdomainname, "getdomainname");
function getgrouplist (a1 : access constant char; a2 : sys.types.gid_t;
a3 : access sys.types.gid_t; a4 : access signed_int) return signed_int;
pragma Import (C, getgrouplist, "getgrouplist");
function getmode (a1 : void_const_ptr; a2 : sys.types.mode_t)
return sys.types.mode_t;
pragma Import (C, getmode, "getmode");
function getosreldate return signed_int;
pragma Import (C, getosreldate, "getosreldate");
function getpeereid (a1 : signed_int; a2 : access sys.types.uid_t;
a3 : access sys.types.gid_t) return signed_int;
pragma Import (C, getpeereid, "getpeereid");
function getresgid (a1 : access sys.types.gid_t;
a2 : access sys.types.gid_t; a3 : access sys.types.gid_t)
return signed_int;
pragma Import (C, getresgid, "getresgid");
function getresuid (a1 : access sys.types.uid_t;
a2 : access sys.types.uid_t; a3 : access sys.types.uid_t)
return signed_int;
pragma Import (C, getresuid, "getresuid");
function getusershell return char_ptr;
pragma Import (C, getusershell, "getusershell");
function initgroups (a1 : access constant char; a2 : sys.types.gid_t)
return signed_int;
pragma Import (C, initgroups, "initgroups");
function iruserok (a1 : unsigned_long; a2 : signed_int;
a3 : access constant char; a4 : access constant char)
return signed_int;
pragma Import (C, iruserok, "iruserok");
function iruserok_sa (a1 : void_const_ptr; a2 : signed_int;
a3 : signed_int; a4 : access constant char; a5 : access constant char)
return signed_int;
pragma Import (C, iruserok_sa, "iruserok_sa");
function issetugid return signed_int;
pragma Import (C, issetugid, "issetugid");
procedure FreeBSD_libc_enter_restricted_mode;
pragma Import (C, FreeBSD_libc_enter_restricted_mode,
"__FreeBSD_libc_enter_restricted_mode");
function lpathconf (a1 : access constant char; a2 : signed_int)
return signed_long;
pragma Import (C, lpathconf, "lpathconf");
function mkdtemp (a1 : access char) return char_ptr;
pragma Import (C, mkdtemp, "mkdtemp");
function mknod (a1 : access constant char; a2 : sys.types.mode_t;
a3 : sys.types.dev_t) return signed_int;
pragma Import (C, mknod, "mknod");
function mkstemp (a1 : access char) return signed_int;
pragma Import (C, mkstemp, "mkstemp");
function mkstemps (a1 : access char; a2 : signed_int) return signed_int;
pragma Import (C, mkstemps, "mkstemps");
function mktemp (a1 : access char) return char_ptr;
pragma Import (C, mktemp, "mktemp");
function nfssvc (a1 : signed_int; a2 : void_ptr) return signed_int;
pragma Import (C, nfssvc, "nfssvc");
function profil (a1 : access char; a2 : stddef.size_t;
a3 : sys.types.vm_offset_t; a4 : signed_int) return signed_int;
pragma Import (C, profil, "profil");
function rcmd (a1 : access char_ptr; a2 : signed_int;
a3 : access constant char; a4 : access constant char;
a5 : access constant char; a6 : access signed_int) return signed_int;
pragma Import (C, rcmd, "rcmd");
function rcmd_af (a1 : access char_ptr; a2 : signed_int;
a3 : access constant char; a4 : access constant char;
a5 : access constant char; a6 : access signed_int; a7 : signed_int)
return signed_int;
pragma Import (C, rcmd_af, "rcmd_af");
function rcmdsh (a1 : access char_ptr; a2 : signed_int;
a3 : access constant char; a4 : access constant char;
a5 : access constant char; a6 : access constant char)
return signed_int;
pragma Import (C, rcmdsh, "rcmdsh");
function re_comp (a1 : access constant char) return char_ptr;
pragma Import (C, re_comp, "re_comp");
function re_exec (a1 : access constant char) return signed_int;
pragma Import (C, re_exec, "re_exec");
function reboot (a1 : signed_int) return signed_int;
pragma Import (C, reboot, "reboot");
function revoke (a1 : access constant char) return signed_int;
pragma Import (C, revoke, "revoke");
function rfork (a1 : signed_int) return sys.types.pid_t;
pragma Import (C, rfork, "rfork");
type access_876c2962 is access function (a1 : void_ptr) return signed_int;
pragma Convention (C, access_876c2962);
function rfork_thread (a1 : signed_int; a2 : void_ptr;
a3 : access_876c2962; a4 : void_ptr) return sys.types.pid_t;
pragma Import (C, rfork_thread, "rfork_thread");
function rresvport (a1 : access signed_int) return signed_int;
pragma Import (C, rresvport, "rresvport");
function rresvport_af (a1 : access signed_int; a2 : signed_int)
return signed_int;
pragma Import (C, rresvport_af, "rresvport_af");
function ruserok (a1 : access constant char; a2 : signed_int;
a3 : access constant char; a4 : access constant char)
return signed_int;
pragma Import (C, ruserok, "ruserok");
function setdomainname (a1 : access constant char; a2 : signed_int)
return signed_int;
pragma Import (C, setdomainname, "setdomainname");
function setgroups (a1 : signed_int; a2 : access constant sys.types.gid_t)
return signed_int;
pragma Import (C, setgroups, "setgroups");
procedure sethostid (a1 : signed_long);
pragma Import (C, sethostid, "sethostid");
function sethostname (a1 : access constant char; a2 : signed_int)
return signed_int;
pragma Import (C, sethostname, "sethostname");
function setkey (a1 : access constant char) return signed_int;
pragma Import (C, setkey, "setkey");
function setlogin (a1 : access constant char) return signed_int;
pragma Import (C, setlogin, "setlogin");
function setmode (a1 : access constant char) return void_ptr;
pragma Import (C, setmode, "setmode");
procedure setproctitle (fmt : access constant char);
pragma Import (C, setproctitle, "setproctitle");
function setresgid (a1 : sys.types.gid_t; a2 : sys.types.gid_t;
a3 : sys.types.gid_t) return signed_int;
pragma Import (C, setresgid, "setresgid");
function setresuid (a1 : sys.types.uid_t; a2 : sys.types.uid_t;
a3 : sys.types.uid_t) return signed_int;
pragma Import (C, setresuid, "setresuid");
function setrgid (a1 : sys.types.gid_t) return signed_int;
pragma Import (C, setrgid, "setrgid");
function setruid (a1 : sys.types.uid_t) return signed_int;
pragma Import (C, setruid, "setruid");
procedure setusershell;
pragma Import (C, setusershell, "setusershell");
function strtofflags (a1 : access char_ptr; a2 : access sys.types.u_long;
a3 : access sys.types.u_long) return signed_int;
pragma Import (C, strtofflags, "strtofflags");
function swapon (a1 : access constant char) return signed_int;
pragma Import (C, swapon, "swapon");
function swapoff (a1 : access constant char) return signed_int;
pragma Import (C, swapoff, "swapoff");
function syscall (a1 : signed_int) return signed_int;
function syscall (a1 : signed_int; a2 : void_ptr; a3 : unsigned_int)
return signed_int;
pragma Import (C, syscall, "syscall");
function qqsyscall (a1 : sys.types.quad_t) return sys.types.off_t;
pragma Import (C, qqsyscall, "__syscall");
function ttyslot return signed_int;
pragma Import (C, ttyslot, "ttyslot");
function undelete (a1 : access constant char) return signed_int;
pragma Import (C, undelete, "undelete");
function unwhiteout (a1 : access constant char) return signed_int;
pragma Import (C, unwhiteout, "unwhiteout");
function valloc (a1 : stddef.size_t) return void_ptr;
pragma Import (C, valloc, "valloc");
optreset : aliased signed_int;
pragma Import (C, optreset, "optreset");
F_LOCK : constant := 1;
F_TEST : constant := 3;
F_TLOCK : constant := 2;
F_ULOCK : constant := 0;
STDERR_FILENO : constant := 2;
STDIN_FILENO : constant := 0;
STDOUT_FILENO : constant := 1;
CS_PATH : constant := 1;
CS_POSIX_V6_ILP32_OFF32_CFLAGS : constant := 2;
CS_POSIX_V6_ILP32_OFF32_LDFLAGS : constant := 3;
CS_POSIX_V6_ILP32_OFF32_LIBS : constant := 4;
CS_POSIX_V6_ILP32_OFFBIG_CFLAGS : constant := 5;
CS_POSIX_V6_ILP32_OFFBIG_LDFLAGS : constant := 6;
CS_POSIX_V6_ILP32_OFFBIG_LIBS : constant := 7;
CS_POSIX_V6_LP64_OFF64_CFLAGS : constant := 8;
CS_POSIX_V6_LP64_OFF64_LDFLAGS : constant := 9;
CS_POSIX_V6_LP64_OFF64_LIBS : constant := 10;
CS_POSIX_V6_LPBIG_OFFBIG_CFLAGS : constant := 11;
CS_POSIX_V6_LPBIG_OFFBIG_LDFLAGS : constant := 12;
CS_POSIX_V6_LPBIG_OFFBIG_LIBS : constant := 13;
CS_POSIX_V6_WIDTH_RESTRICTED_ENVS : constant := 14;
-- _GETOPT_DECLARED (empty)
-- _MKDTEMP_DECLARED (empty)
-- _MKNOD_DECLARED (empty)
-- _MKSTEMP_DECLARED (empty)
-- _MKTEMP_DECLARED (empty)
-- _OPTRESET_DECLARED (empty)
POSIX2_CHAR_TERM : constant := 1;
POSIX2_C_BIND : constant := 200112;
POSIX2_C_DEV : constant := -1;
POSIX2_FORT_DEV : constant := -1;
POSIX2_FORT_RUN : constant := 200112;
POSIX2_LOCALEDEF : constant := -1;
POSIX2_PBS : constant := -1;
POSIX2_PBS_ACCOUNTING : constant := -1;
POSIX2_PBS_CHECKPOINT : constant := -1;
POSIX2_PBS_LOCATE : constant := -1;
POSIX2_PBS_MESSAGE : constant := -1;
POSIX2_PBS_TRACK : constant := -1;
POSIX2_SW_DEV : constant := -1;
POSIX2_UPE : constant := 200112;
POSIX2_VERSION : constant := 199212;
POSIX_BARRIERS : constant := 200112;
POSIX_READER_WRITER_LOCKS : constant := 200112;
POSIX_REGEXP : constant := 1;
POSIX_SHELL : constant := 1;
POSIX_SPAWN : constant := 200112;
POSIX_SPIN_LOCKS : constant := 200112;
POSIX_THREADS : constant := 200112;
POSIX_THREAD_ATTR_STACKADDR : constant := 200112;
POSIX_THREAD_ATTR_STACKSIZE : constant := 200112;
POSIX_THREAD_CPUTIME : constant := 200112;
POSIX_THREAD_PRIORITY_SCHEDULING : constant := 200112;
POSIX_THREAD_PRIO_INHERIT : constant := 200112;
POSIX_THREAD_PRIO_PROTECT : constant := 200112;
POSIX_THREAD_PROCESS_SHARED : constant := -1;
POSIX_THREAD_SAFE_FUNCTIONS : constant := -1;
POSIX_THREAD_SPORADIC_SERVER : constant := -1;
POSIX_TRACE : constant := -1;
POSIX_TRACE_EVENT_FILTER : constant := -1;
POSIX_TRACE_INHERIT : constant := -1;
POSIX_TRACE_LOG : constant := -1;
SC_2_CHAR_TERM : constant := 20;
SC_2_C_BIND : constant := 18;
SC_2_C_DEV : constant := 19;
SC_2_FORT_DEV : constant := 21;
SC_2_FORT_RUN : constant := 22;
SC_2_LOCALEDEF : constant := 23;
SC_2_PBS : constant := 59;
SC_2_PBS_ACCOUNTING : constant := 60;
SC_2_PBS_CHECKPOINT : constant := 61;
SC_2_PBS_LOCATE : constant := 62;
SC_2_PBS_MESSAGE : constant := 63;
SC_2_PBS_TRACK : constant := 64;
SC_2_SW_DEV : constant := 24;
SC_2_UPE : constant := 25;
SC_2_VERSION : constant := 17;
SC_ADVISORY_INFO : constant := 65;
SC_AIO_LISTIO_MAX : constant := 42;
SC_AIO_MAX : constant := 43;
SC_AIO_PRIO_DELTA_MAX : constant := 44;
SC_ARG_MAX : constant := 1;
SC_ASYNCHRONOUS_IO : constant := 28;
SC_ATEXIT_MAX : constant := 107;
SC_BARRIERS : constant := 66;
SC_BC_BASE_MAX : constant := 9;
SC_BC_DIM_MAX : constant := 10;
SC_BC_SCALE_MAX : constant := 11;
SC_BC_STRING_MAX : constant := 12;
SC_CHILD_MAX : constant := 2;
SC_CLK_TCK : constant := 3;
SC_CLOCK_SELECTION : constant := 67;
SC_COLL_WEIGHTS_MAX : constant := 13;
SC_CPUTIME : constant := 68;
SC_DELAYTIMER_MAX : constant := 45;
SC_EXPR_NEST_MAX : constant := 14;
SC_FILE_LOCKING : constant := 69;
SC_FSYNC : constant := 38;
SC_GETGR_R_SIZE_MAX : constant := 70;
SC_GETPW_R_SIZE_MAX : constant := 71;
SC_HOST_NAME_MAX : constant := 72;
SC_IOV_MAX : constant := 56;
SC_IPV6 : constant := 118;
SC_JOB_CONTROL : constant := 6;
SC_LINE_MAX : constant := 15;
SC_LOGIN_NAME_MAX : constant := 73;
SC_MAPPED_FILES : constant := 29;
SC_MEMLOCK : constant := 30;
SC_MEMLOCK_RANGE : constant := 31;
SC_MEMORY_PROTECTION : constant := 32;
SC_MESSAGE_PASSING : constant := 33;
SC_MONOTONIC_CLOCK : constant := 74;
SC_MQ_OPEN_MAX : constant := 46;
SC_MQ_PRIO_MAX : constant := 75;
SC_NGROUPS_MAX : constant := 4;
SC_NPROCESSORS_CONF : constant := 57;
SC_NPROCESSORS_ONLN : constant := 58;
SC_OPEN_MAX : constant := 5;
SC_PAGESIZE : constant := 47;
SC_PAGE_SIZE : constant := 47;
SC_PHYS_PAGES : constant := 121;
SC_PRIORITIZED_IO : constant := 34;
SC_PRIORITY_SCHEDULING : constant := 35;
SC_RAW_SOCKETS : constant := 119;
SC_READER_WRITER_LOCKS : constant := 76;
SC_REALTIME_SIGNALS : constant := 36;
SC_REGEXP : constant := 77;
SC_RE_DUP_MAX : constant := 16;
SC_RTSIG_MAX : constant := 48;
SC_SAVED_IDS : constant := 7;
SC_SEMAPHORES : constant := 37;
SC_SEM_NSEMS_MAX : constant := 49;
SC_SEM_VALUE_MAX : constant := 50;
SC_SHARED_MEMORY_OBJECTS : constant := 39;
SC_SHELL : constant := 78;
SC_SIGQUEUE_MAX : constant := 51;
SC_SPAWN : constant := 79;
SC_SPIN_LOCKS : constant := 80;
SC_SPORADIC_SERVER : constant := 81;
SC_STREAM_MAX : constant := 26;
SC_SYMLOOP_MAX : constant := 120;
SC_SYNCHRONIZED_IO : constant := 40;
SC_THREADS : constant := 96;
SC_THREAD_ATTR_STACKADDR : constant := 82;
SC_THREAD_ATTR_STACKSIZE : constant := 83;
SC_THREAD_CPUTIME : constant := 84;
SC_THREAD_DESTRUCTOR_ITERATIONS : constant := 85;
SC_THREAD_KEYS_MAX : constant := 86;
SC_THREAD_PRIORITY_SCHEDULING : constant := 89;
SC_THREAD_PRIO_INHERIT : constant := 87;
SC_THREAD_PRIO_PROTECT : constant := 88;
SC_THREAD_PROCESS_SHARED : constant := 90;
SC_THREAD_SAFE_FUNCTIONS : constant := 91;
SC_THREAD_SPORADIC_SERVER : constant := 92;
SC_THREAD_STACK_MIN : constant := 93;
SC_THREAD_THREADS_MAX : constant := 94;
SC_TIMEOUTS : constant := 95;
SC_TIMERS : constant := 41;
SC_TIMER_MAX : constant := 52;
SC_TRACE : constant := 97;
SC_TRACE_EVENT_FILTER : constant := 98;
SC_TRACE_INHERIT : constant := 99;
SC_TRACE_LOG : constant := 100;
SC_TTY_NAME_MAX : constant := 101;
SC_TYPED_MEMORY_OBJECTS : constant := 102;
SC_TZNAME_MAX : constant := 27;
SC_V6_ILP32_OFF32 : constant := 103;
SC_V6_ILP32_OFFBIG : constant := 104;
SC_V6_LP64_OFF64 : constant := 105;
SC_V6_LPBIG_OFFBIG : constant := 106;
SC_VERSION : constant := 8;
SC_XOPEN_CRYPT : constant := 108;
SC_XOPEN_ENH_I18N : constant := 109;
SC_XOPEN_LEGACY : constant := 110;
SC_XOPEN_REALTIME : constant := 111;
SC_XOPEN_REALTIME_THREADS : constant := 112;
SC_XOPEN_SHM : constant := 113;
SC_XOPEN_STREAMS : constant := 114;
SC_XOPEN_UNIX : constant := 115;
SC_XOPEN_VERSION : constant := 116;
SC_XOPEN_XCU_VERSION : constant := 117;
-- _SETKEY_DECLARED (empty)
-- _UNISTD_H_ (empty)
V6_ILP32_OFF32 : constant := -1;
V6_ILP32_OFFBIG : constant := 0;
V6_LP64_OFF64 : constant := 0;
V6_LPBIG_OFFBIG : constant := -1;
XOPEN_CRYPT : constant := -1;
XOPEN_ENH_I18N : constant := -1;
XOPEN_LEGACY : constant := -1;
XOPEN_REALTIME : constant := -1;
XOPEN_REALTIME_THREADS : constant := -1;
XOPEN_UNIX : constant := -1;
end C.unistd;
Raw
c-unwind.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
package C.unwind is
pragma Preelaborate;
subtype Unwind_Word is unsigned_int;
subtype Unwind_Sword is signed_int;
subtype Unwind_Ptr is unsigned_int;
subtype Unwind_Internal_Ptr is unsigned_int;
subtype Unwind_Exception_Class is unsigned_long_long;
type enum_8fc42e7b is (URC_NO_REASON, URC_FOREIGN_EXCEPTION_CAUGHT,
URC_FATAL_PHASE2_ERROR, URC_FATAL_PHASE1_ERROR, URC_NORMAL_STOP,
URC_END_OF_STACK, URC_HANDLER_FOUND, URC_INSTALL_CONTEXT,
URC_CONTINUE_UNWIND);
for enum_8fc42e7b use (URC_NO_REASON => 0,
URC_FOREIGN_EXCEPTION_CAUGHT => 1, URC_FATAL_PHASE2_ERROR => 2,
URC_FATAL_PHASE1_ERROR => 3, URC_NORMAL_STOP => 4,
URC_END_OF_STACK => 5, URC_HANDLER_FOUND => 6,
URC_INSTALL_CONTEXT => 7, URC_CONTINUE_UNWIND => 8);
pragma Convention (C, enum_8fc42e7b);
subtype Unwind_Reason_Code is enum_8fc42e7b;
type struct_Unwind_Exception;
type struct_Unwind_Exception_ptr is access all struct_Unwind_Exception;
for struct_Unwind_Exception_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_Unwind_Exception_ptr);
pragma Convention (C, struct_Unwind_Exception_ptr);
type access_9eaa3f11 is access procedure (a1 : Unwind_Reason_Code;
a2 : access struct_Unwind_Exception);
pragma Convention (C, access_9eaa3f11);
subtype Unwind_Exception_Cleanup_Fn is access_9eaa3f11;
type struct_Unwind_Exception is record
exception_class : aliased Unwind_Exception_Class;
exception_cleanup : aliased Unwind_Exception_Cleanup_Fn;
private_1 : aliased Unwind_Word;
private_2 : aliased Unwind_Word;
end record;
for struct_Unwind_Exception'Alignment use Standard'Maximum_Alignment;
pragma Convention (C_Pass_By_Copy, struct_Unwind_Exception);
subtype Unwind_Action is signed_int;
type struct_Unwind_Context (<>) is limited private;
type struct_Unwind_Context_ptr is access all struct_Unwind_Context;
for struct_Unwind_Context_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_Unwind_Context_ptr);
pragma Convention (C, struct_Unwind_Context_ptr);
function Unwind_RaiseException (a1 : access struct_Unwind_Exception)
return Unwind_Reason_Code;
pragma Import (C, Unwind_RaiseException, "_Unwind_RaiseException");
type access_8e744ec7 is access function (a1 : signed_int;
a2 : Unwind_Action; a3 : Unwind_Exception_Class;
a4 : access struct_Unwind_Exception; a5 : access struct_Unwind_Context;
a6 : void_ptr) return Unwind_Reason_Code;
pragma Convention (C, access_8e744ec7);
subtype Unwind_Stop_Fn is access_8e744ec7;
function Unwind_ForcedUnwind (a1 : access struct_Unwind_Exception;
a2 : Unwind_Stop_Fn; a3 : void_ptr) return Unwind_Reason_Code;
pragma Import (C, Unwind_ForcedUnwind, "_Unwind_ForcedUnwind");
procedure Unwind_DeleteException (a1 : access struct_Unwind_Exception);
pragma Import (C, Unwind_DeleteException, "_Unwind_DeleteException");
procedure Unwind_Resume (a1 : access struct_Unwind_Exception);
pragma Import (C, Unwind_Resume, "_Unwind_Resume");
function Unwind_Resume_or_Rethrow (a1 : access struct_Unwind_Exception)
return Unwind_Reason_Code;
pragma Import (C, Unwind_Resume_or_Rethrow, "_Unwind_Resume_or_Rethrow");
type access_dce9d91d is access function (
a1 : access struct_Unwind_Context; a2 : void_ptr)
return Unwind_Reason_Code;
pragma Convention (C, access_dce9d91d);
subtype Unwind_Trace_Fn is access_dce9d91d;
function Unwind_Backtrace (a1 : Unwind_Trace_Fn; a2 : void_ptr)
return Unwind_Reason_Code;
pragma Import (C, Unwind_Backtrace, "_Unwind_Backtrace");
function Unwind_GetGR (a1 : access struct_Unwind_Context; a2 : signed_int)
return Unwind_Word;
pragma Import (C, Unwind_GetGR, "_Unwind_GetGR");
procedure Unwind_SetGR (a1 : access struct_Unwind_Context;
a2 : signed_int; a3 : Unwind_Word);
pragma Import (C, Unwind_SetGR, "_Unwind_SetGR");
function Unwind_GetIP (a1 : access struct_Unwind_Context)
return Unwind_Ptr;
pragma Import (C, Unwind_GetIP, "_Unwind_GetIP");
function Unwind_GetIPInfo (a1 : access struct_Unwind_Context;
a2 : access signed_int) return Unwind_Ptr;
pragma Import (C, Unwind_GetIPInfo, "_Unwind_GetIPInfo");
procedure Unwind_SetIP (a1 : access struct_Unwind_Context;
a2 : Unwind_Ptr);
pragma Import (C, Unwind_SetIP, "_Unwind_SetIP");
function Unwind_GetCFA (a1 : access struct_Unwind_Context)
return Unwind_Word;
pragma Import (C, Unwind_GetCFA, "_Unwind_GetCFA");
function Unwind_GetLanguageSpecificData (
a1 : access struct_Unwind_Context) return void_ptr;
pragma Import (C, Unwind_GetLanguageSpecificData,
"_Unwind_GetLanguageSpecificData");
function Unwind_GetRegionStart (a1 : access struct_Unwind_Context)
return Unwind_Ptr;
pragma Import (C, Unwind_GetRegionStart, "_Unwind_GetRegionStart");
type access_7217db66 is access function (a1 : signed_int;
a2 : Unwind_Action; a3 : Unwind_Exception_Class;
a4 : access struct_Unwind_Exception; a5 : access struct_Unwind_Context)
return Unwind_Reason_Code;
pragma Convention (C, access_7217db66);
subtype Unwind_Personality_Fn is access_7217db66;
type struct_SjLj_Function_Context (<>) is limited private;
type struct_SjLj_Function_Context_ptr is
access all struct_SjLj_Function_Context;
for struct_SjLj_Function_Context_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_SjLj_Function_Context_ptr);
pragma Convention (C, struct_SjLj_Function_Context_ptr);
procedure Unwind_SjLj_Register (a1 : access struct_SjLj_Function_Context);
pragma Import (C, Unwind_SjLj_Register, "_Unwind_SjLj_Register");
procedure Unwind_SjLj_Unregister (
a1 : access struct_SjLj_Function_Context);
pragma Import (C, Unwind_SjLj_Unregister, "_Unwind_SjLj_Unregister");
function Unwind_SjLj_RaiseException (a1 : access struct_Unwind_Exception)
return Unwind_Reason_Code;
pragma Import (C, Unwind_SjLj_RaiseException,
"_Unwind_SjLj_RaiseException");
function Unwind_SjLj_ForcedUnwind (a1 : access struct_Unwind_Exception;
a2 : Unwind_Stop_Fn; a3 : void_ptr) return Unwind_Reason_Code;
pragma Import (C, Unwind_SjLj_ForcedUnwind, "_Unwind_SjLj_ForcedUnwind");
procedure Unwind_SjLj_Resume (a1 : access struct_Unwind_Exception);
pragma Import (C, Unwind_SjLj_Resume, "_Unwind_SjLj_Resume");
function Unwind_SjLj_Resume_or_Rethrow (
a1 : access struct_Unwind_Exception) return Unwind_Reason_Code;
pragma Import (C, Unwind_SjLj_Resume_or_Rethrow,
"_Unwind_SjLj_Resume_or_Rethrow");
function Unwind_GetDataRelBase (a1 : access struct_Unwind_Context)
return Unwind_Ptr;
pragma Import (C, Unwind_GetDataRelBase, "_Unwind_GetDataRelBase");
function Unwind_GetTextRelBase (a1 : access struct_Unwind_Context)
return Unwind_Ptr;
pragma Import (C, Unwind_GetTextRelBase, "_Unwind_GetTextRelBase");
function Unwind_FindEnclosingFunction (pc : void_ptr) return void_ptr;
pragma Import (C, Unwind_FindEnclosingFunction,
"_Unwind_FindEnclosingFunction");
subtype sleb128_t is signed_long;
subtype uleb128_t is unsigned_long;
-- LIBGCC2_UNWIND_ATTRIBUTE (empty)
UA_CLEANUP_PHASE : constant := 2;
UA_END_OF_STACK : constant := 16;
UA_FORCE_UNWIND : constant := 8;
UA_HANDLER_FRAME : constant := 4;
UA_SEARCH_PHASE : constant := 1;
-- _UNWIND_H (empty)
private
type struct_Unwind_Context is null record;
type struct_SjLj_Function_Context is null record;
end C.unwind;
Raw
c-wchar.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with C.machine.qtypes;
with C.stddef;
with C.stdio;
with C.sys.qtypes;
with C.time;
package C.wchar is
pragma Preelaborate;
subtype mbstate_t is sys.qtypes.mbstate_t;
subtype mbstate_t_ptr is sys.qtypes.mbstate_t_ptr;
subtype mbstate_t_const_ptr is sys.qtypes.mbstate_t_const_ptr;
subtype wint_t is sys.qtypes.wint_t;
function btowc (a1 : signed_int) return wint_t;
pragma Import (C, btowc, "btowc");
function fgetwc (a1 : access stdio.struct_sFILE) return wint_t;
pragma Import (C, fgetwc, "fgetwc");
function fgetws (a1 : access stddef.wchar_t; a2 : signed_int;
a3 : access stdio.struct_sFILE) return stddef.wchar_t_ptr;
pragma Import (C, fgetws, "fgetws");
function fputwc (a1 : stddef.wchar_t; a2 : access stdio.struct_sFILE)
return wint_t;
pragma Import (C, fputwc, "fputwc");
function fputws (a1 : access constant stddef.wchar_t;
a2 : access stdio.struct_sFILE) return signed_int;
pragma Import (C, fputws, "fputws");
function fwide (a1 : access stdio.struct_sFILE; a2 : signed_int)
return signed_int;
pragma Import (C, fwide, "fwide");
function fwprintf (a1 : access stdio.struct_sFILE;
a2 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, fwprintf, "fwprintf");
function fwscanf (a1 : access stdio.struct_sFILE;
a2 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, fwscanf, "fwscanf");
function getwc (a1 : access stdio.struct_sFILE) return wint_t;
pragma Import (C, getwc, "getwc");
function getwchar return wint_t;
pragma Import (C, getwchar, "getwchar");
function mbrlen (a1 : access constant char; a2 : stddef.size_t;
a3 : access mbstate_t) return stddef.size_t;
pragma Import (C, mbrlen, "mbrlen");
function mbrtowc (a1 : access stddef.wchar_t; a2 : access constant char;
a3 : stddef.size_t; a4 : access mbstate_t) return stddef.size_t;
pragma Import (C, mbrtowc, "mbrtowc");
function mbsinit (a1 : access constant mbstate_t) return signed_int;
pragma Import (C, mbsinit, "mbsinit");
function mbsrtowcs (a1 : access stddef.wchar_t;
a2 : access char_const_ptr; a3 : stddef.size_t; a4 : access mbstate_t)
return stddef.size_t;
pragma Import (C, mbsrtowcs, "mbsrtowcs");
function putwc (a1 : stddef.wchar_t; a2 : access stdio.struct_sFILE)
return wint_t;
pragma Import (C, putwc, "putwc");
function putwchar (a1 : stddef.wchar_t) return wint_t;
pragma Import (C, putwchar, "putwchar");
function swprintf (a1 : access stddef.wchar_t; n : stddef.size_t;
a3 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, swprintf, "swprintf");
function swscanf (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, swscanf, "swscanf");
function ungetwc (a1 : wint_t; a2 : access stdio.struct_sFILE)
return wint_t;
pragma Import (C, ungetwc, "ungetwc");
function vfwprintf (a1 : access stdio.struct_sFILE;
a2 : access constant stddef.wchar_t; a3 : machine.qtypes.va_list)
return signed_int;
pragma Import (C, vfwprintf, "vfwprintf");
function vswprintf (a1 : access stddef.wchar_t; n : stddef.size_t;
a3 : access constant stddef.wchar_t; a4 : machine.qtypes.va_list)
return signed_int;
pragma Import (C, vswprintf, "vswprintf");
function vwprintf (a1 : access constant stddef.wchar_t;
a2 : machine.qtypes.va_list) return signed_int;
pragma Import (C, vwprintf, "vwprintf");
function wcrtomb (a1 : access char; a2 : stddef.wchar_t;
a3 : access mbstate_t) return stddef.size_t;
pragma Import (C, wcrtomb, "wcrtomb");
function wcscat (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t) return stddef.wchar_t_ptr;
pragma Import (C, wcscat, "wcscat");
function wcschr (a1 : access constant stddef.wchar_t; a2 : stddef.wchar_t)
return stddef.wchar_t_ptr;
pragma Import (C, wcschr, "wcschr");
function wcscmp (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, wcscmp, "wcscmp");
function wcscoll (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, wcscoll, "wcscoll");
function wcscpy (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t) return stddef.wchar_t_ptr;
pragma Import (C, wcscpy, "wcscpy");
function wcscspn (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t) return stddef.size_t;
pragma Import (C, wcscspn, "wcscspn");
function wcsftime (a1 : access stddef.wchar_t; a2 : stddef.size_t;
a3 : access constant stddef.wchar_t;
a4 : access constant time.struct_tm) return stddef.size_t;
pragma Import (C, wcsftime, "wcsftime");
function wcslen (a1 : access constant stddef.wchar_t)
return stddef.size_t;
pragma Import (C, wcslen, "wcslen");
function wcsncat (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : stddef.size_t)
return stddef.wchar_t_ptr;
pragma Import (C, wcsncat, "wcsncat");
function wcsncmp (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : stddef.size_t)
return signed_int;
pragma Import (C, wcsncmp, "wcsncmp");
function wcsncpy (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : stddef.size_t)
return stddef.wchar_t_ptr;
pragma Import (C, wcsncpy, "wcsncpy");
function wcspbrk (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t) return stddef.wchar_t_ptr;
pragma Import (C, wcspbrk, "wcspbrk");
function wcsrchr (a1 : access constant stddef.wchar_t;
a2 : stddef.wchar_t) return stddef.wchar_t_ptr;
pragma Import (C, wcsrchr, "wcsrchr");
function wcsrtombs (a1 : access char;
a2 : access stddef.wchar_t_const_ptr; a3 : stddef.size_t;
a4 : access mbstate_t) return stddef.size_t;
pragma Import (C, wcsrtombs, "wcsrtombs");
function wcsspn (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t) return stddef.size_t;
pragma Import (C, wcsspn, "wcsspn");
function wcsstr (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t) return stddef.wchar_t_ptr;
pragma Import (C, wcsstr, "wcsstr");
function wcsxfrm (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : stddef.size_t)
return stddef.size_t;
pragma Import (C, wcsxfrm, "wcsxfrm");
function wctob (a1 : wint_t) return signed_int;
pragma Import (C, wctob, "wctob");
function wcstod (a1 : access constant stddef.wchar_t;
a2 : access stddef.wchar_t_ptr) return double;
pragma Import (C, wcstod, "wcstod");
function wcstok (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : access stddef.wchar_t_ptr)
return stddef.wchar_t_ptr;
pragma Import (C, wcstok, "wcstok");
function wcstol (a1 : access constant stddef.wchar_t;
a2 : access stddef.wchar_t_ptr; a3 : signed_int) return signed_long;
pragma Import (C, wcstol, "wcstol");
function wcstoul (a1 : access constant stddef.wchar_t;
a2 : access stddef.wchar_t_ptr; a3 : signed_int) return unsigned_long;
pragma Import (C, wcstoul, "wcstoul");
function wmemchr (a1 : access constant stddef.wchar_t;
a2 : stddef.wchar_t; a3 : stddef.size_t) return stddef.wchar_t_ptr;
pragma Import (C, wmemchr, "wmemchr");
function wmemcmp (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : stddef.size_t)
return signed_int;
pragma Import (C, wmemcmp, "wmemcmp");
function wmemcpy (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : stddef.size_t)
return stddef.wchar_t_ptr;
pragma Import (C, wmemcpy, "wmemcpy");
function wmemmove (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : stddef.size_t)
return stddef.wchar_t_ptr;
pragma Import (C, wmemmove, "wmemmove");
function wmemset (a1 : access stddef.wchar_t; a2 : stddef.wchar_t;
a3 : stddef.size_t) return stddef.wchar_t_ptr;
pragma Import (C, wmemset, "wmemset");
function wprintf (a1 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, wprintf, "wprintf");
function wscanf (a1 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, wscanf, "wscanf");
function vfwscanf (a1 : access stdio.struct_sFILE;
a2 : access constant stddef.wchar_t; a3 : machine.qtypes.va_list)
return signed_int;
pragma Import (C, vfwscanf, "vfwscanf");
function vswscanf (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : machine.qtypes.va_list)
return signed_int;
pragma Import (C, vswscanf, "vswscanf");
function vwscanf (a1 : access constant stddef.wchar_t;
a2 : machine.qtypes.va_list) return signed_int;
pragma Import (C, vwscanf, "vwscanf");
function wcstof (a1 : access constant stddef.wchar_t;
a2 : access stddef.wchar_t_ptr) return float;
pragma Import (C, wcstof, "wcstof");
function wcstold (a1 : access constant stddef.wchar_t;
a2 : access stddef.wchar_t_ptr) return long_double;
pragma Import (C, wcstold, "wcstold");
function wcstoll (a1 : access constant stddef.wchar_t;
a2 : access stddef.wchar_t_ptr; a3 : signed_int)
return signed_long_long;
pragma Import (C, wcstoll, "wcstoll");
function wcstoull (a1 : access constant stddef.wchar_t;
a2 : access stddef.wchar_t_ptr; a3 : signed_int)
return unsigned_long_long;
pragma Import (C, wcstoull, "wcstoull");
function wcswidth (a1 : access constant stddef.wchar_t;
a2 : stddef.size_t) return signed_int;
pragma Import (C, wcswidth, "wcswidth");
function wcwidth (a1 : stddef.wchar_t) return signed_int;
pragma Import (C, wcwidth, "wcwidth");
function mbsnrtowcs (a1 : access stddef.wchar_t;
a2 : access char_const_ptr; a3 : stddef.size_t; a4 : stddef.size_t;
a5 : access mbstate_t) return stddef.size_t;
pragma Import (C, mbsnrtowcs, "mbsnrtowcs");
function wcpcpy (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t) return stddef.wchar_t_ptr;
pragma Import (C, wcpcpy, "wcpcpy");
function wcpncpy (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : stddef.size_t)
return stddef.wchar_t_ptr;
pragma Import (C, wcpncpy, "wcpncpy");
function wcsdup (a1 : access constant stddef.wchar_t)
return stddef.wchar_t_ptr;
pragma Import (C, wcsdup, "wcsdup");
function wcscasecmp (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, wcscasecmp, "wcscasecmp");
function wcsncasecmp (a1 : access constant stddef.wchar_t;
a2 : access constant stddef.wchar_t; n : stddef.size_t)
return signed_int;
pragma Import (C, wcsncasecmp, "wcsncasecmp");
function wcsnlen (a1 : access constant stddef.wchar_t; a2 : stddef.size_t)
return stddef.size_t;
pragma Import (C, wcsnlen, "wcsnlen");
function wcsnrtombs (a1 : access char;
a2 : access stddef.wchar_t_const_ptr; a3 : stddef.size_t;
a4 : stddef.size_t; a5 : access mbstate_t) return stddef.size_t;
pragma Import (C, wcsnrtombs, "wcsnrtombs");
function fgetwln (a1 : access stdio.struct_sFILE;
a2 : access stddef.size_t) return stddef.wchar_t_ptr;
pragma Import (C, fgetwln, "fgetwln");
function wcslcat (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : stddef.size_t)
return stddef.size_t;
pragma Import (C, wcslcat, "wcslcat");
function wcslcpy (a1 : access stddef.wchar_t;
a2 : access constant stddef.wchar_t; a3 : stddef.size_t)
return stddef.size_t;
pragma Import (C, wcslcpy, "wcslcpy");
WEOF : constant := -1;
-- _MBSTATE_T_DECLARED (empty)
-- _WCHAR_H_ (empty)
-- _WINT_T_DECLARED (empty)
REQUIRE_wchar_t_array : constant wchar_t_array (0 .. 0) :=
(0 => wchar_t'Val (0));
end C.wchar;
Raw
c.ads
-- This file is translated by "headmaster" version 0.30-886eb78 (devel).
-- The original C header's license should be applied to this file.
-- All conditional-directives are expanded for the exclusive use of your
-- environment, it is not recommended to commit this file to any repository.
-------------------------------------------------------------------------------
with System;
package C is
pragma Preelaborate;
-- type void (<>) is limited private;
type bool is new Boolean;
pragma Convention (C, bool);
type signed_char is new Short_Short_Integer;
pragma Convention (C, signed_char);
type unsigned_char is mod 2 ** signed_char'Size;
pragma Convention (C, unsigned_char);
type signed_short is new Short_Integer;
pragma Convention (C, signed_short);
type unsigned_short is mod 2 ** signed_short'Size;
pragma Convention (C, unsigned_short);
type signed_int is new Integer;
pragma Convention (C, signed_int);
type unsigned_int is mod 2 ** signed_int'Size;
pragma Convention (C, unsigned_int);
type signed_long is new Long_Integer;
pragma Convention (C, signed_long);
type unsigned_long is mod 2 ** signed_long'Size;
pragma Convention (C, unsigned_long);
type signed_long_long is new Long_Long_Integer;
pragma Convention (C, signed_long_long);
type unsigned_long_long is mod 2 ** signed_long_long'Size;
pragma Convention (C, unsigned_long_long);
type float is new Standard.Float;
pragma Convention (C, float);
type double is new Long_Float;
pragma Convention (C, double);
type long_double is new Long_Long_Float;
pragma Convention (C, long_double);
-- type Float32 is ...
-- type Float64 is ...
-- type Float128 is ...
-- type Float32x is ...
-- type Float64x is ...
-- type Decimal32 is ...
-- type Decimal64 is ...
-- type Decimal128 is ...
type float_imaginary is new float;
pragma Convention (C, float_imaginary);
type double_imaginary is new double;
pragma Convention (C, double_imaginary);
type long_double_imaginary is new long_double;
pragma Convention (C, long_double_imaginary);
-- type Float32_imaginary is ...
-- type Float32x_imaginary is ...
-- type Float64_imaginary is ...
-- type Float64x_imaginary is ...
-- type Float128_imaginary is ...
type float_complex is record
Re, Im : float'Base;
end record;
pragma Complex_Representation (float_complex);
pragma Convention (C, float_complex);
type double_complex is record
Re, Im : double'Base;
end record;
pragma Complex_Representation (double_complex);
pragma Convention (C, double_complex);
type long_double_complex is record
Re, Im : long_double'Base;
end record;
pragma Complex_Representation (long_double_complex);
pragma Convention (C, long_double_complex);
-- type Float32_complex is ...
-- type Float32x_complex is ...
-- type Float64_complex is ...
-- type Float64x_complex is ...
-- type Float128_complex is ...
type char is new Character;
type int128_t is record
Lo, Hi : unsigned_long_long;
end record;
pragma Convention (C_Pass_By_Copy, int128_t);
type uint128_t is record
Lo, Hi : unsigned_long_long;
end record;
pragma Convention (C_Pass_By_Copy, uint128_t);
subtype builtin_va_list is System.Address;
type ptrdiff_t is new signed_int;
type size_t is new unsigned_int;
type wchar_t is new signed_int;
subtype void_ptr is System.Address;
type void_ptr_ptr is access all void_ptr;
for void_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (void_ptr_ptr);
pragma Convention (C, void_ptr_ptr);
type void_ptr_array is array (size_t range <>) of aliased void_ptr;
pragma Convention (C, void_ptr_array);
subtype void_const_ptr is System.Address;
-- type void_volatile is new void;
subtype void_volatile_const_ptr is System.Address;
subtype void_volatile_ptr is System.Address;
type unsigned_char_ptr is access all unsigned_char;
for unsigned_char_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (unsigned_char_ptr);
pragma Convention (C, unsigned_char_ptr);
type unsigned_char_const_ptr is access constant unsigned_char;
for unsigned_char_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (unsigned_char_const_ptr);
pragma Convention (C, unsigned_char_const_ptr);
type unsigned_char_const_ptr_ptr is access all unsigned_char_const_ptr;
for unsigned_char_const_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (unsigned_char_const_ptr_ptr);
pragma Convention (C, unsigned_char_const_ptr_ptr);
type unsigned_char_array is array (size_t range <>) of
aliased unsigned_char;
pragma Convention (C, unsigned_char_array);
type unsigned_char_ptr_ptr is access all unsigned_char_ptr;
for unsigned_char_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (unsigned_char_ptr_ptr);
pragma Convention (C, unsigned_char_ptr_ptr);
type signed_short_ptr is access all signed_short;
for signed_short_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (signed_short_ptr);
pragma Convention (C, signed_short_ptr);
type unsigned_short_array is array (size_t range <>) of
aliased unsigned_short;
pragma Convention (C, unsigned_short_array);
type unsigned_short_ptr is access all unsigned_short;
for unsigned_short_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (unsigned_short_ptr);
pragma Convention (C, unsigned_short_ptr);
type signed_int_ptr is access all signed_int;
for signed_int_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (signed_int_ptr);
pragma Convention (C, signed_int_ptr);
type signed_int_array is array (size_t range <>) of aliased signed_int;
pragma Convention (C, signed_int_array);
type signed_int_const_ptr is access constant signed_int;
for signed_int_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (signed_int_const_ptr);
pragma Convention (C, signed_int_const_ptr);
type signed_int_ptr_ptr is access all signed_int_ptr;
for signed_int_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (signed_int_ptr_ptr);
pragma Convention (C, signed_int_ptr_ptr);
type signed_int_const_ptr_ptr is access all signed_int_const_ptr;
for signed_int_const_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (signed_int_const_ptr_ptr);
pragma Convention (C, signed_int_const_ptr_ptr);
type unsigned_int_array is array (size_t range <>) of
aliased unsigned_int;
pragma Convention (C, unsigned_int_array);
type unsigned_int_ptr is access all unsigned_int;
for unsigned_int_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (unsigned_int_ptr);
pragma Convention (C, unsigned_int_ptr);
type unsigned_int_const_ptr is access constant unsigned_int;
for unsigned_int_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (unsigned_int_const_ptr);
pragma Convention (C, unsigned_int_const_ptr);
type signed_long_array is array (size_t range <>) of aliased signed_long;
pragma Convention (C, signed_long_array);
type signed_long_ptr is access all signed_long;
for signed_long_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (signed_long_ptr);
pragma Convention (C, signed_long_ptr);
type unsigned_long_array is array (size_t range <>) of
aliased unsigned_long;
pragma Convention (C, unsigned_long_array);
type unsigned_long_ptr is access all unsigned_long;
for unsigned_long_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (unsigned_long_ptr);
pragma Convention (C, unsigned_long_ptr);
type signed_long_long_ptr is access all signed_long_long;
for signed_long_long_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (signed_long_long_ptr);
pragma Convention (C, signed_long_long_ptr);
type signed_long_long_const_ptr is access constant signed_long_long;
for signed_long_long_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (signed_long_long_const_ptr);
pragma Convention (C, signed_long_long_const_ptr);
type unsigned_long_long_array is array (size_t range <>) of
aliased unsigned_long_long;
pragma Convention (C, unsigned_long_long_array);
type double_array is array (size_t range <>) of aliased double;
pragma Convention (C, double_array);
type double_ptr is access all double;
for double_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (double_ptr);
pragma Convention (C, double_ptr);
type char_ptr is access all char;
for char_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (char_ptr);
pragma Convention (C, char_ptr);
type char_ptr_array is array (size_t range <>) of aliased char_ptr;
pragma Convention (C, char_ptr_array);
type char_ptr_ptr is access all char_ptr;
for char_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (char_ptr_ptr);
pragma Convention (C, char_ptr_ptr);
type char_const_ptr is access constant char;
for char_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (char_const_ptr);
pragma Convention (C, char_const_ptr);
type char_const_ptr_array is array (size_t range <>) of
aliased char_const_ptr;
pragma Convention (C, char_const_ptr_array);
type char_const_ptr_ptr is access all char_const_ptr;
for char_const_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (char_const_ptr_ptr);
pragma Convention (C, char_const_ptr_ptr);
type char_array is array (size_t range <>) of aliased char;
pragma Convention (C, char_array);
type char_volatile is new char;
pragma Volatile (char_volatile);
type char_volatile_ptr is access all char_volatile;
for char_volatile_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (char_volatile_ptr);
pragma Convention (C, char_volatile_ptr);
function "=" (Left, Right : System.Address) return Boolean
renames System."=";
type size_t_ptr is access all size_t;
for size_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (size_t_ptr);
pragma Convention (C, size_t_ptr);
type wchar_t_ptr is access all wchar_t;
for wchar_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (wchar_t_ptr);
pragma Convention (C, wchar_t_ptr);
type wchar_t_ptr_ptr is access all wchar_t_ptr;
for wchar_t_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (wchar_t_ptr_ptr);
pragma Convention (C, wchar_t_ptr_ptr);
type wchar_t_const_ptr is access constant wchar_t;
for wchar_t_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (wchar_t_const_ptr);
pragma Convention (C, wchar_t_const_ptr);
type wchar_t_const_ptr_ptr is access all wchar_t_const_ptr;
for wchar_t_const_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (wchar_t_const_ptr_ptr);
pragma Convention (C, wchar_t_const_ptr_ptr);
type wchar_t_array is array (size_t range <>) of aliased wchar_t;
pragma Convention (C, wchar_t_array);
function Shift_Left (Left : signed_char; Right : Natural)
return signed_char;
function Shift_Right_Arithmetic (Left : signed_char; Right : Natural)
return signed_char;
function Shift_Left (Left : unsigned_char; Right : Natural)
return unsigned_char;
function Shift_Right (Left : unsigned_char; Right : Natural)
return unsigned_char;
function Shift_Left (Left : signed_short; Right : Natural)
return signed_short;
function Shift_Right_Arithmetic (Left : signed_short; Right : Natural)
return signed_short;
function Shift_Left (Left : unsigned_short; Right : Natural)
return unsigned_short;
function Shift_Right (Left : unsigned_short; Right : Natural)
return unsigned_short;
function Shift_Left (Left : signed_int; Right : Natural)
return signed_int;
function Shift_Right_Arithmetic (Left : signed_int; Right : Natural)
return signed_int;
function Shift_Left (Left : unsigned_int; Right : Natural)
return unsigned_int;
function Shift_Right (Left : unsigned_int; Right : Natural)
return unsigned_int;
function Shift_Left (Left : signed_long; Right : Natural)
return signed_long;
function Shift_Right_Arithmetic (Left : signed_long; Right : Natural)
return signed_long;
function Shift_Left (Left : unsigned_long; Right : Natural)
return unsigned_long;
function Shift_Right (Left : unsigned_long; Right : Natural)
return unsigned_long;
function Shift_Left (Left : signed_long_long; Right : Natural)
return signed_long_long;
function Shift_Right_Arithmetic (Left : signed_long_long; Right : Natural)
return signed_long_long;
function Shift_Left (Left : unsigned_long_long; Right : Natural)
return unsigned_long_long;
function Shift_Right (Left : unsigned_long_long; Right : Natural)
return unsigned_long_long;
pragma Import (Intrinsic, Shift_Left);
pragma Import (Intrinsic, Shift_Right);
pragma Import (Intrinsic, Shift_Right_Arithmetic);
ATOMIC_ACQUIRE : constant := 2;
ATOMIC_ACQ_REL : constant := 4;
ATOMIC_CONSUME : constant := 1;
ATOMIC_HLE_ACQUIRE : constant := 65536;
ATOMIC_HLE_RELEASE : constant := 131072;
ATOMIC_RELAXED : constant := 0;
ATOMIC_RELEASE : constant := 3;
ATOMIC_SEQ_CST : constant := 5;
qqBIGGEST_ALIGNMENTqq : constant := 16;
qqBYTE_ORDERqq : constant := 1234;
subtype qqCHAR16_TYPEqq is unsigned_short;
subtype qqCHAR32_TYPEqq is unsigned_int;
qqCHAR_BITqq : constant := 8;
qqDBL_DECIMAL_DIGqq : constant := 17;
qqDBL_DENORM_MINqq : constant := 16#0.40000000000000#e-268;
qqDBL_DIGqq : constant := 15;
qqDBL_EPSILONqq : constant := 16#0.10000000000000#e-12;
qqDBL_HAS_DENORMqq : constant := 1;
qqDBL_HAS_INFINITYqq : constant := 1;
qqDBL_HAS_QUIET_NANqq : constant := 1;
qqDBL_MANT_DIGqq : constant := 53;
qqDBL_MAX_10_EXPqq : constant := 308;
qqDBL_MAX_EXPqq : constant := 1024;
qqDBL_MAXqq : constant := 16#0.fffffffffffff8#e+256;
qqDBL_MIN_10_EXPqq : constant := -307;
qqDBL_MIN_EXPqq : constant := -1021;
qqDBL_MINqq : constant := 16#0.40000000000000#e-255;
-- qqDEC128_EPSILONqq (decimal)
qqDEC128_MANT_DIGqq : constant := 34;
qqDEC128_MAX_EXPqq : constant := 6145;
-- qqDEC128_MAXqq (decimal)
qqDEC128_MIN_EXPqq : constant := -6142;
-- qqDEC128_MINqq (decimal)
-- qqDEC128_SUBNORMAL_MINqq (decimal)
-- qqDEC32_EPSILONqq (decimal)
qqDEC32_MANT_DIGqq : constant := 7;
qqDEC32_MAX_EXPqq : constant := 97;
-- qqDEC32_MAXqq (decimal)
qqDEC32_MIN_EXPqq : constant := -94;
-- qqDEC32_MINqq (decimal)
-- qqDEC32_SUBNORMAL_MINqq (decimal)
-- qqDEC64_EPSILONqq (decimal)
qqDEC64_MANT_DIGqq : constant := 16;
qqDEC64_MAX_EXPqq : constant := 385;
-- qqDEC64_MAXqq (decimal)
qqDEC64_MIN_EXPqq : constant := -382;
-- qqDEC64_MINqq (decimal)
-- qqDEC64_SUBNORMAL_MINqq (decimal)
qqDECIMAL_DIGqq : constant := 17;
qqDEC_EVAL_METHODqq : constant := 2;
qqELFqq : constant := 1;
qqFINITE_MATH_ONLYqq : constant := 0;
qqFLOAT_WORD_ORDERqq : constant := 1234;
qqFLT128_DECIMAL_DIGqq : constant := 36;
-- qqFLT128_DENORM_MINqq (_Float128)
qqFLT128_DIGqq : constant := 33;
-- qqFLT128_EPSILONqq (_Float128)
qqFLT128_HAS_DENORMqq : constant := 1;
qqFLT128_HAS_INFINITYqq : constant := 1;
qqFLT128_HAS_QUIET_NANqq : constant := 1;
qqFLT128_MANT_DIGqq : constant := 113;
qqFLT128_MAX_10_EXPqq : constant := 4932;
qqFLT128_MAX_EXPqq : constant := 16384;
-- qqFLT128_MAXqq (_Float128)
qqFLT128_MIN_10_EXPqq : constant := -4931;
qqFLT128_MIN_EXPqq : constant := -16381;
-- qqFLT128_MINqq (_Float128)
qqFLT32X_DECIMAL_DIGqq : constant := 17;
qqFLT32X_DENORM_MINqq : constant := 16#0.40000000000000#e-268;
qqFLT32X_DIGqq : constant := 15;
qqFLT32X_EPSILONqq : constant := 16#0.10000000000000#e-12;
qqFLT32X_HAS_DENORMqq : constant := 1;
qqFLT32X_HAS_INFINITYqq : constant := 1;
qqFLT32X_HAS_QUIET_NANqq : constant := 1;
qqFLT32X_MANT_DIGqq : constant := 53;
qqFLT32X_MAX_10_EXPqq : constant := 308;
qqFLT32X_MAX_EXPqq : constant := 1024;
qqFLT32X_MAXqq : constant := 16#0.fffffffffffff8#e+256;
qqFLT32X_MIN_10_EXPqq : constant := -307;
qqFLT32X_MIN_EXPqq : constant := -1021;
qqFLT32X_MINqq : constant := 16#0.40000000000000#e-255;
qqFLT32_DECIMAL_DIGqq : constant := 9;
qqFLT32_DENORM_MINqq : constant := 16#0.80000000000000#e-37;
qqFLT32_DIGqq : constant := 6;
qqFLT32_EPSILONqq : constant := 16#0.20000000000000#e-5;
qqFLT32_HAS_DENORMqq : constant := 1;
qqFLT32_HAS_INFINITYqq : constant := 1;
qqFLT32_HAS_QUIET_NANqq : constant := 1;
qqFLT32_MANT_DIGqq : constant := 24;
qqFLT32_MAX_10_EXPqq : constant := 38;
qqFLT32_MAX_EXPqq : constant := 128;
qqFLT32_MAXqq : constant := 16#0.ffffff00000000#e+32;
qqFLT32_MIN_10_EXPqq : constant := -37;
qqFLT32_MIN_EXPqq : constant := -125;
qqFLT32_MINqq : constant := 16#0.40000000000000#e-31;
qqFLT64X_DECIMAL_DIGqq : constant := 36;
qqFLT64X_DENORM_MINqq : constant := 16#0.40000000000000#e-4123;
qqFLT64X_DIGqq : constant := 33;
qqFLT64X_EPSILONqq : constant := 16#0.10000000000000#e-27;
qqFLT64X_HAS_DENORMqq : constant := 1;
qqFLT64X_HAS_INFINITYqq : constant := 1;
qqFLT64X_HAS_QUIET_NANqq : constant := 1;
qqFLT64X_MANT_DIGqq : constant := 113;
qqFLT64X_MAX_10_EXPqq : constant := 4932;
qqFLT64X_MAX_EXPqq : constant := 16384;
qqFLT64X_MAXqq : constant := 16#1.0000000000000#e+4096;
qqFLT64X_MIN_10_EXPqq : constant := -4931;
qqFLT64X_MIN_EXPqq : constant := -16381;
qqFLT64X_MINqq : constant := 16#0.40000000000000#e-4095;
qqFLT64_DECIMAL_DIGqq : constant := 17;
qqFLT64_DENORM_MINqq : constant := 16#0.40000000000000#e-268;
qqFLT64_DIGqq : constant := 15;
qqFLT64_EPSILONqq : constant := 16#0.10000000000000#e-12;
qqFLT64_HAS_DENORMqq : constant := 1;
qqFLT64_HAS_INFINITYqq : constant := 1;
qqFLT64_HAS_QUIET_NANqq : constant := 1;
qqFLT64_MANT_DIGqq : constant := 53;
qqFLT64_MAX_10_EXPqq : constant := 308;
qqFLT64_MAX_EXPqq : constant := 1024;
qqFLT64_MAXqq : constant := 16#0.fffffffffffff8#e+256;
qqFLT64_MIN_10_EXPqq : constant := -307;
qqFLT64_MIN_EXPqq : constant := -1021;
qqFLT64_MINqq : constant := 16#0.40000000000000#e-255;
qqFLT_DECIMAL_DIGqq : constant := 9;
qqFLT_DENORM_MINqq : constant := 16#0.80000000000000#e-37;
qqFLT_DIGqq : constant := 6;
qqFLT_EPSILONqq : constant := 16#0.20000000000000#e-5;
qqFLT_EVAL_METHOD_TS_18661_3qq : constant := 2;
qqFLT_EVAL_METHODqq : constant := 2;
qqFLT_HAS_DENORMqq : constant := 1;
qqFLT_HAS_INFINITYqq : constant := 1;
qqFLT_HAS_QUIET_NANqq : constant := 1;
qqFLT_MANT_DIGqq : constant := 24;
qqFLT_MAX_10_EXPqq : constant := 38;
qqFLT_MAX_EXPqq : constant := 128;
qqFLT_MAXqq : constant := 16#0.ffffff00000000#e+32;
qqFLT_MIN_10_EXPqq : constant := -37;
qqFLT_MIN_EXPqq : constant := -125;
qqFLT_MINqq : constant := 16#0.40000000000000#e-31;
qqFLT_RADIXqq : constant := 2;
qqFreeBSDqq : constant := 8;
qqGCC_ASM_FLAG_OUTPUTSqq : constant := 1;
GCC_ATOMIC_BOOL_LOCK_FREE : constant := 2;
GCC_ATOMIC_CHAR16_T_LOCK_FREE : constant := 2;
GCC_ATOMIC_CHAR32_T_LOCK_FREE : constant := 2;
GCC_ATOMIC_CHAR_LOCK_FREE : constant := 2;
GCC_ATOMIC_INT_LOCK_FREE : constant := 2;
GCC_ATOMIC_LLONG_LOCK_FREE : constant := 2;
GCC_ATOMIC_LONG_LOCK_FREE : constant := 2;
GCC_ATOMIC_POINTER_LOCK_FREE : constant := 2;
GCC_ATOMIC_SHORT_LOCK_FREE : constant := 2;
GCC_ATOMIC_TEST_AND_SET_TRUEVAL : constant := 1;
GCC_ATOMIC_WCHAR_T_LOCK_FREE : constant := 2;
GCC_HAVE_DWARF2_CFI_ASM : constant := 1;
GCC_HAVE_SYNC_COMPARE_AND_SWAP_1 : constant := 1;
GCC_HAVE_SYNC_COMPARE_AND_SWAP_2 : constant := 1;
GCC_HAVE_SYNC_COMPARE_AND_SWAP_4 : constant := 1;
GCC_HAVE_SYNC_COMPARE_AND_SWAP_8 : constant := 1;
GCC_IEC_559 : constant := 2;
GCC_IEC_559_COMPLEX : constant := 2;
qqGNUC_MINORqq : constant := 5;
qqGNUC_PATCHLEVELqq : constant := 0;
qqGNUC_STDC_INLINEqq : constant := 1;
qqGNUCqq : constant := 7;
GXX_ABI_VERSION : constant := 1011;
-- __INT16_C (function macro)
qqINT16_MAXqq : constant := 32767;
subtype qqINT16_TYPEqq is signed_short;
-- __INT32_C (function macro)
qqINT32_MAXqq : constant := 2147483647;
subtype qqINT32_TYPEqq is signed_int;
-- __INT64_C (has # or ##)
qqINT64_MAXqq : constant := 9223372036854775807;
subtype qqINT64_TYPEqq is signed_long_long;
-- __INT8_C (function macro)
qqINT8_MAXqq : constant := 127;
subtype qqINT8_TYPEqq is signed_char;
-- __INTMAX_C (has # or ##)
qqINTMAX_MAXqq : constant := 9223372036854775807;
subtype qqINTMAX_TYPEqq is signed_long_long;
qqINTMAX_WIDTHqq : constant := 64;
qqINTPTR_MAXqq : constant := 2147483647;
subtype qqINTPTR_TYPEqq is signed_int;
qqINTPTR_WIDTHqq : constant := 32;
qqINT_FAST16_MAXqq : constant := 2147483647;
subtype qqINT_FAST16_TYPEqq is signed_int;
qqINT_FAST16_WIDTHqq : constant := 32;
qqINT_FAST32_MAXqq : constant := 2147483647;
subtype qqINT_FAST32_TYPEqq is signed_int;
qqINT_FAST32_WIDTHqq : constant := 32;
qqINT_FAST64_MAXqq : constant := 9223372036854775807;
subtype qqINT_FAST64_TYPEqq is signed_long_long;
qqINT_FAST64_WIDTHqq : constant := 64;
qqINT_FAST8_MAXqq : constant := 2147483647;
subtype qqINT_FAST8_TYPEqq is signed_int;
qqINT_FAST8_WIDTHqq : constant := 32;
qqINT_LEAST16_MAXqq : constant := 32767;
subtype qqINT_LEAST16_TYPEqq is signed_short;
qqINT_LEAST16_WIDTHqq : constant := 16;
qqINT_LEAST32_MAXqq : constant := 2147483647;
subtype qqINT_LEAST32_TYPEqq is signed_int;
qqINT_LEAST32_WIDTHqq : constant := 32;
qqINT_LEAST64_MAXqq : constant := 9223372036854775807;
subtype qqINT_LEAST64_TYPEqq is signed_long_long;
qqINT_LEAST64_WIDTHqq : constant := 64;
qqINT_LEAST8_MAXqq : constant := 127;
subtype qqINT_LEAST8_TYPEqq is signed_char;
qqINT_LEAST8_WIDTHqq : constant := 8;
qqINT_MAXqq : constant := 2147483647;
qqINT_WIDTHqq : constant := 32;
qqKPRINTF_ATTRIBUTEqq : constant := 1;
qqLDBL_DECIMAL_DIGqq : constant := 17;
qqLDBL_DENORM_MINqq : constant := 16#0.40000000000000#e-4108;
qqLDBL_DIGqq : constant := 15;
qqLDBL_EPSILONqq : constant := 16#0.10000000000000#e-12;
qqLDBL_HAS_DENORMqq : constant := 1;
qqLDBL_HAS_INFINITYqq : constant := 1;
qqLDBL_HAS_QUIET_NANqq : constant := 1;
qqLDBL_MANT_DIGqq : constant := 53;
qqLDBL_MAX_10_EXPqq : constant := 4932;
qqLDBL_MAX_EXPqq : constant := 16384;
qqLDBL_MAXqq : constant := 16#0.fffffffffffff0#e+4096;
qqLDBL_MIN_10_EXPqq : constant := -4931;
qqLDBL_MIN_EXPqq : constant := -16381;
qqLDBL_MINqq : constant := 16#0.40000000000000#e-4095;
qqLONG_LONG_MAXqq : constant := 9223372036854775807;
qqLONG_LONG_WIDTHqq : constant := 64;
qqLONG_MAXqq : constant := 2147483647;
qqLONG_WIDTHqq : constant := 32;
qqNO_INLINEqq : constant := 1;
qqORDER_BIG_ENDIANqq : constant := 4321;
qqORDER_LITTLE_ENDIANqq : constant := 1234;
qqORDER_PDP_ENDIANqq : constant := 3412;
PRAGMA_REDEFINE_EXTNAME : constant := 1;
qqPTRDIFF_MAXqq : constant := 2147483647;
subtype qqPTRDIFF_TYPEqq is signed_int;
qqPTRDIFF_WIDTHqq : constant := 32;
-- __REGISTER_PREFIX__ (empty)
qqSCHAR_MAXqq : constant := 127;
qqSCHAR_WIDTHqq : constant := 8;
SEG_FS : constant := 1;
SEG_GS : constant := 1;
qqSHRT_MAXqq : constant := 32767;
qqSHRT_WIDTHqq : constant := 16;
qqSIG_ATOMIC_MAXqq : constant := 2147483647;
qqSIG_ATOMIC_MINqq : constant := -2147483648;
subtype qqSIG_ATOMIC_TYPEqq is signed_int;
qqSIG_ATOMIC_WIDTHqq : constant := 32;
qqSIZEOF_DOUBLEqq : constant := 8;
qqSIZEOF_FLOAT128qq : constant := 16;
qqSIZEOF_FLOAT80qq : constant := 12;
qqSIZEOF_FLOATqq : constant := 4;
qqSIZEOF_INTqq : constant := 4;
qqSIZEOF_LONG_DOUBLEqq : constant := 12;
qqSIZEOF_LONG_LONGqq : constant := 8;
qqSIZEOF_LONGqq : constant := 4;
qqSIZEOF_POINTERqq : constant := 4;
qqSIZEOF_PTRDIFF_Tqq : constant := 4;
qqSIZEOF_SHORTqq : constant := 2;
qqSIZEOF_SIZE_Tqq : constant := 4;
qqSIZEOF_WCHAR_Tqq : constant := 4;
qqSIZEOF_WINT_Tqq : constant := 4;
qqSIZE_MAXqq : constant := 4294967295;
subtype qqSIZE_TYPEqq is unsigned_int;
qqSIZE_WIDTHqq : constant := 32;
qqSTDC_HOSTEDqq : constant := 1;
qqSTDC_UTF_16qq : constant := 1;
qqSTDC_UTF_32qq : constant := 1;
-- __UINT16_C (function macro)
qqUINT16_MAXqq : constant := 65535;
subtype qqUINT16_TYPEqq is unsigned_short;
-- __UINT32_C (has # or ##)
qqUINT32_MAXqq : constant := 4294967295;
subtype qqUINT32_TYPEqq is unsigned_int;
-- __UINT64_C (has # or ##)
qqUINT64_MAXqq : constant := 18446744073709551615;
subtype qqUINT64_TYPEqq is unsigned_long_long;
-- __UINT8_C (function macro)
qqUINT8_MAXqq : constant := 255;
subtype qqUINT8_TYPEqq is unsigned_char;
-- __UINTMAX_C (has # or ##)
qqUINTMAX_MAXqq : constant := 18446744073709551615;
subtype qqUINTMAX_TYPEqq is unsigned_long_long;
qqUINTPTR_MAXqq : constant := 4294967295;
subtype qqUINTPTR_TYPEqq is unsigned_int;
qqUINT_FAST16_MAXqq : constant := 4294967295;
subtype qqUINT_FAST16_TYPEqq is unsigned_int;
qqUINT_FAST32_MAXqq : constant := 4294967295;
subtype qqUINT_FAST32_TYPEqq is unsigned_int;
qqUINT_FAST64_MAXqq : constant := 18446744073709551615;
subtype qqUINT_FAST64_TYPEqq is unsigned_long_long;
qqUINT_FAST8_MAXqq : constant := 4294967295;
subtype qqUINT_FAST8_TYPEqq is unsigned_int;
qqUINT_LEAST16_MAXqq : constant := 65535;
subtype qqUINT_LEAST16_TYPEqq is unsigned_short;
qqUINT_LEAST32_MAXqq : constant := 4294967295;
subtype qqUINT_LEAST32_TYPEqq is unsigned_int;
qqUINT_LEAST64_MAXqq : constant := 18446744073709551615;
subtype qqUINT_LEAST64_TYPEqq is unsigned_long_long;
qqUINT_LEAST8_MAXqq : constant := 255;
subtype qqUINT_LEAST8_TYPEqq is unsigned_char;
-- __USER_LABEL_PREFIX__ (empty)
qqVERSIONqq : constant char_array (0 .. 5) := "7.5.0" & char'Val (0);
qqWCHAR_MAXqq : constant := 2147483647;
qqWCHAR_MINqq : constant := -2147483648;
subtype qqWCHAR_TYPEqq is signed_int;
qqWCHAR_WIDTHqq : constant := 32;
qqWINT_MAXqq : constant := 2147483647;
qqWINT_MINqq : constant := -2147483648;
subtype qqWINT_TYPEqq is signed_int;
qqWINT_WIDTHqq : constant := 32;
qqcode_model_32qq : constant := 1;
-- __has_include (has __has_include__ or __has_include_next__)
-- __has_include_next (has __has_include__ or __has_include_next__)
i386 : constant := 1;
qqi386qq : constant := 1;
i686 : constant := 1;
qqi686qq : constant := 1;
pentiumpro : constant := 1;
qqpentiumproqq : constant := 1;
qqunix : constant := 1;
qqunixqq : constant := 1;
defined_i386 : constant := 1;
unix : constant := 1;
function builtin_alloca (a1 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_alloca, "__builtin_alloca");
function builtin_bswap16 (a1 : unsigned_short) return unsigned_short;
pragma Import (Intrinsic, builtin_bswap16, "__builtin_bswap16");
function builtin_bswap32 (a1 : unsigned_int) return unsigned_int;
pragma Import (Intrinsic, builtin_bswap32, "__builtin_bswap32");
function builtin_bswap64 (a1 : unsigned_long_long)
return unsigned_long_long;
pragma Import (Intrinsic, builtin_bswap64, "__builtin_bswap64");
procedure builtin_bzero (a1 : access char; a2 : size_t);
pragma Import (Intrinsic, builtin_bzero, "__builtin_bzero");
function builtin_extract_return_addr (a1 : access char) return char_ptr;
pragma Import (Intrinsic, builtin_extract_return_addr,
"__builtin_extract_return_addr");
function builtin_fabsf (a1 : float) return float;
pragma Import (Intrinsic, builtin_fabsf, "__builtin_fabsf");
function builtin_fabs (a1 : double) return double;
pragma Import (Intrinsic, builtin_fabs, "__builtin_fabs");
function builtin_fabsl (a1 : long_double) return long_double;
pragma Import (Intrinsic, builtin_fabsl, "__builtin_fabsl");
function builtin_flt_rounds return signed_int;
pragma Import (Intrinsic, builtin_flt_rounds, "__builtin_flt_rounds");
function builtin_frame_address (a1 : unsigned_int) return char_ptr;
pragma Import (Intrinsic, builtin_frame_address,
"__builtin_frame_address");
function builtin_huge_valf return float;
pragma Import (Intrinsic, builtin_huge_valf, "__builtin_huge_valf");
function builtin_huge_val return double;
pragma Import (Intrinsic, builtin_huge_val, "__builtin_huge_val");
function builtin_huge_vall return long_double;
pragma Import (Intrinsic, builtin_huge_vall, "__builtin_huge_vall");
function builtin_inff return float;
pragma Import (Intrinsic, builtin_inff, "__builtin_inff");
function builtin_inf return double;
pragma Import (Intrinsic, builtin_inf, "__builtin_inf");
function builtin_infl return long_double;
pragma Import (Intrinsic, builtin_infl, "__builtin_infl");
function builtin_llabs (a1 : signed_long_long) return signed_long_long;
pragma Import (Intrinsic, builtin_llabs, "__builtin_llabs");
function builtin_memcmp (a1 : access char; a2 : access char; a3 : size_t)
return signed_int;
pragma Import (Intrinsic, builtin_memcmp, "__builtin_memcmp");
function builtin_memset (a1 : access char; a2 : signed_int; a3 : size_t)
return char_ptr;
pragma Import (Intrinsic, builtin_memset, "__builtin_memset");
function builtin_memcpy_chk (a1 : access char; a2 : access constant char;
a3 : size_t; a4 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_memcpy_chk, "__builtin___memcpy_chk");
function builtin_memmove_chk (a1 : access char; a2 : access constant char;
a3 : size_t; a4 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_memmove_chk, "__builtin___memmove_chk");
function builtin_memset_chk (a1 : access char; a2 : signed_int;
a3 : size_t; a4 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_memset_chk, "__builtin___memset_chk");
function builtin_nanf (a1 : access constant char) return float;
pragma Import (Intrinsic, builtin_nanf, "__builtin_nanf");
function builtin_nan (a1 : access constant char) return double;
pragma Import (Intrinsic, builtin_nan, "__builtin_nan");
function builtin_nanl (a1 : access constant char) return long_double;
pragma Import (Intrinsic, builtin_nanl, "__builtin_nanl");
function builtin_return_address (a1 : unsigned_int) return char_ptr;
pragma Import (Intrinsic, builtin_return_address,
"__builtin_return_address");
function builtin_stpcpy_chk (a1 : access char; a2 : access constant char;
a3 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_stpcpy_chk, "__builtin___stpcpy_chk");
function builtin_stpncpy_chk (a1 : access char; a2 : access constant char;
a3 : size_t; a4 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_stpncpy_chk, "__builtin___stpncpy_chk");
function builtin_strcat_chk (a1 : access char; a2 : access constant char;
a3 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_strcat_chk, "__builtin___strcat_chk");
function builtin_strcpy_chk (a1 : access char; a2 : access constant char;
a3 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_strcpy_chk, "__builtin___strcpy_chk");
function builtin_strncat_chk (a1 : access char; a2 : access constant char;
a3 : size_t; a4 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_strncat_chk, "__builtin___strncat_chk");
function builtin_strncpy_chk (a1 : access char; a2 : access constant char;
a3 : size_t; a4 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_strncpy_chk, "__builtin___strncpy_chk");
end C;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment