Last active
November 4, 2020 20:36
-
-
Save ytomino/339ab994f7e1232974f2 to your computer and use it in GitHub Desktop.
i686-pc-freebsd8
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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.elf_generic; | |
with C.sys.types; | |
package C.sys.link_elf is | |
pragma Preelaborate; | |
type struct_link_map; | |
type struct_link_map_ptr is access all struct_link_map; | |
for struct_link_map_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_link_map_ptr); | |
pragma Convention (C, struct_link_map_ptr); | |
type struct_link_map is record | |
l_addr : aliased types.caddr_t; | |
l_name : aliased char_const_ptr; | |
l_ld : aliased void_const_ptr; | |
l_next : aliased struct_link_map_ptr; | |
l_prev : aliased struct_link_map_ptr; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_link_map); | |
subtype Link_map is struct_link_map; | |
type struct_r_debug; | |
type struct_r_debug_ptr is access all struct_r_debug; | |
for struct_r_debug_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_r_debug_ptr); | |
pragma Convention (C, struct_r_debug_ptr); | |
type access_5ed13c5e is access procedure (a1 : access struct_r_debug; | |
a2 : access struct_link_map); | |
pragma Convention (C, access_5ed13c5e); | |
type enum_4f146cd7 is (RT_CONSISTENT, RT_ADD, RT_DELETE); | |
for enum_4f146cd7 use (RT_CONSISTENT => 0, RT_ADD => 1, RT_DELETE => 2); | |
pragma Convention (C, enum_4f146cd7); | |
for enum_4f146cd7'Size use signed_int'Size; | |
function Cast is new Ada.Unchecked_Conversion (enum_4f146cd7, signed_int); | |
type struct_r_debug is record | |
r_version : aliased signed_int; | |
r_map : aliased struct_link_map_ptr; | |
r_brk : aliased access_5ed13c5e; | |
r_state : aliased enum_4f146cd7; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_r_debug); | |
type struct_dl_phdr_info; | |
type struct_dl_phdr_info is record | |
dlpi_addr : aliased elf_generic.Elf_Addr; | |
dlpi_name : aliased char_const_ptr; | |
dlpi_phdr : aliased elf_generic.Elf_Phdr_const_ptr; | |
dlpi_phnum : aliased elf_generic.Elf_Half; | |
dlpi_adds : aliased unsigned_long_long; | |
dlpi_subs : aliased unsigned_long_long; | |
dlpi_tls_modid : aliased stddef.size_t; | |
dlpi_tls_data : aliased void_ptr; | |
end record; | |
pragma Convention (C_Pass_By_Copy, struct_dl_phdr_info); | |
type struct_dl_phdr_info_ptr is access all struct_dl_phdr_info; | |
for struct_dl_phdr_info_ptr'Storage_Size use 0; | |
pragma No_Strict_Aliasing (struct_dl_phdr_info_ptr); | |
pragma Convention (C, struct_dl_phdr_info_ptr); | |
type access_69e77a92 is access function (a1 : access struct_dl_phdr_info; | |
a2 : stddef.size_t; a3 : void_ptr) return signed_int; | |
pragma Convention (C, access_69e77a92); | |
subtype dl_iterate_hdr_callback is access_69e77a92; | |
function dl_iterate_phdr (a1 : dl_iterate_hdr_callback; a2 : void_ptr) | |
return signed_int; | |
pragma Import (C, dl_iterate_phdr, "dl_iterate_phdr"); | |
function rtld_addr_phdr (a1 : void_const_ptr; | |
a2 : access struct_dl_phdr_info) return signed_int; | |
pragma Import (C, rtld_addr_phdr, "_rtld_addr_phdr"); | |
LA_SER_CONFIG : constant := 8; | |
LA_SER_DEFAULT : constant := 64; | |
LA_SER_LIBPATH : constant := 2; | |
LA_SER_ORIG : constant := 1; | |
LA_SER_RUNPATH : constant := 4; | |
LA_SER_SECURE : constant := 128; | |
-- _SYS_LINK_ELF_H_ (empty) | |
end C.sys.link_elf; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- 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