Last active
June 28, 2016 03:15
-
-
Save ytomino/7d66c6886038a402427d to your computer and use it in GitHub Desktop.
i686-apple-darwin9
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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 contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- This file is translated by "headmaster" version 0.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