Skip to content

Instantly share code, notes, and snippets.

@ytomino
Last active June 28, 2016 03:15
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ytomino/7d66c6886038a402427d to your computer and use it in GitHub Desktop.
Save ytomino/7d66c6886038a402427d to your computer and use it in GitHub Desktop.
i686-apple-darwin9
-- This file is translated by "headmaster" version 0.27-2060155 (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.alloca is
pragma Preelaborate;
function alloca (a1 : stddef.size_t) return void_ptr;
pragma Import (C, alloca, "alloca");
-- _ALLOCA_H_ (empty)
-- __alloca (function macro)
end C.alloca;
-- This file is translated by "headmaster" version 0.27-2060155 (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.AvailabilityMacros is
pragma Preelaborate;
-- AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER (empty)
-- AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER (empty)
-- AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER_BUT_DEPRECATED (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER (empty)
-- AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER_BUT_DEPRECATED (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER (empty)
-- AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER_BUT_DEPRECATED (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_4_AND_LATER (empty)
-- AVAILABLE_MAC_OS_X_VERSION_10_4_AND_LATER_BUT_DEPRECATED (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_4_AND_LATER_BUT_DEPRECATED_... (attribute)
-- AVAILABLE_MAC_OS_X_VERSION_10_5_AND_LATER (empty)
-- AVAILABLE_MAC_OS_X_VERSION_10_5_AND_LATER_BUT_DEPRECATED (attribute)
-- DEPRECATED_ATTRIBUTE (attribute)
-- DEPRECATED_IN_MAC_OS_X_VERSION_10_0_AND_LATER (attribute)
-- DEPRECATED_IN_MAC_OS_X_VERSION_10_1_AND_LATER (attribute)
-- DEPRECATED_IN_MAC_OS_X_VERSION_10_2_AND_LATER (attribute)
-- DEPRECATED_IN_MAC_OS_X_VERSION_10_3_AND_LATER (attribute)
-- DEPRECATED_IN_MAC_OS_X_VERSION_10_4_AND_LATER (attribute)
-- DEPRECATED_IN_MAC_OS_X_VERSION_10_5_AND_LATER (attribute)
MAC_OS_X_VERSION_10_0 : constant := 1000;
MAC_OS_X_VERSION_10_1 : constant := 1010;
MAC_OS_X_VERSION_10_2 : constant := 1020;
MAC_OS_X_VERSION_10_3 : constant := 1030;
MAC_OS_X_VERSION_10_4 : constant := 1040;
MAC_OS_X_VERSION_10_5 : constant := 1050;
MAC_OS_X_VERSION_MAX_ALLOWED : constant := 1050;
MAC_OS_X_VERSION_MIN_REQUIRED : constant := 1050;
-- UNAVAILABLE_ATTRIBUTE (attribute)
-- WEAK_IMPORT_ATTRIBUTE (attribute)
-- __AVAILABILITYMACROS__ (empty)
end C.AvailabilityMacros;
-- This file is translated by "headmaster" version 0.27-2060155 (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.available is
pragma Preelaborate;
-- _AVAILABLE_H_ (empty)
-- __AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER (empty)
-- __AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER (empty)
-- __AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER_BUT_DEPRECATED (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER (empty)
-- __AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER_BUT_DEPRECATED (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER (empty)
-- __AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER_BUT_DEPRECATED (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_4_AND_LATER (empty)
-- __AVAILABLE_MAC_OS_X_VERSION_10_4_AND_LATER_BUT_DEPRECATED (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_4_AND_LATER_BUT_DEPRECATE... (attribute)
-- __AVAILABLE_MAC_OS_X_VERSION_10_5_AND_LATER (empty)
-- __AVAILABLE_MAC_OS_X_VERSION_10_5_AND_LATER_BUT_DEPRECATED (attribute)
-- __DARWIN_DEPRECATED_ATTRIBUTE (attribute)
-- __DARWIN_UNAVAILABLE_ATTRIBUTE (attribute)
-- __DARWIN_WEAK_IMPORT_ATTRIBUTE (attribute)
-- __DEPRECATED_IN_MAC_OS_X_VERSION_10_0_AND_LATER (attribute)
-- __DEPRECATED_IN_MAC_OS_X_VERSION_10_1_AND_LATER (attribute)
-- __DEPRECATED_IN_MAC_OS_X_VERSION_10_2_AND_LATER (attribute)
-- __DEPRECATED_IN_MAC_OS_X_VERSION_10_3_AND_LATER (attribute)
-- __DEPRECATED_IN_MAC_OS_X_VERSION_10_4_AND_LATER (attribute)
-- __DEPRECATED_IN_MAC_OS_X_VERSION_10_5_AND_LATER (attribute)
MAC_OS_X_VERSION_10_0 : constant := 1000;
MAC_OS_X_VERSION_10_1 : constant := 1010;
MAC_OS_X_VERSION_10_2 : constant := 1020;
MAC_OS_X_VERSION_10_3 : constant := 1030;
MAC_OS_X_VERSION_10_4 : constant := 1040;
MAC_OS_X_VERSION_10_5 : constant := 1050;
MAC_OS_X_VERSION_MAX_ALLOWED : constant := 1050;
MAC_OS_X_VERSION_MIN_REQUIRED : constant := 1050;
end C.available;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.types;
with C.stddef;
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 i386.types.u_int16_t;
subtype au_emod_t is i386.types.u_int16_t;
subtype au_class_t is i386.types.u_int32_t;
type struct_au_tid;
type struct_au_tid is record
port : aliased sys.types.dev_t;
machine : aliased i386.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 i386.types.u_int32_t;
at_addr : aliased i386.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;
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;
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;
end record;
pragma Convention (C_Pass_By_Copy, struct_auditpinfo_addr);
subtype auditpinfo_addr_t is struct_auditpinfo_addr;
type struct_au_token;
type struct_au_token_ptr is access all struct_au_token;
for struct_au_token_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_au_token_ptr);
pragma Convention (C, struct_au_token_ptr);
type struct_au_token_ptr_ptr is access all struct_au_token_ptr;
for struct_au_token_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_au_token_ptr_ptr);
pragma Convention (C, struct_au_token_ptr_ptr);
type struct_575a4f85 is record
tqe_next : aliased struct_au_token_ptr;
tqe_prev : aliased struct_au_token_ptr_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_575a4f85);
type struct_au_token is record
t_data : aliased sys.types.u_char_ptr;
len : aliased stddef.size_t;
tokens : aliased struct_575a4f85;
end record;
pragma Convention (C_Pass_By_Copy, struct_au_token);
subtype token_t is struct_au_token;
type struct_au_record;
type struct_au_record_ptr is access all struct_au_record;
for struct_au_record_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_au_record_ptr);
pragma Convention (C, struct_au_record_ptr);
type struct_au_record_ptr_ptr is access all struct_au_record_ptr;
for struct_au_record_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_au_record_ptr_ptr);
pragma Convention (C, struct_au_record_ptr_ptr);
type struct_8b3a5330 is record
tqh_first : aliased struct_au_token_ptr;
tqh_last : aliased struct_au_token_ptr_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_8b3a5330);
type struct_b7eb3c42 is record
le_next : aliased struct_au_record_ptr;
le_prev : aliased struct_au_record_ptr_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_b7eb3c42);
type struct_au_record is record
used : aliased char;
desc : aliased signed_int;
token_q : aliased struct_8b3a5330;
data : aliased sys.types.u_char_ptr;
len : aliased stddef.size_t;
au_rec_q : aliased struct_b7eb3c42;
end record;
pragma Convention (C_Pass_By_Copy, struct_au_record);
subtype au_record_t is struct_au_record;
type struct_au_qctrl;
type struct_au_qctrl is record
aq_hiwater : aliased stddef.size_t;
aq_lowater : aliased stddef.size_t;
aq_bufsz : aliased stddef.size_t;
aq_delay : aliased sys.types.clock_t;
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_nonattring : aliased signed_int;
as_kernel : aliased signed_int;
as_audit : aliased signed_int;
as_auditctl : aliased signed_int;
as_enqueu : 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_quad_t;
af_currsz : aliased sys.types.u_quad_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 := 1024;
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;
AUDIT_AHLT : constant := 2;
AUDIT_ARGE : constant := 8;
AUDIT_ARGV : constant := 4;
AUDIT_CNT : constant := 1;
AUDIT_GROUP : constant := 256;
AUDIT_PASSWD : constant := 16;
AUDIT_PATH : constant := 1024;
AUDIT_RECORD_MAGIC : constant := -2104881381;
AUDIT_SEQ : constant := 32;
AUDIT_TRAIL : constant := 512;
AUDIT_TRIGGER_FILE_FULL : constant := 2;
AUDIT_TRIGGER_LOW_SPACE : constant := 1;
AUDIT_USER : constant := 128;
AUDIT_WINDATA : constant := 64;
AU_ADMIN : constant := 2048;
AU_ALL : constant := -1;
AU_APPL : constant := 16384;
AU_CLOSE : constant := 64;
AU_DEFAUDITID : constant := 4294967295;
AU_EXEC : constant := 1073741824;
AU_FACCESS : constant := 4;
AU_FCREATE : constant := 16;
AU_FDELETE : constant := 32;
AU_FMODIFY : constant := 8;
AU_FREAD : constant := 1;
AU_FS_MINFREE : constant := 20;
AU_FWRITE : constant := 2;
AU_IFLOAT : constant := 65536;
AU_IOCTL : constant := 536870912;
AU_IPC : constant := 512;
AU_LOGIN : constant := 4096;
AU_MAC_RW : constant := 262144;
AU_NET : constant := 256;
AU_NONAT : constant := 1024;
AU_NULL : constant := 0;
AU_OTHER : constant := -2147483648;
AU_PRIV : constant := 131072;
AU_PROCESS : constant := 128;
AU_SETL : constant := 32768;
AU_TFM : constant := 8192;
AU_XCONN : constant := 524288;
AU_XCREATE : constant := 1048576;
AU_XDACF : constant := 67108864;
AU_XDELETE : constant := 2097152;
AU_XIFLOAT : constant := 4194304;
AU_XMACF : constant := 134217728;
AU_XMOVE : constant := 33554432;
AU_XPRIVF : constant := 16777216;
AU_XPRIVS : constant := 8388608;
AU_XSECATTR : constant := 268435456;
A_GETCAR : constant := 9;
A_GETCLASS : constant := 22;
A_GETCOND : constant := 20;
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 := 2;
A_GETQCTRL : constant := 6;
A_GETSTAT : constant := 12;
A_SETCLASS : constant := 23;
A_SETCOND : constant := 21;
A_SETFSIZE : constant := 26;
A_SETKAUDIT : constant := 30;
A_SETKMASK : constant := 5;
A_SETPMASK : constant := 25;
A_SETPOLICY : constant := 3;
A_SETQCTRL : constant := 7;
A_SETSMASK : constant := 15;
A_SETSTAT : constant := 13;
A_SETUMASK : constant := 14;
MAX_AUDIT_RECORDS : constant := 20;
MAX_AUDIT_RECORD_SIZE : constant := 4096;
MIN_AUDIT_FILE_SIZE : constant := 524288;
-- _BSM_AUDIT_H (empty)
end C.bsm.audit;
-- This file is translated by "headmaster" version 0.27-2060155 (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 is translated by "headmaster" version 0.27-2060155 (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;
package C.copyfile is
pragma Preelaborate;
type struct_copyfile_state (<>) is limited private;
type struct_copyfile_state_ptr is access all struct_copyfile_state;
for struct_copyfile_state_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_copyfile_state_ptr);
pragma Convention (C, struct_copyfile_state_ptr);
subtype copyfile_state_t is struct_copyfile_state_ptr;
subtype copyfile_flags_t is stdint.uint32_t;
function copyfile (from : access constant char; to : access constant char;
state : access struct_copyfile_state; flags : copyfile_flags_t)
return signed_int;
pragma Import (C, copyfile, "copyfile");
function fcopyfile (from_fd : signed_int; to_fd : signed_int;
a3 : access struct_copyfile_state; flags : copyfile_flags_t)
return signed_int;
pragma Import (C, fcopyfile, "fcopyfile");
function copyfile_state_free (a1 : access struct_copyfile_state)
return signed_int;
pragma Import (C, copyfile_state_free, "copyfile_state_free");
function copyfile_state_alloc return copyfile_state_t;
pragma Import (C, copyfile_state_alloc, "copyfile_state_alloc");
function copyfile_state_get (s : access struct_copyfile_state;
flag : stdint.uint32_t; dst : void_ptr) return signed_int;
pragma Import (C, copyfile_state_get, "copyfile_state_get");
function copyfile_state_set (s : access struct_copyfile_state;
flag : stdint.uint32_t; src : void_const_ptr) return signed_int;
pragma Import (C, copyfile_state_set, "copyfile_state_set");
COPYFILE_ACL : constant := 1;
COPYFILE_ALL : constant := 15;
COPYFILE_CHECK : constant := 65536;
COPYFILE_DATA : constant := 8;
COPYFILE_DISABLE_VAR : constant char_array (0 .. 16) := "COPYFILE_DISABLE"
& char'Val (0);
COPYFILE_EXCL : constant := 131072;
COPYFILE_METADATA : constant := 7;
COPYFILE_MOVE : constant := 1048576;
COPYFILE_NOFOLLOW : constant := 786432;
COPYFILE_NOFOLLOW_DST : constant := 524288;
COPYFILE_NOFOLLOW_SRC : constant := 262144;
COPYFILE_PACK : constant := 4194304;
COPYFILE_SECURITY : constant := 3;
COPYFILE_STAT : constant := 2;
COPYFILE_STATE_DST_FD : constant := 3;
COPYFILE_STATE_DST_FILENAME : constant := 4;
COPYFILE_STATE_QUARANTINE : constant := 5;
COPYFILE_STATE_SRC_FD : constant := 1;
COPYFILE_STATE_SRC_FILENAME : constant := 2;
COPYFILE_UNLINK : constant := 2097152;
COPYFILE_UNPACK : constant := 8388608;
COPYFILE_VERBOSE : constant := 1073741824;
COPYFILE_XATTR : constant := 4;
-- _COPYFILE_H_ (empty)
private
type struct_copyfile_state is null record;
end C.copyfile;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach_o.loader;
package C.crt_externs is
pragma Preelaborate;
function NSGetArgv return char_ptr_ptr_ptr;
pragma Import (C, NSGetArgv, "_NSGetArgv");
function NSGetArgc return signed_int_ptr;
pragma Import (C, NSGetArgc, "_NSGetArgc");
function NSGetEnviron return char_ptr_ptr_ptr;
pragma Import (C, NSGetEnviron, "_NSGetEnviron");
function NSGetProgname return char_ptr_ptr;
pragma Import (C, NSGetProgname, "_NSGetProgname");
function NSGetMachExecuteHeader
return mach_o.loader.struct_mach_header_ptr;
pragma Import (C, NSGetMachExecuteHeader, "_NSGetMachExecuteHeader");
end C.crt_externs;
-- This file is translated by "headmaster" version 0.27-2060155 (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.ctype is
pragma Preelaborate;
function isalnum (a1 : signed_int) return signed_int;
pragma Import (C, isalnum, "isalnum");
function isalpha (a1 : signed_int) return signed_int;
pragma Import (C, isalpha, "isalpha");
function isblank (a1 : signed_int) return signed_int;
pragma Import (C, isblank, "isblank");
function iscntrl (a1 : signed_int) return signed_int;
pragma Import (C, iscntrl, "iscntrl");
function isdigit (a1 : signed_int) return signed_int;
pragma Import (C, isdigit, "isdigit");
function isgraph (a1 : signed_int) return signed_int;
pragma Import (C, isgraph, "isgraph");
function islower (a1 : signed_int) return signed_int;
pragma Import (C, islower, "islower");
function isprint (a1 : signed_int) return signed_int;
pragma Import (C, isprint, "isprint");
function ispunct (a1 : signed_int) return signed_int;
pragma Import (C, ispunct, "ispunct");
function isspace (a1 : signed_int) return signed_int;
pragma Import (C, isspace, "isspace");
function isupper (a1 : signed_int) return signed_int;
pragma Import (C, isupper, "isupper");
function isxdigit (a1 : signed_int) return signed_int;
pragma Import (C, isxdigit, "isxdigit");
function tolower (a1 : signed_int) return signed_int;
pragma Import (C, tolower, "tolower");
function toupper (a1 : signed_int) return signed_int;
pragma Import (C, toupper, "toupper");
function isascii (a1 : signed_int) return signed_int;
pragma Import (C, isascii, "isascii");
function toascii (a1 : signed_int) return signed_int;
pragma Import (C, toascii, "toascii");
function qtolower (a1 : signed_int) return signed_int;
pragma Import (C, qtolower, "_tolower");
function qtoupper (a1 : signed_int) return signed_int;
pragma Import (C, qtoupper, "_toupper");
function digittoint (a1 : signed_int) return signed_int;
pragma Import (C, digittoint, "digittoint");
function ishexnumber (a1 : signed_int) return signed_int;
pragma Import (C, ishexnumber, "ishexnumber");
function isideogram (a1 : signed_int) return signed_int;
pragma Import (C, isideogram, "isideogram");
function isnumber (a1 : signed_int) return signed_int;
pragma Import (C, isnumber, "isnumber");
function isphonogram (a1 : signed_int) return signed_int;
pragma Import (C, isphonogram, "isphonogram");
function isrune (a1 : signed_int) return signed_int;
pragma Import (C, isrune, "isrune");
function isspecial (a1 : signed_int) return signed_int;
pragma Import (C, isspecial, "isspecial");
CTYPE_A : constant := 256;
CTYPE_B : constant := 131072;
CTYPE_C : constant := 512;
CTYPE_D : constant := 1024;
CTYPE_G : constant := 2048;
-- _CTYPE_H_ (empty)
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;
-- __DARWIN_CTYPE_TOP_static_inline (alias of static inline)
-- __DARWIN_CTYPE_static_inline (alias of static inline)
end C.ctype;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qtypes;
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;
-- SYS_DIRENT_H renames sys.dirent.SYS_DIRENT_H (empty)
DARWIN_MAXNAMLEN : constant := sys.dirent.DARWIN_MAXNAMLEN;
DARWIN_MAXPATHLEN : constant := sys.dirent.DARWIN_MAXPATHLEN;
-- DARWIN_STRUCT_DIRENTRY renames sys.dirent.DARWIN_STRUCT_... (unparsible)
-- .d_fileno renames .d_ino (accessor)
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_fb651688 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.qtypes.darwin_pthread_mutex_t;
dd_td : aliased struct_telldir_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_fb651688);
type struct_fb651688_ptr is access all struct_fb651688;
for struct_fb651688_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_fb651688_ptr);
pragma Convention (C, struct_fb651688_ptr);
subtype DIR is struct_fb651688;
subtype DIR_ptr is struct_fb651688_ptr;
type access_15e0d5ae is access function (a1 : void_const_ptr;
a2 : void_const_ptr) return signed_int;
pragma Convention (C, access_15e0d5ae);
function alphasort (a1 : void_const_ptr; a2 : void_const_ptr)
return signed_int;
pragma Import (C, alphasort, "alphasort");
function closedir (a1 : access DIR) return signed_int;
pragma Import (C, closedir, "closedir$UNIX2003");
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$UNIX2003");
function opendir2 (a1 : access constant char; a2 : signed_int)
return DIR_ptr;
pragma Import (C, opendir2, "__opendir2$UNIX2003");
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$UNIX2003");
type access_3b700c5e is access function (
a1 : access sys.dirent.struct_dirent) return signed_int;
pragma Convention (C, access_3b700c5e);
function scandir (a1 : access constant char;
a2 : access sys.dirent.struct_dirent_ptr_ptr; a3 : access_3b700c5e;
a4 : access_15e0d5ae) return signed_int;
pragma Import (C, scandir, "scandir");
procedure seekdir (a1 : access DIR; a2 : signed_long);
pragma Import (C, seekdir, "seekdir$UNIX2003");
function telldir (a1 : access DIR) return signed_long;
pragma Import (C, telldir, "telldir$UNIX2003");
DIRBLKSIZ : constant := 1024;
DTF_HIDEW : constant := 1;
DTF_NODUP : constant := 2;
DTF_REWIND : constant := 4;
-- _DIRENT_H_ (empty)
DTF_READALL : constant := 8;
-- dirfd (uninterpretable)
private
type struct_telldir is null record;
end C.dirent;
-- This file is translated by "headmaster" version 0.27-2060155 (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.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;
function dladdr (a1 : void_const_ptr; a2 : access Dl_info)
return signed_int;
pragma Import (C, dladdr, "dladdr");
function dlclose (handle : void_ptr) return signed_int;
pragma Import (C, dlclose, "dlclose");
function dlerror return char_ptr;
pragma Import (C, dlerror, "dlerror");
function dlopen (path : access constant char; mode : signed_int)
return void_ptr;
pragma Import (C, dlopen, "dlopen");
function dlsym (handle : void_ptr; symbol : access constant char)
return void_ptr;
pragma Import (C, dlsym, "dlsym");
function dlopen_preflight (path : access constant char) return bool;
pragma Import (C, dlopen_preflight, "dlopen_preflight");
RTLD_DEFAULT : constant void_ptr := void_ptr (System'To_Address (-2));
RTLD_FIRST : constant := 256;
RTLD_GLOBAL : constant := 8;
RTLD_LAZY : constant := 1;
RTLD_LOCAL : constant := 4;
RTLD_NEXT : constant void_ptr := void_ptr (System'To_Address (-1));
RTLD_NODELETE : constant := 128;
RTLD_NOLOAD : constant := 16;
RTLD_NOW : constant := 2;
RTLD_SELF : constant void_ptr := void_ptr (System'To_Address (-3));
-- _DLFCN_H_ (empty)
end C.dlfcn;
-- This file is translated by "headmaster" version 0.27-2060155 (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.errno;
package C.errno is
pragma Preelaborate;
function error return signed_int_ptr renames sys.errno.error;
E2BIG : constant := sys.errno.E2BIG;
EACCES : constant := sys.errno.EACCES;
EADDRINUSE : constant := sys.errno.EADDRINUSE;
EADDRNOTAVAIL : constant := sys.errno.EADDRNOTAVAIL;
EAFNOSUPPORT : constant := sys.errno.EAFNOSUPPORT;
EAGAIN : constant := sys.errno.EAGAIN;
EALREADY : constant := sys.errno.EALREADY;
EAUTH : constant := sys.errno.EAUTH;
EBADARCH : constant := sys.errno.EBADARCH;
EBADEXEC : constant := sys.errno.EBADEXEC;
EBADF : constant := sys.errno.EBADF;
EBADMACHO : constant := sys.errno.EBADMACHO;
EBADMSG : constant := sys.errno.EBADMSG;
EBADRPC : constant := sys.errno.EBADRPC;
EBUSY : constant := sys.errno.EBUSY;
ECANCELED : constant := sys.errno.ECANCELED;
ECHILD : constant := sys.errno.ECHILD;
ECONNABORTED : constant := sys.errno.ECONNABORTED;
ECONNREFUSED : constant := sys.errno.ECONNREFUSED;
ECONNRESET : constant := sys.errno.ECONNRESET;
EDEADLK : constant := sys.errno.EDEADLK;
EDESTADDRREQ : constant := sys.errno.EDESTADDRREQ;
EDEVERR : constant := sys.errno.EDEVERR;
EDOM : constant := sys.errno.EDOM;
EDQUOT : constant := sys.errno.EDQUOT;
EEXIST : constant := sys.errno.EEXIST;
EFAULT : constant := sys.errno.EFAULT;
EFBIG : constant := sys.errno.EFBIG;
EFTYPE : constant := sys.errno.EFTYPE;
EHOSTDOWN : constant := sys.errno.EHOSTDOWN;
EHOSTUNREACH : constant := sys.errno.EHOSTUNREACH;
EIDRM : constant := sys.errno.EIDRM;
EILSEQ : constant := sys.errno.EILSEQ;
EINPROGRESS : constant := sys.errno.EINPROGRESS;
EINTR : constant := sys.errno.EINTR;
EINVAL : constant := sys.errno.EINVAL;
EIO : constant := sys.errno.EIO;
EISCONN : constant := sys.errno.EISCONN;
EISDIR : constant := sys.errno.EISDIR;
ELAST : constant := sys.errno.ELAST;
ELOOP : constant := sys.errno.ELOOP;
EMFILE : constant := sys.errno.EMFILE;
EMLINK : constant := sys.errno.EMLINK;
EMSGSIZE : constant := sys.errno.EMSGSIZE;
EMULTIHOP : constant := sys.errno.EMULTIHOP;
ENAMETOOLONG : constant := sys.errno.ENAMETOOLONG;
ENEEDAUTH : constant := sys.errno.ENEEDAUTH;
ENETDOWN : constant := sys.errno.ENETDOWN;
ENETRESET : constant := sys.errno.ENETRESET;
ENETUNREACH : constant := sys.errno.ENETUNREACH;
ENFILE : constant := sys.errno.ENFILE;
ENOATTR : constant := sys.errno.ENOATTR;
ENOBUFS : constant := sys.errno.ENOBUFS;
ENODATA : constant := sys.errno.ENODATA;
ENODEV : constant := sys.errno.ENODEV;
ENOENT : constant := sys.errno.ENOENT;
ENOEXEC : constant := sys.errno.ENOEXEC;
ENOLCK : constant := sys.errno.ENOLCK;
ENOLINK : constant := sys.errno.ENOLINK;
ENOMEM : constant := sys.errno.ENOMEM;
ENOMSG : constant := sys.errno.ENOMSG;
ENOPOLICY : constant := sys.errno.ENOPOLICY;
ENOPROTOOPT : constant := sys.errno.ENOPROTOOPT;
ENOSPC : constant := sys.errno.ENOSPC;
ENOSR : constant := sys.errno.ENOSR;
ENOSTR : constant := sys.errno.ENOSTR;
ENOSYS : constant := sys.errno.ENOSYS;
ENOTBLK : constant := sys.errno.ENOTBLK;
ENOTCONN : constant := sys.errno.ENOTCONN;
ENOTDIR : constant := sys.errno.ENOTDIR;
ENOTEMPTY : constant := sys.errno.ENOTEMPTY;
ENOTSOCK : constant := sys.errno.ENOTSOCK;
ENOTSUP : constant := sys.errno.ENOTSUP;
ENOTTY : constant := sys.errno.ENOTTY;
ENXIO : constant := sys.errno.ENXIO;
EOPNOTSUPP : constant := sys.errno.EOPNOTSUPP;
EOVERFLOW : constant := sys.errno.EOVERFLOW;
EPERM : constant := sys.errno.EPERM;
EPFNOSUPPORT : constant := sys.errno.EPFNOSUPPORT;
EPIPE : constant := sys.errno.EPIPE;
EPROCLIM : constant := sys.errno.EPROCLIM;
EPROCUNAVAIL : constant := sys.errno.EPROCUNAVAIL;
EPROGMISMATCH : constant := sys.errno.EPROGMISMATCH;
EPROGUNAVAIL : constant := sys.errno.EPROGUNAVAIL;
EPROTO : constant := sys.errno.EPROTO;
EPROTONOSUPPORT : constant := sys.errno.EPROTONOSUPPORT;
EPROTOTYPE : constant := sys.errno.EPROTOTYPE;
EPWROFF : constant := sys.errno.EPWROFF;
ERANGE : constant := sys.errno.ERANGE;
EREMOTE : constant := sys.errno.EREMOTE;
EROFS : constant := sys.errno.EROFS;
ERPCMISMATCH : constant := sys.errno.ERPCMISMATCH;
ESHLIBVERS : constant := sys.errno.ESHLIBVERS;
ESHUTDOWN : constant := sys.errno.ESHUTDOWN;
ESOCKTNOSUPPORT : constant := sys.errno.ESOCKTNOSUPPORT;
ESPIPE : constant := sys.errno.ESPIPE;
ESRCH : constant := sys.errno.ESRCH;
ESTALE : constant := sys.errno.ESTALE;
ETIME : constant := sys.errno.ETIME;
ETIMEDOUT : constant := sys.errno.ETIMEDOUT;
ETOOMANYREFS : constant := sys.errno.ETOOMANYREFS;
ETXTBSY : constant := sys.errno.ETXTBSY;
EUSERS : constant := sys.errno.EUSERS;
EWOULDBLOCK : constant := sys.errno.EWOULDBLOCK;
EXDEV : constant := sys.errno.EXDEV;
-- SYS_ERRNO_H renames sys.errno.SYS_ERRNO_H (empty)
function errno return signed_int renames sys.errno.errno;
end C.errno;
-- This file is translated by "headmaster" version 0.27-2060155 (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.fcntl;
with C.sys.types;
package C.fcntl is
pragma Preelaborate;
subtype struct_flock is sys.fcntl.struct_flock;
subtype struct_radvisory is sys.fcntl.struct_radvisory;
subtype struct_fsignatures is sys.fcntl.struct_fsignatures;
subtype fsignatures_t is sys.fcntl.fsignatures_t;
subtype struct_fstore is sys.fcntl.struct_fstore;
subtype fstore_t is sys.fcntl.fstore_t;
subtype struct_fbootstraptransfer is sys.fcntl.struct_fbootstraptransfer;
subtype fbootstraptransfer_t is sys.fcntl.fbootstraptransfer_t;
subtype struct_log2phys is sys.fcntl.struct_log2phys;
subtype struct_filesec is sys.fcntl.struct_filesec;
subtype filesec_t is sys.fcntl.filesec_t;
function FILESEC_OWNER return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_OWNER;
function FILESEC_GROUP return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_GROUP;
function FILESEC_UUID return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_UUID;
function FILESEC_MODE return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_MODE;
function FILESEC_ACL return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_ACL;
function FILESEC_GRPUUID return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_GRPUUID;
function FILESEC_ACL_RAW return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_ACL_RAW;
function FILESEC_ACL_ALLOCSIZE return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_ACL_ALLOCSIZE;
subtype filesec_property_t is sys.fcntl.filesec_property_t;
function open (a1 : access constant char; a2 : signed_int)
return signed_int renames sys.fcntl.open;
function open (a1 : access constant char; a2 : signed_int;
a3 : sys.types.mode_t) return signed_int renames sys.fcntl.open;
function creat (a1 : access constant char; a2 : sys.types.mode_t)
return signed_int renames sys.fcntl.creat;
function fcntl (a1 : signed_int; a2 : signed_int) return signed_int
renames sys.fcntl.fcntl;
function fcntl (a1 : signed_int; a2 : signed_int; a3 : access char)
return signed_int renames sys.fcntl.fcntl;
function fcntl (a1 : signed_int; a2 : signed_int; a3 : signed_int)
return signed_int renames sys.fcntl.fcntl;
function openx_np (a1 : access constant char; a2 : signed_int;
a3 : access sys.fcntl.struct_filesec) return signed_int
renames sys.fcntl.openx_np;
function flock (a1 : signed_int; a2 : signed_int) return signed_int
renames sys.fcntl.flock;
function filesec_init return sys.fcntl.filesec_t
renames sys.fcntl.filesec_init;
function filesec_dup (a1 : access sys.fcntl.struct_filesec)
return sys.fcntl.filesec_t renames sys.fcntl.filesec_dup;
procedure filesec_free (a1 : access sys.fcntl.struct_filesec)
renames sys.fcntl.filesec_free;
function filesec_get_property (a1 : access sys.fcntl.struct_filesec;
a2 : sys.fcntl.filesec_property_t; a3 : void_ptr) return signed_int
renames sys.fcntl.filesec_get_property;
function filesec_set_property (a1 : access sys.fcntl.struct_filesec;
a2 : sys.fcntl.filesec_property_t; a3 : void_const_ptr)
return signed_int renames sys.fcntl.filesec_set_property;
function filesec_query_property (a1 : access sys.fcntl.struct_filesec;
a2 : sys.fcntl.filesec_property_t; a3 : access signed_int)
return signed_int renames sys.fcntl.filesec_query_property;
CPF_IGNORE_MODE : constant := sys.fcntl.CPF_IGNORE_MODE;
CPF_MASK : constant := sys.fcntl.CPF_MASK;
CPF_OVERWRITE : constant := sys.fcntl.CPF_OVERWRITE;
FAPPEND : constant := sys.fcntl.FAPPEND;
FASYNC : constant := sys.fcntl.FASYNC;
FCNTL_FS_SPECIFIC_BASE : constant := sys.fcntl.FCNTL_FS_SPECIFIC_BASE;
FD_CLOEXEC : constant := sys.fcntl.FD_CLOEXEC;
FFSYNC : constant := sys.fcntl.FFSYNC;
FILESEC_GUID : sys.fcntl.enum_0e866d2b renames sys.fcntl.FILESEC_GUID;
FNDELAY : constant := sys.fcntl.FNDELAY;
FNONBLOCK : constant := sys.fcntl.FNONBLOCK;
FREAD : constant := sys.fcntl.FREAD;
FWRITE : constant := sys.fcntl.FWRITE;
F_ADDSIGS : constant := sys.fcntl.F_ADDSIGS;
F_ALLOCATEALL : constant := sys.fcntl.F_ALLOCATEALL;
F_ALLOCATECONTIG : constant := sys.fcntl.F_ALLOCATECONTIG;
F_CHKCLEAN : constant := sys.fcntl.F_CHKCLEAN;
F_DUPFD : constant := sys.fcntl.F_DUPFD;
F_FREEZE_FS : constant := sys.fcntl.F_FREEZE_FS;
F_FULLFSYNC : constant := sys.fcntl.F_FULLFSYNC;
F_GETFD : constant := sys.fcntl.F_GETFD;
F_GETFL : constant := sys.fcntl.F_GETFL;
F_GETLK : constant := sys.fcntl.F_GETLK;
F_GETOWN : constant := sys.fcntl.F_GETOWN;
F_GETPATH : constant := sys.fcntl.F_GETPATH;
F_GLOBAL_NOCACHE : constant := sys.fcntl.F_GLOBAL_NOCACHE;
F_LOG2PHYS : constant := sys.fcntl.F_LOG2PHYS;
F_MARKDEPENDENCY : constant := sys.fcntl.F_MARKDEPENDENCY;
F_NOCACHE : constant := sys.fcntl.F_NOCACHE;
F_PATHPKG_CHECK : constant := sys.fcntl.F_PATHPKG_CHECK;
F_PEOFPOSMODE : constant := sys.fcntl.F_PEOFPOSMODE;
F_PREALLOCATE : constant := sys.fcntl.F_PREALLOCATE;
F_RDADVISE : constant := sys.fcntl.F_RDADVISE;
F_RDAHEAD : constant := sys.fcntl.F_RDAHEAD;
F_RDLCK : constant := sys.fcntl.F_RDLCK;
F_READBOOTSTRAP : constant := sys.fcntl.F_READBOOTSTRAP;
F_SETFD : constant := sys.fcntl.F_SETFD;
F_SETFL : constant := sys.fcntl.F_SETFL;
F_SETLK : constant := sys.fcntl.F_SETLK;
F_SETLKW : constant := sys.fcntl.F_SETLKW;
F_SETOWN : constant := sys.fcntl.F_SETOWN;
F_SETSIZE : constant := sys.fcntl.F_SETSIZE;
F_THAW_FS : constant := sys.fcntl.F_THAW_FS;
F_UNLCK : constant := sys.fcntl.F_UNLCK;
F_VOLPOSMODE : constant := sys.fcntl.F_VOLPOSMODE;
F_WRITEBOOTSTRAP : constant := sys.fcntl.F_WRITEBOOTSTRAP;
F_WRLCK : constant := sys.fcntl.F_WRLCK;
LOCK_EX : constant := sys.fcntl.LOCK_EX;
LOCK_NB : constant := sys.fcntl.LOCK_NB;
LOCK_SH : constant := sys.fcntl.LOCK_SH;
LOCK_UN : constant := sys.fcntl.LOCK_UN;
O_ACCMODE : constant := sys.fcntl.O_ACCMODE;
O_ALERT : constant := sys.fcntl.O_ALERT;
O_APPEND : constant := sys.fcntl.O_APPEND;
O_ASYNC : constant := sys.fcntl.O_ASYNC;
O_CREAT : constant := sys.fcntl.O_CREAT;
O_DIRECTORY : constant := sys.fcntl.O_DIRECTORY;
O_EVTONLY : constant := sys.fcntl.O_EVTONLY;
O_EXCL : constant := sys.fcntl.O_EXCL;
O_EXLOCK : constant := sys.fcntl.O_EXLOCK;
O_FSYNC : constant := sys.fcntl.O_FSYNC;
O_NDELAY : constant := sys.fcntl.O_NDELAY;
O_NOCTTY : constant := sys.fcntl.O_NOCTTY;
O_NOFOLLOW : constant := sys.fcntl.O_NOFOLLOW;
O_NONBLOCK : constant := sys.fcntl.O_NONBLOCK;
O_POPUP : constant := sys.fcntl.O_POPUP;
O_RDONLY : constant := sys.fcntl.O_RDONLY;
O_RDWR : constant := sys.fcntl.O_RDWR;
O_SHLOCK : constant := sys.fcntl.O_SHLOCK;
O_SYMLINK : constant := sys.fcntl.O_SYMLINK;
O_SYNC : constant := sys.fcntl.O_SYNC;
O_TRUNC : constant := sys.fcntl.O_TRUNC;
O_WRONLY : constant := sys.fcntl.O_WRONLY;
S_IEXEC : constant := sys.fcntl.S_IEXEC;
S_IFBLK : constant := sys.fcntl.S_IFBLK;
S_IFCHR : constant := sys.fcntl.S_IFCHR;
S_IFDIR : constant := sys.fcntl.S_IFDIR;
S_IFIFO : constant := sys.fcntl.S_IFIFO;
S_IFLNK : constant := sys.fcntl.S_IFLNK;
S_IFMT : constant := sys.fcntl.S_IFMT;
S_IFREG : constant := sys.fcntl.S_IFREG;
S_IFSOCK : constant := sys.fcntl.S_IFSOCK;
S_IFWHT : constant := sys.fcntl.S_IFWHT;
S_IFXATTR : constant := sys.fcntl.S_IFXATTR;
S_IREAD : constant := sys.fcntl.S_IREAD;
S_IRGRP : constant := sys.fcntl.S_IRGRP;
S_IROTH : constant := sys.fcntl.S_IROTH;
S_IRUSR : constant := sys.fcntl.S_IRUSR;
S_IRWXG : constant := sys.fcntl.S_IRWXG;
S_IRWXO : constant := sys.fcntl.S_IRWXO;
S_IRWXU : constant := sys.fcntl.S_IRWXU;
S_ISGID : constant := sys.fcntl.S_ISGID;
S_ISTXT : constant := sys.fcntl.S_ISTXT;
S_ISUID : constant := sys.fcntl.S_ISUID;
S_ISVTX : constant := sys.fcntl.S_ISVTX;
S_IWGRP : constant := sys.fcntl.S_IWGRP;
S_IWOTH : constant := sys.fcntl.S_IWOTH;
S_IWRITE : constant := sys.fcntl.S_IWRITE;
S_IWUSR : constant := sys.fcntl.S_IWUSR;
S_IXGRP : constant := sys.fcntl.S_IXGRP;
S_IXOTH : constant := sys.fcntl.S_IXOTH;
S_IXUSR : constant := sys.fcntl.S_IXUSR;
FILESEC_REMOVE_ACL : void_ptr renames sys.fcntl.FILESEC_REMOVE_ACL;
-- qFILESEC_T renames sys.fcntl.qFILESEC_T (empty)
FILESEC_UNSET_PROPERTY : void_ptr
renames sys.fcntl.FILESEC_UNSET_PROPERTY;
-- SYS_FCNTL_H renames sys.fcntl.SYS_FCNTL_H (empty)
O_CLOEXEC : constant := 0;
end C.fcntl;
-- This file is translated by "headmaster" version 0.27-2060155 (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$UNIX2003");
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 is translated by "headmaster" version 0.27-2060155 (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);
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 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 return struct_group_ptr;
pragma Import (C, getgrent, "getgrent");
procedure setgrent;
pragma Import (C, setgrent, "setgrent");
procedure endgrent;
pragma Import (C, endgrent, "endgrent");
function group_from_gid (a1 : sys.types.gid_t; a2 : signed_int)
return char_ptr;
pragma Import (C, group_from_gid, "group_from_gid");
procedure setgrfile (a1 : access constant char);
pragma Import (C, setgrfile, "setgrfile");
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 is translated by "headmaster" version 0.27-2060155 (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.i386.eflags is
pragma Preelaborate;
EFL_AC : constant := 262144;
EFL_AF : constant := 16;
EFL_CF : constant := 1;
EFL_CLR : constant := -491480;
EFL_DF : constant := 1024;
EFL_ID : constant := 2097152;
EFL_IF : constant := 512;
EFL_IOPL : constant := 12288;
EFL_IOPL_KERNEL : constant := 0;
EFL_IOPL_USER : constant := 12288;
EFL_NT : constant := 16384;
EFL_OF : constant := 2048;
EFL_PF : constant := 4;
EFL_RF : constant := 65536;
EFL_SET : constant := 2;
EFL_SF : constant := 128;
EFL_TF : constant := 256;
EFL_USER_CLEAR : constant := 94208;
EFL_USER_SET : constant := 512;
EFL_VIF : constant := 524288;
EFL_VIP : constant := 1048576;
EFL_VM : constant := 131072;
EFL_ZF : constant := 64;
-- _I386_EFLAGS_H_ (empty)
end C.i386.eflags;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.endian is
pragma Preelaborate;
BIG_ENDIAN : constant := 4321;
BYTE_ORDER : constant := 1234;
LITTLE_ENDIAN : constant := 1234;
PDP_ENDIAN : constant := 3412;
-- _I386__ENDIAN_H_ (empty)
QUAD_HIGHWORD : constant := 1;
QUAD_LOWWORD : constant := 0;
DARWIN_BIG_ENDIAN : constant := 4321;
DARWIN_BYTE_ORDER : constant := 1234;
DARWIN_LITTLE_ENDIAN : constant := 1234;
DARWIN_PDP_ENDIAN : constant := 3412;
end C.i386.endian;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.limits is
pragma Preelaborate;
CLK_TCK : constant := 100;
LONG_BIT : constant := 32;
MB_LEN_MAX : constant := 6;
QUAD_MAX : constant := 9223372036854775807;
QUAD_MIN : constant := -9223372036854775808;
SIZE_T_MAX : constant := 4294967295;
SSIZE_MAX : constant := 2147483647;
UQUAD_MAX : constant := 18446744073709551615;
WORD_BIT : constant := 32;
-- _I386_LIMITS_H_ (empty)
end C.i386.limits;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.param is
pragma Preelaborate;
-- ALIGN (function macro)
ALIGNBYTES : constant := 3;
-- BASEPRI (function macro)
BLKDEV_IOSIZE : constant := 2048;
CLSIZE : constant := 1;
CLSIZELOG2 : constant := 0;
-- DELAY (function macro)
DEV_BSHIFT : constant := 9;
DEV_BSIZE : constant := 512;
MAXPHYS : constant := 131072;
MCLBYTES : constant := 2048;
MCLOFSET : constant := 2047;
MCLSHIFT : constant := 11;
MSIZE : constant := 256;
NBPG : constant := 4096;
NMBCLUSTERS : constant := 256;
PGOFSET : constant := 4095;
PGSHIFT : constant := 12;
-- STATUS_WORD (function macro)
-- USERMODE (function macro)
-- _I386_PARAM_H_ (empty)
-- bdbtofsb (function macro)
-- btoc (function macro)
-- btodb (function macro)
-- ctob (function macro)
-- ctod (function macro)
-- ctos (function macro)
-- dbtob (function macro)
-- dtob (function macro)
-- dtoc (function macro)
-- stoc (function macro)
end C.i386.param;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qlimits is
pragma Preelaborate;
-- _I386__LIMITS_H_ (empty)
DARWIN_CLK_TCK : constant := 100;
end C.i386.qlimits;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qparam is
pragma Preelaborate;
-- _I386__PARAM_H_ (empty)
-- __DARWIN_ALIGN (function macro)
DARWIN_ALIGNBYTES : constant := 3;
end C.i386.qparam;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.qstructs;
package C.i386.qstructs is
pragma Preelaborate;
type struct_darwin_mcontext32;
type struct_darwin_mcontext32 is record
es : aliased mach.i386.qstructs.struct_darwin_i386_exception_state;
ss : aliased mach.i386.qstructs.struct_darwin_i386_thread_state;
fs : aliased mach.i386.qstructs.struct_darwin_i386_float_state;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_mcontext32);
type struct_darwin_mcontext32_ptr is access all struct_darwin_mcontext32;
for struct_darwin_mcontext32_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_darwin_mcontext32_ptr);
pragma Convention (C, struct_darwin_mcontext32_ptr);
type struct_darwin_mcontext64;
type struct_darwin_mcontext64 is record
es : aliased mach.i386.qstructs.struct_darwin_x86_exception_state64;
ss : aliased mach.i386.qstructs.struct_darwin_x86_thread_state64;
fs : aliased mach.i386.qstructs.struct_darwin_x86_float_state64;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_mcontext64);
subtype mcontext_t is struct_darwin_mcontext32_ptr;
-- I386_MCONTEXT_SIZE (unparsible)
-- _MCONTEXT_T (empty)
subtype STRUCT_MCONTEXT is struct_darwin_mcontext32;
subtype STRUCT_MCONTEXT32 is struct_darwin_mcontext32;
subtype STRUCT_MCONTEXT64 is struct_darwin_mcontext64;
end C.i386.qstructs;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.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_array is signed_int_array;
subtype int32_t_ptr is signed_int_ptr;
subtype uint32_t is unsigned_int;
subtype uint32_t_const_ptr is unsigned_int_const_ptr;
subtype uint32_t_ptr is unsigned_int_ptr;
subtype uint32_t_array is unsigned_int_array;
subtype int64_t is signed_long_long;
subtype int64_t_ptr is signed_long_long_ptr;
subtype int64_t_array is signed_long_long_array;
subtype int64_t_const_ptr is signed_long_long_const_ptr;
subtype uint64_t is unsigned_long_long;
subtype darwin_intptr_t is signed_long;
subtype darwin_natural_t is unsigned_int;
subtype darwin_natural_t_ptr is unsigned_int_ptr;
subtype darwin_natural_t_array is unsigned_int_array;
subtype darwin_natural_t_ptr_ptr is unsigned_int_ptr_ptr;
subtype darwin_ct_rune_t is signed_int;
type union_de6b22ea (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
mbstate8 : char_array (0 .. 127);
when others =>
mbstateL : signed_long_long;
end case;
end record;
pragma Unchecked_Union (union_de6b22ea);
pragma Convention (C_Pass_By_Copy, union_de6b22ea);
type union_de6b22ea_ptr is access all union_de6b22ea;
for union_de6b22ea_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (union_de6b22ea_ptr);
pragma Convention (C, union_de6b22ea_ptr);
type union_de6b22ea_const_ptr is access constant union_de6b22ea;
for union_de6b22ea_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (union_de6b22ea_const_ptr);
pragma Convention (C, union_de6b22ea_const_ptr);
subtype mbstate_t is union_de6b22ea;
subtype mbstate_t_ptr is union_de6b22ea_ptr;
subtype mbstate_t_const_ptr is union_de6b22ea_const_ptr;
subtype darwin_mbstate_t is mbstate_t;
subtype darwin_mbstate_t_ptr is mbstate_t_ptr;
subtype darwin_mbstate_t_const_ptr is mbstate_t_const_ptr;
subtype darwin_ptrdiff_t is signed_int;
subtype darwin_size_t is unsigned_long;
subtype darwin_va_list is builtin_va_list;
subtype darwin_wchar_t is signed_int;
subtype darwin_wchar_t_array is signed_int_array;
subtype darwin_rune_t is darwin_wchar_t;
subtype darwin_rune_t_array is darwin_wchar_t_array;
subtype darwin_wint_t is signed_int;
subtype darwin_clock_t is unsigned_long;
subtype darwin_socklen_t is uint32_t;
subtype darwin_socklen_t_ptr is uint32_t_ptr;
subtype darwin_ssize_t is signed_long;
subtype darwin_time_t is signed_long;
subtype darwin_time_t_const_ptr is signed_long_const_ptr;
subtype darwin_time_t_ptr is signed_long_ptr;
-- _BSD_I386__TYPES_H_ (empty)
end C.i386.qtypes;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.signal is
pragma Preelaborate;
subtype sig_atomic_t is signed_int;
I386_SIGNAL_H : constant := 1;
-- __need_struct_sigcontext (empty)
end C.i386.signal;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
package C.i386.types is
pragma Preelaborate;
subtype u_int8_t is unsigned_char;
subtype u_int16_t is unsigned_short;
subtype u_int32_t is unsigned_int;
subtype u_int32_t_array is unsigned_int_array;
subtype u_int64_t is unsigned_long_long;
subtype register_t is stdint.int32_t;
subtype user_addr_t is u_int64_t;
subtype user_size_t is u_int64_t;
subtype user_ssize_t is stdint.int64_t;
subtype user_long_t is stdint.int64_t;
subtype user_ulong_t is u_int64_t;
subtype user_time_t is stdint.int64_t;
subtype syscall_arg_t is u_int64_t;
-- CAST_USER_ADDR_T (function macro)
USER_ADDR_NULL : constant := 0;
-- _MACHTYPES_H_ (empty)
-- __offsetof (unparsible)
end C.i386.types;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386 is
pragma Preelaborate;
end C.i386;
-- This file is translated by "headmaster" version 0.27-2060155 (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.iconv is
pragma Preelaborate;
qlibiconv_version : aliased signed_int;
pragma Import (C, qlibiconv_version, "_libiconv_version");
subtype iconv_t is void_ptr;
function iconv_open (a1 : access constant char; a2 : access constant char)
return iconv_t;
pragma Import (C, iconv_open, "iconv_open");
function iconv (a1 : iconv_t; a2 : access char_ptr;
a3 : access stddef.size_t; a4 : access char_ptr;
a5 : access stddef.size_t) return stddef.size_t;
function iconv (cd : iconv_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, iconv, "iconv");
function iconv_close (a1 : iconv_t) return signed_int;
pragma Import (C, iconv_close, "iconv_close");
function iconvctl (a1 : iconv_t; a2 : signed_int; a3 : void_ptr)
return signed_int;
pragma Import (C, iconvctl, "iconvctl");
type access_67d781d4 is access procedure (uc : unsigned_int;
data : void_ptr);
pragma Convention (C, access_67d781d4);
subtype iconv_unicode_char_hook is access_67d781d4;
type access_99f0807d is access procedure (wc : stddef.wchar_t;
data : void_ptr);
pragma Convention (C, access_99f0807d);
subtype iconv_wide_char_hook is access_99f0807d;
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_b89b218a is access procedure (
buf : access constant unsigned_int; buflen : stddef.size_t;
callback_arg : void_ptr);
pragma Convention (C, access_b89b218a);
type access_c50c3829 is access procedure (inbuf : access constant char;
inbufsize : stddef.size_t; write_replacement : access_b89b218a;
callback_arg : void_ptr; data : void_ptr);
pragma Convention (C, access_c50c3829);
subtype iconv_unicode_mb_to_uc_fallback is access_c50c3829;
type access_54ca597c is access procedure (buf : access constant char;
buflen : stddef.size_t; callback_arg : void_ptr);
pragma Convention (C, access_54ca597c);
type access_5750af62 is access procedure (code : unsigned_int;
write_replacement : access_54ca597c; callback_arg : void_ptr;
data : void_ptr);
pragma Convention (C, access_5750af62);
subtype iconv_unicode_uc_to_mb_fallback is access_5750af62;
type access_814fad5f is access procedure (
buf : access constant stddef.wchar_t; buflen : stddef.size_t;
callback_arg : void_ptr);
pragma Convention (C, access_814fad5f);
type access_6892ad33 is access procedure (inbuf : access constant char;
inbufsize : stddef.size_t; write_replacement : access_814fad5f;
callback_arg : void_ptr; data : void_ptr);
pragma Convention (C, access_6892ad33);
subtype iconv_wchar_mb_to_wc_fallback is access_6892ad33;
type access_fc6c8a97 is access procedure (buf : access constant char;
buflen : stddef.size_t; callback_arg : void_ptr);
pragma Convention (C, access_fc6c8a97);
type access_696e5559 is access procedure (code : stddef.wchar_t;
write_replacement : access_fc6c8a97; callback_arg : void_ptr;
data : void_ptr);
pragma Convention (C, access_696e5559);
subtype iconv_wchar_wc_to_mb_fallback is access_696e5559;
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_a94d83c2 is access function (a1 : unsigned_int;
a2 : access char_const_ptr; a3 : void_ptr) return signed_int;
pragma Convention (C, access_a94d83c2);
procedure iconvlist (a1 : access_a94d83c2; a2 : void_ptr);
pragma Import (C, iconvlist, "iconvlist");
function iconv_canonicalize (name : access constant char)
return char_const_ptr;
pragma Import (C, iconv_canonicalize, "iconv_canonicalize");
procedure libiconv_set_relocation_prefix (a1 : access constant char;
a2 : 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;
-- _ICONV_T (empty)
-- _LIBICONV_H (empty)
LIBICONV_VERSION : constant := 267;
end C.iconv;
-- This file is translated by "headmaster" version 0.27-2060155 (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.libkern.i386.qOSByteOrder is
function OSSwapInt16 (data : Standard.C.i386.qtypes.uint16_t)
return Standard.C.i386.qtypes.uint16_t is
begin
return Standard.C.i386.qtypes.uint16_t'(Shift_Left (data, 8))
or Standard.C.i386.qtypes.uint16_t'(Shift_Right (data, 8));
end OSSwapInt16;
function OSSwapInt32 (data : Standard.C.i386.qtypes.uint32_t)
return Standard.C.i386.qtypes.uint32_t
is
Mutable_data : Standard.C.i386.qtypes.uint32_t := data;
begin
Asm ("bswap %0",
Outputs =>
Standard.C.i386.qtypes.uint32_t'Asm_Output ("+r", Mutable_data),
Volatile => True);
return Mutable_data;
end OSSwapInt32;
function OSSwapInt64 (data : Standard.C.i386.qtypes.uint64_t)
return Standard.C.i386.qtypes.uint64_t
is
Mutable_data : Standard.C.i386.qtypes.uint64_t := data;
begin
Asm ("bswap %%eax" & ASCII.LF & ASCII.HT & "bswap %%edx" & ASCII.LF
& ASCII.HT & "xchgl %%eax, %%edx",
Outputs =>
Standard.C.i386.qtypes.uint64_t'Asm_Output ("+A", Mutable_data),
Volatile => True);
return Mutable_data;
end OSSwapInt64;
end C.libkern.i386.qOSByteOrder;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
package C.libkern.i386.qOSByteOrder is
pragma Preelaborate;
function OSSwapInt16 (data : Standard.C.i386.qtypes.uint16_t)
return Standard.C.i386.qtypes.uint16_t;
pragma Convention (C, OSSwapInt16);
pragma Inline (OSSwapInt16);
function OSSwapInt32 (data : Standard.C.i386.qtypes.uint32_t)
return Standard.C.i386.qtypes.uint32_t;
pragma Convention (C, OSSwapInt32);
pragma Inline (OSSwapInt32);
function OSSwapInt64 (data : Standard.C.i386.qtypes.uint64_t)
return Standard.C.i386.qtypes.uint64_t;
pragma Convention (C, OSSwapInt64);
pragma Inline (OSSwapInt64);
-- _OS__OSBYTEORDERI386_H (empty)
-- __DARWIN_OS_INLINE (alias of static inline)
end C.libkern.i386.qOSByteOrder;
-- This file is translated by "headmaster" version 0.27-2060155 (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.libkern.i386 is
pragma Preelaborate;
end C.libkern.i386;
-- This file is translated by "headmaster" version 0.27-2060155 (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.libkern.qOSByteOrder is
pragma Preelaborate;
-- _OS__OSBYTEORDER_H (empty)
-- __DARWIN_OSSwapConstInt16 (function macro)
-- __DARWIN_OSSwapConstInt32 (function macro)
-- __DARWIN_OSSwapConstInt64 (function macro)
-- __DARWIN_OSSwapInt16 (function macro)
-- __DARWIN_OSSwapInt32 (function macro)
-- __DARWIN_OSSwapInt64 (function macro)
end C.libkern.qOSByteOrder;
-- This file is translated by "headmaster" version 0.27-2060155 (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.libkern is
pragma Preelaborate;
end C.libkern;
-- This file is translated by "headmaster" version 0.27-2060155 (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.limits is
pragma Preelaborate;
CHAR_BIT : constant := 8;
CHAR_MAX : constant := 127;
CHAR_MIN : constant := -128;
INT_MAX : constant := 2147483647;
INT_MIN : constant := -2147483648;
LLONG_MAX : constant := 9223372036854775807;
LLONG_MIN : constant := -9223372036854775808;
LONG_LONG_MAX : constant := 9223372036854775807;
LONG_LONG_MIN : constant := -9223372036854775808;
LONG_MAX : constant := 2147483647;
LONG_MIN : constant := -2147483648;
SCHAR_MAX : constant := 127;
SCHAR_MIN : constant := -128;
SHRT_MAX : constant := 32767;
SHRT_MIN : constant := -32768;
UCHAR_MAX : constant := 255;
UINT_MAX : constant := 4294967295;
ULLONG_MAX : constant := 18446744073709551615;
ULONG_LONG_MAX : constant := 18446744073709551615;
ULONG_MAX : constant := 4294967295;
USHRT_MAX : constant := 65535;
-- _GCC_LIMITS_H_ (empty)
-- _LIMITS_H___ (empty)
IOV_MAX : constant := 1024;
NL_ARGMAX : constant := 9;
NL_LANGMAX : constant := 14;
NL_MSGMAX : constant := 32767;
NL_NMAX : constant := 1;
NL_SETMAX : constant := 255;
NL_TEXTMAX : constant := 2048;
PASS_MAX : constant := 128;
PTHREAD_DESTRUCTOR_ITERATIONS : constant := 4;
PTHREAD_KEYS_MAX : constant := 512;
PTHREAD_STACK_MIN : constant := 8192;
-- _LIMITS_H_ (empty)
POSIX2_BC_BASE_MAX : constant := 99;
POSIX2_BC_DIM_MAX : constant := 2048;
POSIX2_BC_SCALE_MAX : constant := 99;
POSIX2_BC_STRING_MAX : constant := 1000;
POSIX2_CHARCLASS_NAME_MAX : constant := 14;
POSIX2_COLL_WEIGHTS_MAX : constant := 2;
POSIX2_EQUIV_CLASS_MAX : constant := 2;
POSIX2_EXPR_NEST_MAX : constant := 32;
POSIX2_LINE_MAX : constant := 2048;
POSIX2_RE_DUP_MAX : constant := 255;
POSIX_AIO_LISTIO_MAX : constant := 2;
POSIX_AIO_MAX : constant := 1;
POSIX_ARG_MAX : constant := 4096;
POSIX_CHILD_MAX : constant := 25;
POSIX_DELAYTIMER_MAX : constant := 32;
POSIX_HOST_NAME_MAX : constant := 255;
POSIX_LINK_MAX : constant := 8;
POSIX_LOGIN_NAME_MAX : constant := 9;
POSIX_MAX_CANON : constant := 255;
POSIX_MAX_INPUT : constant := 255;
POSIX_MQ_OPEN_MAX : constant := 8;
POSIX_MQ_PRIO_MAX : constant := 32;
POSIX_NAME_MAX : constant := 14;
POSIX_NGROUPS_MAX : constant := 8;
POSIX_OPEN_MAX : constant := 20;
POSIX_PATH_MAX : constant := 256;
POSIX_PIPE_BUF : constant := 512;
POSIX_RE_DUP_MAX : constant := 255;
POSIX_RTSIG_MAX : constant := 8;
POSIX_SEM_NSEMS_MAX : constant := 256;
POSIX_SEM_VALUE_MAX : constant := 32767;
POSIX_SIGQUEUE_MAX : constant := 32;
POSIX_SSIZE_MAX : constant := 32767;
POSIX_SS_REPL_MAX : constant := 4;
POSIX_STREAM_MAX : constant := 8;
POSIX_SYMLINK_MAX : constant := 255;
POSIX_SYMLOOP_MAX : constant := 8;
POSIX_THREAD_DESTRUCTOR_ITERATIONS : constant := 4;
POSIX_THREAD_KEYS_MAX : constant := 128;
POSIX_THREAD_THREADS_MAX : constant := 64;
POSIX_TIMER_MAX : constant := 32;
POSIX_TRACE_EVENT_NAME_MAX : constant := 30;
POSIX_TRACE_NAME_MAX : constant := 8;
POSIX_TRACE_SYS_MAX : constant := 8;
POSIX_TRACE_USER_EVENT_MAX : constant := 32;
POSIX_TTY_NAME_MAX : constant := 9;
POSIX_TZNAME_MAX : constant := 6;
XOPEN_IOV_MAX : constant := 16;
XOPEN_NAME_MAX : constant := 255;
XOPEN_PATH_MAX : constant := 1024;
end C.limits;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.boolean is
pragma Preelaborate;
-- _MACH_BOOLEAN_H_ (empty)
end C.mach.boolean;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.clock_types is
pragma Preelaborate;
subtype alarm_type_t is signed_int;
subtype sleep_type_t is signed_int;
subtype clock_id_t is signed_int;
subtype clock_flavor_t is signed_int;
subtype clock_attr_t is signed_int_ptr;
subtype clock_res_t is signed_int;
type struct_mach_timespec;
type struct_mach_timespec is record
tv_sec : aliased unsigned_int;
tv_nsec : aliased clock_res_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_mach_timespec);
subtype mach_timespec_t is struct_mach_timespec;
-- ADD_MACH_TIMESPEC (uninterpretable)
ALRMTYPE : constant := 255;
-- BAD_ALRMTYPE (function macro)
-- BAD_MACH_TIMESPEC (uninterpretable)
CALENDAR_CLOCK : constant := 1;
CLOCK_ALARM_CURRES : constant := 3;
CLOCK_ALARM_MAXRES : constant := 5;
CLOCK_ALARM_MINRES : constant := 4;
CLOCK_GET_TIME_RES : constant := 1;
-- CMP_MACH_TIMESPEC (uninterpretable)
NSEC_PER_SEC : constant := 1000000000;
NSEC_PER_USEC : constant := 1000;
REALTIME_CLOCK : constant := 0;
-- SUB_MACH_TIMESPEC (uninterpretable)
SYSTEM_CLOCK : constant := 0;
TIME_ABSOLUTE : constant := 0;
TIME_RELATIVE : constant := 1;
USEC_PER_SEC : constant := 1000000;
-- _MACH_CLOCK_TYPES_H_ (empty)
end C.mach.clock_types;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
with C.mach.thread_status;
with C.pthread;
with C.stdint;
package C.mach.exception_types is
pragma Preelaborate;
subtype exception_type_t is signed_int;
subtype exception_data_type_t is mach.i386.vm_types.integer_t;
subtype exception_data_type_t_ptr is mach.i386.vm_types.integer_t_ptr;
subtype mach_exception_data_type_t is stdint.int64_t;
subtype mach_exception_data_type_t_ptr is stdint.int64_t_ptr;
subtype exception_behavior_t is signed_int;
subtype exception_behavior_t_ptr is signed_int_ptr;
subtype exception_data_t is exception_data_type_t_ptr;
subtype mach_exception_data_t is mach_exception_data_type_t_ptr;
subtype exception_mask_t is unsigned_int;
subtype exception_mask_t_ptr is unsigned_int_ptr;
subtype exception_mask_array_t is exception_mask_t_ptr;
subtype exception_behavior_array_t is exception_behavior_t_ptr;
subtype exception_flavor_array_t is
mach.thread_status.thread_state_flavor_t_ptr;
subtype exception_port_array_t is pthread.mach_port_t_ptr;
subtype mach_exception_code_t is mach_exception_data_type_t;
subtype mach_exception_subcode_t is mach_exception_data_type_t;
EXCEPTION_DEFAULT : constant := 1;
EXCEPTION_STATE : constant := 2;
EXCEPTION_STATE_IDENTITY : constant := 3;
EXC_ARITHMETIC : constant := 3;
EXC_BAD_ACCESS : constant := 1;
EXC_BAD_INSTRUCTION : constant := 2;
EXC_BREAKPOINT : constant := 6;
EXC_CRASH : constant := 10;
EXC_EMULATION : constant := 4;
EXC_MACH_SYSCALL : constant := 8;
EXC_MASK_ALL : constant := 2046;
EXC_MASK_ARITHMETIC : constant := 8;
EXC_MASK_BAD_ACCESS : constant := 2;
EXC_MASK_BAD_INSTRUCTION : constant := 4;
EXC_MASK_BREAKPOINT : constant := 64;
EXC_MASK_CRASH : constant := 1024;
EXC_MASK_EMULATION : constant := 16;
EXC_MASK_MACH_SYSCALL : constant := 256;
EXC_MASK_RPC_ALERT : constant := 512;
EXC_MASK_SOFTWARE : constant := 32;
EXC_MASK_SYSCALL : constant := 128;
EXC_RPC_ALERT : constant := 9;
EXC_SOFTWARE : constant := 5;
EXC_SOFT_SIGNAL : constant := 65539;
EXC_SYSCALL : constant := 7;
FIRST_EXCEPTION : constant := 1;
MACH_EXCEPTION_CODES : constant := -2147483648;
-- _MACH_EXCEPTION_TYPES_H_ (empty)
end C.mach.exception_types;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
with C.mach.machine;
with C.stdint;
package C.mach.host_info is
pragma Preelaborate;
subtype host_info_t is mach.i386.vm_types.integer_t_ptr;
subtype host_info_data_t is
mach.i386.vm_types.integer_t_array (0 .. 1023);
subtype kernel_version_t is char_array (0 .. 511);
subtype kernel_boot_info_t is char_array (0 .. 4095);
subtype host_flavor_t is mach.i386.vm_types.integer_t;
type struct_host_basic_info;
type struct_host_basic_info is record
max_cpus : aliased mach.i386.vm_types.integer_t;
avail_cpus : aliased mach.i386.vm_types.integer_t;
memory_size : aliased mach.i386.vm_types.natural_t;
cpu_type : aliased mach.machine.cpu_type_t;
cpu_subtype : aliased mach.machine.cpu_subtype_t;
cpu_threadtype : aliased mach.machine.cpu_threadtype_t;
physical_cpu : aliased mach.i386.vm_types.integer_t;
physical_cpu_max : aliased mach.i386.vm_types.integer_t;
logical_cpu : aliased mach.i386.vm_types.integer_t;
logical_cpu_max : aliased mach.i386.vm_types.integer_t;
max_mem : aliased stdint.uint64_t;
end record;
for struct_host_basic_info'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_host_basic_info);
type struct_host_basic_info_ptr is access all struct_host_basic_info;
for struct_host_basic_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_host_basic_info_ptr);
pragma Convention (C, struct_host_basic_info_ptr);
subtype host_basic_info_data_t is struct_host_basic_info;
subtype host_basic_info_t is struct_host_basic_info_ptr;
type struct_host_sched_info;
type struct_host_sched_info is record
min_timeout : aliased mach.i386.vm_types.integer_t;
min_quantum : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_host_sched_info);
type struct_host_sched_info_ptr is access all struct_host_sched_info;
for struct_host_sched_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_host_sched_info_ptr);
pragma Convention (C, struct_host_sched_info_ptr);
subtype host_sched_info_data_t is struct_host_sched_info;
subtype host_sched_info_t is struct_host_sched_info_ptr;
type struct_kernel_resource_sizes;
type struct_kernel_resource_sizes is record
F_task : aliased mach.i386.vm_types.natural_t;
thread : aliased mach.i386.vm_types.natural_t;
port : aliased mach.i386.vm_types.natural_t;
memory_region : aliased mach.i386.vm_types.natural_t;
memory_object : aliased mach.i386.vm_types.natural_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_kernel_resource_sizes);
type struct_kernel_resource_sizes_ptr is
access all struct_kernel_resource_sizes;
for struct_kernel_resource_sizes_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_kernel_resource_sizes_ptr);
pragma Convention (C, struct_kernel_resource_sizes_ptr);
subtype kernel_resource_sizes_data_t is struct_kernel_resource_sizes;
subtype kernel_resource_sizes_t is struct_kernel_resource_sizes_ptr;
type struct_host_priority_info;
type struct_host_priority_info is record
kernel_priority : aliased mach.i386.vm_types.integer_t;
system_priority : aliased mach.i386.vm_types.integer_t;
server_priority : aliased mach.i386.vm_types.integer_t;
user_priority : aliased mach.i386.vm_types.integer_t;
depress_priority : aliased mach.i386.vm_types.integer_t;
idle_priority : aliased mach.i386.vm_types.integer_t;
minimum_priority : aliased mach.i386.vm_types.integer_t;
maximum_priority : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_host_priority_info);
type struct_host_priority_info_ptr is
access all struct_host_priority_info;
for struct_host_priority_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_host_priority_info_ptr);
pragma Convention (C, struct_host_priority_info_ptr);
subtype host_priority_info_data_t is struct_host_priority_info;
subtype host_priority_info_t is struct_host_priority_info_ptr;
type struct_host_load_info;
type struct_host_load_info is record
avenrun : aliased mach.i386.vm_types.integer_t_array (0 .. 2);
mach_factor : aliased mach.i386.vm_types.integer_t_array (0 .. 2);
end record;
pragma Convention (C_Pass_By_Copy, struct_host_load_info);
type struct_host_load_info_ptr is access all struct_host_load_info;
for struct_host_load_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_host_load_info_ptr);
pragma Convention (C, struct_host_load_info_ptr);
subtype host_load_info_data_t is struct_host_load_info;
subtype host_load_info_t is struct_host_load_info_ptr;
type struct_host_cpu_load_info;
type struct_host_cpu_load_info is record
cpu_ticks : aliased mach.i386.vm_types.natural_t_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_host_cpu_load_info);
type struct_host_cpu_load_info_ptr is
access all struct_host_cpu_load_info;
for struct_host_cpu_load_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_host_cpu_load_info_ptr);
pragma Convention (C, struct_host_cpu_load_info_ptr);
subtype host_cpu_load_info_data_t is struct_host_cpu_load_info;
subtype host_cpu_load_info_t is struct_host_cpu_load_info_ptr;
HOST_BASIC_INFO : constant := 1;
HOST_BASIC_INFO_COUNT : constant := 12;
HOST_CPU_LOAD_INFO : constant := 3;
HOST_CPU_LOAD_INFO_COUNT : constant := 4;
HOST_INFO_MAX : constant := 1024;
HOST_LOAD_INFO : constant := 1;
HOST_LOAD_INFO_COUNT : constant := 6;
HOST_MACH_MSG_TRAP : constant := 8;
HOST_PRIORITY_INFO : constant := 5;
HOST_PRIORITY_INFO_COUNT : constant := 8;
HOST_RESOURCE_SIZES : constant := 4;
HOST_RESOURCE_SIZES_COUNT : constant := 5;
HOST_SCHED_INFO : constant := 3;
HOST_SCHED_INFO_COUNT : constant := 2;
HOST_SEMAPHORE_TRAPS : constant := 7;
HOST_VM_INFO : constant := 2;
HOST_VM_INFO_COUNT : constant := 15;
HOST_VM_INFO_LATEST_COUNT : constant := 15;
HOST_VM_INFO_REV0_COUNT : constant := 12;
HOST_VM_INFO_REV1_COUNT : constant := 14;
HOST_VM_INFO_REV2_COUNT : constant := 15;
KERNEL_BOOT_INFO_MAX : constant := 4096;
KERNEL_VERSION_MAX : constant := 512;
-- _MACH_HOST_INFO_H_ (empty)
end C.mach.host_info;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.host_notify is
pragma Preelaborate;
HOST_CALENDAR_CHANGED_REPLYID : constant := 950;
HOST_NOTIFY_CALENDAR_CHANGE : constant := 0;
HOST_NOTIFY_TYPE_MAX : constant := 0;
-- _MACH_HOST_NOTIFY_H_ (empty)
end C.mach.host_notify;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.host_special_ports is
pragma Preelaborate;
HOST_AUDIT_CONTROL_PORT : constant := 9;
HOST_DYNAMIC_PAGER_PORT : constant := 8;
HOST_IO_MASTER_PORT : constant := 3;
HOST_LOCAL_NODE : constant := -1;
HOST_LOCKD_PORT : constant := 12;
HOST_MAX_SPECIAL_KERNEL_PORT : constant := 7;
HOST_MAX_SPECIAL_PORT : constant := 15;
HOST_PORT : constant := 1;
HOST_PRIV_PORT : constant := 2;
HOST_SEATBELT_PORT : constant := 14;
HOST_SECURITY_PORT : constant := 0;
HOST_USER_NOTIFICATION_PORT : constant := 10;
-- _MACH_HOST_SPECIAL_PORTS_H_ (empty)
-- host_get_audit_control_port (unparsible)
-- host_get_dynamic_pager_port (unparsible)
-- host_get_host_port (unparsible)
-- host_get_host_priv_port (unparsible)
-- host_get_io_master_port (unparsible)
-- host_get_lockd_port (unparsible)
-- host_get_user_notification_port (unparsible)
-- host_set_audit_control_port (unparsible)
-- host_set_dynamic_pager_port (unparsible)
-- host_set_host_port (function macro)
-- host_set_host_priv_port (function macro)
-- host_set_io_master_port (function macro)
-- host_set_lockd_port (unparsible)
-- host_set_user_notification_port (unparsible)
end C.mach.host_special_ports;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.boolean is
pragma Preelaborate;
subtype boolean_t is signed_int;
-- _MACH_I386_BOOLEAN_H_ (empty)
end C.mach.i386.boolean;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.exception_h is
pragma Preelaborate;
EXCEPTION_CODE_MAX : constant := 2;
EXC_I386_ALIGNFLT : constant := 17;
EXC_I386_BOUND : constant := 7;
EXC_I386_BOUNDFLT : constant := 5;
EXC_I386_BPT : constant := 2;
EXC_I386_BPTFLT : constant := 3;
EXC_I386_DBLFLT : constant := 8;
EXC_I386_DIV : constant := 1;
EXC_I386_DIVERR : constant := 0;
EXC_I386_EMERR : constant := 6;
EXC_I386_ENDPERR : constant := 33;
EXC_I386_ENOEXTFLT : constant := 32;
EXC_I386_EXTERR : constant := 5;
EXC_I386_EXTERRFLT : constant := 16;
EXC_I386_EXTOVR : constant := 4;
EXC_I386_EXTOVRFLT : constant := 9;
EXC_I386_GPFLT : constant := 13;
EXC_I386_INTO : constant := 2;
EXC_I386_INTOFLT : constant := 4;
EXC_I386_INVOP : constant := 1;
EXC_I386_INVOPFLT : constant := 6;
EXC_I386_INVTSSFLT : constant := 10;
EXC_I386_NMIFLT : constant := 2;
EXC_I386_NOEXT : constant := 3;
EXC_I386_NOEXTFLT : constant := 7;
EXC_I386_PGFLT : constant := 14;
EXC_I386_SEGNPFLT : constant := 11;
EXC_I386_SGL : constant := 1;
EXC_I386_SGLSTP : constant := 1;
EXC_I386_SSEEXTERR : constant := 8;
EXC_I386_STKFLT : constant := 12;
EXC_MASK_MACHINE : constant := 0;
EXC_TYPES_COUNT : constant := 11;
-- _MACH_I386_EXCEPTION_H_ (empty)
end C.mach.i386.exception_h;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.fp_reg is
pragma Preelaborate;
type struct_x86_fx_save;
type struct_x86_fx_save is record
fx_control : aliased unsigned_short;
fx_status : aliased unsigned_short;
fx_tag : aliased unsigned_char;
fx_bbz1 : aliased unsigned_char;
fx_opcode : aliased unsigned_short;
fx_eip : aliased unsigned_int;
fx_cs : aliased unsigned_short;
fx_bbz2 : aliased unsigned_short;
fx_dp : aliased unsigned_int;
fx_ds : aliased unsigned_short;
fx_bbz3 : aliased unsigned_short;
fx_MXCSR : aliased unsigned_int;
fx_MXCSR_MASK : aliased unsigned_int;
fx_reg_word : aliased unsigned_short_array8_array (0 .. 7);
fx_XMM_reg : aliased unsigned_short_array16_array (0 .. 7);
fx_reserved : aliased unsigned_char_array (0 .. 95);
end record;
pragma Convention (C_Pass_By_Copy, struct_x86_fx_save);
FPC_DE : constant := 2;
FPC_DM : constant := 2;
FPC_IC : constant := 4096;
FPC_IC_AFF : constant := 4096;
FPC_IC_PROJ : constant := 0;
FPC_IE : constant := 1;
FPC_IM : constant := 1;
FPC_OE : constant := 8;
FPC_OM : constant := 8;
FPC_PC : constant := 768;
FPC_PC_24 : constant := 0;
FPC_PC_53 : constant := 512;
FPC_PC_64 : constant := 768;
FPC_PE : constant := 32;
FPC_RC : constant := 3072;
FPC_RC_CHOP : constant := 3072;
FPC_RC_RD : constant := 1024;
FPC_RC_RN : constant := 0;
FPC_RC_RU : constant := 2048;
FPC_UE : constant := 16;
FPC_ZE : constant := 4;
FPC_ZM : constant := 4;
FPS_BUSY : constant := 32768;
FPS_C0 : constant := 256;
FPS_C1 : constant := 512;
FPS_C2 : constant := 1024;
FPS_C3 : constant := 16384;
FPS_DE : constant := 2;
FPS_ES : constant := 128;
FPS_IE : constant := 1;
FPS_OE : constant := 8;
FPS_PE : constant := 32;
FPS_SF : constant := 64;
FPS_TOS : constant := 14336;
FPS_TOS_SHIFT : constant := 11;
FPS_UE : constant := 16;
FPS_ZE : constant := 4;
FP_287 : constant := 2;
FP_387 : constant := 3;
FP_FXSR : constant := 4;
FP_NO : constant := 0;
FP_SOFT : constant := 1;
-- _I386_FP_SAVE_H_ (empty)
end C.mach.i386.fp_reg;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.kern_return is
pragma Preelaborate;
subtype kern_return_t is signed_int;
-- _MACH_I386_KERN_RETURN_H_ (empty)
end C.mach.i386.kern_return;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.processor_info is
pragma Preelaborate;
-- _MACH_I386_PROCESSOR_INFO_H_ (empty)
end C.mach.i386.processor_info;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
package C.mach.i386.qstructs is
pragma Preelaborate;
type struct_darwin_i386_thread_state;
type struct_darwin_i386_thread_state is record
eax : aliased unsigned_int;
ebx : aliased unsigned_int;
ecx : aliased unsigned_int;
edx : aliased unsigned_int;
edi : aliased unsigned_int;
esi : aliased unsigned_int;
ebp : aliased unsigned_int;
esp : aliased unsigned_int;
ss : aliased unsigned_int;
eflags : aliased unsigned_int;
eip : aliased unsigned_int;
cs : aliased unsigned_int;
ds : aliased unsigned_int;
es : aliased unsigned_int;
fs : aliased unsigned_int;
gs : aliased unsigned_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_i386_thread_state);
type struct_darwin_fp_control;
type struct_darwin_fp_control is record
invalid : unsigned_short range 0 .. 1;
denorm : unsigned_short range 0 .. 1;
zdiv : unsigned_short range 0 .. 1;
ovrfl : unsigned_short range 0 .. 1;
undfl : unsigned_short range 0 .. 1;
precis : unsigned_short range 0 .. 1;
anonymous_1 : unsigned_short range 0 .. 3;
pc : unsigned_short range 0 .. 3;
rc : unsigned_short range 0 .. 3;
anonymous_2 : unsigned_short range 0 .. 1;
anonymous_3 : unsigned_short range 0 .. 7;
end record;
for struct_darwin_fp_control use record
invalid at 0 range 0 .. 0;
denorm at 0 range 1 .. 1;
zdiv at 0 range 2 .. 2;
ovrfl at 0 range 3 .. 3;
undfl at 0 range 4 .. 4;
precis at 0 range 5 .. 5;
anonymous_1 at 0 range 6 .. 7;
pc at 0 range 8 .. 9;
rc at 0 range 10 .. 11;
anonymous_2 at 0 range 12 .. 12;
anonymous_3 at 0 range 13 .. 15;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_fp_control);
subtype darwin_fp_control_t is struct_darwin_fp_control;
type struct_darwin_fp_status;
type struct_darwin_fp_status is record
invalid : unsigned_short range 0 .. 1;
denorm : unsigned_short range 0 .. 1;
zdiv : unsigned_short range 0 .. 1;
ovrfl : unsigned_short range 0 .. 1;
undfl : unsigned_short range 0 .. 1;
precis : unsigned_short range 0 .. 1;
stkflt : unsigned_short range 0 .. 1;
errsumm : unsigned_short range 0 .. 1;
c0 : unsigned_short range 0 .. 1;
c1 : unsigned_short range 0 .. 1;
c2 : unsigned_short range 0 .. 1;
tos : unsigned_short range 0 .. 7;
c3 : unsigned_short range 0 .. 1;
busy : unsigned_short range 0 .. 1;
end record;
for struct_darwin_fp_status use record
invalid at 0 range 0 .. 0;
denorm at 0 range 1 .. 1;
zdiv at 0 range 2 .. 2;
ovrfl at 0 range 3 .. 3;
undfl at 0 range 4 .. 4;
precis at 0 range 5 .. 5;
stkflt at 0 range 6 .. 6;
errsumm at 0 range 7 .. 7;
c0 at 0 range 8 .. 8;
c1 at 0 range 9 .. 9;
c2 at 0 range 10 .. 10;
tos at 0 range 11 .. 13;
c3 at 0 range 14 .. 14;
busy at 0 range 15 .. 15;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_fp_status);
subtype darwin_fp_status_t is struct_darwin_fp_status;
type struct_darwin_mmst_reg;
type struct_darwin_mmst_reg is record
mmst_reg : aliased char_array (0 .. 9);
mmst_rsrv : aliased char_array (0 .. 5);
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_mmst_reg);
type struct_darwin_xmm_reg;
type struct_darwin_xmm_reg is record
xmm_reg : aliased char_array (0 .. 15);
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_xmm_reg);
type struct_darwin_i386_float_state;
type struct_darwin_i386_float_state is record
fpu_reserved : aliased signed_int_array (0 .. 1);
fpu_fcw : aliased struct_darwin_fp_control;
fpu_fsw : aliased struct_darwin_fp_status;
fpu_ftw : aliased Standard.C.i386.qtypes.uint8_t;
fpu_rsrv1 : aliased Standard.C.i386.qtypes.uint8_t;
fpu_fop : aliased Standard.C.i386.qtypes.uint16_t;
fpu_ip : aliased Standard.C.i386.qtypes.uint32_t;
fpu_cs : aliased Standard.C.i386.qtypes.uint16_t;
fpu_rsrv2 : aliased Standard.C.i386.qtypes.uint16_t;
fpu_dp : aliased Standard.C.i386.qtypes.uint32_t;
fpu_ds : aliased Standard.C.i386.qtypes.uint16_t;
fpu_rsrv3 : aliased Standard.C.i386.qtypes.uint16_t;
fpu_mxcsr : aliased Standard.C.i386.qtypes.uint32_t;
fpu_mxcsrmask : aliased Standard.C.i386.qtypes.uint32_t;
fpu_stmm0 : aliased struct_darwin_mmst_reg;
fpu_stmm1 : aliased struct_darwin_mmst_reg;
fpu_stmm2 : aliased struct_darwin_mmst_reg;
fpu_stmm3 : aliased struct_darwin_mmst_reg;
fpu_stmm4 : aliased struct_darwin_mmst_reg;
fpu_stmm5 : aliased struct_darwin_mmst_reg;
fpu_stmm6 : aliased struct_darwin_mmst_reg;
fpu_stmm7 : aliased struct_darwin_mmst_reg;
fpu_xmm0 : aliased struct_darwin_xmm_reg;
fpu_xmm1 : aliased struct_darwin_xmm_reg;
fpu_xmm2 : aliased struct_darwin_xmm_reg;
fpu_xmm3 : aliased struct_darwin_xmm_reg;
fpu_xmm4 : aliased struct_darwin_xmm_reg;
fpu_xmm5 : aliased struct_darwin_xmm_reg;
fpu_xmm6 : aliased struct_darwin_xmm_reg;
fpu_xmm7 : aliased struct_darwin_xmm_reg;
fpu_rsrv4 : aliased char_array (0 .. 223);
fpu_reserved1 : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_i386_float_state);
type struct_darwin_i386_exception_state;
type struct_darwin_i386_exception_state is record
trapno : aliased unsigned_int;
err : aliased unsigned_int;
faultvaddr : aliased unsigned_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_i386_exception_state);
type struct_darwin_x86_debug_state32;
type struct_darwin_x86_debug_state32 is record
dr0 : aliased unsigned_int;
dr1 : aliased unsigned_int;
dr2 : aliased unsigned_int;
dr3 : aliased unsigned_int;
dr4 : aliased unsigned_int;
dr5 : aliased unsigned_int;
dr6 : aliased unsigned_int;
dr7 : aliased unsigned_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_x86_debug_state32);
type struct_darwin_x86_thread_state64;
type struct_darwin_x86_thread_state64 is record
rax : aliased Standard.C.i386.qtypes.uint64_t;
rbx : aliased Standard.C.i386.qtypes.uint64_t;
rcx : aliased Standard.C.i386.qtypes.uint64_t;
rdx : aliased Standard.C.i386.qtypes.uint64_t;
rdi : aliased Standard.C.i386.qtypes.uint64_t;
rsi : aliased Standard.C.i386.qtypes.uint64_t;
rbp : aliased Standard.C.i386.qtypes.uint64_t;
rsp : aliased Standard.C.i386.qtypes.uint64_t;
r8 : aliased Standard.C.i386.qtypes.uint64_t;
r9 : aliased Standard.C.i386.qtypes.uint64_t;
r10 : aliased Standard.C.i386.qtypes.uint64_t;
r11 : aliased Standard.C.i386.qtypes.uint64_t;
r12 : aliased Standard.C.i386.qtypes.uint64_t;
r13 : aliased Standard.C.i386.qtypes.uint64_t;
r14 : aliased Standard.C.i386.qtypes.uint64_t;
r15 : aliased Standard.C.i386.qtypes.uint64_t;
rip : aliased Standard.C.i386.qtypes.uint64_t;
rflags : aliased Standard.C.i386.qtypes.uint64_t;
cs : aliased Standard.C.i386.qtypes.uint64_t;
fs : aliased Standard.C.i386.qtypes.uint64_t;
gs : aliased Standard.C.i386.qtypes.uint64_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_x86_thread_state64);
type struct_darwin_x86_float_state64;
type struct_darwin_x86_float_state64 is record
fpu_reserved : aliased signed_int_array (0 .. 1);
fpu_fcw : aliased struct_darwin_fp_control;
fpu_fsw : aliased struct_darwin_fp_status;
fpu_ftw : aliased Standard.C.i386.qtypes.uint8_t;
fpu_rsrv1 : aliased Standard.C.i386.qtypes.uint8_t;
fpu_fop : aliased Standard.C.i386.qtypes.uint16_t;
fpu_ip : aliased Standard.C.i386.qtypes.uint32_t;
fpu_cs : aliased Standard.C.i386.qtypes.uint16_t;
fpu_rsrv2 : aliased Standard.C.i386.qtypes.uint16_t;
fpu_dp : aliased Standard.C.i386.qtypes.uint32_t;
fpu_ds : aliased Standard.C.i386.qtypes.uint16_t;
fpu_rsrv3 : aliased Standard.C.i386.qtypes.uint16_t;
fpu_mxcsr : aliased Standard.C.i386.qtypes.uint32_t;
fpu_mxcsrmask : aliased Standard.C.i386.qtypes.uint32_t;
fpu_stmm0 : aliased struct_darwin_mmst_reg;
fpu_stmm1 : aliased struct_darwin_mmst_reg;
fpu_stmm2 : aliased struct_darwin_mmst_reg;
fpu_stmm3 : aliased struct_darwin_mmst_reg;
fpu_stmm4 : aliased struct_darwin_mmst_reg;
fpu_stmm5 : aliased struct_darwin_mmst_reg;
fpu_stmm6 : aliased struct_darwin_mmst_reg;
fpu_stmm7 : aliased struct_darwin_mmst_reg;
fpu_xmm0 : aliased struct_darwin_xmm_reg;
fpu_xmm1 : aliased struct_darwin_xmm_reg;
fpu_xmm2 : aliased struct_darwin_xmm_reg;
fpu_xmm3 : aliased struct_darwin_xmm_reg;
fpu_xmm4 : aliased struct_darwin_xmm_reg;
fpu_xmm5 : aliased struct_darwin_xmm_reg;
fpu_xmm6 : aliased struct_darwin_xmm_reg;
fpu_xmm7 : aliased struct_darwin_xmm_reg;
fpu_xmm8 : aliased struct_darwin_xmm_reg;
fpu_xmm9 : aliased struct_darwin_xmm_reg;
fpu_xmm10 : aliased struct_darwin_xmm_reg;
fpu_xmm11 : aliased struct_darwin_xmm_reg;
fpu_xmm12 : aliased struct_darwin_xmm_reg;
fpu_xmm13 : aliased struct_darwin_xmm_reg;
fpu_xmm14 : aliased struct_darwin_xmm_reg;
fpu_xmm15 : aliased struct_darwin_xmm_reg;
fpu_rsrv4 : aliased char_array (0 .. 95);
fpu_reserved1 : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_x86_float_state64);
type struct_darwin_x86_exception_state64;
type struct_darwin_x86_exception_state64 is record
trapno : aliased unsigned_int;
err : aliased unsigned_int;
faultvaddr : aliased Standard.C.i386.qtypes.uint64_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_x86_exception_state64);
type struct_darwin_x86_debug_state64;
type struct_darwin_x86_debug_state64 is record
dr0 : aliased Standard.C.i386.qtypes.uint64_t;
dr1 : aliased Standard.C.i386.qtypes.uint64_t;
dr2 : aliased Standard.C.i386.qtypes.uint64_t;
dr3 : aliased Standard.C.i386.qtypes.uint64_t;
dr4 : aliased Standard.C.i386.qtypes.uint64_t;
dr5 : aliased Standard.C.i386.qtypes.uint64_t;
dr6 : aliased Standard.C.i386.qtypes.uint64_t;
dr7 : aliased Standard.C.i386.qtypes.uint64_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_x86_debug_state64);
FP_CHOP : constant := 3;
FP_PREC_24B : constant := 0;
FP_PREC_53B : constant := 2;
FP_PREC_64B : constant := 3;
FP_RND_DOWN : constant := 1;
FP_RND_NEAR : constant := 0;
FP_RND_UP : constant := 2;
FP_STATE_BYTES : constant := 512;
-- _MACH_I386__STRUCTS_H_ (empty)
subtype STRUCT_FP_CONTROL is struct_darwin_fp_control;
subtype STRUCT_FP_STATUS is struct_darwin_fp_status;
subtype STRUCT_MMST_REG is struct_darwin_mmst_reg;
subtype STRUCT_X86_DEBUG_STATE32 is struct_darwin_x86_debug_state32;
subtype STRUCT_X86_DEBUG_STATE64 is struct_darwin_x86_debug_state64;
subtype STRUCT_X86_EXCEPTION_STATE32 is
struct_darwin_i386_exception_state;
subtype STRUCT_X86_EXCEPTION_STATE64 is
struct_darwin_x86_exception_state64;
subtype STRUCT_X86_FLOAT_STATE32 is struct_darwin_i386_float_state;
subtype STRUCT_X86_FLOAT_STATE64 is struct_darwin_x86_float_state64;
subtype STRUCT_X86_THREAD_STATE32 is struct_darwin_i386_thread_state;
subtype STRUCT_X86_THREAD_STATE64 is struct_darwin_x86_thread_state64;
subtype STRUCT_XMM_REG is struct_darwin_xmm_reg;
end C.mach.i386.qstructs;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.thread_state is
pragma Preelaborate;
I386_THREAD_STATE_MAX : constant := 144;
THREAD_STATE_MAX : constant := 144;
-- _MACH_I386_THREAD_STATE_H_ (empty)
end C.mach.i386.thread_state;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.qstructs;
package C.mach.i386.thread_status is
pragma Preelaborate;
type struct_x86_state_hdr;
type struct_x86_state_hdr is record
flavor : aliased signed_int;
count : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_x86_state_hdr);
subtype x86_state_hdr_t is struct_x86_state_hdr;
subtype i386_thread_state_t is
mach.i386.qstructs.struct_darwin_i386_thread_state;
subtype x86_thread_state32_t is
mach.i386.qstructs.struct_darwin_i386_thread_state;
subtype i386_float_state_t is
mach.i386.qstructs.struct_darwin_i386_float_state;
subtype x86_float_state32_t is
mach.i386.qstructs.struct_darwin_i386_float_state;
subtype i386_exception_state_t is
mach.i386.qstructs.struct_darwin_i386_exception_state;
subtype x86_exception_state32_t is
mach.i386.qstructs.struct_darwin_i386_exception_state;
subtype x86_debug_state32_t is
mach.i386.qstructs.struct_darwin_x86_debug_state32;
subtype x86_thread_state64_t is
mach.i386.qstructs.struct_darwin_x86_thread_state64;
subtype x86_float_state64_t is
mach.i386.qstructs.struct_darwin_x86_float_state64;
subtype x86_exception_state64_t is
mach.i386.qstructs.struct_darwin_x86_exception_state64;
subtype x86_debug_state64_t is
mach.i386.qstructs.struct_darwin_x86_debug_state64;
type struct_x86_thread_state;
type union_f64e655a (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
ts32 : x86_thread_state32_t;
when others =>
ts64 : x86_thread_state64_t;
end case;
end record;
pragma Unchecked_Union (union_f64e655a);
pragma Convention (C_Pass_By_Copy, union_f64e655a);
type struct_x86_thread_state is record
tsh : aliased x86_state_hdr_t;
uts : aliased union_f64e655a;
end record;
pragma Convention (C_Pass_By_Copy, struct_x86_thread_state);
type struct_x86_float_state;
type union_b85eda2e (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
fs32 : x86_float_state32_t;
when others =>
fs64 : x86_float_state64_t;
end case;
end record;
pragma Unchecked_Union (union_b85eda2e);
pragma Convention (C_Pass_By_Copy, union_b85eda2e);
type struct_x86_float_state is record
fsh : aliased x86_state_hdr_t;
ufs : aliased union_b85eda2e;
end record;
pragma Convention (C_Pass_By_Copy, struct_x86_float_state);
type struct_x86_exception_state;
type union_0849d218 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
es32 : x86_exception_state32_t;
when others =>
es64 : x86_exception_state64_t;
end case;
end record;
pragma Unchecked_Union (union_0849d218);
pragma Convention (C_Pass_By_Copy, union_0849d218);
type struct_x86_exception_state is record
esh : aliased x86_state_hdr_t;
ues : aliased union_0849d218;
end record;
pragma Convention (C_Pass_By_Copy, struct_x86_exception_state);
type struct_x86_debug_state;
type union_f5108ab1 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
ds32 : x86_debug_state32_t;
when others =>
ds64 : x86_debug_state64_t;
end case;
end record;
pragma Unchecked_Union (union_f5108ab1);
pragma Convention (C_Pass_By_Copy, union_f5108ab1);
type struct_x86_debug_state is record
dsh : aliased x86_state_hdr_t;
uds : aliased union_f5108ab1;
end record;
pragma Convention (C_Pass_By_Copy, struct_x86_debug_state);
subtype x86_thread_state_t is struct_x86_thread_state;
subtype x86_float_state_t is struct_x86_float_state;
subtype x86_exception_state_t is struct_x86_exception_state;
subtype x86_debug_state_t is struct_x86_debug_state;
type struct_x86_seg_load_fault32;
type struct_x86_seg_load_fault32 is record
trapno : aliased unsigned_int;
err : aliased unsigned_int;
eip : aliased unsigned_int;
cs : aliased unsigned_int;
efl : aliased unsigned_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_x86_seg_load_fault32);
I386_EXCEPTION_STATE_COUNT_uppercase : constant := 3;
KERN_CODE_SELECTOR : constant := 8;
KERN_DATA_SELECTOR : constant := 16;
MACHINE_THREAD_STATE : constant := 7;
MACHINE_THREAD_STATE_COUNT : constant := 44;
THREAD_MACHINE_STATE_MAX : constant := 144;
THREAD_STATE_NONE : constant := 13;
USER_CODE_SELECTOR : constant := 23;
USER_DATA_SELECTOR : constant := 31;
-- VALID_THREAD_STATE_FLAVOR (function macro)
X86_DEBUG_STATE32_COUNT_uppercase : constant := 8;
X86_DEBUG_STATE64_COUNT_uppercase : constant := 16;
X86_EXCEPTION_STATE64_COUNT_uppercase : constant := 4;
-- _MACH_I386_THREAD_STATUS_H_ (empty)
i386_EXCEPTION_STATE : constant := 3;
i386_EXCEPTION_STATE_COUNT : constant := 3;
i386_FLOAT_STATE : constant := 2;
i386_FLOAT_STATE_COUNT : constant := 131;
i386_THREAD_STATE : constant := 1;
i386_THREAD_STATE_COUNT : constant := 16;
x86_DEBUG_STATE : constant := 12;
x86_DEBUG_STATE32 : constant := 10;
x86_DEBUG_STATE32_COUNT : constant := 8;
x86_DEBUG_STATE64 : constant := 11;
x86_DEBUG_STATE64_COUNT : constant := 16;
x86_DEBUG_STATE_COUNT : constant := 18;
x86_EXCEPTION_STATE : constant := 9;
x86_EXCEPTION_STATE32 : constant := 3;
x86_EXCEPTION_STATE32_COUNT : constant := 3;
x86_EXCEPTION_STATE64 : constant := 6;
x86_EXCEPTION_STATE64_COUNT : constant := 4;
x86_EXCEPTION_STATE_COUNT : constant := 6;
x86_FLOAT_STATE : constant := 8;
x86_FLOAT_STATE32 : constant := 2;
x86_FLOAT_STATE32_COUNT : constant := 131;
x86_FLOAT_STATE64 : constant := 5;
x86_FLOAT_STATE64_COUNT : constant := 131;
x86_FLOAT_STATE_COUNT : constant := 133;
x86_THREAD_STATE : constant := 7;
x86_THREAD_STATE32 : constant := 1;
x86_THREAD_STATE32_COUNT : constant := 16;
x86_THREAD_STATE64 : constant := 4;
x86_THREAD_STATE64_COUNT : constant := 42;
x86_THREAD_STATE_COUNT : constant := 44;
end C.mach.i386.thread_status;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_param is
pragma Preelaborate;
BYTE_SIZE : constant := 8;
I386_PGBYTES : constant := 4096;
I386_PGSHIFT : constant := 12;
MACH_VM_MAX_ADDRESS : constant := 140737486258176;
MACH_VM_MIN_ADDRESS : constant := 0;
PAGE_MASK : constant := 4095;
PAGE_SHIFT : constant := 12;
PAGE_SIZE : constant := 4096;
VM_DYLD64 : constant := 140734799806464;
VM_LIB64_SHR_DATA : constant := 140734804000768;
VM_LIB64_SHR_TEXT : constant := 140735340871680;
VM_MAX_ADDRESS : constant := 4292870144;
VM_MAX_PAGE_ADDRESS : constant := 140737486258176;
VM_MAX_USER_PAGE_ADDRESS : constant := 140737488351232;
VM_MIN_ADDRESS : constant := 0;
VM_MIN_ADDRESS64 : constant := 0;
VM_USRSTACK32 : constant := 3221225472;
VM_USRSTACK64 : constant := 140734799806464;
-- _MACH_I386_VM_PARAM_H_ (empty)
-- i386_btop (unparsible)
-- i386_ptob (unparsible)
-- i386_round_page (unparsible)
-- i386_trunc_page (unparsible)
-- machine_btop (unparsible)
end C.mach.i386.vm_param;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
with C.stdint;
package C.mach.i386.vm_types is
pragma Preelaborate;
subtype natural_t is Standard.C.i386.qtypes.darwin_natural_t;
subtype natural_t_ptr is Standard.C.i386.qtypes.darwin_natural_t_ptr;
subtype natural_t_array is Standard.C.i386.qtypes.darwin_natural_t_array;
subtype natural_t_ptr_ptr is
Standard.C.i386.qtypes.darwin_natural_t_ptr_ptr;
subtype integer_t is signed_int;
subtype integer_t_ptr is signed_int_ptr;
subtype integer_t_array is signed_int_array;
subtype vm_offset_t is natural_t;
subtype vm_offset_t_ptr is natural_t_ptr;
subtype vm_offset_t_ptr_ptr is natural_t_ptr_ptr;
subtype vm_size_t is natural_t;
subtype mach_vm_address_t is stdint.uint64_t;
subtype mach_vm_offset_t is stdint.uint64_t;
subtype mach_vm_offset_t_ptr is stdint.uint64_t_ptr;
subtype mach_vm_size_t is stdint.uint64_t;
subtype vm_map_offset_t is stdint.uint64_t;
subtype vm_map_address_t is stdint.uint64_t;
subtype vm_map_size_t is stdint.uint64_t;
-- MACH_MSG_TYPE_INTEGER_T (unparsible)
-- _MACH_I386_VM_TYPES_H_ (empty)
end C.mach.i386.vm_types;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386 is
pragma Preelaborate;
end C.mach.i386;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.kern_return is
pragma Preelaborate;
KERN_ABORTED : constant := 14;
KERN_ALREADY_IN_SET : constant := 11;
KERN_ALREADY_WAITING : constant := 30;
KERN_DEFAULT_SET : constant := 31;
KERN_EXCEPTION_PROTECTED : constant := 32;
KERN_FAILURE : constant := 5;
KERN_INVALID_ADDRESS : constant := 1;
KERN_INVALID_ARGUMENT : constant := 4;
KERN_INVALID_CAPABILITY : constant := 20;
KERN_INVALID_HOST : constant := 22;
KERN_INVALID_LEDGER : constant := 33;
KERN_INVALID_MEMORY_CONTROL : constant := 34;
KERN_INVALID_NAME : constant := 15;
KERN_INVALID_OBJECT : constant := 29;
KERN_INVALID_POLICY : constant := 28;
KERN_INVALID_PROCESSOR_SET : constant := 26;
KERN_INVALID_RIGHT : constant := 17;
KERN_INVALID_SECURITY : constant := 35;
KERN_INVALID_TASK : constant := 16;
KERN_INVALID_VALUE : constant := 18;
KERN_LOCK_OWNED : constant := 40;
KERN_LOCK_OWNED_SELF : constant := 41;
KERN_LOCK_SET_DESTROYED : constant := 38;
KERN_LOCK_UNSTABLE : constant := 39;
KERN_MEMORY_DATA_MOVED : constant := 24;
KERN_MEMORY_ERROR : constant := 10;
KERN_MEMORY_FAILURE : constant := 9;
KERN_MEMORY_PRESENT : constant := 23;
KERN_MEMORY_RESTART_COPY : constant := 25;
KERN_NAME_EXISTS : constant := 13;
KERN_NODE_DOWN : constant := 47;
KERN_NOT_DEPRESSED : constant := 36;
KERN_NOT_IN_SET : constant := 12;
KERN_NOT_RECEIVER : constant := 7;
KERN_NOT_SUPPORTED : constant := 46;
KERN_NOT_WAITING : constant := 48;
KERN_NO_ACCESS : constant := 8;
KERN_NO_SPACE : constant := 3;
KERN_OPERATION_TIMED_OUT : constant := 49;
KERN_POLICY_LIMIT : constant := 27;
KERN_PROTECTION_FAILURE : constant := 2;
KERN_RESOURCE_SHORTAGE : constant := 6;
KERN_RETURN_MAX : constant := 256;
KERN_RIGHT_EXISTS : constant := 21;
KERN_RPC_CONTINUE_ORPHAN : constant := 45;
KERN_RPC_SERVER_TERMINATED : constant := 43;
KERN_RPC_TERMINATE_ORPHAN : constant := 44;
KERN_SEMAPHORE_DESTROYED : constant := 42;
KERN_SUCCESS : constant := 0;
KERN_TERMINATED : constant := 37;
KERN_UREFS_OVERFLOW : constant := 19;
-- _MACH_KERN_RETURN_H_ (empty)
end C.mach.kern_return;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.kern_return;
with C.mach.i386.vm_types;
with C.mach.vm_types;
package C.mach.kmod is
pragma Preelaborate;
subtype kmod_t is signed_int;
subtype kmod_control_flavor_t is signed_int;
subtype kmod_args_t is void_ptr;
type struct_kmod_reference;
type struct_kmod_reference_ptr is access all struct_kmod_reference;
for struct_kmod_reference_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_kmod_reference_ptr);
pragma Convention (C, struct_kmod_reference_ptr);
type struct_kmod_info;
type struct_kmod_info_ptr is access all struct_kmod_info;
for struct_kmod_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_kmod_info_ptr);
pragma Convention (C, struct_kmod_info_ptr);
type struct_kmod_reference is record
next : aliased struct_kmod_reference_ptr;
info : aliased struct_kmod_info_ptr;
end record;
for struct_kmod_reference'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_kmod_reference);
subtype kmod_reference_t is struct_kmod_reference;
subtype kmod_reference_t_ptr is struct_kmod_reference_ptr;
type access_1c72a1d3 is access function (ki : access struct_kmod_info;
data : void_ptr) return mach.i386.kern_return.kern_return_t;
pragma Convention (C, access_1c72a1d3);
-- subtype kmod_start_func_t is ... (function type)
subtype kmod_start_func_t_ptr is access_1c72a1d3;
type access_7b55d933 is access function (ki : access struct_kmod_info;
data : void_ptr) return mach.i386.kern_return.kern_return_t;
pragma Convention (C, access_7b55d933);
-- subtype kmod_stop_func_t is ... (function type)
subtype kmod_stop_func_t_ptr is access_7b55d933;
type struct_kmod_info is record
next : aliased struct_kmod_info_ptr;
info_version : aliased signed_int;
id : aliased signed_int;
name : aliased char_array (0 .. 63);
version : aliased char_array (0 .. 63);
reference_count : aliased signed_int;
reference_list : aliased kmod_reference_t_ptr;
address : aliased mach.vm_types.vm_address_t;
size : aliased mach.i386.vm_types.vm_size_t;
hdr_size : aliased mach.i386.vm_types.vm_size_t;
start : aliased kmod_start_func_t_ptr;
stop : aliased kmod_stop_func_t_ptr;
end record;
for struct_kmod_info'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_kmod_info);
subtype kmod_info_t is struct_kmod_info;
subtype kmod_info_t_ptr is struct_kmod_info_ptr;
subtype kmod_info_array_t is kmod_info_t_ptr;
type struct_kmod_load_extension_cmd;
type struct_kmod_load_extension_cmd is record
F_type : aliased signed_int;
name : aliased char_array (0 .. 63);
end record;
pragma Convention (C_Pass_By_Copy, struct_kmod_load_extension_cmd);
subtype kmod_load_extension_cmd_t is struct_kmod_load_extension_cmd;
type struct_kmod_load_with_dependencies_cmd;
type struct_kmod_load_with_dependencies_cmd is record
F_type : aliased signed_int;
name : aliased char_array (0 .. 63);
dependencies : aliased char_array64_array (0 .. 0);
end record;
pragma Convention (C_Pass_By_Copy,
struct_kmod_load_with_dependencies_cmd);
subtype kmod_load_with_dependencies_cmd_t is
struct_kmod_load_with_dependencies_cmd;
type struct_kmod_generic_cmd;
type struct_kmod_generic_cmd is record
F_type : aliased signed_int;
data : aliased char_array (0 .. 0);
end record;
pragma Convention (C_Pass_By_Copy, struct_kmod_generic_cmd);
subtype kmod_generic_cmd_t is struct_kmod_generic_cmd;
KMOD_CNTL_DISABLE_LOAD : constant := 9;
KMOD_CNTL_FREE_LINKEDIT_DATA : constant := 7;
KMOD_CNTL_GET_CMD : constant := 5;
KMOD_CNTL_GET_KERNEL_SYMBOLS : constant := 6;
KMOD_CNTL_GET_KERNEL_UUID : constant := 8;
KMOD_CNTL_GET_UUID : constant := 8;
KMOD_CNTL_RELEASE : constant := 4;
KMOD_CNTL_RETAIN : constant := 3;
KMOD_CNTL_START : constant := 1;
KMOD_CNTL_STOP : constant := 2;
-- KMOD_DECL (has # or ##)
-- KMOD_EXPLICIT_DECL (has # or ##)
-- subtype KMOD_INFO_NAME is struct kmod_info;
KMOD_INFO_VERSION : constant := 1;
KMOD_IOKIT_END_RANGE_PACKET : constant := 8191;
KMOD_IOKIT_START_RANGE_PACKET : constant := 4096;
-- KMOD_LIB_DECL (has # or ##)
KMOD_LOAD_EXTENSION_PACKET : constant := 1;
KMOD_LOAD_WITH_DEPENDENCIES_PACKET : constant := 2;
KMOD_MAX_NAME : constant := 64;
-- KMOD_PACK_IDS (function macro)
KMOD_RETURN_FAILURE : constant := 5;
KMOD_RETURN_SUCCESS : constant := 0;
-- KMOD_UNPACK_FROM_ID (function macro)
-- KMOD_UNPACK_TO_ID (function macro)
-- _MACH_KMOD_H_ (empty)
end C.mach.kmod;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.kern_return;
with C.stdint;
package C.mach.mach_time is
pragma Preelaborate;
type struct_mach_timebase_info;
type struct_mach_timebase_info is record
numer : aliased stdint.uint32_t;
denom : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_mach_timebase_info);
type struct_mach_timebase_info_ptr is
access all struct_mach_timebase_info;
for struct_mach_timebase_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_mach_timebase_info_ptr);
pragma Convention (C, struct_mach_timebase_info_ptr);
subtype mach_timebase_info_t is struct_mach_timebase_info_ptr;
subtype mach_timebase_info_data_t is struct_mach_timebase_info;
function mach_timebase_info (info : access struct_mach_timebase_info)
return mach.i386.kern_return.kern_return_t;
pragma Import (C, mach_timebase_info, "mach_timebase_info");
function mach_wait_until (deadline : stdint.uint64_t)
return mach.i386.kern_return.kern_return_t;
pragma Import (C, mach_wait_until, "mach_wait_until");
function mach_absolute_time return stdint.uint64_t;
pragma Import (C, mach_absolute_time, "mach_absolute_time");
-- _MACH_MACH_TIME_H_ (empty)
end C.mach.mach_time;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
with C.pthread;
package C.mach.mach_types is
pragma Preelaborate;
subtype task_t is pthread.mach_port_t;
subtype task_t_ptr is pthread.mach_port_t_ptr;
subtype task_name_t is pthread.mach_port_t;
subtype thread_t is pthread.mach_port_t;
subtype thread_t_ptr is pthread.mach_port_t_ptr;
subtype thread_act_t is pthread.mach_port_t;
subtype thread_act_t_ptr is pthread.mach_port_t_ptr;
subtype ipc_space_t is pthread.mach_port_t;
subtype host_t is pthread.mach_port_t;
subtype host_priv_t is pthread.mach_port_t;
subtype host_security_t is pthread.mach_port_t;
subtype processor_t is pthread.mach_port_t;
subtype processor_t_ptr is pthread.mach_port_t_ptr;
subtype processor_set_t is pthread.mach_port_t;
subtype processor_set_t_ptr is pthread.mach_port_t_ptr;
subtype processor_set_control_t is pthread.mach_port_t;
subtype semaphore_t is pthread.mach_port_t;
subtype lock_set_t is pthread.mach_port_t;
subtype ledger_t is pthread.mach_port_t;
subtype ledger_t_ptr is pthread.mach_port_t_ptr;
subtype alarm_t is pthread.mach_port_t;
subtype clock_serv_t is pthread.mach_port_t;
subtype clock_ctrl_t is pthread.mach_port_t;
subtype processor_set_name_t is processor_set_t;
subtype clock_reply_t is pthread.mach_port_t;
subtype bootstrap_t is pthread.mach_port_t;
subtype mem_entry_name_port_t is pthread.mach_port_t;
subtype exception_handler_t is pthread.mach_port_t;
subtype exception_handler_t_ptr is pthread.mach_port_t_ptr;
subtype exception_handler_array_t is exception_handler_t_ptr;
subtype vm_task_entry_t is pthread.mach_port_t;
subtype io_master_t is pthread.mach_port_t;
subtype UNDServerRef is pthread.mach_port_t;
subtype task_array_t is task_t_ptr;
subtype thread_array_t is thread_t_ptr;
subtype processor_set_array_t is processor_set_t_ptr;
subtype processor_set_name_array_t is processor_set_t_ptr;
subtype processor_array_t is processor_t_ptr;
subtype thread_act_array_t is thread_act_t_ptr;
subtype ledger_array_t is ledger_t_ptr;
subtype task_port_t is task_t;
subtype task_port_array_t is task_array_t;
subtype thread_port_t is thread_t;
subtype thread_port_array_t is thread_array_t;
subtype ipc_space_port_t is ipc_space_t;
subtype host_name_t is host_t;
subtype host_name_port_t is host_t;
subtype processor_set_port_t is processor_set_t;
subtype processor_set_name_port_t is processor_set_t;
subtype processor_set_name_port_array_t is processor_set_array_t;
subtype processor_set_control_port_t is processor_set_t;
subtype processor_port_t is processor_t;
subtype processor_port_array_t is processor_array_t;
subtype thread_act_port_t is thread_act_t;
subtype thread_act_port_array_t is thread_act_array_t;
subtype semaphore_port_t is semaphore_t;
subtype lock_set_port_t is lock_set_t;
subtype ledger_port_t is ledger_t;
subtype ledger_port_array_t is ledger_array_t;
subtype alarm_port_t is alarm_t;
subtype clock_serv_port_t is clock_serv_t;
subtype clock_ctrl_port_t is clock_ctrl_t;
subtype exception_port_t is exception_handler_t;
subtype exception_port_arrary_t is exception_handler_array_t;
subtype ledger_item_t is mach.i386.vm_types.natural_t;
subtype emulation_vector_t is mach.i386.vm_types.mach_vm_offset_t_ptr;
subtype user_subsystem_t is char_ptr;
subtype labelstr_t is char_ptr;
ALARM_NULL : constant := 0;
CLOCK_NULL : constant := 0;
HOST_NULL : constant := 0;
HOST_PRIV_NULL : constant := 0;
HOST_SECURITY_NULL : constant := 0;
IPC_SPACE_NULL : constant := 0;
LEDGER_ITEM_INFINITY : constant := 4294967295;
LEDGER_NULL : constant := 0;
LOCK_SET_NULL : constant := 0;
PROCESSOR_NULL : constant := 0;
PROCESSOR_SET_NULL : constant := 0;
SEMAPHORE_NULL : constant := 0;
TASK_NAME_NULL : constant := 0;
TASK_NULL : constant := 0;
THREAD_NULL : constant := 0;
THR_ACT_NULL : constant := 0;
UND_SERVER_NULL : constant := 0;
-- _MACH_MACH_TYPES_H_ (empty)
end C.mach.mach_types;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.machine.boolean is
pragma Preelaborate;
-- _MACH_MACHINE_BOOLEAN_H_ (empty)
end C.mach.machine.boolean;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.machine.exception_h is
pragma Preelaborate;
-- _MACH_MACHINE_EXCEPTION_H_ (empty)
end C.mach.machine.exception_h;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.machine.kern_return is
pragma Preelaborate;
-- _MACH_MACHINE_KERN_RETURN_H_ (empty)
end C.mach.machine.kern_return;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.machine.processor_info is
pragma Preelaborate;
-- _MACH_MACHINE_PROCESSOR_INFO_H_ (empty)
end C.mach.machine.processor_info;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.machine.thread_state is
pragma Preelaborate;
-- _MACH_MACHINE_THREAD_STATE_H_ (empty)
end C.mach.machine.thread_state;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.machine.thread_status is
pragma Preelaborate;
-- _MACH_MACHINE_THREAD_STATUS_H_ (empty)
end C.mach.machine.thread_status;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.machine.vm_param is
pragma Preelaborate;
-- _MACH_MACHINE_VM_PARAM_H_ (empty)
end C.mach.machine.vm_param;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.machine.vm_types is
pragma Preelaborate;
-- _MACH_MACHINE_VM_TYPES_H_ (empty)
end C.mach.machine.vm_types;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
package C.mach.machine is
pragma Preelaborate;
subtype cpu_type_t is mach.i386.vm_types.integer_t;
subtype cpu_type_t_ptr is mach.i386.vm_types.integer_t_ptr;
subtype cpu_subtype_t is mach.i386.vm_types.integer_t;
subtype cpu_threadtype_t is mach.i386.vm_types.integer_t;
CPUFAMILY_ARM_11 : constant := -1879695144;
CPUFAMILY_ARM_9 : constant := -416119890;
CPUFAMILY_INTEL_6_13 : constant := -1439483605;
CPUFAMILY_INTEL_6_14 : constant := 1943433984;
CPUFAMILY_INTEL_6_15 : constant := 1114597871;
CPUFAMILY_INTEL_6_23 : constant := 2028621756;
CPUFAMILY_INTEL_6_26 : constant := 1801080018;
CPUFAMILY_INTEL_CORE : constant := 1943433984;
CPUFAMILY_INTEL_CORE2 : constant := 1114597871;
CPUFAMILY_INTEL_MEROM : constant := 1114597871;
CPUFAMILY_INTEL_NEHALEM : constant := 1801080018;
CPUFAMILY_INTEL_PENRYN : constant := 2028621756;
CPUFAMILY_INTEL_YONAH : constant := 1943433984;
CPUFAMILY_POWERPC_G3 : constant := -823913143;
CPUFAMILY_POWERPC_G4 : constant := 2009171118;
CPUFAMILY_POWERPC_G5 : constant := -310978390;
CPUFAMILY_UNKNOWN : constant := 0;
CPU_ARCH_ABI64 : constant := 16777216;
CPU_ARCH_MASK : constant := -16777216;
CPU_STATE_IDLE : constant := 2;
CPU_STATE_MAX : constant := 4;
CPU_STATE_NICE : constant := 3;
CPU_STATE_SYSTEM : constant := 1;
CPU_STATE_USER : constant := 0;
CPU_SUBTYPE_386 : constant := 3;
CPU_SUBTYPE_486 : constant := 4;
CPU_SUBTYPE_486SX : constant := 132;
CPU_SUBTYPE_586 : constant := 5;
CPU_SUBTYPE_ARM_ALL : constant := 0;
CPU_SUBTYPE_ARM_V4T : constant := 5;
CPU_SUBTYPE_ARM_V6 : constant := 6;
CPU_SUBTYPE_BIG_ENDIAN : constant := 1;
CPU_SUBTYPE_CELERON : constant := 103;
CPU_SUBTYPE_CELERON_MOBILE : constant := 119;
CPU_SUBTYPE_HPPA_7100 : constant := 0;
CPU_SUBTYPE_HPPA_7100LC : constant := 1;
CPU_SUBTYPE_HPPA_ALL : constant := 0;
CPU_SUBTYPE_I386_ALL : constant := 3;
CPU_SUBTYPE_I860_860 : constant := 1;
CPU_SUBTYPE_I860_ALL : constant := 0;
-- CPU_SUBTYPE_INTEL (function macro)
-- CPU_SUBTYPE_INTEL_FAMILY (function macro)
CPU_SUBTYPE_INTEL_FAMILY_MAX : constant := 15;
-- CPU_SUBTYPE_INTEL_MODEL (function macro)
CPU_SUBTYPE_INTEL_MODEL_ALL : constant := 0;
CPU_SUBTYPE_ITANIUM : constant := 11;
CPU_SUBTYPE_ITANIUM_2 : constant := 27;
CPU_SUBTYPE_LIB64 : constant := -2147483648;
CPU_SUBTYPE_LITTLE_ENDIAN : constant := 0;
CPU_SUBTYPE_MASK : constant := -16777216;
CPU_SUBTYPE_MC68030 : constant := 1;
CPU_SUBTYPE_MC68030_ONLY : constant := 3;
CPU_SUBTYPE_MC68040 : constant := 2;
CPU_SUBTYPE_MC680x0_ALL : constant := 1;
CPU_SUBTYPE_MC88000_ALL : constant := 0;
CPU_SUBTYPE_MC88100 : constant := 1;
CPU_SUBTYPE_MC88110 : constant := 2;
CPU_SUBTYPE_MC98000_ALL : constant := 0;
CPU_SUBTYPE_MC98601 : constant := 1;
CPU_SUBTYPE_MIPS_ALL : constant := 0;
CPU_SUBTYPE_MIPS_R2000 : constant := 5;
CPU_SUBTYPE_MIPS_R2000a : constant := 4;
CPU_SUBTYPE_MIPS_R2300 : constant := 1;
CPU_SUBTYPE_MIPS_R2600 : constant := 2;
CPU_SUBTYPE_MIPS_R2800 : constant := 3;
CPU_SUBTYPE_MIPS_R3000 : constant := 7;
CPU_SUBTYPE_MIPS_R3000a : constant := 6;
CPU_SUBTYPE_MULTIPLE : constant := -1;
CPU_SUBTYPE_PENT : constant := 5;
CPU_SUBTYPE_PENTII_M3 : constant := 54;
CPU_SUBTYPE_PENTII_M5 : constant := 86;
CPU_SUBTYPE_PENTIUM_3 : constant := 8;
CPU_SUBTYPE_PENTIUM_3_M : constant := 24;
CPU_SUBTYPE_PENTIUM_3_XEON : constant := 40;
CPU_SUBTYPE_PENTIUM_4 : constant := 10;
CPU_SUBTYPE_PENTIUM_4_M : constant := 26;
CPU_SUBTYPE_PENTIUM_M : constant := 9;
CPU_SUBTYPE_PENTPRO : constant := 22;
CPU_SUBTYPE_POWERPC_601 : constant := 1;
CPU_SUBTYPE_POWERPC_602 : constant := 2;
CPU_SUBTYPE_POWERPC_603 : constant := 3;
CPU_SUBTYPE_POWERPC_603e : constant := 4;
CPU_SUBTYPE_POWERPC_603ev : constant := 5;
CPU_SUBTYPE_POWERPC_604 : constant := 6;
CPU_SUBTYPE_POWERPC_604e : constant := 7;
CPU_SUBTYPE_POWERPC_620 : constant := 8;
CPU_SUBTYPE_POWERPC_7400 : constant := 10;
CPU_SUBTYPE_POWERPC_7450 : constant := 11;
CPU_SUBTYPE_POWERPC_750 : constant := 9;
CPU_SUBTYPE_POWERPC_970 : constant := 100;
CPU_SUBTYPE_POWERPC_ALL : constant := 0;
CPU_SUBTYPE_SPARC_ALL : constant := 0;
CPU_SUBTYPE_UVAXI : constant := 5;
CPU_SUBTYPE_UVAXII : constant := 6;
CPU_SUBTYPE_UVAXIII : constant := 12;
CPU_SUBTYPE_VAX730 : constant := 4;
CPU_SUBTYPE_VAX750 : constant := 3;
CPU_SUBTYPE_VAX780 : constant := 1;
CPU_SUBTYPE_VAX785 : constant := 2;
CPU_SUBTYPE_VAX8200 : constant := 7;
CPU_SUBTYPE_VAX8500 : constant := 8;
CPU_SUBTYPE_VAX8600 : constant := 9;
CPU_SUBTYPE_VAX8650 : constant := 10;
CPU_SUBTYPE_VAX8800 : constant := 11;
CPU_SUBTYPE_VAX_ALL : constant := 0;
CPU_SUBTYPE_X86_64_ALL : constant := 3;
CPU_SUBTYPE_X86_ALL : constant := 3;
CPU_SUBTYPE_X86_ARCH1 : constant := 4;
CPU_SUBTYPE_XEON : constant := 12;
CPU_SUBTYPE_XEON_MP : constant := 28;
CPU_THREADTYPE_INTEL_HTT : constant := 1;
CPU_THREADTYPE_NONE : constant := 0;
CPU_TYPE_ANY : constant := -1;
CPU_TYPE_ARM : constant := 12;
CPU_TYPE_HPPA : constant := 11;
CPU_TYPE_I386 : constant := 7;
CPU_TYPE_I860 : constant := 15;
CPU_TYPE_MC680x0 : constant := 6;
CPU_TYPE_MC88000 : constant := 13;
CPU_TYPE_MC98000 : constant := 10;
CPU_TYPE_POWERPC : constant := 18;
CPU_TYPE_POWERPC64 : constant := 16777234;
CPU_TYPE_SPARC : constant := 14;
CPU_TYPE_VAX : constant := 1;
CPU_TYPE_X86 : constant := 7;
CPU_TYPE_X86_64 : constant := 16777223;
-- _MACH_MACHINE_H_ (empty)
end C.mach.machine;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.boolean;
with C.mach.i386.vm_types;
with C.pthread;
package C.mach.memory_object_types is
pragma Preelaborate;
subtype memory_object_offset_t is unsigned_long_long;
subtype memory_object_size_t is unsigned_long_long;
subtype memory_object_cluster_size_t is mach.i386.vm_types.natural_t;
subtype memory_object_fault_info_t is mach.i386.vm_types.natural_t_ptr;
subtype memory_object_t is pthread.mach_port_t;
subtype memory_object_t_ptr is pthread.mach_port_t_ptr;
subtype memory_object_control_t is pthread.mach_port_t;
subtype memory_object_array_t is memory_object_t_ptr;
subtype memory_object_name_t is pthread.mach_port_t;
subtype memory_object_default_t is pthread.mach_port_t;
subtype memory_object_copy_strategy_t is signed_int;
subtype memory_object_return_t is signed_int;
subtype memory_object_info_t is signed_int_ptr;
subtype memory_object_flavor_t is signed_int;
subtype memory_object_info_data_t is signed_int_array (0 .. 1023);
type struct_memory_object_perf_info;
type struct_memory_object_perf_info is record
cluster_size : aliased memory_object_cluster_size_t;
may_cache : aliased mach.i386.boolean.boolean_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_memory_object_perf_info);
type struct_memory_object_perf_info_ptr is
access all struct_memory_object_perf_info;
for struct_memory_object_perf_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_memory_object_perf_info_ptr);
pragma Convention (C, struct_memory_object_perf_info_ptr);
type struct_memory_object_attr_info;
type struct_memory_object_attr_info is record
copy_strategy : aliased memory_object_copy_strategy_t;
cluster_size : aliased memory_object_cluster_size_t;
may_cache_object : aliased mach.i386.boolean.boolean_t;
temporary : aliased mach.i386.boolean.boolean_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_memory_object_attr_info);
type struct_memory_object_attr_info_ptr is
access all struct_memory_object_attr_info;
for struct_memory_object_attr_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_memory_object_attr_info_ptr);
pragma Convention (C, struct_memory_object_attr_info_ptr);
type struct_memory_object_behave_info;
type struct_memory_object_behave_info is record
copy_strategy : aliased memory_object_copy_strategy_t;
temporary : aliased mach.i386.boolean.boolean_t;
invalidate : aliased mach.i386.boolean.boolean_t;
silent_overwrite : aliased mach.i386.boolean.boolean_t;
advisory_pageout : aliased mach.i386.boolean.boolean_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_memory_object_behave_info);
type struct_memory_object_behave_info_ptr is
access all struct_memory_object_behave_info;
for struct_memory_object_behave_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_memory_object_behave_info_ptr);
pragma Convention (C, struct_memory_object_behave_info_ptr);
subtype memory_object_behave_info_t is
struct_memory_object_behave_info_ptr;
subtype memory_object_behave_info_data_t is
struct_memory_object_behave_info;
subtype memory_object_perf_info_t is struct_memory_object_perf_info_ptr;
subtype memory_object_perf_info_data_t is struct_memory_object_perf_info;
subtype memory_object_attr_info_t is struct_memory_object_attr_info_ptr;
subtype memory_object_attr_info_data_t is struct_memory_object_attr_info;
-- GET_MAP_MEM (function macro)
MAP_MEM_COPYBACK : constant := 1;
MAP_MEM_IO : constant := 2;
MAP_MEM_NAMED_CREATE : constant := 131072;
MAP_MEM_NAMED_REUSE : constant := 524288;
MAP_MEM_NOOP : constant := 0;
MAP_MEM_ONLY : constant := 65536;
MAP_MEM_PURGABLE : constant := 262144;
MAP_MEM_WCOMB : constant := 4;
MAP_MEM_WTHRU : constant := 3;
MEMORY_OBJECT_ATTRIBUTE_INFO : constant := 14;
MEMORY_OBJECT_ATTR_INFO_COUNT : constant := 4;
MEMORY_OBJECT_BEHAVE_INFO_COUNT : constant := 5;
MEMORY_OBJECT_BEHAVIOR_INFO : constant := 15;
MEMORY_OBJECT_CONTROL_NULL : constant := 0;
MEMORY_OBJECT_COPY_CALL : constant := 1;
MEMORY_OBJECT_COPY_DELAY : constant := 2;
MEMORY_OBJECT_COPY_INVALID : constant := 5;
MEMORY_OBJECT_COPY_NONE : constant := 0;
MEMORY_OBJECT_COPY_SYMMETRIC : constant := 4;
MEMORY_OBJECT_COPY_SYNC : constant := 8;
MEMORY_OBJECT_COPY_TEMPORARY : constant := 3;
MEMORY_OBJECT_DATA_FLUSH : constant := 1;
MEMORY_OBJECT_DATA_NO_CHANGE : constant := 2;
MEMORY_OBJECT_DATA_PURGE : constant := 4;
MEMORY_OBJECT_DATA_SYNC : constant := 16;
MEMORY_OBJECT_DEFAULT_NULL : constant := 0;
MEMORY_OBJECT_INFO_MAX : constant := 1024;
MEMORY_OBJECT_IO_SYNC : constant := 32;
MEMORY_OBJECT_NAME_NULL : constant := 0;
MEMORY_OBJECT_NULL : constant := 0;
MEMORY_OBJECT_PERFORMANCE_INFO : constant := 11;
MEMORY_OBJECT_PERF_INFO_COUNT : constant := 2;
MEMORY_OBJECT_RELEASE_NO_OP : constant := 4;
MEMORY_OBJECT_RESPECT_CACHE : constant := 2;
MEMORY_OBJECT_RETURN_ALL : constant := 2;
MEMORY_OBJECT_RETURN_ANYTHING : constant := 3;
MEMORY_OBJECT_RETURN_DIRTY : constant := 1;
MEMORY_OBJECT_RETURN_NONE : constant := 0;
MEMORY_OBJECT_TERMINATE_IDLE : constant := 1;
-- SET_MAP_MEM (function macro)
-- VM_64_BIT_DATA_OBJECTS (empty)
-- _MACH_MEMORY_OBJECT_TYPES_H_ (empty)
-- invalid_memory_object_flavor (unparsible)
end C.mach.memory_object_types;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.boolean;
with C.mach.i386.kern_return;
with C.mach.i386.vm_types;
with C.mach.port;
with C.pthread;
with C.stdint;
package C.mach.message is
pragma Preelaborate;
subtype mach_msg_timeout_t is mach.i386.vm_types.natural_t;
subtype mach_msg_bits_t is unsigned_int;
subtype mach_msg_size_t is mach.i386.vm_types.natural_t;
subtype mach_msg_size_t_ptr is mach.i386.vm_types.natural_t_ptr;
subtype mach_msg_id_t is mach.i386.vm_types.integer_t;
subtype mach_msg_type_name_t is unsigned_int;
subtype mach_msg_copy_options_t is unsigned_int;
subtype mach_msg_descriptor_type_t is unsigned_int;
type struct_31beb700 is record
pad1 : aliased mach.i386.vm_types.natural_t;
pad2 : aliased mach_msg_size_t;
pad3 : unsigned_int range 0 .. 16777215;
F_type : mach_msg_descriptor_type_t range 0 .. 255;
end record;
for struct_31beb700 use record
pad1 at 0 range 0 .. 31;
pad2 at 0 range 32 .. 63;
pad3 at 0 range 64 .. 87;
F_type at 0 range 88 .. 95;
end record;
for struct_31beb700'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_31beb700);
subtype mach_msg_type_descriptor_t is struct_31beb700;
type struct_73dba530 is record
name : aliased pthread.mach_port_t;
pad1 : aliased mach_msg_size_t;
pad2 : unsigned_int range 0 .. 65535;
disposition : mach_msg_type_name_t range 0 .. 255;
F_type : mach_msg_descriptor_type_t range 0 .. 255;
end record;
for struct_73dba530 use record
name at 0 range 0 .. 31;
pad1 at 0 range 32 .. 63;
pad2 at 0 range 64 .. 79;
disposition at 0 range 80 .. 87;
F_type at 0 range 88 .. 95;
end record;
for struct_73dba530'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_73dba530);
subtype mach_msg_port_descriptor_t is struct_73dba530;
type struct_b3c9d206 is record
address : aliased stdint.uint32_t;
size : aliased mach_msg_size_t;
deallocate : mach.i386.boolean.boolean_t range -128 .. 127;
copy : mach_msg_copy_options_t range 0 .. 255;
pad1 : unsigned_int range 0 .. 255;
F_type : mach_msg_descriptor_type_t range 0 .. 255;
end record;
for struct_b3c9d206 use record
address at 0 range 0 .. 31;
size at 0 range 32 .. 63;
deallocate at 0 range 64 .. 71;
copy at 0 range 72 .. 79;
pad1 at 0 range 80 .. 87;
F_type at 0 range 88 .. 95;
end record;
for struct_b3c9d206'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_b3c9d206);
subtype mach_msg_ool_descriptor32_t is struct_b3c9d206;
type struct_b384f0ea is record
address : aliased stdint.uint64_t;
deallocate : mach.i386.boolean.boolean_t range -128 .. 127;
copy : mach_msg_copy_options_t range 0 .. 255;
pad1 : unsigned_int range 0 .. 255;
F_type : mach_msg_descriptor_type_t range 0 .. 255;
size : aliased mach_msg_size_t;
end record;
for struct_b384f0ea use record
address at 0 range 0 .. 63;
deallocate at 0 range 64 .. 71;
copy at 0 range 72 .. 79;
pad1 at 0 range 80 .. 87;
F_type at 0 range 88 .. 95;
size at 0 range 96 .. 127;
end record;
for struct_b384f0ea'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_b384f0ea);
subtype mach_msg_ool_descriptor64_t is struct_b384f0ea;
type struct_175ca22c is record
address : aliased void_ptr;
size : aliased mach_msg_size_t;
deallocate : mach.i386.boolean.boolean_t range -128 .. 127;
copy : mach_msg_copy_options_t range 0 .. 255;
pad1 : unsigned_int range 0 .. 255;
F_type : mach_msg_descriptor_type_t range 0 .. 255;
end record;
for struct_175ca22c use record
address at 0 range 0 .. 31;
size at 0 range 32 .. 63;
deallocate at 0 range 64 .. 71;
copy at 0 range 72 .. 79;
pad1 at 0 range 80 .. 87;
F_type at 0 range 88 .. 95;
end record;
for struct_175ca22c'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_175ca22c);
subtype mach_msg_ool_descriptor_t is struct_175ca22c;
type struct_d943296d is record
address : aliased stdint.uint32_t;
count : aliased mach_msg_size_t;
deallocate : mach.i386.boolean.boolean_t range -128 .. 127;
copy : mach_msg_copy_options_t range 0 .. 255;
disposition : mach_msg_type_name_t range 0 .. 255;
F_type : mach_msg_descriptor_type_t range 0 .. 255;
end record;
for struct_d943296d use record
address at 0 range 0 .. 31;
count at 0 range 32 .. 63;
deallocate at 0 range 64 .. 71;
copy at 0 range 72 .. 79;
disposition at 0 range 80 .. 87;
F_type at 0 range 88 .. 95;
end record;
for struct_d943296d'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_d943296d);
subtype mach_msg_ool_ports_descriptor32_t is struct_d943296d;
type struct_2bd3844f is record
address : aliased stdint.uint64_t;
deallocate : mach.i386.boolean.boolean_t range -128 .. 127;
copy : mach_msg_copy_options_t range 0 .. 255;
disposition : mach_msg_type_name_t range 0 .. 255;
F_type : mach_msg_descriptor_type_t range 0 .. 255;
count : aliased mach_msg_size_t;
end record;
for struct_2bd3844f use record
address at 0 range 0 .. 63;
deallocate at 0 range 64 .. 71;
copy at 0 range 72 .. 79;
disposition at 0 range 80 .. 87;
F_type at 0 range 88 .. 95;
count at 0 range 96 .. 127;
end record;
for struct_2bd3844f'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_2bd3844f);
subtype mach_msg_ool_ports_descriptor64_t is struct_2bd3844f;
type struct_a47b246d is record
address : aliased void_ptr;
count : aliased mach_msg_size_t;
deallocate : mach.i386.boolean.boolean_t range -128 .. 127;
copy : mach_msg_copy_options_t range 0 .. 255;
disposition : mach_msg_type_name_t range 0 .. 255;
F_type : mach_msg_descriptor_type_t range 0 .. 255;
end record;
for struct_a47b246d use record
address at 0 range 0 .. 31;
count at 0 range 32 .. 63;
deallocate at 0 range 64 .. 71;
copy at 0 range 72 .. 79;
disposition at 0 range 80 .. 87;
F_type at 0 range 88 .. 95;
end record;
for struct_a47b246d'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_a47b246d);
subtype mach_msg_ool_ports_descriptor_t is struct_a47b246d;
type union_22ea4504 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
port : mach_msg_port_descriptor_t;
when 1 =>
out_of_line : mach_msg_ool_descriptor_t;
when 2 =>
ool_ports : mach_msg_ool_ports_descriptor_t;
when others =>
F_type : mach_msg_type_descriptor_t;
end case;
end record;
pragma Unchecked_Union (union_22ea4504);
pragma Convention (C_Pass_By_Copy, union_22ea4504);
type union_22ea4504_ptr is access all union_22ea4504;
for union_22ea4504_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (union_22ea4504_ptr);
pragma Convention (C, union_22ea4504_ptr);
subtype mach_msg_descriptor_t is union_22ea4504;
subtype mach_msg_descriptor_t_ptr is union_22ea4504_ptr;
type struct_a8edede2 is record
msgh_descriptor_count : aliased mach_msg_size_t;
end record;
for struct_a8edede2'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_a8edede2);
type struct_a8edede2_ptr is access all struct_a8edede2;
for struct_a8edede2_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_a8edede2_ptr);
pragma Convention (C, struct_a8edede2_ptr);
subtype mach_msg_body_t is struct_a8edede2;
subtype mach_msg_body_t_ptr is struct_a8edede2_ptr;
type struct_4d413f7c is record
msgh_bits : aliased mach_msg_bits_t;
msgh_size : aliased mach_msg_size_t;
msgh_remote_port : aliased pthread.mach_port_t;
msgh_local_port : aliased pthread.mach_port_t;
msgh_reserved : aliased mach_msg_size_t;
msgh_id : aliased mach_msg_id_t;
end record;
for struct_4d413f7c'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_4d413f7c);
type struct_4d413f7c_ptr is access all struct_4d413f7c;
for struct_4d413f7c_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_4d413f7c_ptr);
pragma Convention (C, struct_4d413f7c_ptr);
subtype mach_msg_header_t is struct_4d413f7c;
subtype mach_msg_header_t_ptr is struct_4d413f7c_ptr;
type struct_3c56477e is record
header : aliased mach_msg_header_t;
F_body : aliased mach_msg_body_t;
end record;
for struct_3c56477e'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_3c56477e);
subtype mach_msg_base_t is struct_3c56477e;
subtype mach_msg_trailer_type_t is unsigned_int;
subtype mach_msg_trailer_size_t is unsigned_int;
type struct_15784b09 is record
msgh_trailer_type : aliased mach_msg_trailer_type_t;
msgh_trailer_size : aliased mach_msg_trailer_size_t;
end record;
for struct_15784b09'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_15784b09);
subtype mach_msg_trailer_t is struct_15784b09;
type struct_de82772d is record
msgh_trailer_type : aliased mach_msg_trailer_type_t;
msgh_trailer_size : aliased mach_msg_trailer_size_t;
msgh_seqno : aliased mach.port.mach_port_seqno_t;
end record;
for struct_de82772d'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_de82772d);
subtype mach_msg_seqno_trailer_t is struct_de82772d;
type struct_45ad6436 is record
val : aliased unsigned_int_array (0 .. 1);
end record;
for struct_45ad6436'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_45ad6436);
subtype security_token_t is struct_45ad6436;
type struct_344aed15 is record
msgh_trailer_type : aliased mach_msg_trailer_type_t;
msgh_trailer_size : aliased mach_msg_trailer_size_t;
msgh_seqno : aliased mach.port.mach_port_seqno_t;
msgh_sender : aliased security_token_t;
end record;
for struct_344aed15'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_344aed15);
subtype mach_msg_security_trailer_t is struct_344aed15;
type struct_313ba0c4 is record
val : aliased unsigned_int_array (0 .. 7);
end record;
for struct_313ba0c4'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_313ba0c4);
subtype audit_token_t is struct_313ba0c4;
type struct_ada945ba is record
msgh_trailer_type : aliased mach_msg_trailer_type_t;
msgh_trailer_size : aliased mach_msg_trailer_size_t;
msgh_seqno : aliased mach.port.mach_port_seqno_t;
msgh_sender : aliased security_token_t;
msgh_audit : aliased audit_token_t;
end record;
for struct_ada945ba'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_ada945ba);
subtype mach_msg_audit_trailer_t is struct_ada945ba;
type struct_17481669 is record
sender : aliased mach.port.mach_port_name_t;
end record;
for struct_17481669'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_17481669);
subtype msg_labels_t is struct_17481669;
type struct_a02fa6b6 is record
msgh_trailer_type : aliased mach_msg_trailer_type_t;
msgh_trailer_size : aliased mach_msg_trailer_size_t;
msgh_seqno : aliased mach.port.mach_port_seqno_t;
msgh_sender : aliased security_token_t;
msgh_audit : aliased audit_token_t;
msgh_labels : aliased msg_labels_t;
msgh_ad : aliased signed_int;
end record;
for struct_a02fa6b6'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_a02fa6b6);
subtype mach_msg_mac_trailer_t is struct_a02fa6b6;
subtype mach_msg_max_trailer_t is mach_msg_mac_trailer_t;
subtype mach_msg_format_0_trailer_t is mach_msg_security_trailer_t;
KERNEL_SECURITY_TOKEN : aliased security_token_t;
pragma Import (C, KERNEL_SECURITY_TOKEN, "KERNEL_SECURITY_TOKEN");
KERNEL_AUDIT_TOKEN : aliased audit_token_t;
pragma Import (C, KERNEL_AUDIT_TOKEN, "KERNEL_AUDIT_TOKEN");
subtype mach_msg_options_t is mach.i386.vm_types.integer_t;
type struct_965a2f94 is record
header : aliased mach_msg_header_t;
end record;
for struct_965a2f94'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_965a2f94);
subtype mach_msg_empty_send_t is struct_965a2f94;
type struct_6ba00457 is record
header : aliased mach_msg_header_t;
trailer : aliased mach_msg_trailer_t;
end record;
for struct_6ba00457'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_6ba00457);
subtype mach_msg_empty_rcv_t is struct_6ba00457;
type union_e7532a7f (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
send : mach_msg_empty_send_t;
when others =>
rcv : mach_msg_empty_rcv_t;
end case;
end record;
pragma Unchecked_Union (union_e7532a7f);
pragma Convention (C_Pass_By_Copy, union_e7532a7f);
subtype mach_msg_empty_t is union_e7532a7f;
subtype mach_msg_type_size_t is mach.i386.vm_types.natural_t;
subtype mach_msg_type_number_t is mach.i386.vm_types.natural_t;
subtype mach_msg_option_t is mach.i386.vm_types.integer_t;
subtype mach_msg_return_t is mach.i386.kern_return.kern_return_t;
function mach_msg_overwrite (msg : access mach_msg_header_t;
option : mach_msg_option_t; send_size : mach_msg_size_t;
rcv_size : mach_msg_size_t; rcv_name : mach.port.mach_port_name_t;
timeout : mach_msg_timeout_t; notify : mach.port.mach_port_name_t;
rcv_msg : access mach_msg_header_t; rcv_limit : mach_msg_size_t)
return mach_msg_return_t;
pragma Import (C, mach_msg_overwrite, "mach_msg_overwrite");
function mach_msg (msg : access mach_msg_header_t;
option : mach_msg_option_t; send_size : mach_msg_size_t;
rcv_size : mach_msg_size_t; rcv_name : mach.port.mach_port_name_t;
timeout : mach_msg_timeout_t; notify : mach.port.mach_port_name_t)
return mach_msg_return_t;
pragma Import (C, mach_msg, "mach_msg");
-- GET_RCV_ELEMENTS (function macro)
-- KERNEL_AUDIT_TOKEN_VALUE (plase type with #pragma instance)
-- KERNEL_SECURITY_TOKEN_VALUE (plase type with #pragma instance)
-- MACH_MSGH_BITS (function macro)
MACH_MSGH_BITS_CIRCULAR : constant := 1073741824;
MACH_MSGH_BITS_COMPLEX : constant := 2147483648;
-- MACH_MSGH_BITS_LOCAL (function macro)
MACH_MSGH_BITS_LOCAL_MASK : constant := 65280;
-- MACH_MSGH_BITS_OTHER (function macro)
-- MACH_MSGH_BITS_PORTS (function macro)
MACH_MSGH_BITS_PORTS_MASK : constant := 65535;
-- MACH_MSGH_BITS_REMOTE (function macro)
MACH_MSGH_BITS_REMOTE_MASK : constant := 255;
MACH_MSGH_BITS_USED : constant := 3221291007;
MACH_MSGH_BITS_USER : constant := 2147549183;
MACH_MSGH_BITS_ZERO : constant := 0;
MACH_MSGH_KIND_NORMAL : constant := 0;
MACH_MSGH_KIND_NOTIFICATION : constant := 1;
MACH_MSG_ALLOCATE : constant := 2;
MACH_MSG_BODY_NULL : constant mach_msg_body_t_ptr := null;
MACH_MSG_DESCRIPTOR_NULL : constant mach_msg_descriptor_t_ptr := null;
MACH_MSG_IPC_KERNEL : constant := 2048;
MACH_MSG_IPC_SPACE : constant := 8192;
MACH_MSG_MASK : constant := 15872;
MACH_MSG_NULL : constant mach_msg_header_t_ptr := null;
MACH_MSG_OOL_DESCRIPTOR : constant := 1;
MACH_MSG_OOL_PORTS_DESCRIPTOR : constant := 2;
MACH_MSG_OOL_VOLATILE_DESCRIPTOR : constant := 3;
MACH_MSG_OPTION_NONE : constant := 0;
MACH_MSG_OVERWRITE_option : constant := 3;
MACH_MSG_PHYSICAL_COPY : constant := 0;
MACH_MSG_PORT_DESCRIPTOR : constant := 0;
MACH_MSG_SIZE_MAX : constant := 4294967295;
MACH_MSG_SIZE_NULL : constant mach_msg_size_t_ptr := null;
MACH_MSG_SUCCESS : constant := 0;
MACH_MSG_TIMEOUT_NONE : constant := 0;
MACH_MSG_TRAILER_FORMAT_0 : constant := 0;
MACH_MSG_TRAILER_FORMAT_0_SIZE : constant := 20;
MACH_MSG_TRAILER_MINIMUM_SIZE : constant := 8;
MACH_MSG_TYPE_COPY_RECEIVE : constant := 22;
MACH_MSG_TYPE_COPY_SEND : constant := 19;
MACH_MSG_TYPE_LAST : constant := 22;
MACH_MSG_TYPE_MAKE_SEND : constant := 20;
MACH_MSG_TYPE_MAKE_SEND_ONCE : constant := 21;
MACH_MSG_TYPE_MOVE_RECEIVE : constant := 16;
MACH_MSG_TYPE_MOVE_SEND : constant := 17;
MACH_MSG_TYPE_MOVE_SEND_ONCE : constant := 18;
MACH_MSG_TYPE_POLYMORPHIC : constant := 4294967295;
-- MACH_MSG_TYPE_PORT_ANY (function macro)
-- MACH_MSG_TYPE_PORT_ANY_RIGHT (function macro)
-- MACH_MSG_TYPE_PORT_ANY_SEND (function macro)
MACH_MSG_TYPE_PORT_NAME : constant := 15;
MACH_MSG_TYPE_PORT_NONE : constant := 0;
MACH_MSG_TYPE_PORT_RECEIVE : constant := 16;
MACH_MSG_TYPE_PORT_SEND : constant := 17;
MACH_MSG_TYPE_PORT_SEND_ONCE : constant := 18;
MACH_MSG_VIRTUAL_COPY : constant := 1;
MACH_MSG_VM_KERNEL : constant := 1024;
MACH_MSG_VM_SPACE : constant := 4096;
MACH_RCV_BODY_ERROR : constant := 268451852;
MACH_RCV_HEADER_ERROR : constant := 268451851;
MACH_RCV_INTERRUPT : constant := 1024;
MACH_RCV_INTERRUPTED : constant := 268451845;
MACH_RCV_INVALID_DATA : constant := 268451848;
MACH_RCV_INVALID_NAME : constant := 268451842;
MACH_RCV_INVALID_NOTIFY : constant := 268451847;
MACH_RCV_INVALID_TRAILER : constant := 268451855;
MACH_RCV_INVALID_TYPE : constant := 268451853;
MACH_RCV_IN_PROGRESS : constant := 268451841;
MACH_RCV_IN_PROGRESS_TIMED : constant := 268451857;
MACH_RCV_IN_SET : constant := 268451850;
MACH_RCV_LARGE : constant := 4;
MACH_RCV_MSG : constant := 2;
MACH_RCV_NOTIFY : constant := 512;
MACH_RCV_OVERWRITE : constant := 4096;
MACH_RCV_PORT_CHANGED : constant := 268451846;
MACH_RCV_PORT_DIED : constant := 268451849;
MACH_RCV_SCATTER_SMALL : constant := 268451854;
MACH_RCV_TIMED_OUT : constant := 268451843;
MACH_RCV_TIMEOUT : constant := 256;
MACH_RCV_TOO_LARGE : constant := 268451844;
MACH_RCV_TRAILER_AUDIT : constant := 3;
MACH_RCV_TRAILER_AV : constant := 8;
-- MACH_RCV_TRAILER_ELEMENTS (function macro)
MACH_RCV_TRAILER_LABELS : constant := 4;
MACH_RCV_TRAILER_MASK : constant := 4278190080;
MACH_RCV_TRAILER_NULL : constant := 0;
MACH_RCV_TRAILER_SENDER : constant := 2;
MACH_RCV_TRAILER_SEQNO : constant := 1;
-- MACH_RCV_TRAILER_TYPE (function macro)
MACH_SEND_ALWAYS : constant := 65536;
MACH_SEND_CANCEL : constant := 128;
MACH_SEND_INTERRUPT : constant := 64;
MACH_SEND_INTERRUPTED : constant := 268435463;
MACH_SEND_INVALID_DATA : constant := 268435458;
MACH_SEND_INVALID_DEST : constant := 268435459;
MACH_SEND_INVALID_HEADER : constant := 268435472;
MACH_SEND_INVALID_MEMORY : constant := 268435468;
MACH_SEND_INVALID_NOTIFY : constant := 268435467;
MACH_SEND_INVALID_REPLY : constant := 268435465;
MACH_SEND_INVALID_RIGHT : constant := 268435466;
MACH_SEND_INVALID_RT_OOL_SIZE : constant := 268435477;
MACH_SEND_INVALID_TRAILER : constant := 268435473;
MACH_SEND_INVALID_TYPE : constant := 268435471;
MACH_SEND_IN_PROGRESS : constant := 268435457;
MACH_SEND_MSG : constant := 1;
MACH_SEND_MSG_TOO_SMALL : constant := 268435464;
MACH_SEND_NO_BUFFER : constant := 268435469;
MACH_SEND_TIMED_OUT : constant := 268435460;
MACH_SEND_TIMEOUT : constant := 16;
MACH_SEND_TOO_LARGE : constant := 268435470;
MACH_SEND_TRAILER : constant := 131072;
MAX_TRAILER_SIZE : constant := 60;
-- REQUESTED_TRAILER_SIZE (function macro)
-- _MACH_MESSAGE_H_ (empty)
subtype mach_msg_kind_t is mach.port.mach_port_seqno_t;
-- .msgh_kind renames .msgh_seqno (accessor)
-- round_msg (function macro)
end C.mach.message;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.boolean;
with C.mach.i386.vm_types;
package C.mach.policy is
pragma Preelaborate;
subtype policy_t is signed_int;
subtype policy_info_t is mach.i386.vm_types.integer_t_ptr;
subtype policy_base_t is mach.i386.vm_types.integer_t_ptr;
subtype policy_limit_t is mach.i386.vm_types.integer_t_ptr;
type struct_policy_timeshare_base;
type struct_policy_timeshare_base is record
base_priority : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_timeshare_base);
type struct_policy_timeshare_base_ptr is
access all struct_policy_timeshare_base;
for struct_policy_timeshare_base_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_policy_timeshare_base_ptr);
pragma Convention (C, struct_policy_timeshare_base_ptr);
type struct_policy_timeshare_limit;
type struct_policy_timeshare_limit is record
max_priority : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_timeshare_limit);
type struct_policy_timeshare_limit_ptr is
access all struct_policy_timeshare_limit;
for struct_policy_timeshare_limit_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_policy_timeshare_limit_ptr);
pragma Convention (C, struct_policy_timeshare_limit_ptr);
type struct_policy_timeshare_info;
type struct_policy_timeshare_info is record
max_priority : aliased mach.i386.vm_types.integer_t;
base_priority : aliased mach.i386.vm_types.integer_t;
cur_priority : aliased mach.i386.vm_types.integer_t;
depressed : aliased mach.i386.boolean.boolean_t;
depress_priority : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_timeshare_info);
type struct_policy_timeshare_info_ptr is
access all struct_policy_timeshare_info;
for struct_policy_timeshare_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_policy_timeshare_info_ptr);
pragma Convention (C, struct_policy_timeshare_info_ptr);
subtype policy_timeshare_base_t is struct_policy_timeshare_base_ptr;
subtype policy_timeshare_limit_t is struct_policy_timeshare_limit_ptr;
subtype policy_timeshare_info_t is struct_policy_timeshare_info_ptr;
subtype policy_timeshare_base_data_t is struct_policy_timeshare_base;
subtype policy_timeshare_limit_data_t is struct_policy_timeshare_limit;
subtype policy_timeshare_info_data_t is struct_policy_timeshare_info;
type struct_policy_rr_base;
type struct_policy_rr_base is record
base_priority : aliased mach.i386.vm_types.integer_t;
quantum : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_rr_base);
type struct_policy_rr_base_ptr is access all struct_policy_rr_base;
for struct_policy_rr_base_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_policy_rr_base_ptr);
pragma Convention (C, struct_policy_rr_base_ptr);
type struct_policy_rr_limit;
type struct_policy_rr_limit is record
max_priority : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_rr_limit);
type struct_policy_rr_limit_ptr is access all struct_policy_rr_limit;
for struct_policy_rr_limit_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_policy_rr_limit_ptr);
pragma Convention (C, struct_policy_rr_limit_ptr);
type struct_policy_rr_info;
type struct_policy_rr_info is record
max_priority : aliased mach.i386.vm_types.integer_t;
base_priority : aliased mach.i386.vm_types.integer_t;
quantum : aliased mach.i386.vm_types.integer_t;
depressed : aliased mach.i386.boolean.boolean_t;
depress_priority : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_rr_info);
type struct_policy_rr_info_ptr is access all struct_policy_rr_info;
for struct_policy_rr_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_policy_rr_info_ptr);
pragma Convention (C, struct_policy_rr_info_ptr);
subtype policy_rr_base_t is struct_policy_rr_base_ptr;
subtype policy_rr_limit_t is struct_policy_rr_limit_ptr;
subtype policy_rr_info_t is struct_policy_rr_info_ptr;
subtype policy_rr_base_data_t is struct_policy_rr_base;
subtype policy_rr_limit_data_t is struct_policy_rr_limit;
subtype policy_rr_info_data_t is struct_policy_rr_info;
type struct_policy_fifo_base;
type struct_policy_fifo_base is record
base_priority : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_fifo_base);
type struct_policy_fifo_base_ptr is access all struct_policy_fifo_base;
for struct_policy_fifo_base_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_policy_fifo_base_ptr);
pragma Convention (C, struct_policy_fifo_base_ptr);
type struct_policy_fifo_limit;
type struct_policy_fifo_limit is record
max_priority : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_fifo_limit);
type struct_policy_fifo_limit_ptr is access all struct_policy_fifo_limit;
for struct_policy_fifo_limit_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_policy_fifo_limit_ptr);
pragma Convention (C, struct_policy_fifo_limit_ptr);
type struct_policy_fifo_info;
type struct_policy_fifo_info is record
max_priority : aliased mach.i386.vm_types.integer_t;
base_priority : aliased mach.i386.vm_types.integer_t;
depressed : aliased mach.i386.boolean.boolean_t;
depress_priority : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_fifo_info);
type struct_policy_fifo_info_ptr is access all struct_policy_fifo_info;
for struct_policy_fifo_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_policy_fifo_info_ptr);
pragma Convention (C, struct_policy_fifo_info_ptr);
subtype policy_fifo_base_t is struct_policy_fifo_base_ptr;
subtype policy_fifo_limit_t is struct_policy_fifo_limit_ptr;
subtype policy_fifo_info_t is struct_policy_fifo_info_ptr;
subtype policy_fifo_base_data_t is struct_policy_fifo_base;
subtype policy_fifo_limit_data_t is struct_policy_fifo_limit;
subtype policy_fifo_info_data_t is struct_policy_fifo_info;
type struct_policy_bases;
type struct_policy_bases is record
ts : aliased policy_timeshare_base_data_t;
rr : aliased policy_rr_base_data_t;
fifo : aliased policy_fifo_base_data_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_bases);
type struct_policy_limits;
type struct_policy_limits is record
ts : aliased policy_timeshare_limit_data_t;
rr : aliased policy_rr_limit_data_t;
fifo : aliased policy_fifo_limit_data_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_limits);
type struct_policy_infos;
type struct_policy_infos is record
ts : aliased policy_timeshare_info_data_t;
rr : aliased policy_rr_info_data_t;
fifo : aliased policy_fifo_info_data_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_policy_infos);
subtype policy_base_data_t is struct_policy_bases;
subtype policy_limit_data_t is struct_policy_limits;
subtype policy_info_data_t is struct_policy_infos;
POLICYCLASS_FIXEDPRI : constant := 6;
POLICY_FIFO : constant := 4;
POLICY_FIFO_BASE_COUNT : constant := 1;
POLICY_FIFO_INFO_COUNT : constant := 4;
POLICY_FIFO_LIMIT_COUNT : constant := 1;
POLICY_NULL : constant := 0;
POLICY_RR : constant := 2;
POLICY_RR_BASE_COUNT : constant := 2;
POLICY_RR_INFO_COUNT : constant := 5;
POLICY_RR_LIMIT_COUNT : constant := 1;
POLICY_TIMESHARE : constant := 1;
POLICY_TIMESHARE_BASE_COUNT : constant := 1;
POLICY_TIMESHARE_INFO_COUNT : constant := 5;
POLICY_TIMESHARE_LIMIT_COUNT : constant := 1;
-- _MACH_POLICY_H_ (empty)
-- __NEW_SCHEDULING_FRAMEWORK__ (empty)
-- invalid_policy (function macro)
end C.mach.policy;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.boolean;
with C.mach.i386.vm_types;
with C.pthread;
package C.mach.port is
pragma Preelaborate;
subtype mach_port_name_t is mach.i386.vm_types.natural_t;
subtype mach_port_name_t_ptr is mach.i386.vm_types.natural_t_ptr;
subtype mach_port_name_array_t is mach_port_name_t_ptr;
subtype mach_port_array_t is pthread.mach_port_t_ptr;
subtype mach_port_right_t is mach.i386.vm_types.natural_t;
subtype mach_port_type_t is mach.i386.vm_types.natural_t;
subtype mach_port_type_t_ptr is mach.i386.vm_types.natural_t_ptr;
subtype mach_port_type_array_t is mach_port_type_t_ptr;
subtype mach_port_urefs_t is mach.i386.vm_types.natural_t;
subtype mach_port_delta_t is mach.i386.vm_types.integer_t;
subtype mach_port_seqno_t is mach.i386.vm_types.natural_t;
subtype mach_port_mscount_t is mach.i386.vm_types.natural_t;
subtype mach_port_msgcount_t is mach.i386.vm_types.natural_t;
subtype mach_port_rights_t is mach.i386.vm_types.natural_t;
subtype mach_port_srights_t is unsigned_int;
type struct_mach_port_status;
type struct_mach_port_status is record
mps_pset : aliased mach_port_rights_t;
mps_seqno : aliased mach_port_seqno_t;
mps_mscount : aliased mach_port_mscount_t;
mps_qlimit : aliased mach_port_msgcount_t;
mps_msgcount : aliased mach_port_msgcount_t;
mps_sorights : aliased mach_port_rights_t;
mps_srights : aliased mach.i386.boolean.boolean_t;
mps_pdrequest : aliased mach.i386.boolean.boolean_t;
mps_nsrequest : aliased mach.i386.boolean.boolean_t;
mps_flags : aliased mach.i386.vm_types.natural_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_mach_port_status);
subtype mach_port_status_t is struct_mach_port_status;
type struct_mach_port_limits;
type struct_mach_port_limits is record
mpl_qlimit : aliased mach_port_msgcount_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_mach_port_limits);
subtype mach_port_limits_t is struct_mach_port_limits;
subtype mach_port_info_t is mach.i386.vm_types.integer_t_ptr;
subtype mach_port_flavor_t is signed_int;
type struct_mach_port_qos;
type struct_mach_port_qos is record
name : unsigned_int range 0 .. 1;
prealloc : unsigned_int range 0 .. 1;
pad1 : mach.i386.boolean.boolean_t range -536870912 .. 536870911;
len : aliased mach.i386.vm_types.natural_t;
end record;
for struct_mach_port_qos use record
name at 0 range 0 .. 0;
prealloc at 0 range 1 .. 1;
pad1 at 0 range 2 .. 31;
len at 0 range 32 .. 63;
end record;
pragma Convention (C_Pass_By_Copy, struct_mach_port_qos);
subtype mach_port_qos_t is struct_mach_port_qos;
MACH_PORT_DEAD : constant := 4294967295;
MACH_PORT_DNREQUESTS_SIZE : constant := 3;
MACH_PORT_DNREQUESTS_SIZE_COUNT : constant := 1;
-- MACH_PORT_GEN (function macro)
-- MACH_PORT_INDEX (function macro)
MACH_PORT_LIMITS_INFO : constant := 1;
MACH_PORT_LIMITS_INFO_COUNT : constant := 1;
-- MACH_PORT_MAKE (function macro)
MACH_PORT_NULL : constant := 0;
MACH_PORT_QLIMIT_BASIC : constant := 5;
MACH_PORT_QLIMIT_DEFAULT : constant := 5;
MACH_PORT_QLIMIT_LARGE : constant := 1024;
MACH_PORT_QLIMIT_MAX : constant := 1024;
MACH_PORT_QLIMIT_MIN : constant := 0;
MACH_PORT_QLIMIT_SMALL : constant := 16;
MACH_PORT_QLIMIT_ZERO : constant := 0;
MACH_PORT_RECEIVE_STATUS : constant := 2;
MACH_PORT_RECEIVE_STATUS_COUNT : constant := 10;
MACH_PORT_RIGHT_DEAD_NAME : constant := 4;
MACH_PORT_RIGHT_LABELH : constant := 5;
MACH_PORT_RIGHT_NUMBER : constant := 6;
MACH_PORT_RIGHT_PORT_SET : constant := 3;
MACH_PORT_RIGHT_RECEIVE : constant := 1;
MACH_PORT_RIGHT_SEND : constant := 0;
MACH_PORT_RIGHT_SEND_ONCE : constant := 2;
MACH_PORT_SRIGHTS_NONE : constant := 0;
MACH_PORT_SRIGHTS_PRESENT : constant := 1;
-- MACH_PORT_TYPE (function macro)
MACH_PORT_TYPE_ALL_RIGHTS : constant := 2031616;
MACH_PORT_TYPE_DEAD_NAME : constant := 1048576;
MACH_PORT_TYPE_DNREQUEST : constant := -2147483648;
MACH_PORT_TYPE_LABELH : constant := 2097152;
MACH_PORT_TYPE_NONE : constant := 0;
MACH_PORT_TYPE_PORT_OR_DEAD : constant := 1507328;
MACH_PORT_TYPE_PORT_RIGHTS : constant := 458752;
MACH_PORT_TYPE_PORT_SET : constant := 524288;
MACH_PORT_TYPE_RECEIVE : constant := 131072;
MACH_PORT_TYPE_SEND : constant := 65536;
MACH_PORT_TYPE_SEND_ONCE : constant := 262144;
MACH_PORT_TYPE_SEND_RECEIVE : constant := 196608;
MACH_PORT_TYPE_SEND_RIGHTS : constant := 327680;
-- MACH_PORT_VALID (function macro)
-- _MACH_PORT_H_ (empty)
end C.mach.port;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.boolean;
with C.mach.i386.vm_types;
with C.mach.machine;
package C.mach.processor_info is
pragma Preelaborate;
subtype processor_info_t is mach.i386.vm_types.integer_t_ptr;
subtype processor_info_array_t is mach.i386.vm_types.integer_t_ptr;
subtype processor_info_data_t is
mach.i386.vm_types.integer_t_array (0 .. 1023);
subtype processor_set_info_t is mach.i386.vm_types.integer_t_ptr;
subtype processor_set_info_data_t is
mach.i386.vm_types.integer_t_array (0 .. 1023);
subtype processor_flavor_t is signed_int;
type struct_processor_basic_info;
type struct_processor_basic_info is record
cpu_type : aliased mach.machine.cpu_type_t;
cpu_subtype : aliased mach.machine.cpu_subtype_t;
running : aliased mach.i386.boolean.boolean_t;
slot_num : aliased signed_int;
is_master : aliased mach.i386.boolean.boolean_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_processor_basic_info);
type struct_processor_basic_info_ptr is
access all struct_processor_basic_info;
for struct_processor_basic_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_processor_basic_info_ptr);
pragma Convention (C, struct_processor_basic_info_ptr);
subtype processor_basic_info_data_t is struct_processor_basic_info;
subtype processor_basic_info_t is struct_processor_basic_info_ptr;
type struct_processor_cpu_load_info;
type struct_processor_cpu_load_info is record
cpu_ticks : aliased unsigned_int_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_processor_cpu_load_info);
type struct_processor_cpu_load_info_ptr is
access all struct_processor_cpu_load_info;
for struct_processor_cpu_load_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_processor_cpu_load_info_ptr);
pragma Convention (C, struct_processor_cpu_load_info_ptr);
subtype processor_cpu_load_info_data_t is struct_processor_cpu_load_info;
subtype processor_cpu_load_info_t is struct_processor_cpu_load_info_ptr;
subtype processor_set_flavor_t is signed_int;
type struct_processor_set_basic_info;
type struct_processor_set_basic_info is record
processor_count : aliased signed_int;
default_policy : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_processor_set_basic_info);
type struct_processor_set_basic_info_ptr is
access all struct_processor_set_basic_info;
for struct_processor_set_basic_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_processor_set_basic_info_ptr);
pragma Convention (C, struct_processor_set_basic_info_ptr);
subtype processor_set_basic_info_data_t is
struct_processor_set_basic_info;
subtype processor_set_basic_info_t is struct_processor_set_basic_info_ptr;
type struct_processor_set_load_info;
type struct_processor_set_load_info is record
task_count : aliased signed_int;
thread_count : aliased signed_int;
load_average : aliased mach.i386.vm_types.integer_t;
mach_factor : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_processor_set_load_info);
type struct_processor_set_load_info_ptr is
access all struct_processor_set_load_info;
for struct_processor_set_load_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_processor_set_load_info_ptr);
pragma Convention (C, struct_processor_set_load_info_ptr);
subtype processor_set_load_info_data_t is struct_processor_set_load_info;
subtype processor_set_load_info_t is struct_processor_set_load_info_ptr;
LOAD_SCALE : constant := 1000;
PROCESSOR_BASIC_INFO : constant := 1;
PROCESSOR_BASIC_INFO_COUNT : constant := 5;
PROCESSOR_CPU_LOAD_INFO : constant := 2;
PROCESSOR_CPU_LOAD_INFO_COUNT : constant := 4;
PROCESSOR_INFO_MAX : constant := 1024;
PROCESSOR_PM_REGS_INFO : constant := 268435457;
PROCESSOR_SET_BASIC_INFO : constant := 5;
PROCESSOR_SET_BASIC_INFO_COUNT : constant := 2;
PROCESSOR_SET_INFO_MAX : constant := 1024;
PROCESSOR_SET_LOAD_INFO : constant := 4;
PROCESSOR_SET_LOAD_INFO_COUNT : constant := 4;
PROCESSOR_TEMPERATURE : constant := 268435458;
-- _MACH_PROCESSOR_INFO_H_ (empty)
end C.mach.processor_info;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.std_types is
pragma Preelaborate;
-- _MACH_STD_TYPES_H_ (empty)
end C.mach.std_types;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
with C.mach.policy;
with C.mach.time_value;
with C.stdint;
package C.mach.task_info is
pragma Preelaborate;
subtype task_flavor_t is mach.i386.vm_types.natural_t;
subtype task_info_t is mach.i386.vm_types.integer_t_ptr;
subtype task_info_data_t is
mach.i386.vm_types.integer_t_array (0 .. 1023);
type struct_task_basic_info_32;
type struct_task_basic_info_32 is record
suspend_count : aliased mach.i386.vm_types.integer_t;
virtual_size : aliased mach.i386.vm_types.natural_t;
resident_size : aliased mach.i386.vm_types.natural_t;
user_time : aliased mach.time_value.time_value_t;
system_time : aliased mach.time_value.time_value_t;
policy : aliased mach.policy.policy_t;
end record;
for struct_task_basic_info_32'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_task_basic_info_32);
type struct_task_basic_info_32_ptr is
access all struct_task_basic_info_32;
for struct_task_basic_info_32_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_task_basic_info_32_ptr);
pragma Convention (C, struct_task_basic_info_32_ptr);
subtype task_basic_info_32_data_t is struct_task_basic_info_32;
subtype task_basic_info_32_t is struct_task_basic_info_32_ptr;
type struct_task_basic_info_64;
type struct_task_basic_info_64 is record
suspend_count : aliased mach.i386.vm_types.integer_t;
virtual_size : aliased mach.i386.vm_types.mach_vm_size_t;
resident_size : aliased mach.i386.vm_types.mach_vm_size_t;
user_time : aliased mach.time_value.time_value_t;
system_time : aliased mach.time_value.time_value_t;
policy : aliased mach.policy.policy_t;
end record;
for struct_task_basic_info_64'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_task_basic_info_64);
type struct_task_basic_info_64_ptr is
access all struct_task_basic_info_64;
for struct_task_basic_info_64_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_task_basic_info_64_ptr);
pragma Convention (C, struct_task_basic_info_64_ptr);
subtype task_basic_info_64_data_t is struct_task_basic_info_64;
subtype task_basic_info_64_t is struct_task_basic_info_64_ptr;
type struct_task_basic_info;
type struct_task_basic_info is record
suspend_count : aliased mach.i386.vm_types.integer_t;
virtual_size : aliased mach.i386.vm_types.vm_size_t;
resident_size : aliased mach.i386.vm_types.vm_size_t;
user_time : aliased mach.time_value.time_value_t;
system_time : aliased mach.time_value.time_value_t;
policy : aliased mach.policy.policy_t;
end record;
for struct_task_basic_info'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_task_basic_info);
type struct_task_basic_info_ptr is access all struct_task_basic_info;
for struct_task_basic_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_task_basic_info_ptr);
pragma Convention (C, struct_task_basic_info_ptr);
subtype task_basic_info_data_t is struct_task_basic_info;
subtype task_basic_info_t is struct_task_basic_info_ptr;
type struct_task_events_info;
type struct_task_events_info is record
faults : aliased mach.i386.vm_types.integer_t;
pageins : aliased mach.i386.vm_types.integer_t;
cow_faults : aliased mach.i386.vm_types.integer_t;
messages_sent : aliased mach.i386.vm_types.integer_t;
messages_received : aliased mach.i386.vm_types.integer_t;
syscalls_mach : aliased mach.i386.vm_types.integer_t;
syscalls_unix : aliased mach.i386.vm_types.integer_t;
csw : aliased mach.i386.vm_types.integer_t;
end record;
for struct_task_events_info'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_task_events_info);
type struct_task_events_info_ptr is access all struct_task_events_info;
for struct_task_events_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_task_events_info_ptr);
pragma Convention (C, struct_task_events_info_ptr);
subtype task_events_info_data_t is struct_task_events_info;
subtype task_events_info_t is struct_task_events_info_ptr;
type struct_task_thread_times_info;
type struct_task_thread_times_info is record
user_time : aliased mach.time_value.time_value_t;
system_time : aliased mach.time_value.time_value_t;
end record;
for struct_task_thread_times_info'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_task_thread_times_info);
type struct_task_thread_times_info_ptr is
access all struct_task_thread_times_info;
for struct_task_thread_times_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_task_thread_times_info_ptr);
pragma Convention (C, struct_task_thread_times_info_ptr);
subtype task_thread_times_info_data_t is struct_task_thread_times_info;
subtype task_thread_times_info_t is struct_task_thread_times_info_ptr;
type struct_task_absolutetime_info;
type struct_task_absolutetime_info is record
total_user : aliased stdint.uint64_t;
total_system : aliased stdint.uint64_t;
threads_user : aliased stdint.uint64_t;
threads_system : aliased stdint.uint64_t;
end record;
for struct_task_absolutetime_info'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_task_absolutetime_info);
type struct_task_absolutetime_info_ptr is
access all struct_task_absolutetime_info;
for struct_task_absolutetime_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_task_absolutetime_info_ptr);
pragma Convention (C, struct_task_absolutetime_info_ptr);
subtype task_absolutetime_info_data_t is struct_task_absolutetime_info;
subtype task_absolutetime_info_t is struct_task_absolutetime_info_ptr;
type struct_task_affinity_tag_info;
type struct_task_affinity_tag_info is record
set_count : aliased mach.i386.vm_types.integer_t;
min : aliased mach.i386.vm_types.integer_t;
max : aliased mach.i386.vm_types.integer_t;
task_count : aliased mach.i386.vm_types.integer_t;
end record;
for struct_task_affinity_tag_info'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_task_affinity_tag_info);
type struct_task_affinity_tag_info_ptr is
access all struct_task_affinity_tag_info;
for struct_task_affinity_tag_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_task_affinity_tag_info_ptr);
pragma Convention (C, struct_task_affinity_tag_info_ptr);
subtype task_affinity_tag_info_data_t is struct_task_affinity_tag_info;
subtype task_affinity_tag_info_t is struct_task_affinity_tag_info_ptr;
TASK_ABSOLUTETIME_INFO : constant := 1;
TASK_ABSOLUTETIME_INFO_COUNT : constant := 8;
TASK_AFFINITY_TAG_INFO : constant := 16;
TASK_AFFINITY_TAG_INFO_COUNT : constant := 4;
TASK_AUDIT_TOKEN : constant := 15;
TASK_AUDIT_TOKEN_COUNT : constant := 8;
TASK_BASIC2_INFO_32 : constant := 6;
TASK_BASIC_INFO : constant := 4;
TASK_BASIC_INFO_32 : constant := 4;
TASK_BASIC_INFO_32_COUNT : constant := 8;
TASK_BASIC_INFO_64 : constant := 5;
TASK_BASIC_INFO_64_COUNT : constant := 12;
TASK_BASIC_INFO_COUNT : constant := 8;
TASK_EVENTS_INFO : constant := 2;
TASK_EVENTS_INFO_COUNT : constant := 8;
TASK_INFO_MAX : constant := 1024;
TASK_SCHED_FIFO_INFO : constant := 12;
TASK_SCHED_INFO : constant := 14;
TASK_SCHED_RR_INFO : constant := 11;
TASK_SCHED_TIMESHARE_INFO : constant := 10;
TASK_SECURITY_TOKEN : constant := 13;
TASK_SECURITY_TOKEN_COUNT : constant := 2;
TASK_THREAD_TIMES_INFO : constant := 3;
TASK_THREAD_TIMES_INFO_COUNT : constant := 4;
-- _MACH_TASK_INFO_H_ (empty)
end C.mach.task_info;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
package C.mach.task_policy is
pragma Preelaborate;
subtype task_policy_flavor_t is mach.i386.vm_types.natural_t;
subtype task_policy_t is mach.i386.vm_types.integer_t_ptr;
type enum_task_role;
type enum_task_role is (TASK_RENICED, TASK_UNSPECIFIED,
TASK_FOREGROUND_APPLICATION, TASK_BACKGROUND_APPLICATION,
TASK_CONTROL_APPLICATION, TASK_GRAPHICS_SERVER);
for enum_task_role use (TASK_RENICED => -1, TASK_UNSPECIFIED => 0,
TASK_FOREGROUND_APPLICATION => 1, TASK_BACKGROUND_APPLICATION => 2,
TASK_CONTROL_APPLICATION => 3, TASK_GRAPHICS_SERVER => 4);
pragma Convention (C, enum_task_role);
subtype task_role_t is enum_task_role;
type struct_task_category_policy;
type struct_task_category_policy is record
role : aliased task_role_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_task_category_policy);
type struct_task_category_policy_ptr is
access all struct_task_category_policy;
for struct_task_category_policy_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_task_category_policy_ptr);
pragma Convention (C, struct_task_category_policy_ptr);
subtype task_category_policy_data_t is struct_task_category_policy;
subtype task_category_policy_t is struct_task_category_policy_ptr;
TASK_CATEGORY_POLICY : constant := 1;
TASK_CATEGORY_POLICY_COUNT : constant := 1;
-- _MACH_TASK_POLICY_H_ (empty)
end C.mach.task_policy;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.task_special_ports is
pragma Preelaborate;
subtype task_special_port_t is signed_int;
TASK_ACCESS_PORT : constant := 9;
TASK_AUTOMOUNTD_PORT : constant := 10;
TASK_BOOTSTRAP_PORT : constant := 4;
TASK_GSSD_PORT : constant := 8;
TASK_HOST_PORT : constant := 2;
TASK_KERNEL_PORT : constant := 1;
TASK_NAME_PORT : constant := 3;
TASK_PAGED_LEDGER_PORT : constant := 6;
TASK_SEATBELT_PORT : constant := 7;
TASK_WIRED_LEDGER_PORT : constant := 5;
-- _MACH_TASK_SPECIAL_PORTS_H_ (empty)
-- task_get_automountd_port (unparsible)
-- task_get_bootstrap_port (unparsible)
-- task_get_gssd_port (unparsible)
-- task_get_host_port (unparsible)
-- task_get_kernel_port (unparsible)
-- task_get_paged_ledger_port (unparsible)
-- task_get_task_access_port (unparsible)
-- task_get_wired_ledger_port (unparsible)
-- task_set_automountd_port (unparsible)
-- task_set_bootstrap_port (unparsible)
-- task_set_gssd_port (unparsible)
-- task_set_host_port (unparsible)
-- task_set_kernel_port (unparsible)
-- task_set_paged_ledger_port (unparsible)
-- task_set_task_access_port (unparsible)
-- task_set_wired_ledger_port (unparsible)
end C.mach.task_special_ports;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
with C.mach.policy;
with C.mach.time_value;
package C.mach.thread_info is
pragma Preelaborate;
subtype thread_flavor_t is mach.i386.vm_types.natural_t;
subtype thread_info_t is mach.i386.vm_types.integer_t_ptr;
subtype thread_info_data_t is
mach.i386.vm_types.integer_t_array (0 .. 1023);
type struct_thread_basic_info;
type struct_thread_basic_info is record
user_time : aliased mach.time_value.time_value_t;
system_time : aliased mach.time_value.time_value_t;
cpu_usage : aliased mach.i386.vm_types.integer_t;
policy : aliased mach.policy.policy_t;
run_state : aliased mach.i386.vm_types.integer_t;
flags : aliased mach.i386.vm_types.integer_t;
suspend_count : aliased mach.i386.vm_types.integer_t;
sleep_time : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_thread_basic_info);
type struct_thread_basic_info_ptr is access all struct_thread_basic_info;
for struct_thread_basic_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_thread_basic_info_ptr);
pragma Convention (C, struct_thread_basic_info_ptr);
subtype thread_basic_info_data_t is struct_thread_basic_info;
subtype thread_basic_info_t is struct_thread_basic_info_ptr;
THREAD_BASIC_INFO : constant := 3;
THREAD_BASIC_INFO_COUNT : constant := 10;
THREAD_INFO_MAX : constant := 1024;
THREAD_SCHED_FIFO_INFO : constant := 12;
THREAD_SCHED_RR_INFO : constant := 11;
THREAD_SCHED_TIMESHARE_INFO : constant := 10;
TH_FLAGS_IDLE : constant := 2;
TH_FLAGS_SWAPPED : constant := 1;
TH_STATE_HALTED : constant := 5;
TH_STATE_RUNNING : constant := 1;
TH_STATE_STOPPED : constant := 2;
TH_STATE_UNINTERRUPTIBLE : constant := 4;
TH_STATE_WAITING : constant := 3;
TH_USAGE_SCALE : constant := 1000;
-- _MACH_THREAD_INFO_H_ (empty)
end C.mach.thread_info;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.boolean;
with C.mach.i386.vm_types;
with C.stdint;
package C.mach.thread_policy is
pragma Preelaborate;
subtype thread_policy_flavor_t is mach.i386.vm_types.natural_t;
subtype thread_policy_t is mach.i386.vm_types.integer_t_ptr;
type struct_thread_standard_policy;
type struct_thread_standard_policy is record
no_data : aliased mach.i386.vm_types.natural_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_thread_standard_policy);
type struct_thread_standard_policy_ptr is
access all struct_thread_standard_policy;
for struct_thread_standard_policy_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_thread_standard_policy_ptr);
pragma Convention (C, struct_thread_standard_policy_ptr);
subtype thread_standard_policy_data_t is struct_thread_standard_policy;
subtype thread_standard_policy_t is struct_thread_standard_policy_ptr;
type struct_thread_extended_policy;
type struct_thread_extended_policy is record
timeshare : aliased mach.i386.boolean.boolean_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_thread_extended_policy);
type struct_thread_extended_policy_ptr is
access all struct_thread_extended_policy;
for struct_thread_extended_policy_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_thread_extended_policy_ptr);
pragma Convention (C, struct_thread_extended_policy_ptr);
subtype thread_extended_policy_data_t is struct_thread_extended_policy;
subtype thread_extended_policy_t is struct_thread_extended_policy_ptr;
type struct_thread_time_constraint_policy;
type struct_thread_time_constraint_policy is record
period : aliased stdint.uint32_t;
computation : aliased stdint.uint32_t;
constraint : aliased stdint.uint32_t;
preemptible : aliased mach.i386.boolean.boolean_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_thread_time_constraint_policy);
type struct_thread_time_constraint_policy_ptr is
access all struct_thread_time_constraint_policy;
for struct_thread_time_constraint_policy_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_thread_time_constraint_policy_ptr);
pragma Convention (C, struct_thread_time_constraint_policy_ptr);
subtype thread_time_constraint_policy_data_t is
struct_thread_time_constraint_policy;
subtype thread_time_constraint_policy_t is
struct_thread_time_constraint_policy_ptr;
type struct_thread_precedence_policy;
type struct_thread_precedence_policy is record
importance : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_thread_precedence_policy);
type struct_thread_precedence_policy_ptr is
access all struct_thread_precedence_policy;
for struct_thread_precedence_policy_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_thread_precedence_policy_ptr);
pragma Convention (C, struct_thread_precedence_policy_ptr);
subtype thread_precedence_policy_data_t is
struct_thread_precedence_policy;
subtype thread_precedence_policy_t is struct_thread_precedence_policy_ptr;
type struct_thread_affinity_policy;
type struct_thread_affinity_policy is record
affinity_tag : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_thread_affinity_policy);
type struct_thread_affinity_policy_ptr is
access all struct_thread_affinity_policy;
for struct_thread_affinity_policy_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_thread_affinity_policy_ptr);
pragma Convention (C, struct_thread_affinity_policy_ptr);
subtype thread_affinity_policy_data_t is struct_thread_affinity_policy;
subtype thread_affinity_policy_t is struct_thread_affinity_policy_ptr;
THREAD_AFFINITY_POLICY : constant := 4;
THREAD_AFFINITY_POLICY_COUNT : constant := 1;
THREAD_AFFINITY_TAG_NULL : constant := 0;
THREAD_EXTENDED_POLICY : constant := 1;
THREAD_EXTENDED_POLICY_COUNT : constant := 1;
THREAD_PRECEDENCE_POLICY : constant := 3;
THREAD_PRECEDENCE_POLICY_COUNT : constant := 1;
THREAD_STANDARD_POLICY : constant := 1;
THREAD_STANDARD_POLICY_COUNT : constant := 0;
THREAD_TIME_CONSTRAINT_POLICY : constant := 2;
THREAD_TIME_CONSTRAINT_POLICY_COUNT : constant := 4;
-- _MACH_THREAD_POLICY_H_ (empty)
end C.mach.thread_policy;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.thread_special_ports is
pragma Preelaborate;
THREAD_KERNEL_PORT : constant := 1;
-- _MACH_THREAD_SPECIAL_PORTS_H_ (empty)
-- thread_get_kernel_port (unparsible)
-- thread_set_kernel_port (unparsible)
end C.mach.thread_special_ports;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
package C.mach.thread_status is
pragma Preelaborate;
subtype thread_state_t is mach.i386.vm_types.natural_t_ptr;
subtype thread_state_data_t is
mach.i386.vm_types.natural_t_array (0 .. 143);
subtype thread_state_flavor_t is signed_int;
subtype thread_state_flavor_t_ptr is signed_int_ptr;
subtype thread_state_flavor_array_t is thread_state_flavor_t_ptr;
THREAD_STATE_FLAVOR_LIST : constant := 0;
THREAD_STATE_FLAVOR_LIST_NEW : constant := 128;
-- _MACH_THREAD_STATUS_H_ (empty)
end C.mach.thread_status;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
package C.mach.time_value is
pragma Preelaborate;
type struct_time_value;
type struct_time_value is record
seconds : aliased mach.i386.vm_types.integer_t;
microseconds : aliased mach.i386.vm_types.integer_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_time_value);
subtype time_value_t is struct_time_value;
TIME_MICROS_MAX : constant := 1000000;
-- _MACH_TIME_VALUE_H_ (empty)
-- time_value_add (unparsible)
-- time_value_add_usec (unparsible)
end C.mach.time_value;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.vm_attributes is
pragma Preelaborate;
subtype vm_machine_attribute_t is unsigned_int;
subtype vm_machine_attribute_val_t is signed_int;
MATTR_CACHE : constant := 1;
MATTR_MIGRATE : constant := 2;
MATTR_REPLICATE : constant := 4;
MATTR_VAL_CACHE_FLUSH : constant := 6;
MATTR_VAL_CACHE_SYNC : constant := 9;
MATTR_VAL_DCACHE_FLUSH : constant := 7;
MATTR_VAL_GET : constant := 2;
MATTR_VAL_GET_INFO : constant := 10;
MATTR_VAL_ICACHE_FLUSH : constant := 8;
MATTR_VAL_OFF : constant := 0;
MATTR_VAL_ON : constant := 1;
-- _MACH_VM_ATTRIBUTES_H_ (empty)
end C.mach.vm_attributes;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.vm_behavior is
pragma Preelaborate;
subtype vm_behavior_t is signed_int;
VM_BEHAVIOR_DEFAULT : constant := 0;
VM_BEHAVIOR_DONTNEED : constant := 5;
VM_BEHAVIOR_RANDOM : constant := 1;
VM_BEHAVIOR_RSEQNTL : constant := 3;
VM_BEHAVIOR_SEQUENTIAL : constant := 2;
VM_BEHAVIOR_WILLNEED : constant := 4;
-- _MACH_VM_BEHAVIOR_H_ (empty)
end C.mach.vm_behavior;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.vm_inherit is
pragma Preelaborate;
subtype vm_inherit_t is unsigned_int;
VM_INHERIT_COPY : constant := 1;
VM_INHERIT_DEFAULT : constant := 1;
VM_INHERIT_DONATE_COPY : constant := 3;
VM_INHERIT_LAST_VALID : constant := 2;
VM_INHERIT_NONE : constant := 2;
VM_INHERIT_SHARE : constant := 0;
-- _MACH_VM_INHERIT_H_ (empty)
end C.mach.vm_inherit;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.vm_prot is
pragma Preelaborate;
subtype vm_prot_t is signed_int;
VM_PROT_ALL : constant := 7;
VM_PROT_COPY : constant := 16;
VM_PROT_DEFAULT : constant := 3;
VM_PROT_EXECUTE : constant := 4;
VM_PROT_NONE : constant := 0;
VM_PROT_NO_CHANGE : constant := 8;
VM_PROT_READ : constant := 1;
VM_PROT_WANTS_COPY : constant := 16;
VM_PROT_WRITE : constant := 2;
-- _MACH_VM_PROT_H_ (empty)
end C.mach.vm_prot;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.vm_purgable is
pragma Preelaborate;
subtype vm_purgable_t is signed_int;
VM_PURGABLE_BEHAVIOR_FIFO : constant := 0;
VM_PURGABLE_BEHAVIOR_LIFO : constant := 64;
VM_PURGABLE_BEHAVIOR_MASK : constant := 64;
VM_PURGABLE_BEHAVIOR_SHIFT : constant := 6;
VM_PURGABLE_DENY : constant := 3;
VM_PURGABLE_EMPTY : constant := 2;
VM_PURGABLE_GET_STATE : constant := 1;
VM_PURGABLE_NONVOLATILE : constant := 0;
VM_PURGABLE_ORDERING_MASK : constant := 32;
VM_PURGABLE_ORDERING_NORMAL : constant := 0;
VM_PURGABLE_ORDERING_OBSOLETE : constant := 32;
VM_PURGABLE_ORDERING_SHIFT : constant := 5;
VM_PURGABLE_SET_STATE : constant := 0;
VM_PURGABLE_STATE_MASK : constant := 3;
VM_PURGABLE_STATE_MAX : constant := 3;
VM_PURGABLE_STATE_MIN : constant := 0;
VM_PURGABLE_VOLATILE : constant := 1;
VM_VOLATILE_GROUP_0 : constant := 0;
VM_VOLATILE_GROUP_1 : constant := 256;
VM_VOLATILE_GROUP_2 : constant := 512;
VM_VOLATILE_GROUP_3 : constant := 768;
VM_VOLATILE_GROUP_4 : constant := 1024;
VM_VOLATILE_GROUP_5 : constant := 1280;
VM_VOLATILE_GROUP_6 : constant := 1536;
VM_VOLATILE_GROUP_7 : constant := 1792;
VM_VOLATILE_GROUP_DEFAULT : constant := 1792;
VM_VOLATILE_GROUP_MASK : constant := 1792;
VM_VOLATILE_GROUP_SHIFT : constant := 8;
VM_VOLATILE_MAKE_FIRST_IN_GROUP : constant := 16;
VM_VOLATILE_MAKE_LAST_IN_GROUP : constant := 0;
VM_VOLATILE_ORDER_MASK : constant := 16;
VM_VOLATILE_ORDER_SHIFT : constant := 4;
-- _MACH_VM_PURGABLE_H_ (empty)
end C.mach.vm_purgable;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.boolean;
with C.mach.i386.vm_types;
with C.mach.memory_object_types;
with C.mach.vm_behavior;
with C.mach.vm_inherit;
with C.mach.vm_prot;
with C.mach.vm_types;
with C.stdint;
package C.mach.vm_region is
pragma Preelaborate;
subtype vm_region_info_t is signed_int_ptr;
subtype vm_region_info_64_t is signed_int_ptr;
subtype vm_region_recurse_info_t is signed_int_ptr;
subtype vm_region_recurse_info_64_t is signed_int_ptr;
subtype vm_region_flavor_t is signed_int;
subtype vm_region_info_data_t is signed_int_array (0 .. 1023);
type struct_vm_region_basic_info_64;
type struct_vm_region_basic_info_64 is record
protection : aliased mach.vm_prot.vm_prot_t;
max_protection : aliased mach.vm_prot.vm_prot_t;
inheritance : aliased mach.vm_inherit.vm_inherit_t;
shared : aliased mach.i386.boolean.boolean_t;
reserved : aliased mach.i386.boolean.boolean_t;
offset : aliased mach.memory_object_types.memory_object_offset_t;
behavior : aliased mach.vm_behavior.vm_behavior_t;
user_wired_count : aliased unsigned_short;
end record;
for struct_vm_region_basic_info_64'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_vm_region_basic_info_64);
type struct_vm_region_basic_info_64_ptr is
access all struct_vm_region_basic_info_64;
for struct_vm_region_basic_info_64_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vm_region_basic_info_64_ptr);
pragma Convention (C, struct_vm_region_basic_info_64_ptr);
subtype vm_region_basic_info_64_t is struct_vm_region_basic_info_64_ptr;
subtype vm_region_basic_info_data_64_t is struct_vm_region_basic_info_64;
type struct_vm_region_basic_info;
type struct_vm_region_basic_info is record
protection : aliased mach.vm_prot.vm_prot_t;
max_protection : aliased mach.vm_prot.vm_prot_t;
inheritance : aliased mach.vm_inherit.vm_inherit_t;
shared : aliased mach.i386.boolean.boolean_t;
reserved : aliased mach.i386.boolean.boolean_t;
offset : aliased stdint.uint32_t;
behavior : aliased mach.vm_behavior.vm_behavior_t;
user_wired_count : aliased unsigned_short;
end record;
for struct_vm_region_basic_info'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_vm_region_basic_info);
type struct_vm_region_basic_info_ptr is
access all struct_vm_region_basic_info;
for struct_vm_region_basic_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vm_region_basic_info_ptr);
pragma Convention (C, struct_vm_region_basic_info_ptr);
subtype vm_region_basic_info_t is struct_vm_region_basic_info_ptr;
subtype vm_region_basic_info_data_t is struct_vm_region_basic_info;
type struct_vm_region_extended_info;
type struct_vm_region_extended_info is record
protection : aliased mach.vm_prot.vm_prot_t;
user_tag : aliased unsigned_int;
pages_resident : aliased unsigned_int;
pages_shared_now_private : aliased unsigned_int;
pages_swapped_out : aliased unsigned_int;
pages_dirtied : aliased unsigned_int;
ref_count : aliased unsigned_int;
shadow_depth : aliased unsigned_short;
external_pager : aliased unsigned_char;
share_mode : aliased unsigned_char;
end record;
for struct_vm_region_extended_info'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_vm_region_extended_info);
type struct_vm_region_extended_info_ptr is
access all struct_vm_region_extended_info;
for struct_vm_region_extended_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vm_region_extended_info_ptr);
pragma Convention (C, struct_vm_region_extended_info_ptr);
subtype vm_region_extended_info_t is struct_vm_region_extended_info_ptr;
subtype vm_region_extended_info_data_t is struct_vm_region_extended_info;
type struct_vm_region_top_info;
type struct_vm_region_top_info is record
obj_id : aliased unsigned_int;
ref_count : aliased unsigned_int;
private_pages_resident : aliased unsigned_int;
shared_pages_resident : aliased unsigned_int;
share_mode : aliased unsigned_char;
end record;
for struct_vm_region_top_info'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_vm_region_top_info);
type struct_vm_region_top_info_ptr is
access all struct_vm_region_top_info;
for struct_vm_region_top_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vm_region_top_info_ptr);
pragma Convention (C, struct_vm_region_top_info_ptr);
subtype vm_region_top_info_t is struct_vm_region_top_info_ptr;
subtype vm_region_top_info_data_t is struct_vm_region_top_info;
type struct_vm_region_submap_info;
type struct_vm_region_submap_info is record
protection : aliased mach.vm_prot.vm_prot_t;
max_protection : aliased mach.vm_prot.vm_prot_t;
inheritance : aliased mach.vm_inherit.vm_inherit_t;
offset : aliased stdint.uint32_t;
user_tag : aliased unsigned_int;
pages_resident : aliased unsigned_int;
pages_shared_now_private : aliased unsigned_int;
pages_swapped_out : aliased unsigned_int;
pages_dirtied : aliased unsigned_int;
ref_count : aliased unsigned_int;
shadow_depth : aliased unsigned_short;
external_pager : aliased unsigned_char;
share_mode : aliased unsigned_char;
is_submap : aliased mach.i386.boolean.boolean_t;
behavior : aliased mach.vm_behavior.vm_behavior_t;
object_id : aliased mach.i386.vm_types.vm_offset_t;
user_wired_count : aliased unsigned_short;
end record;
for struct_vm_region_submap_info'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_vm_region_submap_info);
type struct_vm_region_submap_info_ptr is
access all struct_vm_region_submap_info;
for struct_vm_region_submap_info_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vm_region_submap_info_ptr);
pragma Convention (C, struct_vm_region_submap_info_ptr);
subtype vm_region_submap_info_t is struct_vm_region_submap_info_ptr;
subtype vm_region_submap_info_data_t is struct_vm_region_submap_info;
type struct_vm_region_submap_info_64;
type struct_vm_region_submap_info_64 is record
protection : aliased mach.vm_prot.vm_prot_t;
max_protection : aliased mach.vm_prot.vm_prot_t;
inheritance : aliased mach.vm_inherit.vm_inherit_t;
offset : aliased mach.memory_object_types.memory_object_offset_t;
user_tag : aliased unsigned_int;
pages_resident : aliased unsigned_int;
pages_shared_now_private : aliased unsigned_int;
pages_swapped_out : aliased unsigned_int;
pages_dirtied : aliased unsigned_int;
ref_count : aliased unsigned_int;
shadow_depth : aliased unsigned_short;
external_pager : aliased unsigned_char;
share_mode : aliased unsigned_char;
is_submap : aliased mach.i386.boolean.boolean_t;
behavior : aliased mach.vm_behavior.vm_behavior_t;
object_id : aliased mach.i386.vm_types.vm_offset_t;
user_wired_count : aliased unsigned_short;
end record;
for struct_vm_region_submap_info_64'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_vm_region_submap_info_64);
type struct_vm_region_submap_info_64_ptr is
access all struct_vm_region_submap_info_64;
for struct_vm_region_submap_info_64_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vm_region_submap_info_64_ptr);
pragma Convention (C, struct_vm_region_submap_info_64_ptr);
subtype vm_region_submap_info_64_t is struct_vm_region_submap_info_64_ptr;
subtype vm_region_submap_info_data_64_t is
struct_vm_region_submap_info_64;
type struct_vm_region_submap_short_info_64;
type struct_vm_region_submap_short_info_64 is record
protection : aliased mach.vm_prot.vm_prot_t;
max_protection : aliased mach.vm_prot.vm_prot_t;
inheritance : aliased mach.vm_inherit.vm_inherit_t;
offset : aliased mach.memory_object_types.memory_object_offset_t;
user_tag : aliased unsigned_int;
ref_count : aliased unsigned_int;
shadow_depth : aliased unsigned_short;
external_pager : aliased unsigned_char;
share_mode : aliased unsigned_char;
is_submap : aliased mach.i386.boolean.boolean_t;
behavior : aliased mach.vm_behavior.vm_behavior_t;
object_id : aliased mach.i386.vm_types.vm_offset_t;
user_wired_count : aliased unsigned_short;
end record;
for struct_vm_region_submap_short_info_64'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_vm_region_submap_short_info_64);
type struct_vm_region_submap_short_info_64_ptr is
access all struct_vm_region_submap_short_info_64;
for struct_vm_region_submap_short_info_64_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vm_region_submap_short_info_64_ptr);
pragma Convention (C, struct_vm_region_submap_short_info_64_ptr);
subtype vm_region_submap_short_info_64_t is
struct_vm_region_submap_short_info_64_ptr;
subtype vm_region_submap_short_info_data_64_t is
struct_vm_region_submap_short_info_64;
type struct_mach_vm_read_entry;
type struct_mach_vm_read_entry is record
address : aliased mach.i386.vm_types.mach_vm_address_t;
size : aliased mach.i386.vm_types.mach_vm_size_t;
end record;
for struct_mach_vm_read_entry'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_mach_vm_read_entry);
type struct_mach_vm_read_entry_array is array (size_t range <>) of
aliased struct_mach_vm_read_entry;
pragma Convention (C, struct_mach_vm_read_entry_array);
type struct_vm_read_entry;
type struct_vm_read_entry is record
address : aliased mach.vm_types.vm_address_t;
size : aliased mach.i386.vm_types.vm_size_t;
end record;
for struct_vm_read_entry'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_vm_read_entry);
type struct_vm_read_entry_array is array (size_t range <>) of
aliased struct_vm_read_entry;
pragma Convention (C, struct_vm_read_entry_array);
subtype mach_vm_read_entry_t is
struct_mach_vm_read_entry_array (0 .. 255);
subtype vm_read_entry_t is struct_vm_read_entry_array (0 .. 255);
SM_COW : constant := 1;
SM_EMPTY : constant := 3;
SM_PRIVATE : constant := 2;
SM_PRIVATE_ALIASED : constant := 6;
SM_SHARED : constant := 4;
SM_SHARED_ALIASED : constant := 7;
SM_TRUESHARED : constant := 5;
VM_MAP_ENTRY_MAX : constant := 256;
VM_REGION_BASIC_INFO : constant := 10;
VM_REGION_BASIC_INFO_64 : constant := 9;
VM_REGION_BASIC_INFO_COUNT : constant := 8;
VM_REGION_BASIC_INFO_COUNT_64 : constant := 10;
VM_REGION_EXTENDED_INFO : constant := 11;
VM_REGION_EXTENDED_INFO_COUNT : constant := 8;
VM_REGION_INFO_MAX : constant := 1024;
VM_REGION_SUBMAP_INFO_COUNT : constant := 15;
VM_REGION_SUBMAP_INFO_COUNT_64 : constant := 18;
VM_REGION_SUBMAP_SHORT_INFO_COUNT_64 : constant := 14;
VM_REGION_TOP_INFO : constant := 12;
VM_REGION_TOP_INFO_COUNT : constant := 5;
-- _MACH_VM_REGION_H_ (empty)
end C.mach.vm_region;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
package C.mach.vm_statistics is
pragma Preelaborate;
type struct_vm_statistics;
type struct_vm_statistics is record
free_count : aliased mach.i386.vm_types.natural_t;
active_count : aliased mach.i386.vm_types.natural_t;
inactive_count : aliased mach.i386.vm_types.natural_t;
wire_count : aliased mach.i386.vm_types.natural_t;
zero_fill_count : aliased mach.i386.vm_types.natural_t;
reactivations : aliased mach.i386.vm_types.natural_t;
pageins : aliased mach.i386.vm_types.natural_t;
pageouts : aliased mach.i386.vm_types.natural_t;
faults : aliased mach.i386.vm_types.natural_t;
cow_faults : aliased mach.i386.vm_types.natural_t;
lookups : aliased mach.i386.vm_types.natural_t;
hits : aliased mach.i386.vm_types.natural_t;
purgeable_count : aliased mach.i386.vm_types.natural_t;
purges : aliased mach.i386.vm_types.natural_t;
speculative_count : aliased mach.i386.vm_types.natural_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_vm_statistics);
type struct_vm_statistics_ptr is access all struct_vm_statistics;
for struct_vm_statistics_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vm_statistics_ptr);
pragma Convention (C, struct_vm_statistics_ptr);
subtype vm_statistics_t is struct_vm_statistics_ptr;
subtype vm_statistics_data_t is struct_vm_statistics;
VM_FLAGS_ALIAS_MASK : constant := -16777216;
VM_FLAGS_ANYWHERE : constant := 1;
VM_FLAGS_FIXED : constant := 0;
VM_FLAGS_GUARD_AFTER : constant := 32;
VM_FLAGS_GUARD_BEFORE : constant := 16;
VM_FLAGS_NO_CACHE : constant := 16;
VM_FLAGS_PURGABLE : constant := 2;
VM_FLAGS_USER_ALLOCATE : constant := -16777197;
VM_FLAGS_USER_MAP : constant := -16777197;
-- VM_GET_FLAGS_ALIAS (function macro)
-- VM_MAKE_TAG (function macro)
VM_MEMORY_ANALYSIS_TOOL : constant := 10;
VM_MEMORY_APPKIT : constant := 40;
VM_MEMORY_APPLICATION_SPECIFIC_1 : constant := 240;
VM_MEMORY_APPLICATION_SPECIFIC_16 : constant := 255;
VM_MEMORY_ATS : constant := 50;
VM_MEMORY_CARBON : constant := 43;
VM_MEMORY_CGIMAGE : constant := 52;
VM_MEMORY_COREGRAPHICS : constant := 42;
VM_MEMORY_COREGRAPHICS_BACKINGSTORES : constant := 57;
VM_MEMORY_COREGRAPHICS_DATA : constant := 54;
VM_MEMORY_COREGRAPHICS_FRAMEBUFFERS : constant := 56;
VM_MEMORY_COREGRAPHICS_MISC : constant := 42;
VM_MEMORY_COREGRAPHICS_SHARED : constant := 55;
VM_MEMORY_DYLD : constant := 60;
VM_MEMORY_DYLD_MALLOC : constant := 61;
VM_MEMORY_DYLIB : constant := 33;
VM_MEMORY_FOUNDATION : constant := 41;
VM_MEMORY_GUARD : constant := 31;
VM_MEMORY_IOKIT : constant := 21;
VM_MEMORY_JAVA : constant := 44;
VM_MEMORY_LAYERKIT : constant := 51;
VM_MEMORY_MACH_MSG : constant := 20;
VM_MEMORY_MALLOC : constant := 1;
VM_MEMORY_MALLOC_HUGE : constant := 4;
VM_MEMORY_MALLOC_LARGE : constant := 3;
VM_MEMORY_MALLOC_SMALL : constant := 2;
VM_MEMORY_MALLOC_TINY : constant := 7;
VM_MEMORY_REALLOC : constant := 6;
VM_MEMORY_SBRK : constant := 5;
VM_MEMORY_SHARED_PMAP : constant := 32;
VM_MEMORY_STACK : constant := 30;
VM_MEMORY_TCMALLOC : constant := 53;
VM_PAGE_QUERY_PAGE_COPIED : constant := 32;
VM_PAGE_QUERY_PAGE_DIRTY : constant := 8;
VM_PAGE_QUERY_PAGE_FICTITIOUS : constant := 2;
VM_PAGE_QUERY_PAGE_PAGED_OUT : constant := 16;
VM_PAGE_QUERY_PAGE_PRESENT : constant := 1;
VM_PAGE_QUERY_PAGE_REF : constant := 4;
VM_PAGE_QUERY_PAGE_SPECULATIVE : constant := 64;
-- VM_SET_FLAGS_ALIAS (function macro)
-- _MACH_VM_STATISTICS_H_ (empty)
end C.mach.vm_statistics;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.vm_sync is
pragma Preelaborate;
subtype vm_sync_t is unsigned_int;
VM_SYNC_ASYNCHRONOUS : constant := 1;
VM_SYNC_CONTIGUOUS : constant := 32;
VM_SYNC_DEACTIVATE : constant := 16;
VM_SYNC_INVALIDATE : constant := 4;
VM_SYNC_KILLPAGES : constant := 8;
VM_SYNC_SYNCHRONOUS : constant := 2;
-- _MACH_VM_SYNC_H_ (empty)
end C.mach.vm_sync;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.vm_types;
with C.pthread;
with C.stdint;
package C.mach.vm_types is
pragma Preelaborate;
subtype pointer_t is mach.i386.vm_types.vm_offset_t;
subtype vm_address_t is mach.i386.vm_types.vm_offset_t;
subtype vm_address_t_ptr is mach.i386.vm_types.vm_offset_t_ptr;
subtype vm_address_t_ptr_ptr is mach.i386.vm_types.vm_offset_t_ptr_ptr;
subtype addr64_t is stdint.uint64_t;
subtype reg64_t is stdint.uint32_t;
subtype ppnum_t is stdint.uint32_t;
subtype vm_map_t is pthread.mach_port_t;
subtype vm_object_offset_t is stdint.uint64_t;
subtype vm_object_size_t is stdint.uint64_t;
subtype upl_t is pthread.mach_port_t;
subtype vm_named_entry_t is pthread.mach_port_t;
PPNUM_MAX : constant := 4294967295;
UPL_NULL : constant := 0;
VM_MAP_NULL : constant := 0;
VM_NAMED_ENTRY_NULL : constant := 0;
-- _MACH_VM_TYPES_H_ (empty)
end C.mach.vm_types;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach is
pragma Preelaborate;
end C.mach;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach_o.loader;
with C.stddef;
with C.stdint;
package C.mach_o.dyld is
pragma Preelaborate;
function dyld_image_count return stdint.uint32_t;
pragma Import (C, dyld_image_count, "_dyld_image_count");
function dyld_get_image_header (image_index : stdint.uint32_t)
return mach_o.loader.struct_mach_header_const_ptr;
pragma Import (C, dyld_get_image_header, "_dyld_get_image_header");
function dyld_get_image_vmaddr_slide (image_index : stdint.uint32_t)
return stdint.intptr_t;
pragma Import (C, dyld_get_image_vmaddr_slide,
"_dyld_get_image_vmaddr_slide");
function dyld_get_image_name (image_index : stdint.uint32_t)
return char_const_ptr;
pragma Import (C, dyld_get_image_name, "_dyld_get_image_name");
type access_d2950a49 is access procedure (
mh : access constant mach_o.loader.struct_mach_header;
vmaddr_slide : stdint.intptr_t);
pragma Convention (C, access_d2950a49);
procedure dyld_register_func_for_add_image (func : access_d2950a49);
pragma Import (C, dyld_register_func_for_add_image,
"_dyld_register_func_for_add_image");
type access_f48bad4d is access procedure (
mh : access constant mach_o.loader.struct_mach_header;
vmaddr_slide : stdint.intptr_t);
pragma Convention (C, access_f48bad4d);
procedure dyld_register_func_for_remove_image (func : access_f48bad4d);
pragma Import (C, dyld_register_func_for_remove_image,
"_dyld_register_func_for_remove_image");
function NSVersionOfRunTimeLibrary (libraryName : access constant char)
return stdint.int32_t;
pragma Import (C, NSVersionOfRunTimeLibrary, "NSVersionOfRunTimeLibrary");
function NSVersionOfLinkTimeLibrary (libraryName : access constant char)
return stdint.int32_t;
pragma Import (C, NSVersionOfLinkTimeLibrary,
"NSVersionOfLinkTimeLibrary");
function NSGetExecutablePath (buf : access char;
bufsize : access stdint.uint32_t) return signed_int;
pragma Import (C, NSGetExecutablePath, "_NSGetExecutablePath");
type access_11d5af51 is access procedure (lowpc : access char;
highpc : access char);
pragma Convention (C, access_11d5af51);
procedure dyld_moninit (monaddition : access_11d5af51);
pragma Import (C, dyld_moninit, "_dyld_moninit");
function dyld_func_lookup (dyld_func_name : access constant char;
address : access void_ptr) return signed_int;
pragma Import (C, dyld_func_lookup, "_dyld_func_lookup");
type enum_DYLD_BOOL;
type enum_DYLD_BOOL is (FALSE, TRUE);
for enum_DYLD_BOOL use (FALSE => 0, TRUE => 1);
pragma Convention (C, enum_DYLD_BOOL);
type enum_11801d6b is (NSObjectFileImageFailure, NSObjectFileImageSuccess,
NSObjectFileImageInappropriateFile, NSObjectFileImageArch,
NSObjectFileImageFormat, NSObjectFileImageAccess);
for enum_11801d6b use (NSObjectFileImageFailure => 0,
NSObjectFileImageSuccess => 1, NSObjectFileImageInappropriateFile => 2,
NSObjectFileImageArch => 3, NSObjectFileImageFormat => 4,
NSObjectFileImageAccess => 5);
pragma Convention (C, enum_11801d6b);
subtype NSObjectFileImageReturnCode is enum_11801d6b;
type struct_NSObjectFileImage (<>) is limited private;
type struct_NSObjectFileImage_ptr is access all struct_NSObjectFileImage;
for struct_NSObjectFileImage_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_NSObjectFileImage_ptr);
pragma Convention (C, struct_NSObjectFileImage_ptr);
type struct_NSObjectFileImage_ptr_ptr is
access all struct_NSObjectFileImage_ptr;
for struct_NSObjectFileImage_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_NSObjectFileImage_ptr_ptr);
pragma Convention (C, struct_NSObjectFileImage_ptr_ptr);
subtype NSObjectFileImage is struct_NSObjectFileImage_ptr;
subtype NSObjectFileImage_ptr is struct_NSObjectFileImage_ptr_ptr;
function NSCreateObjectFileImageFromFile (pathName : access constant char;
objectFileImage : access NSObjectFileImage)
return NSObjectFileImageReturnCode;
pragma Import (C, NSCreateObjectFileImageFromFile,
"NSCreateObjectFileImageFromFile");
function NSCreateObjectFileImageFromMemory (address : void_const_ptr;
size : stddef.size_t; objectFileImage : access NSObjectFileImage)
return NSObjectFileImageReturnCode;
pragma Import (C, NSCreateObjectFileImageFromMemory,
"NSCreateObjectFileImageFromMemory");
function NSDestroyObjectFileImage (
objectFileImage : access struct_NSObjectFileImage) return bool;
pragma Import (C, NSDestroyObjectFileImage, "NSDestroyObjectFileImage");
function NSSymbolDefinitionCountInObjectFileImage (
objectFileImage : access struct_NSObjectFileImage)
return stdint.uint32_t;
pragma Import (C, NSSymbolDefinitionCountInObjectFileImage,
"NSSymbolDefinitionCountInObjectFileImage");
function NSSymbolDefinitionNameInObjectFileImage (
objectFileImage : access struct_NSObjectFileImage;
ordinal : stdint.uint32_t) return char_const_ptr;
pragma Import (C, NSSymbolDefinitionNameInObjectFileImage,
"NSSymbolDefinitionNameInObjectFileImage");
function NSSymbolReferenceCountInObjectFileImage (
objectFileImage : access struct_NSObjectFileImage)
return stdint.uint32_t;
pragma Import (C, NSSymbolReferenceCountInObjectFileImage,
"NSSymbolReferenceCountInObjectFileImage");
function NSSymbolReferenceNameInObjectFileImage (
objectFileImage : access struct_NSObjectFileImage;
ordinal : stdint.uint32_t; tentative_definition : access bool)
return char_const_ptr;
pragma Import (C, NSSymbolReferenceNameInObjectFileImage,
"NSSymbolReferenceNameInObjectFileImage");
function NSIsSymbolDefinedInObjectFileImage (
objectFileImage : access struct_NSObjectFileImage;
symbolName : access constant char) return bool;
pragma Import (C, NSIsSymbolDefinedInObjectFileImage,
"NSIsSymbolDefinedInObjectFileImage");
function NSGetSectionDataInObjectFileImage (
objectFileImage : access struct_NSObjectFileImage;
segmentName : access constant char; sectionName : access constant char;
size : access stddef.size_t) return void_ptr;
pragma Import (C, NSGetSectionDataInObjectFileImage,
"NSGetSectionDataInObjectFileImage");
function NSHasModInitObjectFileImage (
objectFileImage : access struct_NSObjectFileImage) return bool;
pragma Import (C, NSHasModInitObjectFileImage,
"NSHasModInitObjectFileImage");
type struct_NSModule (<>) is limited private;
type struct_NSModule_ptr is access all struct_NSModule;
for struct_NSModule_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_NSModule_ptr);
pragma Convention (C, struct_NSModule_ptr);
type struct_NSModule_ptr_ptr is access all struct_NSModule_ptr;
for struct_NSModule_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_NSModule_ptr_ptr);
pragma Convention (C, struct_NSModule_ptr_ptr);
subtype NSModule is struct_NSModule_ptr;
subtype NSModule_ptr is struct_NSModule_ptr_ptr;
function NSNameOfModule (m : access struct_NSModule)
return char_const_ptr;
pragma Import (C, NSNameOfModule, "NSNameOfModule");
function NSLibraryNameForModule (m : access struct_NSModule)
return char_const_ptr;
pragma Import (C, NSLibraryNameForModule, "NSLibraryNameForModule");
function NSLinkModule (objectFileImage : access struct_NSObjectFileImage;
moduleName : access constant char; options : stdint.uint32_t)
return NSModule;
pragma Import (C, NSLinkModule, "NSLinkModule");
function NSUnLinkModule (module : access struct_NSModule;
options : stdint.uint32_t) return bool;
pragma Import (C, NSUnLinkModule, "NSUnLinkModule");
type struct_NSSymbol (<>) is limited private;
type struct_NSSymbol_ptr is access all struct_NSSymbol;
for struct_NSSymbol_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_NSSymbol_ptr);
pragma Convention (C, struct_NSSymbol_ptr);
subtype NSSymbol is struct_NSSymbol_ptr;
function NSIsSymbolNameDefined (symbolName : access constant char)
return bool;
pragma Import (C, NSIsSymbolNameDefined, "NSIsSymbolNameDefined");
function NSIsSymbolNameDefinedWithHint (symbolName : access constant char;
libraryNameHint : access constant char) return bool;
pragma Import (C, NSIsSymbolNameDefinedWithHint,
"NSIsSymbolNameDefinedWithHint");
function NSIsSymbolNameDefinedInImage (
image : access constant mach_o.loader.struct_mach_header;
symbolName : access constant char) return bool;
pragma Import (C, NSIsSymbolNameDefinedInImage,
"NSIsSymbolNameDefinedInImage");
function NSLookupAndBindSymbol (symbolName : access constant char)
return NSSymbol;
pragma Import (C, NSLookupAndBindSymbol, "NSLookupAndBindSymbol");
function NSLookupAndBindSymbolWithHint (symbolName : access constant char;
libraryNameHint : access constant char) return NSSymbol;
pragma Import (C, NSLookupAndBindSymbolWithHint,
"NSLookupAndBindSymbolWithHint");
function NSLookupSymbolInModule (module : access struct_NSModule;
symbolName : access constant char) return NSSymbol;
pragma Import (C, NSLookupSymbolInModule, "NSLookupSymbolInModule");
function NSLookupSymbolInImage (
image : access constant mach_o.loader.struct_mach_header;
symbolName : access constant char; options : stdint.uint32_t)
return NSSymbol;
pragma Import (C, NSLookupSymbolInImage, "NSLookupSymbolInImage");
function NSNameOfSymbol (symbol : access struct_NSSymbol)
return char_const_ptr;
pragma Import (C, NSNameOfSymbol, "NSNameOfSymbol");
function NSAddressOfSymbol (symbol : access struct_NSSymbol)
return void_ptr;
pragma Import (C, NSAddressOfSymbol, "NSAddressOfSymbol");
function NSModuleForSymbol (symbol : access struct_NSSymbol)
return NSModule;
pragma Import (C, NSModuleForSymbol, "NSModuleForSymbol");
type enum_0e1ae145 is (NSLinkEditFileAccessError,
NSLinkEditFileFormatError, NSLinkEditMachResourceError,
NSLinkEditUnixResourceError, NSLinkEditOtherError,
NSLinkEditWarningError, NSLinkEditMultiplyDefinedError,
NSLinkEditUndefinedError);
for enum_0e1ae145 use (NSLinkEditFileAccessError => 0,
NSLinkEditFileFormatError => 1, NSLinkEditMachResourceError => 2,
NSLinkEditUnixResourceError => 3, NSLinkEditOtherError => 4,
NSLinkEditWarningError => 5, NSLinkEditMultiplyDefinedError => 6,
NSLinkEditUndefinedError => 7);
pragma Convention (C, enum_0e1ae145);
type enum_0e1ae145_ptr is access all enum_0e1ae145;
for enum_0e1ae145_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (enum_0e1ae145_ptr);
pragma Convention (C, enum_0e1ae145_ptr);
subtype NSLinkEditErrors is enum_0e1ae145;
subtype NSLinkEditErrors_ptr is enum_0e1ae145_ptr;
type enum_5b5a62ea is (NSOtherErrorRelocation, NSOtherErrorLazyBind,
NSOtherErrorIndrLoop, NSOtherErrorLazyInit, NSOtherErrorInvalidArgs);
for enum_5b5a62ea use (NSOtherErrorRelocation => 0,
NSOtherErrorLazyBind => 1, NSOtherErrorIndrLoop => 2,
NSOtherErrorLazyInit => 3, NSOtherErrorInvalidArgs => 4);
pragma Convention (C, enum_5b5a62ea);
subtype NSOtherErrorNumbers is enum_5b5a62ea;
procedure NSLinkEditError (c : access NSLinkEditErrors;
errorNumber : access signed_int; fileName : access char_const_ptr;
errorString : access char_const_ptr);
pragma Import (C, NSLinkEditError, "NSLinkEditError");
type access_3959a848 is access procedure (
symbolName : access constant char);
pragma Convention (C, access_3959a848);
type access_88c45b9f is access function (s : access struct_NSSymbol;
oldModule : access struct_NSModule; newModule : access struct_NSModule)
return NSModule;
pragma Convention (C, access_88c45b9f);
type access_39f2cbe1 is access procedure (errorClass : NSLinkEditErrors;
errorNumber : signed_int; fileName : access constant char;
errorString : access constant char);
pragma Convention (C, access_39f2cbe1);
type struct_d5d77797 is record
undefined : aliased access_3959a848;
multiple : aliased access_88c45b9f;
linkEdit : aliased access_39f2cbe1;
end record;
pragma Convention (C_Pass_By_Copy, struct_d5d77797);
type struct_d5d77797_const_ptr is access constant struct_d5d77797;
for struct_d5d77797_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_d5d77797_const_ptr);
pragma Convention (C, struct_d5d77797_const_ptr);
subtype NSLinkEditErrorHandlers is struct_d5d77797;
subtype NSLinkEditErrorHandlers_const_ptr is struct_d5d77797_const_ptr;
procedure NSInstallLinkEditErrorHandlers (
handlers : access constant NSLinkEditErrorHandlers);
pragma Import (C, NSInstallLinkEditErrorHandlers,
"NSInstallLinkEditErrorHandlers");
function NSAddLibrary (pathName : access constant char) return bool;
pragma Import (C, NSAddLibrary, "NSAddLibrary");
function NSAddLibraryWithSearching (pathName : access constant char)
return bool;
pragma Import (C, NSAddLibraryWithSearching, "NSAddLibraryWithSearching");
function NSAddImage (image_name : access constant char;
options : stdint.uint32_t)
return mach_o.loader.struct_mach_header_const_ptr;
pragma Import (C, NSAddImage, "NSAddImage");
function dyld_present return bool;
pragma Import (C, dyld_present, "_dyld_present");
function dyld_launched_prebound return bool;
pragma Import (C, dyld_launched_prebound, "_dyld_launched_prebound");
function dyld_all_twolevel_modules_prebound return bool;
pragma Import (C, dyld_all_twolevel_modules_prebound,
"_dyld_all_twolevel_modules_prebound");
procedure dyld_bind_objc_module (objc_module : void_const_ptr);
pragma Import (C, dyld_bind_objc_module, "_dyld_bind_objc_module");
function dyld_bind_fully_image_containing_address (
address : void_const_ptr) return bool;
pragma Import (C, dyld_bind_fully_image_containing_address,
"_dyld_bind_fully_image_containing_address");
function dyld_image_containing_address (address : void_const_ptr)
return bool;
pragma Import (C, dyld_image_containing_address,
"_dyld_image_containing_address");
procedure dyld_lookup_and_bind (symbol_name : access constant char;
address : access void_ptr; module : access NSModule);
pragma Import (C, dyld_lookup_and_bind, "_dyld_lookup_and_bind");
procedure dyld_lookup_and_bind_with_hint (
symbol_name : access constant char;
library_name_hint : access constant char; address : access void_ptr;
module : access NSModule);
pragma Import (C, dyld_lookup_and_bind_with_hint,
"_dyld_lookup_and_bind_with_hint");
procedure dyld_lookup_and_bind_fully (symbol_name : access constant char;
address : access void_ptr; module : access NSModule);
pragma Import (C, dyld_lookup_and_bind_fully,
"_dyld_lookup_and_bind_fully");
function dyld_get_image_header_containing_address (
address : void_const_ptr)
return mach_o.loader.struct_mach_header_const_ptr;
pragma Import (C, dyld_get_image_header_containing_address,
"_dyld_get_image_header_containing_address");
-- ENUM_DYLD_BOOL (empty)
NSADDIMAGE_OPTION_MATCH_FILENAME_BY_INSTALLNAME : constant := 8;
NSADDIMAGE_OPTION_NONE : constant := 0;
NSADDIMAGE_OPTION_RETURN_ONLY_IF_LOADED : constant := 4;
NSADDIMAGE_OPTION_RETURN_ON_ERROR : constant := 1;
NSADDIMAGE_OPTION_WITH_SEARCHING : constant := 2;
NSLINKMODULE_OPTION_BINDNOW : constant := 1;
NSLINKMODULE_OPTION_DONT_CALL_MOD_INIT_ROUTINES : constant := 8;
NSLINKMODULE_OPTION_NONE : constant := 0;
NSLINKMODULE_OPTION_PRIVATE : constant := 2;
NSLINKMODULE_OPTION_RETURN_ON_ERROR : constant := 4;
NSLINKMODULE_OPTION_TRAILING_PHYS_NAME : constant := 16;
NSLOOKUPSYMBOLINIMAGE_OPTION_BIND : constant := 0;
NSLOOKUPSYMBOLINIMAGE_OPTION_BIND_FULLY : constant := 2;
NSLOOKUPSYMBOLINIMAGE_OPTION_BIND_NOW : constant := 1;
NSLOOKUPSYMBOLINIMAGE_OPTION_RETURN_ON_ERROR : constant := 4;
NSUNLINKMODULE_OPTION_KEEP_MEMORY_MAPPED : constant := 1;
NSUNLINKMODULE_OPTION_NONE : constant := 0;
NSUNLINKMODULE_OPTION_RESET_LAZY_REFERENCES : constant := 2;
-- _MACH_O_DYLD_H_ (empty)
private
type struct_NSObjectFileImage is null record;
type struct_NSModule is null record;
type struct_NSSymbol is null record;
end C.mach_o.dyld;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.machine;
with C.mach.vm_prot;
with C.stdint;
package C.mach_o.loader is
pragma Preelaborate;
type struct_mach_header;
type struct_mach_header is record
magic : aliased stdint.uint32_t;
cputype : aliased mach.machine.cpu_type_t;
cpusubtype : aliased mach.machine.cpu_subtype_t;
filetype : aliased stdint.uint32_t;
ncmds : aliased stdint.uint32_t;
sizeofcmds : aliased stdint.uint32_t;
flags : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_mach_header);
type struct_mach_header_const_ptr is access constant struct_mach_header;
for struct_mach_header_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_mach_header_const_ptr);
pragma Convention (C, struct_mach_header_const_ptr);
type struct_mach_header_ptr is access all struct_mach_header;
for struct_mach_header_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_mach_header_ptr);
pragma Convention (C, struct_mach_header_ptr);
type struct_mach_header_64;
type struct_mach_header_64 is record
magic : aliased stdint.uint32_t;
cputype : aliased mach.machine.cpu_type_t;
cpusubtype : aliased mach.machine.cpu_subtype_t;
filetype : aliased stdint.uint32_t;
ncmds : aliased stdint.uint32_t;
sizeofcmds : aliased stdint.uint32_t;
flags : aliased stdint.uint32_t;
reserved : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_mach_header_64);
type struct_load_command;
type struct_load_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_load_command);
type union_lc_str;
type union_lc_str (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
offset : stdint.uint32_t;
when others =>
ptr : char_ptr;
end case;
end record;
pragma Unchecked_Union (union_lc_str);
pragma Convention (C_Pass_By_Copy, union_lc_str);
type struct_segment_command;
type struct_segment_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
segname : aliased char_array (0 .. 15);
vmaddr : aliased stdint.uint32_t;
vmsize : aliased stdint.uint32_t;
fileoff : aliased stdint.uint32_t;
filesize : aliased stdint.uint32_t;
maxprot : aliased mach.vm_prot.vm_prot_t;
initprot : aliased mach.vm_prot.vm_prot_t;
nsects : aliased stdint.uint32_t;
flags : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_segment_command);
type struct_segment_command_64;
type struct_segment_command_64 is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
segname : aliased char_array (0 .. 15);
vmaddr : aliased stdint.uint64_t;
vmsize : aliased stdint.uint64_t;
fileoff : aliased stdint.uint64_t;
filesize : aliased stdint.uint64_t;
maxprot : aliased mach.vm_prot.vm_prot_t;
initprot : aliased mach.vm_prot.vm_prot_t;
nsects : aliased stdint.uint32_t;
flags : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_segment_command_64);
type struct_section;
type struct_section is record
sectname : aliased char_array (0 .. 15);
segname : aliased char_array (0 .. 15);
addr : aliased stdint.uint32_t;
size : aliased stdint.uint32_t;
offset : aliased stdint.uint32_t;
align : aliased stdint.uint32_t;
reloff : aliased stdint.uint32_t;
nreloc : aliased stdint.uint32_t;
flags : aliased stdint.uint32_t;
reserved1 : aliased stdint.uint32_t;
reserved2 : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_section);
type struct_section_64;
type struct_section_64 is record
sectname : aliased char_array (0 .. 15);
segname : aliased char_array (0 .. 15);
addr : aliased stdint.uint64_t;
size : aliased stdint.uint64_t;
offset : aliased stdint.uint32_t;
align : aliased stdint.uint32_t;
reloff : aliased stdint.uint32_t;
nreloc : aliased stdint.uint32_t;
flags : aliased stdint.uint32_t;
reserved1 : aliased stdint.uint32_t;
reserved2 : aliased stdint.uint32_t;
reserved3 : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_section_64);
type struct_fvmlib;
type struct_fvmlib is record
name : aliased union_lc_str;
minor_version : aliased stdint.uint32_t;
header_addr : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_fvmlib);
type struct_fvmlib_command;
type struct_fvmlib_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
fvmlib : aliased struct_fvmlib;
end record;
pragma Convention (C_Pass_By_Copy, struct_fvmlib_command);
type struct_dylib;
type struct_dylib is record
name : aliased union_lc_str;
timestamp : aliased stdint.uint32_t;
current_version : aliased stdint.uint32_t;
compatibility_version : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_dylib);
type struct_dylib_command;
type struct_dylib_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
dylib : aliased struct_dylib;
end record;
pragma Convention (C_Pass_By_Copy, struct_dylib_command);
type struct_sub_framework_command;
type struct_sub_framework_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
umbrella : aliased union_lc_str;
end record;
pragma Convention (C_Pass_By_Copy, struct_sub_framework_command);
type struct_sub_client_command;
type struct_sub_client_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
client : aliased union_lc_str;
end record;
pragma Convention (C_Pass_By_Copy, struct_sub_client_command);
type struct_sub_umbrella_command;
type struct_sub_umbrella_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
sub_umbrella : aliased union_lc_str;
end record;
pragma Convention (C_Pass_By_Copy, struct_sub_umbrella_command);
type struct_sub_library_command;
type struct_sub_library_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
sub_library : aliased union_lc_str;
end record;
pragma Convention (C_Pass_By_Copy, struct_sub_library_command);
type struct_prebound_dylib_command;
type struct_prebound_dylib_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
name : aliased union_lc_str;
nmodules : aliased stdint.uint32_t;
linked_modules : aliased union_lc_str;
end record;
pragma Convention (C_Pass_By_Copy, struct_prebound_dylib_command);
type struct_dylinker_command;
type struct_dylinker_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
name : aliased union_lc_str;
end record;
pragma Convention (C_Pass_By_Copy, struct_dylinker_command);
type struct_thread_command;
type struct_thread_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_thread_command);
type struct_routines_command;
type struct_routines_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
init_address : aliased stdint.uint32_t;
init_module : aliased stdint.uint32_t;
reserved1 : aliased stdint.uint32_t;
reserved2 : aliased stdint.uint32_t;
reserved3 : aliased stdint.uint32_t;
reserved4 : aliased stdint.uint32_t;
reserved5 : aliased stdint.uint32_t;
reserved6 : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_routines_command);
type struct_routines_command_64;
type struct_routines_command_64 is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
init_address : aliased stdint.uint64_t;
init_module : aliased stdint.uint64_t;
reserved1 : aliased stdint.uint64_t;
reserved2 : aliased stdint.uint64_t;
reserved3 : aliased stdint.uint64_t;
reserved4 : aliased stdint.uint64_t;
reserved5 : aliased stdint.uint64_t;
reserved6 : aliased stdint.uint64_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_routines_command_64);
type struct_symtab_command;
type struct_symtab_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
symoff : aliased stdint.uint32_t;
nsyms : aliased stdint.uint32_t;
stroff : aliased stdint.uint32_t;
strsize : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_symtab_command);
type struct_dysymtab_command;
type struct_dysymtab_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
ilocalsym : aliased stdint.uint32_t;
nlocalsym : aliased stdint.uint32_t;
iextdefsym : aliased stdint.uint32_t;
nextdefsym : aliased stdint.uint32_t;
iundefsym : aliased stdint.uint32_t;
nundefsym : aliased stdint.uint32_t;
tocoff : aliased stdint.uint32_t;
ntoc : aliased stdint.uint32_t;
modtaboff : aliased stdint.uint32_t;
nmodtab : aliased stdint.uint32_t;
extrefsymoff : aliased stdint.uint32_t;
nextrefsyms : aliased stdint.uint32_t;
indirectsymoff : aliased stdint.uint32_t;
nindirectsyms : aliased stdint.uint32_t;
extreloff : aliased stdint.uint32_t;
nextrel : aliased stdint.uint32_t;
locreloff : aliased stdint.uint32_t;
nlocrel : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_dysymtab_command);
type struct_dylib_table_of_contents;
type struct_dylib_table_of_contents is record
symbol_index : aliased stdint.uint32_t;
module_index : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_dylib_table_of_contents);
type struct_dylib_module;
type struct_dylib_module is record
module_name : aliased stdint.uint32_t;
iextdefsym : aliased stdint.uint32_t;
nextdefsym : aliased stdint.uint32_t;
irefsym : aliased stdint.uint32_t;
nrefsym : aliased stdint.uint32_t;
ilocalsym : aliased stdint.uint32_t;
nlocalsym : aliased stdint.uint32_t;
iextrel : aliased stdint.uint32_t;
nextrel : aliased stdint.uint32_t;
iinit_iterm : aliased stdint.uint32_t;
ninit_nterm : aliased stdint.uint32_t;
objc_module_info_addr : aliased stdint.uint32_t;
objc_module_info_size : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_dylib_module);
type struct_dylib_module_64;
type struct_dylib_module_64 is record
module_name : aliased stdint.uint32_t;
iextdefsym : aliased stdint.uint32_t;
nextdefsym : aliased stdint.uint32_t;
irefsym : aliased stdint.uint32_t;
nrefsym : aliased stdint.uint32_t;
ilocalsym : aliased stdint.uint32_t;
nlocalsym : aliased stdint.uint32_t;
iextrel : aliased stdint.uint32_t;
nextrel : aliased stdint.uint32_t;
iinit_iterm : aliased stdint.uint32_t;
ninit_nterm : aliased stdint.uint32_t;
objc_module_info_size : aliased stdint.uint32_t;
objc_module_info_addr : aliased stdint.uint64_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_dylib_module_64);
type struct_dylib_reference;
type struct_dylib_reference is record
isym : stdint.uint32_t range 0 .. 16777215;
flags : stdint.uint32_t range 0 .. 255;
end record;
for struct_dylib_reference use record
isym at 0 range 0 .. 23;
flags at 0 range 24 .. 31;
end record;
pragma Convention (C_Pass_By_Copy, struct_dylib_reference);
type struct_twolevel_hints_command;
type struct_twolevel_hints_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
offset : aliased stdint.uint32_t;
nhints : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_twolevel_hints_command);
type struct_twolevel_hint;
type struct_twolevel_hint is record
isub_image : stdint.uint32_t range 0 .. 255;
itoc : stdint.uint32_t range 0 .. 16777215;
end record;
for struct_twolevel_hint use record
isub_image at 0 range 0 .. 7;
itoc at 0 range 8 .. 31;
end record;
pragma Convention (C_Pass_By_Copy, struct_twolevel_hint);
type struct_prebind_cksum_command;
type struct_prebind_cksum_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
cksum : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_prebind_cksum_command);
type struct_uuid_command;
type struct_uuid_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
uuid : aliased stdint.uint8_t_array (0 .. 15);
end record;
pragma Convention (C_Pass_By_Copy, struct_uuid_command);
type struct_rpath_command;
type struct_rpath_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
path : aliased union_lc_str;
end record;
pragma Convention (C_Pass_By_Copy, struct_rpath_command);
type struct_linkedit_data_command;
type struct_linkedit_data_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
dataoff : aliased stdint.uint32_t;
datasize : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_linkedit_data_command);
type struct_encryption_info_command;
type struct_encryption_info_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
cryptoff : aliased stdint.uint32_t;
cryptsize : aliased stdint.uint32_t;
cryptid : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_encryption_info_command);
type struct_symseg_command;
type struct_symseg_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
offset : aliased stdint.uint32_t;
size : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_symseg_command);
type struct_ident_command;
type struct_ident_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_ident_command);
type struct_fvmfile_command;
type struct_fvmfile_command is record
cmd : aliased stdint.uint32_t;
cmdsize : aliased stdint.uint32_t;
name : aliased union_lc_str;
header_addr : aliased stdint.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_fvmfile_command);
INDIRECT_SYMBOL_ABS : constant := 1073741824;
INDIRECT_SYMBOL_LOCAL : constant := -2147483648;
LC_CODE_SIGNATURE : constant := 29;
LC_DYSYMTAB : constant := 11;
LC_ENCRYPTION_INFO : constant := 33;
LC_FVMFILE : constant := 9;
LC_IDENT : constant := 8;
LC_IDFVMLIB : constant := 7;
LC_ID_DYLIB : constant := 13;
LC_ID_DYLINKER : constant := 15;
LC_LAZY_LOAD_DYLIB : constant := 32;
LC_LOADFVMLIB : constant := 6;
LC_LOAD_DYLIB : constant := 12;
LC_LOAD_DYLINKER : constant := 14;
LC_LOAD_WEAK_DYLIB : constant := -2147483624;
LC_PREBIND_CKSUM : constant := 23;
LC_PREBOUND_DYLIB : constant := 16;
LC_PREPAGE : constant := 10;
LC_REEXPORT_DYLIB : constant := -2147483617;
LC_REQ_DYLD : constant := -2147483648;
LC_ROUTINES : constant := 17;
LC_ROUTINES_64 : constant := 26;
LC_RPATH : constant := -2147483620;
LC_SEGMENT : constant := 1;
LC_SEGMENT_64 : constant := 25;
LC_SEGMENT_SPLIT_INFO : constant := 30;
LC_SUB_CLIENT : constant := 20;
LC_SUB_FRAMEWORK : constant := 18;
LC_SUB_LIBRARY : constant := 21;
LC_SUB_UMBRELLA : constant := 19;
LC_SYMSEG : constant := 3;
LC_SYMTAB : constant := 2;
LC_THREAD : constant := 4;
LC_TWOLEVEL_HINTS : constant := 22;
LC_UNIXTHREAD : constant := 5;
LC_UUID : constant := 27;
MH_ALLMODSBOUND : constant := 4096;
MH_ALLOW_STACK_EXECUTION : constant := 131072;
MH_BINDATLOAD : constant := 8;
MH_BINDS_TO_WEAK : constant := 65536;
MH_BUNDLE : constant := 8;
MH_CANONICAL : constant := 16384;
MH_CIGAM : constant := -822415874;
MH_CIGAM_64 : constant := -805638658;
MH_CORE : constant := 4;
MH_DSYM : constant := 10;
MH_DYLDLINK : constant := 4;
MH_DYLIB : constant := 6;
MH_DYLIB_STUB : constant := 9;
MH_DYLINKER : constant := 7;
MH_EXECUTE : constant := 2;
MH_FORCE_FLAT : constant := 256;
MH_FVMLIB : constant := 3;
MH_INCRLINK : constant := 2;
MH_LAZY_INIT : constant := 64;
MH_MAGIC : constant := -17958194;
MH_MAGIC_64 : constant := -17958193;
MH_NOFIXPREBINDING : constant := 1024;
MH_NOMULTIDEFS : constant := 512;
MH_NOUNDEFS : constant := 1;
MH_NO_REEXPORTED_DYLIBS : constant := 1048576;
MH_OBJECT : constant := 1;
MH_PIE : constant := 2097152;
MH_PREBINDABLE : constant := 2048;
MH_PREBOUND : constant := 16;
MH_PRELOAD : constant := 5;
MH_ROOT_SAFE : constant := 262144;
MH_SETUID_SAFE : constant := 524288;
MH_SPLIT_SEGS : constant := 32;
MH_SUBSECTIONS_VIA_SYMBOLS : constant := 8192;
MH_TWOLEVEL : constant := 128;
MH_WEAK_DEFINES : constant := 32768;
SECTION_ATTRIBUTES : constant := -256;
SECTION_ATTRIBUTES_SYS : constant := 16776960;
SECTION_ATTRIBUTES_USR : constant := -16777216;
SECTION_TYPE : constant := 255;
SECT_BSS : constant char_array (0 .. 5) := "__bss" & char'Val (0);
SECT_COMMON : constant char_array (0 .. 8) := "__common" & char'Val (0);
SECT_DATA : constant char_array (0 .. 6) := "__data" & char'Val (0);
SECT_FVMLIB_INIT0 : constant char_array (0 .. 14) := "__fvmlib_init0"
& char'Val (0);
SECT_FVMLIB_INIT1 : constant char_array (0 .. 14) := "__fvmlib_init1"
& char'Val (0);
SECT_ICON_HEADER : constant char_array (0 .. 8) := "__header"
& char'Val (0);
SECT_ICON_TIFF : constant char_array (0 .. 6) := "__tiff" & char'Val (0);
SECT_OBJC_MODULES : constant char_array (0 .. 13) := "__module_info"
& char'Val (0);
SECT_OBJC_REFS : constant char_array (0 .. 15) := "__selector_refs"
& char'Val (0);
SECT_OBJC_STRINGS : constant char_array (0 .. 15) := "__selector_strs"
& char'Val (0);
SECT_OBJC_SYMBOLS : constant char_array (0 .. 14) := "__symbol_table"
& char'Val (0);
SECT_TEXT : constant char_array (0 .. 6) := "__text" & char'Val (0);
SEG_DATA : constant char_array (0 .. 6) := "__DATA" & char'Val (0);
SEG_ICON : constant char_array (0 .. 6) := "__ICON" & char'Val (0);
SEG_IMPORT : constant char_array (0 .. 8) := "__IMPORT" & char'Val (0);
SEG_LINKEDIT : constant char_array (0 .. 10) := "__LINKEDIT"
& char'Val (0);
SEG_OBJC : constant char_array (0 .. 6) := "__OBJC" & char'Val (0);
SEG_PAGEZERO : constant char_array (0 .. 10) := "__PAGEZERO"
& char'Val (0);
SEG_TEXT : constant char_array (0 .. 6) := "__TEXT" & char'Val (0);
SEG_UNIXSTACK : constant char_array (0 .. 11) := "__UNIXSTACK"
& char'Val (0);
SG_FVMLIB : constant := 2;
SG_HIGHVM : constant := 1;
SG_NORELOC : constant := 4;
SG_PROTECTED_VERSION_1 : constant := 8;
S_16BYTE_LITERALS : constant := 14;
S_4BYTE_LITERALS : constant := 3;
S_8BYTE_LITERALS : constant := 4;
S_ATTR_DEBUG : constant := 33554432;
S_ATTR_EXT_RELOC : constant := 512;
S_ATTR_LIVE_SUPPORT : constant := 134217728;
S_ATTR_LOC_RELOC : constant := 256;
S_ATTR_NO_DEAD_STRIP : constant := 268435456;
S_ATTR_NO_TOC : constant := 1073741824;
S_ATTR_PURE_INSTRUCTIONS : constant := -2147483648;
S_ATTR_SELF_MODIFYING_CODE : constant := 67108864;
S_ATTR_SOME_INSTRUCTIONS : constant := 1024;
S_ATTR_STRIP_STATIC_SYMS : constant := 536870912;
S_COALESCED : constant := 11;
S_CSTRING_LITERALS : constant := 2;
S_DTRACE_DOF : constant := 15;
S_GB_ZEROFILL : constant := 12;
S_INTERPOSING : constant := 13;
S_LAZY_DYLIB_SYMBOL_POINTERS : constant := 16;
S_LAZY_SYMBOL_POINTERS : constant := 7;
S_LITERAL_POINTERS : constant := 5;
S_MOD_INIT_FUNC_POINTERS : constant := 9;
S_MOD_TERM_FUNC_POINTERS : constant := 10;
S_NON_LAZY_SYMBOL_POINTERS : constant := 6;
S_REGULAR : constant := 0;
S_SYMBOL_STUBS : constant := 8;
S_ZEROFILL : constant := 1;
-- _MACHO_LOADER_H_ (empty)
end C.mach_o.loader;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach_o is
pragma Preelaborate;
end C.mach_o;
-- This file is translated by "headmaster" version 0.27-2060155 (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.endian is
pragma Preelaborate;
-- _BSD_MACHINE_ENDIAN_H_ (empty)
end C.machine.endian;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
-- _BSD_MACHINE_PARAM_H_ (empty)
end C.machine.param;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
-- _BSD_MACHINE__TYPES_H_ (empty)
end C.machine.qtypes;
-- This file is translated by "headmaster" version 0.27-2060155 (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.signal is
pragma Preelaborate;
-- _BSD_MACHINE_SIGNAL_H_ (empty)
end C.machine.signal;
-- This file is translated by "headmaster" version 0.27-2060155 (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.types is
pragma Preelaborate;
-- _BSD_MACHINE_TYPES_H_ (empty)
end C.machine.types;
-- This file is translated by "headmaster" version 0.27-2060155 (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 is translated by "headmaster" version 0.27-2060155 (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.mach.i386.boolean;
with C.mach.i386.kern_return;
with C.mach.i386.vm_types;
with C.mach.mach_types;
with C.mach.vm_types;
with C.stddef;
package C.malloc.malloc is
pragma Preelaborate;
type struct_malloc_zone_t;
type struct_malloc_zone_t_ptr is access all struct_malloc_zone_t;
for struct_malloc_zone_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_malloc_zone_t_ptr);
pragma Convention (C, struct_malloc_zone_t_ptr);
type access_e2fd51ad is access function (
zone : access struct_malloc_zone_t; ptr : void_const_ptr)
return stddef.size_t;
pragma Convention (C, access_e2fd51ad);
type access_8e473813 is access function (
zone : access struct_malloc_zone_t; size : stddef.size_t)
return void_ptr;
pragma Convention (C, access_8e473813);
type access_a7c96469 is access function (
zone : access struct_malloc_zone_t; num_items : stddef.size_t;
size : stddef.size_t) return void_ptr;
pragma Convention (C, access_a7c96469);
type access_60d054b6 is access function (
zone : access struct_malloc_zone_t; size : stddef.size_t)
return void_ptr;
pragma Convention (C, access_60d054b6);
type access_a943c036 is access procedure (
zone : access struct_malloc_zone_t; ptr : void_ptr);
pragma Convention (C, access_a943c036);
type access_b53be4ee is access function (
zone : access struct_malloc_zone_t; ptr : void_ptr;
size : stddef.size_t) return void_ptr;
pragma Convention (C, access_b53be4ee);
type access_668dcd8a is access procedure (
zone : access struct_malloc_zone_t);
pragma Convention (C, access_668dcd8a);
type access_0c088e91 is access function (
zone : access struct_malloc_zone_t; size : stddef.size_t;
results : access void_ptr; num_requested : unsigned_int)
return unsigned_int;
pragma Convention (C, access_0c088e91);
type access_df5f8543 is access procedure (
zone : access struct_malloc_zone_t; to_be_freed : access void_ptr;
num_to_be_freed : unsigned_int);
pragma Convention (C, access_df5f8543);
type struct_malloc_introspection_t;
type struct_malloc_introspection_t_ptr is
access all struct_malloc_introspection_t;
for struct_malloc_introspection_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_malloc_introspection_t_ptr);
pragma Convention (C, struct_malloc_introspection_t_ptr);
type struct_malloc_zone_t is record
reserved1 : aliased void_ptr;
reserved2 : aliased void_ptr;
size : aliased access_e2fd51ad;
malloc : aliased access_8e473813;
calloc : aliased access_a7c96469;
valloc : aliased access_60d054b6;
free : aliased access_a943c036;
realloc : aliased access_b53be4ee;
destroy : aliased access_668dcd8a;
zone_name : aliased char_const_ptr;
batch_malloc : aliased access_0c088e91;
batch_free : aliased access_df5f8543;
introspect : aliased struct_malloc_introspection_t_ptr;
version : aliased unsigned_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_malloc_zone_t);
subtype malloc_zone_t is struct_malloc_zone_t;
subtype malloc_zone_t_ptr is struct_malloc_zone_t_ptr;
function malloc_default_zone return malloc_zone_t_ptr;
pragma Import (C, malloc_default_zone, "malloc_default_zone");
function malloc_create_zone (start_size : mach.i386.vm_types.vm_size_t;
flags : unsigned_int) return malloc_zone_t_ptr;
pragma Import (C, malloc_create_zone, "malloc_create_zone");
procedure malloc_destroy_zone (zone : access malloc_zone_t);
pragma Import (C, malloc_destroy_zone, "malloc_destroy_zone");
function malloc_zone_malloc (zone : access malloc_zone_t;
size : stddef.size_t) return void_ptr;
pragma Import (C, malloc_zone_malloc, "malloc_zone_malloc");
function malloc_zone_calloc (zone : access malloc_zone_t;
num_items : stddef.size_t; size : stddef.size_t) return void_ptr;
pragma Import (C, malloc_zone_calloc, "malloc_zone_calloc");
function malloc_zone_valloc (zone : access malloc_zone_t;
size : stddef.size_t) return void_ptr;
pragma Import (C, malloc_zone_valloc, "malloc_zone_valloc");
procedure malloc_zone_free (zone : access malloc_zone_t; ptr : void_ptr);
pragma Import (C, malloc_zone_free, "malloc_zone_free");
function malloc_zone_realloc (zone : access malloc_zone_t; ptr : void_ptr;
size : stddef.size_t) return void_ptr;
pragma Import (C, malloc_zone_realloc, "malloc_zone_realloc");
function malloc_zone_from_ptr (ptr : void_const_ptr)
return malloc_zone_t_ptr;
pragma Import (C, malloc_zone_from_ptr, "malloc_zone_from_ptr");
function malloc_size (ptr : void_const_ptr) return stddef.size_t;
pragma Import (C, malloc_size, "malloc_size");
function malloc_good_size (size : stddef.size_t) return stddef.size_t;
pragma Import (C, malloc_good_size, "malloc_good_size");
function malloc_zone_batch_malloc (zone : access malloc_zone_t;
size : stddef.size_t; results : access void_ptr;
num_requested : unsigned_int) return unsigned_int;
pragma Import (C, malloc_zone_batch_malloc, "malloc_zone_batch_malloc");
procedure malloc_zone_batch_free (zone : access malloc_zone_t;
to_be_freed : access void_ptr; num : unsigned_int);
pragma Import (C, malloc_zone_batch_free, "malloc_zone_batch_free");
procedure malloc_zone_register (zone : access malloc_zone_t);
pragma Import (C, malloc_zone_register, "malloc_zone_register");
procedure malloc_zone_unregister (zone : access malloc_zone_t);
pragma Import (C, malloc_zone_unregister, "malloc_zone_unregister");
procedure malloc_set_zone_name (zone : access malloc_zone_t;
name : access constant char);
pragma Import (C, malloc_set_zone_name, "malloc_set_zone_name");
function malloc_get_zone_name (zone : access malloc_zone_t)
return char_const_ptr;
pragma Import (C, malloc_get_zone_name, "malloc_get_zone_name");
type struct_9723b1cd is record
address : aliased mach.vm_types.vm_address_t;
size : aliased mach.i386.vm_types.vm_size_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_9723b1cd);
type struct_9723b1cd_ptr is access all struct_9723b1cd;
for struct_9723b1cd_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_9723b1cd_ptr);
pragma Convention (C, struct_9723b1cd_ptr);
subtype vm_range_t is struct_9723b1cd;
subtype vm_range_t_ptr is struct_9723b1cd_ptr;
type struct_malloc_statistics_t;
type struct_malloc_statistics_t is record
blocks_in_use : aliased unsigned_int;
size_in_use : aliased stddef.size_t;
max_size_in_use : aliased stddef.size_t;
size_allocated : aliased stddef.size_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_malloc_statistics_t);
type struct_malloc_statistics_t_ptr is
access all struct_malloc_statistics_t;
for struct_malloc_statistics_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_malloc_statistics_t_ptr);
pragma Convention (C, struct_malloc_statistics_t_ptr);
subtype malloc_statistics_t is struct_malloc_statistics_t;
subtype malloc_statistics_t_ptr is struct_malloc_statistics_t_ptr;
type access_1558c6ca is access function (
remote_task : mach.mach_types.task_t;
remote_address : mach.vm_types.vm_address_t;
size : mach.i386.vm_types.vm_size_t; local_memory : access void_ptr)
return mach.i386.kern_return.kern_return_t;
pragma Convention (C, access_1558c6ca);
-- subtype memory_reader_t is ... (function type)
type access_4c10c83a is access procedure (a1 : mach.mach_types.task_t;
a2 : void_ptr; A_type : unsigned_int; a4 : access vm_range_t;
a5 : unsigned_int);
pragma Convention (C, access_4c10c83a);
-- subtype vm_range_recorder_t is ... (function type)
type access_4501adee is access function (A_task : mach.mach_types.task_t;
a2 : void_ptr; type_mask : unsigned_int;
zone_address : mach.vm_types.vm_address_t; reader : access_1558c6ca;
recorder : access_4c10c83a) return mach.i386.kern_return.kern_return_t;
pragma Convention (C, access_4501adee);
type access_8f11bf3c is access function (zone : access malloc_zone_t;
size : stddef.size_t) return stddef.size_t;
pragma Convention (C, access_8f11bf3c);
type access_fe2ca7bf is access function (zone : access malloc_zone_t)
return mach.i386.boolean.boolean_t;
pragma Convention (C, access_fe2ca7bf);
type access_6d6ad9fa is access procedure (zone : access malloc_zone_t;
verbose : mach.i386.boolean.boolean_t);
pragma Convention (C, access_6d6ad9fa);
type access_ad15e719 is access procedure (zone : access malloc_zone_t;
address : void_ptr);
pragma Convention (C, access_ad15e719);
type access_19ea963d is access procedure (zone : access malloc_zone_t);
pragma Convention (C, access_19ea963d);
type access_2a9fd89b is access procedure (zone : access malloc_zone_t);
pragma Convention (C, access_2a9fd89b);
type access_fe5602be is access procedure (zone : access malloc_zone_t;
stats : access malloc_statistics_t);
pragma Convention (C, access_fe5602be);
type struct_malloc_introspection_t is record
enumerator : aliased access_4501adee;
good_size : aliased access_8f11bf3c;
check : aliased access_fe2ca7bf;
print : aliased access_6d6ad9fa;
log : aliased access_ad15e719;
force_lock : aliased access_19ea963d;
force_unlock : aliased access_2a9fd89b;
statistics : aliased access_fe5602be;
end record;
pragma Convention (C_Pass_By_Copy, struct_malloc_introspection_t);
subtype malloc_introspection_t is struct_malloc_introspection_t;
procedure malloc_printf (format : access constant char);
pragma Import (C, malloc_printf, "malloc_printf");
function malloc_get_all_zones (A_task : mach.mach_types.task_t;
reader : access_1558c6ca;
addresses : access mach.vm_types.vm_address_t_ptr;
count : access unsigned_int)
return mach.i386.kern_return.kern_return_t;
pragma Import (C, malloc_get_all_zones, "malloc_get_all_zones");
procedure malloc_zone_print_ptr_info (ptr : void_ptr);
pragma Import (C, malloc_zone_print_ptr_info,
"malloc_zone_print_ptr_info");
function malloc_zone_check (zone : access malloc_zone_t)
return mach.i386.boolean.boolean_t;
pragma Import (C, malloc_zone_check, "malloc_zone_check");
procedure malloc_zone_print (zone : access malloc_zone_t;
verbose : mach.i386.boolean.boolean_t);
pragma Import (C, malloc_zone_print, "malloc_zone_print");
procedure malloc_zone_statistics (zone : access malloc_zone_t;
stats : access malloc_statistics_t);
pragma Import (C, malloc_zone_statistics, "malloc_zone_statistics");
procedure malloc_zone_log (zone : access malloc_zone_t;
address : void_ptr);
pragma Import (C, malloc_zone_log, "malloc_zone_log");
type struct_mstats;
type struct_mstats is record
bytes_total : aliased stddef.size_t;
chunks_used : aliased stddef.size_t;
bytes_used : aliased stddef.size_t;
chunks_free : aliased stddef.size_t;
bytes_free : aliased stddef.size_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_mstats);
function mstats return struct_mstats;
pragma Import (C, mstats, "mstats");
MALLOC_ADMIN_REGION_RANGE_TYPE : constant := 4;
MALLOC_PTR_IN_USE_RANGE_TYPE : constant := 1;
MALLOC_PTR_REGION_RANGE_TYPE : constant := 2;
-- _MALLOC_MALLOC_H_ (empty)
end C.malloc.malloc;
-- This file is translated by "headmaster" version 0.27-2060155 (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.malloc is
pragma Preelaborate;
end C.malloc;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
h_errno : aliased signed_int;
pragma Import (C, h_errno, "h_errno");
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_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_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_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_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);
type struct_rpcent;
type struct_rpcent is record
r_name : aliased char_ptr;
r_aliases : aliased char_ptr_ptr;
r_number : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_rpcent);
type struct_rpcent_ptr is access all struct_rpcent;
for struct_rpcent_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_rpcent_ptr);
pragma Convention (C, struct_rpcent_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");
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");
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 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 getnameinfo (a1 : access constant sys.socket.struct_sockaddr;
a2 : sys.socket.socklen_t; a3 : access char; a4 : sys.socket.socklen_t;
a5 : access char; a6 : sys.socket.socklen_t; a7 : signed_int)
return signed_int;
pragma Import (C, getnameinfo, "getnameinfo");
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");
procedure setservent (a1 : signed_int);
pragma Import (C, setservent, "setservent");
procedure freehostent (a1 : access struct_hostent);
pragma Import (C, freehostent, "freehostent");
function gethostbyname2 (a1 : access constant char; a2 : signed_int)
return struct_hostent_ptr;
pragma Import (C, gethostbyname2, "gethostbyname2");
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 getrpcbyname (name : access constant char)
return struct_rpcent_ptr;
pragma Import (C, getrpcbyname, "getrpcbyname");
function getrpcbynumber (number : signed_long) return struct_rpcent_ptr;
pragma Import (C, getrpcbynumber, "getrpcbynumber");
function getrpcent return struct_rpcent_ptr;
pragma Import (C, getrpcent, "getrpcent");
procedure setrpcent (stayopen : signed_int);
pragma Import (C, setrpcent, "setrpcent");
procedure endrpcent;
pragma Import (C, endrpcent, "endrpcent");
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");
function getnetgrent (a1 : access char_ptr; a2 : access char_ptr;
a3 : access char_ptr) return signed_int;
pragma Import (C, getnetgrent, "getnetgrent");
procedure endnetgrent;
pragma Import (C, endnetgrent, "endnetgrent");
procedure setnetgrent (a1 : access constant char);
pragma Import (C, setnetgrent, "setnetgrent");
AI_ADDRCONFIG : constant := 1024;
AI_ALL : constant := 256;
AI_CANONNAME : constant := 2;
AI_DEFAULT : constant := 1536;
AI_MASK : constant := 7;
AI_NUMERICHOST : constant := 4;
AI_PASSIVE : constant := 1;
AI_V4MAPPED : constant := 2048;
AI_V4MAPPED_CFG : constant := 512;
EAI_ADDRFAMILY : constant := 1;
EAI_AGAIN : constant := 2;
EAI_BADFLAGS : constant := 3;
EAI_BADHINTS : constant := 12;
EAI_FAIL : constant := 4;
EAI_FAMILY : constant := 5;
EAI_MAX : constant := 14;
EAI_MEMORY : constant := 6;
EAI_NODATA : constant := 7;
EAI_NONAME : constant := 8;
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;
NI_WITHSCOPEID : constant := 32;
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);
-- h_addr (unparsible)
end C.netdb;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
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_sockaddr_in;
type struct_sockaddr_in is record
sin_len : aliased i386.qtypes.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);
type struct_ip_opts;
type struct_ip_opts is record
ip_dst : aliased struct_in_addr;
ip_opts : aliased char_array (0 .. 39);
end record;
pragma Convention (C_Pass_By_Copy, struct_ip_opts);
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);
INADDR_ALLHOSTS_GROUP : constant := 3758096385;
INADDR_ALLRTRS_GROUP : constant := 3758096386;
INADDR_ANY : constant := 0;
INADDR_BROADCAST : constant := 4294967295;
INADDR_LOOPBACK : constant := 2130706433;
INADDR_MAX_LOCAL_GROUP : constant := 3758096639;
INADDR_NONE : constant := -1;
INADDR_UNSPEC_GROUP : constant := 3758096384;
INET_ADDRSTRLEN : constant := 16;
-- 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_LINKLOCALNETNUM : constant := 2851995648;
IN_LOOPBACKNET : constant := 127;
-- IN_MULTICAST (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_RTEXPIRE : constant := 5;
IPCTL_RTMAXCACHE : constant := 7;
IPCTL_RTMINEXPIRE : constant := 6;
IPCTL_SENDREDIRECTS : constant := 2;
IPCTL_SOURCEROUTE : constant := 8;
IPCTL_STATS : constant := 12;
IPPORT_HIFIRSTAUTO : constant := 49152;
IPPORT_HILASTAUTO : constant := 65535;
IPPORT_RESERVED : constant := 1024;
IPPORT_RESERVEDSTART : constant := 600;
IPPORT_USERRESERVED : constant := 5000;
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_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 := 254;
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_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_OSPFIGP : constant := 89;
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_SDRP : constant := 42;
IPPROTO_SEP : constant := 33;
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_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_DEFAULT_MULTICAST_LOOP : constant := 1;
IP_DEFAULT_MULTICAST_TTL : constant := 1;
IP_DROP_MEMBERSHIP : constant := 13;
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_FW_ADD : constant := 40;
IP_FW_DEL : constant := 41;
IP_FW_FLUSH : constant := 42;
IP_FW_GET : constant := 44;
IP_FW_RESETLOG : constant := 45;
IP_FW_ZERO : constant := 43;
IP_HDRINCL : constant := 2;
IP_IPSEC_POLICY : constant := 21;
IP_MAX_MEMBERSHIPS : constant := 20;
IP_MULTICAST_IF : constant := 9;
IP_MULTICAST_LOOP : constant := 11;
IP_MULTICAST_TTL : constant := 10;
IP_MULTICAST_VIF : constant := 14;
IP_NAT_XXX : constant := 55;
IP_OLD_FW_ADD : constant := 50;
IP_OLD_FW_DEL : constant := 51;
IP_OLD_FW_FLUSH : constant := 52;
IP_OLD_FW_GET : constant := 54;
IP_OLD_FW_RESETLOG : constant := 56;
IP_OLD_FW_ZERO : constant := 53;
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_RECVTTL : constant := 24;
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_STRIPHDR : constant := 23;
IP_TOS : constant := 3;
IP_TRAFFIC_MGT_BACKGROUND : constant := 65;
IP_TTL : constant := 4;
TRAFFIC_MGT_SO_BACKGROUND : constant := 1;
TRAFFIC_MGT_SO_BG_SUPPRESSED : constant := 2;
-- _NETINET_IN_H_ (empty)
DARWIN_IPPORT_RESERVED : constant := 1024;
end C.netinet.in_h;
-- This file is translated by "headmaster" version 0.27-2060155 (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 is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
with C.stddef;
with C.sys.socket;
with C.sys.types;
package C.netinet6.in6 is
pragma Preelaborate;
subtype uint8_t_array16 is i386.qtypes.uint8_t_array (0 .. 15);
type struct_in6_addr;
type union_dc9c3bff (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
u6_addr8 : i386.qtypes.uint8_t_array (0 .. 15);
when 1 =>
u6_addr16 : i386.qtypes.uint16_t_array (0 .. 7);
when others =>
u6_addr32 : i386.qtypes.uint32_t_array (0 .. 3);
end case;
end record;
pragma Unchecked_Union (union_dc9c3bff);
pragma Convention (C_Pass_By_Copy, union_dc9c3bff);
type struct_in6_addr is record
u6_addr : aliased union_dc9c3bff;
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 i386.qtypes.uint8_t;
sin6_family : aliased sys.socket.sa_family_t;
sin6_port : aliased sys.types.in_port_t;
sin6_flowinfo : aliased i386.qtypes.uint32_t;
sin6_addr : aliased struct_in6_addr;
sin6_scope_id : aliased i386.qtypes.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");
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);
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 i386.qtypes.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 i386.qtypes.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 i386.qtypes.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 i386.qtypes.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 : stddef.size_t)
return signed_int;
pragma Import (C, inet6_opt_init, "inet6_opt_init");
function inet6_opt_append (a1 : void_ptr; a2 : stddef.size_t;
a3 : signed_int; a4 : i386.qtypes.uint8_t; a5 : stddef.size_t;
a6 : i386.qtypes.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 : stddef.size_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 : stddef.size_t;
a3 : void_ptr; a4 : signed_int) return signed_int;
pragma Import (C, inet6_opt_set_val, "inet6_opt_set_val");
function inet6_opt_next (a1 : void_ptr; a2 : stddef.size_t;
a3 : signed_int; a4 : access i386.qtypes.uint8_t;
a5 : access stddef.size_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 : stddef.size_t;
a3 : signed_int; a4 : i386.qtypes.uint8_t; a5 : access stddef.size_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 : stddef.size_t;
a3 : void_ptr; a4 : signed_int) 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 stddef.size_t;
pragma Import (C, inet6_rth_space, "inet6_rth_space");
function inet6_rth_init (a1 : void_ptr; a2 : signed_int; 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;
-- IN6ADDR_ANY_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_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_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 := 42;
IPV6CTL_MRTPROTO : constant := 8;
IPV6CTL_MRTSTATS : constant := 7;
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_TEMPPLTIME : constant := 33;
IPV6CTL_TEMPVLTIME : constant := 34;
IPV6CTL_USETEMPADDR : constant := 32;
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_BINDV6ONLY : constant := 27;
IPV6_CHECKSUM : constant := 26;
IPV6_DEFAULT_MULTICAST_HOPS : constant := 1;
IPV6_DEFAULT_MULTICAST_LOOP : constant := 1;
IPV6_DSTOPTS : constant := 23;
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 := 20;
IPV6_HOPOPTS : constant := 22;
IPV6_IPSEC_POLICY : constant := 28;
IPV6_JOIN_GROUP : constant := 12;
IPV6_LEAVE_GROUP : constant := 13;
IPV6_MULTICAST_HOPS : constant := 10;
IPV6_MULTICAST_IF : constant := 9;
IPV6_MULTICAST_LOOP : constant := 11;
IPV6_NEXTHOP : constant := 21;
IPV6_PKTINFO : constant := 19;
IPV6_PKTOPTIONS : constant := 25;
IPV6_PORTRANGE : constant := 14;
IPV6_PORTRANGE_DEFAULT : constant := 0;
IPV6_PORTRANGE_HIGH : constant := 1;
IPV6_PORTRANGE_LOW : constant := 2;
IPV6_RTHDR : constant := 24;
IPV6_RTHDR_LOOSE : constant := 0;
IPV6_RTHDR_STRICT : constant := 1;
IPV6_RTHDR_TYPE_0 : constant := 0;
IPV6_SOCKOPT_RESERVED1 : constant := 3;
IPV6_UNICAST_HOPS : constant := 4;
IPV6_V6ONLY : constant := 27;
-- SIN6_LEN (empty)
-- _NETINET6_IN6_H_ (empty)
-- __IPV6_ADDR_MC_SCOPE (uninterpretable)
IPV6_ADDR_SCOPE_GLOBAL : constant := 14;
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 .. 21) := "20010528/apple-darwin"
& char'Val (0);
-- __KAME__ (empty)
-- .s6_addr renames .__u6_addr.__u6_addr8 (accessor)
end C.netinet6.in6;
-- This file is translated by "headmaster" version 0.27-2060155 (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 is translated by "headmaster" version 0.27-2060155 (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.poll;
package C.poll is
pragma Preelaborate;
subtype struct_pollfd is sys.poll.struct_pollfd;
subtype nfds_t is sys.poll.nfds_t;
function poll (a1 : access sys.poll.struct_pollfd; a2 : sys.poll.nfds_t;
a3 : signed_int) return signed_int renames sys.poll.poll;
POLLATTRIB : constant := sys.poll.POLLATTRIB;
POLLERR : constant := sys.poll.POLLERR;
POLLEXTEND : constant := sys.poll.POLLEXTEND;
POLLHUP : constant := sys.poll.POLLHUP;
POLLIN : constant := sys.poll.POLLIN;
POLLNLINK : constant := sys.poll.POLLNLINK;
POLLNVAL : constant := sys.poll.POLLNVAL;
POLLOUT : constant := sys.poll.POLLOUT;
POLLPRI : constant := sys.poll.POLLPRI;
POLLRDBAND : constant := sys.poll.POLLRDBAND;
POLLRDNORM : constant := sys.poll.POLLRDNORM;
POLLSTANDARD : constant := sys.poll.POLLSTANDARD;
POLLWRBAND : constant := sys.poll.POLLWRBAND;
POLLWRITE : constant := sys.poll.POLLWRITE;
POLLWRNORM : constant := sys.poll.POLLWRNORM;
-- SYS_POLL_H renames sys.poll.SYS_POLL_H (empty)
end C.poll;
-- This file is translated by "headmaster" version 0.27-2060155 (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.signal;
with C.stddef;
with C.sys.qstructs;
with C.sys.qtypes;
with C.sys.signal;
with C.sys.types;
with C.sys.ucontext;
package C.pthread is
pragma Preelaborate;
sys_signame : char_const_ptr_array renames signal.sys_signame;
sys_siglist : char_const_ptr_array renames signal.sys_siglist;
function C_raise (a1 : signed_int) return signed_int
renames signal.C_raise;
-- bsd_signal renames signal.bsd_signal (anonymous type)
function kill (a1 : sys.types.pid_t; a2 : signed_int) return signed_int
renames signal.kill;
function killpg (a1 : sys.types.pid_t; a2 : signed_int) return signed_int
renames signal.killpg;
function pthread_kill (a1 : access sys.qtypes.struct_opaque_pthread_t;
a2 : signed_int) return signed_int renames signal.pthread_kill;
function pthread_sigmask (a1 : signed_int;
a2 : access constant sys.ucontext.sigset_t;
a3 : access sys.ucontext.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.ucontext.sigset_t; a2 : signed_int)
return signed_int renames signal.sigaddset;
function sigaltstack (a1 : access constant sys.qstructs.stack_t;
a2 : access sys.qstructs.stack_t) return signed_int
renames signal.sigaltstack;
function sigdelset (a1 : access sys.ucontext.sigset_t; a2 : signed_int)
return signed_int renames signal.sigdelset;
function sigemptyset (a1 : access sys.ucontext.sigset_t) return signed_int
renames signal.sigemptyset;
function sigfillset (a1 : access sys.ucontext.sigset_t) return signed_int
renames signal.sigfillset;
function sighold (a1 : signed_int) return signed_int
renames signal.sighold;
function sigignore (a1 : signed_int) return signed_int
renames signal.sigignore;
function siginterrupt (a1 : signed_int; a2 : signed_int) return signed_int
renames signal.siginterrupt;
function sigismember (a1 : access constant sys.ucontext.sigset_t;
a2 : signed_int) return signed_int renames signal.sigismember;
function sigpause (a1 : signed_int) return signed_int
renames signal.sigpause;
function sigpending (a1 : access sys.ucontext.sigset_t) return signed_int
renames signal.sigpending;
function sigprocmask (a1 : signed_int;
a2 : access constant sys.ucontext.sigset_t;
a3 : access sys.ucontext.sigset_t) return signed_int
renames signal.sigprocmask;
function sigrelse (a1 : signed_int) return signed_int
renames signal.sigrelse;
-- sigset renames signal.sigset (anonymous type)
function sigsuspend (a1 : access constant sys.ucontext.sigset_t)
return signed_int renames signal.sigsuspend;
function sigwait (a1 : access constant sys.ucontext.sigset_t;
a2 : access signed_int) return signed_int renames signal.sigwait;
procedure psignal (a1 : unsigned_int; a2 : access constant char)
renames signal.psignal;
function sigblock (a1 : signed_int) return signed_int
renames signal.sigblock;
function sigsetmask (a1 : signed_int) return signed_int
renames signal.sigsetmask;
function sigvec (a1 : signed_int; a2 : access sys.signal.struct_sigvec;
a3 : access sys.signal.struct_sigvec) return signed_int
renames signal.sigvec;
function sigbits (signo : signed_int) return signed_int
renames signal.sigbits;
-- USER_SIGNAL_H renames signal.USER_SIGNAL_H (empty)
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_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 daddr_t is sys.types.daddr_t;
subtype dev_t is sys.types.dev_t;
subtype fixpt_t is sys.types.fixpt_t;
subtype blkcnt_t is sys.types.blkcnt_t;
subtype blksize_t is sys.types.blksize_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 ino_t is sys.types.ino_t;
subtype ino64_t is sys.types.ino64_t;
subtype key_t is sys.types.key_t;
subtype mode_t is sys.types.mode_t;
subtype nlink_t is sys.types.nlink_t;
subtype id_t is sys.types.id_t;
subtype pid_t is sys.types.pid_t;
subtype off_t is sys.types.off_t;
subtype segsz_t is sys.types.segsz_t;
subtype swblk_t is sys.types.swblk_t;
subtype uid_t is sys.types.uid_t;
subtype clock_t is sys.types.clock_t;
subtype ssize_t is sys.types.ssize_t;
subtype time_t is sys.types.time_t;
subtype useconds_t is sys.types.useconds_t;
subtype suseconds_t is sys.types.suseconds_t;
subtype fd_mask is sys.types.fd_mask;
subtype pthread_attr_t is sys.types.pthread_attr_t;
subtype pthread_cond_t is sys.types.pthread_cond_t;
subtype pthread_condattr_t is sys.types.pthread_condattr_t;
subtype pthread_mutex_t is sys.types.pthread_mutex_t;
subtype pthread_mutexattr_t is sys.types.pthread_mutexattr_t;
subtype pthread_once_t is sys.types.pthread_once_t;
subtype pthread_rwlock_t is sys.types.pthread_rwlock_t;
subtype pthread_rwlockattr_t is sys.types.pthread_rwlockattr_t;
subtype pthread_t is sys.types.pthread_t;
subtype pthread_key_t is sys.types.pthread_key_t;
subtype fsblkcnt_t is sys.types.fsblkcnt_t;
subtype fsfilcnt_t is sys.types.fsfilcnt_t;
-- FD_CLR renames sys.types.FD_CLR (uninterpretable)
-- FD_COPY renames sys.types.FD_COPY (unparsible)
-- FD_ISSET renames sys.types.FD_ISSET (function macro)
-- FD_SET renames sys.types.FD_SET (uninterpretable)
FD_SETSIZE : constant := sys.types.FD_SETSIZE;
-- FD_ZERO renames sys.types.FD_ZERO (function macro)
NBBY : constant := sys.types.NBBY;
NFDBITS : constant := sys.types.NFDBITS;
-- qBLKCNT_T renames sys.types.qBLKCNT_T (empty)
-- qBLKSIZE_T renames sys.types.qBLKSIZE_T (empty)
-- qCLOCK_T renames sys.types.qCLOCK_T (empty)
-- qDEV_T renames sys.types.qDEV_T (empty)
-- qFSBLKCNT_T renames sys.types.qFSBLKCNT_T (empty)
-- qFSFILCNT_T renames sys.types.qFSFILCNT_T (empty)
-- qGID_T renames sys.types.qGID_T (empty)
-- qID_T renames sys.types.qID_T (empty)
-- qINO64_T renames sys.types.qINO64_T (empty)
-- qINO_T renames sys.types.qINO_T (empty)
-- qIN_ADDR_T renames sys.types.qIN_ADDR_T (empty)
-- qIN_PORT_T renames sys.types.qIN_PORT_T (empty)
-- qKEY_T renames sys.types.qKEY_T (empty)
-- qMODE_T renames sys.types.qMODE_T (empty)
-- qNLINK_T renames sys.types.qNLINK_T (empty)
-- qOFF_T renames sys.types.qOFF_T (empty)
-- qPID_T renames sys.types.qPID_T (empty)
-- qPTHREAD_ATTR_T renames sys.types.qPTHREAD_ATTR_T (empty)
-- qPTHREAD_CONDATTR_T renames sys.types.qPTHREAD_CONDATTR_T (empty)
-- qPTHREAD_COND_T renames sys.types.qPTHREAD_COND_T (empty)
-- qPTHREAD_KEY_T renames sys.types.qPTHREAD_KEY_T (empty)
-- qPTHREAD_MUTEXATTR_T renames sys.types.qPTHREAD_MUTEXATTR_T (empty)
-- qPTHREAD_MUTEX_T renames sys.types.qPTHREAD_MUTEX_T (empty)
-- qPTHREAD_ONCE_T renames sys.types.qPTHREAD_ONCE_T (empty)
-- qPTHREAD_RWLOCKATTR_T renames sys.types.qPTHREAD_RWLOCKATTR_T (empty)
-- qPTHREAD_RWLOCK_T renames sys.types.qPTHREAD_RWLOCK_T (empty)
-- qPTHREAD_T renames sys.types.qPTHREAD_T (empty)
-- qSSIZE_T renames sys.types.qSSIZE_T (empty)
-- qSUSECONDS_T renames sys.types.qSUSECONDS_T (empty)
-- SYS_TYPES_H renames sys.types.SYS_TYPES_H (empty)
-- qTIME_T renames sys.types.qTIME_T (empty)
-- qUID_T renames sys.types.qUID_T (empty)
-- qUSECONDS_T renames sys.types.qUSECONDS_T (empty)
-- qU_LONG renames sys.types.qU_LONG (empty)
-- howmany renames sys.types.howmany (function macro)
-- major renames sys.types.major (function macro)
-- makedev renames sys.types.makedev (function macro)
-- minor renames sys.types.minor (function macro)
subtype mach_port_t is sys.qtypes.darwin_mach_port_t;
subtype mach_port_t_ptr is sys.qtypes.darwin_mach_port_t_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.types.pthread_attr_t)
return signed_int;
pragma Import (C, pthread_attr_destroy, "pthread_attr_destroy");
function pthread_attr_getdetachstate (
a1 : access constant sys.types.pthread_attr_t; a2 : access signed_int)
return signed_int;
pragma Import (C, pthread_attr_getdetachstate,
"pthread_attr_getdetachstate");
function pthread_attr_getguardsize (
a1 : access constant sys.types.pthread_attr_t;
a2 : access stddef.size_t) return signed_int;
pragma Import (C, pthread_attr_getguardsize, "pthread_attr_getguardsize");
function pthread_attr_getinheritsched (
a1 : access constant sys.types.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.types.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.types.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.types.pthread_attr_t; a2 : access signed_int)
return signed_int;
pragma Import (C, pthread_attr_getscope, "pthread_attr_getscope");
function pthread_attr_getstack (
a1 : access constant sys.types.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_getstackaddr (
a1 : access constant sys.types.pthread_attr_t; a2 : access void_ptr)
return signed_int;
pragma Import (C, pthread_attr_getstackaddr, "pthread_attr_getstackaddr");
function pthread_attr_getstacksize (
a1 : access constant sys.types.pthread_attr_t;
a2 : access stddef.size_t) return signed_int;
pragma Import (C, pthread_attr_getstacksize, "pthread_attr_getstacksize");
function pthread_attr_init (a1 : access sys.types.pthread_attr_t)
return signed_int;
pragma Import (C, pthread_attr_init, "pthread_attr_init");
function pthread_attr_setdetachstate (
a1 : access sys.types.pthread_attr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_attr_setdetachstate,
"pthread_attr_setdetachstate");
function pthread_attr_setguardsize (a1 : access sys.types.pthread_attr_t;
a2 : stddef.size_t) return signed_int;
pragma Import (C, pthread_attr_setguardsize, "pthread_attr_setguardsize");
function pthread_attr_setinheritsched (
a1 : access sys.types.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.types.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.types.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.types.pthread_attr_t;
a2 : signed_int) return signed_int;
pragma Import (C, pthread_attr_setscope, "pthread_attr_setscope");
function pthread_attr_setstack (a1 : access sys.types.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.types.pthread_attr_t;
a2 : void_ptr) return signed_int;
pragma Import (C, pthread_attr_setstackaddr, "pthread_attr_setstackaddr");
function pthread_attr_setstacksize (a1 : access sys.types.pthread_attr_t;
a2 : stddef.size_t) return signed_int;
pragma Import (C, pthread_attr_setstacksize, "pthread_attr_setstacksize");
function pthread_cancel (a1 : access sys.qtypes.struct_opaque_pthread_t)
return signed_int;
pragma Import (C, pthread_cancel, "pthread_cancel$UNIX2003");
function pthread_cond_broadcast (a1 : access sys.types.pthread_cond_t)
return signed_int;
pragma Import (C, pthread_cond_broadcast, "pthread_cond_broadcast");
function pthread_cond_destroy (a1 : access sys.types.pthread_cond_t)
return signed_int;
pragma Import (C, pthread_cond_destroy, "pthread_cond_destroy");
function pthread_cond_init (a1 : access sys.types.pthread_cond_t;
a2 : access constant sys.types.pthread_condattr_t) return signed_int;
pragma Import (C, pthread_cond_init, "pthread_cond_init$UNIX2003");
function pthread_cond_signal (a1 : access sys.types.pthread_cond_t)
return signed_int;
pragma Import (C, pthread_cond_signal, "pthread_cond_signal");
function pthread_cond_timedwait (a1 : access sys.types.pthread_cond_t;
a2 : access sys.types.pthread_mutex_t;
a3 : access constant sys.qstructs.struct_timespec) return signed_int;
pragma Import (C, pthread_cond_timedwait,
"pthread_cond_timedwait$UNIX2003");
function pthread_cond_wait (a1 : access sys.types.pthread_cond_t;
a2 : access sys.types.pthread_mutex_t) return signed_int;
pragma Import (C, pthread_cond_wait, "pthread_cond_wait$UNIX2003");
function pthread_condattr_destroy (
a1 : access sys.types.pthread_condattr_t) return signed_int;
pragma Import (C, pthread_condattr_destroy, "pthread_condattr_destroy");
function pthread_condattr_init (a1 : access sys.types.pthread_condattr_t)
return signed_int;
pragma Import (C, pthread_condattr_init, "pthread_condattr_init");
function pthread_condattr_getpshared (
a1 : access constant sys.types.pthread_condattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_condattr_getpshared,
"pthread_condattr_getpshared");
function pthread_condattr_setpshared (
a1 : access sys.types.pthread_condattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_condattr_setpshared,
"pthread_condattr_setpshared");
type access_f1b30d7d is access function (a1 : void_ptr) return void_ptr;
pragma Convention (C, access_f1b30d7d);
function pthread_create (a1 : access sys.types.pthread_t;
a2 : access constant sys.types.pthread_attr_t; a3 : access_f1b30d7d;
a4 : void_ptr) return signed_int;
pragma Import (C, pthread_create, "pthread_create");
function pthread_detach (a1 : access sys.qtypes.struct_opaque_pthread_t)
return signed_int;
pragma Import (C, pthread_detach, "pthread_detach");
function pthread_equal (a1 : access sys.qtypes.struct_opaque_pthread_t;
a2 : access sys.qtypes.struct_opaque_pthread_t) return signed_int;
pragma Import (C, pthread_equal, "pthread_equal");
type access_8caec3e7 is access procedure (a1 : void_ptr);
pragma Convention (C, access_8caec3e7);
procedure pthread_exit (a1 : void_ptr);
pragma No_Return (pthread_exit);
pragma Import (C, pthread_exit, "pthread_exit");
function pthread_getconcurrency return signed_int;
pragma Import (C, pthread_getconcurrency, "pthread_getconcurrency");
function pthread_getschedparam (
a1 : access sys.qtypes.struct_opaque_pthread_t; a2 : access signed_int;
a3 : access sched.struct_sched_param) return signed_int;
pragma Import (C, pthread_getschedparam, "pthread_getschedparam");
function pthread_getspecific (a1 : sys.types.pthread_key_t)
return void_ptr;
pragma Import (C, pthread_getspecific, "pthread_getspecific");
function pthread_join (a1 : access sys.qtypes.struct_opaque_pthread_t;
a2 : access void_ptr) return signed_int;
pragma Import (C, pthread_join, "pthread_join$UNIX2003");
function pthread_key_create (a1 : access sys.types.pthread_key_t;
a2 : access_8caec3e7) return signed_int;
pragma Import (C, pthread_key_create, "pthread_key_create");
function pthread_key_delete (a1 : sys.types.pthread_key_t)
return signed_int;
pragma Import (C, pthread_key_delete, "pthread_key_delete");
function pthread_mutex_destroy (a1 : access sys.types.pthread_mutex_t)
return signed_int;
pragma Import (C, pthread_mutex_destroy, "pthread_mutex_destroy");
function pthread_mutex_getprioceiling (
a1 : access constant sys.types.pthread_mutex_t; a2 : access signed_int)
return signed_int;
pragma Import (C, pthread_mutex_getprioceiling,
"pthread_mutex_getprioceiling");
function pthread_mutex_init (a1 : access sys.types.pthread_mutex_t;
a2 : access constant sys.types.pthread_mutexattr_t) return signed_int;
pragma Import (C, pthread_mutex_init, "pthread_mutex_init");
function pthread_mutex_lock (a1 : access sys.types.pthread_mutex_t)
return signed_int;
pragma Import (C, pthread_mutex_lock, "pthread_mutex_lock");
function pthread_mutex_setprioceiling (
a1 : access sys.types.pthread_mutex_t; a2 : signed_int;
a3 : access signed_int) return signed_int;
pragma Import (C, pthread_mutex_setprioceiling,
"pthread_mutex_setprioceiling");
function pthread_mutex_trylock (a1 : access sys.types.pthread_mutex_t)
return signed_int;
pragma Import (C, pthread_mutex_trylock, "pthread_mutex_trylock");
function pthread_mutex_unlock (a1 : access sys.types.pthread_mutex_t)
return signed_int;
pragma Import (C, pthread_mutex_unlock, "pthread_mutex_unlock");
function pthread_mutexattr_destroy (
a1 : access sys.types.pthread_mutexattr_t) return signed_int;
pragma Import (C, pthread_mutexattr_destroy,
"pthread_mutexattr_destroy$UNIX2003");
function pthread_mutexattr_getprioceiling (
a1 : access constant sys.types.pthread_mutexattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_mutexattr_getprioceiling,
"pthread_mutexattr_getprioceiling");
function pthread_mutexattr_getprotocol (
a1 : access constant sys.types.pthread_mutexattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_mutexattr_getprotocol,
"pthread_mutexattr_getprotocol");
function pthread_mutexattr_getpshared (
a1 : access constant sys.types.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 constant sys.types.pthread_mutexattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_mutexattr_gettype, "pthread_mutexattr_gettype");
function pthread_mutexattr_init (
a1 : access sys.types.pthread_mutexattr_t) return signed_int;
pragma Import (C, pthread_mutexattr_init, "pthread_mutexattr_init");
function pthread_mutexattr_setprioceiling (
a1 : access sys.types.pthread_mutexattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_mutexattr_setprioceiling,
"pthread_mutexattr_setprioceiling");
function pthread_mutexattr_setprotocol (
a1 : access sys.types.pthread_mutexattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_mutexattr_setprotocol,
"pthread_mutexattr_setprotocol");
function pthread_mutexattr_setpshared (
a1 : access sys.types.pthread_mutexattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_mutexattr_setpshared,
"pthread_mutexattr_setpshared");
function pthread_mutexattr_settype (
a1 : access sys.types.pthread_mutexattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_mutexattr_settype, "pthread_mutexattr_settype");
function pthread_once (a1 : access sys.types.pthread_once_t;
a2 : access_e823f645) return signed_int;
pragma Import (C, pthread_once, "pthread_once");
function pthread_rwlock_destroy (a1 : access sys.types.pthread_rwlock_t)
return signed_int;
pragma Import (C, pthread_rwlock_destroy,
"pthread_rwlock_destroy$UNIX2003");
function pthread_rwlock_init (a1 : access sys.types.pthread_rwlock_t;
a2 : access constant sys.types.pthread_rwlockattr_t) return signed_int;
pragma Import (C, pthread_rwlock_init, "pthread_rwlock_init$UNIX2003");
function pthread_rwlock_rdlock (a1 : access sys.types.pthread_rwlock_t)
return signed_int;
pragma Import (C, pthread_rwlock_rdlock,
"pthread_rwlock_rdlock$UNIX2003");
function pthread_rwlock_tryrdlock (a1 : access sys.types.pthread_rwlock_t)
return signed_int;
pragma Import (C, pthread_rwlock_tryrdlock,
"pthread_rwlock_tryrdlock$UNIX2003");
function pthread_rwlock_trywrlock (a1 : access sys.types.pthread_rwlock_t)
return signed_int;
pragma Import (C, pthread_rwlock_trywrlock,
"pthread_rwlock_trywrlock$UNIX2003");
function pthread_rwlock_wrlock (a1 : access sys.types.pthread_rwlock_t)
return signed_int;
pragma Import (C, pthread_rwlock_wrlock,
"pthread_rwlock_wrlock$UNIX2003");
function pthread_rwlock_unlock (a1 : access sys.types.pthread_rwlock_t)
return signed_int;
pragma Import (C, pthread_rwlock_unlock,
"pthread_rwlock_unlock$UNIX2003");
function pthread_rwlockattr_destroy (
a1 : access sys.types.pthread_rwlockattr_t) return signed_int;
pragma Import (C, pthread_rwlockattr_destroy,
"pthread_rwlockattr_destroy");
function pthread_rwlockattr_getpshared (
a1 : access constant sys.types.pthread_rwlockattr_t;
a2 : access signed_int) return signed_int;
pragma Import (C, pthread_rwlockattr_getpshared,
"pthread_rwlockattr_getpshared");
function pthread_rwlockattr_init (
a1 : access sys.types.pthread_rwlockattr_t) return signed_int;
pragma Import (C, pthread_rwlockattr_init, "pthread_rwlockattr_init");
function pthread_rwlockattr_setpshared (
a1 : access sys.types.pthread_rwlockattr_t; a2 : signed_int)
return signed_int;
pragma Import (C, pthread_rwlockattr_setpshared,
"pthread_rwlockattr_setpshared");
function pthread_self return sys.types.pthread_t;
pragma Import (C, pthread_self, "pthread_self");
function pthread_setcancelstate (a1 : signed_int; a2 : access signed_int)
return signed_int;
pragma Import (C, pthread_setcancelstate,
"pthread_setcancelstate$UNIX2003");
function pthread_setcanceltype (a1 : signed_int; a2 : access signed_int)
return signed_int;
pragma Import (C, pthread_setcanceltype,
"pthread_setcanceltype$UNIX2003");
function pthread_setconcurrency (a1 : signed_int) return signed_int;
pragma Import (C, pthread_setconcurrency, "pthread_setconcurrency");
function pthread_setschedparam (
a1 : access sys.qtypes.struct_opaque_pthread_t; a2 : signed_int;
a3 : access constant sched.struct_sched_param) return signed_int;
pragma Import (C, pthread_setschedparam, "pthread_setschedparam");
function pthread_setspecific (a1 : sys.types.pthread_key_t;
a2 : void_const_ptr) return signed_int;
pragma Import (C, pthread_setspecific, "pthread_setspecific");
procedure pthread_testcancel;
pragma Import (C, pthread_testcancel, "pthread_testcancel$UNIX2003");
function pthread_is_threaded_np return signed_int;
pragma Import (C, pthread_is_threaded_np, "pthread_is_threaded_np");
function pthread_main_np return signed_int;
pragma Import (C, pthread_main_np, "pthread_main_np");
function pthread_mach_thread_np (
a1 : access sys.qtypes.struct_opaque_pthread_t) return mach_port_t;
pragma Import (C, pthread_mach_thread_np, "pthread_mach_thread_np");
function pthread_get_stacksize_np (
a1 : access sys.qtypes.struct_opaque_pthread_t) return stddef.size_t;
pragma Import (C, pthread_get_stacksize_np, "pthread_get_stacksize_np");
function pthread_get_stackaddr_np (
a1 : access sys.qtypes.struct_opaque_pthread_t) return void_ptr;
pragma Import (C, pthread_get_stackaddr_np, "pthread_get_stackaddr_np");
function pthread_cond_signal_thread_np (
a1 : access sys.types.pthread_cond_t;
a2 : access sys.qtypes.struct_opaque_pthread_t) return signed_int;
pragma Import (C, pthread_cond_signal_thread_np,
"pthread_cond_signal_thread_np");
function pthread_cond_timedwait_relative_np (
a1 : access sys.types.pthread_cond_t;
a2 : access sys.types.pthread_mutex_t;
a3 : access constant sys.qstructs.struct_timespec) return signed_int;
pragma Import (C, pthread_cond_timedwait_relative_np,
"pthread_cond_timedwait_relative_np");
function pthread_create_suspended_np (a1 : access sys.types.pthread_t;
a2 : access constant sys.types.pthread_attr_t; a3 : access_f1b30d7d;
a4 : void_ptr) return signed_int;
pragma Import (C, pthread_create_suspended_np,
"pthread_create_suspended_np");
function pthread_from_mach_thread_np (a1 : mach_port_t)
return sys.types.pthread_t;
pragma Import (C, pthread_from_mach_thread_np,
"pthread_from_mach_thread_np");
procedure pthread_yield_np;
pragma Import (C, pthread_yield_np, "pthread_yield_np");
PTHREAD_CANCELED : constant void_ptr := void_ptr (System'To_Address (1));
PTHREAD_CANCEL_ASYNCHRONOUS : constant := 0;
PTHREAD_CANCEL_DEFERRED : constant := 2;
PTHREAD_CANCEL_DISABLE : constant := 0;
PTHREAD_CANCEL_ENABLE : constant := 1;
PTHREAD_COND_INITIALIZER : constant sys.types.pthread_cond_t := (
sig => signed_long'(1018212795),
opaque => (char'Val (0), others => char'Val (0)));
PTHREAD_CREATE_DETACHED : constant := 2;
PTHREAD_CREATE_JOINABLE : constant := 1;
PTHREAD_EXPLICIT_SCHED : constant := 2;
PTHREAD_INHERIT_SCHED : constant := 1;
PTHREAD_MUTEX_DEFAULT : constant := 0;
PTHREAD_MUTEX_ERRORCHECK : constant := 1;
PTHREAD_MUTEX_INITIALIZER : constant sys.types.pthread_mutex_t := (
sig => signed_long'(850045863),
opaque => (char'Val (0), others => char'Val (0)));
PTHREAD_MUTEX_NORMAL : constant := 0;
PTHREAD_MUTEX_RECURSIVE : constant := 2;
PTHREAD_ONCE_INIT : constant sys.types.pthread_once_t := (
sig => signed_long'(816954554),
opaque => (char'Val (0), others => char'Val (0)));
PTHREAD_PRIO_INHERIT : constant := 1;
PTHREAD_PRIO_NONE : constant := 0;
PTHREAD_PRIO_PROTECT : constant := 2;
PTHREAD_PROCESS_PRIVATE : constant := 2;
PTHREAD_PROCESS_SHARED : constant := 1;
PTHREAD_RWLOCK_INITIALIZER : constant sys.types.pthread_rwlock_t := (
sig => signed_long'(766030772),
opaque => (char'Val (0), others => char'Val (0)));
PTHREAD_SCOPE_PROCESS : constant := 2;
PTHREAD_SCOPE_SYSTEM : constant := 1;
-- _MACH_PORT_T (empty)
-- _PTHREAD_H (empty)
-- pthread_cleanup_pop (unparsible)
-- pthread_cleanup_push (unparsible)
end C.pthread;
-- This file is translated by "headmaster" version 0.27-2060155 (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.pthread_impl is
pragma Preelaborate;
SCHED_FIFO : constant := 4;
SCHED_OTHER : constant := 1;
SCHED_RR : constant := 2;
PTHREAD_COND_SIG_init : constant := 1018212795;
-- _PTHREAD_IMPL_H_ (empty)
PTHREAD_MUTEX_SIG_init : constant := 850045863;
PTHREAD_ONCE_SIG_init : constant := 816954554;
PTHREAD_RWLOCK_SIG_init : constant := 766030772;
SCHED_PARAM_SIZE : constant := 4;
end C.pthread_impl;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
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 i386.qtypes.darwin_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 i386.qtypes.darwin_time_t;
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 getpwuid (a1 : sys.types.uid_t) return struct_passwd_ptr;
pragma Import (C, getpwuid, "getpwuid");
function getpwnam (a1 : access constant char) return struct_passwd_ptr;
pragma Import (C, getpwnam, "getpwnam");
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 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 getpwent return struct_passwd_ptr;
pragma Import (C, getpwent, "getpwent");
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_ptr;
pragma Import (C, user_from_uid, "user_from_uid");
procedure setpwent;
pragma Import (C, setpwent, "setpwent");
procedure endpwent;
pragma Import (C, endpwent, "endpwent");
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_CHGNOW : constant := -1;
PASSWORD_EFMT1 : constant char := '_';
PASSWORD_LEN : constant := 128;
PASSWORD_NOCHG : constant := 4;
PASSWORD_NOEXP : constant := 8;
PASSWORD_NOGID : constant := 2;
PASSWORD_NOUID : constant := 1;
PASSWORD_WARNDAYS : constant := 14;
PATH_MASTERPASSWD : constant char_array (0 .. 18) := "/etc/master.passwd"
& char'Val (0);
PATH_MASTERPASSWD_LOCK : constant char_array (0 .. 9) := "/etc/ptmp"
& 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_H_ (empty)
PW_KEYBYNAME : constant char := '1';
PW_KEYBYNUM : constant char := '2';
PW_KEYBYUID : constant char := '3';
SMP_DB : constant char_array (0 .. 7) := "spwd.db" & char'Val (0);
end C.pwd;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qtypes is
pragma Preelaborate;
subtype darwin_nl_item is signed_int;
subtype darwin_wctrans_t is signed_int;
subtype darwin_wctype_t is unsigned_long;
DARWIN_WCHAR_MAX : constant := 2147483647;
DARWIN_WCHAR_MIN : constant := -2147483648;
DARWIN_WEOF : constant := -1;
-- __TYPES_H_ (empty)
end C.qtypes;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
with C.qtypes;
package C.qwctype is
pragma Preelaborate;
subtype wint_t is i386.qtypes.darwin_wint_t;
subtype wctype_t is qtypes.darwin_wctype_t;
-- #include <runetype.h>
-- #include <ctype.h>
function iswalnum (a1 : wint_t) return signed_int;
pragma Import (C, iswalnum, "iswalnum");
function iswalpha (a1 : wint_t) return signed_int;
pragma Import (C, iswalpha, "iswalpha");
function iswcntrl (a1 : wint_t) return signed_int;
pragma Import (C, iswcntrl, "iswcntrl");
function iswctype (a1 : wint_t; a2 : wctype_t) return signed_int;
pragma Import (C, iswctype, "iswctype");
function iswdigit (a1 : wint_t) return signed_int;
pragma Import (C, iswdigit, "iswdigit");
function iswgraph (a1 : wint_t) return signed_int;
pragma Import (C, iswgraph, "iswgraph");
function iswlower (a1 : wint_t) return signed_int;
pragma Import (C, iswlower, "iswlower");
function iswprint (a1 : wint_t) return signed_int;
pragma Import (C, iswprint, "iswprint");
function iswpunct (a1 : wint_t) return signed_int;
pragma Import (C, iswpunct, "iswpunct");
function iswspace (a1 : wint_t) return signed_int;
pragma Import (C, iswspace, "iswspace");
function iswupper (a1 : wint_t) return signed_int;
pragma Import (C, iswupper, "iswupper");
function iswxdigit (a1 : wint_t) return signed_int;
pragma Import (C, iswxdigit, "iswxdigit");
function towlower (a1 : wint_t) return wint_t;
pragma Import (C, towlower, "towlower");
function towupper (a1 : wint_t) return wint_t;
pragma Import (C, towupper, "towupper");
function wctype (a1 : access constant char) return wctype_t;
pragma Import (C, wctype, "wctype");
WEOF : constant := -1;
-- _WCTYPE_T (empty)
-- _WINT_T (empty)
-- __DARWIN_WCTYPE_TOP_static_inline (alias of static inline)
-- __WCTYPE_H_ (empty)
end C.qwctype;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
package C.runetype is
pragma Preelaborate;
type struct_dc03de65 is record
min : aliased i386.qtypes.darwin_rune_t;
max : aliased i386.qtypes.darwin_rune_t;
map : aliased i386.qtypes.darwin_rune_t;
types : aliased i386.qtypes.uint32_t_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_dc03de65);
type struct_dc03de65_ptr is access all struct_dc03de65;
for struct_dc03de65_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_dc03de65_ptr);
pragma Convention (C, struct_dc03de65_ptr);
subtype RuneEntry is struct_dc03de65;
subtype RuneEntry_ptr is struct_dc03de65_ptr;
type struct_e21c64d9 is record
nranges : aliased signed_int;
ranges : aliased RuneEntry_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_e21c64d9);
subtype RuneRange is struct_e21c64d9;
type struct_0068dd03 is record
name : aliased char_array (0 .. 13);
mask : aliased i386.qtypes.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_0068dd03);
type struct_0068dd03_ptr is access all struct_0068dd03;
for struct_0068dd03_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_0068dd03_ptr);
pragma Convention (C, struct_0068dd03_ptr);
subtype RuneCharClass is struct_0068dd03;
subtype RuneCharClass_ptr is struct_0068dd03_ptr;
type access_ff0f889e is access function (a1 : access constant char;
a2 : i386.qtypes.darwin_size_t; a3 : access char_const_ptr)
return i386.qtypes.darwin_rune_t;
pragma Convention (C, access_ff0f889e);
type access_54e10910 is access function (a1 : i386.qtypes.darwin_rune_t;
a2 : access char; a3 : i386.qtypes.darwin_size_t; a4 : access char_ptr)
return signed_int;
pragma Convention (C, access_54e10910);
type struct_68881584 is record
magic : aliased char_array (0 .. 7);
encoding : aliased char_array (0 .. 31);
sgetrune : aliased access_ff0f889e;
sputrune : aliased access_54e10910;
invalid_rune : aliased i386.qtypes.darwin_rune_t;
runetype : aliased i386.qtypes.uint32_t_array (0 .. 255);
maplower : aliased i386.qtypes.darwin_rune_t_array (0 .. 255);
mapupper : aliased i386.qtypes.darwin_rune_t_array (0 .. 255);
runetype_ext : aliased RuneRange;
maplower_ext : aliased RuneRange;
mapupper_ext : aliased RuneRange;
variable : aliased void_ptr;
variable_len : aliased signed_int;
ncharclasses : aliased signed_int;
charclasses : aliased RuneCharClass_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_68881584);
type struct_68881584_ptr is access all struct_68881584;
for struct_68881584_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_68881584_ptr);
pragma Convention (C, struct_68881584_ptr);
subtype RuneLocale is struct_68881584;
subtype RuneLocale_ptr is struct_68881584_ptr;
DefaultRuneLocale : aliased RuneLocale;
pragma Import (C, DefaultRuneLocale, "_DefaultRuneLocale");
CurrentRuneLocale : aliased RuneLocale_ptr;
pragma Import (C, CurrentRuneLocale, "_CurrentRuneLocale");
CACHED_RUNES : constant := 256;
CRMASK : constant := -256;
-- _RUNETYPE_H_ (empty)
RUNE_MAGIC_A : constant char_array (0 .. 8) := "RuneMagA" & char'Val (0);
end C.runetype;
-- This file is translated by "headmaster" version 0.27-2060155 (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.sched is
pragma Preelaborate;
type struct_sched_param;
type struct_sched_param is record
sched_priority : aliased signed_int;
opaque : aliased char_array (0 .. 3);
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_yield return signed_int;
pragma Import (C, sched_yield, "sched_yield");
function sched_get_priority_min (a1 : signed_int) return signed_int;
pragma Import (C, sched_get_priority_min, "sched_get_priority_min");
function sched_get_priority_max (a1 : signed_int) return signed_int;
pragma Import (C, sched_get_priority_max, "sched_get_priority_max");
-- _SCHED_H_ (empty)
end C.sched;
-- This file is translated by "headmaster" version 0.27-2060155 (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.signal is
function sigbits (signo : signed_int) return signed_int is
begin
declare
function Cond_a33908c1 return signed_int;
function Cond_a33908c1 return signed_int is
begin
if signo > 32 then
return 0;
else
return signed_int'(Shift_Left (1, Natural (signo - 1)));
end if;
end Cond_a33908c1;
begin
return Cond_a33908c1;
end;
end sigbits;
end C.signal;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qstructs;
with C.sys.qtypes;
with C.sys.signal;
with C.sys.types;
with C.sys.ucontext;
package C.signal is
pragma Preelaborate;
subtype struct_fd_set is sys.qstructs.struct_fd_set;
subtype fd_set is sys.qstructs.fd_set;
function qqdarwin_fd_isset (n : signed_int;
p : access sys.qstructs.struct_fd_set) return signed_int
renames sys.qstructs.qqdarwin_fd_isset;
subtype struct_darwin_sigaltstack is
sys.qstructs.struct_darwin_sigaltstack;
subtype struct_darwin_ucontext is sys.qstructs.struct_darwin_ucontext;
subtype stack_t is sys.qstructs.stack_t;
subtype ucontext_t is sys.qstructs.ucontext_t;
subtype struct_timespec is sys.qstructs.struct_timespec;
subtype struct_timeval is sys.qstructs.struct_timeval;
-- qFD_SET renames sys.qstructs.qFD_SET (empty)
-- qSTACK_T renames sys.qstructs.qSTACK_T (empty)
subtype STRUCT_SIGALTSTACK is sys.qstructs.struct_darwin_sigaltstack;
subtype qSTRUCT_TIMESPEC is sys.qstructs.struct_timespec;
subtype qSTRUCT_TIMEVAL is sys.qstructs.struct_timeval;
subtype STRUCT_UCONTEXT is sys.qstructs.struct_darwin_ucontext;
-- qUCONTEXT_T renames sys.qstructs.qUCONTEXT_T (empty)
-- DARWIN_FD_CLR renames sys.qstructs.DARWIN_FD_CLR (uninterpretable)
-- DARWIN_FD_COPY renames sys.qstructs.DARWIN_FD_COPY (unparsible)
-- qqDARWIN_FD_ISSET renames sys.qstructs.qqDARWIN_FD_I... (function macro)
-- DARWIN_FD_SET renames sys.qstructs.DARWIN_FD_SET (uninterpretable)
DARWIN_FD_SETSIZE : constant := sys.qstructs.DARWIN_FD_SETSIZE;
-- DARWIN_FD_ZERO renames sys.qstructs.DARWIN_FD_ZERO (function macro)
DARWIN_NBBY : constant := sys.qstructs.DARWIN_NBBY;
DARWIN_NFDBITS : constant := sys.qstructs.DARWIN_NFDBITS;
-- DARWIN_howmany renames sys.qstructs.DARWIN_howmany (function macro)
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 union_sigaction_u is sys.signal.union_sigaction_u;
subtype struct_qqsigaction is sys.signal.struct_qqsigaction;
subtype struct_sigaction is sys.signal.struct_sigaction;
subtype sig_t is sys.signal.sig_t;
subtype struct_sigvec is sys.signal.struct_sigvec;
subtype struct_sigstack is sys.signal.struct_sigstack;
-- signal renames sys.signal.signal (anonymous type)
function BADSIG (Value : signed_int := -1)
return sys.signal.access_4b83281c renames sys.signal.BADSIG;
BUS_ADRALN : constant := sys.signal.BUS_ADRALN;
BUS_ADRERR : constant := sys.signal.BUS_ADRERR;
BUS_NOOP : constant := sys.signal.BUS_NOOP;
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_NOOP : constant := sys.signal.CLD_NOOP;
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;
FPE_NOOP : constant := sys.signal.FPE_NOOP;
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_NOOP : constant := sys.signal.ILL_NOOP;
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_64REGSET : constant := sys.signal.SA_64REGSET;
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;
SA_USERSPACE_MASK : constant := sys.signal.SA_USERSPACE_MASK;
SA_USERTRAMP : constant := sys.signal.SA_USERTRAMP;
SEGV_ACCERR : constant := sys.signal.SEGV_ACCERR;
SEGV_MAPERR : constant := sys.signal.SEGV_MAPERR;
SEGV_NOOP : constant := sys.signal.SEGV_NOOP;
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_NONE : constant := sys.signal.SIGEV_NONE;
SIGEV_SIGNAL : constant := sys.signal.SIGEV_SIGNAL;
SIGEV_THREAD : constant := sys.signal.SIGEV_THREAD;
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;
SIGPIPE : constant := sys.signal.SIGPIPE;
SIGPROF : constant := sys.signal.SIGPROF;
SIGQUIT : constant := sys.signal.SIGQUIT;
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;
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.access_4b83281c renames sys.signal.SIG_DFL;
function SIG_ERR (Value : signed_int := -1)
return sys.signal.access_4b83281c renames sys.signal.SIG_ERR;
function SIG_HOLD (Value : signed_int := 5)
return sys.signal.access_4b83281c renames sys.signal.SIG_HOLD;
function SIG_IGN (Value : signed_int := 1)
return sys.signal.access_4b83281c 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_MESGQ : constant := sys.signal.SI_MESGQ;
SI_QUEUE : constant := sys.signal.SI_QUEUE;
SI_TIMER : constant := sys.signal.SI_TIMER;
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_TRACE : constant := sys.signal.TRAP_TRACE;
-- SYS_SIGNAL_H renames sys.signal.SYS_SIGNAL_H (empty)
DARWIN_NSIG : constant := sys.signal.DARWIN_NSIG;
-- .sa_handler renames .__sigaction_u.__sa_handler (accessor)
-- .sa_sigaction renames .__sigaction_u.__sa_sigaction (accessor)
-- sigmask renames sys.signal.sigmask (function macro)
-- .sigvec_sv_onstack renames .sv_flags (accessor)
subtype sigset_t is sys.ucontext.sigset_t;
-- qSIGSET_T renames sys.ucontext.qSIGSET_T (empty)
-- SYS_UCONTEXT_H renames sys.ucontext.SYS_UCONTEXT_H (empty)
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");
function C_raise (a1 : signed_int) return signed_int;
pragma Import (C, C_raise, "raise");
type access_2d945a35 is access procedure (a1 : signed_int);
pragma Convention (C, access_2d945a35);
function bsd_signal (a1 : signed_int; a2 : access_2d945a35)
return access_2d945a35;
pragma Import (C, bsd_signal, "bsd_signal");
function kill (a1 : sys.types.pid_t; a2 : signed_int) return signed_int;
pragma Import (C, kill, "kill$UNIX2003");
function killpg (a1 : sys.types.pid_t; a2 : signed_int) return signed_int;
pragma Import (C, killpg, "killpg$UNIX2003");
function pthread_kill (a1 : access sys.qtypes.struct_opaque_pthread_t;
a2 : signed_int) return signed_int;
pragma Import (C, pthread_kill, "pthread_kill");
function pthread_sigmask (a1 : signed_int;
a2 : access constant sys.ucontext.sigset_t;
a3 : access sys.ucontext.sigset_t) return signed_int;
pragma Import (C, pthread_sigmask, "pthread_sigmask$UNIX2003");
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.ucontext.sigset_t; a2 : signed_int)
return signed_int;
pragma Import (C, sigaddset, "sigaddset");
function sigaltstack (a1 : access constant sys.qstructs.stack_t;
a2 : access sys.qstructs.stack_t) return signed_int;
pragma Import (C, sigaltstack, "sigaltstack$UNIX2003");
function sigdelset (a1 : access sys.ucontext.sigset_t; a2 : signed_int)
return signed_int;
pragma Import (C, sigdelset, "sigdelset");
function sigemptyset (a1 : access sys.ucontext.sigset_t)
return signed_int;
pragma Import (C, sigemptyset, "sigemptyset");
function sigfillset (a1 : access sys.ucontext.sigset_t) return signed_int;
pragma Import (C, sigfillset, "sigfillset");
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 siginterrupt (a1 : signed_int; a2 : signed_int)
return signed_int;
pragma Import (C, siginterrupt, "siginterrupt");
function sigismember (a1 : access constant sys.ucontext.sigset_t;
a2 : signed_int) return signed_int;
pragma Import (C, sigismember, "sigismember");
function sigpause (a1 : signed_int) return signed_int;
pragma Import (C, sigpause, "sigpause$UNIX2003");
function sigpending (a1 : access sys.ucontext.sigset_t) return signed_int;
pragma Import (C, sigpending, "sigpending");
function sigprocmask (a1 : signed_int;
a2 : access constant sys.ucontext.sigset_t;
a3 : access sys.ucontext.sigset_t) return signed_int;
pragma Import (C, sigprocmask, "sigprocmask");
function sigrelse (a1 : signed_int) return signed_int;
pragma Import (C, sigrelse, "sigrelse");
function sigset (a1 : signed_int; a2 : access_2d945a35)
return access_2d945a35;
pragma Import (C, sigset, "sigset");
function sigsuspend (a1 : access constant sys.ucontext.sigset_t)
return signed_int;
pragma Import (C, sigsuspend, "sigsuspend$UNIX2003");
function sigwait (a1 : access constant sys.ucontext.sigset_t;
a2 : access signed_int) return signed_int;
pragma Import (C, sigwait, "sigwait$UNIX2003");
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 sigsetmask (a1 : signed_int) return signed_int;
pragma Import (C, sigsetmask, "sigsetmask");
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");
function sigbits (signo : signed_int) return signed_int;
pragma Convention (C, sigbits);
pragma Inline (sigbits);
-- _USER_SIGNAL_H (empty)
end C.signal;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.exception_types;
with C.mach.machine;
with C.mach.thread_status;
with C.pthread;
with C.stddef;
with C.sys.types;
with C.sys.ucontext;
package C.spawn is
pragma Preelaborate;
subtype posix_spawnattr_t is void_ptr;
subtype posix_spawnattr_t_const_ptr is void_ptr_const_ptr;
subtype posix_spawnattr_t_ptr is void_ptr_ptr;
subtype posix_spawn_file_actions_t is void_ptr;
subtype posix_spawn_file_actions_t_const_ptr is void_ptr_const_ptr;
subtype posix_spawn_file_actions_t_ptr is void_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; argv : access char_ptr;
envp : 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; argv : access char_ptr;
envp : access char_ptr) return signed_int;
pragma Import (C, posix_spawnp, "posix_spawnp");
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_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_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_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_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_spawnattr_destroy (a1 : access posix_spawnattr_t)
return signed_int;
pragma Import (C, posix_spawnattr_destroy, "posix_spawnattr_destroy");
function posix_spawnattr_getsigdefault (
a1 : access constant posix_spawnattr_t;
a2 : access sys.ucontext.sigset_t) return signed_int;
pragma Import (C, posix_spawnattr_getsigdefault,
"posix_spawnattr_getsigdefault");
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_getsigmask (
a1 : access constant posix_spawnattr_t;
a2 : access sys.ucontext.sigset_t) return signed_int;
pragma Import (C, posix_spawnattr_getsigmask,
"posix_spawnattr_getsigmask");
function posix_spawnattr_init (a1 : access posix_spawnattr_t)
return signed_int;
pragma Import (C, posix_spawnattr_init, "posix_spawnattr_init");
function posix_spawnattr_setsigdefault (a1 : access posix_spawnattr_t;
a2 : access constant sys.ucontext.sigset_t) return signed_int;
pragma Import (C, posix_spawnattr_setsigdefault,
"posix_spawnattr_setsigdefault");
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_setsigmask (a1 : access posix_spawnattr_t;
a2 : access constant sys.ucontext.sigset_t) return signed_int;
pragma Import (C, posix_spawnattr_setsigmask,
"posix_spawnattr_setsigmask");
-- #include <mach/i386/vm_types.h>
-- #include <mach/port.h>
-- #include <mach/i386/kern_return.h>
-- #include <mach/message.h>
-- #include <mach/i386/fp_reg.h>
-- #include <mach/i386/thread_status.h>
-- #include <mach/thread_status.h>
-- #include <mach/exception_types.h>
-- #include <mach/machine.h>
function posix_spawnattr_getbinpref_np (
a1 : access constant posix_spawnattr_t; a2 : stddef.size_t;
a3 : access mach.machine.cpu_type_t; a4 : access stddef.size_t)
return signed_int;
pragma Import (C, posix_spawnattr_getbinpref_np,
"posix_spawnattr_getbinpref_np");
function posix_spawnattr_setbinpref_np (a1 : access posix_spawnattr_t;
a2 : stddef.size_t; a3 : access mach.machine.cpu_type_t;
a4 : access stddef.size_t) return signed_int;
pragma Import (C, posix_spawnattr_setbinpref_np,
"posix_spawnattr_setbinpref_np");
function posix_spawnattr_setspecialport_np (a1 : access posix_spawnattr_t;
a2 : pthread.mach_port_t; a3 : signed_int) return signed_int;
pragma Import (C, posix_spawnattr_setspecialport_np,
"posix_spawnattr_setspecialport_np");
function posix_spawnattr_setexceptionports_np (
a1 : access posix_spawnattr_t;
a2 : mach.exception_types.exception_mask_t; a3 : pthread.mach_port_t;
a4 : mach.exception_types.exception_behavior_t;
a5 : mach.thread_status.thread_state_flavor_t) return signed_int;
pragma Import (C, posix_spawnattr_setexceptionports_np,
"posix_spawnattr_setexceptionports_np");
-- _SPAWN_H_ (empty)
end C.spawn;
-- This file is translated by "headmaster" version 0.27-2060155 (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.stdarg is
pragma Preelaborate;
subtype qqgnuc_va_list is builtin_va_list;
subtype va_list is qqgnuc_va_list;
-- _ANSI_STDARG_H_ (empty)
-- _STDARG_H (empty)
-- _VA_LIST (empty)
-- _VA_LIST_ (empty)
-- _VA_LIST_DEFINED (empty)
-- _VA_LIST_T_H (empty)
-- __GNUC_VA_LIST (empty)
-- __va_copy (function macro)
-- __va_list__ (empty)
-- va_arg (function macro)
-- va_copy (function macro)
-- va_end (function macro)
-- va_start (function macro)
end C.stdarg;
-- This file is translated by "headmaster" version 0.27-2060155 (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.stdbool is
pragma Preelaborate;
-- _STDBOOL_H (empty)
bool_true_false_are_defined : constant := 1;
subtype bool is Standard.C.bool;
false : constant := 0;
true : constant := 1;
end C.stdbool;
-- This file is translated by "headmaster" version 0.27-2060155 (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.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 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)
-- _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)
-- __size_t__ (empty)
-- __wchar_t__ (empty)
-- offsetof (unparsible)
end C.stddef;
-- This file is translated by "headmaster" version 0.27-2060155 (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.stdint is
pragma Preelaborate;
-- _GCC_WRAP_STDINT_H (empty)
subtype int8_t is signed_char;
subtype int16_t is signed_short;
subtype int32_t is signed_int;
subtype int32_t_array is signed_int_array;
subtype int64_t is signed_long_long;
subtype int64_t_ptr is signed_long_long_ptr;
subtype uint8_t is unsigned_char;
subtype uint8_t_array is unsigned_char_array;
subtype uint16_t is unsigned_short;
subtype uint32_t is unsigned_int;
subtype uint32_t_array is unsigned_int_array;
subtype uint32_t_ptr is unsigned_int_ptr;
subtype uint64_t is unsigned_long_long;
subtype uint64_t_ptr is unsigned_long_long_ptr;
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 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 int_fast8_t is int8_t;
subtype int_fast16_t is int16_t;
subtype int_fast32_t is int32_t;
subtype int_fast64_t is int64_t;
subtype uint_fast8_t is uint8_t;
subtype uint_fast16_t is uint16_t;
subtype uint_fast32_t is uint32_t;
subtype uint_fast64_t is uint64_t;
subtype intptr_t is signed_long;
subtype uintptr_t is unsigned_long;
subtype intmax_t is signed_long_long;
subtype uintmax_t is unsigned_long_long;
-- 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 := 32767;
INT_FAST16_MIN : constant := -32768;
INT_FAST32_MAX : constant := 2147483647;
INT_FAST32_MIN : constant := -2147483648;
INT_FAST64_MAX : constant := 9223372036854775807;
INT_FAST64_MIN : constant := -9223372036854775808;
INT_FAST8_MAX : constant := 127;
INT_FAST8_MIN : constant := -128;
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 := 65535;
UINT_FAST32_MAX : constant := 4294967295;
UINT_FAST64_MAX : constant := 18446744073709551615;
UINT_FAST8_MAX : constant := 255;
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;
-- _INT16_T (empty)
-- _INT32_T (empty)
-- _INT64_T (empty)
-- _INT8_T (empty)
-- _INTMAX_T (empty)
-- _INTPTR_T (empty)
-- _STDINT_H_ (empty)
-- _UINT16_T (empty)
-- _UINT32_T (empty)
-- _UINT64_T (empty)
-- _UINT8_T (empty)
-- _UINTMAX_T (empty)
-- _UINTPTR_T (empty)
WORDSIZE : constant := 32;
end C.stdint;
-- This file is translated by "headmaster" version 0.27-2060155 (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_2a7eeb4f return signed_int;
function Assign_2a7eeb4f return signed_int is
Left : signed_int renames p.w;
begin
Left := Left - 1;
return Left;
end Assign_2a7eeb4f;
begin
if Assign_2a7eeb4f >= 0 or else (p.w >= p.lbfsize
and then char'Val (c) /= char'Val (10))
then
declare
function Assign_a84466f3 return unsigned_char;
function Assign_771b98fb return unsigned_char_ptr;
function Assign_a84466f3 return unsigned_char is
Left : unsigned_char renames Assign_771b98fb.all;
begin
Left := unsigned_char'Mod (c);
return Left;
end Assign_a84466f3;
function Assign_771b98fb 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_771b98fb;
begin
return signed_int (Assign_a84466f3);
end;
else
return swbuf (c, p);
end if;
end;
end sputc;
end C.stdio;
-- This file is translated by "headmaster" version 0.27-2060155 (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.stdarg;
with C.stddef;
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.darwin_off_t;
subtype fpos_t_ptr is sys.qtypes.darwin_off_t_ptr;
subtype fpos_t_const_ptr is sys.qtypes.darwin_off_t_const_ptr;
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_sFILEX (<>) is limited private;
type struct_sFILEX_ptr is access all struct_sFILEX;
for struct_sFILEX_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sFILEX_ptr);
pragma Convention (C, struct_sFILEX_ptr);
type struct_sFILE;
type access_162e0cca is access function (a1 : void_ptr) return signed_int;
pragma Convention (C, access_162e0cca);
type access_4d9940e6 is access function (a1 : void_ptr; a2 : access char;
a3 : signed_int) return signed_int;
pragma Convention (C, access_4d9940e6);
type access_fd227150 is access function (a1 : void_ptr; a2 : fpos_t;
a3 : signed_int) return fpos_t;
pragma Convention (C, access_fd227150);
type access_52df02af is access function (a1 : void_ptr;
a2 : access constant char; a3 : signed_int) return signed_int;
pragma Convention (C, access_52df02af);
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_162e0cca;
read : aliased access_4d9940e6;
seek : aliased access_fd227150;
write : aliased access_52df02af;
ub : aliased struct_sbuf;
extra : aliased struct_sFILEX_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;
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$UNIX2003");
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$UNIX2003");
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$UNIX2003");
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");
sys_nerr : aliased signed_int;
pragma Import (C, sys_nerr, "sys_nerr");
sys_errlist : aliased char_const_ptr_array (size_t);
pragma Import (C, sys_errlist, "sys_errlist");
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 : stdarg.va_list) return signed_int;
pragma Import (C, vfprintf, "vfprintf");
function vprintf (a1 : access constant char; a2 : stdarg.va_list)
return signed_int;
pragma Import (C, vprintf, "vprintf");
function vsprintf (a1 : access char; a2 : access constant char;
a3 : stdarg.va_list) return signed_int;
pragma Import (C, vsprintf, "vsprintf");
function asprintf (a1 : access char_ptr; a2 : access constant char)
return signed_int;
pragma Import (C, asprintf, "asprintf");
function vasprintf (a1 : access char_ptr; a2 : access constant char;
a3 : stdarg.va_list) return signed_int;
pragma Import (C, vasprintf, "vasprintf");
function ctermid_r (a1 : access char) return char_ptr;
pragma Import (C, ctermid_r, "ctermid_r");
function fdopen (a1 : signed_int; a2 : access constant char)
return FILE_ptr;
pragma Import (C, fdopen, "fdopen");
function fgetln (a1 : access FILE; a2 : access stddef.size_t)
return char_ptr;
pragma Import (C, fgetln, "fgetln");
function fileno (a1 : access FILE) return signed_int;
pragma Import (C, fileno, "fileno");
procedure flockfile (a1 : access FILE);
pragma Import (C, flockfile, "flockfile");
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");
function fseeko (a1 : access FILE; a2 : sys.types.off_t; a3 : signed_int)
return signed_int;
pragma Import (C, fseeko, "fseeko");
function ftello (a1 : access FILE) return sys.types.off_t;
pragma Import (C, ftello, "ftello");
function ftrylockfile (a1 : access FILE) return signed_int;
pragma Import (C, ftrylockfile, "ftrylockfile");
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 getw (a1 : access FILE) return signed_int;
pragma Import (C, getw, "getw");
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 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");
function putw (a1 : signed_int; a2 : access FILE) return signed_int;
pragma Import (C, putw, "putw");
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 snprintf (a1 : access char; a2 : stddef.size_t;
a3 : access constant char) return signed_int;
pragma Import (C, snprintf, "snprintf");
function tempnam (a1 : access constant char; a2 : access constant char)
return char_ptr;
pragma Import (C, tempnam, "tempnam$UNIX2003");
function vfscanf (a1 : access FILE; a2 : access constant char;
a3 : stdarg.va_list) return signed_int;
pragma Import (C, vfscanf, "vfscanf");
function vscanf (a1 : access constant char; a2 : stdarg.va_list)
return signed_int;
pragma Import (C, vscanf, "vscanf");
function vsnprintf (a1 : access char; a2 : stddef.size_t;
a3 : access constant char; a4 : stdarg.va_list) return signed_int;
pragma Import (C, vsnprintf, "vsnprintf");
function vsscanf (a1 : access constant char; a2 : access constant char;
a3 : stdarg.va_list) return signed_int;
pragma Import (C, vsscanf, "vsscanf");
function zopen (a1 : access constant char; a2 : access constant char;
a3 : signed_int) return FILE_ptr;
pragma Import (C, zopen, "zopen");
function funopen (a1 : void_const_ptr; a2 : access_4d9940e6;
a3 : access_52df02af; a4 : access_fd227150; a5 : access_162e0cca)
return FILE_ptr;
pragma Import (C, funopen, "funopen");
function srget (a1 : access FILE) return signed_int;
pragma Import (C, srget, "__srget");
function svfscanf (a1 : access FILE; a2 : access constant char;
a3 : stdarg.va_list) return signed_int;
pragma Import (C, svfscanf, "__svfscanf");
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);
BUFSIZ : constant := 1024;
EOF : constant := -1;
FILENAME_MAX : constant := 1024;
FOPEN_MAX : constant := 20;
L_ctermid : constant := 1024;
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)
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)
-- clearerr_unlocked (uninterpretable)
-- feof_unlocked (uninterpretable)
-- ferror_unlocked (uninterpretable)
-- fileno_unlocked (uninterpretable)
-- fropen (function macro)
-- fwopen (function macro)
stderr : FILE_ptr renames stderrp;
stdin : FILE_ptr renames stdinp;
stdout : FILE_ptr renames stdoutp;
private
type struct_sFILEX is null record;
end C.stdio;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
with C.i386.types;
with C.stddef;
with C.sys.types;
package C.stdlib is
pragma Preelaborate;
subtype ct_rune_t is i386.qtypes.darwin_ct_rune_t;
subtype rune_t is i386.qtypes.darwin_rune_t;
type struct_5c83d875 is record
quot : aliased signed_int;
F_rem : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_5c83d875);
subtype div_t is struct_5c83d875;
type struct_f8e1921d is record
quot : aliased signed_long;
F_rem : aliased signed_long;
end record;
pragma Convention (C_Pass_By_Copy, struct_f8e1921d);
subtype ldiv_t is struct_f8e1921d;
type struct_51a60617 is record
quot : aliased signed_long_long;
F_rem : aliased signed_long_long;
end record;
pragma Convention (C_Pass_By_Copy, struct_51a60617);
subtype lldiv_t is struct_51a60617;
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");
function atoll (a1 : access constant char) return signed_long_long;
pragma Import (C, atoll, "atoll");
type access_1a44a5db is access function (a1 : void_const_ptr;
a2 : void_const_ptr) return signed_int;
pragma Convention (C, access_1a44a5db);
function bsearch (a1 : void_const_ptr; a2 : void_const_ptr;
a3 : stddef.size_t; a4 : stddef.size_t; a5 : access_1a44a5db)
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 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 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_1a44a5db);
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$UNIX2003");
function strtof (a1 : access constant char; a2 : access char_ptr)
return float;
pragma Import (C, strtof, "strtof$UNIX2003");
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 strtoll (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return signed_long_long;
pragma Import (C, strtoll, "strtoll");
function strtoul (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return unsigned_long;
pragma Import (C, strtoul, "strtoul");
function strtoull (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return unsigned_long_long;
pragma Import (C, strtoull, "strtoull");
function C_system (a1 : access constant char) return signed_int;
pragma Import (C, C_system, "system$UNIX2003");
function wcstombs (a1 : access char; a2 : access constant stddef.wchar_t;
a3 : stddef.size_t) return stddef.size_t;
pragma Import (C, wcstombs, "wcstombs");
function wctomb (a1 : access char; a2 : stddef.wchar_t) return signed_int;
pragma Import (C, wctomb, "wctomb");
function a64l (a1 : access constant char) return signed_long;
pragma Import (C, a64l, "a64l");
function drand48 return double;
pragma Import (C, drand48, "drand48");
function ecvt (a1 : double; a2 : signed_int; a3 : access signed_int;
a4 : access signed_int) return char_ptr;
pragma Import (C, ecvt, "ecvt");
function erand48 (a1 : access unsigned_short) return double;
pragma Import (C, erand48, "erand48");
function fcvt (a1 : double; a2 : signed_int; a3 : access signed_int;
a4 : access signed_int) return char_ptr;
pragma Import (C, fcvt, "fcvt");
function gcvt (a1 : double; a2 : signed_int; a3 : access char)
return char_ptr;
pragma Import (C, gcvt, "gcvt");
function grantpt (a1 : signed_int) return signed_int;
pragma Import (C, grantpt, "grantpt");
function initstate (a1 : unsigned_int; a2 : access char;
a3 : stddef.size_t) 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$UNIX2003");
function random return signed_long;
pragma Import (C, random, "random");
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$DARWIN_EXTSN");
function seed48 (a1 : access unsigned_short) return unsigned_short_ptr;
pragma Import (C, seed48, "seed48");
function setenv (a1 : access constant char; a2 : access constant char;
a3 : signed_int) return signed_int;
pragma Import (C, setenv, "setenv$UNIX2003");
function setstate (a1 : access constant char) return char_ptr;
pragma Import (C, setstate, "setstate");
procedure srand48 (a1 : signed_long);
pragma Import (C, srand48, "srand48");
procedure srandom (a1 : unsigned_int);
pragma Import (C, srandom, "srandom");
function unlockpt (a1 : signed_int) return signed_int;
pragma Import (C, unlockpt, "unlockpt");
function unsetenv (a1 : access constant char) return signed_int;
pragma Import (C, unsetenv, "unsetenv$UNIX2003");
function arc4random return i386.types.u_int32_t;
pragma Import (C, arc4random, "arc4random");
procedure arc4random_addrandom (dat : access unsigned_char;
datlen : signed_int);
pragma Import (C, arc4random_addrandom, "arc4random_addrandom");
procedure arc4random_stir;
pragma Import (C, arc4random_stir, "arc4random_stir");
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$1050");
function devname (a1 : sys.types.dev_t; a2 : sys.types.mode_t)
return char_ptr;
pragma Import (C, devname, "devname");
function devname_r (a1 : sys.types.dev_t; a2 : sys.types.mode_t;
buf : access char; len : signed_int) return char_ptr;
pragma Import (C, devname_r, "devname_r");
function getbsize (a1 : access signed_int; a2 : access signed_long)
return char_ptr;
pragma Import (C, getbsize, "getbsize");
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_1a44a5db) return signed_int;
pragma Import (C, heapsort, "heapsort");
function mergesort (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t;
a4 : access_1a44a5db) return signed_int;
pragma Import (C, mergesort, "mergesort");
type access_7aca351a is access function (a1 : void_ptr;
a2 : void_const_ptr; a3 : void_const_ptr) return signed_int;
pragma Convention (C, access_7aca351a);
procedure qsort_r (a1 : void_ptr; a2 : stddef.size_t; a3 : stddef.size_t;
a4 : void_ptr; a5 : access_7aca351a);
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");
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 reallocf (a1 : void_ptr; a2 : stddef.size_t) return void_ptr;
pragma Import (C, reallocf, "reallocf");
function strtoq (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return signed_long_long;
pragma Import (C, strtoq, "strtoq");
function strtouq (a1 : access constant char; a2 : access char_ptr;
a3 : signed_int) return unsigned_long_long;
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;
-- _CT_RUNE_T (empty)
-- _RUNE_T (empty)
-- _STDLIB_H_ (empty)
end C.stdlib;
-- This file is translated by "headmaster" version 0.27-2060155 (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 memchr (a1 : void_const_ptr; a2 : signed_int; a3 : stddef.size_t)
return void_ptr;
pragma Import (C, memchr, "memchr");
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 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 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 strerror (a1 : signed_int) return char_ptr;
pragma Import (C, strerror, "strerror$UNIX2003");
function strerror_r (a1 : signed_int; a2 : access char;
a3 : stddef.size_t) return signed_int;
pragma Import (C, strerror_r, "strerror_r");
function strlen (a1 : access constant char) return stddef.size_t;
pragma Import (C, strlen, "strlen");
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 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 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 strxfrm (a1 : access char; a2 : access constant char;
a3 : stddef.size_t) return stddef.size_t;
pragma Import (C, strxfrm, "strxfrm");
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 strtok_r (a1 : access char; a2 : access constant char;
a3 : access char_ptr) return char_ptr;
pragma Import (C, strtok_r, "strtok_r");
function strdup (a1 : access constant char) return char_ptr;
pragma Import (C, strdup, "strdup");
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 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 index (a1 : access constant char; a2 : signed_int)
return char_ptr;
pragma Import (C, index, "index");
procedure memset_pattern4 (a1 : void_ptr; a2 : void_const_ptr;
a3 : stddef.size_t);
pragma Import (C, memset_pattern4, "memset_pattern4");
procedure memset_pattern8 (a1 : void_ptr; a2 : void_const_ptr;
a3 : stddef.size_t);
pragma Import (C, memset_pattern8, "memset_pattern8");
procedure memset_pattern16 (a1 : void_ptr; a2 : void_const_ptr;
a3 : stddef.size_t);
pragma Import (C, memset_pattern16, "memset_pattern16");
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 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");
procedure strmode (a1 : signed_int; a2 : access char);
pragma Import (C, strmode, "strmode");
function strncasecmp (a1 : access constant char;
a2 : access constant char; a3 : stddef.size_t) return signed_int;
pragma Import (C, strncasecmp, "strncasecmp");
function strsep (a1 : access char_ptr; a2 : access constant char)
return char_ptr;
pragma Import (C, strsep, "strsep");
function strsignal (sig : signed_int) return char_ptr;
pragma Import (C, strsignal, "strsignal");
procedure swab (a1 : void_const_ptr; a2 : void_ptr;
a3 : sys.types.ssize_t);
pragma Import (C, swab, "swab");
-- _STRING_H_ (empty)
end C.string;
-- This file is translated by "headmaster" version 0.27-2060155 (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.appleapiopts is
pragma Preelaborate;
-- __APPLE_API_EVOLVING (empty)
-- __APPLE_API_OBSOLETE (empty)
-- __APPLE_API_PRIVATE (empty)
-- __APPLE_API_STABLE (empty)
-- __APPLE_API_STANDARD (empty)
-- __APPLE_API_UNSTABLE (empty)
-- __SYS_APPLEAPIOPTS_H__ (empty)
end C.sys.appleapiopts;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.types;
with C.stddef;
with C.stdint;
with C.sys.qstructs;
with C.sys.types;
package C.sys.attr is
pragma Preelaborate;
subtype text_encoding_t is i386.types.u_int32_t;
subtype fsobj_type_t is i386.types.u_int32_t;
subtype fsobj_tag_t is i386.types.u_int32_t;
subtype fsfile_type_t is i386.types.u_int32_t;
subtype fsvolid_t is i386.types.u_int32_t;
type struct_fsobj_id;
type struct_fsobj_id is record
fid_objno : aliased i386.types.u_int32_t;
fid_generation : aliased i386.types.u_int32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_fsobj_id);
subtype fsobj_id_t is struct_fsobj_id;
subtype attrgroup_t is i386.types.u_int32_t;
type struct_attrlist;
type struct_attrlist is record
bitmapcount : aliased sys.types.u_short;
reserved : aliased i386.types.u_int16_t;
commonattr : aliased attrgroup_t;
volattr : aliased attrgroup_t;
dirattr : aliased attrgroup_t;
fileattr : aliased attrgroup_t;
forkattr : aliased attrgroup_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_attrlist);
type struct_attrlist_ptr is access all struct_attrlist;
for struct_attrlist_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_attrlist_ptr);
pragma Convention (C, struct_attrlist_ptr);
type struct_attribute_set;
type struct_attribute_set is record
commonattr : aliased attrgroup_t;
volattr : aliased attrgroup_t;
dirattr : aliased attrgroup_t;
fileattr : aliased attrgroup_t;
forkattr : aliased attrgroup_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_attribute_set);
subtype attribute_set_t is struct_attribute_set;
type struct_attrreference;
type struct_attrreference is record
attr_dataoffset : aliased stdint.int32_t;
attr_length : aliased i386.types.u_int32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_attrreference);
subtype attrreference_t is struct_attrreference;
type struct_diskextent;
type struct_diskextent is record
startblock : aliased i386.types.u_int32_t;
blockcount : aliased i386.types.u_int32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_diskextent);
type struct_diskextent_array is array (size_t range <>) of
aliased struct_diskextent;
pragma Convention (C, struct_diskextent_array);
subtype extentrecord is struct_diskextent_array (0 .. 7);
subtype vol_capabilities_set_t is i386.types.u_int32_t_array (0 .. 3);
type struct_vol_capabilities_attr;
type struct_vol_capabilities_attr is record
capabilities : aliased vol_capabilities_set_t;
valid : aliased vol_capabilities_set_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_vol_capabilities_attr);
subtype vol_capabilities_attr_t is struct_vol_capabilities_attr;
type struct_vol_attributes_attr;
type struct_vol_attributes_attr is record
validattr : aliased attribute_set_t;
nativeattr : aliased attribute_set_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_vol_attributes_attr);
subtype vol_attributes_attr_t is struct_vol_attributes_attr;
type struct_fssearchblock;
type struct_fssearchblock is record
returnattrs : aliased struct_attrlist_ptr;
returnbuffer : aliased void_ptr;
returnbuffersize : aliased stddef.size_t;
maxmatches : aliased sys.types.u_long;
timelimit : aliased sys.qstructs.struct_timeval;
searchparams1 : aliased void_ptr;
sizeofsearchparams1 : aliased stddef.size_t;
searchparams2 : aliased void_ptr;
sizeofsearchparams2 : aliased stddef.size_t;
searchattrs : aliased struct_attrlist;
end record;
pragma Convention (C_Pass_By_Copy, struct_fssearchblock);
type struct_searchstate;
type struct_searchstate is record
reserved : aliased sys.types.u_char_array (0 .. 555);
end record;
pragma Convention (C_Pass_By_Copy, struct_searchstate);
ATTR_BIT_MAP_COUNT : constant := 5;
ATTR_CMN_ACCESSMASK : constant := 131072;
ATTR_CMN_ACCTIME : constant := 4096;
ATTR_CMN_BKUPTIME : constant := 8192;
ATTR_CMN_CHGTIME : constant := 2048;
ATTR_CMN_CRTIME : constant := 512;
ATTR_CMN_DEVID : constant := 2;
ATTR_CMN_EXTENDED_SECURITY : constant := 4194304;
ATTR_CMN_FILEID : constant := 33554432;
ATTR_CMN_FLAGS : constant := 262144;
ATTR_CMN_FNDRINFO : constant := 16384;
ATTR_CMN_FSID : constant := 4;
ATTR_CMN_GRPID : constant := 65536;
ATTR_CMN_GRPUUID : constant := 16777216;
ATTR_CMN_MODTIME : constant := 1024;
ATTR_CMN_NAME : constant := 1;
ATTR_CMN_NAMEDATTRCOUNT : constant := 524288;
ATTR_CMN_NAMEDATTRLIST : constant := 1048576;
ATTR_CMN_OBJID : constant := 32;
ATTR_CMN_OBJPERMANENTID : constant := 64;
ATTR_CMN_OBJTAG : constant := 16;
ATTR_CMN_OBJTYPE : constant := 8;
ATTR_CMN_OWNERID : constant := 32768;
ATTR_CMN_PARENTID : constant := 67108864;
ATTR_CMN_PAROBJID : constant := 128;
ATTR_CMN_SCRIPT : constant := 256;
ATTR_CMN_SETMASK : constant := 29884160;
ATTR_CMN_USERACCESS : constant := 2097152;
ATTR_CMN_UUID : constant := 8388608;
ATTR_CMN_VALIDMASK : constant := 134217727;
ATTR_CMN_VOLSETMASK : constant := 26368;
ATTR_DIR_ENTRYCOUNT : constant := 2;
ATTR_DIR_LINKCOUNT : constant := 1;
ATTR_DIR_MOUNTSTATUS : constant := 4;
ATTR_DIR_SETMASK : constant := 0;
ATTR_DIR_VALIDMASK : constant := 7;
ATTR_FILE_ALLOCSIZE : constant := 4;
ATTR_FILE_CLUMPSIZE : constant := 16;
ATTR_FILE_DATAALLOCSIZE : constant := 1024;
ATTR_FILE_DATAEXTENTS : constant := 2048;
ATTR_FILE_DATALENGTH : constant := 512;
ATTR_FILE_DEVTYPE : constant := 32;
ATTR_FILE_FILETYPE : constant := 64;
ATTR_FILE_FORKCOUNT : constant := 128;
ATTR_FILE_FORKLIST : constant := 256;
ATTR_FILE_IOBLOCKSIZE : constant := 8;
ATTR_FILE_LINKCOUNT : constant := 1;
ATTR_FILE_RSRCALLOCSIZE : constant := 8192;
ATTR_FILE_RSRCEXTENTS : constant := 16384;
ATTR_FILE_RSRCLENGTH : constant := 4096;
ATTR_FILE_SETMASK : constant := 32;
ATTR_FILE_TOTALSIZE : constant := 2;
ATTR_FILE_VALIDMASK : constant := 32767;
ATTR_FORK_ALLOCSIZE : constant := 2;
ATTR_FORK_SETMASK : constant := 0;
ATTR_FORK_TOTALSIZE : constant := 1;
ATTR_FORK_VALIDMASK : constant := 3;
ATTR_MAX_BUFFER : constant := 8192;
ATTR_VOL_ALLOCATIONCLUMP : constant := 64;
ATTR_VOL_ATTRIBUTES : constant := 1073741824;
ATTR_VOL_CAPABILITIES : constant := 131072;
ATTR_VOL_DIRCOUNT : constant := 1024;
ATTR_VOL_ENCODINGSUSED : constant := 65536;
ATTR_VOL_FILECOUNT : constant := 512;
ATTR_VOL_FSTYPE : constant := 1;
ATTR_VOL_INFO : constant := -2147483648;
ATTR_VOL_IOBLOCKSIZE : constant := 128;
ATTR_VOL_MAXOBJCOUNT : constant := 2048;
ATTR_VOL_MINALLOCATION : constant := 32;
ATTR_VOL_MOUNTEDDEVICE : constant := 32768;
ATTR_VOL_MOUNTFLAGS : constant := 16384;
ATTR_VOL_MOUNTPOINT : constant := 4096;
ATTR_VOL_NAME : constant := 8192;
ATTR_VOL_OBJCOUNT : constant := 256;
ATTR_VOL_SETMASK : constant := -2147475456;
ATTR_VOL_SIGNATURE : constant := 2;
ATTR_VOL_SIZE : constant := 4;
ATTR_VOL_SPACEAVAIL : constant := 16;
ATTR_VOL_SPACEFREE : constant := 8;
ATTR_VOL_VALIDMASK : constant := -1073479681;
DIR_MNTSTATUS_MNTPOINT : constant := 1;
FSOPT_NOFOLLOW : constant := 1;
FSOPT_NOINMEMUPDATE : constant := 2;
FSOPT_REPORT_FULLSIZE : constant := 4;
FST_EOF : constant := -1;
SEARCHFS_MAX_SEARCHPARMS : constant := 4096;
SRCHFS_MATCHDIRS : constant := 4;
SRCHFS_MATCHFILES : constant := 8;
SRCHFS_MATCHPARTIALNAMES : constant := 2;
SRCHFS_NEGATEPARAMS : constant := -2147483648;
SRCHFS_SKIPINAPPROPRIATE : constant := 128;
SRCHFS_SKIPINVISIBLE : constant := 32;
SRCHFS_SKIPLINKS : constant := 16;
SRCHFS_SKIPPACKAGES : constant := 64;
SRCHFS_START : constant := 1;
SRCHFS_VALIDOPTIONSMASK : constant := -2147483393;
VOL_CAPABILITIES_FORMAT : constant := 0;
VOL_CAPABILITIES_INTERFACES : constant := 1;
VOL_CAPABILITIES_RESERVED1 : constant := 2;
VOL_CAPABILITIES_RESERVED2 : constant := 3;
VOL_CAP_FMT_2TB_FILESIZE : constant := 2048;
VOL_CAP_FMT_CASE_PRESERVING : constant := 512;
VOL_CAP_FMT_CASE_SENSITIVE : constant := 256;
VOL_CAP_FMT_FAST_STATFS : constant := 1024;
VOL_CAP_FMT_HARDLINKS : constant := 4;
VOL_CAP_FMT_HIDDEN_FILES : constant := 8192;
VOL_CAP_FMT_JOURNAL : constant := 8;
VOL_CAP_FMT_JOURNAL_ACTIVE : constant := 16;
VOL_CAP_FMT_NO_ROOT_TIMES : constant := 32;
VOL_CAP_FMT_OPENDENYMODES : constant := 4096;
VOL_CAP_FMT_PATH_FROM_ID : constant := 16384;
VOL_CAP_FMT_PERSISTENTOBJECTIDS : constant := 1;
VOL_CAP_FMT_SPARSE_FILES : constant := 64;
VOL_CAP_FMT_SYMBOLICLINKS : constant := 2;
VOL_CAP_FMT_ZERO_RUNS : constant := 128;
VOL_CAP_INT_ADVLOCK : constant := 256;
VOL_CAP_INT_ALLOCATE : constant := 64;
VOL_CAP_INT_ATTRLIST : constant := 2;
VOL_CAP_INT_COPYFILE : constant := 32;
VOL_CAP_INT_EXCHANGEDATA : constant := 16;
VOL_CAP_INT_EXTENDED_ATTR : constant := 16384;
VOL_CAP_INT_EXTENDED_SECURITY : constant := 1024;
VOL_CAP_INT_FLOCK : constant := 512;
VOL_CAP_INT_MANLOCK : constant := 4096;
VOL_CAP_INT_NAMEDSTREAMS : constant := 8192;
VOL_CAP_INT_NFSEXPORT : constant := 4;
VOL_CAP_INT_READDIRATTR : constant := 8;
VOL_CAP_INT_SEARCHFS : constant := 1;
VOL_CAP_INT_USERACCESS : constant := 2048;
VOL_CAP_INT_VOL_RENAME : constant := 128;
-- _SYS_ATTR_H_ (empty)
end C.sys.attr;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
-- _CDEFS_H_ (empty)
DARWIN_FEATURE_UNIX_CONFORMANCE : constant := 3;
-- __BEGIN_DECLS (empty)
-- __CONCAT (has # or ##)
-- __COPYRIGHT (unparsible)
-- __DARWIN_1050 (function macro)
-- __DARWIN_1050ALIAS (function macro)
-- __DARWIN_1050ALIAS_C (function macro)
-- __DARWIN_1050ALIAS_I (function macro)
-- __DARWIN_1050INODE64 (function macro)
DARWIN_64_BIT_INO_T : constant := 0;
-- __DARWIN_ALIAS (function macro)
-- __DARWIN_ALIAS_C (function macro)
-- __DARWIN_ALIAS_I (function macro)
-- __DARWIN_EXTSN (function macro)
-- __DARWIN_EXTSN_C (function macro)
-- __DARWIN_INODE64 (function macro)
-- __DARWIN_LDBL_COMPAT (empty)
-- __DARWIN_LDBL_COMPAT2 (empty)
DARWIN_LONG_DOUBLE_IS_DOUBLE : constant := 0;
DARWIN_NON_CANCELABLE : constant := 0;
-- __DARWIN_NO_LONG_LONG (unparsible)
DARWIN_SUF_1050 : constant char_array (0 .. 5) := "$1050" & char'Val (0);
-- __DARWIN_SUF_64_BIT_INO_T (empty)
DARWIN_SUF_EXTSN : constant char_array (0 .. 13) := "$DARWIN_EXTSN"
& char'Val (0);
-- __DARWIN_SUF_NON_CANCELABLE (empty)
DARWIN_SUF_UNIX03 : constant char_array (0 .. 9) := "$UNIX2003"
& char'Val (0);
DARWIN_SUF_UNIX03_SET : constant := 1;
DARWIN_UNIX03 : constant := 1;
DARWIN_VERS_1050 : constant := 1;
-- __END_DECLS (empty)
-- __IDSTRING (unparsible)
-- __P (function macro)
-- __PROJECT_VERSION (unparsible)
-- __RCSID (unparsible)
-- __SCCSID (unparsible)
-- __STRING (has # or ##)
-- __dead (empty)
-- __dead2 (attribute)
-- __deprecated (attribute)
-- __printflike (parameterized declaration-specifiers)
-- __pure (empty)
-- __pure2 (attribute)
-- __scanflike (parameterized declaration-specifiers)
subtype signed is signed_int;
-- __unused (attribute)
-- __volatile (alias of volatile)
end C.sys.cdefs;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
with C.sys.types;
package C.sys.dirent is
pragma Preelaborate;
type struct_dirent;
type struct_dirent is record
d_ino : aliased sys.types.ino_t;
d_reclen : aliased i386.qtypes.uint16_t;
d_type : aliased i386.qtypes.uint8_t;
d_namlen : aliased i386.qtypes.uint8_t;
d_name : aliased char_array (0 .. 255);
end record;
for struct_dirent'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_dirent);
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;
-- _SYS_DIRENT_H (empty)
DARWIN_MAXNAMLEN : constant := 255;
DARWIN_MAXPATHLEN : constant := 1024;
-- __DARWIN_STRUCT_DIRENTRY (unparsible)
-- .d_fileno renames .d_ino (accessor)
end C.sys.dirent;
-- This file is translated by "headmaster" version 0.27-2060155 (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.errno is
function errno return signed_int is
begin
return error.all;
end errno;
end C.sys.errno;
-- This file is translated by "headmaster" version 0.27-2060155 (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.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;
EBADARCH : constant := 86;
EBADEXEC : constant := 85;
EBADF : constant := 9;
EBADMACHO : constant := 88;
EBADMSG : constant := 94;
EBADRPC : constant := 72;
EBUSY : constant := 16;
ECANCELED : constant := 89;
ECHILD : constant := 10;
ECONNABORTED : constant := 53;
ECONNREFUSED : constant := 61;
ECONNRESET : constant := 54;
EDEADLK : constant := 11;
EDESTADDRREQ : constant := 39;
EDEVERR : constant := 83;
EDOM : constant := 33;
EDQUOT : constant := 69;
EEXIST : constant := 17;
EFAULT : constant := 14;
EFBIG : constant := 27;
EFTYPE : constant := 79;
EHOSTDOWN : constant := 64;
EHOSTUNREACH : constant := 65;
EIDRM : constant := 90;
EILSEQ : constant := 92;
EINPROGRESS : constant := 36;
EINTR : constant := 4;
EINVAL : constant := 22;
EIO : constant := 5;
EISCONN : constant := 56;
EISDIR : constant := 21;
ELAST : constant := 103;
ELOOP : constant := 62;
EMFILE : constant := 24;
EMLINK : constant := 31;
EMSGSIZE : constant := 40;
EMULTIHOP : constant := 95;
ENAMETOOLONG : constant := 63;
ENEEDAUTH : constant := 81;
ENETDOWN : constant := 50;
ENETRESET : constant := 52;
ENETUNREACH : constant := 51;
ENFILE : constant := 23;
ENOATTR : constant := 93;
ENOBUFS : constant := 55;
ENODATA : constant := 96;
ENODEV : constant := 19;
ENOENT : constant := 2;
ENOEXEC : constant := 8;
ENOLCK : constant := 77;
ENOLINK : constant := 97;
ENOMEM : constant := 12;
ENOMSG : constant := 91;
ENOPOLICY : constant := 103;
ENOPROTOOPT : constant := 42;
ENOSPC : constant := 28;
ENOSR : constant := 98;
ENOSTR : constant := 99;
ENOSYS : constant := 78;
ENOTBLK : constant := 15;
ENOTCONN : constant := 57;
ENOTDIR : constant := 20;
ENOTEMPTY : constant := 66;
ENOTSOCK : constant := 38;
ENOTSUP : constant := 45;
ENOTTY : constant := 25;
ENXIO : constant := 6;
EOPNOTSUPP : constant := 102;
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 := 100;
EPROTONOSUPPORT : constant := 43;
EPROTOTYPE : constant := 41;
EPWROFF : constant := 82;
ERANGE : constant := 34;
EREMOTE : constant := 71;
EROFS : constant := 30;
ERPCMISMATCH : constant := 73;
ESHLIBVERS : constant := 87;
ESHUTDOWN : constant := 58;
ESOCKTNOSUPPORT : constant := 44;
ESPIPE : constant := 29;
ESRCH : constant := 3;
ESTALE : constant := 70;
ETIME : constant := 101;
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.sys.errno;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qstructs;
package C.sys.event is
pragma Preelaborate;
type struct_kevent;
type struct_kevent is record
ident : aliased stdint.uintptr_t;
filter : aliased signed_short;
flags : aliased unsigned_short;
fflags : aliased unsigned_int;
data : aliased stdint.intptr_t;
udata : aliased void_ptr;
end record;
for struct_kevent'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_kevent);
type struct_kevent_const_ptr is access constant struct_kevent;
for struct_kevent_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_kevent_const_ptr);
pragma Convention (C, struct_kevent_const_ptr);
type struct_kevent_ptr is access all struct_kevent;
for struct_kevent_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_kevent_ptr);
pragma Convention (C, struct_kevent_ptr);
type struct_knote (<>) is limited private;
type struct_knote_ptr is access all struct_knote;
for struct_knote_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_knote_ptr);
pragma Convention (C, struct_knote_ptr);
type struct_klist;
type struct_klist is record
slh_first : aliased struct_knote_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_klist);
function kqueue return signed_int;
pragma Import (C, kqueue, "kqueue");
function kevent (kq : signed_int;
changelist : access constant struct_kevent; nchanges : signed_int;
eventlist : access struct_kevent; nevents : signed_int;
timeout : access constant sys.qstructs.struct_timespec)
return signed_int;
pragma Import (C, kevent, "kevent");
EVFILT_AIO : constant := -3;
EVFILT_FS : constant := -9;
EVFILT_MACHPORT : constant := -8;
EVFILT_PROC : constant := -5;
EVFILT_READ : constant := -1;
EVFILT_SIGNAL : constant := -6;
EVFILT_SYSCOUNT : constant := 9;
EVFILT_THREADMARKER : constant := 9;
EVFILT_TIMER : constant := -7;
EVFILT_VNODE : constant := -4;
EVFILT_WRITE : constant := -2;
EV_ADD : constant := 1;
EV_CLEAR : constant := 32;
EV_DELETE : constant := 2;
EV_DISABLE : constant := 8;
EV_ENABLE : constant := 4;
EV_EOF : constant := 32768;
EV_ERROR : constant := 16384;
EV_FLAG0 : constant := 4096;
EV_FLAG1 : constant := 8192;
EV_ONESHOT : constant := 16;
EV_OOBAND : constant := 8192;
EV_POLL : constant := 4096;
EV_RECEIPT : constant := 64;
-- EV_SET (function macro)
EV_SYSFLAGS : constant := 61440;
NOTE_ABSOLUTE : constant := 8;
NOTE_ATTRIB : constant := 8;
NOTE_CHILD : constant := 4;
NOTE_DELETE : constant := 1;
NOTE_EXEC : constant := 536870912;
NOTE_EXIT : constant := -2147483648;
NOTE_EXTEND : constant := 4;
NOTE_FORK : constant := 1073741824;
NOTE_LINK : constant := 16;
NOTE_LOWAT : constant := 1;
NOTE_NSECONDS : constant := 4;
NOTE_PCTRLMASK : constant := -1048576;
NOTE_PDATAMASK : constant := 1048575;
NOTE_REAP : constant := 268435456;
NOTE_RENAME : constant := 32;
NOTE_REVOKE : constant := 64;
NOTE_SECONDS : constant := 1;
NOTE_SIGNAL : constant := 134217728;
NOTE_TRACK : constant := 1;
NOTE_TRACKERR : constant := 2;
NOTE_USECONDS : constant := 2;
NOTE_WRITE : constant := 2;
-- _SYS_EVENT_H_ (empty)
private
type struct_knote is null record;
end C.sys.event;
-- This file is translated by "headmaster" version 0.27-2060155 (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.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;
end record;
pragma Convention (C_Pass_By_Copy, struct_flock);
type struct_radvisory;
type struct_radvisory is record
ra_offset : aliased sys.types.off_t;
ra_count : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_radvisory);
type struct_fsignatures;
type struct_fsignatures is record
fs_file_start : aliased sys.types.off_t;
fs_blob_start : aliased void_ptr;
fs_blob_size : aliased stddef.size_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_fsignatures);
subtype fsignatures_t is struct_fsignatures;
type struct_fstore;
type struct_fstore is record
fst_flags : aliased unsigned_int;
fst_posmode : aliased signed_int;
fst_offset : aliased sys.types.off_t;
fst_length : aliased sys.types.off_t;
fst_bytesalloc : aliased sys.types.off_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_fstore);
subtype fstore_t is struct_fstore;
type struct_fbootstraptransfer;
type struct_fbootstraptransfer is record
fbt_offset : aliased sys.types.off_t;
fbt_length : aliased stddef.size_t;
fbt_buffer : aliased void_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_fbootstraptransfer);
subtype fbootstraptransfer_t is struct_fbootstraptransfer;
type struct_log2phys;
type struct_log2phys is record
l2p_flags : aliased unsigned_int;
l2p_contigbytes : aliased sys.types.off_t;
l2p_devoffset : aliased sys.types.off_t;
end record;
for struct_log2phys'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_log2phys);
type struct_filesec (<>) is limited private;
type struct_filesec_ptr is access all struct_filesec;
for struct_filesec_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_filesec_ptr);
pragma Convention (C, struct_filesec_ptr);
subtype filesec_t is struct_filesec_ptr;
type enum_0e866d2b is (FILESEC_OWNER, FILESEC_GROUP, FILESEC_UUID,
FILESEC_MODE, FILESEC_ACL, FILESEC_GRPUUID, FILESEC_ACL_RAW,
FILESEC_ACL_ALLOCSIZE);
for enum_0e866d2b use (FILESEC_OWNER => 1, FILESEC_GROUP => 2,
FILESEC_UUID => 3, FILESEC_MODE => 4, FILESEC_ACL => 5,
FILESEC_GRPUUID => 6, FILESEC_ACL_RAW => 100,
FILESEC_ACL_ALLOCSIZE => 101);
pragma Convention (C, enum_0e866d2b);
subtype filesec_property_t is enum_0e866d2b;
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$UNIX2003");
function creat (a1 : access constant char; a2 : sys.types.mode_t)
return signed_int;
pragma Import (C, creat, "creat$UNIX2003");
function fcntl (a1 : signed_int; a2 : signed_int) return signed_int;
function fcntl (a1 : signed_int; a2 : signed_int; a3 : access char)
return signed_int;
function fcntl (a1 : signed_int; a2 : signed_int; a3 : signed_int)
return signed_int;
pragma Import (C, fcntl, "fcntl$UNIX2003");
function openx_np (a1 : access constant char; a2 : signed_int;
a3 : access struct_filesec) return signed_int;
pragma Import (C, openx_np, "openx_np");
function flock (a1 : signed_int; a2 : signed_int) return signed_int;
pragma Import (C, flock, "flock");
function filesec_init return filesec_t;
pragma Import (C, filesec_init, "filesec_init");
function filesec_dup (a1 : access struct_filesec) return filesec_t;
pragma Import (C, filesec_dup, "filesec_dup");
procedure filesec_free (a1 : access struct_filesec);
pragma Import (C, filesec_free, "filesec_free");
function filesec_get_property (a1 : access struct_filesec;
a2 : filesec_property_t; a3 : void_ptr) return signed_int;
pragma Import (C, filesec_get_property, "filesec_get_property");
function filesec_set_property (a1 : access struct_filesec;
a2 : filesec_property_t; a3 : void_const_ptr) return signed_int;
pragma Import (C, filesec_set_property, "filesec_set_property");
function filesec_query_property (a1 : access struct_filesec;
a2 : filesec_property_t; a3 : access signed_int) return signed_int;
pragma Import (C, filesec_query_property, "filesec_query_property");
CPF_IGNORE_MODE : constant := 2;
CPF_MASK : constant := 3;
CPF_OVERWRITE : constant := 1;
FAPPEND : constant := 8;
FASYNC : constant := 64;
FCNTL_FS_SPECIFIC_BASE : constant := 65536;
FD_CLOEXEC : constant := 1;
FFSYNC : constant := 128;
FILESEC_GUID : constant enum_0e866d2b := FILESEC_UUID;
FNDELAY : constant := 4;
FNONBLOCK : constant := 4;
FREAD : constant := 1;
FWRITE : constant := 2;
F_ADDSIGS : constant := 59;
F_ALLOCATEALL : constant := 4;
F_ALLOCATECONTIG : constant := 2;
F_CHKCLEAN : constant := 41;
F_DUPFD : constant := 0;
F_FREEZE_FS : constant := 53;
F_FULLFSYNC : constant := 51;
F_GETFD : constant := 1;
F_GETFL : constant := 3;
F_GETLK : constant := 7;
F_GETOWN : constant := 5;
F_GETPATH : constant := 50;
F_GLOBAL_NOCACHE : constant := 55;
F_LOG2PHYS : constant := 49;
F_MARKDEPENDENCY : constant := 60;
F_NOCACHE : constant := 48;
F_PATHPKG_CHECK : constant := 52;
F_PEOFPOSMODE : constant := 3;
F_PREALLOCATE : constant := 42;
F_RDADVISE : constant := 44;
F_RDAHEAD : constant := 45;
F_RDLCK : constant := 1;
F_READBOOTSTRAP : constant := 46;
F_SETFD : constant := 2;
F_SETFL : constant := 4;
F_SETLK : constant := 8;
F_SETLKW : constant := 9;
F_SETOWN : constant := 6;
F_SETSIZE : constant := 43;
F_THAW_FS : constant := 54;
F_UNLCK : constant := 2;
F_VOLPOSMODE : constant := 4;
F_WRITEBOOTSTRAP : constant := 47;
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_ALERT : constant := 536870912;
O_APPEND : constant := 8;
O_ASYNC : constant := 64;
O_CREAT : constant := 512;
O_DIRECTORY : constant := 1048576;
O_EVTONLY : constant := 32768;
O_EXCL : constant := 2048;
O_EXLOCK : constant := 32;
O_FSYNC : constant := 128;
O_NDELAY : constant := 4;
O_NOCTTY : constant := 131072;
O_NOFOLLOW : constant := 256;
O_NONBLOCK : constant := 4;
O_POPUP : constant := -2147483648;
O_RDONLY : constant := 0;
O_RDWR : constant := 2;
O_SHLOCK : constant := 16;
O_SYMLINK : constant := 2097152;
O_SYNC : constant := 128;
O_TRUNC : constant := 1024;
O_WRONLY : constant := 1;
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_IFXATTR : constant := 65536;
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_ISGID : constant := 1024;
S_ISTXT : constant := 512;
S_ISUID : constant := 2048;
S_ISVTX : constant := 512;
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;
FILESEC_REMOVE_ACL : constant void_ptr := void_ptr (System'To_Address (
1));
-- _FILESEC_T (empty)
FILESEC_UNSET_PROPERTY : constant void_ptr := void_ptr (
System'To_Address (0));
-- _SYS_FCNTL_H_ (empty)
private
type struct_filesec is null record;
end C.sys.fcntl;
-- This file is translated by "headmaster" version 0.27-2060155 (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.fcntl;
with C.sys.types;
with C.sys.ucred;
package C.sys.file is
pragma Preelaborate;
subtype struct_flock is sys.fcntl.struct_flock;
subtype struct_radvisory is sys.fcntl.struct_radvisory;
subtype struct_fsignatures is sys.fcntl.struct_fsignatures;
subtype fsignatures_t is sys.fcntl.fsignatures_t;
subtype struct_fstore is sys.fcntl.struct_fstore;
subtype fstore_t is sys.fcntl.fstore_t;
subtype struct_fbootstraptransfer is sys.fcntl.struct_fbootstraptransfer;
subtype fbootstraptransfer_t is sys.fcntl.fbootstraptransfer_t;
subtype struct_log2phys is sys.fcntl.struct_log2phys;
subtype struct_filesec is sys.fcntl.struct_filesec;
subtype filesec_t is sys.fcntl.filesec_t;
function FILESEC_OWNER return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_OWNER;
function FILESEC_GROUP return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_GROUP;
function FILESEC_UUID return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_UUID;
function FILESEC_MODE return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_MODE;
function FILESEC_ACL return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_ACL;
function FILESEC_GRPUUID return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_GRPUUID;
function FILESEC_ACL_RAW return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_ACL_RAW;
function FILESEC_ACL_ALLOCSIZE return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_ACL_ALLOCSIZE;
subtype filesec_property_t is sys.fcntl.filesec_property_t;
function open (a1 : access constant char; a2 : signed_int)
return signed_int renames sys.fcntl.open;
function open (a1 : access constant char; a2 : signed_int;
a3 : sys.types.mode_t) return signed_int renames sys.fcntl.open;
function creat (a1 : access constant char; a2 : sys.types.mode_t)
return signed_int renames sys.fcntl.creat;
function fcntl (a1 : signed_int; a2 : signed_int) return signed_int
renames sys.fcntl.fcntl;
function fcntl (a1 : signed_int; a2 : signed_int; a3 : access char)
return signed_int renames sys.fcntl.fcntl;
function fcntl (a1 : signed_int; a2 : signed_int; a3 : signed_int)
return signed_int renames sys.fcntl.fcntl;
function openx_np (a1 : access constant char; a2 : signed_int;
a3 : access sys.fcntl.struct_filesec) return signed_int
renames sys.fcntl.openx_np;
function flock (a1 : signed_int; a2 : signed_int) return signed_int
renames sys.fcntl.flock;
function filesec_init return sys.fcntl.filesec_t
renames sys.fcntl.filesec_init;
function filesec_dup (a1 : access sys.fcntl.struct_filesec)
return sys.fcntl.filesec_t renames sys.fcntl.filesec_dup;
procedure filesec_free (a1 : access sys.fcntl.struct_filesec)
renames sys.fcntl.filesec_free;
function filesec_get_property (a1 : access sys.fcntl.struct_filesec;
a2 : sys.fcntl.filesec_property_t; a3 : void_ptr) return signed_int
renames sys.fcntl.filesec_get_property;
function filesec_set_property (a1 : access sys.fcntl.struct_filesec;
a2 : sys.fcntl.filesec_property_t; a3 : void_const_ptr)
return signed_int renames sys.fcntl.filesec_set_property;
function filesec_query_property (a1 : access sys.fcntl.struct_filesec;
a2 : sys.fcntl.filesec_property_t; a3 : access signed_int)
return signed_int renames sys.fcntl.filesec_query_property;
CPF_IGNORE_MODE : constant := sys.fcntl.CPF_IGNORE_MODE;
CPF_MASK : constant := sys.fcntl.CPF_MASK;
CPF_OVERWRITE : constant := sys.fcntl.CPF_OVERWRITE;
FAPPEND : constant := sys.fcntl.FAPPEND;
FASYNC : constant := sys.fcntl.FASYNC;
FCNTL_FS_SPECIFIC_BASE : constant := sys.fcntl.FCNTL_FS_SPECIFIC_BASE;
FD_CLOEXEC : constant := sys.fcntl.FD_CLOEXEC;
FFSYNC : constant := sys.fcntl.FFSYNC;
FILESEC_GUID : sys.fcntl.enum_0e866d2b renames sys.fcntl.FILESEC_GUID;
FNDELAY : constant := sys.fcntl.FNDELAY;
FNONBLOCK : constant := sys.fcntl.FNONBLOCK;
FREAD : constant := sys.fcntl.FREAD;
FWRITE : constant := sys.fcntl.FWRITE;
F_ADDSIGS : constant := sys.fcntl.F_ADDSIGS;
F_ALLOCATEALL : constant := sys.fcntl.F_ALLOCATEALL;
F_ALLOCATECONTIG : constant := sys.fcntl.F_ALLOCATECONTIG;
F_CHKCLEAN : constant := sys.fcntl.F_CHKCLEAN;
F_DUPFD : constant := sys.fcntl.F_DUPFD;
F_FREEZE_FS : constant := sys.fcntl.F_FREEZE_FS;
F_FULLFSYNC : constant := sys.fcntl.F_FULLFSYNC;
F_GETFD : constant := sys.fcntl.F_GETFD;
F_GETFL : constant := sys.fcntl.F_GETFL;
F_GETLK : constant := sys.fcntl.F_GETLK;
F_GETOWN : constant := sys.fcntl.F_GETOWN;
F_GETPATH : constant := sys.fcntl.F_GETPATH;
F_GLOBAL_NOCACHE : constant := sys.fcntl.F_GLOBAL_NOCACHE;
F_LOG2PHYS : constant := sys.fcntl.F_LOG2PHYS;
F_MARKDEPENDENCY : constant := sys.fcntl.F_MARKDEPENDENCY;
F_NOCACHE : constant := sys.fcntl.F_NOCACHE;
F_PATHPKG_CHECK : constant := sys.fcntl.F_PATHPKG_CHECK;
F_PEOFPOSMODE : constant := sys.fcntl.F_PEOFPOSMODE;
F_PREALLOCATE : constant := sys.fcntl.F_PREALLOCATE;
F_RDADVISE : constant := sys.fcntl.F_RDADVISE;
F_RDAHEAD : constant := sys.fcntl.F_RDAHEAD;
F_RDLCK : constant := sys.fcntl.F_RDLCK;
F_READBOOTSTRAP : constant := sys.fcntl.F_READBOOTSTRAP;
F_SETFD : constant := sys.fcntl.F_SETFD;
F_SETFL : constant := sys.fcntl.F_SETFL;
F_SETLK : constant := sys.fcntl.F_SETLK;
F_SETLKW : constant := sys.fcntl.F_SETLKW;
F_SETOWN : constant := sys.fcntl.F_SETOWN;
F_SETSIZE : constant := sys.fcntl.F_SETSIZE;
F_THAW_FS : constant := sys.fcntl.F_THAW_FS;
F_UNLCK : constant := sys.fcntl.F_UNLCK;
F_VOLPOSMODE : constant := sys.fcntl.F_VOLPOSMODE;
F_WRITEBOOTSTRAP : constant := sys.fcntl.F_WRITEBOOTSTRAP;
F_WRLCK : constant := sys.fcntl.F_WRLCK;
LOCK_EX : constant := sys.fcntl.LOCK_EX;
LOCK_NB : constant := sys.fcntl.LOCK_NB;
LOCK_SH : constant := sys.fcntl.LOCK_SH;
LOCK_UN : constant := sys.fcntl.LOCK_UN;
O_ACCMODE : constant := sys.fcntl.O_ACCMODE;
O_ALERT : constant := sys.fcntl.O_ALERT;
O_APPEND : constant := sys.fcntl.O_APPEND;
O_ASYNC : constant := sys.fcntl.O_ASYNC;
O_CREAT : constant := sys.fcntl.O_CREAT;
O_DIRECTORY : constant := sys.fcntl.O_DIRECTORY;
O_EVTONLY : constant := sys.fcntl.O_EVTONLY;
O_EXCL : constant := sys.fcntl.O_EXCL;
O_EXLOCK : constant := sys.fcntl.O_EXLOCK;
O_FSYNC : constant := sys.fcntl.O_FSYNC;
O_NDELAY : constant := sys.fcntl.O_NDELAY;
O_NOCTTY : constant := sys.fcntl.O_NOCTTY;
O_NOFOLLOW : constant := sys.fcntl.O_NOFOLLOW;
O_NONBLOCK : constant := sys.fcntl.O_NONBLOCK;
O_POPUP : constant := sys.fcntl.O_POPUP;
O_RDONLY : constant := sys.fcntl.O_RDONLY;
O_RDWR : constant := sys.fcntl.O_RDWR;
O_SHLOCK : constant := sys.fcntl.O_SHLOCK;
O_SYMLINK : constant := sys.fcntl.O_SYMLINK;
O_SYNC : constant := sys.fcntl.O_SYNC;
O_TRUNC : constant := sys.fcntl.O_TRUNC;
O_WRONLY : constant := sys.fcntl.O_WRONLY;
S_IEXEC : constant := sys.fcntl.S_IEXEC;
S_IFBLK : constant := sys.fcntl.S_IFBLK;
S_IFCHR : constant := sys.fcntl.S_IFCHR;
S_IFDIR : constant := sys.fcntl.S_IFDIR;
S_IFIFO : constant := sys.fcntl.S_IFIFO;
S_IFLNK : constant := sys.fcntl.S_IFLNK;
S_IFMT : constant := sys.fcntl.S_IFMT;
S_IFREG : constant := sys.fcntl.S_IFREG;
S_IFSOCK : constant := sys.fcntl.S_IFSOCK;
S_IFWHT : constant := sys.fcntl.S_IFWHT;
S_IFXATTR : constant := sys.fcntl.S_IFXATTR;
S_IREAD : constant := sys.fcntl.S_IREAD;
S_IRGRP : constant := sys.fcntl.S_IRGRP;
S_IROTH : constant := sys.fcntl.S_IROTH;
S_IRUSR : constant := sys.fcntl.S_IRUSR;
S_IRWXG : constant := sys.fcntl.S_IRWXG;
S_IRWXO : constant := sys.fcntl.S_IRWXO;
S_IRWXU : constant := sys.fcntl.S_IRWXU;
S_ISGID : constant := sys.fcntl.S_ISGID;
S_ISTXT : constant := sys.fcntl.S_ISTXT;
S_ISUID : constant := sys.fcntl.S_ISUID;
S_ISVTX : constant := sys.fcntl.S_ISVTX;
S_IWGRP : constant := sys.fcntl.S_IWGRP;
S_IWOTH : constant := sys.fcntl.S_IWOTH;
S_IWRITE : constant := sys.fcntl.S_IWRITE;
S_IWUSR : constant := sys.fcntl.S_IWUSR;
S_IXGRP : constant := sys.fcntl.S_IXGRP;
S_IXOTH : constant := sys.fcntl.S_IXOTH;
S_IXUSR : constant := sys.fcntl.S_IXUSR;
FILESEC_REMOVE_ACL : void_ptr renames sys.fcntl.FILESEC_REMOVE_ACL;
-- qFILESEC_T renames sys.fcntl.qFILESEC_T (empty)
FILESEC_UNSET_PROPERTY : void_ptr
renames sys.fcntl.FILESEC_UNSET_PROPERTY;
-- SYS_FCNTL_H renames sys.fcntl.SYS_FCNTL_H (empty)
type struct_extern_file;
type struct_extern_file_ptr is access all struct_extern_file;
for struct_extern_file_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_extern_file_ptr);
pragma Convention (C, struct_extern_file_ptr);
type struct_extern_file_ptr_ptr is access all struct_extern_file_ptr;
for struct_extern_file_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_extern_file_ptr_ptr);
pragma Convention (C, struct_extern_file_ptr_ptr);
type struct_871d219b is record
le_next : aliased struct_extern_file_ptr;
le_prev : aliased struct_extern_file_ptr_ptr;
end record;
for struct_871d219b'Alignment use 4;
pragma Convention (C_Pass_By_Copy, struct_871d219b);
type struct_extern_file is record
f_list : aliased struct_871d219b;
f_flag : aliased signed_short;
f_type : aliased signed_short;
f_count : aliased signed_short;
f_msgcount : aliased signed_short;
f_cred : aliased sys.ucred.kauth_cred_t;
f_ops : aliased void_ptr;
f_offset : aliased sys.types.off_t;
f_data : aliased sys.types.caddr_t;
end record;
for struct_extern_file'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_extern_file);
-- _SYS_FILE_H_ (empty)
end C.sys.file;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
FIOASYNC : constant := 2147772029;
FIOCLEX : constant := 536897025;
FIODTYPE : constant := 1074030202;
FIOGETOWN : constant := 1074030203;
FIONBIO : constant := 2147772030;
FIONCLEX : constant := 536897026;
FIONREAD : constant := 1074030207;
FIOSETOWN : constant := 2147772028;
-- _SYS_FILIO_H_ (empty)
end C.sys.filio;
-- This file is translated by "headmaster" version 0.27-2060155 (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.ioccom is
pragma Preelaborate;
-- IOCBASECMD (function macro)
-- IOCGROUP (function macro)
-- IOCPARM_LEN (function macro)
IOCPARM_MASK : constant := 8191;
IOCPARM_MAX : constant := 8192;
IOC_DIRMASK : constant := 3758096384;
IOC_IN : constant := 2147483648;
IOC_INOUT : constant := 3221225472;
IOC_OUT : constant := 1073741824;
IOC_VOID : constant := 536870912;
-- _IO (function macro)
-- _IOC (function macro)
-- _IOR (function macro)
-- _IOW (function macro)
-- _IOWR (function macro)
-- _SYS_IOCCOM_H_ (empty)
end C.sys.ioccom;
-- This file is translated by "headmaster" version 0.27-2060155 (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.ioctl is
pragma Preelaborate;
subtype struct_winsize is sys.ttycom.struct_winsize;
PPPDISC : constant := sys.ttycom.PPPDISC;
SLIPDISC : constant := sys.ttycom.SLIPDISC;
TABLDISC : constant := sys.ttycom.TABLDISC;
TIOCCBRK : constant := sys.ttycom.TIOCCBRK;
TIOCCDTR : constant := sys.ttycom.TIOCCDTR;
TIOCCONS : constant := sys.ttycom.TIOCCONS;
TIOCDCDTIMESTAMP : constant := sys.ttycom.TIOCDCDTIMESTAMP;
TIOCDRAIN : constant := sys.ttycom.TIOCDRAIN;
TIOCDSIMICROCODE : constant := sys.ttycom.TIOCDSIMICROCODE;
TIOCEXCL : constant := sys.ttycom.TIOCEXCL;
TIOCEXT : constant := sys.ttycom.TIOCEXT;
TIOCFLUSH : constant := sys.ttycom.TIOCFLUSH;
TIOCGDRAINWAIT : constant := sys.ttycom.TIOCGDRAINWAIT;
TIOCGETA : constant := sys.ttycom.TIOCGETA;
TIOCGETD : constant := sys.ttycom.TIOCGETD;
TIOCGPGRP : constant := sys.ttycom.TIOCGPGRP;
TIOCGWINSZ : constant := sys.ttycom.TIOCGWINSZ;
TIOCIXOFF : constant := sys.ttycom.TIOCIXOFF;
TIOCIXON : constant := sys.ttycom.TIOCIXON;
TIOCMBIC : constant := sys.ttycom.TIOCMBIC;
TIOCMBIS : constant := sys.ttycom.TIOCMBIS;
TIOCMGDTRWAIT : constant := sys.ttycom.TIOCMGDTRWAIT;
TIOCMGET : constant := sys.ttycom.TIOCMGET;
TIOCMODG : constant := sys.ttycom.TIOCMODG;
TIOCMODS : constant := sys.ttycom.TIOCMODS;
TIOCMSDTRWAIT : constant := sys.ttycom.TIOCMSDTRWAIT;
TIOCMSET : constant := sys.ttycom.TIOCMSET;
TIOCM_CAR : constant := sys.ttycom.TIOCM_CAR;
TIOCM_CD : constant := sys.ttycom.TIOCM_CD;
TIOCM_CTS : constant := sys.ttycom.TIOCM_CTS;
TIOCM_DSR : constant := sys.ttycom.TIOCM_DSR;
TIOCM_DTR : constant := sys.ttycom.TIOCM_DTR;
TIOCM_LE : constant := sys.ttycom.TIOCM_LE;
TIOCM_RI : constant := sys.ttycom.TIOCM_RI;
TIOCM_RNG : constant := sys.ttycom.TIOCM_RNG;
TIOCM_RTS : constant := sys.ttycom.TIOCM_RTS;
TIOCM_SR : constant := sys.ttycom.TIOCM_SR;
TIOCM_ST : constant := sys.ttycom.TIOCM_ST;
TIOCNOTTY : constant := sys.ttycom.TIOCNOTTY;
TIOCNXCL : constant := sys.ttycom.TIOCNXCL;
TIOCOUTQ : constant := sys.ttycom.TIOCOUTQ;
TIOCPKT : constant := sys.ttycom.TIOCPKT;
TIOCPKT_DATA : constant := sys.ttycom.TIOCPKT_DATA;
TIOCPKT_DOSTOP : constant := sys.ttycom.TIOCPKT_DOSTOP;
TIOCPKT_FLUSHREAD : constant := sys.ttycom.TIOCPKT_FLUSHREAD;
TIOCPKT_FLUSHWRITE : constant := sys.ttycom.TIOCPKT_FLUSHWRITE;
TIOCPKT_IOCTL : constant := sys.ttycom.TIOCPKT_IOCTL;
TIOCPKT_NOSTOP : constant := sys.ttycom.TIOCPKT_NOSTOP;
TIOCPKT_START : constant := sys.ttycom.TIOCPKT_START;
TIOCPKT_STOP : constant := sys.ttycom.TIOCPKT_STOP;
TIOCPTYGNAME : constant := sys.ttycom.TIOCPTYGNAME;
TIOCPTYGRANT : constant := sys.ttycom.TIOCPTYGRANT;
TIOCPTYUNLK : constant := sys.ttycom.TIOCPTYUNLK;
TIOCREMOTE : constant := sys.ttycom.TIOCREMOTE;
TIOCSBRK : constant := sys.ttycom.TIOCSBRK;
TIOCSCONS : constant := sys.ttycom.TIOCSCONS;
TIOCSCTTY : constant := sys.ttycom.TIOCSCTTY;
TIOCSDRAINWAIT : constant := sys.ttycom.TIOCSDRAINWAIT;
TIOCSDTR : constant := sys.ttycom.TIOCSDTR;
TIOCSETA : constant := sys.ttycom.TIOCSETA;
TIOCSETAF : constant := sys.ttycom.TIOCSETAF;
TIOCSETAW : constant := sys.ttycom.TIOCSETAW;
TIOCSETD : constant := sys.ttycom.TIOCSETD;
TIOCSIG : constant := sys.ttycom.TIOCSIG;
TIOCSPGRP : constant := sys.ttycom.TIOCSPGRP;
TIOCSTART : constant := sys.ttycom.TIOCSTART;
TIOCSTAT : constant := sys.ttycom.TIOCSTAT;
TIOCSTI : constant := sys.ttycom.TIOCSTI;
TIOCSTOP : constant := sys.ttycom.TIOCSTOP;
TIOCSWINSZ : constant := sys.ttycom.TIOCSWINSZ;
TIOCTIMESTAMP : constant := sys.ttycom.TIOCTIMESTAMP;
TIOCUCNTL : constant := sys.ttycom.TIOCUCNTL;
TTYDISC : constant := sys.ttycom.TTYDISC;
-- UIOCCMD renames sys.ttycom.UIOCCMD (function macro)
-- SYS_TTYCOM_H renames sys.ttycom.SYS_TTYCOM_H (empty)
type struct_ttysize;
type struct_ttysize is record
ts_lines : aliased unsigned_short;
ts_cols : aliased unsigned_short;
ts_xxx : aliased unsigned_short;
ts_yyy : aliased unsigned_short;
end record;
pragma Convention (C_Pass_By_Copy, struct_ttysize);
function ioctl (a1 : signed_int; a2 : unsigned_long) return signed_int;
function ioctl (a1 : signed_int; a2 : unsigned_long;
a3 : access sys.ttycom.struct_winsize) return signed_int;
pragma Import (C, ioctl, "ioctl");
TIOCGSIZE : constant := 1074295912;
TIOCSSIZE : constant := 2148037735;
-- _SYS_IOCTL_H_ (empty)
end C.sys.ioctl;
-- This file is translated by "headmaster" version 0.27-2060155 (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.lock is
pragma Preelaborate;
-- _SYS_LOCK_H_ (empty)
end C.sys.lock;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mman is
pragma Preelaborate;
function mlockall (a1 : signed_int) return signed_int;
pragma Import (C, mlockall, "mlockall");
function munlockall return signed_int;
pragma Import (C, munlockall, "munlockall");
function mlock (a1 : void_const_ptr; a2 : stddef.size_t)
return signed_int;
pragma Import (C, mlock, "mlock");
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;
pragma Import (C, mmap, "mmap$UNIX2003");
function mprotect (a1 : void_ptr; a2 : stddef.size_t; a3 : signed_int)
return signed_int;
pragma Import (C, mprotect, "mprotect$UNIX2003");
function msync (a1 : void_ptr; a2 : stddef.size_t; a3 : signed_int)
return signed_int;
pragma Import (C, msync, "msync$UNIX2003");
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$UNIX2003");
function shm_open (a1 : access constant char; a2 : signed_int)
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");
function posix_madvise (a1 : void_ptr; a2 : stddef.size_t;
a3 : signed_int) return signed_int;
pragma Import (C, posix_madvise, "posix_madvise");
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");
MADV_DONTNEED : constant := 4;
MADV_FREE : constant := 5;
MADV_NORMAL : constant := 0;
MADV_RANDOM : constant := 1;
MADV_SEQUENTIAL : constant := 2;
MADV_WILLNEED : constant := 3;
MAP_ANON : 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_NOCACHE : constant := 1024;
MAP_NOEXTEND : constant := 256;
MAP_NORESERVE : constant := 64;
MAP_PRIVATE : constant := 2;
MAP_RENAME : constant := 32;
MAP_RESERVED0080 : constant := 128;
MAP_SHARED : constant := 1;
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;
MS_ASYNC : constant := 1;
MS_DEACTIVATE : constant := 8;
MS_INVALIDATE : constant := 2;
MS_KILLPAGES : constant := 4;
MS_SYNC : constant := 16;
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;
-- _MMAP (empty)
-- _SYS_MMAN_H_ (empty)
end C.sys.mman;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.types;
with C.stddef;
with C.stdint;
with C.sys.proc;
with C.sys.types;
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_statfs64;
type struct_statfs64 is record
f_bsize : aliased stdint.uint32_t;
f_iosize : aliased stdint.int32_t;
f_blocks : aliased stdint.uint64_t;
f_bfree : aliased stdint.uint64_t;
f_bavail : aliased stdint.uint64_t;
f_files : aliased stdint.uint64_t;
f_ffree : aliased stdint.uint64_t;
f_fsid : aliased fsid_t;
f_owner : aliased sys.types.uid_t;
f_type : aliased stdint.uint32_t;
f_flags : aliased stdint.uint32_t;
f_fssubtype : aliased stdint.uint32_t;
f_fstypename : aliased char_array (0 .. 15);
f_mntonname : aliased char_array (0 .. 1023);
f_mntfromname : aliased char_array (0 .. 1023);
f_reserved : aliased stdint.uint32_t_array (0 .. 7);
end record;
pragma Convention (C_Pass_By_Copy, struct_statfs64);
type struct_statfs64_ptr is access all struct_statfs64;
for struct_statfs64_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_statfs64_ptr);
pragma Convention (C, struct_statfs64_ptr);
type struct_statfs64_ptr_ptr is access all struct_statfs64_ptr;
for struct_statfs64_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_statfs64_ptr_ptr);
pragma Convention (C, struct_statfs64_ptr_ptr);
type struct_statfs;
type struct_statfs is record
f_otype : aliased signed_short;
f_oflags : aliased signed_short;
f_bsize : aliased signed_long;
f_iosize : aliased signed_long;
f_blocks : aliased signed_long;
f_bfree : aliased signed_long;
f_bavail : aliased signed_long;
f_files : aliased signed_long;
f_ffree : aliased signed_long;
f_fsid : aliased fsid_t;
f_owner : aliased sys.types.uid_t;
f_reserved1 : aliased signed_short;
f_type : aliased signed_short;
f_flags : aliased signed_long;
f_reserved2 : aliased signed_long_array (0 .. 1);
f_fstypename : aliased char_array (0 .. 14);
f_mntonname : aliased char_array (0 .. 89);
f_mntfromname : aliased char_array (0 .. 89);
f_reserved3 : aliased char;
f_reserved4 : aliased signed_long_array (0 .. 3);
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_vfsstatfs;
type struct_vfsstatfs is record
f_bsize : aliased stdint.uint32_t;
f_iosize : aliased stddef.size_t;
f_blocks : aliased stdint.uint64_t;
f_bfree : aliased stdint.uint64_t;
f_bavail : aliased stdint.uint64_t;
f_bused : aliased stdint.uint64_t;
f_files : aliased stdint.uint64_t;
f_ffree : aliased stdint.uint64_t;
f_fsid : aliased fsid_t;
f_owner : aliased sys.types.uid_t;
f_flags : aliased stdint.uint64_t;
f_fstypename : aliased char_array (0 .. 15);
f_mntonname : aliased char_array (0 .. 1023);
f_mntfromname : aliased char_array (0 .. 1023);
f_fssubtype : aliased stdint.uint32_t;
f_reserved : aliased void_ptr_array (0 .. 1);
end record;
for struct_vfsstatfs'Alignment use 8;
pragma Convention (C_Pass_By_Copy, struct_vfsstatfs);
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);
subtype mount_t is struct_mount_ptr;
subtype vnode_t is sys.proc.struct_vnode_ptr;
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_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 access_31217367 is access function (a1 : access struct_mount;
a2 : access sys.proc.struct_vnode) return signed_int;
pragma Convention (C, access_31217367);
type struct_vfsconf is record
vfc_vfsops : aliased struct_vfsops_ptr;
vfc_name : aliased char_array (0 .. 14);
vfc_typenum : aliased signed_int;
vfc_refcount : aliased signed_int;
vfc_flags : aliased signed_int;
vfc_mountroot : aliased access_31217367;
vfc_next : aliased struct_vfsconf_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_vfsconf);
type struct_vfsidctl;
type struct_vfsidctl is record
vc_vers : aliased signed_int;
vc_fsid : aliased fsid_t;
vc_ptr : aliased void_ptr;
vc_len : aliased stddef.size_t;
vc_spare : aliased i386.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 i386.types.u_int32_t;
vq_spare : aliased i386.types.u_int32_t_array (0 .. 30);
end record;
pragma Convention (C_Pass_By_Copy, struct_vfsquery);
type struct_fhandle;
type struct_fhandle is record
fh_len : aliased signed_int;
fh_data : aliased unsigned_char_array (0 .. 127);
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;
function fhopen (a1 : access constant struct_fhandle; a2 : signed_int)
return signed_int;
pragma Import (C, fhopen, "fhopen");
function fstatfs (a1 : signed_int; a2 : access struct_statfs)
return signed_int;
pragma Import (C, fstatfs, "fstatfs");
function fstatfs64 (a1 : signed_int; a2 : access struct_statfs64)
return signed_int;
pragma Import (C, fstatfs64, "fstatfs64");
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_int;
a3 : signed_int) return signed_int;
pragma Import (C, getfsstat, "getfsstat");
function getfsstat64 (a1 : access struct_statfs64; a2 : signed_int;
a3 : signed_int) return signed_int;
pragma Import (C, getfsstat64, "getfsstat64");
function getmntinfo (a1 : access struct_statfs_ptr; a2 : signed_int)
return signed_int;
pragma Import (C, getmntinfo, "getmntinfo");
function getmntinfo64 (a1 : access struct_statfs64_ptr; a2 : signed_int)
return signed_int;
pragma Import (C, getmntinfo64, "getmntinfo64");
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 statfs (a1 : access constant char; a2 : access struct_statfs)
return signed_int;
pragma Import (C, statfs, "statfs");
function statfs64 (a1 : access constant char; a2 : access struct_statfs64)
return signed_int;
pragma Import (C, statfs64, "statfs64");
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_vfsconf) return signed_int;
pragma Import (C, getvfsbyname, "getvfsbyname");
MFSNAMELEN : constant := 15;
MFSTYPENAMELEN : constant := 16;
MNAMELEN : constant := 90;
MNT_ASYNC : constant := 64;
MNT_AUTOMOUNTED : constant := 4194304;
MNT_CMDFLAGS : constant := 851968;
MNT_DEFWRITE : constant := 33554432;
MNT_DONTBROWSE : constant := 1048576;
MNT_DOVOLFS : constant := 32768;
MNT_EXPORTED : constant := 256;
MNT_FORCE : constant := 524288;
MNT_IGNORE_OWNERSHIP : constant := 2097152;
MNT_JOURNALED : constant := 8388608;
MNT_LOCAL : constant := 4096;
MNT_MULTILABEL : constant := 67108864;
MNT_NOATIME : constant := 268435456;
MNT_NODEV : constant := 16;
MNT_NOEXEC : constant := 4;
MNT_NOSUID : constant := 8;
MNT_NOUSERXATTR : constant := 16777216;
MNT_NOWAIT : constant := 2;
MNT_QUARANTINE : constant := 1024;
MNT_QUOTA : constant := 8192;
MNT_RDONLY : constant := 1;
MNT_RELOAD : constant := 262144;
MNT_ROOTFS : constant := 16384;
MNT_SYNCHRONOUS : constant := 2;
MNT_UNION : constant := 32;
MNT_UNKNOWNPERMISSIONS : constant := 2097152;
MNT_UPDATE : constant := 65536;
MNT_VISFLAGMASK : constant := 401667455;
MNT_WAIT : constant := 1;
NFSV2_MAX_FH_SIZE : constant := 32;
NFSV3_MAX_FH_SIZE : constant := 64;
NFSV4_MAX_FH_SIZE : constant := 128;
NFS_MAX_FH_SIZE : constant := 128;
VFS_CONF : constant := 2;
VFS_CTL_NEWADDR : constant := 65540;
VFS_CTL_NOLOCKS : constant := 65542;
VFS_CTL_QUERY : constant := 65539;
VFS_CTL_STATFS : constant := 65537;
VFS_CTL_TIMEO : constant := 65541;
VFS_CTL_UMOUNT : constant := 65538;
VFS_CTL_VERS1 : constant := 1;
VFS_GENERIC : constant := 0;
VFS_MAXTYPENUM : constant := 1;
VFS_NUMMNTOPS : constant := 1;
VFS_SET_PACKAGE_EXTS : constant := 3;
VQ_ASSIST : constant := 64;
VQ_DEAD : constant := 32;
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;
VQ_UPDATE : constant := 256;
-- _SYS_MOUNT_H_ (empty)
-- __DARWIN_STRUCT_STATFS64 (unparsible)
private
type struct_mount is null record;
type struct_vfsops is null record;
end C.sys.mount;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
BSD : constant := 199506;
BSD4_3 : constant := 1;
BSD4_4 : constant := 1;
CBLOCK : constant := 64;
CBQSIZE : constant := 8;
-- CBSIZE (unparsible)
CLBYTES : constant := 4096;
CLOFF : constant := 4095;
CLOFSET : constant := 4095;
CLSHIFT : constant := 12;
CMASK : constant := 18;
CROUND : constant := 63;
FSCALE : constant := 2048;
FSHIFT : constant := 11;
-- MAX (function macro)
MAXALLOCSAVE : constant := 8192;
MAXBSIZE : constant := 1048576;
MAXCOMLEN : constant := 16;
MAXDOMNAMELEN : constant := 256;
MAXFRAG : constant := 8;
MAXHOSTNAMELEN : constant := 256;
MAXINTERP : constant := 64;
MAXLOGNAME : constant := 255;
MAXPATHLEN : constant := 1024;
MAXPHYSIO : constant := 131072;
MAXPHYSIO_WIRED : constant := 16777216;
MAXPRI : constant := 127;
MAXSYMLINKS : constant := 32;
MAXUPRC : constant := 266;
-- MIN (function macro)
MINBUCKET : constant := 4;
NBPW : constant := 4;
NCARGS : constant := 262144;
NGROUPS : constant := 16;
NODEV : constant := -1;
NOFILE : constant := 256;
NOGROUP : constant := 65535;
NeXTBSD : constant := 1995064;
NeXTBSD4_0 : constant := 0;
PCATCH : constant := 256;
PDROP : constant := 1024;
PINOD : constant := 8;
PLOCK : constant := 36;
PPAUSE : constant := 40;
PRIBIO : constant := 16;
PRIMASK : constant := 255;
PSOCK : constant := 24;
PSWP : constant := 0;
PTTYBLOCK : constant := 512;
PUSER : constant := 50;
PVFS : constant := 20;
PVM : constant := 4;
PWAIT : constant := 32;
PZERO : constant := 22;
-- _SYS_PARAM_H_ (empty)
-- claligned (function macro)
-- clbase (function macro)
-- clrbit (function macro)
-- clrnd (function macro)
-- isclr (function macro)
-- isset (function macro)
-- powerof2 (function macro)
-- roundup (function macro)
-- setbit (function macro)
end C.sys.param;
-- This file is translated by "headmaster" version 0.27-2060155 (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.poll is
pragma Preelaborate;
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_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);
subtype nfds_t is unsigned_int;
function poll (a1 : access struct_pollfd; a2 : nfds_t; a3 : signed_int)
return signed_int;
pragma Import (C, poll, "poll$UNIX2003");
POLLATTRIB : constant := 1024;
POLLERR : constant := 8;
POLLEXTEND : constant := 512;
POLLHUP : constant := 16;
POLLIN : constant := 1;
POLLNLINK : constant := 2048;
POLLNVAL : constant := 32;
POLLOUT : constant := 4;
POLLPRI : constant := 2;
POLLRDBAND : constant := 128;
POLLRDNORM : constant := 64;
POLLSTANDARD : constant := 511;
POLLWRBAND : constant := 256;
POLLWRITE : constant := 4096;
POLLWRNORM : constant := 4;
-- _SYS_POLL_H_ (empty)
end C.sys.poll;
-- This file is translated by "headmaster" version 0.27-2060155 (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.mach.i386.boolean;
with C.sys.qstructs;
with C.sys.resource;
with C.sys.time;
with C.sys.types;
with C.sys.ucontext;
with C.sys.vm;
package C.sys.proc is
pragma Preelaborate;
type struct_session (<>) is limited private;
type struct_session_ptr is access all struct_session;
for struct_session_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_session_ptr);
pragma Convention (C, struct_session_ptr);
type struct_pgrp (<>) is limited private;
type struct_pgrp_ptr is access all struct_pgrp;
for struct_pgrp_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_pgrp_ptr);
pragma Convention (C, struct_pgrp_ptr);
type struct_proc (<>) is limited private;
type struct_proc_ptr is access all struct_proc;
for struct_proc_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_proc_ptr);
pragma Convention (C, struct_proc_ptr);
type struct_extern_proc;
type struct_ab890437 is record
p_forw : aliased struct_proc_ptr;
p_back : aliased struct_proc_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_ab890437);
type union_5180fe22 (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
p_st1 : struct_ab890437;
when others =>
p_starttime : sys.qstructs.struct_timeval;
end case;
end record;
pragma Unchecked_Union (union_5180fe22);
pragma Convention (C_Pass_By_Copy, union_5180fe22);
type struct_sigacts (<>) is limited private;
type struct_sigacts_ptr is access all struct_sigacts;
for struct_sigacts_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_sigacts_ptr);
pragma Convention (C, struct_sigacts_ptr);
type struct_vnode (<>) is limited private;
type struct_vnode_ptr is access all struct_vnode;
for struct_vnode_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vnode_ptr);
pragma Convention (C, struct_vnode_ptr);
type struct_user (<>) is limited private;
type struct_user_ptr is access all struct_user;
for struct_user_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_user_ptr);
pragma Convention (C, struct_user_ptr);
type struct_extern_proc is record
p_un : aliased union_5180fe22;
p_vmspace : aliased sys.vm.struct_vmspace_ptr;
p_sigacts : aliased struct_sigacts_ptr;
p_flag : aliased signed_int;
p_stat : aliased char;
p_pid : aliased sys.types.pid_t;
p_oppid : aliased sys.types.pid_t;
p_dupfd : aliased signed_int;
user_stack : aliased sys.types.caddr_t;
exit_thread : aliased void_ptr;
p_debugger : aliased signed_int;
sigwait : aliased mach.i386.boolean.boolean_t;
p_estcpu : aliased sys.types.u_int;
p_cpticks : aliased signed_int;
p_pctcpu : aliased sys.types.fixpt_t;
p_wchan : aliased void_ptr;
p_wmesg : aliased char_ptr;
p_swtime : aliased sys.types.u_int;
p_slptime : aliased sys.types.u_int;
p_realtimer : aliased sys.time.struct_itimerval;
p_rtime : aliased sys.qstructs.struct_timeval;
p_uticks : aliased sys.types.u_quad_t;
p_sticks : aliased sys.types.u_quad_t;
p_iticks : aliased sys.types.u_quad_t;
p_traceflag : aliased signed_int;
p_tracep : aliased struct_vnode_ptr;
p_siglist : aliased signed_int;
p_textvp : aliased struct_vnode_ptr;
p_holdcnt : aliased signed_int;
p_sigmask : aliased sys.ucontext.sigset_t;
p_sigignore : aliased sys.ucontext.sigset_t;
p_sigcatch : aliased sys.ucontext.sigset_t;
p_priority : aliased sys.types.u_char;
p_usrpri : aliased sys.types.u_char;
p_nice : aliased char;
p_comm : aliased char_array (0 .. 16);
p_pgrp : aliased struct_pgrp_ptr;
p_addr : aliased struct_user_ptr;
p_xstat : aliased sys.types.u_short;
p_acflag : aliased sys.types.u_short;
p_ru : aliased sys.resource.struct_rusage_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_extern_proc);
-- PROC_DEF_ENABLED (empty)
P_ADVLOCK : constant := 1;
P_AFFINITY : constant := 65536;
P_CHECKOPENEVT : constant := 524288;
P_CLASSIC : constant := 131072;
P_CONTINUED : constant := 128;
P_CONTROLT : constant := 2;
P_DEPENDENCY_CAPABLE : constant := 1048576;
P_EXEC : constant := 16384;
P_FORCEQUOTA : constant := 536870912;
P_FSTRACE : constant := 0;
P_INMEM : constant := 0;
P_LP64 : constant := 4;
P_NOCLDSTOP : constant := 8;
P_NOCLDWAIT : constant := 1073741824;
P_NOREMOTEHANG : constant := -2147483648;
P_NOSHLIB : constant := 268435456;
P_NOSWAP : constant := 0;
P_OWEUPC : constant := 32768;
P_PHYSIO : constant := 0;
P_PPWAIT : constant := 16;
P_PROFIL : constant := 32;
P_REBOOT : constant := 2097152;
P_RESV10 : constant := 67108864;
P_RESV11 : constant := 134217728;
P_RESV3 : constant := 4096;
P_RESV5 : constant := 262144;
P_RESV7 : constant := 8388608;
P_RESV9 : constant := 33554432;
P_SELECT : constant := 64;
P_SSTEP : constant := 0;
P_SUGID : constant := 256;
P_SYSTEM : constant := 512;
P_TBE : constant := 4194304;
P_THCWD : constant := 16777216;
P_TIMEOUT : constant := 1024;
P_TRACED : constant := 2048;
P_TRANSLATED : constant := 131072;
P_WEXIT : constant := 8192;
SIDL : constant := 1;
SRUN : constant := 2;
SSLEEP : constant := 3;
SSTOP : constant := 4;
SZOMB : constant := 5;
-- _SYS_PROC_H_ (empty)
-- .p_back renames .p_un.p_st1.__p_back (accessor)
-- .p_forw renames .p_un.p_st1.__p_forw (accessor)
-- .p_starttime renames .p_un.__p_starttime (accessor)
private
type struct_session is null record;
type struct_pgrp is null record;
type struct_proc is null record;
type struct_sigacts is null record;
type struct_vnode is null record;
type struct_user is null record;
end C.sys.proc;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qendian is
pragma Preelaborate;
-- HTONL (function macro)
-- HTONS (function macro)
-- NTOHL (function macro)
-- NTOHS (function macro)
-- _SYS__ENDIAN_H_ (empty)
-- htonl (function macro)
-- htons (function macro)
-- ntohl (function macro)
-- ntohs (function macro)
end C.sys.qendian;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qstructs;
package C.sys.qselect is
pragma Preelaborate;
function C_select (a1 : signed_int; a2 : access sys.qstructs.fd_set;
a3 : access sys.qstructs.fd_set; a4 : access sys.qstructs.fd_set;
a5 : access sys.qstructs.struct_timeval) return signed_int;
pragma Import (C, C_select, "select$UNIX2003");
-- _SYS__SELECT_H_ (empty)
end C.sys.qselect;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qstructs is
function qqdarwin_fd_isset (n : signed_int; p : access struct_fd_set)
return signed_int is
begin
return signed_int (
unsigned_int'Mod (p.fds_bits (size_t (unsigned_int'Mod (n) / 32)))
and unsigned_int'Mod (signed_int'(Shift_Left (1,
Natural (unsigned_int'Mod (n) rem 32)))));
end qqdarwin_fd_isset;
end C.sys.qstructs;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qstructs;
with C.i386.qtypes;
with C.sys.qtypes;
package C.sys.qstructs is
pragma Preelaborate;
type struct_fd_set;
type struct_fd_set is record
fds_bits : aliased i386.qtypes.int32_t_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 qqdarwin_fd_isset (n : signed_int; p : access struct_fd_set)
return signed_int;
pragma Convention (C, qqdarwin_fd_isset);
pragma Inline (qqdarwin_fd_isset);
-- #include <sys/types.h>
-- #include <mach/i386/_structs.h>
-- #include <i386/_structs.h>
type struct_darwin_sigaltstack;
type struct_darwin_sigaltstack is record
ss_sp : aliased void_ptr;
ss_size : aliased i386.qtypes.darwin_size_t;
ss_flags : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_sigaltstack);
type struct_darwin_sigaltstack_const_ptr is
access constant struct_darwin_sigaltstack;
for struct_darwin_sigaltstack_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_darwin_sigaltstack_const_ptr);
pragma Convention (C, struct_darwin_sigaltstack_const_ptr);
type struct_darwin_sigaltstack_ptr is
access all struct_darwin_sigaltstack;
for struct_darwin_sigaltstack_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_darwin_sigaltstack_ptr);
pragma Convention (C, struct_darwin_sigaltstack_ptr);
type struct_darwin_ucontext;
type struct_darwin_ucontext_ptr is access all struct_darwin_ucontext;
for struct_darwin_ucontext_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_darwin_ucontext_ptr);
pragma Convention (C, struct_darwin_ucontext_ptr);
type struct_darwin_ucontext is record
uc_onstack : aliased signed_int;
uc_sigmask : aliased sys.qtypes.darwin_sigset_t;
uc_stack : aliased struct_darwin_sigaltstack;
uc_link : aliased struct_darwin_ucontext_ptr;
uc_mcsize : aliased i386.qtypes.darwin_size_t;
uc_mcontext : aliased i386.qstructs.struct_darwin_mcontext32_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_ucontext);
subtype stack_t is struct_darwin_sigaltstack;
subtype stack_t_const_ptr is struct_darwin_sigaltstack_const_ptr;
subtype stack_t_ptr is struct_darwin_sigaltstack_ptr;
subtype ucontext_t is struct_darwin_ucontext;
-- #include <sys/ucontext.h>
-- #include <_types.h>
-- #include <i386/signal.h>
-- #include <sys/signal.h>
-- #include <signal.h>
type struct_timespec;
type struct_timespec is record
tv_sec : aliased i386.qtypes.darwin_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);
-- #include <time.h>
type struct_timeval;
type struct_timeval is record
tv_sec : aliased i386.qtypes.darwin_time_t;
tv_usec : aliased sys.qtypes.darwin_suseconds_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_timeval);
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_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);
-- _FD_SET (empty)
-- _STACK_T (empty)
subtype STRUCT_SIGALTSTACK is struct_darwin_sigaltstack;
subtype qSTRUCT_TIMESPEC is struct_timespec;
subtype qSTRUCT_TIMEVAL is struct_timeval;
subtype STRUCT_UCONTEXT is struct_darwin_ucontext;
-- _UCONTEXT_T (empty)
-- __DARWIN_FD_CLR (uninterpretable)
-- __DARWIN_FD_COPY (unparsible)
-- __DARWIN_FD_ISSET (function macro)
-- __DARWIN_FD_SET (uninterpretable)
DARWIN_FD_SETSIZE : constant := 1024;
-- __DARWIN_FD_ZERO (function macro)
DARWIN_NBBY : constant := 8;
DARWIN_NFDBITS : constant := 32;
-- __DARWIN_howmany (function macro)
end C.sys.qstructs;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
package C.sys.qtypes is
pragma Preelaborate;
type struct_darwin_pthread_handler_rec;
type struct_darwin_pthread_handler_rec_ptr is
access all struct_darwin_pthread_handler_rec;
for struct_darwin_pthread_handler_rec_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_darwin_pthread_handler_rec_ptr);
pragma Convention (C, struct_darwin_pthread_handler_rec_ptr);
type access_b3458e0b is access procedure (a1 : void_ptr);
pragma Convention (C, access_b3458e0b);
type struct_darwin_pthread_handler_rec is record
routine : aliased access_b3458e0b;
arg : aliased void_ptr;
next : aliased struct_darwin_pthread_handler_rec_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_darwin_pthread_handler_rec);
type struct_opaque_pthread_attr_t;
type struct_opaque_pthread_attr_t is record
sig : aliased signed_long;
opaque : aliased char_array (0 .. 35);
end record;
pragma Convention (C_Pass_By_Copy, struct_opaque_pthread_attr_t);
type struct_opaque_pthread_attr_t_ptr is
access all struct_opaque_pthread_attr_t;
for struct_opaque_pthread_attr_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_attr_t_ptr);
pragma Convention (C, struct_opaque_pthread_attr_t_ptr);
type struct_opaque_pthread_attr_t_const_ptr is
access constant struct_opaque_pthread_attr_t;
for struct_opaque_pthread_attr_t_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_attr_t_const_ptr);
pragma Convention (C, struct_opaque_pthread_attr_t_const_ptr);
type struct_opaque_pthread_cond_t;
type struct_opaque_pthread_cond_t is record
sig : aliased signed_long;
opaque : aliased char_array (0 .. 23);
end record;
pragma Convention (C_Pass_By_Copy, struct_opaque_pthread_cond_t);
type struct_opaque_pthread_cond_t_ptr is
access all struct_opaque_pthread_cond_t;
for struct_opaque_pthread_cond_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_cond_t_ptr);
pragma Convention (C, struct_opaque_pthread_cond_t_ptr);
type struct_opaque_pthread_condattr_t;
type struct_opaque_pthread_condattr_t is record
sig : aliased signed_long;
opaque : aliased char_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_opaque_pthread_condattr_t);
type struct_opaque_pthread_condattr_t_const_ptr is
access constant struct_opaque_pthread_condattr_t;
for struct_opaque_pthread_condattr_t_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_condattr_t_const_ptr);
pragma Convention (C, struct_opaque_pthread_condattr_t_const_ptr);
type struct_opaque_pthread_condattr_t_ptr is
access all struct_opaque_pthread_condattr_t;
for struct_opaque_pthread_condattr_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_condattr_t_ptr);
pragma Convention (C, struct_opaque_pthread_condattr_t_ptr);
type struct_opaque_pthread_mutex_t;
type struct_opaque_pthread_mutex_t is record
sig : aliased signed_long;
opaque : aliased char_array (0 .. 39);
end record;
pragma Convention (C_Pass_By_Copy, struct_opaque_pthread_mutex_t);
type struct_opaque_pthread_mutex_t_ptr is
access all struct_opaque_pthread_mutex_t;
for struct_opaque_pthread_mutex_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_mutex_t_ptr);
pragma Convention (C, struct_opaque_pthread_mutex_t_ptr);
type struct_opaque_pthread_mutex_t_const_ptr is
access constant struct_opaque_pthread_mutex_t;
for struct_opaque_pthread_mutex_t_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_mutex_t_const_ptr);
pragma Convention (C, struct_opaque_pthread_mutex_t_const_ptr);
type struct_opaque_pthread_mutexattr_t;
type struct_opaque_pthread_mutexattr_t is record
sig : aliased signed_long;
opaque : aliased char_array (0 .. 7);
end record;
pragma Convention (C_Pass_By_Copy, struct_opaque_pthread_mutexattr_t);
type struct_opaque_pthread_mutexattr_t_const_ptr is
access constant struct_opaque_pthread_mutexattr_t;
for struct_opaque_pthread_mutexattr_t_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_mutexattr_t_const_ptr);
pragma Convention (C, struct_opaque_pthread_mutexattr_t_const_ptr);
type struct_opaque_pthread_mutexattr_t_ptr is
access all struct_opaque_pthread_mutexattr_t;
for struct_opaque_pthread_mutexattr_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_mutexattr_t_ptr);
pragma Convention (C, struct_opaque_pthread_mutexattr_t_ptr);
type struct_opaque_pthread_once_t;
type struct_opaque_pthread_once_t is record
sig : aliased signed_long;
opaque : aliased char_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_opaque_pthread_once_t);
type struct_opaque_pthread_once_t_ptr is
access all struct_opaque_pthread_once_t;
for struct_opaque_pthread_once_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_once_t_ptr);
pragma Convention (C, struct_opaque_pthread_once_t_ptr);
type struct_opaque_pthread_rwlock_t;
type struct_opaque_pthread_rwlock_t is record
sig : aliased signed_long;
opaque : aliased char_array (0 .. 123);
end record;
pragma Convention (C_Pass_By_Copy, struct_opaque_pthread_rwlock_t);
type struct_opaque_pthread_rwlock_t_ptr is
access all struct_opaque_pthread_rwlock_t;
for struct_opaque_pthread_rwlock_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_rwlock_t_ptr);
pragma Convention (C, struct_opaque_pthread_rwlock_t_ptr);
type struct_opaque_pthread_rwlockattr_t;
type struct_opaque_pthread_rwlockattr_t is record
sig : aliased signed_long;
opaque : aliased char_array (0 .. 11);
end record;
pragma Convention (C_Pass_By_Copy, struct_opaque_pthread_rwlockattr_t);
type struct_opaque_pthread_rwlockattr_t_const_ptr is
access constant struct_opaque_pthread_rwlockattr_t;
for struct_opaque_pthread_rwlockattr_t_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_rwlockattr_t_const_ptr);
pragma Convention (C, struct_opaque_pthread_rwlockattr_t_const_ptr);
type struct_opaque_pthread_rwlockattr_t_ptr is
access all struct_opaque_pthread_rwlockattr_t;
for struct_opaque_pthread_rwlockattr_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_rwlockattr_t_ptr);
pragma Convention (C, struct_opaque_pthread_rwlockattr_t_ptr);
type struct_opaque_pthread_t;
type struct_opaque_pthread_t is record
sig : aliased signed_long;
cleanup_stack : aliased struct_darwin_pthread_handler_rec_ptr;
opaque : aliased char_array (0 .. 595);
end record;
pragma Convention (C_Pass_By_Copy, struct_opaque_pthread_t);
type struct_opaque_pthread_t_ptr is access all struct_opaque_pthread_t;
for struct_opaque_pthread_t_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_t_ptr);
pragma Convention (C, struct_opaque_pthread_t_ptr);
type struct_opaque_pthread_t_ptr_ptr is
access all struct_opaque_pthread_t_ptr;
for struct_opaque_pthread_t_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_opaque_pthread_t_ptr_ptr);
pragma Convention (C, struct_opaque_pthread_t_ptr_ptr);
subtype darwin_blkcnt_t is i386.qtypes.int64_t;
subtype darwin_blksize_t is i386.qtypes.int32_t;
subtype darwin_dev_t is i386.qtypes.int32_t;
subtype darwin_fsblkcnt_t is unsigned_int;
subtype darwin_fsfilcnt_t is unsigned_int;
subtype darwin_gid_t is i386.qtypes.uint32_t;
subtype darwin_gid_t_array is i386.qtypes.uint32_t_array;
subtype darwin_gid_t_ptr is i386.qtypes.uint32_t_ptr;
subtype darwin_gid_t_const_ptr is i386.qtypes.uint32_t_const_ptr;
subtype darwin_id_t is i386.qtypes.uint32_t;
subtype darwin_ino64_t is i386.qtypes.uint64_t;
subtype darwin_ino_t is i386.qtypes.uint32_t;
subtype darwin_mach_port_name_t is i386.qtypes.darwin_natural_t;
subtype darwin_mach_port_name_t_ptr is i386.qtypes.darwin_natural_t_ptr;
subtype darwin_mach_port_t is darwin_mach_port_name_t;
subtype darwin_mach_port_t_ptr is darwin_mach_port_name_t_ptr;
subtype darwin_mode_t is i386.qtypes.uint16_t;
subtype darwin_off_t is i386.qtypes.int64_t;
subtype darwin_off_t_ptr is i386.qtypes.int64_t_ptr;
subtype darwin_off_t_const_ptr is i386.qtypes.int64_t_const_ptr;
subtype darwin_pid_t is i386.qtypes.int32_t;
subtype darwin_pid_t_ptr is i386.qtypes.int32_t_ptr;
subtype darwin_pthread_attr_t is struct_opaque_pthread_attr_t;
subtype darwin_pthread_attr_t_ptr is struct_opaque_pthread_attr_t_ptr;
subtype darwin_pthread_attr_t_const_ptr is
struct_opaque_pthread_attr_t_const_ptr;
subtype darwin_pthread_cond_t is struct_opaque_pthread_cond_t;
subtype darwin_pthread_cond_t_ptr is struct_opaque_pthread_cond_t_ptr;
subtype darwin_pthread_condattr_t is struct_opaque_pthread_condattr_t;
subtype darwin_pthread_condattr_t_const_ptr is
struct_opaque_pthread_condattr_t_const_ptr;
subtype darwin_pthread_condattr_t_ptr is
struct_opaque_pthread_condattr_t_ptr;
subtype darwin_pthread_key_t is unsigned_long;
subtype darwin_pthread_key_t_ptr is unsigned_long_ptr;
subtype darwin_pthread_mutex_t is struct_opaque_pthread_mutex_t;
subtype darwin_pthread_mutex_t_ptr is struct_opaque_pthread_mutex_t_ptr;
subtype darwin_pthread_mutex_t_const_ptr is
struct_opaque_pthread_mutex_t_const_ptr;
subtype darwin_pthread_mutexattr_t is struct_opaque_pthread_mutexattr_t;
subtype darwin_pthread_mutexattr_t_const_ptr is
struct_opaque_pthread_mutexattr_t_const_ptr;
subtype darwin_pthread_mutexattr_t_ptr is
struct_opaque_pthread_mutexattr_t_ptr;
subtype darwin_pthread_once_t is struct_opaque_pthread_once_t;
subtype darwin_pthread_once_t_ptr is struct_opaque_pthread_once_t_ptr;
subtype darwin_pthread_rwlock_t is struct_opaque_pthread_rwlock_t;
subtype darwin_pthread_rwlock_t_ptr is struct_opaque_pthread_rwlock_t_ptr;
subtype darwin_pthread_rwlockattr_t is struct_opaque_pthread_rwlockattr_t;
subtype darwin_pthread_rwlockattr_t_const_ptr is
struct_opaque_pthread_rwlockattr_t_const_ptr;
subtype darwin_pthread_rwlockattr_t_ptr is
struct_opaque_pthread_rwlockattr_t_ptr;
subtype darwin_pthread_t is struct_opaque_pthread_t_ptr;
subtype darwin_pthread_t_ptr is struct_opaque_pthread_t_ptr_ptr;
subtype darwin_sigset_t is i386.qtypes.uint32_t;
subtype darwin_sigset_t_const_ptr is i386.qtypes.uint32_t_const_ptr;
subtype darwin_sigset_t_ptr is i386.qtypes.uint32_t_ptr;
subtype darwin_suseconds_t is i386.qtypes.int32_t;
subtype darwin_uid_t is i386.qtypes.uint32_t;
subtype darwin_uid_t_ptr is i386.qtypes.uint32_t_ptr;
subtype darwin_uid_t_const_ptr is i386.qtypes.uint32_t_const_ptr;
subtype darwin_useconds_t is i386.qtypes.uint32_t;
subtype darwin_uuid_t is unsigned_char_array (0 .. 15);
-- _SYS__TYPES_H_ (empty)
DARWIN_NULL : constant void_ptr := void_ptr (System'To_Address (0));
PTHREAD_ATTR_SIZE : constant := 36;
PTHREAD_CONDATTR_SIZE : constant := 4;
PTHREAD_COND_SIZE : constant := 24;
PTHREAD_MUTEXATTR_SIZE : constant := 8;
PTHREAD_MUTEX_SIZE : constant := 40;
PTHREAD_ONCE_SIZE : constant := 4;
PTHREAD_RWLOCKATTR_SIZE : constant := 12;
PTHREAD_RWLOCK_SIZE : constant := 124;
PTHREAD_SIZE : constant := 596;
end C.sys.qtypes;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
-- CIRCLEQ_EMPTY (unparsible)
-- CIRCLEQ_ENTRY (unparsible)
-- CIRCLEQ_FIRST (unparsible)
-- CIRCLEQ_FOREACH (unparsible)
-- CIRCLEQ_HEAD (unparsible)
-- CIRCLEQ_INIT (unparsible)
-- CIRCLEQ_INSERT_AFTER (unparsible)
-- CIRCLEQ_INSERT_BEFORE (unparsible)
-- CIRCLEQ_INSERT_HEAD (unparsible)
-- CIRCLEQ_INSERT_TAIL (unparsible)
-- CIRCLEQ_LAST (unparsible)
-- CIRCLEQ_NEXT (unparsible)
-- CIRCLEQ_PREV (unparsible)
-- CIRCLEQ_REMOVE (unparsible)
-- 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)
-- QMD_LIST_CHECK_HEAD (empty)
-- QMD_LIST_CHECK_NEXT (empty)
-- QMD_LIST_CHECK_PREV (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_HEAD (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_HEAD (unparsible)
-- STAILQ_REMOVE_HEAD_UNTIL (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)
-- TRACEBUF (empty)
-- TRASHIT (empty)
-- _SYS_QUEUE_H_ (empty)
end C.sys.queue;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
with C.sys.qstructs;
with C.sys.types;
package C.sys.resource is
pragma Preelaborate;
subtype rlim_t is i386.qtypes.uint64_t;
type struct_rusage;
type struct_rusage is record
ru_utime : aliased sys.qstructs.struct_timeval;
ru_stime : aliased sys.qstructs.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 rlim_t;
rlim_max : aliased 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);
function getpriority (a1 : signed_int; a2 : sys.types.id_t)
return signed_int;
pragma Import (C, getpriority, "getpriority");
function getiopolicy_np (a1 : signed_int; a2 : signed_int)
return signed_int;
pragma Import (C, getiopolicy_np, "getiopolicy_np");
function getrlimit (a1 : signed_int; a2 : access struct_rlimit)
return signed_int;
pragma Import (C, getrlimit, "getrlimit$UNIX2003");
function getrusage (a1 : signed_int; a2 : access struct_rusage)
return signed_int;
pragma Import (C, getrusage, "getrusage");
function setpriority (a1 : signed_int; a2 : sys.types.id_t;
a3 : signed_int) return signed_int;
pragma Import (C, setpriority, "setpriority");
function setiopolicy_np (a1 : signed_int; a2 : signed_int;
a3 : signed_int) return signed_int;
pragma Import (C, setiopolicy_np, "setiopolicy_np");
function setrlimit (a1 : signed_int; a2 : access constant struct_rlimit)
return signed_int;
pragma Import (C, setrlimit, "setrlimit$UNIX2003");
IOPOL_DEFAULT : constant := 0;
IOPOL_NORMAL : constant := 1;
IOPOL_PASSIVE : constant := 2;
IOPOL_SCOPE_PROCESS : constant := 0;
IOPOL_SCOPE_THREAD : constant := 1;
IOPOL_THROTTLE : constant := 3;
IOPOL_TYPE_DISK : constant := 0;
PRIO_DARWIN_BG : constant := 4096;
PRIO_DARWIN_THREAD : constant := 3;
PRIO_MAX : constant := 20;
PRIO_MIN : constant := -20;
PRIO_PGRP : constant := 1;
PRIO_PROCESS : constant := 0;
PRIO_USER : constant := 2;
RLIMIT_AS : constant := 5;
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_RSS : constant := 5;
RLIMIT_STACK : constant := 3;
RLIM_INFINITY : constant := 9223372036854775807;
RLIM_NLIMITS : constant := 9;
RLIM_SAVED_CUR : constant := 9223372036854775807;
RLIM_SAVED_MAX : constant := 9223372036854775807;
RUSAGE_CHILDREN : constant := -1;
RUSAGE_SELF : constant := 0;
RLIMIT_POSIX_FLAG : constant := 4096;
-- _SYS_RESOURCE_H_ (empty)
-- .ru_first renames .ru_ixrss (accessor)
-- .ru_last renames .ru_nivcsw (accessor)
end C.sys.resource;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qstructs;
with C.sys.ucontext;
package C.sys.select_h is
pragma Preelaborate;
function pselect (a1 : signed_int; a2 : access sys.qstructs.fd_set;
a3 : access sys.qstructs.fd_set; a4 : access sys.qstructs.fd_set;
a5 : access constant sys.qstructs.struct_timespec;
a6 : access constant sys.ucontext.sigset_t) return signed_int;
pragma Import (C, pselect, "pselect$UNIX2003");
-- _SYS_SELECT_H_ (empty)
end C.sys.select_h;
-- This file is translated by "headmaster" version 0.27-2060155 (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.sys.types;
with C.sys.ucontext;
package C.sys.signal is
pragma Preelaborate;
type union_sigval;
type union_sigval (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
sival_int : signed_int;
when others =>
sival_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_996e8c36 is access procedure (a1 : union_sigval);
pragma Convention (C, access_996e8c36);
type struct_sigevent is record
sigev_notify : aliased signed_int;
sigev_signo : aliased signed_int;
sigev_value : aliased union_sigval;
sigev_notify_function : aliased access_996e8c36;
sigev_notify_attributes : aliased sys.types.pthread_attr_t_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_sigevent);
type struct_siginfo;
type struct_siginfo is record
si_signo : aliased signed_int;
si_errno : aliased signed_int;
si_code : aliased signed_int;
si_pid : aliased sys.types.pid_t;
si_uid : aliased sys.types.uid_t;
si_status : aliased signed_int;
si_addr : aliased void_ptr;
si_value : aliased union_sigval;
si_band : aliased signed_long;
pad : aliased unsigned_long_array (0 .. 6);
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 union_sigaction_u;
type access_4b83281c is access procedure (a1 : signed_int);
pragma Convention (C, access_4b83281c);
function Cast is new Ada.Unchecked_Conversion (signed_int,
access_4b83281c);
type access_2f730b60 is access procedure (a1 : signed_int;
a2 : access struct_siginfo; a3 : void_ptr);
pragma Convention (C, access_2f730b60);
type union_sigaction_u (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
sa_handler : access_4b83281c;
when others =>
sa_sigaction : access_2f730b60;
end case;
end record;
pragma Unchecked_Union (union_sigaction_u);
pragma Convention (C_Pass_By_Copy, union_sigaction_u);
type struct_qqsigaction;
type access_3d08ee27 is access procedure (a1 : void_ptr; a2 : signed_int;
a3 : signed_int; a4 : access siginfo_t; a5 : void_ptr);
pragma Convention (C, access_3d08ee27);
type struct_qqsigaction is record
sigaction_u : aliased union_sigaction_u;
sa_tramp : aliased access_3d08ee27;
sa_mask : aliased sys.ucontext.sigset_t;
sa_flags : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_qqsigaction);
type struct_sigaction;
type struct_sigaction is record
sigaction_u : aliased union_sigaction_u;
sa_mask : aliased sys.ucontext.sigset_t;
sa_flags : aliased signed_int;
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 access_4b83281c;
type struct_sigvec;
type struct_sigvec is record
sv_handler : aliased access_4b83281c;
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);
function signal (a1 : signed_int; a2 : access_4b83281c)
return access_4b83281c;
pragma Import (C, signal, "signal");
function BADSIG (Value : signed_int := -1) return access_4b83281c
renames Cast;
BUS_ADRALN : constant := 1;
BUS_ADRERR : constant := 2;
BUS_NOOP : constant := 0;
BUS_OBJERR : constant := 3;
CLD_CONTINUED : constant := 6;
CLD_DUMPED : constant := 3;
CLD_EXITED : constant := 1;
CLD_KILLED : constant := 2;
CLD_NOOP : constant := 0;
CLD_STOPPED : constant := 5;
CLD_TRAPPED : constant := 4;
FPE_FLTDIV : constant := 1;
FPE_FLTINV : constant := 5;
FPE_FLTOVF : constant := 2;
FPE_FLTRES : constant := 4;
FPE_FLTSUB : constant := 6;
FPE_FLTUND : constant := 3;
FPE_INTDIV : constant := 7;
FPE_INTOVF : constant := 8;
FPE_NOOP : constant := 0;
ILL_BADSTK : constant := 8;
ILL_COPROC : constant := 7;
ILL_ILLADR : constant := 5;
ILL_ILLOPC : constant := 1;
ILL_ILLOPN : constant := 4;
ILL_ILLTRP : constant := 2;
ILL_NOOP : constant := 0;
ILL_PRVOPC : constant := 3;
ILL_PRVREG : constant := 6;
MINSIGSTKSZ : constant := 32768;
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_64REGSET : constant := 512;
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;
SA_USERSPACE_MASK : constant := 127;
SA_USERTRAMP : constant := 256;
SEGV_ACCERR : constant := 2;
SEGV_MAPERR : constant := 1;
SEGV_NOOP : constant := 0;
SIGABRT : constant := 6;
SIGALRM : constant := 14;
SIGBUS : constant := 10;
SIGCHLD : constant := 20;
SIGCONT : constant := 19;
SIGEMT : constant := 7;
SIGEV_NONE : constant := 0;
SIGEV_SIGNAL : constant := 1;
SIGEV_THREAD : constant := 3;
SIGFPE : constant := 8;
SIGHUP : constant := 1;
SIGILL : constant := 4;
SIGINFO : constant := 29;
SIGINT : constant := 2;
SIGIO : constant := 23;
SIGIOT : constant := 6;
SIGKILL : constant := 9;
SIGPIPE : constant := 13;
SIGPROF : constant := 27;
SIGQUIT : constant := 3;
SIGSEGV : constant := 11;
SIGSTKSZ : constant := 131072;
SIGSTOP : constant := 17;
SIGSYS : constant := 12;
SIGTERM : constant := 15;
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 access_4b83281c := null;
function SIG_ERR (Value : signed_int := -1) return access_4b83281c
renames Cast;
function SIG_HOLD (Value : signed_int := 5) return access_4b83281c
renames Cast;
function SIG_IGN (Value : signed_int := 1) return access_4b83281c
renames Cast;
SIG_SETMASK : constant := 3;
SIG_UNBLOCK : constant := 2;
SI_ASYNCIO : constant := 65540;
SI_MESGQ : constant := 65541;
SI_QUEUE : constant := 65538;
SI_TIMER : constant := 65539;
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_TRACE : constant := 2;
-- _SYS_SIGNAL_H_ (empty)
DARWIN_NSIG : constant := 32;
-- .sa_handler renames .__sigaction_u.__sa_handler (accessor)
-- .sa_sigaction renames .__sigaction_u.__sa_sigaction (accessor)
-- sigmask (function macro)
-- .sv_onstack renames .sv_flags (accessor)
end C.sys.signal;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
with C.stddef;
with C.sys.types;
with C.sys.uio;
package C.sys.socket is
pragma Preelaborate;
subtype sa_family_t is i386.qtypes.uint8_t;
subtype socklen_t is i386.qtypes.darwin_socklen_t;
subtype socklen_t_ptr is i386.qtypes.darwin_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_sockaddr;
type struct_sockaddr is record
sa_len : aliased i386.qtypes.uint8_t;
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 i386.qtypes.uint16_t;
sp_protocol : aliased i386.qtypes.uint16_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_sockproto);
type struct_sockaddr_storage;
type struct_sockaddr_storage is record
ss_len : aliased i386.qtypes.uint8_t;
ss_family : aliased sa_family_t;
ss_pad1 : aliased char_array (0 .. 5);
ss_align : aliased i386.qtypes.int64_t;
ss_pad2 : aliased char_array (0 .. 111);
end record;
pragma Convention (C_Pass_By_Copy, struct_sockaddr_storage);
type struct_msghdr;
type struct_msghdr is record
msg_name : aliased void_ptr;
msg_namelen : aliased socklen_t;
msg_iov : aliased sys.uio.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_sf_hdtr;
type struct_sf_hdtr is record
headers : aliased sys.uio.struct_iovec_ptr;
hdr_cnt : aliased signed_int;
trailers : aliased sys.uio.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$UNIX2003");
function bind (a1 : signed_int; a2 : access constant struct_sockaddr;
a3 : socklen_t) return signed_int;
pragma Import (C, bind, "bind$UNIX2003");
function connect (a1 : signed_int; a2 : access constant struct_sockaddr;
a3 : socklen_t) return signed_int;
pragma Import (C, connect, "connect$UNIX2003");
function getpeername (a1 : signed_int; a2 : access struct_sockaddr;
a3 : access socklen_t) return signed_int;
pragma Import (C, getpeername, "getpeername$UNIX2003");
function getsockname (a1 : signed_int; a2 : access struct_sockaddr;
a3 : access socklen_t) return signed_int;
pragma Import (C, getsockname, "getsockname$UNIX2003");
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$UNIX2003");
function recv (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t;
a4 : signed_int) return sys.types.ssize_t;
pragma Import (C, recv, "recv$UNIX2003");
function recvfrom (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t;
a4 : signed_int; a5 : access struct_sockaddr; a6 : access socklen_t)
return sys.types.ssize_t;
pragma Import (C, recvfrom, "recvfrom$UNIX2003");
function recvmsg (a1 : signed_int; a2 : access struct_msghdr;
a3 : signed_int) return sys.types.ssize_t;
pragma Import (C, recvmsg, "recvmsg$UNIX2003");
function send (a1 : signed_int; a2 : void_const_ptr; a3 : stddef.size_t;
a4 : signed_int) return sys.types.ssize_t;
pragma Import (C, send, "send$UNIX2003");
function sendmsg (a1 : signed_int; a2 : access constant struct_msghdr;
a3 : signed_int) return sys.types.ssize_t;
pragma Import (C, sendmsg, "sendmsg$UNIX2003");
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 sys.types.ssize_t;
pragma Import (C, sendto, "sendto$UNIX2003");
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$UNIX2003");
function sendfile (a1 : signed_int; a2 : signed_int; a3 : sys.types.off_t;
a4 : access sys.types.off_t; a5 : access struct_sf_hdtr;
a6 : signed_int) return signed_int;
pragma Import (C, sendfile, "sendfile");
procedure pfctlinput (a1 : signed_int; a2 : access struct_sockaddr);
pragma Import (C, pfctlinput, "pfctlinput");
AF_APPLETALK : constant := 16;
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 := 28;
AF_ECMA : constant := 8;
AF_HYLINK : constant := 15;
AF_IMPLINK : constant := 3;
AF_INET : constant := 2;
AF_INET6 : constant := 30;
AF_IPX : constant := 23;
AF_ISDN : constant := 28;
AF_ISO : constant := 7;
AF_LAT : constant := 14;
AF_LINK : constant := 18;
AF_LOCAL : constant := 1;
AF_MAX : constant := 37;
AF_NATM : constant := 31;
AF_NDRV : constant := 27;
AF_NETBIOS : constant := 33;
AF_NS : constant := 6;
AF_OSI : constant := 7;
AF_PPP : constant := 34;
AF_PUP : constant := 4;
AF_RESERVED_36 : constant := 36;
AF_ROUTE : constant := 17;
AF_SIP : constant := 24;
AF_SNA : constant := 11;
AF_SYSTEM : constant := 32;
AF_UNIX : constant := 1;
AF_UNSPEC : constant := 0;
-- CMSG_DATA (function macro)
-- CMSG_FIRSTHDR (uninterpretable)
-- CMSG_LEN (function macro)
-- CMSG_NXTHDR (uninterpretable)
-- CMSG_SPACE (function macro)
MSG_CTRUNC : constant := 32;
MSG_DONTROUTE : constant := 4;
MSG_DONTWAIT : constant := 128;
MSG_EOF : constant := 256;
MSG_EOR : constant := 8;
MSG_FLUSH : constant := 1024;
MSG_HAVEMORE : constant := 8192;
MSG_HOLD : constant := 2048;
MSG_NEEDSA : constant := 65536;
MSG_OOB : constant := 1;
MSG_PEEK : constant := 2;
MSG_RCVMORE : constant := 16384;
MSG_SEND : constant := 4096;
MSG_TRUNC : constant := 16;
MSG_WAITALL : constant := 64;
MSG_WAITSTREAM : constant := 512;
NET_MAXID : constant := 37;
NET_RT_DUMP : constant := 1;
NET_RT_DUMP2 : constant := 7;
NET_RT_FLAGS : constant := 2;
NET_RT_IFLIST : constant := 3;
NET_RT_IFLIST2 : constant := 6;
NET_RT_MAXID : constant := 8;
NET_RT_STAT : constant := 4;
NET_RT_TRASH : constant := 5;
PF_APPLETALK : constant := 16;
PF_BOND : constant := 1651469924;
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 := 30;
PF_IPX : constant := 23;
PF_ISDN : constant := 28;
PF_ISO : constant := 7;
PF_KEY : constant := 29;
PF_LAT : constant := 14;
PF_LINK : constant := 18;
PF_LOCAL : constant := 1;
PF_MAX : constant := 37;
PF_NATM : constant := 31;
PF_NDRV : constant := 27;
PF_NETBIOS : constant := 33;
PF_NS : constant := 6;
PF_OSI : constant := 7;
PF_PIP : constant := 25;
PF_PPP : constant := 34;
PF_PUP : constant := 4;
PF_RESERVED_36 : constant := 36;
PF_ROUTE : constant := 17;
PF_RTIP : constant := 22;
PF_SIP : constant := 24;
PF_SNA : constant := 11;
PF_SYSTEM : constant := 32;
PF_UNIX : constant := 1;
PF_UNSPEC : constant := 0;
PF_VLAN : constant := 1986814318;
PF_XTP : constant := 19;
SCM_CREDS : constant := 3;
SCM_RIGHTS : constant := 1;
SCM_TIMESTAMP : constant := 2;
SHUT_RD : constant := 0;
SHUT_RDWR : constant := 2;
SHUT_WR : constant := 1;
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_BROADCAST : constant := 32;
SO_DEBUG : constant := 1;
SO_DONTROUTE : constant := 16;
SO_DONTTRUNC : constant := 8192;
SO_ERROR : constant := 4103;
SO_KEEPALIVE : constant := 8;
SO_LABEL : constant := 4112;
SO_LINGER : constant := 128;
SO_LINGER_SEC : constant := 4224;
SO_NKE : constant := 4129;
SO_NOADDRERR : constant := 4131;
SO_NOSIGPIPE : constant := 4130;
SO_NOTIFYCONFLICT : constant := 4134;
SO_NREAD : constant := 4128;
SO_NWRITE : constant := 4132;
SO_OOBINLINE : constant := 256;
SO_PEERLABEL : constant := 4113;
SO_RCVBUF : constant := 4098;
SO_RCVLOWAT : constant := 4100;
SO_RCVTIMEO : constant := 4102;
SO_RESTRICTIONS : constant := 4225;
SO_RESTRICT_DENYIN : constant := 1;
SO_RESTRICT_DENYOUT : constant := 2;
SO_RESTRICT_DENYSET : constant := -2147483648;
SO_REUSEADDR : constant := 4;
SO_REUSEPORT : constant := 512;
SO_REUSESHAREUID : constant := 4133;
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_WANTMORE : constant := 16384;
SO_WANTOOBFLAG : constant := 32768;
-- _SA_FAMILY_T (empty)
-- _SOCKLEN_T (empty)
SS_ALIGNSIZE : constant := 8;
SS_MAXSIZE : constant := 128;
SS_PAD1SIZE : constant := 6;
SS_PAD2SIZE : constant := 112;
-- _SYS_SOCKET_H_ (empty)
pseudo_AF_HDRCMPLT : constant := 35;
pseudo_AF_KEY : constant := 29;
pseudo_AF_PIP : constant := 25;
pseudo_AF_RTIP : constant := 22;
pseudo_AF_XTP : constant := 19;
end C.sys.socket;
-- This file is translated by "headmaster" version 0.27-2060155 (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.spawn is
pragma Preelaborate;
POSIX_SPAWN_RESETIDS : constant := 1;
POSIX_SPAWN_SETEXEC : constant := 64;
POSIX_SPAWN_SETPGROUP : constant := 2;
POSIX_SPAWN_SETSIGDEF : constant := 4;
POSIX_SPAWN_SETSIGMASK : constant := 8;
POSIX_SPAWN_START_SUSPENDED : constant := 128;
-- _SYS_SPAWN_H_ (empty)
end C.sys.spawn;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
with C.sys.fcntl;
with C.sys.qstructs;
with C.sys.qtypes;
with C.sys.types;
package C.sys.stat is
pragma Preelaborate;
subtype struct_flock is sys.fcntl.struct_flock;
subtype struct_radvisory is sys.fcntl.struct_radvisory;
subtype struct_fsignatures is sys.fcntl.struct_fsignatures;
subtype fsignatures_t is sys.fcntl.fsignatures_t;
subtype struct_fstore is sys.fcntl.struct_fstore;
subtype fstore_t is sys.fcntl.fstore_t;
subtype struct_fbootstraptransfer is sys.fcntl.struct_fbootstraptransfer;
subtype fbootstraptransfer_t is sys.fcntl.fbootstraptransfer_t;
subtype struct_log2phys is sys.fcntl.struct_log2phys;
subtype struct_filesec is sys.fcntl.struct_filesec;
subtype filesec_t is sys.fcntl.filesec_t;
function FILESEC_OWNER return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_OWNER;
function FILESEC_GROUP return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_GROUP;
function FILESEC_UUID return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_UUID;
function FILESEC_MODE return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_MODE;
function FILESEC_ACL return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_ACL;
function FILESEC_GRPUUID return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_GRPUUID;
function FILESEC_ACL_RAW return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_ACL_RAW;
function FILESEC_ACL_ALLOCSIZE return sys.fcntl.enum_0e866d2b
renames sys.fcntl.FILESEC_ACL_ALLOCSIZE;
subtype filesec_property_t is sys.fcntl.filesec_property_t;
function open (a1 : access constant char; a2 : signed_int)
return signed_int renames sys.fcntl.open;
function open (a1 : access constant char; a2 : signed_int;
a3 : sys.types.mode_t) return signed_int renames sys.fcntl.open;
function creat (a1 : access constant char; a2 : sys.types.mode_t)
return signed_int renames sys.fcntl.creat;
function fcntl (a1 : signed_int; a2 : signed_int) return signed_int
renames sys.fcntl.fcntl;
function fcntl (a1 : signed_int; a2 : signed_int; a3 : access char)
return signed_int renames sys.fcntl.fcntl;
function fcntl (a1 : signed_int; a2 : signed_int; a3 : signed_int)
return signed_int renames sys.fcntl.fcntl;
function openx_np (a1 : access constant char; a2 : signed_int;
a3 : access sys.fcntl.struct_filesec) return signed_int
renames sys.fcntl.openx_np;
function flock (a1 : signed_int; a2 : signed_int) return signed_int
renames sys.fcntl.flock;
function filesec_init return sys.fcntl.filesec_t
renames sys.fcntl.filesec_init;
function filesec_dup (a1 : access sys.fcntl.struct_filesec)
return sys.fcntl.filesec_t renames sys.fcntl.filesec_dup;
procedure filesec_free (a1 : access sys.fcntl.struct_filesec)
renames sys.fcntl.filesec_free;
function filesec_get_property (a1 : access sys.fcntl.struct_filesec;
a2 : sys.fcntl.filesec_property_t; a3 : void_ptr) return signed_int
renames sys.fcntl.filesec_get_property;
function filesec_set_property (a1 : access sys.fcntl.struct_filesec;
a2 : sys.fcntl.filesec_property_t; a3 : void_const_ptr)
return signed_int renames sys.fcntl.filesec_set_property;
function filesec_query_property (a1 : access sys.fcntl.struct_filesec;
a2 : sys.fcntl.filesec_property_t; a3 : access signed_int)
return signed_int renames sys.fcntl.filesec_query_property;
CPF_IGNORE_MODE : constant := sys.fcntl.CPF_IGNORE_MODE;
CPF_MASK : constant := sys.fcntl.CPF_MASK;
CPF_OVERWRITE : constant := sys.fcntl.CPF_OVERWRITE;
FAPPEND : constant := sys.fcntl.FAPPEND;
FASYNC : constant := sys.fcntl.FASYNC;
FCNTL_FS_SPECIFIC_BASE : constant := sys.fcntl.FCNTL_FS_SPECIFIC_BASE;
FD_CLOEXEC : constant := sys.fcntl.FD_CLOEXEC;
FFSYNC : constant := sys.fcntl.FFSYNC;
FILESEC_GUID : sys.fcntl.enum_0e866d2b renames sys.fcntl.FILESEC_GUID;
FNDELAY : constant := sys.fcntl.FNDELAY;
FNONBLOCK : constant := sys.fcntl.FNONBLOCK;
FREAD : constant := sys.fcntl.FREAD;
FWRITE : constant := sys.fcntl.FWRITE;
F_ADDSIGS : constant := sys.fcntl.F_ADDSIGS;
F_ALLOCATEALL : constant := sys.fcntl.F_ALLOCATEALL;
F_ALLOCATECONTIG : constant := sys.fcntl.F_ALLOCATECONTIG;
F_CHKCLEAN : constant := sys.fcntl.F_CHKCLEAN;
F_DUPFD : constant := sys.fcntl.F_DUPFD;
F_FREEZE_FS : constant := sys.fcntl.F_FREEZE_FS;
F_FULLFSYNC : constant := sys.fcntl.F_FULLFSYNC;
F_GETFD : constant := sys.fcntl.F_GETFD;
F_GETFL : constant := sys.fcntl.F_GETFL;
F_GETLK : constant := sys.fcntl.F_GETLK;
F_GETOWN : constant := sys.fcntl.F_GETOWN;
F_GETPATH : constant := sys.fcntl.F_GETPATH;
F_GLOBAL_NOCACHE : constant := sys.fcntl.F_GLOBAL_NOCACHE;
F_LOG2PHYS : constant := sys.fcntl.F_LOG2PHYS;
F_MARKDEPENDENCY : constant := sys.fcntl.F_MARKDEPENDENCY;
F_NOCACHE : constant := sys.fcntl.F_NOCACHE;
F_PATHPKG_CHECK : constant := sys.fcntl.F_PATHPKG_CHECK;
F_PEOFPOSMODE : constant := sys.fcntl.F_PEOFPOSMODE;
F_PREALLOCATE : constant := sys.fcntl.F_PREALLOCATE;
F_RDADVISE : constant := sys.fcntl.F_RDADVISE;
F_RDAHEAD : constant := sys.fcntl.F_RDAHEAD;
F_RDLCK : constant := sys.fcntl.F_RDLCK;
F_READBOOTSTRAP : constant := sys.fcntl.F_READBOOTSTRAP;
F_SETFD : constant := sys.fcntl.F_SETFD;
F_SETFL : constant := sys.fcntl.F_SETFL;
F_SETLK : constant := sys.fcntl.F_SETLK;
F_SETLKW : constant := sys.fcntl.F_SETLKW;
F_SETOWN : constant := sys.fcntl.F_SETOWN;
F_SETSIZE : constant := sys.fcntl.F_SETSIZE;
F_THAW_FS : constant := sys.fcntl.F_THAW_FS;
F_UNLCK : constant := sys.fcntl.F_UNLCK;
F_VOLPOSMODE : constant := sys.fcntl.F_VOLPOSMODE;
F_WRITEBOOTSTRAP : constant := sys.fcntl.F_WRITEBOOTSTRAP;
F_WRLCK : constant := sys.fcntl.F_WRLCK;
LOCK_EX : constant := sys.fcntl.LOCK_EX;
LOCK_NB : constant := sys.fcntl.LOCK_NB;
LOCK_SH : constant := sys.fcntl.LOCK_SH;
LOCK_UN : constant := sys.fcntl.LOCK_UN;
O_ACCMODE : constant := sys.fcntl.O_ACCMODE;
O_ALERT : constant := sys.fcntl.O_ALERT;
O_APPEND : constant := sys.fcntl.O_APPEND;
O_ASYNC : constant := sys.fcntl.O_ASYNC;
O_CREAT : constant := sys.fcntl.O_CREAT;
O_DIRECTORY : constant := sys.fcntl.O_DIRECTORY;
O_EVTONLY : constant := sys.fcntl.O_EVTONLY;
O_EXCL : constant := sys.fcntl.O_EXCL;
O_EXLOCK : constant := sys.fcntl.O_EXLOCK;
O_FSYNC : constant := sys.fcntl.O_FSYNC;
O_NDELAY : constant := sys.fcntl.O_NDELAY;
O_NOCTTY : constant := sys.fcntl.O_NOCTTY;
O_NOFOLLOW : constant := sys.fcntl.O_NOFOLLOW;
O_NONBLOCK : constant := sys.fcntl.O_NONBLOCK;
O_POPUP : constant := sys.fcntl.O_POPUP;
O_RDONLY : constant := sys.fcntl.O_RDONLY;
O_RDWR : constant := sys.fcntl.O_RDWR;
O_SHLOCK : constant := sys.fcntl.O_SHLOCK;
O_SYMLINK : constant := sys.fcntl.O_SYMLINK;
O_SYNC : constant := sys.fcntl.O_SYNC;
O_TRUNC : constant := sys.fcntl.O_TRUNC;
O_WRONLY : constant := sys.fcntl.O_WRONLY;
S_IEXEC : constant := sys.fcntl.S_IEXEC;
S_IFBLK : constant := sys.fcntl.S_IFBLK;
S_IFCHR : constant := sys.fcntl.S_IFCHR;
S_IFDIR : constant := sys.fcntl.S_IFDIR;
S_IFIFO : constant := sys.fcntl.S_IFIFO;
S_IFLNK : constant := sys.fcntl.S_IFLNK;
S_IFMT : constant := sys.fcntl.S_IFMT;
S_IFREG : constant := sys.fcntl.S_IFREG;
S_IFSOCK : constant := sys.fcntl.S_IFSOCK;
S_IFWHT : constant := sys.fcntl.S_IFWHT;
S_IFXATTR : constant := sys.fcntl.S_IFXATTR;
S_IREAD : constant := sys.fcntl.S_IREAD;
S_IRGRP : constant := sys.fcntl.S_IRGRP;
S_IROTH : constant := sys.fcntl.S_IROTH;
S_IRUSR : constant := sys.fcntl.S_IRUSR;
S_IRWXG : constant := sys.fcntl.S_IRWXG;
S_IRWXO : constant := sys.fcntl.S_IRWXO;
S_IRWXU : constant := sys.fcntl.S_IRWXU;
S_ISGID : constant := sys.fcntl.S_ISGID;
S_ISTXT : constant := sys.fcntl.S_ISTXT;
S_ISUID : constant := sys.fcntl.S_ISUID;
S_ISVTX : constant := sys.fcntl.S_ISVTX;
S_IWGRP : constant := sys.fcntl.S_IWGRP;
S_IWOTH : constant := sys.fcntl.S_IWOTH;
S_IWRITE : constant := sys.fcntl.S_IWRITE;
S_IWUSR : constant := sys.fcntl.S_IWUSR;
S_IXGRP : constant := sys.fcntl.S_IXGRP;
S_IXOTH : constant := sys.fcntl.S_IXOTH;
S_IXUSR : constant := sys.fcntl.S_IXUSR;
FILESEC_REMOVE_ACL : void_ptr renames sys.fcntl.FILESEC_REMOVE_ACL;
-- qFILESEC_T renames sys.fcntl.qFILESEC_T (empty)
FILESEC_UNSET_PROPERTY : void_ptr
renames sys.fcntl.FILESEC_UNSET_PROPERTY;
-- SYS_FCNTL_H renames sys.fcntl.SYS_FCNTL_H (empty)
type struct_ostat;
type struct_ostat is record
st_dev : aliased i386.qtypes.uint16_t;
st_ino : aliased sys.types.ino_t;
st_mode : aliased sys.types.mode_t;
st_nlink : aliased sys.types.nlink_t;
st_uid : aliased i386.qtypes.uint16_t;
st_gid : aliased i386.qtypes.uint16_t;
st_rdev : aliased i386.qtypes.uint16_t;
st_size : aliased i386.qtypes.int32_t;
st_atim : aliased sys.qstructs.struct_timespec;
st_mtim : aliased sys.qstructs.struct_timespec;
st_ctim : aliased sys.qstructs.struct_timespec;
st_blksize : aliased i386.qtypes.int32_t;
st_blocks : aliased i386.qtypes.int32_t;
st_flags : aliased i386.qtypes.uint32_t;
st_gen : aliased i386.qtypes.uint32_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_ostat);
type struct_stat;
type struct_stat is record
st_dev : aliased sys.types.dev_t;
st_ino : aliased sys.types.ino_t;
st_mode : aliased sys.types.mode_t;
st_nlink : aliased sys.types.nlink_t;
st_uid : aliased sys.types.uid_t;
st_gid : aliased sys.types.gid_t;
st_rdev : aliased sys.types.dev_t;
st_atim : aliased sys.qstructs.struct_timespec;
st_mtim : aliased sys.qstructs.struct_timespec;
st_ctim : aliased sys.qstructs.struct_timespec;
st_size : aliased sys.types.off_t;
st_blocks : aliased sys.types.blkcnt_t;
st_blksize : aliased sys.types.blksize_t;
st_flags : aliased i386.qtypes.uint32_t;
st_gen : aliased i386.qtypes.uint32_t;
st_lspare : aliased i386.qtypes.int32_t;
st_qspare : aliased i386.qtypes.int64_t_array (0 .. 1);
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_stat64;
type struct_stat64 is record
st_dev : aliased sys.types.dev_t;
st_mode : aliased sys.types.mode_t;
st_nlink : aliased sys.types.nlink_t;
st_ino : aliased sys.qtypes.darwin_ino64_t;
st_uid : aliased sys.types.uid_t;
st_gid : aliased sys.types.gid_t;
st_rdev : aliased sys.types.dev_t;
st_atim : aliased sys.qstructs.struct_timespec;
st_mtim : aliased sys.qstructs.struct_timespec;
st_ctim : aliased sys.qstructs.struct_timespec;
st_birthtimespec : aliased sys.qstructs.struct_timespec;
st_size : aliased sys.types.off_t;
st_blocks : aliased sys.types.blkcnt_t;
st_blksize : aliased sys.types.blksize_t;
st_flags : aliased i386.qtypes.uint32_t;
st_gen : aliased i386.qtypes.uint32_t;
st_lspare : aliased i386.qtypes.int32_t;
st_qspare : aliased i386.qtypes.int64_t_array (0 .. 1);
end record;
pragma Convention (C_Pass_By_Copy, struct_stat64);
type struct_stat64_ptr is access all struct_stat64;
for struct_stat64_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_stat64_ptr);
pragma Convention (C, struct_stat64_ptr);
function chmod (a1 : access constant char; a2 : sys.types.mode_t)
return signed_int;
pragma Import (C, chmod, "chmod$UNIX2003");
function fchmod (a1 : signed_int; a2 : sys.types.mode_t)
return signed_int;
pragma Import (C, fchmod, "fchmod$UNIX2003");
function fstat (a1 : signed_int; a2 : access struct_stat)
return signed_int;
pragma Import (C, fstat, "fstat");
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 : sys.types.mode_t)
return signed_int;
pragma Import (C, mkdir, "mkdir");
function mkfifo (a1 : access constant char; a2 : sys.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 : sys.types.mode_t) return sys.types.mode_t;
pragma Import (C, umask, "umask");
function chflags (a1 : access constant char; a2 : i386.qtypes.uint32_t)
return signed_int;
pragma Import (C, chflags, "chflags");
function chmodx_np (a1 : access constant char;
a2 : access sys.fcntl.struct_filesec) return signed_int;
pragma Import (C, chmodx_np, "chmodx_np");
function fchflags (a1 : signed_int; a2 : i386.qtypes.uint32_t)
return signed_int;
pragma Import (C, fchflags, "fchflags");
function fchmodx_np (a1 : signed_int;
a2 : access sys.fcntl.struct_filesec) return signed_int;
pragma Import (C, fchmodx_np, "fchmodx_np");
function fstatx_np (a1 : signed_int; a2 : access struct_stat;
a3 : access sys.fcntl.struct_filesec) return signed_int;
pragma Import (C, fstatx_np, "fstatx_np");
function lchflags (a1 : access constant char; a2 : i386.qtypes.uint32_t)
return signed_int;
pragma Import (C, lchflags, "lchflags");
function lchmod (a1 : access constant char; a2 : sys.types.mode_t)
return signed_int;
pragma Import (C, lchmod, "lchmod");
function lstatx_np (a1 : access constant char; a2 : access struct_stat;
a3 : access sys.fcntl.struct_filesec) return signed_int;
pragma Import (C, lstatx_np, "lstatx_np");
function mkdirx_np (a1 : access constant char;
a2 : access sys.fcntl.struct_filesec) return signed_int;
pragma Import (C, mkdirx_np, "mkdirx_np");
function mkfifox_np (a1 : access constant char;
a2 : access sys.fcntl.struct_filesec) return signed_int;
pragma Import (C, mkfifox_np, "mkfifox_np");
function statx_np (a1 : access constant char; a2 : access struct_stat;
a3 : access sys.fcntl.struct_filesec) return signed_int;
pragma Import (C, statx_np, "statx_np");
function umaskx_np (a1 : access sys.fcntl.struct_filesec)
return signed_int;
pragma Import (C, umaskx_np, "umaskx_np");
function fstatx64_np (a1 : signed_int; a2 : access struct_stat64;
a3 : access sys.fcntl.struct_filesec) return signed_int;
pragma Import (C, fstatx64_np, "fstatx64_np");
function lstatx64_np (a1 : access constant char;
a2 : access struct_stat64; a3 : access sys.fcntl.struct_filesec)
return signed_int;
pragma Import (C, lstatx64_np, "lstatx64_np");
function statx64_np (a1 : access constant char; a2 : access struct_stat64;
a3 : access sys.fcntl.struct_filesec) return signed_int;
pragma Import (C, statx64_np, "statx64_np");
function fstat64 (a1 : signed_int; a2 : access struct_stat64)
return signed_int;
pragma Import (C, fstat64, "fstat64");
function lstat64 (a1 : access constant char; a2 : access struct_stat64)
return signed_int;
pragma Import (C, lstat64, "lstat64");
function stat64 (a1 : access constant char; a2 : access struct_stat64)
return signed_int;
pragma Import (C, stat64, "stat64");
ACCESSPERMS : constant := 511;
ALLPERMS : constant := 4095;
DEFFILEMODE : constant := 438;
SF_APPEND : constant := 262144;
SF_ARCHIVED : constant := 65536;
SF_IMMUTABLE : constant := 131072;
SF_SETTABLE : constant := -65536;
S_BLKSIZE : constant := 512;
-- S_ISBLK (function macro)
-- S_ISCHR (function macro)
-- S_ISDIR (function macro)
-- S_ISFIFO (function macro)
-- S_ISLNK (function macro)
-- S_ISREG (function macro)
-- S_ISSOCK (function macro)
-- S_ISWHT (function macro)
-- S_ISXATTR (function macro)
-- S_TYPEISMQ (function macro)
-- S_TYPEISSEM (function macro)
-- S_TYPEISSHM (function macro)
-- S_TYPEISTMO (function macro)
UF_APPEND : constant := 4;
UF_HIDDEN : constant := 32768;
UF_IMMUTABLE : constant := 2;
UF_NODUMP : constant := 1;
UF_OPAQUE : constant := 8;
UF_SETTABLE : constant := 65535;
-- _SYS_STAT_H_ (empty)
-- __DARWIN_STRUCT_STAT64 (unparsible)
-- __DARWIN_STRUCT_STAT64_TIMES (unparsible)
-- .st_birthtime renames .st_birthtimespec.tv_sec (accessor)
end C.sys.stat;
-- This file is translated by "headmaster" version 0.27-2060155 (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_ATPgetreq : constant := 211;
SYS_ATPgetrsp : constant := 212;
SYS_ATPsndreq : constant := 209;
SYS_ATPsndrsp : constant := 210;
SYS_ATgetmsg : constant := 207;
SYS_ATputmsg : constant := 208;
SYS_ATsocket : constant := 206;
SYS_MAXSYSCALL : constant := 427;
SYS_disable_threadsignal : constant := 331;
SYS_mac_execve : constant := 380;
SYS_mac_get_fd : constant := 388;
SYS_mac_get_file : constant := 382;
SYS_mac_get_lcid : constant := 391;
SYS_mac_get_lctx : constant := 392;
SYS_mac_get_link : constant := 384;
SYS_mac_get_mount : constant := 425;
SYS_mac_get_pid : constant := 390;
SYS_mac_get_proc : constant := 386;
SYS_mac_getfsstat : constant := 426;
SYS_mac_mount : constant := 424;
SYS_mac_set_fd : constant := 389;
SYS_mac_set_file : constant := 383;
SYS_mac_set_lctx : constant := 393;
SYS_mac_set_link : constant := 385;
SYS_mac_set_proc : constant := 387;
SYS_mac_syscall : constant := 381;
SYS_pthread_canceled : constant := 333;
SYS_pthread_chdir : constant := 348;
SYS_pthread_cond_broadcast : constant := 308;
SYS_pthread_cond_destroy : constant := 307;
SYS_pthread_cond_init : constant := 306;
SYS_pthread_cond_signal : constant := 309;
SYS_pthread_cond_timedwait : constant := 312;
SYS_pthread_cond_wait : constant := 321;
SYS_pthread_fchdir : constant := 349;
SYS_pthread_kill : constant := 328;
SYS_pthread_markcancel : constant := 332;
SYS_pthread_mutex_destroy : constant := 301;
SYS_pthread_mutex_init : constant := 302;
SYS_pthread_mutex_lock : constant := 303;
SYS_pthread_mutex_trylock : constant := 304;
SYS_pthread_mutex_unlock : constant := 305;
SYS_pthread_sigmask : constant := 329;
SYS_semwait_signal : constant := 334;
SYS_semwait_signal_nocancel : constant := 423;
SYS_sigwait : constant := 330;
SYS_sigwait_nocancel : constant := 422;
SYS_sysctl : constant := 202;
SYS_accept : constant := 30;
SYS_accept_nocancel : constant := 404;
SYS_access : constant := 33;
SYS_access_extended : constant := 284;
SYS_acct : constant := 51;
SYS_add_profil : constant := 176;
SYS_adjtime : constant := 140;
SYS_aio_cancel : constant := 316;
SYS_aio_error : constant := 317;
SYS_aio_fsync : constant := 313;
SYS_aio_read : constant := 318;
SYS_aio_return : constant := 314;
SYS_aio_suspend : constant := 315;
SYS_aio_suspend_nocancel : constant := 421;
SYS_aio_write : constant := 319;
SYS_audit : constant := 350;
SYS_auditctl : constant := 359;
SYS_auditon : constant := 351;
SYS_bind : constant := 104;
SYS_bsdthread_create : constant := 360;
SYS_bsdthread_register : constant := 366;
SYS_bsdthread_terminate : constant := 361;
SYS_chdir : constant := 12;
SYS_chflags : constant := 34;
SYS_chmod : constant := 15;
SYS_chmod_extended : constant := 282;
SYS_chown : constant := 16;
SYS_chroot : constant := 61;
SYS_chud : constant := 185;
SYS_close : constant := 6;
SYS_close_nocancel : constant := 399;
SYS_connect : constant := 98;
SYS_connect_nocancel : constant := 409;
SYS_copyfile : constant := 227;
SYS_csops : constant := 169;
SYS_delete : constant := 226;
SYS_dup : constant := 41;
SYS_dup2 : constant := 90;
SYS_exchangedata : constant := 223;
SYS_execve : constant := 59;
SYS_exit : constant := 1;
SYS_fchdir : constant := 13;
SYS_fchflags : constant := 35;
SYS_fchmod : constant := 124;
SYS_fchmod_extended : constant := 283;
SYS_fchown : constant := 123;
SYS_fcntl : constant := 92;
SYS_fcntl_nocancel : constant := 406;
SYS_fgetxattr : constant := 235;
SYS_fhopen : constant := 248;
SYS_flistxattr : constant := 241;
SYS_flock : constant := 131;
SYS_fork : constant := 2;
SYS_fpathconf : constant := 192;
SYS_fremovexattr : constant := 239;
SYS_fsctl : constant := 242;
SYS_fsetxattr : constant := 237;
SYS_fstat : constant := 189;
SYS_fstat64 : constant := 339;
SYS_fstat64_extended : constant := 343;
SYS_fstat_extended : constant := 281;
SYS_fstatfs : constant := 158;
SYS_fstatfs64 : constant := 346;
SYS_fstatv : constant := 219;
SYS_fsync : constant := 95;
SYS_fsync_nocancel : constant := 408;
SYS_ftruncate : constant := 201;
SYS_futimes : constant := 139;
SYS_getattrlist : constant := 220;
SYS_getaudit : constant := 355;
SYS_getaudit_addr : constant := 357;
SYS_getauid : constant := 353;
SYS_getdirentries : constant := 196;
SYS_getdirentries64 : constant := 344;
SYS_getdirentriesattr : constant := 222;
SYS_getdtablesize : constant := 89;
SYS_getegid : constant := 43;
SYS_geteuid : constant := 25;
SYS_getfh : constant := 161;
SYS_getfsstat : constant := 18;
SYS_getfsstat64 : constant := 347;
SYS_getgid : constant := 47;
SYS_getgroups : constant := 79;
SYS_gethostuuid : constant := 142;
SYS_getitimer : constant := 86;
SYS_getlcid : constant := 395;
SYS_getlogin : constant := 49;
SYS_getpeername : constant := 31;
SYS_getpgid : constant := 151;
SYS_getpgrp : constant := 81;
SYS_getpid : constant := 20;
SYS_getppid : constant := 39;
SYS_getpriority : constant := 100;
SYS_getrlimit : constant := 194;
SYS_getrusage : constant := 117;
SYS_getsgroups : constant := 288;
SYS_getsid : constant := 310;
SYS_getsockname : constant := 32;
SYS_getsockopt : constant := 118;
SYS_gettid : constant := 286;
SYS_gettimeofday : constant := 116;
SYS_getuid : constant := 24;
SYS_getwgroups : constant := 290;
SYS_getxattr : constant := 234;
SYS_identitysvc : constant := 293;
SYS_initgroups : constant := 243;
SYS_ioctl : constant := 54;
SYS_iopolicysys : constant := 322;
SYS_issetugid : constant := 327;
SYS_kdebug_trace : constant := 180;
SYS_kevent : constant := 363;
SYS_kill : constant := 37;
SYS_kqueue : constant := 362;
SYS_kqueue_from_portset_np : constant := 214;
SYS_kqueue_portset_np : constant := 215;
SYS_lchown : constant := 364;
SYS_link : constant := 9;
SYS_lio_listio : constant := 320;
SYS_listen : constant := 106;
SYS_listxattr : constant := 240;
SYS_lseek : constant := 199;
SYS_lstat : constant := 190;
SYS_lstat64 : constant := 340;
SYS_lstat64_extended : constant := 342;
SYS_lstat_extended : constant := 280;
SYS_lstatv : constant := 218;
SYS_madvise : constant := 75;
SYS_mincore : constant := 78;
SYS_minherit : constant := 250;
SYS_mkcomplex : constant := 216;
SYS_mkdir : constant := 136;
SYS_mkdir_extended : constant := 292;
SYS_mkfifo : constant := 132;
SYS_mkfifo_extended : constant := 291;
SYS_mknod : constant := 14;
SYS_mlock : constant := 203;
SYS_mlockall : constant := 324;
SYS_mmap : constant := 197;
SYS_modwatch : constant := 233;
SYS_mount : constant := 167;
SYS_mprotect : constant := 74;
SYS_msgctl : constant := 258;
SYS_msgget : constant := 259;
SYS_msgrcv : constant := 261;
SYS_msgrcv_nocancel : constant := 419;
SYS_msgsnd : constant := 260;
SYS_msgsnd_nocancel : constant := 418;
SYS_msgsys : constant := 252;
SYS_msync : constant := 65;
SYS_msync_nocancel : constant := 405;
SYS_munlock : constant := 204;
SYS_munlockall : constant := 325;
SYS_munmap : constant := 73;
SYS_nfsclnt : constant := 247;
SYS_nfssvc : constant := 155;
SYS_obreak : constant := 17;
SYS_ogetfsstat : constant := 18;
SYS_open : constant := 5;
SYS_open_extended : constant := 277;
SYS_open_nocancel : constant := 398;
SYS_ovadvise : constant := 72;
SYS_pathconf : constant := 191;
SYS_pipe : constant := 42;
SYS_poll : constant := 230;
SYS_poll_nocancel : constant := 417;
SYS_posix_spawn : constant := 244;
SYS_pread : constant := 153;
SYS_pread_nocancel : constant := 414;
SYS_proc_info : constant := 336;
SYS_profil : constant := 44;
SYS_ptrace : constant := 26;
SYS_pwrite : constant := 154;
SYS_pwrite_nocancel : constant := 415;
SYS_quotactl : constant := 165;
SYS_read : constant := 3;
SYS_read_nocancel : constant := 396;
SYS_readlink : constant := 58;
SYS_readv : constant := 120;
SYS_readv_nocancel : constant := 411;
SYS_reboot : constant := 55;
SYS_recvfrom : constant := 29;
SYS_recvfrom_nocancel : constant := 403;
SYS_recvmsg : constant := 27;
SYS_recvmsg_nocancel : constant := 401;
SYS_removexattr : constant := 238;
SYS_rename : constant := 128;
SYS_revoke : constant := 56;
SYS_rmdir : constant := 137;
SYS_sbrk : constant := 69;
SYS_searchfs : constant := 225;
SYS_select : constant := 93;
SYS_select_nocancel : constant := 407;
SYS_sem_close : constant := 269;
SYS_sem_destroy : constant := 276;
SYS_sem_getvalue : constant := 274;
SYS_sem_init : constant := 275;
SYS_sem_open : constant := 268;
SYS_sem_post : constant := 273;
SYS_sem_trywait : constant := 272;
SYS_sem_unlink : constant := 270;
SYS_sem_wait : constant := 271;
SYS_sem_wait_nocancel : constant := 420;
SYS_semctl : constant := 254;
SYS_semget : constant := 255;
SYS_semop : constant := 256;
SYS_semsys : constant := 251;
SYS_sendfile : constant := 337;
SYS_sendmsg : constant := 28;
SYS_sendmsg_nocancel : constant := 402;
SYS_sendto : constant := 133;
SYS_sendto_nocancel : constant := 413;
SYS_setattrlist : constant := 221;
SYS_setaudit : constant := 356;
SYS_setaudit_addr : constant := 358;
SYS_setauid : constant := 354;
SYS_setegid : constant := 182;
SYS_seteuid : constant := 183;
SYS_setgid : constant := 181;
SYS_setgroups : constant := 80;
SYS_setitimer : constant := 83;
SYS_setlcid : constant := 394;
SYS_setlogin : constant := 50;
SYS_setpgid : constant := 82;
SYS_setpriority : constant := 96;
SYS_setprivexec : constant := 152;
SYS_setregid : constant := 127;
SYS_setreuid : constant := 126;
SYS_setrlimit : constant := 195;
SYS_setsgroups : constant := 287;
SYS_setsid : constant := 147;
SYS_setsockopt : constant := 105;
SYS_settid : constant := 285;
SYS_settid_with_pid : constant := 311;
SYS_settimeofday : constant := 122;
SYS_setuid : constant := 23;
SYS_setwgroups : constant := 289;
SYS_setxattr : constant := 236;
SYS_shared_region_check_np : constant := 294;
SYS_shared_region_map_np : constant := 295;
SYS_shm_open : constant := 266;
SYS_shm_unlink : constant := 267;
SYS_shmat : constant := 262;
SYS_shmctl : constant := 263;
SYS_shmdt : constant := 264;
SYS_shmget : constant := 265;
SYS_shmsys : constant := 253;
SYS_shutdown : constant := 134;
SYS_sigaction : constant := 46;
SYS_sigaltstack : constant := 53;
SYS_sigpending : constant := 52;
SYS_sigprocmask : constant := 48;
SYS_sigreturn : constant := 184;
SYS_sigsuspend : constant := 111;
SYS_sigsuspend_nocancel : constant := 410;
SYS_socket : constant := 97;
SYS_socketpair : constant := 135;
SYS_sstk : constant := 70;
SYS_stack_snapshot : constant := 365;
SYS_stat : constant := 188;
SYS_stat64 : constant := 338;
SYS_stat64_extended : constant := 341;
SYS_stat_extended : constant := 279;
SYS_statfs : constant := 157;
SYS_statfs64 : constant := 345;
SYS_statv : constant := 217;
SYS_swapon : constant := 85;
SYS_symlink : constant := 57;
SYS_sync : constant := 36;
SYS_syscall : constant := 0;
SYS_table : constant := 170;
SYS_truncate : constant := 200;
SYS_umask : constant := 60;
SYS_umask_extended : constant := 278;
SYS_undelete : constant := 205;
SYS_unlink : constant := 10;
SYS_unmount : constant := 159;
SYS_utimes : constant := 138;
SYS_vfork : constant := 66;
SYS_wait4 : constant := 7;
SYS_wait4_nocancel : constant := 400;
SYS_waitevent : constant := 232;
SYS_waitid : constant := 173;
SYS_waitid_nocancel : constant := 416;
SYS_watchevent : constant := 231;
SYS_workq_open : constant := 367;
SYS_workq_ops : constant := 368;
SYS_write : constant := 4;
SYS_write_nocancel : constant := 397;
SYS_writev : constant := 121;
SYS_writev_nocancel : constant := 412;
-- _SYS_SYSCALL_H_ (empty)
end C.sys.syscall;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.types;
with C.mach.i386.boolean;
with C.stddef;
with C.stdint;
with C.sys.proc;
with C.sys.types;
with C.sys.ucred;
with C.sys.vm;
package C.sys.sysctl is
pragma Preelaborate;
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);
type struct_pcred;
type struct_pcred is record
pc_lock : aliased char_array (0 .. 71);
pc_ucred : aliased sys.ucred.struct_ucred_ptr;
p_ruid : aliased sys.types.uid_t;
p_svuid : aliased sys.types.uid_t;
p_rgid : aliased sys.types.gid_t;
p_svgid : aliased sys.types.gid_t;
p_refcnt : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_pcred);
type struct_ucred;
type struct_ucred is record
cr_ref : aliased stdint.int32_t;
cr_uid : aliased sys.types.uid_t;
cr_ngroups : aliased signed_short;
cr_groups : aliased sys.types.gid_t_array (0 .. 15);
end record;
pragma Convention (C_Pass_By_Copy, struct_ucred);
type struct_kinfo_proc;
type struct_eproc;
type struct_eproc is record
e_paddr : aliased sys.proc.struct_proc_ptr;
e_sess : aliased sys.proc.struct_session_ptr;
e_pcred : aliased struct_pcred;
e_ucred : aliased struct_ucred;
e_vm : aliased sys.vm.struct_vmspace;
e_ppid : aliased sys.types.pid_t;
e_pgid : aliased sys.types.pid_t;
e_jobc : aliased signed_short;
e_tdev : aliased sys.types.dev_t;
e_tpgid : aliased sys.types.pid_t;
e_tsess : aliased sys.proc.struct_session_ptr;
e_wmesg : aliased char_array (0 .. 7);
e_xsize : aliased sys.types.segsz_t;
e_xrssize : aliased signed_short;
e_xccount : aliased signed_short;
e_xswrss : aliased signed_short;
e_flag : aliased stdint.int32_t;
e_login : aliased char_array (0 .. 11);
e_spare : aliased stdint.int32_t_array (0 .. 3);
end record;
pragma Convention (C_Pass_By_Copy, struct_eproc);
type struct_kinfo_proc is record
kp_proc : aliased sys.proc.struct_extern_proc;
kp_eproc : aliased struct_eproc;
end record;
pragma Convention (C_Pass_By_Copy, struct_kinfo_proc);
type struct_kinfo_lctx;
type struct_kinfo_lctx is record
id : aliased sys.types.pid_t;
mc : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_kinfo_lctx);
type struct_xsw_usage;
type struct_xsw_usage is record
xsu_total : aliased i386.types.u_int64_t;
xsu_avail : aliased i386.types.u_int64_t;
xsu_used : aliased i386.types.u_int64_t;
xsu_pagesize : aliased i386.types.u_int32_t;
xsu_encrypted : aliased mach.i386.boolean.boolean_t;
end record;
pragma Convention (C_Pass_By_Copy, struct_xsw_usage);
type struct_loadavg;
type struct_loadavg is record
ldavg : aliased sys.types.fixpt_t_array (0 .. 2);
fscale : aliased signed_long;
end record;
pragma Convention (C_Pass_By_Copy, struct_loadavg);
averunnable : aliased struct_loadavg;
pragma Import (C, averunnable, "averunnable");
function sysctl (a1 : access signed_int; a2 : sys.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");
COMAPT_MAXLOGNAME : constant := 12;
CTLFLAG_ANYBODY : constant := 268435456;
CTLFLAG_KERN : constant := 16777216;
CTLFLAG_LOCKED : constant := 8388608;
CTLFLAG_MASKED : constant := 67108864;
CTLFLAG_NOAUTO : constant := 33554432;
CTLFLAG_NOLOCK : constant := 536870912;
CTLFLAG_RD : constant := -2147483648;
CTLFLAG_RW : constant := -1073741824;
CTLFLAG_SECURE : constant := 134217728;
CTLFLAG_WR : constant := 1073741824;
CTLTYPE : constant := 15;
CTLTYPE_INT : constant := 2;
CTLTYPE_NODE : constant := 1;
CTLTYPE_OPAQUE : constant := 5;
CTLTYPE_QUAD : constant := 4;
CTLTYPE_STRING : constant := 3;
CTLTYPE_STRUCT : constant := 5;
CTL_DEBUG : constant := 5;
CTL_DEBUG_MAXID : constant := 20;
CTL_DEBUG_NAME : constant := 0;
CTL_DEBUG_VALUE : constant := 1;
CTL_HW : constant := 6;
-- CTL_HW_NAMES (plase type with #pragma instance)
CTL_KERN : constant := 1;
-- CTL_KERN_NAMES (plase type with #pragma instance)
CTL_MACHDEP : constant := 7;
CTL_MAXID : constant := 9;
CTL_MAXNAME : constant := 12;
-- CTL_NAMES (unparsible)
CTL_NET : constant := 4;
CTL_UNSPEC : constant := 0;
CTL_USER : constant := 8;
-- CTL_USER_NAMES (plase type with #pragma instance)
CTL_VFS : constant := 3;
-- CTL_VFS_NAMES (plase type with #pragma instance)
CTL_VM : constant := 2;
-- CTL_VM_NAMES (plase type with #pragma instance)
EPROC_CTTY : constant := 1;
EPROC_SLEADER : constant := 2;
HW_AVAILCPU : constant := 25;
HW_BUS_FREQ : constant := 14;
HW_BYTEORDER : constant := 4;
HW_CACHELINE : constant := 16;
HW_CPU_FREQ : constant := 15;
HW_DISKNAMES : constant := 8;
HW_DISKSTATS : constant := 9;
HW_EPOCH : constant := 10;
HW_FLOATINGPT : constant := 11;
HW_L1DCACHESIZE : constant := 18;
HW_L1ICACHESIZE : constant := 17;
HW_L2CACHESIZE : constant := 20;
HW_L2SETTINGS : constant := 19;
HW_L3CACHESIZE : constant := 22;
HW_L3SETTINGS : constant := 21;
HW_MACHINE : constant := 1;
HW_MACHINE_ARCH : constant := 12;
HW_MAXID : constant := 26;
HW_MEMSIZE : constant := 24;
HW_MODEL : constant := 2;
HW_NCPU : constant := 3;
HW_PAGESIZE : constant := 7;
HW_PHYSMEM : constant := 5;
HW_TB_FREQ : constant := 23;
HW_USERMEM : constant := 6;
HW_VECTORUNIT : constant := 13;
KERN_AFFINITY : constant := 43;
KERN_AIOMAX : constant := 46;
KERN_AIOPROCMAX : constant := 47;
KERN_AIOTHREADS : constant := 48;
KERN_ARGMAX : constant := 8;
KERN_BOOTFILE : constant := 28;
KERN_BOOTTIME : constant := 21;
KERN_CHECKOPENEVT : constant := 70;
KERN_CLASSIC : constant := 44;
KERN_CLASSICHANDLER : constant := 45;
KERN_CLOCKRATE : constant := 12;
KERN_COREDUMP : constant := 51;
KERN_COREFILE : constant := 50;
KERN_DOMAINNAME : constant := 22;
KERN_DUMMY : constant := 33;
KERN_DUMPDEV : constant := 31;
KERN_EXEC : constant := 45;
KERN_FILE : constant := 15;
KERN_HOSTID : constant := 11;
KERN_HOSTNAME : constant := 10;
KERN_IPC : constant := 32;
KERN_JOB_CONTROL : constant := 19;
KERN_KDDFLAGS : constant := 2;
KERN_KDEBUG : constant := 24;
KERN_KDEFLAGS : constant := 1;
KERN_KDENABLE : constant := 3;
KERN_KDGETBUF : constant := 5;
KERN_KDGETENTROPY : constant := 16;
KERN_KDGETREG : constant := 9;
KERN_KDPIDEX : constant := 14;
KERN_KDPIDTR : constant := 11;
KERN_KDREADTR : constant := 10;
KERN_KDREMOVE : constant := 7;
KERN_KDSETBUF : constant := 4;
KERN_KDSETREG : constant := 8;
KERN_KDSETRTCDEC : constant := 15;
KERN_KDSETUP : constant := 6;
KERN_KDTHRMAP : constant := 12;
KERN_LCTX : constant := 67;
KERN_LCTX_ALL : constant := 0;
KERN_LCTX_LCID : constant := 1;
KERN_LOGSIGEXIT : constant := 36;
KERN_LOW_PRI_DELAY : constant := 57;
KERN_LOW_PRI_WINDOW : constant := 56;
KERN_MAXFILES : constant := 7;
KERN_MAXFILESPERPROC : constant := 29;
KERN_MAXID : constant := 71;
KERN_MAXPARTITIONS : constant := 23;
KERN_MAXPROC : constant := 6;
KERN_MAXPROCPERUID : constant := 30;
KERN_MAXVNODES : constant := 5;
KERN_NETBOOT : constant := 40;
KERN_NGROUPS : constant := 18;
KERN_NISDOMAINNAME : constant := 22;
KERN_NTP_PLL : constant := 27;
KERN_NX_PROTECTION : constant := 60;
KERN_OPENEVT_PROC : constant := 1;
KERN_OSRELDATE : constant := 26;
KERN_OSRELEASE : constant := 2;
KERN_OSREV : constant := 3;
KERN_OSTYPE : constant := 1;
KERN_OSVERSION : constant := 65;
KERN_PANICINFO : constant := 41;
KERN_PANICINFO_IMAGE : constant := 2;
KERN_PANICINFO_MAXSIZE : constant := 1;
KERN_POSIX : constant := 58;
KERN_POSIX1 : constant := 17;
KERN_PROC : constant := 14;
KERN_PROCARGS : constant := 38;
KERN_PROCARGS2 : constant := 49;
KERN_PROCDELAYTERM : constant := 53;
KERN_PROCNAME : constant := 62;
KERN_PROC_ALL : constant := 0;
KERN_PROC_LCID : constant := 7;
KERN_PROC_LOW_PRI_IO : constant := 55;
KERN_PROC_PGRP : constant := 2;
KERN_PROC_PID : constant := 1;
KERN_PROC_RUID : constant := 6;
KERN_PROC_SESSION : constant := 3;
KERN_PROC_TTY : constant := 4;
KERN_PROC_UID : constant := 5;
KERN_PROF : constant := 16;
KERN_PS_STRINGS : constant := 34;
KERN_RAGEVNODE : constant := 68;
KERN_RAGE_PROC : constant := 1;
KERN_RAGE_THREAD : constant := 2;
KERN_SAFEBOOT : constant := 66;
KERN_SAVED_IDS : constant := 20;
KERN_SECURELVL : constant := 9;
KERN_SHREG_PRIVATIZABLE : constant := 54;
KERN_SPECULATIVE_READS : constant := 64;
KERN_SUGID_COREDUMP : constant := 52;
KERN_SYMFILE : constant := 37;
KERN_SYSV : constant := 42;
KERN_TFP : constant := 61;
KERN_TFP_POLICY : constant := 1;
KERN_TFP_POLICY_DEFAULT : constant := 2;
KERN_TFP_POLICY_DENY : constant := 0;
KERN_THALTSTACK : constant := 63;
KERN_TRANSLATE : constant := 44;
KERN_TTY : constant := 69;
KERN_UNOPENEVT_PROC : constant := 2;
KERN_UNRAGE_PROC : constant := 3;
KERN_UNRAGE_THREAD : constant := 4;
KERN_UPDATEINTERVAL : constant := 25;
KERN_USRSTACK : constant := 35;
KERN_USRSTACK32 : constant := 35;
KERN_USRSTACK64 : constant := 59;
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_MBSTAT : constant := 8;
KIPC_NMBCLUSTERS : constant := 9;
KIPC_SOCKBUF_WASTE : constant := 2;
KIPC_SOMAXCONN : constant := 3;
KIPC_SOQLIMITCOMPAT : constant := 10;
LSCALE : constant := 1000;
OID_AUTO : constant := -1;
OID_AUTO_START : constant := 100;
-- SYSCTL_DEF_ENABLED (empty)
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;
VM_LOADAVG : constant := 2;
VM_MACHFACTOR : constant := 4;
VM_MAXID : constant := 6;
VM_METER : constant := 1;
VM_SWAPUSAGE : constant := 5;
WMESGLEN : constant := 7;
-- _SYS_SYSCTL_H_ (empty)
end C.sys.sysctl;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
BC_BASE_MAX : constant := 99;
BC_DIM_MAX : constant := 2048;
BC_SCALE_MAX : constant := 99;
BC_STRING_MAX : constant := 1000;
CHARCLASS_NAME_MAX : constant := 14;
CHILD_MAX : constant := 266;
COLL_WEIGHTS_MAX : constant := 2;
EQUIV_CLASS_MAX : constant := 2;
EXPR_NEST_MAX : constant := 32;
GID_MAX : constant := 2147483647;
LINE_MAX : constant := 2048;
LINK_MAX : constant := 32767;
MAX_CANON : constant := 1024;
MAX_INPUT : constant := 1024;
NAME_MAX : constant := 255;
NGROUPS_MAX : constant := 16;
NZERO : constant := 20;
OPEN_MAX : constant := 10240;
PATH_MAX : constant := 1024;
PIPE_BUF : constant := 512;
RE_DUP_MAX : constant := 255;
UID_MAX : constant := 2147483647;
-- _SYS_SYSLIMITS_H_ (empty)
end C.sys.syslimits;
-- This file is translated by "headmaster" version 0.27-2060155 (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.termios is
pragma Preelaborate;
subtype tcflag_t is unsigned_long;
subtype cc_t is unsigned_char;
subtype cc_t_array is unsigned_char_array;
subtype speed_t is unsigned_long;
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$UNIX2003");
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");
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;
B4800 : constant := 4800;
B50 : constant := 50;
B57600 : constant := 57600;
B600 : constant := 600;
B7200 : constant := 7200;
B75 : constant := 75;
B76800 : constant := 76800;
B9600 : constant := 9600;
BRKINT : constant := 2;
BS0 : constant := 0;
BS1 : constant := 32768;
BSDLY : constant := 32768;
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;
CR0 : constant := 0;
CR1 : constant := 4096;
CR2 : constant := 8192;
CR3 : constant := 12288;
CRDLY : constant := 12288;
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;
FF0 : constant := 0;
FF1 : constant := 16384;
FFDLY : constant := 16384;
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;
IUTF8 : constant := 16384;
IXANY : constant := 2048;
IXOFF : constant := 1024;
IXON : constant := 512;
MDMBUF : constant := 1048576;
NCCS : constant := 20;
NL0 : constant := 0;
NL1 : constant := 256;
NL2 : constant := 512;
NL3 : constant := 768;
NLDLY : constant := 768;
NOFLSH : constant := -2147483648;
NOKERNINFO : constant := 33554432;
OCRNL : constant := 16;
OFDEL : constant := 131072;
OFILL : constant := 128;
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;
TAB1 : constant := 1024;
TAB2 : constant := 2048;
TAB3 : constant := 4;
TABDLY : constant := 3076;
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;
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;
VT0 : constant := 0;
VT1 : constant := 65536;
VTDLY : constant := 65536;
VTIME : constant := 17;
VWERASE : constant := 4;
-- _SYS_TERMIOS_H_ (empty)
end C.sys.termios;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qstructs;
package C.sys.time is
pragma Preelaborate;
subtype struct_fd_set is sys.qstructs.struct_fd_set;
subtype fd_set is sys.qstructs.fd_set;
function qqdarwin_fd_isset (n : signed_int;
p : access sys.qstructs.struct_fd_set) return signed_int
renames sys.qstructs.qqdarwin_fd_isset;
subtype struct_darwin_sigaltstack is
sys.qstructs.struct_darwin_sigaltstack;
subtype struct_darwin_ucontext is sys.qstructs.struct_darwin_ucontext;
subtype stack_t is sys.qstructs.stack_t;
subtype ucontext_t is sys.qstructs.ucontext_t;
subtype struct_timespec is sys.qstructs.struct_timespec;
subtype struct_timeval is sys.qstructs.struct_timeval;
-- qFD_SET renames sys.qstructs.qFD_SET (empty)
-- qSTACK_T renames sys.qstructs.qSTACK_T (empty)
subtype STRUCT_SIGALTSTACK is sys.qstructs.struct_darwin_sigaltstack;
subtype qSTRUCT_TIMESPEC is sys.qstructs.struct_timespec;
subtype qSTRUCT_TIMEVAL is sys.qstructs.struct_timeval;
subtype STRUCT_UCONTEXT is sys.qstructs.struct_darwin_ucontext;
-- qUCONTEXT_T renames sys.qstructs.qUCONTEXT_T (empty)
-- DARWIN_FD_CLR renames sys.qstructs.DARWIN_FD_CLR (uninterpretable)
-- DARWIN_FD_COPY renames sys.qstructs.DARWIN_FD_COPY (unparsible)
-- qqDARWIN_FD_ISSET renames sys.qstructs.qqDARWIN_FD_I... (function macro)
-- DARWIN_FD_SET renames sys.qstructs.DARWIN_FD_SET (uninterpretable)
DARWIN_FD_SETSIZE : constant := sys.qstructs.DARWIN_FD_SETSIZE;
-- DARWIN_FD_ZERO renames sys.qstructs.DARWIN_FD_ZERO (function macro)
DARWIN_NBBY : constant := sys.qstructs.DARWIN_NBBY;
DARWIN_NFDBITS : constant := sys.qstructs.DARWIN_NFDBITS;
-- DARWIN_howmany renames sys.qstructs.DARWIN_howmany (function macro)
type struct_itimerval;
type struct_itimerval is record
it_interval : aliased sys.qstructs.struct_timeval;
it_value : aliased sys.qstructs.struct_timeval;
end record;
pragma Convention (C_Pass_By_Copy, struct_itimerval);
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_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_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_clockinfo;
type struct_clockinfo is record
hz : aliased signed_int;
tick : aliased signed_int;
tickadj : aliased signed_int;
stathz : aliased signed_int;
profhz : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_clockinfo);
function adjtime (a1 : access constant sys.qstructs.struct_timeval;
a2 : access sys.qstructs.struct_timeval) return signed_int;
pragma Import (C, adjtime, "adjtime");
function futimes (a1 : signed_int;
a2 : access constant sys.qstructs.struct_timeval) return signed_int;
pragma Import (C, futimes, "futimes");
function lutimes (a1 : access constant char;
a2 : access constant sys.qstructs.struct_timeval) return signed_int;
pragma Import (C, lutimes, "lutimes");
function settimeofday (a1 : access constant sys.qstructs.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 sys.qstructs.struct_timeval;
a2 : void_ptr) return signed_int;
function gettimeofday (a1 : access sys.qstructs.struct_timeval;
a2 : access struct_timezone) return signed_int;
pragma Import (C, gettimeofday, "gettimeofday");
-- #include <sys/_select.h>
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 sys.qstructs.struct_timeval) return signed_int;
pragma Import (C, utimes, "utimes");
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;
-- TIMESPEC_TO_TIMEVAL (uninterpretable)
-- TIMEVAL_TO_TIMESPEC (uninterpretable)
-- _SYS_TIME_H_ (empty)
-- timeradd (uninterpretable)
-- timerclear (uninterpretable)
-- timercmp (unparsible)
-- timerisset (uninterpretable)
-- timersub (uninterpretable)
-- timevalcmp (unparsible)
end C.sys.time;
-- This file is translated by "headmaster" version 0.27-2060155 (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);
PPPDISC : constant := 5;
SLIPDISC : constant := 4;
TABLDISC : constant := 3;
TIOCCBRK : constant := 536900730;
TIOCCDTR : constant := 536900728;
TIOCCONS : constant := 2147775586;
TIOCDCDTIMESTAMP : constant := 1074295896;
TIOCDRAIN : constant := 536900702;
TIOCDSIMICROCODE : constant := 536900693;
TIOCEXCL : constant := 536900621;
TIOCEXT : constant := 2147775584;
TIOCFLUSH : constant := 2147775504;
TIOCGDRAINWAIT : constant := 1074033750;
TIOCGETA : constant := 1076655123;
TIOCGETD : constant := 1074033690;
TIOCGPGRP : constant := 1074033783;
TIOCGWINSZ : constant := 1074295912;
TIOCIXOFF : constant := 536900736;
TIOCIXON : constant := 536900737;
TIOCMBIC : constant := 2147775595;
TIOCMBIS : constant := 2147775596;
TIOCMGDTRWAIT : constant := 1074033754;
TIOCMGET : constant := 1074033770;
TIOCMODG : constant := 1074033667;
TIOCMODS : constant := 2147775492;
TIOCMSDTRWAIT : constant := 2147775579;
TIOCMSET : constant := 2147775597;
TIOCM_CAR : constant := 64;
TIOCM_CD : constant := 64;
TIOCM_CTS : constant := 32;
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;
TIOCPTYGNAME : constant := 1082160211;
TIOCPTYGRANT : constant := 536900692;
TIOCPTYUNLK : constant := 536900690;
TIOCREMOTE : constant := 2147775593;
TIOCSBRK : constant := 536900731;
TIOCSCONS : constant := 536900707;
TIOCSCTTY : constant := 536900705;
TIOCSDRAINWAIT : constant := 2147775575;
TIOCSDTR : constant := 536900729;
TIOCSETA : constant := 2150396948;
TIOCSETAF : constant := 2150396950;
TIOCSETAW : constant := 2150396949;
TIOCSETD : constant := 2147775515;
TIOCSIG : constant := 536900703;
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 is translated by "headmaster" version 0.27-2060155 (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;
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_OFLAG : constant := 3;
TTYDEF_SPEED : constant := 9600;
-- _SYS_TTYDEFAULTS_H_ (empty)
end C.sys.ttydefaults;
-- This file is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
with C.i386.types;
with C.stdint;
with C.sys.qtypes;
package C.sys.types is
pragma Preelaborate;
subtype u_char is unsigned_char;
subtype u_char_ptr is unsigned_char_ptr;
subtype u_char_array is unsigned_char_array;
subtype u_short is unsigned_short;
subtype u_int is unsigned_int;
subtype u_long is unsigned_long;
subtype ushort is unsigned_short;
subtype uint is unsigned_int;
subtype u_quad_t is i386.types.u_int64_t;
subtype quad_t is stdint.int64_t;
subtype quad_t_ptr is stdint.int64_t_ptr;
subtype qaddr_t is quad_t_ptr;
subtype caddr_t is char_ptr;
subtype caddr_t_array is char_ptr_array;
subtype daddr_t is stdint.int32_t;
subtype dev_t is sys.qtypes.darwin_dev_t;
subtype fixpt_t is i386.types.u_int32_t;
subtype fixpt_t_array is i386.types.u_int32_t_array;
subtype blkcnt_t is sys.qtypes.darwin_blkcnt_t;
subtype blksize_t is sys.qtypes.darwin_blksize_t;
subtype gid_t is sys.qtypes.darwin_gid_t;
subtype gid_t_array is sys.qtypes.darwin_gid_t_array;
subtype gid_t_ptr is sys.qtypes.darwin_gid_t_ptr;
subtype gid_t_const_ptr is sys.qtypes.darwin_gid_t_const_ptr;
subtype in_addr_t is i386.qtypes.uint32_t;
subtype in_port_t is i386.qtypes.uint16_t;
subtype ino_t is sys.qtypes.darwin_ino_t;
subtype ino64_t is sys.qtypes.darwin_ino64_t;
subtype key_t is i386.qtypes.int32_t;
subtype mode_t is sys.qtypes.darwin_mode_t;
subtype nlink_t is i386.qtypes.uint16_t;
subtype id_t is sys.qtypes.darwin_id_t;
subtype pid_t is sys.qtypes.darwin_pid_t;
subtype pid_t_ptr is sys.qtypes.darwin_pid_t_ptr;
subtype off_t is sys.qtypes.darwin_off_t;
subtype off_t_ptr is sys.qtypes.darwin_off_t_ptr;
subtype segsz_t is stdint.int32_t;
subtype swblk_t is stdint.int32_t;
subtype uid_t is sys.qtypes.darwin_uid_t;
subtype uid_t_ptr is sys.qtypes.darwin_uid_t_ptr;
subtype uid_t_const_ptr is sys.qtypes.darwin_uid_t_const_ptr;
subtype clock_t is i386.qtypes.darwin_clock_t;
subtype ssize_t is i386.qtypes.darwin_ssize_t;
subtype time_t is i386.qtypes.darwin_time_t;
subtype time_t_const_ptr is i386.qtypes.darwin_time_t_const_ptr;
subtype time_t_ptr is i386.qtypes.darwin_time_t_ptr;
subtype useconds_t is sys.qtypes.darwin_useconds_t;
subtype suseconds_t is sys.qtypes.darwin_suseconds_t;
-- #include <sys/_structs.h>
subtype fd_mask is i386.qtypes.int32_t;
subtype pthread_attr_t is sys.qtypes.darwin_pthread_attr_t;
subtype pthread_attr_t_ptr is sys.qtypes.darwin_pthread_attr_t_ptr;
subtype pthread_attr_t_const_ptr is
sys.qtypes.darwin_pthread_attr_t_const_ptr;
subtype pthread_cond_t is sys.qtypes.darwin_pthread_cond_t;
subtype pthread_cond_t_ptr is sys.qtypes.darwin_pthread_cond_t_ptr;
subtype pthread_condattr_t is sys.qtypes.darwin_pthread_condattr_t;
subtype pthread_condattr_t_const_ptr is
sys.qtypes.darwin_pthread_condattr_t_const_ptr;
subtype pthread_condattr_t_ptr is
sys.qtypes.darwin_pthread_condattr_t_ptr;
subtype pthread_mutex_t is sys.qtypes.darwin_pthread_mutex_t;
subtype pthread_mutex_t_ptr is sys.qtypes.darwin_pthread_mutex_t_ptr;
subtype pthread_mutex_t_const_ptr is
sys.qtypes.darwin_pthread_mutex_t_const_ptr;
subtype pthread_mutexattr_t is sys.qtypes.darwin_pthread_mutexattr_t;
subtype pthread_mutexattr_t_const_ptr is
sys.qtypes.darwin_pthread_mutexattr_t_const_ptr;
subtype pthread_mutexattr_t_ptr is
sys.qtypes.darwin_pthread_mutexattr_t_ptr;
subtype pthread_once_t is sys.qtypes.darwin_pthread_once_t;
subtype pthread_once_t_ptr is sys.qtypes.darwin_pthread_once_t_ptr;
subtype pthread_rwlock_t is sys.qtypes.darwin_pthread_rwlock_t;
subtype pthread_rwlock_t_ptr is sys.qtypes.darwin_pthread_rwlock_t_ptr;
subtype pthread_rwlockattr_t is sys.qtypes.darwin_pthread_rwlockattr_t;
subtype pthread_rwlockattr_t_const_ptr is
sys.qtypes.darwin_pthread_rwlockattr_t_const_ptr;
subtype pthread_rwlockattr_t_ptr is
sys.qtypes.darwin_pthread_rwlockattr_t_ptr;
subtype pthread_t is sys.qtypes.darwin_pthread_t;
subtype pthread_t_ptr is sys.qtypes.darwin_pthread_t_ptr;
subtype pthread_key_t is sys.qtypes.darwin_pthread_key_t;
subtype pthread_key_t_ptr is sys.qtypes.darwin_pthread_key_t_ptr;
subtype fsblkcnt_t is sys.qtypes.darwin_fsblkcnt_t;
subtype fsfilcnt_t is sys.qtypes.darwin_fsfilcnt_t;
-- FD_CLR (uninterpretable)
-- FD_COPY (unparsible)
-- FD_ISSET (function macro)
-- FD_SET (uninterpretable)
FD_SETSIZE : constant := 1024;
-- FD_ZERO (function macro)
NBBY : constant := 8;
NFDBITS : constant := 32;
-- _BLKCNT_T (empty)
-- _BLKSIZE_T (empty)
-- _CLOCK_T (empty)
-- _DEV_T (empty)
-- _FSBLKCNT_T (empty)
-- _FSFILCNT_T (empty)
-- _GID_T (empty)
-- _ID_T (empty)
-- _INO64_T (empty)
-- _INO_T (empty)
-- _IN_ADDR_T (empty)
-- _IN_PORT_T (empty)
-- _KEY_T (empty)
-- _MODE_T (empty)
-- _NLINK_T (empty)
-- _OFF_T (empty)
-- _PID_T (empty)
-- _PTHREAD_ATTR_T (empty)
-- _PTHREAD_CONDATTR_T (empty)
-- _PTHREAD_COND_T (empty)
-- _PTHREAD_KEY_T (empty)
-- _PTHREAD_MUTEXATTR_T (empty)
-- _PTHREAD_MUTEX_T (empty)
-- _PTHREAD_ONCE_T (empty)
-- _PTHREAD_RWLOCKATTR_T (empty)
-- _PTHREAD_RWLOCK_T (empty)
-- _PTHREAD_T (empty)
-- _SSIZE_T (empty)
-- _SUSECONDS_T (empty)
-- _SYS_TYPES_H_ (empty)
-- _TIME_T (empty)
-- _UID_T (empty)
-- _USECONDS_T (empty)
-- _U_LONG (empty)
-- howmany (function macro)
-- major (function macro)
-- makedev (function macro)
-- minor (function macro)
end C.sys.types;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qstructs;
with C.sys.qtypes;
package C.sys.ucontext is
pragma Preelaborate;
subtype struct_fd_set is sys.qstructs.struct_fd_set;
subtype fd_set is sys.qstructs.fd_set;
function qqdarwin_fd_isset (n : signed_int;
p : access sys.qstructs.struct_fd_set) return signed_int
renames sys.qstructs.qqdarwin_fd_isset;
subtype struct_darwin_sigaltstack is
sys.qstructs.struct_darwin_sigaltstack;
subtype struct_darwin_ucontext is sys.qstructs.struct_darwin_ucontext;
subtype stack_t is sys.qstructs.stack_t;
subtype ucontext_t is sys.qstructs.ucontext_t;
subtype struct_timespec is sys.qstructs.struct_timespec;
subtype struct_timeval is sys.qstructs.struct_timeval;
-- qFD_SET renames sys.qstructs.qFD_SET (empty)
-- qSTACK_T renames sys.qstructs.qSTACK_T (empty)
subtype STRUCT_SIGALTSTACK is sys.qstructs.struct_darwin_sigaltstack;
subtype qSTRUCT_TIMESPEC is sys.qstructs.struct_timespec;
subtype qSTRUCT_TIMEVAL is sys.qstructs.struct_timeval;
subtype STRUCT_UCONTEXT is sys.qstructs.struct_darwin_ucontext;
-- qUCONTEXT_T renames sys.qstructs.qUCONTEXT_T (empty)
-- DARWIN_FD_CLR renames sys.qstructs.DARWIN_FD_CLR (uninterpretable)
-- DARWIN_FD_COPY renames sys.qstructs.DARWIN_FD_COPY (unparsible)
-- qqDARWIN_FD_ISSET renames sys.qstructs.qqDARWIN_FD_I... (function macro)
-- DARWIN_FD_SET renames sys.qstructs.DARWIN_FD_SET (uninterpretable)
DARWIN_FD_SETSIZE : constant := sys.qstructs.DARWIN_FD_SETSIZE;
-- DARWIN_FD_ZERO renames sys.qstructs.DARWIN_FD_ZERO (function macro)
DARWIN_NBBY : constant := sys.qstructs.DARWIN_NBBY;
DARWIN_NFDBITS : constant := sys.qstructs.DARWIN_NFDBITS;
-- DARWIN_howmany renames sys.qstructs.DARWIN_howmany (function macro)
subtype sigset_t is sys.qtypes.darwin_sigset_t;
subtype sigset_t_const_ptr is sys.qtypes.darwin_sigset_t_const_ptr;
subtype sigset_t_ptr is sys.qtypes.darwin_sigset_t_ptr;
-- _SIGSET_T (empty)
-- _SYS_UCONTEXT_H_ (empty)
end C.sys.ucontext;
-- This file is translated by "headmaster" version 0.27-2060155 (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.bsm.audit;
with C.sys.types;
package C.sys.ucred is
pragma Preelaborate;
type struct_label (<>) is limited private;
type struct_label_ptr is access all struct_label;
for struct_label_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_label_ptr);
pragma Convention (C, struct_label_ptr);
type struct_ucred;
type struct_ucred_ptr is access all struct_ucred;
for struct_ucred_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_ucred_ptr);
pragma Convention (C, struct_ucred_ptr);
function Cast is new Ada.Unchecked_Conversion (signed_int,
struct_ucred_ptr);
type struct_ucred_ptr_ptr is access all struct_ucred_ptr;
for struct_ucred_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_ucred_ptr_ptr);
pragma Convention (C, struct_ucred_ptr_ptr);
type struct_a6a54bbc is record
tqe_next : aliased struct_ucred_ptr;
tqe_prev : aliased struct_ucred_ptr_ptr;
end record;
pragma Convention (C_Pass_By_Copy, struct_a6a54bbc);
type struct_ucred is record
cr_link : aliased struct_a6a54bbc;
cr_ref : aliased sys.types.u_long;
cr_uid : aliased sys.types.uid_t;
cr_ruid : aliased sys.types.uid_t;
cr_svuid : aliased sys.types.uid_t;
cr_ngroups : aliased signed_short;
cr_groups : aliased sys.types.gid_t_array (0 .. 15);
cr_rgid : aliased sys.types.gid_t;
cr_svgid : aliased sys.types.gid_t;
cr_gmuid : aliased sys.types.uid_t;
cr_au : aliased bsm.audit.struct_auditinfo;
cr_label : aliased struct_label_ptr;
cr_flags : aliased signed_int;
end record;
pragma Convention (C_Pass_By_Copy, struct_ucred);
subtype kauth_cred_t is struct_ucred_ptr;
type struct_xucred;
type struct_xucred is record
cr_version : aliased sys.types.u_int;
cr_uid : aliased sys.types.uid_t;
cr_ngroups : aliased signed_short;
cr_groups : aliased sys.types.gid_t_array (0 .. 15);
end record;
pragma Convention (C_Pass_By_Copy, struct_xucred);
CRF_MAC_ENFORCE : constant := 2;
CRF_NOMEMBERD : constant := 1;
function FSCRED (Value : signed_int := -1) return kauth_cred_t
renames Cast;
-- IS_VALID_CRED (function macro)
NOCRED : constant kauth_cred_t := null;
XUCRED_VERSION : constant := 0;
-- _KAUTH_CRED_T (empty)
-- _SYS_UCRED_H_ (empty)
-- cr_gid (unparsible)
private
type struct_label is null record;
end C.sys.ucred;
-- This file is translated by "headmaster" version 0.27-2060155 (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.uio 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);
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);
function readv (a1 : signed_int; a2 : access constant struct_iovec;
a3 : signed_int) return sys.types.ssize_t;
pragma Import (C, readv, "readv$UNIX2003");
function writev (a1 : signed_int; a2 : access constant struct_iovec;
a3 : signed_int) return sys.types.ssize_t;
pragma Import (C, writev, "writev$UNIX2003");
-- _STRUCT_IOVEC (empty)
-- _SYS_UIO_H_ (empty)
end C.sys.uio;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
type struct_accessx_descriptor;
type struct_accessx_descriptor is record
ad_name_offset : aliased unsigned_int;
ad_flags : aliased signed_int;
ad_pad : aliased signed_int_array (0 .. 1);
end record;
pragma Convention (C_Pass_By_Copy, struct_accessx_descriptor);
type struct_accessx_descriptor_const_ptr is
access constant struct_accessx_descriptor;
for struct_accessx_descriptor_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_accessx_descriptor_const_ptr);
pragma Convention (C, struct_accessx_descriptor_const_ptr);
ACCESSX_MAX_DESCRIPTORS : constant := 100;
ACCESSX_MAX_TABLESIZE : constant := 16384;
F_OK : constant := 0;
L_INCR : constant := 1;
L_SET : constant := 0;
L_XTND : constant := 2;
R_OK : constant := 4;
SEEK_CUR : constant := 1;
SEEK_END : constant := 2;
SEEK_SET : constant := 0;
W_OK : constant := 2;
X_OK : constant := 1;
ACCESS_EXTENDED_MASK : constant := 4193792;
APPEND_OK : constant := 8192;
CHOWN_OK : constant := 2097152;
CS_PATH : constant := 1;
DELETE_OK : constant := 4096;
EXECUTE_OK : constant := 2048;
PC_2_SYMLINKS : constant := 15;
PC_ALLOC_SIZE_MIN : constant := 16;
PC_ASYNC_IO : constant := 17;
PC_AUTH_OPAQUE_NP : constant := 14;
PC_CASE_PRESERVING : constant := 12;
PC_CASE_SENSITIVE : constant := 11;
PC_CHOWN_RESTRICTED : constant := 7;
PC_EXTENDED_SECURITY_NP : constant := 13;
PC_FILESIZEBITS : constant := 18;
PC_LINK_MAX : constant := 1;
PC_MAX_CANON : constant := 2;
PC_MAX_INPUT : constant := 3;
PC_NAME_CHARS_MAX : constant := 10;
PC_NAME_MAX : constant := 4;
PC_NO_TRUNC : constant := 8;
PC_PATH_MAX : constant := 5;
PC_PIPE_BUF : constant := 6;
PC_PRIO_IO : constant := 19;
PC_REC_INCR_XFER_SIZE : constant := 20;
PC_REC_MAX_XFER_SIZE : constant := 21;
PC_REC_MIN_XFER_SIZE : constant := 22;
PC_REC_XFER_ALIGN : constant := 23;
PC_SYMLINK_MAX : constant := 24;
PC_SYNC_IO : constant := 25;
PC_VDISABLE : constant := 9;
POSIX2_VERSION : constant := 200112;
POSIX_VDISABLE : constant := 255;
POSIX_VERSION : constant := 200112;
RATTR_OK : constant := 32768;
READ_OK : constant := 512;
REXT_OK : constant := 131072;
RMFILE_OK : constant := 16384;
RPERM_OK : constant := 524288;
-- _SYS_UNISTD_H_ (empty)
WATTR_OK : constant := 65536;
WEXT_OK : constant := 262144;
WPERM_OK : constant := 1048576;
WRITE_OK : constant := 1024;
end C.sys.unistd;
-- This file is translated by "headmaster" version 0.27-2060155 (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.types;
package C.sys.vm is
pragma Preelaborate;
type struct_vmspace;
type struct_vmspace is record
dummy : aliased stdint.int32_t;
dummy2 : aliased sys.types.caddr_t;
dummy3 : aliased stdint.int32_t_array (0 .. 4);
dummy4 : aliased sys.types.caddr_t_array (0 .. 2);
end record;
pragma Convention (C_Pass_By_Copy, struct_vmspace);
type struct_vmspace_ptr is access all struct_vmspace;
for struct_vmspace_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (struct_vmspace_ptr);
pragma Convention (C, struct_vmspace_ptr);
-- _SYS_VM_H (empty)
end C.sys.vm;
-- This file is translated by "headmaster" version 0.27-2060155 (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.signal;
with C.sys.types;
package C.sys.wait is
pragma Preelaborate;
type enum_e89ccfbb is (P_ALL, P_PID, P_PGID);
for enum_e89ccfbb use (P_ALL => 0, P_PID => 1, P_PGID => 2);
pragma Convention (C, enum_e89ccfbb);
subtype idtype_t is enum_e89ccfbb;
type union_wait;
type struct_be45af52 is record
w_Termsig : unsigned_int range 0 .. 127;
w_Coredump : unsigned_int range 0 .. 1;
w_Retcode : unsigned_int range 0 .. 255;
w_Filler : unsigned_int range 0 .. 65535;
end record;
for struct_be45af52 use record
w_Termsig at 0 range 0 .. 6;
w_Coredump at 0 range 7 .. 7;
w_Retcode at 0 range 8 .. 15;
w_Filler at 0 range 16 .. 31;
end record;
pragma Convention (C_Pass_By_Copy, struct_be45af52);
type struct_fc3ad974 is record
w_Stopval : unsigned_int range 0 .. 255;
w_Stopsig : unsigned_int range 0 .. 255;
w_Filler : unsigned_int range 0 .. 65535;
end record;
for struct_fc3ad974 use record
w_Stopval at 0 range 0 .. 7;
w_Stopsig at 0 range 8 .. 15;
w_Filler at 0 range 16 .. 31;
end record;
pragma Convention (C_Pass_By_Copy, struct_fc3ad974);
type union_wait (Unchecked_Tag : unsigned_int := 0) is record
case Unchecked_Tag is
when 0 =>
w_status : signed_int;
when 1 =>
w_T : struct_be45af52;
when others =>
w_S : struct_fc3ad974;
end case;
end record;
pragma Unchecked_Union (union_wait);
pragma Convention (C_Pass_By_Copy, union_wait);
function wait (a1 : access signed_int) return sys.types.pid_t;
pragma Import (C, wait, "wait$UNIX2003");
function waitpid (a1 : sys.types.pid_t; a2 : access signed_int;
a3 : signed_int) return sys.types.pid_t;
pragma Import (C, waitpid, "waitpid$UNIX2003");
function waitid (a1 : idtype_t; a2 : sys.types.id_t;
a3 : access sys.signal.siginfo_t; a4 : signed_int) return signed_int;
pragma Import (C, waitid, "waitid$UNIX2003");
function wait3 (a1 : access signed_int; a2 : signed_int;
a3 : access sys.resource.struct_rusage) return sys.types.pid_t;
pragma Import (C, wait3, "wait3");
function wait4 (a1 : sys.types.pid_t; a2 : access signed_int;
a3 : signed_int; a4 : access sys.resource.struct_rusage)
return sys.types.pid_t;
pragma Import (C, wait4, "wait4");
WAIT_ANY : constant := -1;
WAIT_MYPGRP : constant := 0;
WCONTINUED : constant := 16;
-- WCOREDUMP (function macro)
WCOREFLAG : constant := 128;
WEXITED : constant := 4;
-- WEXITSTATUS (function macro)
-- WIFCONTINUED (function macro)
-- WIFEXITED (function macro)
-- WIFSIGNALED (function macro)
-- WIFSTOPPED (function macro)
WNOHANG : constant := 1;
WNOWAIT : constant := 32;
WSTOPPED : constant := 8;
-- 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)
-- .w_coredump renames .w_T.w_Coredump (accessor)
-- .w_retcode renames .w_T.w_Retcode (accessor)
-- .w_stopsig renames .w_S.w_Stopsig (accessor)
-- .w_stopval renames .w_S.w_Stopval (accessor)
-- .w_termsig renames .w_T.w_Termsig (accessor)
end C.sys.wait;
-- This file is translated by "headmaster" version 0.27-2060155 (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 is translated by "headmaster" version 0.27-2060155 (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.termios;
with C.sys.types;
package C.termios is
pragma Preelaborate;
subtype tcflag_t is sys.termios.tcflag_t;
subtype cc_t is sys.termios.cc_t;
subtype speed_t is sys.termios.speed_t;
subtype struct_termios is sys.termios.struct_termios;
function cfgetispeed (a1 : access constant sys.termios.struct_termios)
return sys.termios.speed_t renames sys.termios.cfgetispeed;
function cfgetospeed (a1 : access constant sys.termios.struct_termios)
return sys.termios.speed_t renames sys.termios.cfgetospeed;
function cfsetispeed (a1 : access sys.termios.struct_termios;
a2 : sys.termios.speed_t) return signed_int
renames sys.termios.cfsetispeed;
function cfsetospeed (a1 : access sys.termios.struct_termios;
a2 : sys.termios.speed_t) return signed_int
renames sys.termios.cfsetospeed;
function tcgetattr (a1 : signed_int;
a2 : access sys.termios.struct_termios) return signed_int
renames sys.termios.tcgetattr;
function tcsetattr (a1 : signed_int; a2 : signed_int;
a3 : access constant sys.termios.struct_termios) return signed_int
renames sys.termios.tcsetattr;
function tcdrain (a1 : signed_int) return signed_int
renames sys.termios.tcdrain;
function tcflow (a1 : signed_int; a2 : signed_int) return signed_int
renames sys.termios.tcflow;
function tcflush (a1 : signed_int; a2 : signed_int) return signed_int
renames sys.termios.tcflush;
function tcsendbreak (a1 : signed_int; a2 : signed_int) return signed_int
renames sys.termios.tcsendbreak;
procedure cfmakeraw (a1 : access sys.termios.struct_termios)
renames sys.termios.cfmakeraw;
function cfsetspeed (a1 : access sys.termios.struct_termios;
a2 : sys.termios.speed_t) return signed_int
renames sys.termios.cfsetspeed;
ALTWERASE : constant := sys.termios.ALTWERASE;
B0 : constant := sys.termios.B0;
B110 : constant := sys.termios.B110;
B115200 : constant := sys.termios.B115200;
B1200 : constant := sys.termios.B1200;
B134 : constant := sys.termios.B134;
B14400 : constant := sys.termios.B14400;
B150 : constant := sys.termios.B150;
B1800 : constant := sys.termios.B1800;
B19200 : constant := sys.termios.B19200;
B200 : constant := sys.termios.B200;
B230400 : constant := sys.termios.B230400;
B2400 : constant := sys.termios.B2400;
B28800 : constant := sys.termios.B28800;
B300 : constant := sys.termios.B300;
B38400 : constant := sys.termios.B38400;
B4800 : constant := sys.termios.B4800;
B50 : constant := sys.termios.B50;
B57600 : constant := sys.termios.B57600;
B600 : constant := sys.termios.B600;
B7200 : constant := sys.termios.B7200;
B75 : constant := sys.termios.B75;
B76800 : constant := sys.termios.B76800;
B9600 : constant := sys.termios.B9600;
BRKINT : constant := sys.termios.BRKINT;
BS0 : constant := sys.termios.BS0;
BS1 : constant := sys.termios.BS1;
BSDLY : constant := sys.termios.BSDLY;
CCAR_OFLOW : constant := sys.termios.CCAR_OFLOW;
-- CCEQ renames sys.termios.CCEQ (function macro)
CCTS_OFLOW : constant := sys.termios.CCTS_OFLOW;
CDSR_OFLOW : constant := sys.termios.CDSR_OFLOW;
CDTR_IFLOW : constant := sys.termios.CDTR_IFLOW;
CIGNORE : constant := sys.termios.CIGNORE;
CLOCAL : constant := sys.termios.CLOCAL;
CR0 : constant := sys.termios.CR0;
CR1 : constant := sys.termios.CR1;
CR2 : constant := sys.termios.CR2;
CR3 : constant := sys.termios.CR3;
CRDLY : constant := sys.termios.CRDLY;
CREAD : constant := sys.termios.CREAD;
CRTSCTS : constant := sys.termios.CRTSCTS;
CRTS_IFLOW : constant := sys.termios.CRTS_IFLOW;
CS5 : constant := sys.termios.CS5;
CS6 : constant := sys.termios.CS6;
CS7 : constant := sys.termios.CS7;
CS8 : constant := sys.termios.CS8;
CSIZE : constant := sys.termios.CSIZE;
CSTOPB : constant := sys.termios.CSTOPB;
ECHO : constant := sys.termios.ECHO;
ECHOCTL : constant := sys.termios.ECHOCTL;
ECHOE : constant := sys.termios.ECHOE;
ECHOK : constant := sys.termios.ECHOK;
ECHOKE : constant := sys.termios.ECHOKE;
ECHONL : constant := sys.termios.ECHONL;
ECHOPRT : constant := sys.termios.ECHOPRT;
EXTA : constant := sys.termios.EXTA;
EXTB : constant := sys.termios.EXTB;
EXTPROC : constant := sys.termios.EXTPROC;
FF0 : constant := sys.termios.FF0;
FF1 : constant := sys.termios.FF1;
FFDLY : constant := sys.termios.FFDLY;
FLUSHO : constant := sys.termios.FLUSHO;
HUPCL : constant := sys.termios.HUPCL;
ICANON : constant := sys.termios.ICANON;
ICRNL : constant := sys.termios.ICRNL;
IEXTEN : constant := sys.termios.IEXTEN;
IGNBRK : constant := sys.termios.IGNBRK;
IGNCR : constant := sys.termios.IGNCR;
IGNPAR : constant := sys.termios.IGNPAR;
IMAXBEL : constant := sys.termios.IMAXBEL;
INLCR : constant := sys.termios.INLCR;
INPCK : constant := sys.termios.INPCK;
ISIG : constant := sys.termios.ISIG;
ISTRIP : constant := sys.termios.ISTRIP;
IUTF8 : constant := sys.termios.IUTF8;
IXANY : constant := sys.termios.IXANY;
IXOFF : constant := sys.termios.IXOFF;
IXON : constant := sys.termios.IXON;
MDMBUF : constant := sys.termios.MDMBUF;
NCCS : constant := sys.termios.NCCS;
NL0 : constant := sys.termios.NL0;
NL1 : constant := sys.termios.NL1;
NL2 : constant := sys.termios.NL2;
NL3 : constant := sys.termios.NL3;
NLDLY : constant := sys.termios.NLDLY;
NOFLSH : constant := sys.termios.NOFLSH;
NOKERNINFO : constant := sys.termios.NOKERNINFO;
OCRNL : constant := sys.termios.OCRNL;
OFDEL : constant := sys.termios.OFDEL;
OFILL : constant := sys.termios.OFILL;
ONLCR : constant := sys.termios.ONLCR;
ONLRET : constant := sys.termios.ONLRET;
ONOCR : constant := sys.termios.ONOCR;
ONOEOT : constant := sys.termios.ONOEOT;
OPOST : constant := sys.termios.OPOST;
OXTABS : constant := sys.termios.OXTABS;
PARENB : constant := sys.termios.PARENB;
PARMRK : constant := sys.termios.PARMRK;
PARODD : constant := sys.termios.PARODD;
PENDIN : constant := sys.termios.PENDIN;
TAB0 : constant := sys.termios.TAB0;
TAB1 : constant := sys.termios.TAB1;
TAB2 : constant := sys.termios.TAB2;
TAB3 : constant := sys.termios.TAB3;
TABDLY : constant := sys.termios.TABDLY;
TCIFLUSH : constant := sys.termios.TCIFLUSH;
TCIOFF : constant := sys.termios.TCIOFF;
TCIOFLUSH : constant := sys.termios.TCIOFLUSH;
TCION : constant := sys.termios.TCION;
TCOFLUSH : constant := sys.termios.TCOFLUSH;
TCOOFF : constant := sys.termios.TCOOFF;
TCOON : constant := sys.termios.TCOON;
TCSADRAIN : constant := sys.termios.TCSADRAIN;
TCSAFLUSH : constant := sys.termios.TCSAFLUSH;
TCSANOW : constant := sys.termios.TCSANOW;
TCSASOFT : constant := sys.termios.TCSASOFT;
TOSTOP : constant := sys.termios.TOSTOP;
VDISCARD : constant := sys.termios.VDISCARD;
VDSUSP : constant := sys.termios.VDSUSP;
VEOF : constant := sys.termios.VEOF;
VEOL : constant := sys.termios.VEOL;
VEOL2 : constant := sys.termios.VEOL2;
VERASE : constant := sys.termios.VERASE;
VINTR : constant := sys.termios.VINTR;
VKILL : constant := sys.termios.VKILL;
VLNEXT : constant := sys.termios.VLNEXT;
VMIN : constant := sys.termios.VMIN;
VQUIT : constant := sys.termios.VQUIT;
VREPRINT : constant := sys.termios.VREPRINT;
VSTART : constant := sys.termios.VSTART;
VSTATUS : constant := sys.termios.VSTATUS;
VSTOP : constant := sys.termios.VSTOP;
VSUSP : constant := sys.termios.VSUSP;
VT0 : constant := sys.termios.VT0;
VT1 : constant := sys.termios.VT1;
VTDLY : constant := sys.termios.VTDLY;
VTIME : constant := sys.termios.VTIME;
VWERASE : constant := sys.termios.VWERASE;
-- SYS_TERMIOS_H renames sys.termios.SYS_TERMIOS_H (empty)
function tcgetsid (a1 : signed_int) return sys.types.pid_t;
pragma Import (C, tcgetsid, "tcgetsid");
-- __TERMIOS_H__ (empty)
end C.termios;
-- This file is translated by "headmaster" version 0.27-2060155 (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.qstructs;
with C.sys.types;
package C.time is
pragma Preelaborate;
subtype struct_fd_set is sys.qstructs.struct_fd_set;
subtype fd_set is sys.qstructs.fd_set;
function qqdarwin_fd_isset (n : signed_int;
p : access sys.qstructs.struct_fd_set) return signed_int
renames sys.qstructs.qqdarwin_fd_isset;
subtype struct_darwin_sigaltstack is
sys.qstructs.struct_darwin_sigaltstack;
subtype struct_darwin_ucontext is sys.qstructs.struct_darwin_ucontext;
subtype stack_t is sys.qstructs.stack_t;
subtype ucontext_t is sys.qstructs.ucontext_t;
subtype struct_timespec is sys.qstructs.struct_timespec;
subtype struct_timeval is sys.qstructs.struct_timeval;
-- qFD_SET renames sys.qstructs.qFD_SET (empty)
-- qSTACK_T renames sys.qstructs.qSTACK_T (empty)
subtype STRUCT_SIGALTSTACK is sys.qstructs.struct_darwin_sigaltstack;
subtype qSTRUCT_TIMESPEC is sys.qstructs.struct_timespec;
subtype qSTRUCT_TIMEVAL is sys.qstructs.struct_timeval;
subtype STRUCT_UCONTEXT is sys.qstructs.struct_darwin_ucontext;
-- qUCONTEXT_T renames sys.qstructs.qUCONTEXT_T (empty)
-- DARWIN_FD_CLR renames sys.qstructs.DARWIN_FD_CLR (uninterpretable)
-- DARWIN_FD_COPY renames sys.qstructs.DARWIN_FD_COPY (unparsible)
-- qqDARWIN_FD_ISSET renames sys.qstructs.qqDARWIN_FD_I... (function macro)
-- DARWIN_FD_SET renames sys.qstructs.DARWIN_FD_SET (uninterpretable)
DARWIN_FD_SETSIZE : constant := sys.qstructs.DARWIN_FD_SETSIZE;
-- DARWIN_FD_ZERO renames sys.qstructs.DARWIN_FD_ZERO (function macro)
DARWIN_NBBY : constant := sys.qstructs.DARWIN_NBBY;
DARWIN_NFDBITS : constant := sys.qstructs.DARWIN_NFDBITS;
-- DARWIN_howmany renames sys.qstructs.DARWIN_howmany (function macro)
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 (size_t);
pragma Import (C, tzname, "tzname");
getdate_err : aliased signed_int;
pragma Import (C, getdate_err, "getdate_err");
timezone : aliased signed_long;
pragma Import (C, timezone, "timezone$UNIX2003");
daylight : aliased signed_int;
pragma Import (C, daylight, "daylight");
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$UNIX2003");
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 getdate (a1 : access constant char) return struct_tm_ptr;
pragma Import (C, getdate, "getdate");
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$UNIX2003");
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$UNIX2003");
function strptime (a1 : access constant char; a2 : access constant char;
a3 : access struct_tm) return char_ptr;
pragma Import (C, strptime, "strptime$UNIX2003");
function time (a1 : access sys.types.time_t) return sys.types.time_t;
pragma Import (C, time, "time");
procedure tzset;
pragma Import (C, tzset, "tzset");
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 posix2time (a1 : sys.types.time_t) return sys.types.time_t;
pragma Import (C, posix2time, "posix2time");
procedure tzsetwall;
pragma Import (C, tzsetwall, "tzsetwall");
function time2posix (a1 : sys.types.time_t) return sys.types.time_t;
pragma Import (C, time2posix, "time2posix");
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");
function nanosleep (a1 : access constant sys.qstructs.struct_timespec;
a2 : access sys.qstructs.struct_timespec) return signed_int;
pragma Import (C, nanosleep, "nanosleep$UNIX2003");
CLOCKS_PER_SEC : constant := 1000000;
-- _TIME_H_ (empty)
end C.time;
-- This file is translated by "headmaster" version 0.27-2060155 (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.types;
with C.sys.unistd;
package C.unistd is
pragma Preelaborate;
subtype struct_accessx_descriptor is sys.unistd.struct_accessx_descriptor;
ACCESSX_MAX_DESCRIPTORS : constant := sys.unistd.ACCESSX_MAX_DESCRIPTORS;
ACCESSX_MAX_TABLESIZE : constant := sys.unistd.ACCESSX_MAX_TABLESIZE;
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;
R_OK : constant := sys.unistd.R_OK;
SEEK_CUR : constant := sys.unistd.SEEK_CUR;
SEEK_END : constant := sys.unistd.SEEK_END;
SEEK_SET : constant := sys.unistd.SEEK_SET;
W_OK : constant := sys.unistd.W_OK;
X_OK : constant := sys.unistd.X_OK;
ACCESS_EXTENDED_MASK : constant := sys.unistd.ACCESS_EXTENDED_MASK;
APPEND_OK : constant := sys.unistd.APPEND_OK;
CHOWN_OK : constant := sys.unistd.CHOWN_OK;
CS_PATH : constant := sys.unistd.CS_PATH;
DELETE_OK : constant := sys.unistd.DELETE_OK;
EXECUTE_OK : constant := sys.unistd.EXECUTE_OK;
PC_2_SYMLINKS : constant := sys.unistd.PC_2_SYMLINKS;
PC_ALLOC_SIZE_MIN : constant := sys.unistd.PC_ALLOC_SIZE_MIN;
PC_ASYNC_IO : constant := sys.unistd.PC_ASYNC_IO;
PC_AUTH_OPAQUE_NP : constant := sys.unistd.PC_AUTH_OPAQUE_NP;
PC_CASE_PRESERVING : constant := sys.unistd.PC_CASE_PRESERVING;
PC_CASE_SENSITIVE : constant := sys.unistd.PC_CASE_SENSITIVE;
PC_CHOWN_RESTRICTED : constant := sys.unistd.PC_CHOWN_RESTRICTED;
PC_EXTENDED_SECURITY_NP : constant := sys.unistd.PC_EXTENDED_SECURITY_NP;
PC_FILESIZEBITS : constant := sys.unistd.PC_FILESIZEBITS;
PC_LINK_MAX : constant := sys.unistd.PC_LINK_MAX;
PC_MAX_CANON : constant := sys.unistd.PC_MAX_CANON;
PC_MAX_INPUT : constant := sys.unistd.PC_MAX_INPUT;
PC_NAME_CHARS_MAX : constant := sys.unistd.PC_NAME_CHARS_MAX;
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;
POSIX2_VERSION : constant := sys.unistd.POSIX2_VERSION;
POSIX_VDISABLE : constant := sys.unistd.POSIX_VDISABLE;
POSIX_VERSION : constant := sys.unistd.POSIX_VERSION;
RATTR_OK : constant := sys.unistd.RATTR_OK;
READ_OK : constant := sys.unistd.READ_OK;
REXT_OK : constant := sys.unistd.REXT_OK;
RMFILE_OK : constant := sys.unistd.RMFILE_OK;
RPERM_OK : constant := sys.unistd.RPERM_OK;
-- SYS_UNISTD_H renames sys.unistd.SYS_UNISTD_H (empty)
WATTR_OK : constant := sys.unistd.WATTR_OK;
WEXT_OK : constant := sys.unistd.WEXT_OK;
WPERM_OK : constant := sys.unistd.WPERM_OK;
WRITE_OK : constant := sys.unistd.WRITE_OK;
subtype uuid_t is sys.qtypes.darwin_uuid_t;
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$UNIX2003");
function confstr (a1 : signed_int; a2 : access char; a3 : stddef.size_t)
return stddef.size_t;
pragma Import (C, confstr, "confstr$UNIX2003");
function crypt (a1 : access constant char; a2 : access constant char)
return char_ptr;
pragma Import (C, crypt, "crypt");
function ctermid (a1 : access char) return char_ptr;
pragma Import (C, ctermid, "ctermid");
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");
procedure encrypt (a1 : access char; a2 : signed_int);
pragma Import (C, encrypt, "encrypt$UNIX2003");
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 fchown (a1 : signed_int; a2 : sys.types.uid_t;
a3 : sys.types.gid_t) return signed_int;
pragma Import (C, fchown, "fchown");
function fchdir (a1 : signed_int) return signed_int;
pragma Import (C, fchdir, "fchdir");
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 fsync (a1 : signed_int) return signed_int;
pragma Import (C, fsync, "fsync$UNIX2003");
function ftruncate (a1 : signed_int; a2 : sys.types.off_t)
return signed_int;
pragma Import (C, ftruncate, "ftruncate");
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 gethostid return signed_long;
pragma Import (C, gethostid, "gethostid");
function gethostname (a1 : access char; a2 : stddef.size_t)
return signed_int;
pragma Import (C, gethostname, "gethostname");
function getlogin return char_ptr;
pragma Import (C, getlogin, "getlogin");
function getlogin_r (a1 : access char; a2 : stddef.size_t)
return signed_int;
pragma Import (C, getlogin_r, "getlogin_r");
function getopt (a1 : signed_int; a2 : access char_ptr;
a3 : access constant char) return signed_int;
pragma Import (C, getopt, "getopt$UNIX2003");
function getpgid (a1 : sys.types.pid_t) return sys.types.pid_t;
pragma Import (C, getpgid, "getpgid");
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 getsid (a1 : sys.types.pid_t) return sys.types.pid_t;
pragma Import (C, getsid, "getsid");
function getuid return sys.types.uid_t;
pragma Import (C, getuid, "getuid");
function getwd (a1 : access char) return char_ptr;
pragma Import (C, getwd, "getwd");
function isatty (a1 : signed_int) return signed_int;
pragma Import (C, isatty, "isatty");
function lchown (a1 : access constant char; a2 : sys.types.uid_t;
a3 : sys.types.gid_t) return signed_int;
pragma Import (C, lchown, "lchown$UNIX2003");
function link (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, link, "link");
function lockf (a1 : signed_int; a2 : signed_int; a3 : sys.types.off_t)
return signed_int;
pragma Import (C, lockf, "lockf$UNIX2003");
function lseek (a1 : signed_int; a2 : sys.types.off_t; a3 : signed_int)
return sys.types.off_t;
pragma Import (C, lseek, "lseek");
function nice (a1 : signed_int) return signed_int;
pragma Import (C, nice, "nice$UNIX2003");
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$UNIX2003");
function pipe (a1 : access signed_int) return signed_int;
pragma Import (C, pipe, "pipe");
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$UNIX2003");
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$UNIX2003");
function read (a1 : signed_int; a2 : void_ptr; a3 : stddef.size_t)
return sys.types.ssize_t;
pragma Import (C, read, "read$UNIX2003");
function readlink (a1 : access constant char; a2 : access char;
a3 : stddef.size_t) return sys.types.ssize_t;
pragma Import (C, readlink, "readlink");
function rmdir (a1 : access constant char) return signed_int;
pragma Import (C, rmdir, "rmdir");
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 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 setpgrp return sys.types.pid_t;
pragma Import (C, setpgrp, "setpgrp$UNIX2003");
function setregid (a1 : sys.types.gid_t; a2 : sys.types.gid_t)
return signed_int;
pragma Import (C, setregid, "setregid$UNIX2003");
function setreuid (a1 : sys.types.uid_t; a2 : sys.types.uid_t)
return signed_int;
pragma Import (C, setreuid, "setreuid$UNIX2003");
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$UNIX2003");
function symlink (a1 : access constant char; a2 : access constant char)
return signed_int;
pragma Import (C, symlink, "symlink");
procedure sync;
pragma Import (C, sync, "sync");
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 truncate (a1 : access constant char; a2 : sys.types.off_t)
return signed_int;
pragma Import (C, truncate, "truncate");
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$UNIX2003");
function ualarm (a1 : sys.types.useconds_t; a2 : sys.types.useconds_t)
return sys.types.useconds_t;
pragma Import (C, ualarm, "ualarm");
function unlink (a1 : access constant char) return signed_int;
pragma Import (C, unlink, "unlink");
function usleep (a1 : sys.types.useconds_t) return signed_int;
pragma Import (C, usleep, "usleep$UNIX2003");
function vfork return sys.types.pid_t;
pragma Import (C, vfork, "vfork");
function write (a1 : signed_int; a2 : void_const_ptr; a3 : stddef.size_t)
return sys.types.ssize_t;
pragma Import (C, write, "write$UNIX2003");
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");
procedure C_qExit2 (a1 : signed_int);
pragma No_Return (C_qExit2);
pragma Import (C, C_qExit2, "_Exit");
function accessx_np (
a1 : access constant sys.unistd.struct_accessx_descriptor;
a2 : stddef.size_t; a3 : access signed_int; a4 : sys.types.uid_t)
return signed_int;
pragma Import (C, accessx_np, "accessx_np");
function acct (a1 : access constant char) return signed_int;
pragma Import (C, acct, "acct");
function add_profil (a1 : access char; a2 : stddef.size_t;
a3 : unsigned_long; a4 : unsigned_int) return signed_int;
pragma Import (C, add_profil, "add_profil");
function brk (a1 : void_const_ptr) return void_ptr;
pragma Import (C, brk, "brk");
function chroot (a1 : access constant char) return signed_int;
pragma Import (C, chroot, "chroot");
procedure endusershell;
pragma Import (C, endusershell, "endusershell");
function execvP2 (a1 : access constant char; a2 : access constant char;
a3 : access char_ptr) return signed_int;
pragma Import (C, execvP2, "execvP");
function fflagstostr (a1 : unsigned_long) return char_ptr;
pragma Import (C, fflagstostr, "fflagstostr");
function getdtablesize return signed_int;
pragma Import (C, getdtablesize, "getdtablesize");
function getdomainname (a1 : access char; a2 : signed_int)
return signed_int;
pragma Import (C, getdomainname, "getdomainname");
function getgrouplist (a1 : access constant char; a2 : signed_int;
a3 : access signed_int; 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 getpagesize return signed_int;
pragma Import (C, getpagesize, "getpagesize");
function getpass (a1 : access constant char) return char_ptr;
pragma Import (C, getpass, "getpass");
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 getsgroups_np (a1 : access signed_int; a2 : access unsigned_char)
return signed_int;
pragma Import (C, getsgroups_np, "getsgroups_np");
function getusershell return char_ptr;
pragma Import (C, getusershell, "getusershell");
function getwgroups_np (a1 : access signed_int; a2 : access unsigned_char)
return signed_int;
pragma Import (C, getwgroups_np, "getwgroups_np");
function initgroups (a1 : access constant char; a2 : signed_int)
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");
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 : unsigned_long;
a4 : unsigned_int) return signed_int;
pragma Import (C, profil, "profil");
function pthread_setugid_np (a1 : sys.types.uid_t; a2 : sys.types.gid_t)
return signed_int;
pragma Import (C, pthread_setugid_np, "pthread_setugid_np");
function pthread_getugid_np (a1 : access sys.types.uid_t;
a2 : access sys.types.gid_t) return signed_int;
pragma Import (C, pthread_getugid_np, "pthread_getugid_np");
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 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 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 sbrk (a1 : signed_int) return void_ptr;
pragma Import (C, sbrk, "sbrk");
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");
procedure setkey (a1 : access constant char);
pragma Import (C, setkey, "setkey$UNIX2003");
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");
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");
function setsgroups_np (a1 : signed_int; a2 : access unsigned_char)
return signed_int;
pragma Import (C, setsgroups_np, "setsgroups_np");
procedure setusershell;
pragma Import (C, setusershell, "setusershell");
function setwgroups_np (a1 : signed_int; a2 : access unsigned_char)
return signed_int;
pragma Import (C, setwgroups_np, "setwgroups_np");
function strtofflags (a1 : access char_ptr; a2 : access unsigned_long;
a3 : access unsigned_long) return signed_int;
pragma Import (C, strtofflags, "strtofflags");
function swapon (a1 : access constant char) return signed_int;
pragma Import (C, swapon, "swapon");
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 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");
suboptarg : aliased char_ptr;
pragma Import (C, suboptarg, "suboptarg");
function getsubopt (a1 : access char_ptr; a2 : access char_ptr;
a3 : access char_ptr) return signed_int;
pragma Import (C, getsubopt, "getsubopt");
function getattrlist (a1 : access constant char; a2 : void_ptr;
a3 : void_ptr; a4 : stddef.size_t; a5 : unsigned_long)
return signed_int;
pragma Import (C, getattrlist, "getattrlist$UNIX2003");
function setattrlist (a1 : access constant char; a2 : void_ptr;
a3 : void_ptr; a4 : stddef.size_t; a5 : unsigned_long)
return signed_int;
pragma Import (C, setattrlist, "setattrlist$UNIX2003");
function exchangedata (a1 : access constant char;
a2 : access constant char; a3 : unsigned_long) return signed_int;
pragma Import (C, exchangedata, "exchangedata");
function getdirentriesattr (a1 : signed_int; a2 : void_ptr; a3 : void_ptr;
a4 : stddef.size_t; a5 : access unsigned_long;
a6 : access unsigned_long; a7 : access unsigned_long;
a8 : unsigned_long) return signed_int;
pragma Import (C, getdirentriesattr, "getdirentriesattr");
function searchfs (a1 : access constant char; a2 : void_ptr;
a3 : void_ptr; a4 : unsigned_long; a5 : unsigned_long; a6 : void_ptr)
return signed_int;
pragma Import (C, searchfs, "searchfs");
function fsctl (a1 : access constant char; a2 : unsigned_long;
a3 : void_ptr; a4 : unsigned_long) return signed_int;
pragma Import (C, fsctl, "fsctl");
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_DARWIN_USER_CACHE_DIR : constant := 65538;
CS_DARWIN_USER_DIR : constant := 65536;
CS_DARWIN_USER_TEMP_DIR : constant := 65537;
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;
CS_XBS5_ILP32_OFF32_CFLAGS : constant := 20;
CS_XBS5_ILP32_OFF32_LDFLAGS : constant := 21;
CS_XBS5_ILP32_OFF32_LIBS : constant := 22;
CS_XBS5_ILP32_OFF32_LINTFLAGS : constant := 23;
CS_XBS5_ILP32_OFFBIG_CFLAGS : constant := 24;
CS_XBS5_ILP32_OFFBIG_LDFLAGS : constant := 25;
CS_XBS5_ILP32_OFFBIG_LIBS : constant := 26;
CS_XBS5_ILP32_OFFBIG_LINTFLAGS : constant := 27;
CS_XBS5_LP64_OFF64_CFLAGS : constant := 28;
CS_XBS5_LP64_OFF64_LDFLAGS : constant := 29;
CS_XBS5_LP64_OFF64_LIBS : constant := 30;
CS_XBS5_LP64_OFF64_LINTFLAGS : constant := 31;
CS_XBS5_LPBIG_OFFBIG_CFLAGS : constant := 32;
CS_XBS5_LPBIG_OFFBIG_LDFLAGS : constant := 33;
CS_XBS5_LPBIG_OFFBIG_LIBS : constant := 34;
CS_XBS5_LPBIG_OFFBIG_LINTFLAGS : constant := 35;
POSIX2_CHAR_TERM : constant := 200112;
POSIX2_C_BIND : constant := 200112;
POSIX2_C_DEV : constant := 200112;
POSIX2_FORT_DEV : constant := -1;
POSIX2_FORT_RUN : constant := 200112;
POSIX2_LOCALEDEF : constant := 200112;
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 := 200112;
POSIX2_UPE : constant := 200112;
POSIX_ADVISORY_INFO : constant := -1;
POSIX_ASYNCHRONOUS_IO : constant := -1;
POSIX_BARRIERS : constant := -1;
POSIX_CHOWN_RESTRICTED : constant := 200112;
POSIX_CLOCK_SELECTION : constant := -1;
POSIX_CPUTIME : constant := -1;
POSIX_FSYNC : constant := 200112;
POSIX_IPV6 : constant := 200112;
POSIX_JOB_CONTROL : constant := 200112;
POSIX_MAPPED_FILES : constant := 200112;
POSIX_MEMLOCK : constant := -1;
POSIX_MEMLOCK_RANGE : constant := -1;
POSIX_MEMORY_PROTECTION : constant := 200112;
POSIX_MESSAGE_PASSING : constant := -1;
POSIX_MONOTONIC_CLOCK : constant := -1;
POSIX_NO_TRUNC : constant := 200112;
POSIX_PRIORITIZED_IO : constant := -1;
POSIX_PRIORITY_SCHEDULING : constant := -1;
POSIX_RAW_SOCKETS : constant := -1;
POSIX_READER_WRITER_LOCKS : constant := 200112;
POSIX_REALTIME_SIGNALS : constant := -1;
POSIX_REGEXP : constant := 200112;
POSIX_SAVED_IDS : constant := 200112;
POSIX_SEMAPHORES : constant := -1;
POSIX_SHARED_MEMORY_OBJECTS : constant := -1;
POSIX_SHELL : constant := 200112;
POSIX_SPAWN : constant := -1;
POSIX_SPIN_LOCKS : constant := -1;
POSIX_SPORADIC_SERVER : constant := -1;
POSIX_SYNCHRONIZED_IO : constant := -1;
POSIX_THREADS : constant := 200112;
POSIX_THREAD_ATTR_STACKADDR : constant := 200112;
POSIX_THREAD_ATTR_STACKSIZE : constant := 200112;
POSIX_THREAD_CPUTIME : constant := -1;
POSIX_THREAD_PRIORITY_SCHEDULING : constant := -1;
POSIX_THREAD_PRIO_INHERIT : constant := -1;
POSIX_THREAD_PRIO_PROTECT : constant := -1;
POSIX_THREAD_PROCESS_SHARED : constant := 200112;
POSIX_THREAD_SAFE_FUNCTIONS : constant := 200112;
POSIX_THREAD_SPORADIC_SERVER : constant := -1;
POSIX_TIMEOUTS : constant := -1;
POSIX_TIMERS : constant := -1;
POSIX_TRACE : constant := -1;
POSIX_TRACE_EVENT_FILTER : constant := -1;
POSIX_TRACE_INHERIT : constant := -1;
POSIX_TRACE_LOG : constant := -1;
POSIX_TYPED_MEMORY_OBJECTS : 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 := 47;
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 := 29;
SC_PAGE_SIZE : constant := 29;
SC_PASS_MAX : constant := 131;
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_SS_REPL_MAX : constant := 126;
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_EVENT_NAME_MAX : constant := 127;
SC_TRACE_INHERIT : constant := 99;
SC_TRACE_LOG : constant := 100;
SC_TRACE_NAME_MAX : constant := 128;
SC_TRACE_SYS_MAX : constant := 129;
SC_TRACE_USER_EVENT_MAX : constant := 130;
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_XBS5_ILP32_OFF32 : constant := 122;
SC_XBS5_ILP32_OFFBIG : constant := 123;
SC_XBS5_LP64_OFF64 : constant := 124;
SC_XBS5_LPBIG_OFFBIG : constant := 125;
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 := 121;
-- _UNISTD_H_ (empty)
-- _UUID_T (empty)
V6_ILP32_OFF32 : constant := -1;
V6_ILP32_OFFBIG : constant := 1;
V6_LP64_OFF64 : constant := -1;
V6_LPBIG_OFFBIG : constant := -1;
XBS5_ILP32_OFF32 : constant := -1;
XBS5_ILP32_OFFBIG : constant := 1;
XBS5_LP64_OFF64 : constant := -1;
XBS5_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_SHM : constant := 1;
XOPEN_STREAMS : constant := -1;
XOPEN_UNIX : constant := 1;
XOPEN_VERSION : constant := 600;
XOPEN_XCU_VERSION : constant := 4;
end C.unistd;
-- This file is translated by "headmaster" version 0.27-2060155 (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_long;
subtype Unwind_Sword is signed_int;
subtype Unwind_Ptr is unsigned_long;
subtype Unwind_Internal_Ptr is unsigned_long;
subtype Unwind_Exception_Class is unsigned_long_long;
type enum_209d5e71 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_209d5e71 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_209d5e71);
subtype Unwind_Reason_Code is enum_209d5e71;
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_d0dd1833 is access procedure (a1 : Unwind_Reason_Code;
a2 : access struct_Unwind_Exception);
pragma Convention (C, access_d0dd1833);
subtype Unwind_Exception_Cleanup_Fn is access_d0dd1833;
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_474341be 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_474341be);
subtype Unwind_Stop_Fn is access_474341be;
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_2e8d49c2 is access function (
a1 : access struct_Unwind_Context; a2 : void_ptr)
return Unwind_Reason_Code;
pragma Convention (C, access_2e8d49c2);
subtype Unwind_Trace_Fn is access_2e8d49c2;
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_0ecb5870 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_0ecb5870);
subtype Unwind_Personality_Fn is access_0ecb5870;
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 is translated by "headmaster" version 0.27-2060155 (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.i386.qtypes;
with C.qwctype;
with C.stddef;
with C.stdio;
with C.time;
package C.wchar is
pragma Preelaborate;
subtype mbstate_t is i386.qtypes.darwin_mbstate_t;
subtype mbstate_t_ptr is i386.qtypes.darwin_mbstate_t_ptr;
subtype mbstate_t_const_ptr is i386.qtypes.darwin_mbstate_t_const_ptr;
-- #include <stdarg.h>
-- #include <stdio.h>
-- #include <runetype.h>
-- #include <ctype.h>
-- #include <_wctype.h>
function btowc (a1 : signed_int) return qwctype.wint_t;
pragma Import (C, btowc, "btowc");
function fgetwc (a1 : access stdio.FILE) return qwctype.wint_t;
pragma Import (C, fgetwc, "fgetwc");
function fgetws (a1 : access stddef.wchar_t; a2 : signed_int;
a3 : access stdio.FILE) return stddef.wchar_t_ptr;
pragma Import (C, fgetws, "fgetws");
function fputwc (a1 : stddef.wchar_t; a2 : access stdio.FILE)
return qwctype.wint_t;
pragma Import (C, fputwc, "fputwc");
function fputws (a1 : access constant stddef.wchar_t;
a2 : access stdio.FILE) return signed_int;
pragma Import (C, fputws, "fputws");
function fwide (a1 : access stdio.FILE; a2 : signed_int)
return signed_int;
pragma Import (C, fwide, "fwide");
function fwprintf (a1 : access stdio.FILE;
a2 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, fwprintf, "fwprintf");
function fwscanf (a1 : access stdio.FILE;
a2 : access constant stddef.wchar_t) return signed_int;
pragma Import (C, fwscanf, "fwscanf");
function getwc (a1 : access stdio.FILE) return qwctype.wint_t;
pragma Import (C, getwc, "getwc");
function getwchar return qwctype.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.FILE)
return qwctype.wint_t;
pragma Import (C, putwc, "putwc");
function putwchar (a1 : stddef.wchar_t) return qwctype.wint_t;
pragma Import (C, putwchar, "putwchar");
function swprintf (a1 : access stddef.wchar_t; a2 : 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 : qwctype.wint_t; a2 : access stdio.FILE)
return qwctype.wint_t;
pragma Import (C, ungetwc, "ungetwc");
function vfwprintf (a1 : access stdio.FILE;
a2 : access constant stddef.wchar_t; a3 : i386.qtypes.darwin_va_list)
return signed_int;
pragma Import (C, vfwprintf, "vfwprintf");
function vswprintf (a1 : access stddef.wchar_t; a2 : stddef.size_t;
a3 : access constant stddef.wchar_t; a4 : i386.qtypes.darwin_va_list)
return signed_int;
pragma Import (C, vswprintf, "vswprintf");
function vwprintf (a1 : access constant stddef.wchar_t;
a2 : i386.qtypes.darwin_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$UNIX2003");
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 : qwctype.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.FILE;
a2 : access constant stddef.wchar_t; a3 : i386.qtypes.darwin_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 : i386.qtypes.darwin_va_list)
return signed_int;
pragma Import (C, vswscanf, "vswscanf");
function vwscanf (a1 : access constant stddef.wchar_t;
a2 : i386.qtypes.darwin_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 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");
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");
-- _MBSTATE_T (empty)
-- _WCHAR_H_ (empty)
REQUIRE_wchar_t_array : constant wchar_t_array (0 .. 0) :=
(0 => wchar_t'Val (0));
end C.wchar;
-- This file is translated by "headmaster" version 0.27-2060155 (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;
use type System.Address;
-- 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 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 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 char is new Character;
subtype builtin_va_list is System.Address;
type ptrdiff_t is new signed_int;
type size_t is new unsigned_long;
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);
type void_ptr_const_ptr is access constant void_ptr;
for void_ptr_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (void_ptr_const_ptr);
pragma Convention (C, void_ptr_const_ptr);
subtype void_const_ptr is System.Address;
type bool_ptr is access all bool;
for bool_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (bool_ptr);
pragma Convention (C, bool_ptr);
type unsigned_char_array is array (size_t range <>) of
aliased unsigned_char;
pragma Convention (C, unsigned_char_array);
subtype unsigned_char_array16 is unsigned_char_array (0 .. 15);
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_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);
subtype unsigned_short_array8 is unsigned_short_array (0 .. 7);
type unsigned_short_array8_array is array (size_t range <>) of
aliased unsigned_short_array (0 .. 7);
pragma Convention (C, unsigned_short_array8_array);
subtype unsigned_short_array16 is unsigned_short_array (0 .. 15);
type unsigned_short_array16_array is array (size_t range <>) of
aliased unsigned_short_array (0 .. 15);
pragma Convention (C, unsigned_short_array16_array);
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_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 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_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_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 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_array is array (size_t range <>) of
aliased unsigned_int;
pragma Convention (C, unsigned_int_array);
type unsigned_int_ptr_ptr is access all unsigned_int_ptr;
for unsigned_int_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (unsigned_int_ptr_ptr);
pragma Convention (C, unsigned_int_ptr_ptr);
type signed_long_const_ptr is access constant signed_long;
for signed_long_const_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (signed_long_const_ptr);
pragma Convention (C, signed_long_const_ptr);
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 signed_long_array is array (size_t range <>) of aliased signed_long;
pragma Convention (C, signed_long_array);
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_array is array (size_t range <>) of
aliased signed_long_long;
pragma Convention (C, signed_long_long_array);
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_ptr is access all unsigned_long_long;
for unsigned_long_long_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (unsigned_long_long_ptr);
pragma Convention (C, unsigned_long_long_ptr);
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_ptr_ptr_ptr is access all char_ptr_ptr;
for char_ptr_ptr_ptr'Storage_Size use 0;
pragma No_Strict_Aliasing (char_ptr_ptr_ptr);
pragma Convention (C, char_ptr_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);
subtype char_array64 is char_array (0 .. 63);
type char_array64_array is array (size_t range <>) of
aliased char_array (0 .. 63);
pragma Convention (C, char_array64_array);
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);
APPLE_CC : constant := 1;
APPLE : constant := 1;
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;
BIGGEST_ALIGNMENT : constant := 16;
BYTE_ORDER : constant := 1234;
subtype CHAR16_TYPE is unsigned_short;
subtype CHAR32_TYPE is unsigned_int;
CHAR_BIT : constant := 8;
CONSTANT_CFSTRINGS : constant := 1;
DBL_DECIMAL_DIG : constant := 17;
DBL_DENORM_MIN : constant double := double'(16#0.3fffffffffffffffc#e-268);
DBL_DIG : constant := 15;
DBL_EPSILON : constant double := double'(16#0.10000000000000000#e-12);
DBL_HAS_DENORM : constant := 1;
DBL_HAS_INFINITY : constant := 1;
DBL_HAS_QUIET_NAN : constant := 1;
DBL_MANT_DIG : constant := 53;
DBL_MAX_10_EXP : constant := 308;
DBL_MAX_EXP : constant := 1024;
DBL_MAX : constant double := double'(16#0.fffffffffffff8000#e+256);
DBL_MIN_10_EXP : constant := -307;
DBL_MIN_EXP : constant := -1021;
DBL_MIN : constant double := double'(16#0.3fffffffffffffffc#e-255);
DEC128_EPSILON : constant := 16#0.5313a5dee87d6eb10#e-27;
DEC128_MANT_DIG : constant := 34;
DEC128_MAX_EXP : constant := 6145;
DEC128_MAX : constant := 16#2.60174245211d7088#e+5103;
DEC128_MIN_EXP : constant := -6142;
DEC128_MIN : constant := 16#0.2a19563e0ae98bc8c#e-5101;
DEC128_SUBNORMAL_MIN : constant := 16#0.da9721e80eee538d0#e-5129;
DEC32_EPSILON : constant := 16#0.10c6f7a0b5ed8d36c#e-4;
DEC32_MANT_DIG : constant := 7;
DEC32_MAX_EXP : constant := 97;
DEC32_MAX : constant := 16#4.ae824f9718451cd8#e+80;
DEC32_MIN_EXP : constant := -94;
DEC32_MIN : constant := 16#0.155c2076bf9a55104#e-78;
DEC32_SUBNORMAL_MIN : constant := 16#0.1665bf1d3e6a8caca#e-83;
DEC64_EPSILON : constant := 16#0.480ebe7b9d58566c8#e-12;
DEC64_MANT_DIG : constant := 16;
DEC64_MAX_EXP : constant := 385;
DEC64_MAX : constant := 16#7.afbadea6d5b66d80#e+319;
DEC64_MIN_EXP : constant := -382;
DEC64_MIN : constant := 16#0.d0289ce2dd61ca6d0#e-318;
DEC64_SUBNORMAL_MIN : constant := 16#0.3a97693b0a901a09c#e-330;
DECIMAL_DIG : constant := 21;
DEC_EVAL_METHOD : constant := 2;
DYNAMIC : constant := 1;
ENVIRONMENT_MAC_OS_X_VERSION_MIN_REQUIRED : constant := 1050;
FINITE_MATH_ONLY : constant := 0;
FLOAT_WORD_ORDER : constant := 1234;
FLT_DECIMAL_DIG : constant := 9;
FLT_DENORM_MIN : constant := 16#0.80000000000000000#e-37;
FLT_DIG : constant := 6;
FLT_EPSILON : constant := 16#0.20000000000000000#e-5;
FLT_EVAL_METHOD : constant := 2;
FLT_HAS_DENORM : constant := 1;
FLT_HAS_INFINITY : constant := 1;
FLT_HAS_QUIET_NAN : constant := 1;
FLT_MANT_DIG : constant := 24;
FLT_MAX_10_EXP : constant := 38;
FLT_MAX_EXP : constant := 128;
FLT_MAX : constant := 16#0.ffffff00000000000#e+32;
FLT_MIN_10_EXP : constant := -37;
FLT_MIN_EXP : constant := -125;
FLT_MIN : constant := 16#0.40000000000000000#e-31;
FLT_RADIX : constant := 2;
FXSR : 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_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;
GNUC_MINOR : constant := 3;
GNUC_PATCHLEVEL : constant := 0;
GNUC_STDC_INLINE : constant := 1;
GNUC : constant := 5;
GXX_ABI_VERSION : constant := 1009;
-- __INT16_C (function macro)
INT16_MAX : constant := 32767;
subtype INT16_TYPE is signed_short;
-- __INT32_C (function macro)
INT32_MAX : constant := 2147483647;
subtype INT32_TYPE is signed_int;
-- __INT64_C (has # or ##)
INT64_MAX : constant := 9223372036854775807;
subtype INT64_TYPE is signed_long_long;
-- __INT8_C (function macro)
INT8_MAX : constant := 127;
subtype INT8_TYPE is signed_char;
-- __INTMAX_C (has # or ##)
INTMAX_MAX : constant := 9223372036854775807;
subtype INTMAX_TYPE is signed_long_long;
INTPTR_MAX : constant := 2147483647;
subtype INTPTR_TYPE is signed_long;
INT_FAST16_MAX : constant := 32767;
subtype INT_FAST16_TYPE is signed_short;
INT_FAST32_MAX : constant := 2147483647;
subtype INT_FAST32_TYPE is signed_int;
INT_FAST64_MAX : constant := 9223372036854775807;
subtype INT_FAST64_TYPE is signed_long_long;
INT_FAST8_MAX : constant := 127;
subtype INT_FAST8_TYPE is signed_char;
INT_LEAST16_MAX : constant := 32767;
subtype INT_LEAST16_TYPE is signed_short;
INT_LEAST32_MAX : constant := 2147483647;
subtype INT_LEAST32_TYPE is signed_int;
INT_LEAST64_MAX : constant := 9223372036854775807;
subtype INT_LEAST64_TYPE is signed_long_long;
INT_LEAST8_MAX : constant := 127;
subtype INT_LEAST8_TYPE is signed_char;
INT_MAX : constant := 2147483647;
LDBL_DENORM_MIN : constant := 16#0.80000000000000000#e-4111;
LDBL_DIG : constant := 18;
LDBL_EPSILON : constant := 16#0.20000000000000000#e-15;
LDBL_HAS_DENORM : constant := 1;
LDBL_HAS_INFINITY : constant := 1;
LDBL_HAS_QUIET_NAN : constant := 1;
LDBL_MANT_DIG : constant := 64;
LDBL_MAX_10_EXP : constant := 4932;
LDBL_MAX_EXP : constant := 16384;
LDBL_MAX : constant := 16#0.ffffffffffffffff0#e+4096;
LDBL_MIN_10_EXP : constant := -4931;
LDBL_MIN_EXP : constant := -16381;
LDBL_MIN : constant := 16#0.40000000000000000#e-4095;
LITTLE_ENDIAN : constant := 1;
LONG_LONG_MAX : constant := 9223372036854775807;
LONG_MAX : constant := 2147483647;
defined_MACH : constant := 1;
MMX : constant := 1;
NO_INLINE : constant := 1;
ORDER_BIG_ENDIAN : constant := 4321;
ORDER_LITTLE_ENDIAN : constant := 1234;
ORDER_PDP_ENDIAN : constant := 3412;
PIC : constant := 2;
PRAGMA_REDEFINE_EXTNAME : constant := 1;
PTRDIFF_MAX : constant := 2147483647;
subtype PTRDIFF_TYPE is signed_int;
-- __REGISTER_PREFIX__ (empty)
SCHAR_MAX : constant := 127;
SHRT_MAX : constant := 32767;
SIG_ATOMIC_MAX : constant := 2147483647;
SIG_ATOMIC_MIN : constant := -2147483648;
subtype SIG_ATOMIC_TYPE is signed_int;
SIZEOF_DOUBLE : constant := 8;
SIZEOF_FLOAT128 : constant := 16;
SIZEOF_FLOAT80 : constant := 16;
SIZEOF_FLOAT : constant := 4;
SIZEOF_INT : constant := 4;
SIZEOF_LONG_DOUBLE : constant := 16;
SIZEOF_LONG_LONG : constant := 8;
SIZEOF_LONG : constant := 4;
SIZEOF_POINTER : constant := 4;
SIZEOF_PTRDIFF_T : constant := 4;
SIZEOF_SHORT : constant := 2;
SIZEOF_SIZE_T : constant := 4;
SIZEOF_WCHAR_T : constant := 4;
SIZEOF_WINT_T : constant := 4;
SIZE_MAX : constant := 4294967295;
subtype SIZE_TYPE is unsigned_long;
SSE2 : constant := 1;
SSE3 : constant := 1;
SSE : constant := 1;
SSSE3 : constant := 1;
STDC_HOSTED : constant := 1;
STDC_UTF_16 : constant := 1;
STDC_UTF_32 : constant := 1;
-- __UINT16_C (function macro)
UINT16_MAX : constant := 65535;
subtype UINT16_TYPE is unsigned_short;
-- __UINT32_C (has # or ##)
UINT32_MAX : constant := 4294967295;
subtype UINT32_TYPE is unsigned_int;
-- __UINT64_C (has # or ##)
UINT64_MAX : constant := 18446744073709551615;
subtype UINT64_TYPE is unsigned_long_long;
-- __UINT8_C (function macro)
UINT8_MAX : constant := 255;
subtype UINT8_TYPE is unsigned_char;
-- __UINTMAX_C (has # or ##)
UINTMAX_MAX : constant := 18446744073709551615;
subtype UINTMAX_TYPE is unsigned_long_long;
UINTPTR_MAX : constant := 4294967295;
subtype UINTPTR_TYPE is unsigned_long;
UINT_FAST16_MAX : constant := 65535;
subtype UINT_FAST16_TYPE is unsigned_short;
UINT_FAST32_MAX : constant := 4294967295;
subtype UINT_FAST32_TYPE is unsigned_int;
UINT_FAST64_MAX : constant := 18446744073709551615;
subtype UINT_FAST64_TYPE is unsigned_long_long;
UINT_FAST8_MAX : constant := 255;
subtype UINT_FAST8_TYPE is unsigned_char;
UINT_LEAST16_MAX : constant := 65535;
subtype UINT_LEAST16_TYPE is unsigned_short;
UINT_LEAST32_MAX : constant := 4294967295;
subtype UINT_LEAST32_TYPE is unsigned_int;
UINT_LEAST64_MAX : constant := 18446744073709551615;
subtype UINT_LEAST64_TYPE is unsigned_long_long;
UINT_LEAST8_MAX : constant := 255;
subtype UINT_LEAST8_TYPE is unsigned_char;
-- __USER_LABEL_PREFIX__ (unparsible)
VERSION : constant char_array (0 .. 5) := "5.3.0" & char'Val (0);
WCHAR_MAX : constant := 2147483647;
WCHAR_MIN : constant := -2147483648;
subtype WCHAR_TYPE is signed_int;
WINT_MAX : constant := 2147483647;
WINT_MIN : constant := -2147483648;
subtype WINT_TYPE is signed_int;
code_model_32 : constant := 1;
qqcore2 : constant := 1;
qqcore2qq : constant := 1;
-- __has_include (has __has_include__ or __has_include_next__)
-- __has_include_next (has __has_include__ or __has_include_next__)
qqi386 : constant := 1;
qqi386qq : constant := 1;
qqpicqq : constant := 2;
-- __strong (empty)
-- __weak (empty)
defined_i386 : constant := 1;
function builtin_alloca (a1 : size_t) return char_ptr;
pragma Import (Intrinsic, builtin_alloca, "__builtin_alloca");
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